This exit program is designed for limiting EASYCOM use of to a user and/or a PC group.
If EACTCP003 program exists in EASYCOMD library list, it will be called at each connection attempt, excepted if EASYCOM is configured to use pre-starts Jobs (in this case EACTCP002 can be used).
This program can allow or deny the connection from the client application.
If connection is accepted, it can submit by itself the client job or let Easycomd doing it.
&JOBNAME variable is used to determine what is decided:
o *YES to accept the connection, but submit the job in the exit program.
o *NO to refuse the connection
o Any value to let easycomd submit the job with that name.
Note: the initial value is equal to the jobname that is calculated during the connection, usually the name of the client pc if it is possible to use it as a jobname (or the jobname decided by the client application).
Program specification:
PGM PARM(&TPPGM &TPLIB &USER &EAC_PARM1 + &EAC_PARM2 &RMT_ADR &JOBNAME)
DCL VAR(&TPPGM) TYPE(*CHAR) LEN(10)
DCL VAR(&TPLIB) TYPE(*CHAR) LEN(10)
DCL VAR(&USER) TYPE(*CHAR) LEN(10)
DCL VAR(&EAC_PARM1) TYPE(*CHAR) LEN(30)
DCL VAR(&EAC_PARM2) TYPE(*CHAR) LEN(30)
DCL VAR(&RMT_ADR) TYPE(*CHAR) LEN(50)
DCL VAR(&JOBNAME) TYPE(*CHAR) LEN(10)
Parameters:
TPPGM: Target Program Name
TPLIB: Library containing TPPGM program.
Parameters TPPGM and TPLIB will be used by the EACTCP003 program if it submits the client job by itself.
USER: User name
New client connection username (can be used to limit access to a user group).
EAC_PARM1: Parameter 1 of TPPGM program
First parameter to pass to target program (TPPGM) if EACTCP003 submits the client job by itself.
EAC_PARM2: Parameter 2 of TPPGM program
Second parameter to pass to target program (TPPGM) if EACTCP003 submits the client job by itself.
RMT_ADR: TCP/IP client address
TCP/IP client address (may concern workstations set).
JOBNAME: SBMJOB job name (Input / Output).
Name of the job to be activated in EASYCOM subsystem. Default name is the client station name.
On return, set JOBNAME parameter to:
*NO, to refuse the connection.
*YES, if EACTCP003 has submitted the client job by itself.
A name, or leave it unchanged, to accept the connection and let Easycom submit the client job.
Comments:
This exit program can be used to check the validity of the user id or TCP/IP address.
It can also submit the job under the authority of a user different from the one requesting the connection.
Or it can also submit another program, different from TPPGM, in order to setup some environment properties before calling TPPGM.