@@13 Exit action

The exit action (or after-process function) is activated when you have finish editing the panel and before returning to the application. At this point, you can re-edit or insert default values into various data areas, regardless of the content of the fields.

Syntax

syntax-exitaction

Field ID

The field ID is the direct address to data. It consists of a starting control character followed by a reference number and it ends with the ending control character ampersand (&) or a new starting control character.
Note: All control characters are replaced by a space when you display the panel on-screen or print it out.

Field value

The value to be inserted into the field at exit, regardless of the field content.

Special action

These special actions can be used:
  • RETURN VALUE action

    Syntax: FIELD REFERENCE; VALUE RETURNED

    This action returns values to the field described by the field reference The control character in the field reference gives the field type.

  • REXX call action

    Syntax: Cx

    "x" is the REXX command number with a range from 1 to 99.

    In the start-up CMD file, you can specify environment variables to define the REXX command file attached to the REXX command number, such as SET REXXC1 = C:\REXX\BACKUP.CMD. If no environment variables are defined, then the default REXX command file names are REXXC1.CMD, REXXC2.CMD, and REXXC99.CMD.

  • PANEL action

    Syntax: Sx

    "x" is a positive number, interpreted here as a panel number. Without returning to the calling program, the panel system handles the panel that is specified in the action as if a call was made to display the panel. You can divide one panel into other panels without changing the calling program.
    Note: The data arrays are the same for the whole series of panels.
  • TERMINATE WINDOW action

    Syntax:T

    The window is terminated.

  • FUNCTION KEY action

    Syntax: Fx

    where "x" is defined as the function key number to be simulated. It can contain be one or more digits The action simulates the use of the key and is performed immediately such that the rest of the special function definition is skipped. F0 is treated as if the Enter (Return) key was pressed and F3 is treated as the Escape (Esc) key.

  • DELAY action

    Syntax: Wx

    Where "x" is a positive number interpreted as a delay in seconds.

    The panel system waits the specified number of seconds before resuming.

Example

#20;1;-1;-2;-3;00;00;79;

@@28;SwTSbE;1;80;90;50;50;Work_Center_Resources;

@@33;CRCREG00;

@@31;$1;0;15;?65001;"Work_center_resources";;1;MLWf;0;

@@27;LBOX;TECLShSv;?65001;;;11;1000;0;;D-6;D-4;D+1;D+3;F2;

@@24;Search;1;7;?0;"Search";;1;SL02TNpF5;.ICO=14;CN;F6;

@@24;Open;1;7;?0;"Open";20;1;SL02DTK(\OPEN);.ICO=66;CN;F2;

@@24;New;1;7;?0;"New";;1;SL02TK(INSERT)D(2);.ICO=59;CN;F4;

@@24;Delete;1;7;?0;"Delete";;1;SL02TK(L:DELETE)D(2);.ICO=103;CN;F5;

@@24;Print;1;7;?0;"Print";;1;SL02TK(\PRINT);.ICO=57;CN;F9;

@@24;Close;1;7;?0;"Close";20;1;SL02TF3;.ICO=13;CN;T;F3;

@@24;Help;1;7;?0;"Help";;1;SL02TH;.ICO=71;LM;

@@13;*101;4;*102;1;*103;22;*104;23;*105;21;$211;N;

@@24;[Open;0;7;;;;MLK(\OPEN);F2;

@@24;[New;0;7;;;;MLK(INSERT)D(2);F4;

@@24;[Delete;0;7;;;;MLK(L:DELETE)D(2);F5;

@@24;[Print;0;7;;;;MsLK(\PRINT);F9;

@@24;[Refresh_list;0;7;;;;MWLK(F5);F6;

@@13;*101;4;*102;1;*103;22;*104;23;*105;21;$211;N;

$1___________&________$Search$Open$New_$Delete$Print__$Close$Help____&

$LBOX&

$[Open_______________&

$[New________________&

$[Delete_____________&

$[Print______________&

$[Refresh_list________&