Answer / uday bagdi

we can create the pre-run time array so that data-base file come in our rpg program then we read that pre-run time array with loop and increment the array indexing by 2

Answer / uday bagdai

1st set the pointer on the record(depend on rrn).after increase the rrn value by 2 (rrn=rrn+2).trape their on doweq loop so you can read alternative records.because (your pointer set on alternative records)

Answer / abhishek

The first method is not very full proof. Actually it is not
necessary that RRN is always sequential.

Suppose initally there are 100 records in a file and so
does the RRN starts from 1 for first record and 100 for
last record.

If 1 record is deleted from the file RRN remains unchaned
and in that case adding 2 may cause a problem if system
does not get Record at that RRN it will read the next
sequential.

Answer / ramrdy

hi uday,

can you write code for that program

Answer / sreedhar reddy

Simple way is just read a PF process 1st record, then for second read ignore it. It is simple like having two read operations, first is at start of the loop and second is at just before end of the loop.

Answer / mahalakshmi

All the records in a file is first loaded in to an datastructure and then incrementing the value of datastructure +2 then read the values in the datastructure.

Answer / ramu

how to fetch alternate records from data base(pf) using RPG? (ex. 1st and 3rd and 5th .......etc)
I need Rpg code not theory?

Answer / krishna

sample code for alternative record in a pf
fsamplepfif e disk
/free
dow not %eof(samplepf);
read samplepf;
If %eof(samplepf);
Leave;
endif;
---------;(doing some actions based on the conditions)
read samplepf;
enddo;
*inlr = *on;
/end-free

How can we search particular records from the database file in RPG. For example, there are 100 records in the file.i need to retrieve all the records matching/equal to the particular 'NAME' field. How can we do the above using SEARCH criteria other than using the IF cond?

4 Answers   CTS,

Whether a module can consists of many procedures or it can consist of subprocedures having a main procedure?If it is possible that it can contain many individual procedures than can we have different name for complete module and how do we call this module in main modul?

3 Answers   Steria,

How can you delete records form a file in rpg without using "Delete" OPCODE?

7 Answers  

how do I declare a table or array in rpg iv?

0 Answers   IBM,

ESCAPE message sent by child program can be handled by parent program using which keyword?

2 Answers  

What is journalling and commitment control?

3 Answers   IBM,

One of the job in subsystem is in Running status,expected time to complete this job is 2 minutes. But from last 5 -10 minutes this job is still in running status....What are the possible reasons...and What are the actions i need to perform to check this...?

4 Answers  

how we create binder member for updating service program and where we type this code on command line or in program ? strpgmexp pgmlvl(*current) export symbol (xyz0 endpgmexp. plz explain me this step by step .

2 Answers  

wat is the difference between dataarea and data queue?

5 Answers   Airtel, Four soft, Shahi Exports,

2. Which of the following statement(s) explains the difference(s) between the /INCLUDE and ICOPY directives? a.) No difference, they function the same b.) ACOPY cannot be used as a conditional directive c.) IINCLUDE files cannot contain embedded SQL d.) Nesting /TNCLUDE directives is not allowed

2 Answers   IBM,

how to find whether a date format is valid or not in RPG400 not in RPGILE.Can you please write the coding for this sir,i'm new to AS400.Please help.

1 Answers  

can we perform CHAIN operation on Subfile record format....?

4 Answers