If there are 1000 member(PGM type) in a SRC file. How can we
compile in a CL program? ( It need to be done in a loop)?
Answer Posted / abhishek
Please follow steps given below -
Use DSPFD command to take member list of SRC source
physical file into a PF
DSPFD FILE(LIBRARY/SRC) TYPE(*MBRLIST) OUTPUT(*OUTFILE)
FILEATR(*PF) OUTFILE(LIBRARY/OUTFILE)
It will create an OUTFILE into specified LIBRARY having
MEMBER LIST (filed name MLNAME). Now use this OUTFILE into
CL program reading it into loop till EOF(CPF0864) and for
each record, compile program using CRTPGM command.
CRTPGM PGM(&MLNAME) ......etc.
I hope it will
work.
| Is This Answer Correct ? | 17 Yes | 1 No |
Post New Answer View All Answers
what is the rpg system?
thanks mr.Harshad R Suryawaunshi,i'm new to as400 i think you are telling in rpgile i know only rpg400 if possible can you tell in rpg400
what is data area and how it is used in rpg program ?
Please tell me how to read the records from a file with load an array of size with error conditions(The logic answer for this question is ARR is array of 99 elements Z-ADD 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN99 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO).So,Please give me the complete of this code.
what happens when sflsiz = sflpag? What are the advantages and disadvantages?
How do u design a physical file, when you have 2 Unique fields like for eg in A student file student ID and student examination no both are unique
what is the difference between do while and do until?
if there is a module object , how to find the program object for this module object.Assume the module object name and program object name is not same.
what are the key words you must use when using a subfile?
how do I preserve and clean the array?
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...........
what is the necessary keyword needed to scroll subfile records?
How many program bind in one module....
what is an online rpg?
can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com