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 

Append the Ouput from Sort Build statements

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
apru
Beginner


Joined: 15 Feb 2014
Posts: 25
Topics: 6
PostPosted: Tue Apr 22, 2014 1:57 am    Post subject: Append the Ouput from Sort Build statements Reply with quote
Hi

If I have two steps in my program implementing SORT utility and if each step has a build statement ,is it possible to print both the build statements on a single line ie is there any option to append the first build with contents of second build??//

Currently I am getting the first build in one line and the second build below the first one.I want to print both of them together.

Can you please suggest some solutions?
Back to top
View user's profile Send private message
William Collins
Supermod


Joined: 03 Jun 2012
Posts: 437
Topics: 0
PostPosted: Tue Apr 22, 2014 2:33 am    Post subject: Reply with quote
Can you post your code please?
Back to top
View user's profile Send private message
apru
Beginner


Joined: 15 Feb 2014
Posts: 25
Topics: 6
PostPosted: Tue Apr 22, 2014 4:58 am    Post subject: Reply with quote
Code:

//STEP011  EXEC PGM=SORT                                   
//SYSOUT   DD SYSOUT=*                                     
//SORTIN   DD DSN=Uxxxxxxxx,
//          DISP=SHR                                       
//SORTOUT DD DSN=Uxxxxxxxxxx,                 
//           DISP=(MOD,CATLG,CATLG),                       
//           SPACE=(CYL,(1,1)),                           
//           RECFM=FB,LRECL=80,BLKSIZE=0                   
//SYSIN    DD *                                           
  OPTION COPY                                                       
  INCLUDE COND=(11,3,CH,C'COB')                           
  INREC IFTHEN=(WHEN=(11,3,CH,C'COB')                     
       PARSE=(%01=(STARTAT=C'COB',ENDBEFR=C' ',FIXLEN=8)),
  BUILD=(%01,133:X))                                       
/*     


Code:

 //STEP001   EXEC PGM=SORT                                         
 //SYSOUT    DD SYSOUT=*                                           
 //SORTIN    DD *                                                 
   MYJOB    MAINFRAME                                             
 /*                                                               
 //SORTOUT DD DSN=UXXXXXXXXX,                       
 //         DISP=(MOD,CATLG,DELETE),                               
 //         SPACE=(CYL,(1,1),RLSE)                                 
 //SYSIN DD *                                                     
     OPTION COPY                                                   
    OUTREC BUILD=(1,8,C'*',12,9,C'*',3X,C'NA',3X,C'*',8X,C'NIL',8X,
       C'*',DATE1(/),C'*',C'STATUS',C'*')                       
 //*   



I want the build statements in the two sort steps above on the same line.Currently I am getting the output like this:
Code:

ikfsregf
myjob   *mainframe*   na   *        nil        *13/04/2014*status*

I want the second line to be appended at the end of first line and not on the second line.Is it possible?
Back to top
View user's profile Send private message
William Collins
Supermod


Joined: 03 Jun 2012
Posts: 437
Topics: 0
PostPosted: Tue Apr 22, 2014 5:20 am    Post subject: Reply with quote
You seem to be using different data for the input files? You want to match two different files and create your output?

Can you show representative sample data for your input file(s) and expected output for that data, please?
Back to top
View user's profile Send private message
Terry_Heinze
Supermod


Joined: 31 May 2004
Posts: 391
Topics: 4
Location: Richfield, MN, USA
PostPosted: Tue Apr 22, 2014 7:50 am    Post subject: Reply with quote
... and please use Code tags.
_________________
....Terry
Back to top
View user's profile Send private message Send e-mail
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
PostPosted: Tue Apr 22, 2014 10:42 am    Post subject: Reply with quote
apru,

How many different ways are you going to post the same question? Isn't the same thing that you tried in this Selective copy from sdsf to dataset topic?
_________________
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 -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
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