Previous Topic Next topic Print topic


User exit after a workstation delete

If the ALLOW WORKSTATION DELETES option is on, a user exit is called and if it exists, it will be passed the following 1 parameter address:

You may write your own user exit in COBOL if you desire. The name of the program must be MFMONDEL.

IDENTIFICATION DIVISION.
PROGRAM-ID. MFMONDEL. 
ENVIRONMENT DIVISION. 
CONFIGURATION SECTION.
SOURCE-COMPUTER.    IBM-PC. 
OBJECT-COMPUTER.    IBM-PC. 
DATA DIVISION. 
LINKAGE SECTION. 
01 P-WORKSTATION    PIC X(256). 
PROCEDURE DIVISION USING P-WORKSTATION.
*> EXECUTE CODE HERE 
   GOBACK.
Previous Topic Next topic Print topic