FPF1 IF E DISK C READ PF1 C DOW NOT%EOF(PF1

The RP program is displaying records 11 times .But there
are 10 records in
a pf.(ie last record is displayed twice).How to
display records only 10 times?

Question Posted / ramesh

5 Answers
10356 Views
I also Faced
E-Mail Answers

Answer Posted / ramesh

FPF1 IF E DISK
C READ PF1
C DOW NOT%EOF(PF1)
C ............
C ...........
C READ PF1
C ENDDO
C SETON LR

RPG400
FPF1 IF E DISK
C READ EMP 90
C DOU *IN90=*ON
C ............
C ............
C READ EMP 90
C ENDDO
C SETON LR

Is This Answer Correct ?

1 Yes

0 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

Assume 2 users are using the same file and first user updates some record in the file. Will the 2nd user will be able to see the updated record or not?

945

what is the use of sflnxtchg?

1263

what do you mean by an input subfile, what are the keywords required?

1261

How to handle duplicate error handling in RPG?

2311

what is kids-rpg?

1127

How many program bind in one module....

2684

what is an online rpg?

1266

which program rpg or cl is efficent to update a transaction onto a database file and why ?

1243

How can we know running job is batch or interactive?

1124

How Chain operation copies the record's data to the input buffer for the program?

1606

how can you display specific subfile page on the screen in unequal subfile?

1155

can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com

2409

how do I declare a minor?

1160

When it is desirable to describe files Internally?

1714

what is the necessary keyword needed to scroll subfile records?

1161