//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 |
/* |