Change Library List (QLICHGLL)
From MidrangeWiki
Revision as of 17:47, 6 December 2018 by DaveLClarkI (talk | contribs) (→Prototype for the QLICHGLL API)
Summary
The following is an RPG/LE fully free-form prototype for the IBM QLICHGLL API to change the current library, two product libraries, and the user part of the library list for the current job.
Prototype for the QLICHGLL API
//****************************************************************************** // IBM API to Change the User Library List in toto // https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_72/apis/qlichgll.htm //****************************************************************************** dcl-pr IBMAPI_ChangeLibraryList extpgm('QLICHGLL'); ChgLibCur char(11) const; ChgLibPrd1 char(11) const; ChgLibPrd2 char(11) const; ChgLibLst char(11) dim(250) options(*varsize); ChgLibLstC int(10) const; ChgLibErrC likeds(ApiErrC) options(*varsize); end-pr;