z/OS Example - MultiLoad

The following procedure invokes Teradata MultiLoad on a mainframe-attached z/OS client system:

//MLOADRUN JOB 1,'Teradata MultiLoad',
//           MSGCLASS=X,
//           NOTIFY=MLOAD,
//*          TYPRUN=SCAN,
//           CLASS=A
/*ROUTE PRINT TSO
//**************************************************
//*                                                *
//*        Teradata MultiLoad PROC                 *
//*                                                *
//**************************************************
//*
//MLOAD    PROC PRM=,INPUT=
//MLOADSTP     EXEC PGM=MLOAD,PARM='&PRM'
//STEPLIB  DD  DISP=SHR,DSN=TERADATA.APPLOAD
//         DD  DISP=SHR,DSN=TERADATA.TRLOAD
//SYSPRINT DD  SYSOUT=*
//SYSTERM  DD  SYSOUT=*
//SYSIN    DD  DISP=SHR,DSN=&INPUT
//         PEND
//**************************************************
//*                                                *
//*        RUN Teradata MultiLoad                  *
//*                                                *
//**************************************************
//MLOADRUN     EXEC PROC=MLOAD
//MLOADSTP.SYSIN   DD   DATA,DLM=##
.SET X TO 'FSADFDFSDFDS';
.DISPLAY '&X' TO FILE OUTPUT; ##
//OUTPUT DD SYSOUT=*