MVSFORUMS.com

Siddheart22 · Posted: Tue May 17, 2005 3:16 pm Post subject: OUTFIL

Hi,

I am trying to write a simple SORT card which does the following two things:
1. Copies the contents of SORTIN to SORTOF1.
2. Writes C'01' in the SORTOF2.

Please advise on how should I achieve this?.
Thanks,

Siddheart22 · Posted: Tue May 17, 2005 3:20 pm Post subject:

I forgot to mention :
LRECL for SORTOF1 is same as SORTIN (i.e. 400 bytes)
LRECL for SORTOF2 is 2 bytes.

Thanks,

kolusu · Posted: Tue May 17, 2005 3:21 pm Post subject:

Siddheart22,

Try this job

Siddheart22 · Posted: Tue May 17, 2005 3:27 pm Post subject: OUTFIL

Actually was trying this only and was getting the following abend message.

SYSIN :
SORT FIELDS=COPY
OUTFIL FILES=1
OUTFIL FILES=2,OUTREC=(C'01')
WER164B 5,872K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 48K BYTES RESERVE REQUESTED, 1,004K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VB ; LRECL= 400; BLKSIZE= 27998
WER235A SORTOF2 OUTREC RDW NOT INCLUDED
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
******************************* BOTTOM OF DATA ********************************

Siddheart22 · Posted: Tue May 17, 2005 4:01 pm Post subject: OUTFIL

Please assist in resolving this abend...

Thanks,

kolusu · Posted: Tue May 17, 2005 4:37 pm Post subject:

Siddheart22,

Post detailed information on what you're trying to accomplish. Do not make people guess what you mean. This will give you a much better chance of getting a good answer to your question. If you have supplied the right information you would have got an answer immediately.

Now another question. Do you want your SORTOF02 a varaible block file or a Fixed block file as your input file is a VB file.

If you need a variable block file, then use the following control cards.

Siddheart22 · Posted: Tue May 17, 2005 4:46 pm Post subject: OUTFIL

Hi,
Firstly, apologies for not being clear in the question.

Answer to your first question:
The second file is a fixed block and after analysing a little I realised that so changed the SORT card.
SORT FIELDS=COPY
OUTFIL FILES=1
OUTFIL FILES=2,VTOF,OUTREC=(C'01')

This helped me run the SORT successfully. And gave an output file of LRECL=2 bytes with all '01's

Now, the other question is:
Is it possible to have this second file (SORTOF2) in this SORT step with only ONE record containing '01'?

Actually, I am building a parm card through this SORT step which would be later read by my program.

Thanks,

kolusu · Posted: Tue May 17, 2005 4:59 pm Post subject:

Siddheart22 · Posted: Tue May 17, 2005 5:09 pm Post subject: OUTFIL

Ohh ENDREC....
Should have thought of it... Smile

Thanks anyways...