Here is an interesting technique. Lets you include data in a Rexx program as
comments but still access it from within the program.
StartOfExplain = WhereAmI() + 2
/*
This Rexx program retrieves the userids of privileged users from a
blah blah blah
*/
EndOfExplain = WhereAmI() - 2
<snip>
/* Check for parms omitted */
If ARG(1) = "" Then Do
Do s = StartOfExplain to EndOfExplain
Say SOURCELINE(s)
End s
MaxRC = 16
Exit MaxRC
End
<snip>
/***********************************************************************
Return line number (of caller)
***********************************************************************/
WhereAmI: Return Sigl
Charles
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Itschak Mugzach
Sent: Thursday, October 27, 2016 8:46 AM
To: [email protected]
Subject: Re: Rexx and hex data strings
Walt,
As the information is in machine readable (hex data) it can't be rapped with an
apostrophe because the data may include apostrophe. I thought marking a block
of data as comment and access it some how. May be a function like source,in May
do it. Will check this later. Any other idea how to access the commented block
of data?
ITschak
נשלח מה-iPad שלי
ב-27 באוק׳ 2016, בשעה 18:38, Walt Farrell <[email protected]> כתב/ה:
>> On Thu, 27 Oct 2016 18:06:38 +0300, Itschak Mugzach
>> <[email protected]> wrote:
>>
>> I am trying to include a large ammount of hex (and unexpected) data
>> in the program. each line is 80 bytes in length. As Rexx allowes a
>> longer then 80 bytes line of code, there is no problem to put each
>> line into a variable, but I have about 800 lines to include... any
>> idea how to make a block in the program an accssible comment?
>
> What do you mean by "accessible comment"?
>
> --
> Walt
>
> ----------------------------------------------------------------------
> 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
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
