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
 

 

Problem using PARSE

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Roach_MF

New User


Joined: 09 Mar 2015
Posts: 4
Location: USA

PostPosted: Tue Mar 17, 2015 12:15 am    Post subject: Reply to: Delimited file
Reply with quote

Hmmm I am having a bit of an issue using this PARSE tool.

I've done a lot of reading and still can't figure out why my most simple JCL is still getting a syntax error on the PARSE statements. It "should" have been an easy setup for a simple text to ensure I'm coding correctly before proceeding with more complex setup.

I have double checked and re-double checked and still can't find the error. I'd appreciate any second set of eyes from the more experienced one and let me know what am I doing wrong.

JCL code:
Code:
000013 //STEP01   EXEC PGM=ICEMAN                                           
000014 //*                                                                 
000015 //TOOLMSG  DD SYSOUT=*                                               
000016 //DFSMSG   DD SYSOUT=*                                               
000017 //SYSPRINT DD SYSOUT=*                                               
000018 //*                                                                 
000019 //SYSOUT   DD SYSOUT=*                                               
000020 //*                                                                 
000021 //SORTIN   DD DISP=SHR,DSN=D04BT.QLTY.IMGVFY.FILE
000022 //*                                                                 
000023 //SORTOUT  DD DSN=D04BT.QLTY.IMGVFY.FILE.OUT,       
000024 //            DISP=(NEW,CATLG,DELETE),                               
000025 //            DCB=(LRECL=138,RECFM=FB,BLKSIZE=0),                   
000026 //            UNIT=SYSDA,SPACE=(TRK,(15,10),RLSE)                   
000027 //*                                                                 
000028 //SYMNAMES DD *                                                     
000029 FLD1,%00                                                             
000030 SEMI,';'                                                             
000031 /*                                                                   
000032 //SYSIN    DD *                               
000033   OPTION COPY                                 
000034   INREC PARSE=(FLD1=(FIXLEN=6,ENDBEFR=SEMI)),
000035         BUILD=(1:FLD1,LENGTH=6)               
000036 /*                                           


Syntax error snippet:
Code:
ICE000I 1 - CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R1  - 13:24 ON MON MA
           OPTION COPY                                                         
           INREC PARSE=(%00=(FIXLEN=6,ENDBEFR=C';')),BUILD=(1:%00,LENGTH=6)   
                                                                   $           
ICE007A E SYNTAX ERROR                                                         
ICE751I 0 C5-N22817 C6-BASE   C7-K96411 C8-I15445 E7-I12417                     
ICE052I 3 END OF DFSORT                                                         



Example input file:
Code:
----+----1----+----2----+--
***************************
CTKX  ; ;                 
CPS0  ; ;                 
Back to top
View user's profile Send private message

RahulG31

Active User


Joined: 20 Dec 2014
Posts: 331
Location: USA

PostPosted: Tue Mar 17, 2015 12:50 am    Post subject: Reply to: Delimited file
Reply with quote

Remove LENGTH from BUILD.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Tue Mar 17, 2015 1:33 am    Post subject: Reply to: Delimited file
Reply with quote

Yes, your %00 (or %0) has a FIXLEN=6. The LENGTH= in BUILD is for something completely different.
Back to top
View user's profile Send private message
Roach_MF

New User


Joined: 09 Mar 2015
Posts: 4
Location: USA

PostPosted: Tue Mar 17, 2015 2:31 am    Post subject: Reply to: Delimited file
Reply with quote

Thank you RahulG31 & Bill. Appreciate your help.
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm
No new posts Problem in Running Query via JCL vickey_dw DB2 3 Tue Oct 18, 2016 11:11 pm
No new posts DB2 Streaming Batch Processing Problem Manshadi DB2 4 Sat Sep 24, 2016 12:14 pm
No new posts Problem with GETMAIN command amitc23 CICS 6 Thu Sep 01, 2016 1:01 pm
No new posts TXT2PDF problem - printing @ in PDF vipul65 All Other Mainframe Topics 9 Thu Aug 25, 2016 12:48 am


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