Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...


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?

Answers were Sorted based on User's Feedback



The RP program is displaying records 11 times .But there are 10 records in a pf.(ie last ..

Answer / sauml

in DDS sepc-

SFLPAG(10)
SFLSIZ(11)
RRN1 H 4 SFLRCDNBR
Rollup 27
in rpgiv:-

in D SPEC:-
SFLpag s 2 0 inz(10)
lstrrn s 4 0

In C Spec:- in load subroutine
Eval rrn = Lstrrn
*Loval Setll Rcd
Do SFLpag
Read Rcd
|
|
|
Eval rrn = rrn + 1
Write Sfl
Enddo
If rrn > 0
on SFLDSP indicator
Endif
Eval lstrrn = rrn

Hope it's enough for u to understand -----cheers

Is This Answer Correct ?    1 Yes 0 No

The RP program is displaying records 11 times .But there are 10 records in a pf.(ie last ..

Answer / 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

The RP program is displaying records 11 times .But there are 10 records in a pf.(ie last ..

Answer / mathan kumar

RPG400

FPF IF E DISK k
C *LOVAL SETLLEMP
C READ EMP 90
C *IN90 DOWEQ *OFF
............
C ............
C READ EMP 90
C ENDDO
C SETON LR

Is This Answer Correct ?    1 Yes 0 No

The RP program is displaying records 11 times .But there are 10 records in a pf.(ie last ..

Answer / vinits

dou %eof
read ....
.
.
.
.
enddo

Is This Answer Correct ?    0 Yes 0 No

The RP program is displaying records 11 times .But there are 10 records in a pf.(ie last ..

Answer / siva

Try this

Read File1
If %Found
Dou %Eof
|

|
Read File1
Enddo
Endif

Is This Answer Correct ?    1 Yes 3 No

Post New Answer

More RPG400 Interview Questions

How can we find out whether the job is interactive or Batch through RPG program? 2) How can we find out through CL program?

6 Answers   CSC,


give an eg of ACQ-(ACQUIRE),BIT OFF,BIT ON,DEALLOC,DUMP,FEOD,FORCE,MHHZO,MHLZO,MHLLZO,MLHZO,REL,RESET,TESTZ,TESTB,TESTN----GIVE SMALL EXAMPLE TO THE OPCODES...TO UNDERSTAND FUNCTIONING...........

0 Answers   CTS,


What will be your approach in going either for OPNQRYF or Logical files. Which one to go for?

2 Answers  


What will happen if we r using seton lr after return or vice versa.

5 Answers  


what is use of sflnxtchg and use of MDT(modify data tag).both r same r not and can we use these on dspf and subfile.

2 Answers  


what is program status data structure?

1 Answers   IBM,


i 'm new to as/400.in an interview i was asked this question.give a practical example for passing information or data through local data area. I know only that data area is an object used to store tiny bits of data or it can store one value at a time and it is used to store frequently changing values or datas.thats all i know about data area can any one tell me how local data area and user defined data area are used to pass data between jobs with a example or coding.thanks in advance.

2 Answers   CTS,


what is overlay? how can we pass parameters in cl or rpg programing? how can we get data area value in cl or rpg programming?

2 Answers   IBM, Patni,


What is the OPEN and CLOSE accesspath?

3 Answers   CTS,


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

0 Answers   IBM,


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

0 Answers  


Can a run time array be declare like below with no specified number of elements ? Is it possible ? DFLD_ARRAY 7 DIM() INZ(*blanks) What does this mean ? Does this mean that the number of array elements will be dynamically declared during run time ?

1 Answers   TCS,


Categories