Open List of Spooled Files (QGYOLSPL)

From MidrangeWiki
Revision as of 18:33, 6 December 2018 by DaveLClarkI (talk | contribs) (Created page with "Category:API Category:RPG_Prototypes == Summary == The following is an RPG/LE fully free-form prototype for the IBM QGYOLSPL API to open a list of spooled files on th...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

Summary

The following is an RPG/LE fully free-form prototype for the IBM QGYOLSPL API to open a list of spooled files on the system. The list can be filtered by users, output queues, form types, user data values, statuses, printers, or specific jobs.

Prototype for the QGYOLSPL API

//******************************************************************************
// IBM API to Open a List of Spooled File information
// https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_72/apis/qgyolspl.htm
//******************************************************************************
/include qsysinc/qrpglesrc,qgyolspl         // QGYOLSPL API data structures
dcl-pr IBMAPI_OpenSpooledFileList extpgm('QGYOLSPL');
  SplRcvrVar            likeds(QGYV020000)  options(*varsize);
  SplRVarLen            int(10)   const;
  SplListInf            likeds(QGYOLI02)    options(*varsize);
  SplRtnRCnt            int(10)   const;
  SplSortInf            likeds(QGYOSD)      options(*varsize);
  SplFltrInf            likeds(QGYF0200)    options(*varsize);
  SplJobName            char(26)  const;
  SplListFmt            char(8)   const;
  SplErrCode            likeds(ApiErrC)     options(*varsize);
// optional parm group
  SplFltrFmt            char(8)   const     options(*nopass);
end-pr;

References