View previous topic :: View next topic
Author
Message
royalchm New User Joined: 15 Nov 2007Posts: 29 Location: Bangalore
Hi,
I am trying the below sort card to generate asimple report for learning purpose
Code:
//SORTIN DD DSN=LST.NEW.SORT(SORTINPT),DISP=SHR
//REPORT01 DD DSN=LST.NEW.VARFXD3,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(20,1,CH,A)
OUTFIL FNAMES=REPORT01,
HEADER1=(2:'TIME: ',&TIME,18:,
'EXPORTING MANUAL',20X,65:'DATE: ',&DATE)
/*
But when i submitted the job, it's abending with MAXCC=16 and showing that OUTFIL synatx error. Please help me to solve this.
Please find below the SYSOUT information from spool.
SYSIN :
SORT FIELDS=(20,1,CH,A)
OUTFIL FNAMES=REPORT01,
HEADER1=(2:'TIME: ',&TIME,18:,
*
'SALLIE MAE EXPORTSS',20X,65:'DATE: ',&DATE)
WER268A OUTFIL STATEMENT : SYNTAX ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Back to top
jsathishbabu84 New User Joined: 07 Jun 2007Posts: 22 Location: India
Try the following code
HEADER1=(2:......,18:'EXPORTING MANUAL',
20X.....)
Back to top
royalchm New User Joined: 15 Nov 2007Posts: 29 Location: Bangalore
Thanks for the helpand i submitted again but
the below error is ccoming eventhough for a small string dispaly(only TIME).
SYSIN :
SORT FIELDS=COPY
OUTFIL FNAMES=REPORT01,
HEADER1=(2:'TIME: ')
WER276B SYSDIAG= 588877, 1261293, 1261293, 1629300
WER164B 9,280K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 1,408K BYTES USED
WER146B 128K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=FB ; LRECL= 80; BLKSIZE= 800
WER110I SORTOUT : RECFM=FB ; LRECL= 80; BLKSIZE= 800
WER110I REPORT01 : RECFM=FB ; LRECL= 80; BLKSIZE= 800
WER107A REPORT01 RECFM INCOMPATIBLE WITH REPORT WRITING
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
Back to top
superk Global Moderator Joined: 26 Apr 2004Posts: 4652 Location: Raleigh, NC, USA
WER110I SORTOUT : RECFM=FB ; LRECL= 80; BLKSIZE= 800
WER110I REPORT01 : RECFM=FB ; LRECL= 80; BLKSIZE= 800
WER107A REPORT01 RECFM INCOMPATIBLE WITH REPORT WRITING
Don't know what you're doing exactly, but it appears as if you're attempting to improperly override the output DCB parameters. The output dataset should be RECFM=FBA, unless, of course, you specify REMOVECC as part of your OUTFIL statement.
Back to top
royalchm New User Joined: 15 Nov 2007Posts: 29 Location: Bangalore
I am doing this only for the learning purpose.
It's working now .... thanks for the help.
Back to top
Please enable JavaScript!