|
//BARR$SN1 JOB , |
|
// NOTIFY=&SYSUID,COND=(4,LT),MSGCLASS=A |
|
/*ROUTE PRINT U1 <==== |
|
//************************************************************* |
|
//* |
|
//* THIS STEP ADDS A TP DEFINITION FOR THE BARRSN SERVER |
|
//* |
|
//* 1) Change "xxxx.APPCTP" to your APPC/MVS transaction program |
|
//* profile data set name as specified on the LUADD statement |
|
//* for the LU name (e.g. MVSLU01) which will receive the |
|
//* incoming FMH5. (See SYS1.PARMLIB(APPCPMxx) ) |
|
//* The LU name and data set name can also be found by |
|
//* scanning the output from a "D APPC,LU,ALL" command, |
|
//* looking for the BASE=YES definition. |
|
//* The TP profile data set is often named SYS1.APPCTP or |
|
//* USER.APPCTP. |
|
//* |
|
//* 2) Change "TPADD" to TPMODIFY if this TP definition |
|
//* already exists and you want to change it. |
|
//* |
|
//* 3) Make sure that CLASS(FAST) is defined to your APPC/MVS |
|
//* and that a sufficient number of initiators are defined |
|
//* for CLASS(FAST). If there is only one initiator for |
|
//* the class, then only one BARRSN job can run at one time. |
|
//* This is probably OK as long as there are no long- |
|
//* running jobs that also run in CLASS(FAST). |
|
//* (See SYS1.PARMLIB(ASCHPMxx.) ) |
|
//* e.g. CLASSADD CLASSNAME(FAST) MAX(10) MIN(1) RESPGOAL(1) |
|
//* |
|
//* 4) Change the PARM='$' to the JES2 command character |
|
//* appropriate for your installation. |
|
//* |
|
//* 5) Change 'xxxx.LINKLIB' to the name of the |
|
//* APF authorized library containing the BARR$SN |
|
//* program. |
|
//* This name is also specified on the SYSLMOD DD card in the |
|
//* BARR$SN2 job. |
|
//* |
|
//* 6) Change the GENERIC_ID(xxxx) value to a userid with |
|
//* authority to execute the TP from the APF library. |
|
//* |
|
//************************************************************* |
|
//STEP EXEC PGM=ATBSDFMU |
|
//SYSPRINT DD SYSOUT=* |
|
//SYSSDLIB DD DSN=xxxx.APPCTP,DISP=SHR |
|
//SYSSDOUT DD SYSOUT=* |
|
//SYSIN DD DATA,DLM=XX |
|
TPADD |
|
TPNAME(BARRSN) |
|
ACTIVE(YES) |
|
TPSCHED_DELIMITER(##) |
|
TAILOR_SYSOUT(YES) |
|
TAILOR_ACCOUNT(NO) |
|
CLASS(FAST) |
|
TPSCHED_TYPE(MULTI_TRANS) |
|
GENERIC_ID(xxxx) |
|
KEEP_MESSAGE_LOG(NEVER) |
|
JCL_DELIMITER(END_OF_JCL) |
|
//BARR$SN JOB ,MSGLEVEL=(1,1) |
|
//BARR$SN EXEC PGM=BARR$SN,PARM='$' |
|
//STEPLIB DD DSN=xxxx.LINKLIB,DISP=SHR |
|
END_OF_JCL |
|
## |
|
XX |
|
/* |