|
View previous topic :: View next topic
|
| Author |
Message |
abhishek dadhichi
New User
Joined: 19 Apr 2007
Posts: 37
Location: Bangalore
|
|
|
|
Hi I have to add the date in the dataset name. I am not using any scheduler for this job.
I wanted to use pure JCL to do this and tried the following JCL advised by another user in the forum. But I am getting following error.Can anyone help me out of this.
| Code: |
//STEP1 EXEC PGM=..
//....
//SYSUT2 DD DSN=TESTFILE,DISP(,CATLG),UNIT=SYSDA,
// SPACE(CYL,(1,1),RLSE)
//*
//STEP2 EXEC PGM=EZACFSM1
//SYSOUT DD DSN=&&CNTL,DISP(,PASS),
// UNIT=SYSDA,SPACE(CYL,(1,1),RLSE)
//SYSIN DD *
ALTER 'TESTFILE' +
NEWNAME('TESTFILE.D&YR2&MON&DAY..F1')
/*
//*
//STEP3 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD DSN=&&CNTL,DISP=(OLD,DELETE)
|
GETTING MAXCC 12 WITH ERROR SAYING
ALTER 'TESTFILE' -
NEWNAME('TESTFILE.D090123.F1')
IDC3211I KEYWORD 00220000 IS IMPROPER---------WHERE 00220000 IS THE LINE NUMBER TO RIGHT SIDE
IDC3202I ABOVE TEXT BYPASSED UNTIL NEXT COMMAND CONDITION CODE IS 12
As you can see from the above error date is getting substituted but couldn't understand the error. |
|
| Back to top |
|
 |
Craq Giegerich
Senior Member
Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA
|
|
|
|
| What columns are 00220000 in? |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
abhishek, I added the CODE paramaters around your code, and added the IDCAMS step that you originally omitted.
As shown, that code worked fine at my site. |
|
| Back to top |
|
|
abhishek dadhichi
New User
Joined: 19 Apr 2007
Posts: 37
Location: Bangalore
|
|
|
|
Hi Superk,
Sorry for the delayed response, I have tried the above code given by you ,but still I am getting the same error :
IDC3211I KEYWORD 00220000 IS IMPROPER---------WHERE 00220000 IS THE LINE NUMBER TO RIGHT SIDE
IDC3202I ABOVE TEXT BYPASSED UNTIL NEXT COMMAND CONDITION CODE IS 12
Also, as you have said ,you have added the CODE parameter ,do you refer to the plus(+) sign by saying that?
Thanks,
Abhishek |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
| Quote: |
| you have added the CODE parameter |
Kevin has "Code"ed your jcl to make it more readable (green on black) and this also preserves alignment as the font is a fixed rather than a proportional font.
"Code"ing code from a post will have nothing with being able to run the code. Also, as Kevin mentioned, your code works on his system. You need to get rid of the 00220000 and any other values in those positions. |
|
| Back to top |
|
|
prashanth1
New User
Joined: 27 Sep 2006
Posts: 47
Location: Hyderabad
|
|
|
|
Superk,
I confused with the following statement.
NEWNAME('TESTFILE.D&YR2&MON&DAY..F1')
My doubt is , where it gets the values for D&YR2&MON&DAY.
As Abhishek said , he is not using any scheduler to replace those mentioned above symbolic parameters.
Could you please explain how it works . |
|
| Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006
Posts: 6248
Location: Mumbai, India
|
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
The EZACFSM1 program is part of TCP/IP. It is known as the "symbol translator utility". EZACFSM1 reads an input file (SYSIN) and writes to an output file (SYSOUT), translating any symbols in the process. The rest of the data that doesn't contain symbols just gets copied as-is.
The symbols it translates are the MVS built-in dynamic system symbols. A basic set is provided by IBM, and others can be created by your MVS systems programmers.
Also note that DFSORT could also easily be used to perform the same process, as well as other programs such as SAS or Easytrieve or even a CLIST or a REXX EXEC. |
|
| Back to top |
|
|
V S Amarendra Reddy
Active User
Joined: 13 Sep 2006
Posts: 220
Location: USA
|
|
|
|
Hi abhishek,
I think the problem is with the your SYSIN. I expect your dataset has NUM ON so you must be hvaing line numbers in right side also.
So if you see your JCL properly by pressing F11. It must be like this.
| Code: |
//SYSIN DD *
ALTER 'TESTFILE' +
NEWNAME('TESTFILE.D&YR2&MON&DAY..F1') 00220000
/*
|
Actuallt SYSIN will be read as if each line has 80 bytes in it. So your number 00220000 would have been in between from 1-80 columns.
I suggest you to remove that number and try it out. It will work.
Regards
Amar |
|
| Back to top |
|
|
V S Amarendra Reddy
Active User
Joined: 13 Sep 2006
Posts: 220
Location: USA
|
|
|
|
Small correction to the above .
| Quote: |
| Actuallt SYSIN will be read as if each line has 80 bytes in it |
Actuallt SYSIN will be read as if each line has 80 bytes in it until and unless it find a continuation character in the same line which says the data is continuing in the next line.
Regards
Amar |
|
| Back to top |
|
|
abhishek dadhichi
New User
Joined: 19 Apr 2007
Posts: 37
Location: Bangalore
|
|
|
|
Hi Amar,
You were very true as it was the problem with NUM ON , I created another member ,did NUM OFF and copied the JCL and everything
worked fine for me.Thanks..
Thanks,
Regards,
Abhishek |
|
| Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006
Posts: 6248
Location: Mumbai, India
|
|
|
|
Some times we overlook very small things . . . great to hear, finally things are working.. 
Ad |
|
| Back to top |
|
|
|
|
