MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

STATEMENT DEFINER ERROR

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
rajvasan
Beginner


Joined: 10 Dec 2002
Posts: 14
Topics: 4
PostPosted: Wed Dec 18, 2002 3:13 am    Post subject: STATEMENT DEFINER ERROR Reply with quote
The Job below is just for testing, but I faced this problem "STATEMENT DEFINER ERROR @ the second COPY statement", when i executed this job. Can someone please tell me as to where am i going wrong.
Code:

//STEP1    EXEC PGM=ICETOOL                                           
//IN       DD *                                                       
1232100123456234569999                                                 
1232100123456234569999                                                 
1232100123456234569999                                                 
/*                                                                     
//TOOLMSG  DD SYSOUT=*                                                 
//T1       DD DSN=&&T1,UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE),DISP=(,PASS) 
//OUT      DD SYSOUT=*                                                 
//DFSMSG   DD SYSOUT=*                                                 
//TOOLIN   DD *                                                       
  COPY FROM(IN) USING(CTL1)                                             
  COPY FROM(IN) USING(CTL2)                                     
//CTL1CNTL DD *                                       
  OUTFIL FNAMES=T1,ENDREC=1,                         
  OUTREC=(C'OUTFIL FNAMES=OUT,OUTREC=(1,4)',80:X)     
/*                                                   
//CTL2CNTL DD DSN=*.T1,VOL=REF=*.T1,DISP=(OLD,PASS)   
//                                                   

Expecting your replies.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose
PostPosted: Wed Dec 18, 2002 4:20 am    Post subject: Reply with quote
Rajvasan,

All your control cards should start after position 1. Here in your job you are dynamically creating the control cards.The first copy is creating a control card as follows.
Code:

OUTREC=(C'OUTFIL FNAMES=OUT,OUTREC=(1,4)',80:X) 


which looks like after the creation

Code:

OUTFIL FNAMES=OUT,OUTREC=(1,4)


Note that your control cards starts now in position 1. That is the reason for your statement definition error. so change your control cards to be as follows:
Code:

OUTREC=(C' OUTFIL FNAMES=OUT,OUTREC=(1,4)',80:X) 


Notice the space before outfil.

You can even code it as follows
Code:

OUTREC=(X,C'OUTFIL FNAMES=OUT,OUTREC=(1,4)',80:X) 


Here I used X to denote a space and then followed by the actual statement.

Hope this helps...

cheers

kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group