The file tailoring ( FTINCL ) is failing so the job is only partially
submitted.
FT doesn't like special characters like < and &, so either remove your
comments or I think you can code << which will get interpreted as <.
Check the ISPF manuals... 


Paul 

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Rashmi Nijaguni Mogali
Sent: 26 April 2006 11:09
To: IBM-MAIN@BAMA.UA.EDU
Subject: Submitting job using ReXX

Hi all,




This is the first time I am coding in ReXX.

I need to submit a job using my Rexx program.

The job looks something like this:

//S2C9011   JOB (S2C9,XX,TI),'',                    


//             MSGCLASS=T,                          


//             NOTIFY=&SYSUID,                      


//*            TYPRUN=SCAN,                         


//             CLASS=X                              


//*                                                 


//PROCLIB JCLLIB ORDER=(PROD.PROC.LIB,PROD.PROC.LIB)


//*                                                 


//JOBLIB   DD DSN=POITS.BATPROD.LOAD,DISP=SHR       


//         DD DSN=PODBM.SCIC.RESLIB,DISP=SHR        


//*                                                 


//TPM01010 EXEC TPM01010,                                             


//             SO=T,                  <- OUTPUT DSN MODE    (T=TEST)  


//             APPL=SSE,              <- INPUT APPLICATION            


//             JOB=SSE011,            <- INPUT JOB ID                 


//             PERM=TESTDA,           <- PERM DASD MODE               


//             DBCTL=SCIC,            <- BMP MODE         (SCIC=TEST) 


//             MDAID=SCIC,            <- MDALIB           (SCIC=TEST) 


//             CNTLIB=PROD            <- CNTL LIB MODE    (TEST=TEST) 


//




The location of this JCL is TEST.JCL.LIB(TSSE011).

I am coding the Rexx program in the following way:

/* SUBMIT JOB PROCEDURE */                           


SUBMIT_JOB:                                          


       USER = USERID()                               


       NOTIFY = USER                                 


       ADDRESS ISPEXEC                               


       "LIBDEF ISPSLIB DATASET ID ('TEST.JCL.LIB')"  


   /* SUBMIT JOB TSSE011 */                          


       IF J1=S THEN DO                               


          "FTOPEN TEMP"                              


          "FTINCL TSSE011"                           


          "FTCLOSE"                                  


          "VGET ZTEMPF"                              


          "EDIT DATASET('"ZTEMPF"')"                 


          ADDRESS TSO "SUBMIT '"ZTEMPF"'"            


       END                                           


RETURN                                               





The job is getting submitted but the procedure is not getting executed.

The JESJCL entry in spool displays the following:

//S2C9011   JOB (S2C9,XX,TI),'',                    


//             MSGCLASS=T,                          


//             NOTIFY=,                      


//*            TYPRUN=SCAN,                         


//             CLASS=X                              


//*                                                 


//PROCLIB JCLLIB ORDER=(PROD.PROC.LIB,PROD.PROC.LIB)


//*                                                 


//JOBLIB   DD DSN=POITS.BATPROD.LOAD,DISP=SHR       


//         DD DSN=PODBM.SCIC.RESLIB,DISP=SHR        


//*                                                 


//TPM01010 EXEC TPM01010,                                             





The JESYSMSG in the spool says "EXPECTED CONTINUATION NOT RECEIVED"

Also I am not getting the notification messages.

Any pointers would be most useful.




Thanks and Regards,

Rashmi



**************** CAUTION - Disclaimer ***************** This e-mail
contains PRIVILEGED AND CONFIDENTIAL INFORMATION intended solely for the
use of the addressee(s). If you are not the intended recipient, please
notify the sender by e-mail and delete the original message. Further,
you are not to copy, disclose, or distribute this e-mail or its contents
to any other person and any such actions are unlawful. This e-mail may
contain viruses. Infosys has taken every reasonable precaution to
minimize this risk, but is not liable for any damage you may sustain as
a result of any virus in this e-mail. You should carry out your own
virus checks before opening the e-mail or attachment. Infosys reserves
the right to monitor and review the content of all messages sent to or
from this e-mail address. Messages sent to or from this e-mail address
may be stored on the Infosys e-mail system.
***INFOSYS******** End of Disclaimer ********INFOSYS***

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to