|
View previous topic :: View next topic
|
| Author |
Message |
JayC
New User

Joined: 27 Sep 2008 Posts: 70
|
|
|
|
Hi, I have the following error being shown on the OUTFIL statment in my SORT job, can anybody tell me what I am doing wrong ?
| Code: |
OUTFIL HEADER2=(30:'J A Y S R E P O R T O N IYUIOS 5',/,
*
35: 'LAST PURCHASES MADE IN 2003',//,
02: 'NAME',/,
26: 'STREET ADDRESS',/,
52: 'CITY',/,
68: 'STATE',/,
75: 'DATE',/)
|
The error seems to be near the Asterix shown above.
thanks. |
|
| Back to top |
|
 |
JayC
New User

Joined: 27 Sep 2008 Posts: 70
|
|
|
|
The asterix is actually under the last comma in the first line of the OUTFIL statement.
Sorry about the editing. |
|
| Back to top |
|
 |
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
please show original code and messages.
Gerry |
|
| Back to top |
|
 |
JayC
New User

Joined: 27 Sep 2008 Posts: 70
|
|
|
|
Original Code
----------------
| Code: |
//STEP100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//*
//SORTJNF1 DD DISP=SHR,DSN=SS6848.SORTFILE.TRANFILE.INSAMP
//*
//SORTJNF2 DD DISP=SHR,DSN=SS6848.SORTFILE.NAMEADDR.INSAMP
//SYSIN DD *
JOINKEYS FILE=F1,FIELDS=(15,10,A)
INCLUDE COND=(25,6,Y2T,GE,Y'030101')
JOINKEYS FILE=F2,FIELDS=(01,10,A)
REFORMAT FIELDS=(F2:1,67,F1:25,6)
SORT FIELDS=(1,10,BI,A),EQUALS
SUM FIELDS=NONE
OUTFIL HEADER2=(30:'J A Y S R E P O R T O N IYUIOS 5'/,
35: 'LAST PURCHASES MADE IN 2003',//,
02: 'NAME',/,
26: 'STREET ADDRESS',/,
52: 'CITY',/,
68: 'STATE',/,
75: 'DATE',/)
OUTREC=(02:11,20,
26:31,20,
52:51,15,
68:68,2,
73:70,2,C'/',72,2,C'/',68,2)
/*
|
Thanks |
|
| Back to top |
|
 |
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
you seem to have a space after 35: 02: to 75:
Gerry |
|
| Back to top |
|
 |
abhishek dadhichi
New User

Joined: 19 Apr 2007 Posts: 37 Location: Bangalore
|
|
|
|
Hi Jayc,
I feel the line:
30:'J A Y S R E P O R T O N IYUIOS 5'/, should be
30:'J A Y S R E P O R T O N IYUIOS 5',/,
Thanks,
Abhishek |
|
| Back to top |
|
 |
JayC
New User

Joined: 27 Sep 2008 Posts: 70
|
|
|
|
Thanks ABhishek and Gerry. One more thing, I have the following messages after I made the corrections :
| Code: |
WER164B 17,644K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 420K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER481I JOINKEYS REFORMAT RECORD LENGTH= 73, TYPE = F
WER107A SORTOUT RECFM INCOMPATIBLE WITH REPORT WRITING
WER110I SORTOUT : RECFM=FB ; LRECL= 80; BLKSIZE= 27920
WER247A SORTOUT HAS INCOMPATIBLE LRECL
|
Is there a particular RECFM that we need to use for report writing ? |
|
| Back to top |
|
 |
expat
Global Moderator

Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
| Have you bothered to check the error messages and codes in the manuals to get some ideas ? |
|
| Back to top |
|
 |
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2482 Location: @my desk
|
|
|
|
JayC,
What is your output file format? |
|
| Back to top |
|
 |
JayC
New User

Joined: 27 Sep 2008 Posts: 70
|
|
|
|
| My output file format is FB. |
|
| Back to top |
|
 |
Arun Raj
Moderator
Joined: 17 Oct 2006 Posts: 2482 Location: @my desk
|
|
|
|
JayC,
Add the REMOVECC parameter to your OUTFIL statement without which Syncsort assumes your Output file format to be xBA.
| Code: |
| OUTFIL REMOVECC,HEADER2=....... |
|
|
| Back to top |
|
 |
JayC
New User

Joined: 27 Sep 2008 Posts: 70
|
|
|
|
| Thanks Arun, it worked. |
|
| Back to top |
|
 |
|
|
 |
All times are GMT + 6 Hours |
|