Re: Simple Display file problem.. -- RPG400-L

Okay, I solved the problem using Alan's suggestion this way...

FITEM_PF   IF   E           K DISK    Rename(ITEM_PF:RITEM_PF)

the program compiles and everything is fine and dandy. I am from Java
background and am very comfortable with SQL but like Rob said I will be
working a lot on the code written by different RPG programmers. So, while
learning lots of RPG programming the traditional way I will try and do the
same programs in embedded SQL and see how they turns out. Peter, you are
right. I had to add a 'K' in my F spec. Thanks for all the help.

cheers,

Jake.

On 9/20/06, Peter Vidal <Peter_Vidal@xxxxxxxx> wrote:


I do not know if error RNF7503 (Expression contains an operand that is not
defined) kicked in due to the previous record format issue but also is
good to mention if you have an operation like SETLL/READE/CHAIN in the
calculations, you need to have the "K" for the Record Address Type for
ITEM_PF...


Peter Vidal
PALL Corporation / SR Programmer Analyst, IT Development Group
10540 Ridge Rd., Ste 203, New Port Richey, FL 34654-5111
http://www.pall.com

"An idea is salvation by imagination"
Frank Lloyd Wright (1869-1959)




"Jake M" <jakeroc@xxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/19/2006 08:02 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

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.
--
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.




--
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.