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?
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 difference between rename and prefix?
Hi Friends, I need immediately answer for this: Senario is that,I am selecting records from the display and window subfile on the basis of Reason Code and some more fields but spool file not showing the same records which i have selected by display and window subfile. Q.What could be the causes(resons)to not show records properly (just selected in the display file and Window subfile)according the selection criteria of the records. Q.What would be the solutions to show records properly in the spool file just as selected in in the display file and window subfile according to the selection criteria.
What is the difference between access path and Dynamic select?
Which command we can use to update a physical file using c.l pgm?
How a field is renamed in rpg IV?..give answer with example?
what is the rpg and cl life cycle?Please tell me any body
What is the purpose of the following? FORDHDR1 IF E K DISK ORDHDRF KRENAMEORDHDRF1
where will control be passed after the execution of the *pssr subroutine if the factor2 of the endsr is blank ?
what is the use of jdftval in join logical file?
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 we will get issues on AS/400 technology ? I mean which issue/Defect Tracking tool is using in all companies when any issue comes? Can anybody explain about the work flow of AS/400 project ? plzzz
Define an Interactive Job?