how to move the job sysout into the dataset(fb,sequential,)
Select messages from
 # through # FAQ
[/[Print]\]
Goto page 1, 2  Next  :| |:
MVSFORUMS.com -> Job Control Language(JCL)
#1: how to move the job sysout into the dataset(fb,sequential,) Author: Anand_R,  PostPosted: Fri Jan 24, 2003 7:06 am
    —
Hi,

Can some one tell me how to send the job sysout to the

fb sequential dataset...


Any help is appreciated..

Thx
#2:  Author: Manas Biswal, Location: Chennai, India PostPosted: Fri Jan 24, 2003 7:23 am
    —
Use the XDC line command in SDSF.

Regards,
Manas
#3:  Author: kolusu, Location: San Jose PostPosted: Fri Jan 24, 2003 7:53 am
    —
Code:

//STEP010 EXEC PGM=IEFBR14
//DD1      DD DSN=YOUR JOB OUTPUT,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(CYL,(1,1),RLSE),
//            DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0)
//*
//STEP020 EXEC PGM=SDSF
//ISFOUT  DD DUMMY
//ISFIN   DD *
OWNER **
PREFIX JOBNAME
H
FIND JOBNAME
++S
PRINT ODSN 'YOUR JOB OUTPUT'
PRINT
PRINT CLOSE
END
//*


Hope this helps...

cheers

kolusu
#4:  Author: zatlas,  PostPosted: Fri Jan 24, 2003 8:01 am
    —
Just to add to KOLUSU answer, you may view your job outpt in SDSF by marking it with '?'. This will show you the individual parts of the output. Now you may specifically select the desired part you want (mark it with 's') and then do in the command line:
PRINT ODSN 'filename where you want YOUR JOB OUTPUT to be'
PRINT
PRINT CLOSE

I always maintain a PDS (usually LRECL=133), so I do not have to define a new file every time I need to do that, so the first command will be:
PRINT ODSN 'PDSname where you want YOUR JOB OUTPUT to be(membername)'

ZA
#5:  Author: Bill Dennis, Location: Iowa, USA PostPosted: Fri Jan 24, 2003 8:49 am
    —
Also, to avoid pre-allocating the dataset, use the
Code:
PRINT DATASET
command and you can create the file as you need it. This is the method used by the XDC line command mentioned above by Manas.

Bill
#6:  Author: Venkata Ramana Reddy, Location: California PostPosted: Fri Jan 24, 2003 11:14 am
    —
Is this what you want....

Code:
//STEP001  EXEC PGM=YOURPGM                                     
//SYSPRINT DD SYSOUT=*                                         
//SYSUDUMP DD SYSOUT=*                                           
//INPUTDD  DD DSN=YOUR.INPUT.FILE,DISP=SHR       
//*
//OUTPUTD  DD DSN=YOUR.OUTPUT.FILE,
//            DISP=(NEW,CATLG,DELETE),                           
//            SPACE=(TRK,(10,10),RLSE),                         
//            RECFM=FB,LRECL=250,BLKSIZE=0)
//*
//SYSOUT   DD DSN=YOUR.SYSOUT.FILE,
//            DISP=(NEW,CATLG,DELETE),
//            DCB=(LRECL=133,BLKSIZE=0,RECFM=FB),
//            SPACE=(TRK,(10,10),RLSE)                       
//
#7:  Author: dorkhead, Location: Lux PostPosted: Mon Jan 27, 2003 3:27 am
    —
to add my grain of salt :


u do not necesseraly need a FB 133 Dataset....
this can be controlled thru SDSF's parm
Code:

//STEP010 EXEC PGM=IEFBR14
//DD1      DD DSN=YOUR JOB OUTPUT,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(CYL,(1,1),RLSE),
//            DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0)
//*
//STEP020 EXEC PGM=SDSF
//ISFOUT  DD DUMMY
//ISFIN   DD *
OWNER **
PREFIX JOBNAME
H
FIND JOBNAME
++S
PRINT ODSN 'YOUR JOB OUTPUT'
PRINT
PRINT CLOSE
END
//*


Code:

//STEP020  EXEC PGM=SDSF,PARM='++60,133'

in this case 60 is number of lines per pages of output and 133 is width of
page (linked to LRECL, hence here lrecl is 133)

note parm given here is default.
#8:  Author: Programmer,  PostPosted: Mon Jan 27, 2003 11:00 pm
    —
Anand,

Coding:

//SYSOUT DD DSN=data.set.name,DISP=NEW


should be enough.
#9:  Author: Dibakar, Location: USA PostPosted: Mon Feb 23, 2004 6:34 am
    —
When I am submitting this job I am again getting output in the spool (SYS00003) instead of the dataset. Where am I going wrong -

Code:

//TSO1265Z JOB (3401,S440),8048.ABCD,CLASS=C,   
//          MSGCLASS=Q                           
//SAVE0000  EXEC PGM=SDSF                       
//ISFOUT    DD DUMMY                             
//ISFIN     DD *                                 
OWNER **                                         
PREFIX TSO1258C                                 
ST                                               
FIND TSO1258C                                   
++S                                             
PRINT ODSN 'AB.ABMRAII.JOBLISTS.ABSUEZ(TSO1265Z)'
PRINT                                           
PRINT CLOSE                                     
END                                             
//*                                             
#10:  Author: Dibakar, Location: USA PostPosted: Mon Feb 23, 2004 7:55 am
    —
If I put IEFBR14 before the step with the layout as metioned by kolusu then I am getting required output. But if I add an IEBGENER below to copy to my PDS then I get the error 'IEB316I DDNAME SYSIN CANNOT BE OPENED'
#11:  Author: Dibakar, Location: USA PostPosted: Wed Feb 25, 2004 7:46 am
    —
I don't know why I was getting problems with ODSN, when I tried FILE it worked.
#12:  Author: Dibakar, Location: USA PostPosted: Tue Apr 06, 2004 6:42 am
    —
If you wan't the job to save itself, search for Henrik Bang Sorensen.
#13:  Author: mfjin,  PostPosted: Tue Apr 06, 2004 7:00 am
    —
Rolling Eyes

Dibakar, Can you please explain..
#14:  Author: Dibakar, Location: USA PostPosted: Wed Apr 07, 2004 3:57 am
    —
Right Ravi, but since it was in another forum i was not sure if I should provide the link or not.
#15:  Author: pzmohanty, Location: hyderabad, India PostPosted: Sun May 23, 2004 3:28 am
    —
hi kolusu,

u had given a JCL to divert the SPOOL output to a dataset ,

here we r identifying spool data to be copied by JOBNAME , but if i had multiple JOBS with same JOBNAME then what,

can u please throw some more light.

thanx in adv
MVSFORUMS.com -> Job Control Language(JCL)


output generated using printer-friendly topic mod. All times are GMT - 5 Hours

Goto page 1, 2  Next  :| |:
Page 1 of 2

Powered by phpBB © 2001, 2005 phpBB Group