On 7/16/2014 9:01 AM, [email protected] wrote:
IBM Mainframe Assembler List <[email protected]> wrote on
07/16/2014 10:50:31 AM:
From: Steve Hobson <[email protected]>
1st operand - PWORK DC X'4020206B212020'
Can I recommend more readable (IMHO) EDIT patterns, Something like:
DIGIT EQU X'20'
SIG EQU X'01'
PWORK DC 0CL7,AL1(C' ',DIGIT,DIGIT,C',',DIGIT+SIG,DIGIT,DIGIT)
There was a time I would have pooh-poohed this. However in this day and
age when we are trying to train new people to use assembler and support
old (and very old) assembler programs before we retire or expire, I wonder
if anyone on the list who is new(er) to assembler would comment on the
readability of this construct.
Well, I'm a little newer than you. :-)
Overall, I like it, but why not complete it with something like:
PWORK DC 0CL7,AL1(Fill,Digit,Digit,Comma,Digit+Sig,Digit,Digit,Sign)
-Steve Comstock
Were it my task, I would write a macro to build the edit pattern but that
abstracts the programmer from fundamental knowledge which they should
eventually learn if they are to master assembler. Of course this has been
done. It is called an HLL such as Cobol.
For reference I was at my 55th high school reunion this past weekend and
am in my 47th year of assembler.
-----------------------------------------
The information contained in this communication (including any
attachments hereto) is confidential and is intended solely for the
personal and confidential use of the individual or entity to whom
it is addressed. If the reader of this message is not the intended
recipient or an agent responsible for delivering it to the intended
recipient, you are hereby notified that you have received this
communication in error and that any review, dissemination, copying,
or unauthorized use of this information, or the taking of any
action in reliance on the contents of this information is strictly
prohibited. If you have received this communication in error,
please notify us immediately by e-mail, and delete the original
message. Thank you
