IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Dyanmic building of control card


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
avaneendra_linga

New User


Joined: 13 Dec 2006
Posts: 73
Location: Hyderabad

PostPosted: Thu Sep 13, 2007 8:55 pm
Reply with quote

Hi ,
while building dynamic control card i am getting the following error.

can any body help on this?

my step:

Code:

//TOOLIN   DD    *                                 
 COPY FROM(IN1) USING(CTL1)                         
 COPY FROM(INPUT) USING(CTL2)                       
/*                                                 
//CTL1CNTL DD *                                     
   OUTFIL FNAMES=T1,                               
   BUILD=(3:C'AND,18,26,CH,EQ,C''',21:1,26,47:C'', 
   49:C')),OUTREC=(1,16)',64:17X)                   
/*                                                 
//CTL2CNTL DD *                                     
   OUTFIL FNAMES=OUT1,INCLUDE=(17,1,CH,EQ,C'2',     
   AND,(16,1,CH,EQ,C'A',OR,(16,1,CH,EQ,C'D',       
/*                                                 
//    DD DSN=*.T1,VOL=REF=*.T1,DISP=(OLD,PASS)     


i am getting the error while writing into T1 file.

Code:

error:
BUILD=(3:C'AND,18,26,CH,EQ,C''',21:1,26,47:C'',     
                                              $     
REFORORMATTING FIELD ERROR                               
49:C')),OUTREC=(1,16))',64:17X)                     
$         


Expected output for ctl2 is:

Code:

  OUTFIL FNAMES=OUT1,INCLUDE=(17,1,CH,EQ,C'2',                 
  AND,(16,1,CH,EQ,C'A',OR,(16,1,CH,EQ,C'D',                     
  AND,18,26,CH,EQ, c'2007-09-12-03.00.00.000000')),OUTREC=(1,16))
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Thu Sep 13, 2007 9:24 pm
Reply with quote

You have several problems with the syntax including 47:C'' instead of 47:C''''. Your expected CTL2CNTL syntax is also invalid.

Here are the correct CTL1CNTL and CTL2CNTL statements:

Code:

//CTL1CNTL DD *                               
   OUTFIL FNAMES=T1,                           
   BUILD=(3:C'AND,18,26,CH,EQ,C''',1,26,       
    C'''))),OUTREC=(1,16)',80:X)               
/*     
//CTL2CNTL DD *                                 
   OUTFIL FNAMES=OUT1,INCLUDE=(17,1,CH,EQ,C'2',
   AND,(16,1,CH,EQ,C'A',OR,(16,1,CH,EQ,C'D',   
/*                                             


This will create:

Code:

   OUTFIL FNAMES=OUT1,INCLUDE=(17,1,CH,EQ,C'2',                   
   AND,(16,1,CH,EQ,C'A',OR,(16,1,CH,EQ,C'D',                     
  AND,18,26,CH,EQ,C'2007-09-12-03.00.00.000000'))),OUTREC=(1,16) 
Back to top
View user's profile Send private message
avaneendra_linga

New User


Joined: 13 Dec 2006
Posts: 73
Location: Hyderabad

PostPosted: Fri Sep 14, 2007 9:55 am
Reply with quote

Thx a lot Frank....it was working now......
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts JCL sort card - get first day and las... JCL & VSAM 9
No new posts Using Dynamic file handler in the Fil... COBOL Programming 2
No new posts building java class with zip4j.jar on... Java & MQSeries 0
No new posts Generate output lines (SYSIN card for... DFSORT/ICETOOL 4
No new posts Need suggestion on a sort card DFSORT/ICETOOL 10
Search our Forums:

Back to Top