IT Answers » Job Control Language

Using an ampersand in JCL

Ankurshankdhar — Fri, 19 Nov 2010 14:00:23 +0000

Does anyone know how to handle 2 &’s together in a JCL ?? I mean in my jcl after replacement of my variables, it is coming like ‘&&’. No errors on jj but run time error ‘Incorrect use of ampersand’ !! Please reply asap, urgent requirement. Thanks!!

How do I read a File to end active jobs within my CLP?

lotofbad — Tue, 26 Oct 2010 10:22:13 +0000

First I would like to say thanks to Tom for always helping.

Info: I performed a wrkactjob job(joblog*) and created a spool file based on the results, then I copied that to a pf file call myfile (all within a CLP). I would like to end the jobs that show up in myfile, but im a little lost again. I know what I would like my last command to be ENDJOB JOB(&NBR/&USER/&JOB) but its the getting to that point that i can not wrap my head around. How do I retrieve the information I need from myfile. by rcvf? or some other means. I would like to keep all this within one cl. below is a draft of this spool file. As you can see there is more data then what im looking for. All I need is the job number, user and job.

Browse : MYLIB/MYFILE(MYFILE) Record : 1 of 17 by 18 Column : 1 132 by 131 Control : ….+….1….+….2….+….3….+….4….+….5….+…….. ************Beginning of data************** 5722SS1 V5R4M0 060210 Work with Active Jobs Reset . . . . . . . . . . . . . . . : *NO Subsystems . . . . . . . . . . : QALLWRK CPU Percent Limit . . . . . . : *NONE Response Time Limit . . . . : *NONE Sequence . . . . . . . . . . .. : *SBS Job name . . . . . . . . . . . : JOBLOG* Subsystem/Job User Number User Type Pool…. JOBLOG01 USER1 000001 USER1 BCH 2 ….. JOBLOG02 USER2 000002 USER2 BCH 2 ….. JOBLOG03 USER3 000003 USER3 BCH 2 ….. JOBLOG04 USER4 000004 USER4 BCH 2 ….. JOBLOG05 USER5 000005 USER5 bCH 2 ….. JOBLOG06 USER6 000006 USER6 BCH 2 ….. * * * * * E N D O F L I S T I N G * * * * * ************End of Data********************

CL for Backup Alerts

Hugheswilliams — Wed, 19 May 2010 04:48:03 +0000

Hi,

I have to set up alert at a specific time on AS400 which will check if the backup job is running.

If the backup is not running at that specific time,it should send an alert’Backup Not Running’ else it should send an alert’Backup is running’/'Backup is in Message Wait’.

Can anyone please suggest me a CL which will check this.I am new to CL and I have been unable to put the above logic.

I have an idea where we need to run WRKJOB and then trap the status of the job ie.whether ACTIVE/MSGW or NOT FOUND .But unfortunately I have been unable to code this logic.

Please can anyone help me with this.

Many Thanks

NDM Pull

TSPMBR — Fri, 09 Apr 2010 11:07:24 +0000

Provide me JCL & Control card to pull a file from server to Mainframe

IKJEFT01 job giving SYSTEM COMPLETION CODE=0C4 REASON CODE=00000011

Saurabhgargava — Sun, 12 Apr 2009 17:22:34 +0000

One of my job is trying to search the reagions which are holding a file and run this step
//PSTY0020 EXEC PGM=IKJEFT01,DYNAMNBR=8,
// PARM=(‘%ISFSCAN,&INS..PO.STDATM.JOURNAL’,
// ‘DD(2&DD),NONCICSABORT’)
//SYSPROC DD DSN=CSG.CTLCARD,DISP=SHR
//SYSTSIN DD DUMMY
//SYSTSPRT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//ISFSINFO DD DSN=&FSINFO,DISP=SHR
//ISFDADS DD DSN=&SEQ..PB.STDATM.ISFDADS,
// DISP=(MOD,CATLG,DELETE),
// DATACLAS=SMALL
//ISFDADR DD DSN=&SEQ..PB.STDATM.ISFDADR,
// DISP=(MOD,CATLG,DELETE),
// DATACLAS=SMALL
//*
This Stp is alway’s getting ended with Soc 4 and reason code =11
Please can somebody help !!!

Making OMIT command inactive after a some count

VisionPlus — Mon, 29 Sep 2008 07:24:54 +0000

I have to write a JCL step in which I have to copy a file in to
another file after omitting ONLY 5 records in which starting 4
position are having character 1644. Can you please help?

Thanks in advance,
Sushant Sharma

How to change name of file to include date in the name of the file

Newcoboluser — Thu, 15 May 2008 04:30:00 +0000

I want to FTP from mainframe to PC. We run the JCL to do that and this JOB should run every day. Is it possible to change the name of the file that I want to send to the PC everytime? For instance, I’d like to put the month/date/year in the file name.
//**********************************************************************
//* THIS STEP FTP THE REPORT *
//**********************************************************************
//NVBC31B EXEC FTP,
// COND=(0,NE,NVBC31A.D)
//SYSPRINT DD SYSOUT=*
//OUTPUT DD SYSOUT=*
//INPUT DD DSN=PTSO.FC500.NVLF01AA(NVM000AD),DISP=SHR
// DD *
CD PROMO_PAYMENT_BALANCING_REPORTS
CD PCRCREATION
PUT ‘P1OPSBP.F9999.NVBF31AB’ ‘PCR CREATION REP.XLT‘
quit
//*

So in the above example file name ‘ PCR CREATION REP.XLT ‘ should be created as PCR CREATION REP MM-DD-YYYY.XLT.