KB Article #177386
Does Interpel commands )SEL and )ENDSEL exist in Transfer CFT ?
Problem
Does Interpel commands )SEL and )ENDSEL exist in CFT ?
Migration from z/os Interpel to z/os Transfer CFT
How to use the Interpel EOT JCL parts below selected from a substr of the &MSG PeSIT transfer variable.
...
)SEL &SUBSTR(10:6,&MSG) = FRANCE
//.....
.....
)ENDSEL
//....
....
)SEL &SUBSTR(10:6,&MSG) = ITALIA//.....
.....
)ENDSEL
Resolution
The )SEL and )ENDSEL feature is not available to CFT EOT procedure.
The End Of Transfer JCL need to be reworked to keep the compatibility with the flow and transfer's variables.
An easy way is to use the IEBEDIT as a substitute:
The EOT below will submit the selected JCL's step (MY_JCL have steps named (FRANCE, ITALIA....)
//EOTCFT JOB (XXXXXXXX,,,,,XXXX),' ',CLASS=T,
// MSGCLASS=Y,NOTIFY=&SYSUID
//*===========================================================
//* EXAMPLE FOR IEBEDIT UTILITY
//*===========================================================
//STEP001 EXEC PGM=IEBEDIT
//SYSUT1 DD DSN=MYPROD.JCLLIB(MY_JCL),DISP=SHR
//SYSUT2 DD SYSOUT=(*,INTRDR)
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EDIT TYPE=INCLUDE,STEPNAME=(&:10.7MSG)
/*
NOTE1: In the CFT EXEC library, the member EXECIDF is delivered as a sample to be up to condition batch operations in regards of test result on a CFT variable.
Please, see comment in the delivered sample.
NOTE2: From 3.1.3 SP4, in the CFT EXEC library, the member EXECIDF2 is delivered as a sample to be up to condition batch operations in regards of multiple tests result on a CFT variable.
Please, see comment in the delivered sample.
Note3: (and maybe the easiest way for a migration of such an EOT construction)
Having one JCL each and triggering it from the &MSG sub-string at the EXEC level is maybe the best way to keep it simple.