Interested to Buy Any Domain ? << Click Here >> for more details...
Write the subfile logic program for the given concept. Load
the data to the subfile depends upon the designation where
designation is not a key field?
- 2 Answers
- 6169 Views
- I also Faced
- E-Mail Answers
Answer Posted / amuthavalli
Its better to keep all the designations in Compile time
array.And then compare the Physical file datas with the
array(designation).Then write it into a subfile.
read file1
Dow not %eof
Move designation arr(i)
add 1 to i
read file1
enddo
dow j<=i
Read file2
dow not %eof
If arr(j=designation
write subfile
endif
Read file2
enddo
Add 1 to j
Enddo
This logic will work.Try it out.
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
what is the purpose of the indara keyword?
What is access path in as400?
What is the Difference between command attention key and command function key ?
can a indexed file be accessed in arrival sequence in rpg program?
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... I m using RPG/ILERPG to download...
how many maximum spaces could be given in o specs?
how to get the cursor position?
where can you specify an indicator in lokup operation?
Difference Between Skip Before & Space Before?
How to reverse a string using RPG?
an access path may be in which sequence?
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
What Is The Error If We Don't Get Login Screen?
how does the runqry show the output?
how to run other job when one job is active?
