|
You can replace DSPPFM with SQL request - i.e. do the following:
* Add an exit program to QIBM_QCA_CHG_COMMAND as follows:
ADDEXITPGM ?*EXITPNT(QIBM_QCA_CHG_COMMAND)
?*FORMAT(CHGC0100)
??PGMNBR(1)
??PGM(MYLIB/MYPGM)
?*REPLACE(*NO)
PGMDTA(*JOB 20 'DSPPFM QSYS') 2. Program MYPGM in mylib will replace the DSPPFM with doing run query to the result file:
RUNQRY QRY(*NONE)
QRYFILE((ORIGFILE))
OUTTYPE(*OUTFILE)
OUTFILE(TEMPLIB/TEMPFILE)
3. Your program can now issue select to templib.tempfile.
==================================
MORE INFORMATION ON THIS TOPIC
==================================
Ask your systems management questions--or help out your peers by answering them--in our live discussion forums.
The Best Web Links: Tips, tutorials and more.
PC/Windows connectivity expert Shahar Mor is available to answer your toughest networking questions. Ask Shahar a question or read his previously answered questions here.
|
