Interested to Buy Any Domain ? << Click Here >> for more details...
1.Are there any errors in the following statement?If so
then list them.DTAARA is a data area having a field EMP #
and EMPNO is a
field in the file EMPPF.Which has one record.
READ EMPPF
IF %FOUND(EMPPF)
IN DTAARA
EVAL EMP#=EMPNO
OUT DTAARA
ENDIF
- 5 Answers
- 10090 Views
- I also Faced
- E-Mail Answers
Answer Posted / amitava
First of all, %found() function is not set after the READ
operation. If not %eof() can be used instead.
| Is This Answer Correct ? | 8 Yes | 3 No |
Post New Answer View All Answers
Suppose we have one database file and it is used by 5 programs and in 3 program we have to add some records in datbase file s what is the impact on other program?
what is *place and *auto keyword in prtf ?plz explain
How to call one program from another program in RPG? please help me with the code
When we have a file with Duplicate records and I want to read the unique record from the file. For example a file containing Emp Name as 'Ram' and there are 3 entries of it. So how to read a unique record from File?
what is the difference between do while and do until?
What is the difference between copybooks and subprocedures in as400?
what is file information data structure?
What is the diff bw PF/LF Name and their Record format name? what is restriction in record format then file name?
write an RPG program to calculate the marks of 5 students (A,B, C, D, E)in 3 different subjects (eng, math, sci) an display on the screen
When it is desirable to describe files Internally?
how do I preserve and clean the array?
How to declare the pull button in AS/400..
We have job which is running as batch. It takes atleast 06 hours to complete tht job. But I wanna do tht job with in 3 hours?
If my rpg program has a date field, what extra care I have to take while compiling that rpg program? If the file is keyed and I have declared the file as well as key list properly in my program. Still am getting an error message like "chain/reade operation is not allowed" what may be the case?
How do u design a physical file, when you have 2 Unique fields like for eg in A student file student ID and student examination no both are unique
