we have 2 PF files with same name, how to copy data's from
one file to another through RPG program logic?
Answers were Sorted based on User's Feedback
Answer / venkat b
You can give 2 different names to the different Physical
Files like the following code and then use the
keyword "EXTFILE" to give a fully qualified PF -
Fname1 if f 10 disk extfile(LIBRARY1/filename)
Fname2 if f 10 disk extfile(LIBRARY2/filename)
RENAME(rcdname1:rcdname2)
Then, use DOW, Read and write.
| Is This Answer Correct ? | 19 Yes | 1 No |
Answer / syam
You can't declare 2 pf in the RPG program with same name.
If you declare, system will give error on compilation
(*RNF2026 30).
You can rename same record name in RPG program.
You can rename fiel name in RPG program.
You can't keep 2 pf in one library with same.
2 pf with same name in 2 differned library, you can copy
to 1 pf thru CPYF cl command.
| Is This Answer Correct ? | 17 Yes | 5 No |
Answer / perumal
Declare the 2 PF files in the RPG program. Rename either
one of the file record format in F Spec
If the fields also same use PREFIX Keyword uisng D spec if
you are using ILE
Or RPG/400 use I spec and rename the fields
Then read from the file and write into the another file
| Is This Answer Correct ? | 9 Yes | 9 No |
What is an Array Data Structure?
what is the difference between normal upddta to pf and updating using dfu program?
Service Program : S1 Modules in S1 : M1 M1 having two procedures : ADD, SUB Current Binder Language STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP Doubt: I need to add one new Module to the Service Program M2 having one procedure ‘MULT’ How to add this new module to the service program S1 ? If I need to recreate the service program again, Do I need to mention the Module M1 again while recreating along with new Module M2? There is no Binding Directory. Binder language structure will be like this STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") EXPORT SYMBOL("MULT") ENDPGMEXP STRPGMEXP PGMLVL(*PREVIOUS) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP
Hello friends, i am having 1 year experience in AS/400. Can any one send me the as400 interview questions to my email id:nagaraju20087@gmail.com
How to declare the length of emp no in the physilcal file and the mandatory length is 6 i.e. Emp No should be numeric, mandatory and fill all the 6 places
How I can read and display three fields in the record format DSPFM1 of the display file,while one field(using in one file) is NAME which is Key field in field reference file and another two fields are AGE and ROLL NO are using another file. Please send me coding part.
STRTCPFTP command is used to start FTP in CL Language (ILECL)....can u plz tell me which command is used to start SFTP in CL language(ILECL)?
What is source physical file?
what is maximum number of arrays allowed in rpg?
what is the purpose of dynslt keyword?
The content of Physical file is as below: hfcftp wruquief SENDPASV 0 CDUP ASCII GET 01100901.CSV ramndk/ECP505.EC0110090 (REPLACE QUIT Thw above commands will get executed when we call STRTCPFTP from CL program.... Now if I want to use SFTP what can be the solution? plz reply in detail....Thank you for ny help...
how to toggle between single line and multi - line display of a particular record in a subfile?