IBM Mainframe Forum

by **kabirex** » Wed Feb 16, 2011 10:26 am

Hi,

Could pls anyone let me know how to insert a string in empty PS file by using Sortcard? In JCL, the SORTIN should be dummy and SORTOUT should be that empty Ps file in which the string to be inserted.

It would be great if the sample sortcard and jcl is given. Thanks!

by **steve-myers** » Wed Feb 16, 2011 10:35 am

What you are saying is you want to write a fixed record to a new dataset. I have to think there are simpler solutions than using a sort product! IEBDG anyone?

by **kabirex** » Wed Feb 16, 2011 1:02 pm

Yes, I wanna write fixed record in a new dataset. Please let me know if there are any solution otherthan sort process. Thanks!

by **steve-myers** » Wed Feb 16, 2011 7:49 pm

Look at the manual this link points to. You will find at least two programs that will do the task you want. We will not, indeed, we cannot, do your work for you.

by **Frank Yaeger** » Thu Feb 17, 2011 12:25 am

kabirex,

You can do this with DFSORT. But you need to give more information. What is the RECFM and LRECL of the output file? What do you want the output record to look like exactly?

by **kabirex** » Thu Feb 17, 2011 2:25 pm

Empty PS file's RECFM is FB and lrecl is 80. I wanna insert the string 'SUCCESS' into empty PS file.

by **steve-myers** » Thu Feb 17, 2011 7:12 pm

kabirex wrote:Empty PS file's RECFM is FB and lrecl is 80. I wanna insert the string 'SUCCESS' into empty PS file.

Look at the manual this link points to. You will find at least two programs that will do the task you want. We will not, indeed, we cannot, do your work for you.

by **skolusu** » Thu Feb 17, 2011 10:33 pm

kabirex wrote:Empty PS file's RECFM is FB and lrecl is 80. I wanna insert the string 'SUCCESS' into empty PS file.

Use the following DFSORT JCL

Select all

//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
//SORTOUT DD DSN=Your output file,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(1,0),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL REMOVECC,HEADER1=('SUCCESS')
/*

by **Frank Yaeger** » Thu Feb 17, 2011 11:51 pm

the SORTIN should be dummy

If you want the SORTIN to be DUMMY instead of DD *, you can use:

//SORTIN DD DUMMY,RECFM=FB,LRECL=80

by **kabirex** » Tue Feb 22, 2011 5:01 pm

Thank you, Kolusu and Frank.

IBM Mainframe Forum

Inserting the string in an empty PS file by usiing Sortcard

Inserting the string in an empty PS file by usiing Sortcard

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc

Re: Inserting the string in an empty PS file by usiing Sortc