UIM Open Display Application (QUIOPNDA)
From MidrangeWiki
Revision as of 15:50, 21 December 2018 by DaveLClarkI (talk | contribs)
Summary
The following is an RPG/LE fully free-form prototype for the IBM QUIOPNDA API to use the UIM to open a display application.
For more information on this API, visit Open Display Application (QUIOPNDA) API (right-click to open link in a new tab).
By Dave Clark
Prototype for the QUIOPNDA API
//****************************************************************************** // IBM Open Display Application API // https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_72/apis/quiopnda.htm //****************************************************************************** dcl-pr IBMUIM_OpenDisplayApplication extpgm('QUIOPNDA'); OaHandle char(8); OaPnlGrp char(20) const; OaScope int(10) const; OaExtPint int(10) const; OaFulScrHlp char(1) const; OaErrCode likeds(ApiErrC) options(*varsize); end-pr;
Example
See the Find Source Member (FNDSRCMBR) sample command.