i have 1000 records in pf.what are all the ways to read a
particular name records in rpg?? ie.. in pf i have a name
called demo appeared around 52 times hw will we read this
particular records in rpg/400?.

Answers were Sorted based on User's Feedback



i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / deepak daswani

You can use READE opcode in dow while loop to read aal the
records of PF which is 'demo'.
Because everytime cursor reads the next value in the file.

Is This Answer Correct ?    12 Yes 1 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / bhalchandra

What u can do is u can create a non join LF over the PF and
give the Select clause for that field like this:
S FLD1 COMP(EQ 'demo')

And now u can use this LF in your program.

Is This Answer Correct ?    10 Yes 1 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / swetha p rao

If the particular field value is demo , then you can do
onething to avoid reading the file unnecesarily

1. Declare a temporary file in user open mode and specify
as external mbr in F spec.

2. In CPYF there is an option to include records (INCREL )
based on selection, just copy all the records where the
field value is 'demo' in a temporary file with a create
file option. (using QCMDEXC)

3.Now the temporary file will have only demo records.Open
the file and read the records.

(or)

Using SQLRPGLE, write a query to select the records which
has field value 'demo'


Correct me if iam wrong

Is This Answer Correct ?    4 Yes 0 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / sudhir

to escape from creating a new object of LF(if its not a
permanent requirement) you can use OPNQRYF to select
whichever records you want like:

OPNQRYF FILE((FILENAME)) QRYSLT('(FIELDNAME *EQ "demo")')

hope you got your answer

Is This Answer Correct ?    5 Yes 2 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / swetha

that wud again create an object, What if the requirement
changes evrytume.then the LF wud not be useful

Is This Answer Correct ?    1 Yes 1 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / prasanna

In the RPG code, Move the value demo to the field and do a
reade on the file

Is This Answer Correct ?    2 Yes 2 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / jeganath

Go for ReadE i.e Read Equals,

give 'Demo' in Factor 1

'Demo' ReadE

it will fetch records equals 'Demo' string in the file, and
also it avoid unnecessary reading of other records, very
effective,


Note: it works only when that field is declared as key in
PF file

Is This Answer Correct ?    0 Yes 0 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / deepika

setll keyfld pf1
reade keyfld pfl1
dou %eof

Is This Answer Correct ?    1 Yes 2 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / rajgoaj

Can it be done by using group function on a SQLRPG?

Is This Answer Correct ?    0 Yes 2 No

i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in ..

Answer / rajkalyanam

Say Physical file name is PF001 and Field name is NAME
and i want to select all records having their name as DEMO
then i will use SQLRPG,please correct me if i'm wrong

Select * from PF001 where name = 'DEMO'

Is This Answer Correct ?    0 Yes 2 No

Post New Answer



More RPG400 Interview Questions

How many program bind in one module....

0 Answers  


What is the difference Return and InLr?

3 Answers  


1.The questions have given an array declaration and move operation then this statement is correct or not?

3 Answers   TCS,


what is meant by record lock.how records are locked.what is the purpose of record lock.if records are locked what happens.how to find out which record is locked.

4 Answers   HCL,


steps for debugging two rpg programs????

4 Answers  






Explain mdt?

0 Answers  


How to declare the pull button in AS/400..

0 Answers  


Can anybody tell me the setps to create .csv file in IFS folder on AS/400. I also need to know how I can send this .csv file to PC in xls sheet.....?

2 Answers  


in a cl pgm records are copied to a file in qtemp a pgm is called to delete records from the file in qtemp no of records in file in library qtemp is checked wat shud be the count of records let say it was 10 initially endpgm

2 Answers  


Can we have a Physical file without any member ? Please let me know

12 Answers  


I have 1000 records in a file. I would like to generate 10 identical reports from this record with same format (structure of records) how do I do this?

1 Answers   IBM,


How can we receive values from a called procedure in RPG?

1 Answers  






Categories