IBM Mainframe Forum

by **makies** » Thu May 22, 2008 8:46 pm

I managed to solve the error somehow but still I cannot see the results. How can I see them because I got to SDSF and I cannot see any SORTOUT DD , I only see JES log messages . my code is this

Select all

//MYJOB JOB USER=SUR0016,MSGCLASS=H,CLASS=A,NOTIFY=SUR0016
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=SURMSTR.TRDATA2,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(24,2,ZD,A)
OPTION ZDPRINT
SUM FIELDS=(27,7,ZD)
/*

Thanks a lot

by **Frank Yaeger** » Thu May 22, 2008 8:56 pm

Try adding MSGLEVEL=(1,1) to your JOB card:

//MYJOB JOB USER=SUR0016,MSGCLASS=H,CLASS=A,NOTIFY=SUR0016,
// MSGLEVEL=(1,1)

I'm just guessing here. Isn't there anyone at your shop who can help you with these basic kinds of things?

by **makies** » Thu May 22, 2008 9:02 pm

Unfortunately no one can help me , I was assigned to do this stuff and I am not getting any support. I used MSGLEVEL=(1,1) as well but I do not see any difference:(

Is it possible to write the output in another dataset?

by **Frank Yaeger** » Fri May 23, 2008 3:40 am

You're going to have a very, very difficult time of it if you can't see the SYSOUT=* messages.

Yes, you can write //SYSOUT to a permanent data set. Change the //SYSOUT DD to something like:

//SYSOUT DD DSN=SURMSTR.SYSOUT,DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(5,5)),UNIT=SYSDA

Then you should be able to see the messages in SURMSTR.SYSOUT.

The next time you run, be sure to change //SYSOUT to

//SYSOUT DD DSN=SURMSTR.SYSOUT,DISP=OLD

since its already allocated.

by **skolusu** » Fri May 23, 2008 4:07 am

Makies,

Run the following job and after completion of the job check the contents of SUR0016.SURMSTR.SYSOUT dsn which contains the sysout messages and SUR0016.SURMSTR.SORTOUT dsn which contains the output from the sort step

Select all

//SUR0016A JOB CLASS=A,USER=SUR0016,
// MSGCLASS=H,
// MSGLEVEL=(1,1),
// NOTIFY=SUR0016
//*
//STEP0100 EXEC PGM=IEFBR14
//FILE01 DD DSN=SUR0016.SURMSTR.SYSOUT,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(5,5),RLSE),
// DCB=(LRECL=121,RECFM=FBA,BLKSIZE=121)
//*
//FILE02 DD DSN=SUR0016.SURMSTR.SORTOUT,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(5,5),RLSE),
// DCB=SURMSTR.TRDATA2
//*
//STEP0200 EXEC PGM=SORT
//SYSOUT DD DSN=SUR0016.SURMSTR.SYSOUT,DISP=OLD
//SORTIN DD DSN=SURMSTR.TRDATA2,DISP=SHR
//SORTOUT DD DSN=SUR0016.SURMSTR.SORTOUT,DISP=OLD
//SYSIN DD *
SORT FIELDS=(24,2,ZD,A)
OPTION ZDPRINT
SUM FIELDS=(27,7,ZD)
/*

Hope this helps...

Cheers

IBM Mainframe Forum

Sorting dataset with dfsort and icetool

Re: Sorting dataset with dfsort and icetool

Re: Sorting dataset with dfsort and icetool

Re: Sorting dataset with dfsort and icetool

Re: Sorting dataset with dfsort and icetool

Re: Sorting dataset with dfsort and icetool