RE: Simple Display file problem..

Your record format number must be different from the file name.  If it's
just one format I usually just put an "R" in front of the name...


Ross Hartford
Cothern Computer Systems, Inc.
1650 Lelia Drive, Suite 200
Jackson, MS  39216

Phone:     601-718-0803
Cell:      601-291-2080
Fax:       601-969-1184

EMail:     rossh@xxxxxxxxxxx
Web:       http://www.ccslink.com

 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jake M
Sent: Tuesday, September 19, 2006 3:35 PM
To: RPG programming on the AS400 / iSeries
Subject: Simple Display file problem..

Hello All;
This is probably a very simple question but I am a novice RPG programmer and
having trouble solving this. I have a display file and a RPG code associated
with it. The snippet of the RPG code is as follows..

     FITEM_PF      IF     E             DISK
     FItemInqTR   CF     E             WORKSTN IndDS(WkstnInd)
     D WkstnInd        DS
     D NotFound               40        40N
     D LowQty                  30        30N
     D Exit                       03         03N
     D Cancel                  12         12N


     I keep getting the following error..

RNS9308 Compilation stopped. Severity 40 errors found in program.
RNF2109 All Record Formats for externally-described file ITEM_PF ignored or
dropped due to error; file ignored.
RNF2121 Record format ITEM_PF in file ITEM_PF already defined; record format
is ignored.
RNF7503 Expression contains an operand that is not defined.

Any help in this matter would be much appreciated.

Thanks in advance.

cheers,

Jake.