Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to use SORT when SORTIN is DUMMY

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SYNCSORT
View previous topic :: :: View next topic  
Author Message
MSTP

New User


Joined: 21 Jun 2007
Posts: 29
Location: Baltimore

PostPosted: Wed Jul 23, 2014 9:29 am    Post subject: How to use SORT when SORTIN is DUMMY
Reply with quote

My SORTIN is DUMMY and I want to create a SORTOUT file with current system date. My SORTOUT is empty .Please look into SYSOUT attached and advise.


Thanks
MSTP
Back to top
View user's profile Send private message

steve-myers

Active User


Joined: 30 Nov 2013
Posts: 461
Location: The Universe

PostPosted: Wed Jul 23, 2014 12:25 pm    Post subject:
Reply with quote

It's usually not a good idea to use attachments. Many of us cannot or will not download them. Try placing the output into a code group using code tags, like this -
Code:
These
     messages
             are
                embedded
                        in
                          code
                              tags
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7232

PostPosted: Wed Jul 23, 2014 12:50 pm    Post subject: Reply to: How to use SORT when SORTIN is DUMMY
Reply with quote

If you have DUMMY, there is no data to process. The only way to get the step to do anything is to use OUTFIL reporting functions, HEADER1 or TRAILER1. You'll probably want REMOVECC as well.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1219
Location: Israel

PostPosted: Wed Jul 23, 2014 1:21 pm    Post subject: Reply to: How to use SORT when SORTIN is DUMMY
Reply with quote

I can't even see the attachment, but I tried anyway.

First test:
Code:
//STEP01   EXEC PGM=SYNCSORT                   
//SORTIN   DD   DUMMY                         
//SORTOUT  DD   SYSOUT=*                       
//SYSOUT   DD   SYSOUT=*                       
//SYSIN    DD   *                             
   SORT   FIELDS=COPY                         
   OUTFIL NODETAIL,TRAILER1=(' DATE IS ',&DATE)
just gave me a rc of 16:
Code:
WER189A  SORTIN   DCB RECFM REQUIRED                   
WER108I  SORTIN   : RECFM=     ; LRECL=      ; BLKSIZE=
WER073I  SORTIN   : DSNAME=NULLFILE                     

So I tried again with:
Code:
//STEP01   EXEC PGM=SYNCSORT                   
//SORTIN   DD   DUMMY,DCB=(RECFM=F,LRECL=80)   
//SORTOUT  DD   SYSOUT=*                       
//SYSPRINT DD   SYSOUT=*                       
//SYSOUT   DD   SYSOUT=*                       
//SYSIN    DD   *                             
   SORT   FIELDS=COPY                         
   OUTFIL NODETAIL,TRAILER1=(' DATE IS ',&DATE)
and this time I got my SORTOUT:
Code:
 DATE IS 07/23/14
Back to top
View user's profile Send private message
MSTP

New User


Joined: 21 Jun 2007
Posts: 29
Location: Baltimore

PostPosted: Wed Jul 23, 2014 10:01 pm    Post subject: Reply to: How to use SORT when SORTIN is DUMMY
Reply with quote

Thank you Bill and Marso for guiding me as your suggestion worked for me.I will try to post the code next time instead of attachments.

thanks
MSTP
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SYNCSORT All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Limit duplicate records in the SORT pshongal SYNCSORT 6 Mon Nov 21, 2016 12:54 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us