MVSFORUMS.com :: View topic - STATEMENT DEFINER ERROR

through

[^/[Print]\]

MVSFORUMS.com -> Utilities

#1: STATEMENT DEFINER ERROR Author: rajvasan,

Posted: Wed Dec 18, 2002 3:13 am
—
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.

#2: Author: kolusu, Location: San Jose

Posted: Wed Dec 18, 2002 4:20 am
—
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

MVSFORUMS.com -> Utilities

output generated using printer-friendly topic mod. All times are GMT - 5 Hours

Page 1 of 1