My understanding of the OP's initial request was the ability to display a line 
in hex from within an edit macro, which is probably doing a lot more than just 
the hex display as it is very easy to do the HX on the line while in edit/view.

Unfortunately there are a very limited number of line command options while in 
edit - unfortunately none of the enhanced edit line commands.

This was my solution (reposting for fun) which can then be included in the OP's 
edit macro:

/* ---------------------- REXX ----------------------------- *      
 | ISPF Edit Macro to display the requested record in hex in |      
 | an infoline.  (Note: no validation is performed)          |      
 |                                                           |      
 | Syntax:  EHEX line                                        |      
 |                                                           |      
 | Where EHEX is the macro name (change as you wish)         |      
 |       line is a record number                             |      
 |                                                           |      
 | Sample:  EHEX 4                                           |      
 * --------------------------------------------------------- */     
  Address ISREdit                                                   
  'Macro (line)'                                                    
  '(data) = line' line                                              
  hex = c2x(data)                                                   
  parse value '' with hextop hexbot                                 
  do i = 1 to length(hex) by 2                                      
    hextop = hextop''substr(hex,i,1)                                
    hexbot = hexbot''substr(hex,i+1,1)                              
  end                                                               
  'line_after' line '= infoline (hexbot)'                           
  'line_after' line '= infoline (hextop)'                           


Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Carmen Vitullo
Sent: Tuesday, September 7, 2021 9:13 AM
To: [email protected]
Subject: Re: ispf edit macro "HX" line command

Like I said I never used this line command, my syntax was not correct but a 
quick check;

ISREDIT (CMD) = 'HX'  should work -I've not tested

you need to have the cursor positioned to where you need first.

I have some examples that position the cursor and perform some tasks but none 
that would help you here

the IBM doc would be helpful for review

Carmen

On 9/5/2021 3:27 AM, Weizman arbel wrote:
>> I do not understand your response, you asked;
> I asked about  line commnad
>
>> ISREDIT HX .ZCSR
> There was a suggestion
> and my response was
> that is a line command And it does not work.
> Sorry for the misunderstanding
>
> I did not know the option
> "quote original message"
> and It's tapping me to comment
>
>
>
>
>
> On Thu, 2 Sep 2021 10:55:00 -0500, Carmen Vitullo<[email protected]>  wrote:
>
>> I do not understand your response, you asked;
>>
>> there is a way to execute  "HX"  line command
> >from edit macro ?
>> ISREDIT HX .ZCSR
>>
>> - is a line command
>>
>> now you are asking command line ?
>> so
>> ISREDIT (CMD) - 'HEX'
>>
>> Carmen
>>
>> On 9/2/2021 10:14 AM, Weizman arbel wrote:
>>> ISREDIT HX .ZCSR  should work
>>>
>>> this is command line
>>> and there is Does not exist HX in command line (the command is hex 
>>> on / hex off)
>>>
>>> --------------------------------------------------------------------
>>> -- For IBM-MAIN subscribe / signoff / archive access instructions, 
>>> send email [email protected]  with the message: INFO 
>>> IBM-MAIN
>>>
>> --
>> /I am not bound to win, but I am bound to be true. I am not bound to 
>> succeed, but I am bound to live by the light that I have. I must 
>> stand with anybody that stands right, and stand with him while he is 
>> right, and part with him when he goes wrong. *Abraham Lincoln*/
>>
>> ---------------------------------------------------------------------
>> - For IBM-MAIN subscribe / signoff / archive access instructions, 
>> send email [email protected]  with the message: INFO 
>> IBM-MAIN
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email [email protected]  with the message: INFO IBM-MAIN
>
--
/I am not bound to win, but I am bound to be true. I am not bound to succeed, 
but I am bound to live by the light that I have. I must stand with anybody that 
stands right, and stand with him while he is right, and part with him when he 
goes wrong. *Abraham Lincoln*/

----------------------------------------------------------------------
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

Reply via email to