The SUBMIT * Function

The SUBMIT command supports an asterisk (*) for the positional operand value and two keyword operands, END and PAUSE. The keyword operands, END and PAUSE, are valid only when (*) is specified and when the SUBMIT (*) command is not issued in EDIT mode.

SUBMIT * allows the job stream source to reside in other than a permanent data set, such as a terminal, in-storage lists, temporary data sets, and the CLIST-type in-storage lists. The job stream may be entered directly without creating and editing a data set. Figure 1 illustrates how the SUBMIT * function is used to submit batch jobs. Note that the existing SUBMIT * function of EDIT continues to select the current data set as the input job stream. Therefore, this SUBMIT * function is not available in EDIT mode.

Figure 1. The SUBMIT * Function

/*Example 1: Submitting a job with input from a terminal*/
READY
SUBMIT *
ENTER INPUT JOB STREAM:
//step       exec  pgm=somepgm
( null line )
ENTER JOBNAME CHARACTER(s)
a
JOB USERIDA (JOB00007) SUBMITTED
READY
/*Example 2: Submitting jobs with input from a CLIST*/
/* The following is a listing of the CLIST about to be
   submitted*/

PROC 0 STEP(2)
CONTROL PROMPT
SUBMIT * PAUSE END(GO)
//USERIDA    JOB   MSGLEVEL=1
//STEPA1     EXEC  PGM=YOURPGM
//SYSPRINT   DD    SYSOUT=A
IF &STEP=2 THEN DO
//STEPA2     EXEC  PGM=PROGRAM2
//SYSPRINT   DD    SYSOUT=A
END
ELSE DO
//STEPA3     EXEC  PGM=PROGRAM3
//SYSPRINT   DD    SYSOUT=A
END
//USERIDB    JOB   MSGLEVEL=1
//STEPB      EXEC  PGM=SOMEPGM
//SYSPRINT   DD    SYSOUT=A
GO

/* The following shows the CLIST being executed.

exec myclist list
ENTER INPUT JOB STREAM:
SUBMIT * PAUSE END(GO)
//USERIDA    JOB   MSGLEVEL=1
//STEPA1     EXEC  PGM=YOURPGM
//SYSPRINT   DD    SYSOUT=A
//STEPA2     EXEC  PGM=PROGRAM2
//SYSPRINT   DD    SYSOUT=A
//USERIDB    JOB   MSGLEVEL=1
//STEPB      EXEC  PGM=SOMEPGM
//SYSPRINT   DD    SYSOUT=A
go
SHOULD INPUT JOB STREAM BE SUBMITTED? ENTER YES OR NO: + 
yes
JOB USERIDA(JOB00008) SUBMITTED
JOB USERIDB(JOB00009) SUBMITTED
READY