On Sat, 4 Jul 2020 15:28:44 -0700, Charles Mills wrote:
>I am not sure what you are trying to achieve in the big picture but assembler
>is not something you can spend a short time on and expect to have something
>that works.
>
>Rexx -- you could study it for 5 minutes and be able to write SAY "Hello
>World" and you would have a working first program. Not so with assembler.
>There are an awful lot of gotchas before you can get to first base, before
>your first working program.
>
I largely concur.
But the OP's intent was to access fields in a control block. Rexx
is poorly suited to the task. I wonder if someone has attempted
to map from an Assembler SYSPRINT or ASMADATA to an
initialization of a Rexx compound symbol and a few functions to
access the fields, such as:
GETFIELD:
parse arg NAME FIELD
Work = substr( value( NAME.CONTENT, NAME.FIELD.OFFSET, NAME.FIELD.LENGTH ) )
interpret 'return c2'NAME.FIELD.TYPE'( Work )'
(Work (not) in progress; totally untested; suffers Use-Mention conflation.)
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
