IBM S544-5351-03 Photo Scanner User Manual


 
DCL VAR(&EXPARM) TYPE(*CHAR) LEN(512)
/* Type of exit point (*BEFORE,*MIDDLE,*AFTER) */
DCL VAR(&EXTYPE) TYPE(*CHAR) LEN(10)
/* Name of input spooled file */
DCL VAR(&EXINFILE) TYPE(*CHAR) LEN(10)
/* Name of input spooled file number */
DCL VAR(&EXINNBR) TYPE(*CHAR) LEN(10)
/* Input Printer device type */
DCL VAR(&EXINTYPE) TYPE(*CHAR) LEN(10)
/* Input Jobs User */
DCL VAR(&EXJOBUSR) TYPE(*CHAR) LEN(10)
/* Input Jobs Name */
DCL VAR(&EXJOBNAM) TYPE(*CHAR) LEN(10)
/* Input Jobs Number (alpha) */
DCL VAR(&EXJOBNBR) TYPE(*CHAR) LEN(06)
/* Input Outq Name */
DCL VAR(&EXINOQNM) TYPE(*CHAR) LEN(10)
/* Input Outq Library */
DCL VAR(&EXINOQLB) TYPE(*CHAR) LEN(10)
/* Input User data */
DCL VAR(&EXINUSDT) TYPE(*CHAR) LEN(10)
/* Input Form type */
DCL VAR(&EXINFORM) TYPE(*CHAR) LEN(10)
/* Input out-bin */
DCL VAR(&EXINOBIN) TYPE(*CHAR) LEN(10)
/* Input Program Name */
DCL VAR(&EXINPGNM) TYPE(*CHAR) LEN(10)
/* Input Program Library */
DCL VAR(&EXINPGLB) TYPE(*CHAR) LEN(10)
/* Print Definition Name */
DCL VAR(&EXPRTDEF) TYPE(*CHAR) LEN(10)
/* Print Definition Library */
DCL VAR(&EXPRTDLB) TYPE(*CHAR) LEN(10)
/* Success flag (*YES, *NO, *ACTIVE) */
DCL VAR(&EXSUCFLG) TYPE(*CHAR) LEN(10)
/* Name of output spooled file */
DCL VAR(&EXOTFILE) TYPE(*CHAR) LEN(10)
/* Output Outq Name */
DCL VAR(&EXOTOQNM) TYPE(*CHAR) LEN(10)
/* Output Outq Library */
DCL VAR(&EXOTOQLB) TYPE(*CHAR) LEN(10)
/* Output Hold Flag (*YES, *NO) */
DCL VAR(&EXOTHOLD) TYPE(*CHAR) LEN(10)
/* Output Save Flag (*YES, *NO) */
DCL VAR(&EXOTSAVE) TYPE(*CHAR) LEN(10)
Appendix B. User Exits 107