GDETPDEF

System SAMPLIB member GDETPDEF, for example, SYS1.SAMPLIB(GDETPDEF), contains the sample shown in Figure 1 of adding the Distributed FileManager TP profile to the APPC/MVS TP profile data set.

Note: The GDEDFM job in GDETPDEF should have either no region size or a region size of 0K to contain cached stream files. LE is required to use CDRA, if LE is installed and is not in the link list, SYS1.PROCLIB(DFM) and SYS1.SAMPLIB(GDETPDEF) should be modified so their STEPLIB DD statements refer to the proper LE run time library. Refer to DFMREADM in SYS1.SAMPLIB for details. SYSOUT and CDRATRC files can be allocated as RECFM=FBA, LRECL=133, and DSORG=PS for use in diagnosing CDRA problems.

Figure 1. MVS/APPC Setup for DFM: TP Definition Utility Part 1 of 2

 
 
//******************************************************************
//* PROPRIETARY V2 STATEMENT
//* LICENSED MATERIALS - PROPERTY OF IBM
//* 5695-DF1 (C) COPYRIGHT 1994,1995  IBM CORP.
//* END PROPRIETARY V2 STATEMENT
//*
//******************************************************************
//IBMUSER1  JOB 'GDETPDEF',NOTIFY=IBMUSER,MSGCLASS=H
//******************************************************************
//*
//* GDETPDEF - MVS/APPC setup for DFM: TP definition utility
//*
//* This job invokes the APPC/MVS administration utility to add
//* the TP profile to the APPC/MVS data set.
//*
//* It consists of a single job step that adds a MVS/DFM TP
//* to SYS1.APPCTP.
//*
//* Modify the above job statement as required and,
//* optionally, make the following modifications
//* to the job itself:
//*
//*   change 'SYS1.APPCTP' to another name if required by
//*               your installation
//*   change the DFMJOB card to one suitable for your installation
//* Note that you can alter the DD statements CDRATRC and SYSOUT
//* as needed to obtain CDRA API trace output and C runtime messages.
//******************************************************************

Figure 2. MVS/APPC Setup for DFM: TP Definition Utility Part 2 of 2

//STEP     EXEC PGM=ATBSDFMU
//SYSPRINT DD   SYSOUT=*
//SYSSDOUT DD   SYSOUT=*
//SYSSDLIB DD   DSN=SYS1.APPCTP,DISP=SHR
//SYSIN    DD   DATA,DLM=XX
    TPDELETE
      TPNAME(^X'07'001)
    TPADD
      TPNAME(^X'07'001)
      ACTIVE(YES)
      TPSCHED_DELIMITER(##)
        CLASS(A)
        JCL_DELIMITER(ENDJCL)
//GDEDFM JOB MSGCLASS=H,MSGLEVEL=(1,1),CLASS=A
//GDEDFM  EXEC PGM=GDEISASB
//* CHANGE THE STEPLIB STATEMENT AS REQUIRED IF YOUR INSTALLATION
//* DOES NOT HAVE THE LE RUNTIME DATA SET IN ITS LINK LIST.
//*STEPLIB  DD  DSN=SYS1.SCEERUN,DISP=SHR
//*CDRATRC DD DSN=SYS1.CDRATRC2,DISP=SHR  <- CDRA API TRACE OUTPUT
//*SYSOUT  DD DSN=SYS1.CDRAOUT2,DISP=SHR  <- C RUNTIME MESSAGES
//SYSOUT   DD DUMMY                       <- C RUNTIME MESSAGES (NO-OP)
ENDJCL
##
XX