Gil,

I see in the very next section of this manual is something called "Coding 
restrictions".  Apparently you don't even need a special character to delimit a 
comment, errr, remark...    I tagged "#" the relevant restrictions.  To 
summarize, asterisk in column 1 is a comment, anything after a blank on any 
other line is a remark.  

<quote>

The following rules apply to control statement preparation:

    Operation definers and operands must be in uppercase EBCDIC.
  #  Column 1 of each control statement can be used only for a label or for a 
comment statement that begins with an asterisk in column 1.
    If present, a label must begin in column 1. Labels are allowed only in the 
SYSIN and SORTCNTL data sets.
    The entire operation definer must be contained on the first line of a 
control statement.
#    The first operand must begin on the first line of a control statement. The 
last operand in a statement must be followed by at least one blank.
#   Blanks are not allowed in operands. Anything following a blank is 
considered part of the remark field.
    Remarks are allowed only in the DFSPARM, SYSIN, and SORTCNTL data sets.
    Commas, semicolons, and blanks can be used only as delimiters. They can be 
used in values only if the values are constants.
    Each type of program control statement can appear only once within a single 
source (for example, the SYSIN data set).

</quote>

Rex

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of Sri 
h Kolusu
Sent: Tuesday, September 6, 2022 11:20 AM
To: [email protected]
Subject: [EXTERNAL] Re: dfsort - Reformat file

>> BTW, what's the syntax for comments in DFSORT command files?

Gil,

It is documented here

https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/2.5.0?topic=rules-inserting-comment-statements__;!!KjMRP1Ixj6eLE0Fj!tWOdD72_vf-mSDlcMyy6-nZqOfhAo-JfpwI7KBTfkM_IvYfCRMOwpCPxwxfhhC0MaK2yKwbTBOmAucYFHvM$
  

>> The solution above, lacking comments and with 8 numeric positional 
>> parameters is horribly opaque to the novice.

If there is NO reformatting(Binary/packed fields to Display fields, printing 
Hex numbers.... ), You just need POSITION of the data and LENGTH of the data to 
be written out.

//SYSIN    DD *
  OPTION COPY
* This is a sample comment with asterisks in position 1

  INREC BUILD=(05,08,    # copy from pos 05 for a length of 08
               15,05,    # copy from pos 15 for a length of 05
               22,21,    # copy from pos 22 for a length of 21
               45,05)    # copy from pos 45 for a length of 05
/*


Thanks,
Kolusu
DFSORT Development
IBM Corporation


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
The information contained in this message is confidential, protected from 
disclosure and may be legally privileged. If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful. If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format. Thank you.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to