In the below output paste, the "*" indicating the syntax error is placed under
the comma at the end of the third line (after the first ENDPOS parameter and 2
closing parentheses).
This is Syncsort, not DFSORT, but the FINDREP syntax is (or anyway ought to be)
common between them.
IFTHEN=(WHEN=(13,1,CH,EQ,C'D'),
FINDREP=(INOUT=(X'00',C' '),
STARTPOS=01,ENDPOS=34)),
*
FINDREP=(INOUT=(X'41',C' '),
STARTPOS=35,ENDPOS=94)),
IFTHEN=(WHEN=NONE,
FINDREP=(INOUT=(X'00',C' ')))
WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED
WER901I **WARNING** ZPSORT WILL EXPIRE IN 17 DAYS
WER268A INREC STATEMENT : SYNTAX ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
Lizette Koehler
Sent: Tuesday, March 9, 2021 12:49 PM
To: [email protected]
Subject: Re: SORT syntax question
Could you post the error messages?
Lizette
-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of
Farley, Peter x23353
Sent: Tuesday, March 9, 2021 10:48 AM
To: [email protected]
Subject: SORT syntax question
This format of FINDREP's on an INREC command gets a syntax error:
IFTHEN=(WHEN=(13,1,CH,EQ,C'D'),
FINDREP=(INOUT=(X'00',C' '),
STARTPOS=01,ENDPOS=34)),
FINDREP=(INOUT=(X'41',C' '),
STARTPOS=35,ENDPOS=94)),
What is the correct syntax to find and replace all binary zeroes in positions
1-34 with spaces and replace all X'41' characters by spaces in positions 35-94
and do *both* FINDREP's only when position 13 is C'D'?
If It matters, the input is RECFM=FB, LRECL=94.
Peter
This message and any attachments are intended only for the use of the addressee
and may contain information that is privileged and confidential.
If the reader of the message is not the intended recipient or an authorized
representative of the intended recipient, you are hereby notified that any
dissemination of this communication is strictly prohibited. If you have
received this communication in error, please notify us immediately by e-mail
and delete the message and any attachments from your system.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
This message and any attachments are intended only for the use of the addressee
and may contain information that is privileged and confidential. If the reader
of the message is not the intended recipient or an authorized representative of
the intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication
in error, please notify us immediately by e-mail and delete the message and any
attachments from your system.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
