Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
titleFixed Format Exit Program Procedure Prototype
	 D PUIATEXLAU      PR                  ExtPgm('PUIATEXLAU')
     D  iUser                       128A   Const
     D  iItemID                     128A   Const
     D  oLaunchConfig                      LikeDS(dsLaunchConfig)
     D  oError                         N
     D  oErrorMsg                   256A


Code Block
titleFree Form Format Exit Program Procedure Prototype
Dcl-PR Main ExtPgm('PUIATEXLAU');
   iUser         Char(128);
   iCode         Char(128);
   oLaunchConfig LikeDS(dsLaunchConfig);
   oError        Ind;
   oErrorMsg     Char(256);
End-PR;

...

Exit Program Parameter Descriptions 

Parameter 

Data Type (Length) 

Description 

iUser 

Char(128) 

User ID 

iItemID 

Char(128) 

Unique reference value for the menu item as assigned by PUIATEXMNU. 

oLaunchConfig 

LikeDS(dsLaunchConfig) 

Returned launch state and associate free text. Free text is shown in the dialog box. 

oError 

Ind (true/false) 

Returned from exit program. If 0 then success otherwise failure. 

oErrorMsg 

Char(256) 

Returned error message describing the error from exit program. 

 

Data structure definition that has return launch config for a passed ‘iItemID’ in the arguments. 

...