23. JOB_HEADER

*------------------------------------------------------------------------------
* NAME          JOB_HEADER
*------------------------------------------------------------------------------
* DEPENDENCY    None
* PURPOSE       Code required to define a QDOSMSQ job header.
* DESCRIPTION   Defines a job header ready to be filled in by the user. All the
*               user has to do is fill in his/her own jobname between the quotes
*               and the assembler will do the rest.
* INPUTS :      None.
* OUTPUTS :     None.
*------------------------------------------------------------------------------
start       bra.s   prog_start          ; Short jump to program start
            dc.l    0                   ; Spare. Use for a serial number ?
            dc.w    $4afb               ; Job identifier must be at location 6
prog_name   dc.w    prog_start-prog_name-2  ; Length of job name
            dc.b    ''                  ; YOUR JOBNAME HERE BETWEEN THE QUOTES

prog_start  PUT YOUR CODE HERE