mahe1015
New User
Joined: 19 Dec 2012 Posts: 14 Location: India
|
|
|
|
Hi,
Can any one help to sort the below error..
I am trying to prepare report from JCL
Code: |
//SORTIN DD DSN=TGMDR.VDRAT.INCREP1,
// DISP=(SHR,KEEP,KEEP)
//SORTOUT DD DSN=TGMDR.VDRAT.INCREP1.ACKS9,
// DISP=(NEW,CATLG,DELETE),
// MGMTCLAS=MC0032,
// SPACE=(185,(5,2),RLSE),
// RECFM=FBA,
// AVGREC=K,
// LRECL=185,
// BLKSIZE=0 |
Code: |
OUTREC FIELDS=(1:1,17,
20:18,26,
48:44,1,
61:45,3,
72:48,2,
90:50,50,
142:100,4,
153:104,4,
166:106,2,18X)
OUTFIL HEADER1=(/,1:'GMDRDRCA',16:'CDR INCENTIVE REPORT',
52:'DATE: ',58:&DATE),
HEADER2=(/,15:'CDR INCENTIVE REPORT',/,
73'-',/,1:'VEH_IDENT_NBR',20:'EVNT_PROCS_TIMSTM',
48:'TXN_TYPE_CD',61:'INCNTV_CD',
72:'INCNTV_OPTION_CD',90:'INCNTV_OPT_VAL',
142:'REGION_CD',153:'LANGUAGE_CD',
166:'IS_ONLINE_VALIDATED',/,185'-') |
Here is the spool output
Code: |
72:'INCNTV_OPTION_CD',90:'INCNTV_OPT_VAL',
142:'REGION_CD',153:'LANGUAGE_CD',
166:'IS_ONLINE_VALIDATED',/,185'-')
WER276B SYSDIAG= 74092, 759025, 759025, 1250625
WER164B 23,428K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 23,332K BYTES USED
WER146B 12K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=FB ; LRECL= 120; BLKSIZE= 27960
WER237I OUTREC RECORD LENGTH = 185
WER110I SORTOUT : RECFM=FBA ; LRECL= 185; BLKSIZE= 27935
WER410B 22,400K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 22,376K BYTES USED
WER036B G=932,B=497
WER045C END SORT PHASE
WER116A THE FOLLOWING H/T LINE IS GT LRECL:
WER418I DATASPACE(S) AND/OR HIPERSPACE(S) USED |
|
|