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
 

 

HEADER1 error in JCL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SYNCSORT
View previous topic :: :: View next topic  
Author Message
pshongal

New User


Joined: 14 Jun 2012
Posts: 70
Location: India

PostPosted: Fri Sep 02, 2016 12:15 pm    Post subject: HEADER1 error in JCL
Reply with quote

I need a report in below format

Code:

H|Feeder=abbb|Date=YYYYMMDD|SEQNO=1001
D|Detail records goes here
T|Counter=1


I am getting error at header part. It goes well if I remove header.

Code:

SYNCSORT FOR Z/OS  2.1.2.0R    U.S. PATENTS: 4210961, 5117495   (C) 2014 SYNCSO
                                    AMERICAN EXPRESS               z/OS   2.1.0
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 1C7E7, MODEL 2964 606             LICEN
ZPSort LICENSE/PRODUCT EXPIRATION DATE: 02 DEC 2019                           
SYSIN :                                                                       
    SORT FIELDS=COPY                                                           
    OUTFIL REMOVECC,                                                           
       HEADER1=(1:'H|Feeder=CCCAlerts|Date=',                                 
                                                                   *                                 
                25:&DATE1,                                                     
                33:'|SEQNO='),                                                 
       BUILD=(1:C'D',2:C'|CardNumber=',14:17,15,29:C'|CountryId=',             
              40:C'XXX',43:C'|aaaaaaa=28',54:C'|vvvvvv=',62:845,6,             
              68:C'|sumAmt=',76:86,6,PD,EDIT=(TTTTTTTTTT),                     
              86:C'|soName=',94:96,25,119:C'|soCity=',128:121,21,             
              149:C'|sumDate=',159:76,10),                                     
       TRAILER1=('T|Counter=',COUNT=(EDIT=(TTTTTTTTT)))                       
WER813I  INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED                 
WER268A  OUTFIL STATEMENT  : SYNTAX ERROR                                     
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000                                 
WER449I  SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE                                 
Back to top
View user's profile Send private message

PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Fri Sep 02, 2016 12:18 pm    Post subject:
Reply with quote

Quote:
33:'|SEQNO='),


What is the comma doing there?
Back to top
View user's profile Send private message
pshongal

New User


Joined: 14 Jun 2012
Posts: 70
Location: India

PostPosted: Fri Sep 02, 2016 12:24 pm    Post subject:
Reply with quote

Hi Peter,
Code:

33:'|SEQNO='),


comma is required there at the end of header definition. If I remove it shows error in all the places of details and trailer records.

the error it is showing now is for the comma in first line of header.

Code:

(1:'H|Feeder=CCCAlerts|Date=',
                             *
Back to top
View user's profile Send private message
mistah kurtz

Active User


Joined: 28 Jan 2012
Posts: 268
Location: Room: TREE(3). Hilbert's Hotel

PostPosted: Fri Sep 02, 2016 1:00 pm    Post subject:
Reply with quote

DATE1 is not valid on HEADER1. I think you need to use DATENS=(4MD).
Back to top
View user's profile Send private message
pshongal

New User


Joined: 14 Jun 2012
Posts: 70
Location: India

PostPosted: Fri Sep 02, 2016 1:13 pm    Post subject:
Reply with quote

Hello mistah kurtz

Thanks. It worked
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 -> SYNCSORT All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm
No new posts Error IEC161I 052(009,XXXRS00)-084 wh... amitc23 JCL & VSAM 10 Wed Oct 12, 2016 5:00 pm
No new posts IDMS/DC-COBOL program - SNAP error wh... rakeshsekar1987 IDMS/ADSO 5 Tue Sep 13, 2016 8:28 pm


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