SAY 'JOB NAME:' JobNAM
SAY 'PROC STEP NAME:' ProcNAM
SAY 'STEP NAME :' StepNAM
SAY 'PROGRAM NAME:' ProgNAM
SAY 'JOB NUMBER:' JobNUM
PTR: RETURN C2D(STORAGE(D2X(ARG(1)),4))
STG: RETURN STORAGE(D2X(ARG(1)),ARG(2))
Still i could not able purge. the command always expects the job name should be USERID + 1 character.
I tried the below code, but still i could not able to execute.
Address SDSF “ISFEXEC ST”
do ix=1 to JNAME.0
if pos(“KEN”,JNAME.ix) = 1 then
Address SDSF “ISFACT ST TOKEN(‘”TOKEN.ix”’) PARM(NP P)”
i am getting an error message like
"END OF FILE ON CLIST INPUT OCCURRED BEFORE ALL DO STMTS WERE CLOSED"
Let me know whether i am following the right process.
Joined: 06 Jun 2008 Posts: 8280 Location: Dubuque, Iowa, USA
From the TSO Command Reference manual:
1.11.2 CANCEL Command Operands
specifies the names of the jobs that you want to cancel. The job names must consist of your user identification plus 1 to 8 alphanumeric characters. However, if your installation has replaced the default IBM-supplied CANCEL exit, you may be allowed to specify different job names.
So it sounds like your site is using the IBM-supplied CANCEL exit and you may only be able to use REXX to cancel jobs that have names starting with your userid. I suggest you contact your site system support people and find out if this is the case.