   C I C S S U B    -  Platform: MVS/CICS


   This program submit a JCL written in a Temporary Storage queue to JES
for execution.


   In this distribution file (CICSSUB.ZIP) there is:

CICSSUB.OBJ              executable for MVS/CICS mainframe, in obj form
CICSSUB.HIL              Hilmas source of this program
CXITSUB.OBJ              executable in Italian language, in obj form
CXITSUB.HIL              Hilmas source in Italian
README.TXT               this help file 
LINKEDIT.JCL             job example to install CICSSUB


OBJ installation:

- Create in MVS a sequential file, for example 'MYUSER.PROGRAM.OBJ'
  with RECFM=FB and LRECL=80, for example of 1 cylinder.

- SEND obj module from PC to MVS in this file in BINARY form, with your 
  3270 emulation; the most important thing is a binary transfer (therefore 
  without ASCII CRLF) in a file with record length of 80 bytes.
  Use this PC command (in a PC with IBM/PCOMM 4.1 3270 emulation installed):

     SEND CICSSUB.OBJ 'MYUSER.PROGRAM.OBJ'

- Prepare a Job to Linkedit transferred obj in a load library visible by
  CICS; use LINKEDIT.JCL as example: fit this JCL to your needs changing
  library names

- Submit linkedit job to create load module; output library must be a
  load library used by CICS address space.

- Complete installation defining program and transid in PPT and PCT CICS
  tables: 

PPT :
         DFHPPT   TYPE=ENTRY,PROGRAM=CICSSUB,RSL=PUBLIC

PCT :
         DFHPCT   TYPE=ENTRY,
               TRANSID=SUB,PROGRAM=CICSSUB,RSL=PUBLIC

  Put similar parameter if use CEDA interactive CICS management transaction.
  The only important thing is to define the language as Assembler (that
is the default in traditional tables, but not in CEDA).
You can change transid and program name as you like.
In SIT table must be specified 'SPOOL=YES'.


Program instruction:

    With this utility you can SUBMIT a JCL from CICS to JES, if this job 
is previously written in a TS queue.
    SUB  transaction can be run by user or by a program passing parameters
in COMMAREA.

  Its use by an user in a CICS session is:

    SUB  InputTS 

  To submit using a Transient data queue (instead of standard Spool 
interface) write:

    SUB  InputTS  OutputTD

where OuputTD is your specific TD queue suitable for submit.

  To submit to another JES (if you have this capability) write:

    SUB  InputTS  JES=JesName

default is JES=LOCAL.

If the job is succesfully submitted, this message is displaied:
 '---- Regular end of SUBMIT.'
                                                                           
                                                                           

