View previous topic :: View next topic
|
Author |
Message |
srikanthrao
New User
Joined: 24 Jul 2007 Posts: 8 Location: Chennai
|
|
|
|
hi,
this is my sort card
SORT FIELDS=COPY
OUTFIL HEADER1=(01:'INSTRUMENT ID',
15:'LOAN NUMBER',
28:'ASSET PRICE',
50:'MARKET PRICE',
71:'DATE'/)
OUTREC FIELDS=(1:1,10,15:11,04,BI,LENGTH=09,28:15,10,PD,
LENGTH=18,50:25,10,PD,LENGTH=18,71:35,10)
my infile n out file are of rec length 80 n recfm = FB.
i need to write the header mentioned above in to out file.
when i use this sort card its throwing error saying[ RECFM INCOMPATIBLE WITH REPORT WRITING] can any one help me.
Topic changed from report........ |
|
Back to top |
|
|
murmohk1
Senior Member
Joined: 29 Jun 2006 Posts: 1436 Location: Bangalore,India
|
|
|
|
Srikanth,
Your OP file recfm should be FBA or introduce REMOVECC in the sortcard (after outfil before header1). |
|
Back to top |
|
|
srikanthrao
New User
Joined: 24 Jul 2007 Posts: 8 Location: Chennai
|
|
|
|
hi murali,
i had got the o/p by changing recfm to FBA but REMOVECC has n't worked for me.
Thanks for u help |
|
Back to top |
|
|
murmohk1
Senior Member
Joined: 29 Jun 2006 Posts: 1436 Location: Bangalore,India
|
|
|
|
Srikanth,
Quote: |
REMOVECC has n't worked for me. |
REMOVECC is a DFSORT option. I had provided it by mistake .
Good to see FBA worked for you. |
|
Back to top |
|
|
Alissa Margulies
SYNCSORT Support
Joined: 25 Jul 2007 Posts: 496 Location: USA
|
|
|
|
Quote: |
REMOVECC is a DFSORT option. |
REMOVECC is a valid SyncSort Parameter in the OUTFIL statement.
When REMOVECC is used, the LRECL does not require an extra byte for the carriage control character, and the RECFM does not require the 'A' (for ANSI); thus you would specify FB, not FBA. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Alissa Margulies wrote: |
REMOVECC is a valid SyncSort Parameter in the OUTFIL statement. |
Yup, it's, tried the following JCL & it's working for me(SyncSort site).
Code: |
//STEP002 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
//SORTOUT DD DSN=HLQ.TEST.SYSTEM.DATE,DISP=(NEW,CATLG,DELETE)
//SYSIN DD *
OPTION COPY
OUTFIL REMOVECC,NODETAIL,
TRAILER1=(DATE=(MD4-))
/* |
Hope this helps. |
|
Back to top |
|
|
0d311
Guest
|
|
|
|
Wow, now we've got representatives for both DFSORT and SyncSort. |
|
Back to top |
|
|
|