Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Add comments within the DFSORT statements

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
jr3011

New User


Joined: 17 Apr 2008
Posts: 26
Location: Oviedo, FL

PostPosted: Fri Jul 31, 2009 11:36 pm    Post subject: Add comments within the DFSORT statements
Reply with quote

Is is possible to add comments within the DFSORT statements for documentation ?
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Sat Aug 01, 2009 2:39 am    Post subject:
Reply with quote

Yes. Just use an * in position 1. You can also use blank statements.
For example:

Code:

//SYSIN DD *
* A SORT statement follows this comment.
   SORT FIELDS=(5,4,CH,A)
                             
* An OUTREC statement statement follows this comment which
* is written using two lines.
   OUTREC FIELDS=(1,50,
*A comment in between operands is ok too.
      101,3)
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Sat Aug 01, 2009 3:19 am    Post subject:
Reply with quote

Thank You. This will be very helpful.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Mon Aug 03, 2009 9:57 pm    Post subject:
Reply with quote

Alternatively you can add comments seperating the control cards with a space like this

Code:

//SYSIN    DD *                                       
  SORT FIELDS=(01,10,CH,A,     $ EMP-NUMBER ASCENDING 
               50,08,PD,D)     $ SALARY DESCENDING     
                                                       
  OUTREC BUILD=(20,30,         $ EMP-NAME             
                X,             $ SPACE                 
                01,10,         $ EMP-NUMBER           
                X,             $ SPACE                 
                50,08)         $ SALARY               
/*
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Mon Aug 03, 2009 10:18 pm    Post subject:
Reply with quote

Note that those are referred to as "remark fields" in the DFSORT books, whereas statements starting with an * in position 1 are referred to as "comment statements".
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Compare and COPY using DFSORT pshongal DFSORT/ICETOOL 3 Fri Nov 17, 2017 9:49 am
No new posts Split files upto certain limit based ... bubbu75 DFSORT/ICETOOL 5 Tue Nov 14, 2017 11:11 pm
No new posts PLI %IF statements Pedro PL/I & Assembler 1 Tue Sep 19, 2017 12:06 am
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts Join records from 2 files with No Dup... Poha Eater DFSORT/ICETOOL 22 Sun Aug 27, 2017 10:35 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us