MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Adding header & trailer to output
Goto page Previous  1, 2
 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
skss
Beginner


Joined: 09 Dec 2013
Posts: 12
Topics: 2

PostPosted: Mon Dec 23, 2013 11:42 am    Post subject: Reply with quote

Thanks for the advice but I have got my solution with SORT!!
Code:

//SORTIN   DD DISP=SHR,DSN=XXXXX.Input.SORT                       
//SORTOUT  DD DSN=XXXXX.Output.REPORT,                             
//            DISP=(NEW,CATLG,DELETE),                               
//            SPACE=(TRK,(30,10),RLSE),                               
//            UNIT=SYSDA,                                             
//            DCB=(RECFM=FB,LRECL=200,BLKSIZE=)                       
//SORTWK01 DD  UNIT=DISK,SPACE=(CYL,(20,5),RLSE)                     
//SORTWK02 DD  UNIT=DISK,SPACE=(CYL,(20,5),RLSE)                     
//SORTWK03 DD  UNIT=DISK,SPACE=(CYL,(20,5),RLSE)                     
//SYSIN    DD  *                                                     
 OPTION COPY                                                         
 OUTFIL REMOVECC,                                                     
 HEADER1=(20:C'ST TEXT TEXT TEXT TEXT'),                           
 TRAILER1=(01:C'END OF REPORT')                                       
 OUTREC IFTHEN=(WHEN=(2,4,CH,EQ,C'ABND'),OVERLAY=(150:C'JOB FAILURE'))


And yes I am not going to put any questions in this forum until and unless they are related to DFSORT

Thanks anyways
_________________
Thanks & Regards,
SKSS
Back to top
View user's profile Send private message
skss
Beginner


Joined: 09 Dec 2013
Posts: 12
Topics: 2

PostPosted: Mon Dec 23, 2013 11:43 am    Post subject: Reply with quote

This particular solution works better for what I need
_________________
Thanks & Regards,
SKSS
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12382
Topics: 75
Location: San Jose

PostPosted: Mon Dec 23, 2013 12:07 pm    Post subject: Reply with quote

skss wrote:
Thanks for the advice but I have got my solution with SORT!!


The control cards you show are not even close to the requirements you have explained earlier. All you did was update a line with "Job Failure" at position 150. You already know that with the text "ABND" at position2. I thought you wanted the Jobnames Listed in the trailer as well as the count of such jobs.

skss wrote:
And yes I am not going to put any questions in this forum until and unless they are related to DFSORT


Well you can ask questions on any of the mainframe topics listed here, but please make sure that you provide us the right information. As a DFSORT developer I cannot answer queries on competitive product, but there are some users who can provide you with a solution.

skss wrote:
This particular solution works better for what I need


Glad you are able to find the solution even though it is not close to your description in your original post.
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Goto page Previous  1, 2
Page 2 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group