IBM Mainframe Forum

I have a JCL like this:

//TEST0000 JOB (1114,020),'EXTRACT FIELDS',
// CLASS=E,MSGCLASS=X,NOTIFY=&SYSUID
//*
//SORT0010 EXEC PGM=SORT
//*
//SORTIN DD DSN=AAA.BBB.CCCC(CTEST00),DISP=SHR
// DD *
1111111111111111112
//*
//SORTOUT DD DSN=AAA.BBB.CCCC(CTEST01),DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
*/
//*

This JCL works fine, if I submit manually.
as the number '1111111111111111112' changes every time. I modify JCL by using &INCARD instead of 1111111111111111112, and put the JCL to the Skeleton library: AAA.BBB.ISRSLIB(TEST0000).

Then I create a CLIST to submit the JCL in my clist library:
AAA.BBB.CLIST(SKELTEST), here is the code:

PROC 0
SET INCARD = &STR(222222222222222222)
SET JCLLIB = &STR(AAA.BBB.ISRSLIB)
SET SKELJCL = TEST0000

ISPEXEC VPUT (INCARD JCLLIB SKELJCL) SHARED

ALLOC FI(ISPFILE) DA('&JCLLIB') SHR

ISPEXEC FTOPEN TEMP
ISPEXEC FTINCL &SKELJCL
ISPEXEC FTCLOSE
FREE FI(ISPFILE)
I don't know what's wrong with the clist, I try to run the clist to submit the Skeleton jcl with the new number 222222222222222222, but the jcl did not run.

By 'did not run' what precisely do you mean? Did the job get submitted? If yes, what happened? What did the output say?

Thanks Nic,

I use 'TSO SKELTEST' to run the clist, no error happens, seems the clist complete successfully.

Then I check SDSF to look at the job log. Nothing there, the jcl did not get submitted.

I check the file AAA.BBB.CCCC(CTEST01), no new number in it.

Where do you submit the generated JCL

if You had cared to look at the manuals and the zillions of samples around
You would have noticed that after
You should have used atranslate to clist , I write ONLY in REXX

Thanks!