|
Since I'm using multiple logicals over the same physical in one program, I like reading by format because I can RENAME to something meaningful instead of using the file name. (Too bad the %EOF and %FOUND don't work on the format name...)
Anyway, when I compile my program, it has no problem with the SetLL below but gives "RNF5201: The specified Factor 2 operand is not allowed for READE or READPE operation." on the ReadE. I retyped the line from scratch to rule out any phantom hidden characters.
Value is defined LIKE the key to the file, DIM(48)x is 3,0 and was previously set for the element in the array I wish to access (in a for loop).
Shouldn't this work?I get the same error on another file accessing by a single field, so it's not the arrary that is causing this problem.
FIVLCATI1 IF E DISK RENAME(IVFCATI:ATIVAL) /Free SetLL Value(x) ATIVAL; DoW Not %EOF(IVLCATI1); ReadE Value(x) ATIVAL; If Not %EOF(IVLCATI1); // do stuff EndIf; EndDo; Eval *INLR = *ON; Return; /End-FreeNaturally, I thought, "I'll just use the file name instead." Well, I get the same error that the operand is not allowed.
As an Amazon Associate we earn from qualifying purchases.
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.