× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Not your answer but Birgitta told you what you should do to find the issue...

But why pass the LIB parm??  FWIW, you can just use the value of ODLBNM from 
the file..... 


Thanks,
Tommy Holden


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On 
Behalf Of HauserSSS
Sent: Friday, July 07, 2006 12:30 PM
To: RPG programming on the AS400 / iSeries
Subject: AW: The Field or indicator is not defined. 

Hi,

just search through your compiling list with '* 7030' and you'll see which
field or indicator is not defined. May be it's only a small typo.

Mit freundlichen Grüßen / Best regards

Birgitta

"Shoot for the moon, even if you miss, you'll land among the stars."
(Les Brown)

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von koti shiva
Gesendet: Freitag, 7. Juli 2006 19:14
An: RPG400-L@xxxxxxxxxxxx
Betreff: The Field or indicator is not defined.


Hi ,

  Thanks for u r update , i ve removed the blank line , still m getting the
bellow error.

Indicator References:
       INDICATOR  REFERENCES (M=MODIFIED D=DEFINED)
       *IN            700
       LR            1500M
       OF             200D    1200
       20             600M     700     1300M

  QRG7030 Severity:  30   Number:    1

   Message . . . . :   The Field or indicator is not defined.

  My program

 0001.00      FQADSPOBJIF  E                    DISK
0002.00      FQPRINT  O   F     132     OF     PRINTER
0003.00      C           *ENTRY    PLIST
0004.00      C                     PARM           LIB    10
0005.00      C                     EXCPTHDG
0006.00      C                     READ QLIDOBJD                 20
0007.00      C           *IN20  DOWEQ'0'
0008.00      C                     MOVE ODUDAT    MMDDYY  6
0009.00      C                     EXSR CVTDAT
0010.00      C                     MOVE YYDDMM    LSTUSD  60
0011.00      C                     EXCPTDETAIL
0012.00      C         OF        EXCPTHDG
0013.00      C                     READ QLIDOBJD                 20
0014.00      C                     ENDDO
0015.00      C                     SETON                     LR
0016.00      C      CVTDAT   BEGSR
 0017.00      C                     MOVE MMDDYY    WORK2   2
0018.00      C                     MOVELWORK2     YYMMDD  6
0019.00      C                     MOVELMMDDYY    WORK4   4
0020.00      C                     MOVE WORK4     YYMMDD
0021.00      C                     ENDSR
0023.00      OQPRINT  E    206         HDG
0024.00      O                                   25 'OBJECTS'
0025.00      O                                      'IN LIBRARY - '
 0026.00      O                         LIB
0027.00      O        E    2           HDG
0028.00      O                                    6 'OBJECT'
0029.00      O                                   18 'OBJ TYPE'
0030.00      O                                   30 'ATTRIBUTE'
0031.00      O                                   42 'LAST USED'
0032.00      O        E    1           DETAIL
0033.00      O                         ODOBNM    10
0034.00      O                         ODOBTP    19
0035.00      O                         ODOBAT    33
0036.00      O                         LSTUSDY   41  1

  TIA
    Cheers.....
  Shiva kumar




---------------------------------
 Find out what India is talking about on  Yahoo! Answers India.
 So, what's NEW about the NEW Yahoo! Messenger? Find out.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.





As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.