Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

IDCAMS - get condition code 0012

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon Apr 24, 2006 8:07 pm    Post subject: IDCAMS - get condition code 0012
Reply with quote

Code:

//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
    DEF CL
    (NAME(WYL.NY.XDS.PRDSL)-
    RECORDSIZE(100 100)-
    TRACKS(2 1))
    NUMBERED
/*
//


I get condition code 0012 does any one whats wrong with this?
Back to top
View user's profile Send private message

shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Mon Apr 24, 2006 8:09 pm    Post subject:
Reply with quote

Code:

//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DEF Cluster         -
(NAME(WYL.NY.XDS.PRDSL)-
RECORDSIZE(100 100)-
TRACKS(2 1))      -
NUMBERED
/*
//
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Mon Apr 24, 2006 8:12 pm    Post subject:
Reply with quote

//XDSNYL8 JOB , 'TTT'
//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DEF CLUSTER -
(NAME(WYL.NY.XDS.PRDSL)-
RECORDSIZE(100 100)-
TRACKS(2 1) -
NUMBERED)
/*
//

Sorry I haven't seen your code....Check the Closing barackets...
Now Try this
Back to top
View user's profile Send private message
vidhyanarayanan

New User


Joined: 23 Dec 2005
Posts: 52

PostPosted: Mon Apr 24, 2006 8:29 pm    Post subject:
Reply with quote

Hi,
Remove one bracket from tracks and close it after numbered



hope this ll work
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon Apr 24, 2006 10:40 pm    Post subject: Re: IDCAMS - get condition code 0012
Reply with quote

//XDSNYL8 JOB , 'GORA'
//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//*** ALLOC PRDS #8
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DEF CL-
(NAME(WYL.NY.XDS.RRDS1)-
RECORDSIZE(100 100)-
TRACKS(2 1)-
NUMBERED)
/*
//

this what i got so far

i still get one more error

48 IDCAMS SYSTEM SERVICES
49
50 DEF CL-
51 (NAME(WYL.NY.XDS.RRDS1)-
52 RECORDSIZE(100 100)-
53 TRACKS(2 1)-
54 NUMBERED)
55 IDC3506I A REQUIRED VOLUME LIST HAS BEEN OMITTED
56 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12

this is my error i any one know whats wrong thx alot guys
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Mon Apr 24, 2006 10:52 pm    Post subject:
Reply with quote

Try this below JCL its worked for me

//S1 EXEC PGM=IDCAMS
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEF CL -
(NAME(xxxx.DS.RRDS)-
RECORDSIZE(100 100)-
TRACKS(2 1)-
NUMBERED)
/*
//

The only mistake is there should be a space after //SYSIN DD *
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Mon Apr 24, 2006 10:54 pm    Post subject:
Reply with quote

//S1 EXEC PGM=IDCAMS
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEF CL -
(NAME(IBM122B.DS.RRDS)-
RECORDSIZE(100 100)-
TRACKS(2 1)-
NUMBERED)
/*
//
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Mon Apr 24, 2006 11:05 pm    Post subject:
Reply with quote

Go to ISPF 3.2 option V and give the Details to create RRDS File
and check it out whether its working or not.........
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Mon Apr 24, 2006 11:11 pm    Post subject:
Reply with quote

//XDSNYL8 JOB , 'XXXX'
//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//*** ALLOC PRDS #8
//SYSOUT DD SYSOUT=A
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DEF CL -
( -
NAME(WYL.NY.XDS.RRDS) -
RECORDSIZE(100,100) -
TRACKS(2,1) -
NUMBERED -
)
/*
//

this what i got but i still the get the same codition code 0012
hoply some knows cuz this is going to turn my hair gray before i am 30
Back to top
View user's profile Send private message
shrivatsa
Warnings : 1

Active User


Joined: 17 Mar 2006
Posts: 171
Location: Bangalore

PostPosted: Mon Apr 24, 2006 11:15 pm    Post subject:
Reply with quote

File Edit Edit_Settings Menu Utilities Compilers Test Help
sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
VIEW IBM122B.CNTL(VSAM) - 01.02 Columns 00001 00072
Command ===> Scroll ===> CSR
****** ***************************** Top of Data ******************************
000001 //xxxxI JOB (T00101,610,Z000900,284,A11,MAR),
000002 // NOTIFY=&sysuid,MSGLEVEL=(1,1)
000003 /*JOBPARM L=999,H=ALL,T=(,20)
000004 //S1 EXEC PGM=IDCAMS
000005 //SYSOUT DD SYSOUT=*
000006 //SYSPRINT DD SYSOUT=*
000007 //SYSIN DD *
000008 DEF CL -
000009 (NAME(xxxx.DS.RRDS)-
000010 RECORDSIZE(100 100)-
000011 TRACKS(2 1)-
000012 NUMBERED)
000013 /*
000014 //

Now your job should run

see the space in the line 8,9,10,11,12 at the start ..
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Mon Apr 24, 2006 11:24 pm    Post subject: Re: IDCAMS - get condition code 0012
Reply with quote

I dunno - your JCL worked fine for me:

Code:

//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//*** ALLOC PRDS #8
//SYSOUT DD SYSOUT=A
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
  DEF CL-                             
    (NAME(WYL.NY.XDS.RRDS1)- 
     RECORDSIZE(100 100)-             
     TRACKS(2 1)-                     
     NUMBERED)
/*
//
Back to top
View user's profile Send private message
MILAN

New User


Joined: 01 Mar 2006
Posts: 4

PostPosted: Tue Apr 25, 2006 9:58 am    Post subject: Re: IDCAMS - get condition code 0012
Reply with quote

Hi there,
I think this should work fine; add this single line to your code.

//XDSNYL8 JOB , 'XXXX'
//S1 EXEC PGM=IDCAMS
//*** IDCAMS
//*** ALLOC PRDS #8
//SYSOUT DD SYSOUT=A
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DEF CL -
( -
NAME(WYL.NY.XDS.RRDS) -
RECORDSIZE(100,100) -
TRACKS(2,1) -
VOLUMES() -
NUMBERED -
)
/*
//

Sincerely,
Milan
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Wed Apr 26, 2006 7:35 pm    Post subject:
Reply with quote

now it tells me that the closing ), the last parentheis is not properly perceed by constant or keyword
Back to top
View user's profile Send private message
PLFaBiaN5

New User


Joined: 18 Apr 2006
Posts: 21

PostPosted: Wed Apr 26, 2006 7:57 pm    Post subject:
Reply with quote

okay thx everyone i figured it out :-d with some help
i was missing cny001 in volumes()
Back to top
View user's profile Send private message
MILAN

New User


Joined: 01 Mar 2006
Posts: 4

PostPosted: Wed Apr 26, 2006 10:31 pm    Post subject: Re: IDCAMS - get condition code 0012
Reply with quote

Hi there,
What i meant by writing volumes(), the empty brackets meant that you have to write the vol name inside that and not to keep it blank.
Anyway, your problem has been solved.
Sincerely,
Milan
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts JCL to Set Return code based on DB2 S... vinu78 DB2 17 Mon Mar 13, 2017 9:47 pm
No new posts VSAM RLS=NRI while doing IDCAMS sheersh JCL & VSAM 1 Tue Mar 07, 2017 1:55 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts CA Workload Automation event code help vinu78 CA Products 10 Wed Mar 01, 2017 10:05 am
No new posts Joinkeys with condition scdinesh DFSORT/ICETOOL 10 Tue Feb 14, 2017 12:20 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us