Hi, You can read flat file on RPG program. FXXXXXX IF F 380

Hi all friend,

Could Any body send me the code (with coding) of this
senario because I have tried but I am stucking somewhere so
Please reply ASAp with coding.

senario:Q: I have to write the flat file(FLAT1) into the
three different PFS (PF1,PF2 and PF3) with the respect of H
line data,
D line data and Z line data of flat file.

where
I have different data in flat file(FLAT1) which is
mentioned below with data.

H0929200909282009092820095529420003000073

D2222220006765555webservi001633.9909222009092820090924200951
8564380134049ROSNER TOYOTA OF FREDE FREDERICKSBURVA
224080000USA840840001633.99001633.99851856492689800208001915
511001633.990408490000000.0000000003446048
1,3 110793145 09070700351
372367 Rosner Motors

D3333320006774444webservi000271.2409222009092820090924200951
8564380134049ROSNER TOYOTA OF FREDE FREDERICKSBURVA
224080000USA840840000271.24000271.24851856492689800208001835
511000271.240930680000000.0000000003450293
1 110793254 09072100079
373933 Rosner Motors

Z0929200900000020001905.25

FLAT1 has the three pf data
H line-represents the header pf data,D-Represent Details
pf data,Z-Represents the trailer pf data

Now I have to write H line data of flat file into Header pf
(PF1),D line data of flat into datails pf(PF2) and
Z line data of flat file into pf(PF3) with the spefic
position(H,D and Z data of flat file into PF1, PF2 and PF3)
of
flat file.

Question Posted / syam

4 Answers
10560 Views
IBM, I also Faced
E-Mail Answers

Answer Posted / syam

Hi,

You can read flat file on RPG program.
FXXXXXX IF F 380 DISK UC
IXXXXXX DS 01 1 C1
I 1 120AA1
I 13 550AA2
IXXXXXX DS 02 1 C1
I 7 120BB1
I 71 750BB2
IXXXXXX DS 03 1 C1
I 15 120BB3
I 120 1750BB4

Is This Answer Correct ?

1 Yes

0 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

How can we know running job is batch or interactive?

1133

what is the use of sflnxtchg?

1273

What is the diff bw PF/LF Name and their Record format name? what is restriction in record format then file name?

3007

what is the rpg system?

1286

How to create a login screen using a command instead of display file.... intention is to get a password field on a command..... how do you achieve this...

1898

can I touch the array during treatments?

1185

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

1189

what are the key words you must use when using a subfile?

1190

what is an online rpg?

1274

When it is desirable to describe files Internally?

1724

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?

1123

1. If there are two programs using same file and 2 users are using the file at the same time and what can be done to allow them both to access? 2. How can remove lock from the file for accessing it by both users?

963

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...........

3840

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?

953

are there any useful c runtime apis that I can call from rpg iv?

1174