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
- 5762 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / ashok
Ffilename if e disk
then on load subroutine part
read the record format
dow not%eof
move the fields
increment 1 to the rrn
write the sflrcd name
read the record format
enddo
| Is This Answer Correct ? | 0 Yes | 2 No |
what is match field indicator?
what is the use of UNIQUEUE KEY WORD? what is the difference between PFILE AND REF?
Good morning my experts.Im kuppi.im working as a software trainee on AS/400 technology.i have also joined with ibmi5 team.im trying to convert date with cl/400 coding.I have taken 2 parameters(like date and date types). A. If suppose date type is j,Now i want to convert date to *MDY format B. if date type is M,now i want to convert date to *JUL format C. sending a Program message with the value of converted date.
What is the symbol used for shifting fields in SDA?
How can we change the uppercase to Lowercase in RPG?
What is the difference between /copy and /include in RPGLE?
What is the purpose of 'CPYTOIMPF' command?
6 Answers Aditya Birla, Redington,
i want to display the 10000 record in a subfile by using loadall , can we do it?
how can we view the entire objects and its types in a pgm?
what the purpose of ovrdta, ovrata keywords?
what are the three line types in rlu ?
describe the difference between the dowxx and douxx operations?
RPG400 
