Re: ispf edit macro "HX" line command
At least in z/OS 2.4, the documentation states that you can't issue a line command from a macro. RFE? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Weizman arbel Sent: Sunday, September 19, 2021 4:12 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command I remembered that (:) prefix command line (primary command) can execute line command Command ===> :hx Command ===> :i Command ===> :r etc ... https://www.ibm.com/docs/en/zos/2.1.0?topic=commands-line You can enter edit line commands as primary commands on the command line by prefixing them with a colon (:) and placing the cursor on the target line. For example, if you enter :D3 on the command line and move your cursor to line 12 of the file, the three lines 12, 13, and 14 are deleted from the file. This technique is normally used for PF key assignments. address isredit ":HX" Does not work Because it is Not an edit command How to push command to ZCMD ? I tried address ispexec "control errors return" Mycmd = ':HX' "DISPLAY COMMAND(Mycmd)" It does not work -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
I remembered that (:) prefix command line (primary command) can execute line command Command ===> :hx Command ===> :i Command ===> :r etc ... https://www.ibm.com/docs/en/zos/2.1.0?topic=commands-line You can enter edit line commands as primary commands on the command line by prefixing them with a colon (:) and placing the cursor on the target line. For example, if you enter :D3 on the command line and move your cursor to line 12 of the file, the three lines 12, 13, and 14 are deleted from the file. This technique is normally used for PF key assignments. address isredit ":HX" Does not work Because it is Not an edit command How to push command to ZCMD ? I tried address ispexec "control errors return" Mycmd = ':HX' "DISPLAY COMMAND(Mycmd)" It does not work -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
Sloppy coding then but it answers the original "is there is a way to execute "HX" line command from edit macro ? " Pick a different label name and add smarts for determining the line number. Hank -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
That code has nothing to do with edit line commands. Your LABEL command assigns a label that (minus the period) happens to have the same spelling as the HX edit line command. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Hank Oerlemans [03c4d8bf55f3-dmarc-requ...@listserv.ua.edu] Sent: Friday, September 10, 2021 12:48 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command /* Rexx */ Address isredit "macro" "label 4 = .HX" "FLIP .HX" flips line 4. Hank -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
/* Rexx */ Address isredit "macro" "label 4 = .HX" "FLIP .HX" flips line 4. Hank -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
I, D, C, CC, RR and DD are not ISREDIT commands or assignment statements. The issue is whether there is a way to issue line commands from an EDIT macro, not whether you can issuethem from a keyboard. There is an ISREDIT INSERT command that has the same effect as an I line command, but they are different commands. I wouldn't be surprised, however, if they shared some code. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 3:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command well, i conciser them line commands since I position my cursor on a line and use 'I', 'D', 'C' 'CC' 'RR' 'DD'.etc Carmen On 9/9/2021 1:57 PM, Seymour J Metz wrote: > ISREDIT commands and assignment statements like DELETE, INSERT, LABEL, > LINE_AFTER, LINE_BEFORE and SHIFT foo are not line commands. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Carmen Vitullo [cvitu...@hughes.net] > Sent: Thursday, September 9, 2021 1:55 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: ispf edit macro "HX" line command > > I'll have to believe you didn't find it, but I've used edit line > commands in macros, like insert, repeat,copy, delete, and assign a label > to a line, range(s) > > if I made an assumption HX is valid then that was a bad assumption > > > Carmen > > On 9/9/2021 12:49 PM, Seymour J Metz wrote: >> I checked Edit assignment statements" and "Chapter 11. Edit macro commands >> and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, >> SC19-3621-40, and couldn't find any way for an edit macro to issue a line >> command. What did you do with the variable CMD to treat its value as a line >> command? >> >> >> -- >> Shmuel (Seymour J.) Metz >> http://mason.gmu.edu/~smetz3 >> >> ____ >> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of >> Carmen Vitullo [cvitu...@hughes.net] >> Sent: Thursday, September 9, 2021 11:35 AM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: Re: ispf edit macro "HX" line command >> >> IIRC yes, then followed by an ISREDIT command to issue the line command, >> but again without testing and having the time to test I'm not 100% sure >> >> I made an assumption the OP had an alternate solution. >> >> Carmen >> >> >> On 9/9/2021 10:12 AM, Seymour J Metz wrote: >>>> ISREDIT (CMD) = 'HX' should work -I've not tested >>> Doesn't that just set the variable CMD to the VALUE HX? >>> >>> >>> -- >>> Shmuel (Seymour J.) Metz >>> http://mason.gmu.edu/~smetz3 >>> >>> >>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of >>> Carmen Vitullo [cvitu...@hughes.net] >>> Sent: Tuesday, September 7, 2021 10:12 AM >>> To: IBM-MAIN@LISTSERV.UA.EDU >>> 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 >>>> wrote: >>>
Re: ispf edit macro "HX" line command
Actually they are: https://www.ibm.com/docs/en/zos/2.2.0?topic=macros-performing-line-command-functions Here's the HEX command edit macro: https://www.ibm.com/docs/en/zos/2.2.0?topic=statements-hexset-query-hexadecimal-mode Joe On Thu, Sep 9, 2021 at 2:02 PM Carmen Vitullo wrote: > well, i conciser them line commands since I position my cursor on a line > and use 'I', 'D', 'C' 'CC' 'RR' 'DD'.etc > > Carmen > > On 9/9/2021 1:57 PM, Seymour J Metz wrote: > > ISREDIT commands and assignment statements like DELETE, INSERT, LABEL, > LINE_AFTER, LINE_BEFORE and SHIFT foo are not line commands. > > > > > > -- > > Shmuel (Seymour J.) Metz > > http://mason.gmu.edu/~smetz3 > > > > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on > behalf of Carmen Vitullo [cvitu...@hughes.net] > > Sent: Thursday, September 9, 2021 1:55 PM > > To: IBM-MAIN@LISTSERV.UA.EDU > > Subject: Re: ispf edit macro "HX" line command > > > > I'll have to believe you didn't find it, but I've used edit line > > commands in macros, like insert, repeat,copy, delete, and assign a label > > to a line, range(s) > > > > if I made an assumption HX is valid then that was a bad assumption > > > > > > Carmen > > > > On 9/9/2021 12:49 PM, Seymour J Metz wrote: > >> I checked Edit assignment statements" and "Chapter 11. Edit macro > commands and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, > SC19-3621-40, and couldn't find any way for an edit macro to issue a line > command. What did you do with the variable CMD to treat its value as a line > command? > >> > >> > >> -- > >> Shmuel (Seymour J.) Metz > >> http://mason.gmu.edu/~smetz3 > >> > >> > >> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on > behalf of Carmen Vitullo [cvitu...@hughes.net] > >> Sent: Thursday, September 9, 2021 11:35 AM > >> To: IBM-MAIN@LISTSERV.UA.EDU > >> Subject: Re: ispf edit macro "HX" line command > >> > >> IIRC yes, then followed by an ISREDIT command to issue the line command, > >> but again without testing and having the time to test I'm not 100% sure > >> > >> I made an assumption the OP had an alternate solution. > >> > >> Carmen > >> > >> > >> On 9/9/2021 10:12 AM, Seymour J Metz wrote: > >>>> ISREDIT (CMD) = 'HX' should work -I've not tested > >>> Doesn't that just set the variable CMD to the VALUE HX? > >>> > >>> > >>> -- > >>> Shmuel (Seymour J.) Metz > >>> http://mason.gmu.edu/~smetz3 > >>> > >>> > >>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on > behalf of Carmen Vitullo [cvitu...@hughes.net] > >>> Sent: Tuesday, September 7, 2021 10:12 AM > >>> To: IBM-MAIN@LISTSERV.UA.EDU > >>> 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 > >>>> > >>>> > >>>> > >>>> > >>>> >
Re: ispf edit macro "HX" line command
Answering myself, IBM doc at 2.1 and I'm pretty sure 2.4 see's these commands as edit line commands https://www.ibm.com/docs/en/zos/2.1.0?topic=reference-edit-line-commands <https://www.ibm.com/docs/en/zos/2.1.0?topic=reference-edit-line-commands> HX being one edit and edit macro line command On 9/9/2021 2:01 PM, Carmen Vitullo wrote: well, i conciser them line commands since I position my cursor on a line and use 'I', 'D', 'C' 'CC' 'RR' 'DD'.etc Carmen On 9/9/2021 1:57 PM, Seymour J Metz wrote: ISREDIT commands and assignment statements like DELETE, INSERT, LABEL, LINE_AFTER, LINE_BEFORE and SHIFT foo are not line commands. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 1:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command I'll have to believe you didn't find it, but I've used edit line commands in macros, like insert, repeat,copy, delete, and assign a label to a line, range(s) if I made an assumption HX is valid then that was a bad assumption Carmen On 9/9/2021 12:49 PM, Seymour J Metz wrote: I checked Edit assignment statements" and "Chapter 11. Edit macro commands and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, SC19-3621-40, and couldn't find any way for an edit macro to issue a line command. What did you do with the variable CMD to treat its value as a line command? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 11:35 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command IIRC yes, then followed by an ISREDIT command to issue the line command, but again without testing and having the time to test I'm not 100% sure I made an assumption the OP had an alternate solution. Carmen On 9/9/2021 10:12 AM, Seymour J Metz wrote: ISREDIT (CMD) = 'HX' should work -I've not tested Doesn't that just set the variable CMD to the VALUE HX? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Tuesday, September 7, 2021 10:12 AM To: IBM-MAIN@LISTSERV.UA.EDU 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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email tolists...@listserv.ua.edu with the message: INFO IBM-MAIN -- /I am not bound to win, but I am bound to be
Re: ispf edit macro "HX" line command
well, i conciser them line commands since I position my cursor on a line and use 'I', 'D', 'C' 'CC' 'RR' 'DD'.etc Carmen On 9/9/2021 1:57 PM, Seymour J Metz wrote: ISREDIT commands and assignment statements like DELETE, INSERT, LABEL, LINE_AFTER, LINE_BEFORE and SHIFT foo are not line commands. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 1:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command I'll have to believe you didn't find it, but I've used edit line commands in macros, like insert, repeat,copy, delete, and assign a label to a line, range(s) if I made an assumption HX is valid then that was a bad assumption Carmen On 9/9/2021 12:49 PM, Seymour J Metz wrote: I checked Edit assignment statements" and "Chapter 11. Edit macro commands and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, SC19-3621-40, and couldn't find any way for an edit macro to issue a line command. What did you do with the variable CMD to treat its value as a line command? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 11:35 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command IIRC yes, then followed by an ISREDIT command to issue the line command, but again without testing and having the time to test I'm not 100% sure I made an assumption the OP had an alternate solution. Carmen On 9/9/2021 10:12 AM, Seymour J Metz wrote: ISREDIT (CMD) = 'HX' should work -I've not tested Doesn't that just set the variable CMD to the VALUE HX? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Tuesday, September 7, 2021 10:12 AM To: IBM-MAIN@LISTSERV.UA.EDU 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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email tolists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAI
Re: ispf edit macro "HX" line command
ISREDIT commands and assignment statements like DELETE, INSERT, LABEL, LINE_AFTER, LINE_BEFORE and SHIFT foo are not line commands. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 1:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command I'll have to believe you didn't find it, but I've used edit line commands in macros, like insert, repeat,copy, delete, and assign a label to a line, range(s) if I made an assumption HX is valid then that was a bad assumption Carmen On 9/9/2021 12:49 PM, Seymour J Metz wrote: > I checked Edit assignment statements" and "Chapter 11. Edit macro commands > and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, > SC19-3621-40, and couldn't find any way for an edit macro to issue a line > command. What did you do with the variable CMD to treat its value as a line > command? > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Carmen Vitullo [cvitu...@hughes.net] > Sent: Thursday, September 9, 2021 11:35 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: ispf edit macro "HX" line command > > IIRC yes, then followed by an ISREDIT command to issue the line command, > but again without testing and having the time to test I'm not 100% sure > > I made an assumption the OP had an alternate solution. > > Carmen > > > On 9/9/2021 10:12 AM, Seymour J Metz wrote: >>> ISREDIT (CMD) = 'HX' should work -I've not tested >> Doesn't that just set the variable CMD to the VALUE HX? >> >> >> -- >> Shmuel (Seymour J.) Metz >> http://mason.gmu.edu/~smetz3 >> >> >> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of >> Carmen Vitullo [cvitu...@hughes.net] >> Sent: Tuesday, September 7, 2021 10:12 AM >> To: IBM-MAIN@LISTSERV.UA.EDU >> 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 >>> 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 tolists...@listserv.ua.edu 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
Re: ispf edit macro "HX" line command
Would you mind posting the code? Thanks. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 2:13 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command long before edit CUT and PASTE were readily available in ISPF I picked up a rexx exec from some toolbox online, I don't recall where, but cut and paste were a good example of using edit line commands in a macro On 9/9/2021 12:49 PM, Seymour J Metz wrote: > I checked Edit assignment statements" and "Chapter 11. Edit macro commands > and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, > SC19-3621-40, and couldn't find any way for an edit macro to issue a line > command. What did you do with the variable CMD to treat its value as a line > command? > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Carmen Vitullo [cvitu...@hughes.net] > Sent: Thursday, September 9, 2021 11:35 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: ispf edit macro "HX" line command > > IIRC yes, then followed by an ISREDIT command to issue the line command, > but again without testing and having the time to test I'm not 100% sure > > I made an assumption the OP had an alternate solution. > > Carmen > > > On 9/9/2021 10:12 AM, Seymour J Metz wrote: >>> ISREDIT (CMD) = 'HX' should work -I've not tested >> Doesn't that just set the variable CMD to the VALUE HX? >> >> >> -- >> Shmuel (Seymour J.) Metz >> http://mason.gmu.edu/~smetz3 >> >> >> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of >> Carmen Vitullo [cvitu...@hughes.net] >> Sent: Tuesday, September 7, 2021 10:12 AM >> To: IBM-MAIN@LISTSERV.UA.EDU >> 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 >>> 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 tolists...@listserv.ua.edu 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*/ >>>> >>>> ---
Re: ispf edit macro "HX" line command
my explanation was lost in the post, but before CUT and PASTE were available in ISPF I picked up that rexx from some MVS toolkit, it has some examples of using edit line commands in an edit macro, from that example I have used the line command in other macros when needed. Carmen On 9/9/2021 1:13 PM, Carmen Vitullo wrote: -- /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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
/* REXX ***/ /*** */ /*** ISPF/PDF edit macro to write lines from a file to the user */ /*** PROFILE pool for later inclusion by the PASTE macro. */ /*** */ /*** To run: */ /*** Enter CUT on the COMMAND line and use the C or M line commands */ /*** (in any form) to select the lines to be cut.*/ /*** */ /*** If the M line command is used, the lines will be deleted. */ /*** */ /*** A parameter of R or REPLACE can be specified to replace any */ /*** previously CUT lines (that have not yet been PASTEd) with the */ /*** newly selected lines. Otherwise, the selected lines will be*/ /*** added to any previously CUT lines. */ /*** */ /*** An arbitrary limit of 1000 lines is set in the macro but this */ /*** can be changed by providing a new limit on the macro call. */ /*** For example, to process up to 2000 lines enter CUT 2000 on the */ /*** COMMAND line. Be aware that each line gets stored in your */ /*** PROFILE.*/ /*** */ /**/ Trace Address ISPEXEC 'ISREDIT MACRO (PARM1) NOPROCESS' parm1 = translate(parm1) If parm1 = '?' Then Do Call help Exit End If parm1 ^= ' ' & parm1 ^= 'R' & parm1 ^= 'REPLACE' Then Do If datatype(parm1,w) = 1 & parm1 > 0 Then Do /* set new limit for maximum number of lines cut to profile */ cutlimit = parm1 'VPUT (CUTLIMIT) PROFILE' End Else Do zedsmsg = 'Invalid parameter' msg = 'Use a whole number > 0, ? for help,' zedlmsg = msg 'R or REPLACE to replace previous lines' 'SETMSG MSG(ISRZ001)' Exit 12 End End /* Process line commands, check if C or M was specified */ 'ISREDIT PROCESS RANGE C M' Select When rc = 0 Then Do 'ISREDIT (CMD) = RANGE_CMD' /* Get the command*/ 'ISREDIT (LINE1) = LINENUM .ZFRANGE' /* Get first line in range*/ 'ISREDIT (LINE2) = LINENUM .ZLRANGE' /* Get last line in range */ linestocut = line2 - line1 + 1 End When rc <= 4 Then /* No C or M entered */ Do zedsmsg = 'Enter "C"/"M" line cmd' zedlmsg = 'CUT requires a "C" or "M" line command' 'SETMSG MSG(ISRZ001)' Exit 12 End Otherwise /* Line command conflict - Edit will create message*/ Exit 12 End /* Get the number of lines that have been cut but not pasted,*/ /* initialize to zero if first time. */ 'VGET (CUTCNTMX) PROFILE' If rc ^= 0 Then cutcntmx = 0 /* Get the maximum number of lines to be stored in the profile, */ /* initialize to 1000 if first time. */ 'VGET (CUTLIMIT) PROFILE' If rc ^= 0 Then Do cutlimit = 1000 'VPUT (CUTLIMIT) PROFILE' End If parm1 = 'R' | parm1 = 'REPLACE' Then Do If linestocut < cutcntmx Then Do /* delete variables that will not be overwritten */ 'VGET (ZENVIR) SHARED' Do i = 1 to cutcntmx by 1 'VERASE (CL'i') PROFILE' End End cutcntmx = 0 End cutcntmxsave = cutcntmx /* Check to see if the limit will be exceeded by storing the lines */ /* into the profile. */ count = cutcntmx + linestocut If count > cutlimit Then Do zedsmsg = '> 'cutlimit 'lines to cut' zedlmsg = 'Reduce the range or change limit with CUT 'count 'SETMSG MSG(ISRZ001)' Exit 12 End /* cut the lines to the profile */ cutcnt = cutcntmx Do i = line1 to line2 cutcnt = cutcnt + 1 'ISREDIT (CL'cutcnt') = LINE' i Interpret "CL"cutcnt"= Strip(CL"cutcnt",'T')" 'VPUT (CL'cutcnt') PROFILE' End /* Put the number of lines cut into the profile for use by PASTE */ 'VPUT (CUTCNT) PROFILE' /* If the number of lines cut this time is greater than the maximum */ /* cut, then save the new maximum. PASTE will set this variable to */ /* zero if it deletes the variables. */ If cutcnt > cutcntmx Then Do cutcntmx = cutcnt 'VPUT (CUTCNTMX) PROFILE' End If cmd = 'M' Then Do 'ISREDIT DELETE 'line1 line2 If cutcntmxsave = 0 Then Do zedsmsg = linestocut 'lines cut and deleted' msg = 'lines were cut and deleted from the current file' zedlmsg = linestocut msg End
Re: ispf edit macro "HX" line command
I'll have to believe you didn't find it, but I've used edit line commands in macros, like insert, repeat,copy, delete, and assign a label to a line, range(s) if I made an assumption HX is valid then that was a bad assumption Carmen On 9/9/2021 12:49 PM, Seymour J Metz wrote: I checked Edit assignment statements" and "Chapter 11. Edit macro commands and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, SC19-3621-40, and couldn't find any way for an edit macro to issue a line command. What did you do with the variable CMD to treat its value as a line command? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 11:35 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command IIRC yes, then followed by an ISREDIT command to issue the line command, but again without testing and having the time to test I'm not 100% sure I made an assumption the OP had an alternate solution. Carmen On 9/9/2021 10:12 AM, Seymour J Metz wrote: ISREDIT (CMD) = 'HX' should work -I've not tested Doesn't that just set the variable CMD to the VALUE HX? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Tuesday, September 7, 2021 10:12 AM To: IBM-MAIN@LISTSERV.UA.EDU 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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email tolists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN -
Re: ispf edit macro "HX" line command
I checked Edit assignment statements" and "Chapter 11. Edit macro commands and assignment statements" in z/OS 2.4 ISPF Edit and Edit Macros, SC19-3621-40, and couldn't find any way for an edit macro to issue a line command. What did you do with the variable CMD to treat its value as a line command? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Thursday, September 9, 2021 11:35 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command IIRC yes, then followed by an ISREDIT command to issue the line command, but again without testing and having the time to test I'm not 100% sure I made an assumption the OP had an alternate solution. Carmen On 9/9/2021 10:12 AM, Seymour J Metz wrote: >> ISREDIT (CMD) = 'HX' should work -I've not tested > Doesn't that just set the variable CMD to the VALUE HX? > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > Carmen Vitullo [cvitu...@hughes.net] > Sent: Tuesday, September 7, 2021 10:12 AM > To: IBM-MAIN@LISTSERV.UA.EDU > 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 >> 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email tolists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -- > For IBM-MAIN subscribe / signoff / archive access instructio
Re: ispf edit macro "HX" line command
IIRC yes, then followed by an ISREDIT command to issue the line command, but again without testing and having the time to test I'm not 100% sure I made an assumption the OP had an alternate solution. Carmen On 9/9/2021 10:12 AM, Seymour J Metz wrote: ISREDIT (CMD) = 'HX' should work -I've not tested Doesn't that just set the variable CMD to the VALUE HX? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Tuesday, September 7, 2021 10:12 AM To: IBM-MAIN@LISTSERV.UA.EDU 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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email tolists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
> ISREDIT (CMD) = 'HX' should work -I've not tested Doesn't that just set the variable CMD to the VALUE HX? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Carmen Vitullo [cvitu...@hughes.net] Sent: Tuesday, September 7, 2021 10:12 AM To: IBM-MAIN@LISTSERV.UA.EDU 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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email tolists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
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 On Behalf Of Carmen Vitullo Sent: Tuesday, September 7, 2021 9:13 AM To: IBM-MAIN@LISTSERV.UA.EDU 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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO >> IBM-MAIN >
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 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 tolists...@listserv.ua.edu 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 tolists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email tolists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
>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 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 to lists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
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 to lists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
ISPF does not have an equivalent to SET PENDING in XEDIT. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Weizman arbel [wwar...@gmail.com] Sent: Thursday, September 2, 2021 7:35 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ispf edit macro "HX" line command hi, there is a way to execute "HX" line command from edit macro ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
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 to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
So I understand it's impossible execute "HX" line command from edit macro I know the way to do it myself in the code -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
you can use the HX command, like a shift ( ) or a I (insert) the result is that one line in HEX format. I don't know what the reasoning is for turning on HEX for one line but it is possible. ISREDIT HX .ZCSR should work, I don't have time to test but the OP can Carmen On 9/2/2021 9:24 AM, Lionel B. Dyck wrote: You can turn HEX ON or OFF in an Edit macro but you can't do it for a specific record. You can do it yourself in your edit macro and insert the hex info as a note or message line below the real record. I cobbled this together - it is a quick/dirty example of an edit command that will add message lines below the request line with the hex values in a vertical format: /* rexx */ 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)' The results of using it with EHEX 3 - I named my test macro ehex 😊 03 'Macro (line)' == 447D889944989857444 == 00D413960D3955DD000 04 '(data) = line' line 05 hex = c2x(data) Hope this helps 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 On Behalf Of Richards, Robert B. (CTR) Sent: Thursday, September 2, 2021 7:50 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command Can you tell us what you are trying to accomplish? That may help us determine if HX is the best way or the use of HEX ON and proceeding to use ISREDIT commands from there. Bob -Original Message- From: IBM Mainframe Discussion List On Behalf Of Weizman arbel Sent: Thursday, September 2, 2021 7:36 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ispf edit macro "HX" line command hi, there is a way to execute "HX" line command from edit macro ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
You can turn HEX ON or OFF in an Edit macro but you can't do it for a specific record. You can do it yourself in your edit macro and insert the hex info as a note or message line below the real record. I cobbled this together - it is a quick/dirty example of an edit command that will add message lines below the request line with the hex values in a vertical format: /* rexx */ 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)' The results of using it with EHEX 3 - I named my test macro ehex 😊 03 'Macro (line)' == 447D889944989857444 == 00D413960D3955DD000 04 '(data) = line' line 05 hex = c2x(data) Hope this helps 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 On Behalf Of Richards, Robert B. (CTR) Sent: Thursday, September 2, 2021 7:50 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ispf edit macro "HX" line command Can you tell us what you are trying to accomplish? That may help us determine if HX is the best way or the use of HEX ON and proceeding to use ISREDIT commands from there. Bob -Original Message- From: IBM Mainframe Discussion List On Behalf Of Weizman arbel Sent: Thursday, September 2, 2021 7:36 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ispf edit macro "HX" line command hi, there is a way to execute "HX" line command from edit macro ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
Can you tell us what you are trying to accomplish? That may help us determine if HX is the best way or the use of HEX ON and proceeding to use ISREDIT commands from there. Bob -Original Message- From: IBM Mainframe Discussion List On Behalf Of Weizman arbel Sent: Thursday, September 2, 2021 7:36 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ispf edit macro "HX" line command hi, there is a way to execute "HX" line command from edit macro ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ispf edit macro "HX" line command
I don't have any example, I've never used the hex line command but I bet if you can use a shift left or right line command you can use the HX line command. after setting your cursor to the required line ISREDIT HX .ZCSR - 'MAY' work Carmen On 9/2/2021 6:35 AM, Weizman arbel wrote: hi, there is a way to execute "HX" line command from edit macro ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ispf edit macro "HX" line command
hi, there is a way to execute "HX" line command from edit macro ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
> When all vendor extensions fail, as a last resort, try the ANSI standard. Which says: 5.3.4 Other_negators A configuration may have a category of characters in source programs called other_negators. Other_negators are determined by the configuration. Only the following characters represent possible characters of this category. The glyphs used to represent them in this document are also shown: – ^ circumflex accent, caret; – ¬ not sign. without specifying the code page. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Sunday, May 30, 2021 1:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression On Sat, 29 May 2021 20:15:17 -0700, Charles Mills wrote: >That's why we get the big bucks. > Ah! EBCDIC belongs top the Full Employment Program for coders! On Sun, 30 May 2021 15:48:01 +, Seymour J Metz wrote: >> That's not cheating; > >Of course it is cheating; it's not a faithful representation of the original >program, and it may even break the code. > When all vendor extensions fail, as a last resort, try the ANSI standard. >> On LISTSERV WWW, 'C2AC'. > >I have no idea where the C2 is coming from; the AC is correct. > https://secure-web.cisco.com/1r8RtNoGC7MN4DzWahrzTCgqvQQWwTaG07pE9-yDSK7DSp1gCnjuJVB3CB_-wI6XkYuF2vMKPereGKi7n1RjDvthXeSrWtF52AlTgv1XaPWlNukYvcUT9i3jMf01xySURS9LVK_tNg5NCbSXZ08gHlNv0srsgOXjbxRblMucAu69SAf_O_4diZPm45oez_opk2AvsVSqEBeFdJC839PpZdkedd2jDBauPiomu8C1NIfR9zx0-ijmZ7-WpiDQS_AWA2YZYoI9RjlJdMqkzORLn7tBR7IPbmJjWvLCsB_msuPx5NyXlrEuhPstdSQxV8bjn9Ax_B2qLF5og-Wqo0it7FnvdxAAX78to4DY9tjoxJYppzXlWf-0WyVzxxqA5cXqh-StEM0lIf2ah2XAZk4DfmtGNrv7siYSx2QkoJd7J6DPPNQ0q1YQYQABHOgxNQNH0/https%3A%2F%2Fwww.utf8-chartable.de%2F > >On Su , 30 May 2021 01:03:04 +, Seymour J Metz wrote: > >>> I tate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when >>> using REXX on a PC, is ¬ 'AA'X or 'AC'X? And, yes, you can cheat and use \ >> It's uncharacteristic that you hold Windows as an exemplar. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
On Sat, 29 May 2021 20:15:17 -0700, Charles Mills wrote: >That's why we get the big bucks. > Ah! EBCDIC belongs top the Full Employment Program for coders! On Sun, 30 May 2021 15:48:01 +, Seymour J Metz wrote: >> That's not cheating; > >Of course it is cheating; it's not a faithful representation of the original >program, and it may even break the code. > When all vendor extensions fail, as a last resort, try the ANSI standard. >> On LISTSERV WWW, 'C2AC'. > >I have no idea where the C2 is coming from; the AC is correct. > https://www.utf8-chartable.de/ > >On Su , 30 May 2021 01:03:04 +, Seymour J Metz wrote: > >>> I tate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when >>> using REXX on a PC, is ¬ 'AA'X or 'AC'X? And, yes, you can cheat and use \ >> It's uncharacteristic that you hold Windows as an exemplar. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
> That's not cheating; Of course it is cheating; it's not a faithful representation of the original program, and it may even break the code. > On LISTSERV WWW, 'C2AC'. I have no idea where the C2 is coming from; the AC is correct. > In Regina Ref.: Try each of AA and AC on both OOREXX and Regina. This insanity inspired me to writ a TRYNOT script: /* Test whether REXX recognizes all of the logical not characters */ Nots = '\' 'aa'x 'ac'x do 3 parse var Nots Not Nots say 'Trying' Not c2x(Not) interpret 'compare = a' Not'= b' say Not 'recognized' end It's a throwaway; otherwise I would have intercepted the error and written my own message. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Saturday, May 29, 2021 11:07 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression On Sun, 30 May 2021 01:03:04 +, Seymour J Metz wrote: >> I hate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when >> using REXX on a PC, is � 'AA'X or 'AC'X? And, yes, you can cheat and use \ > That's not cheating; it's USASCII. Porrtable. >... so you don't have to care which code page and which interpreter, but why >should you have to? And what if you want to download exist REXX code from, >e.g., z/OS, zVM? > In your email I see: Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable ...is =AC... On LISTSERV WWW, 'C2AC'. In Regina Ref.: 2.5.4.1 Negators Some of the above comparisons can be negated by prefixing a negator character. Regina supports the following characters as negators: \ Backslash (ANSI Standard) ^ Caret ~ Tilde ¬ Logical Not Again, 'C2AC'x. And when I paste it into a script I get a syntax error: Error 13 running "/proc/4320/fd/pipe:[9516]", line 1: Invalid character in program Error 13.1: Invalid character in program "('c2'X)" -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
Hi Seann, Thank you! Regards, David On 2021-05-30 06:06, Sean Gleann wrote: David: "...I still would like to know how to display which codepage I am using" I can't see that anyone else has said this, so I might be repeating something... In PCOMM, start up a session, and you should see a menu bar at the top, where one of the options is 'Communication'. Click on that, then 'Configuration', then 'Session Parameters'. The value given in the 'Host Code-page' drop-down is what you're looking for, I think. Regards Sean On Sun, 30 May 2021 at 04:15, Charles Mills wrote: That's why we get the big bucks. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Saturday, May 29, 2021 6:03 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression I hate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when using REXX on a PC, is ¬ 'AA'X or 'AC'X? And, yes, you can cheat and use \ so you don't have to care which code page and which interpreter, but why should you have to? And what if you want to download exist REXX code from, e.g., z/OS, zVM? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
David: "...I still would like to know how to display which codepage I am using" I can't see that anyone else has said this, so I might be repeating something... In PCOMM, start up a session, and you should see a menu bar at the top, where one of the options is 'Communication'. Click on that, then 'Configuration', then 'Session Parameters'. The value given in the 'Host Code-page' drop-down is what you're looking for, I think. Regards Sean On Sun, 30 May 2021 at 04:15, Charles Mills wrote: > That's why we get the big bucks. > > Charles > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Seymour J Metz > Sent: Saturday, May 29, 2021 6:03 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: ISPF Edit Macro Regular Expression > > > I hate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when > using REXX on a PC, is ¬ 'AA'X or 'AC'X? And, yes, you can cheat and use \ > so you don't have to care which code page and which interpreter, but why > should you have to? And what if you want to download exist REXX code from, > e.g., z/OS, zVM? > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
That's why we get the big bucks. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Saturday, May 29, 2021 6:03 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression > I hate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when using REXX on a PC, is ¬ 'AA'X or 'AC'X? And, yes, you can cheat and use \ so you don't have to care which code page and which interpreter, but why should you have to? And what if you want to download exist REXX code from, e.g., z/OS, zVM? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
On Sun, 30 May 2021 01:03:04 +, Seymour J Metz wrote: >> I hate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when >> using REXX on a PC, is � 'AA'X or 'AC'X? And, yes, you can cheat and use \ > That's not cheating; it's USASCII. Porrtable. >... so you don't have to care which code page and which interpreter, but why >should you have to? And what if you want to download exist REXX code from, >e.g., z/OS, zVM? > In your email I see: Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable ...is =AC... On LISTSERV WWW, 'C2AC'. In Regina Ref.: 2.5.4.1 Negators Some of the above comparisons can be negated by prefixing a negator character. Regina supports the following characters as negators: \ Backslash (ANSI Standard) ^ Caret ~ Tilde ¬ Logical Not Again, 'C2AC'x. And when I paste it into a script I get a syntax error: Error 13 running "/proc/4320/fd/pipe:[9516]", line 1: Invalid character in program Error 13.1: Invalid character in program "('c2'X)" -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
tThe bottom half of the screen looks like a hex dump of the inbound data stream (Query Reply) for a Read Partition - Query. The code page is transmitted in binary, not as an EBCDIC character string. '0417'X is 1047 decimal. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Tom Brennan [t...@tombrennansoftware.com] Sent: Saturday, May 29, 2021 1:10 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression Hi Greg, That's probably what I'm thinking of, or maybe in the back of my mind it was something under ISPF written by Doug Nadel. I forgot! But I just tried your program and I see my current code page 1047 showing up as 0417 hex - highlighted at the bottom of this image: http://secure-web.cisco.com/1aq8MAQ0mqu9RGkYOrJk8scEZiaEFfjCb-C8VQUdMPQlP49OoBM2Y8vmQ_IYYCZ3wBiGnZmMXhfuWqeuB5tBygpvGfX73OAM1ZY3kTOTvehwJPP-BCkBbhWBAxPGYWN9sJnQheD6qc2pm1bb9GTuW8x5vrSaoKaa07FuJKVlwLgttBL00_mGHseMubvpJ8qH0b6VzBgrsjiXGYquBN1el5SMS6UjcopIDp33lr9TgILxBwhq6ImJwPImny0YNIvn68p3XrbL6Wf1I3Ey28KO4-IzBnvL_mluzM9mYVHLPODfldoxuonVSpDZwkueiH7GUiKbPTvoMfcDvGunUcH41jTjK0xq9kuvAlP64S-odpGCznwAIh7zTx7HJO1XjW0OLk4VqpiIF3CPt5nPJlwwxXXYYN4PiXQmf8xoMsUZEwgyEw3H06t0ujLA_s8paXWOM/http%3A%2F%2Fwww.mildredbrennan.com%2Fmvs%2Ftermtest.png Tom On 5/28/2021 9:12 PM, Greg Price wrote: > > Tom, > Might that have been TERMTEST from CBT file 134/135 ? > Cheers, > Greg > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
> I hate EBCDIC issue, it's a multiple code page set issue!. Pop quiz: when > using REXX on a PC, is ¬ 'AA'X or 'AC'X? And, yes, you can cheat and use \ > so you don't have to care which code page and which interpreter, but why > should you have to? And what if you want to download exist REXX code from, > e.g., z/OS, zVM? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu] Sent: Friday, May 28, 2021 7:50 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression (This thread would better go on ISPF-L.) On Fri, 28 May 2021 13:27:23 -0400, David Spiegel wrote: > >I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular >Expression. >... >I turned HEX ON so that my square brackets can be displayed. (I used >x'AD' and x'BD'). > This sucks! Metacharacters in macros are interpreted according to the CCSID of the attached terminal; 1047 if in background. It implies that the author of a macro must publish a variant for each supported terminal type and thee user must adjust SYSEXEC for the terminal in use. Does any IBM representative care to defend this design? Better there should be a PRAGMA CCSID command to specify the interpretation of metacharacters. Better still, the macro should be loaded from zFS tagged with CCSID. Even 1208. I hate EBCDIC! -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
Nice! I like the SYMSET character map too. For me, hex is no problem - I still have a couple of Casio CM-100 calculators from the 1980's, which are far above any others I used in ease of use. http://edspi31415.blogspot.com/2017/02/retro-review-casio-cm-100-computer-math.html On 5/29/2021 6:56 AM, Greg Price wrote: On 5/28/2021 10:10 PM, Tom Brennan wrote: I see my current code page 1047 showing up as 0417 hex - highlighted at the bottom of this image: http://www.mildredbrennan.com/mvs/termtest.png Right... Well done to spot it there! SYMSET0 should break that out (still in hex sorry to say) on the second screen line so it's a bit clearer to see. I get CGCSGID=02B9-0417 for SYMSET0 and CGCSGID=03C3-0136 for SYMSET1 which is the APL or graphic character set. Greg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
On 5/28/2021 10:10 PM, Tom Brennan wrote: I see my current code page 1047 showing up as 0417 hex - highlighted at the bottom of this image: http://www.mildredbrennan.com/mvs/termtest.png Right... Well done to spot it there! SYMSET0 should break that out (still in hex sorry to say) on the second screen line so it's a bit clearer to see. I get CGCSGID=02B9-0417 for SYMSET0 and CGCSGID=03C3-0136 for SYMSET1 which is the APL or graphic character set. Greg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
Hi Greg, That's probably what I'm thinking of, or maybe in the back of my mind it was something under ISPF written by Doug Nadel. I forgot! But I just tried your program and I see my current code page 1047 showing up as 0417 hex - highlighted at the bottom of this image: http://www.mildredbrennan.com/mvs/termtest.png Tom On 5/28/2021 9:12 PM, Greg Price wrote: Tom, Might that have been TERMTEST from CBT file 134/135 ? Cheers, Greg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
On 29/05/2021 7:30 am, Tom Brennan wrote: But years ago I remember a bit of free code that displayed many more terminal characteristics. I'm not talking ISPF terminal types (I'd recommend using type 3 with PCOMM, some others tell ISPF to sends graphic characters to the screen). I'm talking about things like screen x/y size, color options, whether it can do underlining, character sets, etc. Tom, Might that have been TERMTEST from CBT file 134/135 ? Cheers, Greg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
(This thread would better go on ISPF-L.) On Fri, 28 May 2021 13:27:23 -0400, David Spiegel wrote: > >I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular >Expression. >... >I turned HEX ON so that my square brackets can be displayed. (I used >x'AD' and x'BD'). > This sucks! Metacharacters in macros are interpreted according to the CCSID of the attached terminal; 1047 if in background. It implies that the author of a macro must publish a variant for each supported terminal type and thee user must adjust SYSEXEC for the terminal in use. Does any IBM representative care to defend this design? Better there should be a PRAGMA CCSID command to specify the interpretation of metacharacters. Better still, the macro should be loaded from zFS tagged with CCSID. Even 1208. I hate EBCDIC! -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
In addition to what you can get from TSO and ISPF, you can use TPG to write a WSF datastream. Read Partition - Query will give you the basics. Of course, that's overkill if all you want is the screen geometry. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of Tom Brennan Sent: Friday, May 28, 2021 5:30 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression There is a variable. I found this old panel of mine: ** * Top of Data * 01 )BODY 02 %CCSID is &ztermcid 03 )END ** Bottom of Data *** But years ago I remember a bit of free code that displayed many more terminal characteristics. I'm not talking ISPF terminal types (I'd recommend using type 3 with PCOMM, some others tell ISPF to sends graphic characters to the screen). I'm talking about things like screen x/y size, color options, whether it can do underlining, character sets, etc. Somebody wrote such a thing and I just forgot who/where/what. And that code may have worked outside of ISPF, since any program doing TPUT/TGET can ask the terminal for its characteristics and dump them out to the screen or whatever. On 5/28/2021 11:57 AM, Seymour J Metz wrote: > There's probably a dialog variable for it, but I don't recall. Meanwhile, > what happens with teminal type 4 and 6? > > If you manually start ISPF from the READY prompt, you can specify a codepage > on ISPSTART. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > David Spiegel [dspiegel...@hotmail.com] > Sent: Friday, May 28, 2021 2:01 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: ISPF Edit Macro Regular Expression > > Hi R'Shmuel AMV"SH, > I am using PCOMM. > How do I display the Code Page? > > ISPF Option 0: > Log/List Function keys Colors Environ Workstation Identifier Help > ss > ISPF Settings > Command ===> > > Options Print Graphics > Enter "/" to select optionFamily printer type 2 >Command line at bottom Device name . . . . > / Panel display CUA mode Aspect ratio . . . 0 > / Long message in pop-up > / Tab to action bar choices >Tab to point-and-shoot fields General > / Restore TEST/TRACE options Input field pad . . B >Session Manager mode Command delimiter . ; > / Jump from leader dots >Edit PRINTDS Command > / Always show split line >Enable EURO sign > > Member list options > Enter "/" to select option > / Scroll member list >Allow empty member list >Allow empty member list (nomatch) > / Empty member list for edit only > > Terminal Characteristics > Screen format 3 1. Data2. Std 3. Max 4. Part > > Terminal Type 31. 3277 2. 3277A 3. 3278 4. 3278A > 5. 3290A 6. 3278T 7. 3278CF 8. 3277KN > 9. 3278KN10. 3278AR11. 3278CY 12. 3278HN > 13. 3278HO14. 3278IS15. 3278L2 16. BE163 > 17. BE190 18. 3278TH19. 3278CU 20. DEU78 > 21. DEU78A22. DEU78T23. DEU90A 24. SW116 > 25. SW131 26. SW500 27. 3278GR 28. 3278L1 > 29. OTHER > > > Regards, > David > > On 2021-05-28 13:49, Seymour J Metz wrote: >> What code pages are you using and what does ISPF show under option 0? >> >> https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSZJDU_6.2.0%2Fcom.ibm.itnetviewforzos.doc_6.2%2Fdqd_custocbe_codepage.htm&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=XMqut0VkUqEx3ZZ%2BZv0x6JhS66IclZN1N7uwhaLo928%3D&reserved=0 >> "In codepage 037, the left bracket character [ is X'BA', the right bracket >> character ] is X'BB'. However, in code pages 1047 and 939, the left bracket >> character [ is X'AD', the right bracket character ] is X'BD'." >> >> >> >> -- >>
Re: ISPF Edit Macro Regular Expression
There is a variable. I found this old panel of mine: ** * Top of Data * 01 )BODY 02 %CCSID is &ztermcid 03 )END ** Bottom of Data *** But years ago I remember a bit of free code that displayed many more terminal characteristics. I'm not talking ISPF terminal types (I'd recommend using type 3 with PCOMM, some others tell ISPF to sends graphic characters to the screen). I'm talking about things like screen x/y size, color options, whether it can do underlining, character sets, etc. Somebody wrote such a thing and I just forgot who/where/what. And that code may have worked outside of ISPF, since any program doing TPUT/TGET can ask the terminal for its characteristics and dump them out to the screen or whatever. On 5/28/2021 11:57 AM, Seymour J Metz wrote: There's probably a dialog variable for it, but I don't recall. Meanwhile, what happens with teminal type 4 and 6? If you manually start ISPF from the READY prompt, you can specify a codepage on ISPSTART. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 2:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression Hi R'Shmuel AMV"SH, I am using PCOMM. How do I display the Code Page? ISPF Option 0: Log/List Function keys Colors Environ Workstation Identifier Help ss ISPF Settings Command ===> Options Print Graphics Enter "/" to select optionFamily printer type 2 Command line at bottom Device name . . . . / Panel display CUA mode Aspect ratio . . . 0 / Long message in pop-up / Tab to action bar choices Tab to point-and-shoot fields General / Restore TEST/TRACE options Input field pad . . B Session Manager mode Command delimiter . ; / Jump from leader dots Edit PRINTDS Command / Always show split line Enable EURO sign Member list options Enter "/" to select option / Scroll member list Allow empty member list Allow empty member list (nomatch) / Empty member list for edit only Terminal Characteristics Screen format 3 1. Data2. Std 3. Max 4. Part Terminal Type 31. 3277 2. 3277A 3. 3278 4. 3278A 5. 3290A 6. 3278T 7. 3278CF 8. 3277KN 9. 3278KN10. 3278AR11. 3278CY 12. 3278HN 13. 3278HO14. 3278IS15. 3278L2 16. BE163 17. BE190 18. 3278TH19. 3278CU 20. DEU78 21. DEU78A22. DEU78T23. DEU90A 24. SW116 25. SW131 26. SW500 27. 3278GR 28. 3278L1 29. OTHER Regards, David On 2021-05-28 13:49, Seymour J Metz wrote: What code pages are you using and what does ISPF show under option 0? https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSZJDU_6.2.0%2Fcom.ibm.itnetviewforzos.doc_6.2%2Fdqd_custocbe_codepage.htm&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=XMqut0VkUqEx3ZZ%2BZv0x6JhS66IclZN1N7uwhaLo928%3D&reserved=0 "In codepage 037, the left bracket character [ is X'BA', the right bracket character ] is X'BB'. However, in code pages 1047 and 939, the left bracket character [ is X'AD', the right bracket character ] is X'BD'." -- Shmuel (Seymour J.) Metz https://na01.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=3qlObBaE0LnaMhGs57%2BI3aqdvUv5Qdo0SkdZIXw8qtI%3D&reserved=0 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 1:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF Edit Macro Regular Expression Hi, I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular Expression. I'm getting a ISRE997 on this line: "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 7CEDCCCE4CCDC4D7ACDDD
Re: ISPF Edit Macro Regular Expression
4 and 6 look weird. On 2021-05-28 14:57, Seymour J Metz wrote: There's probably a dialog variable for it, but I don't recall. Meanwhile, what happens with teminal type 4 and 6? If you manually start ISPF from the READY prompt, you can specify a codepage on ISPSTART. -- Shmuel (Seymour J.) Metz https://na01.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3&data=04%7C01%7C%7C2425f20fbce34c88a69b08d9220a7b7e%7C84df9e7fe9f640afb435%7C1%7C0%7C637578250693252217%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=o%2FHWj%2BqGcjkPjDJ9SDk6qnlIW5B4jO5ojPHXZbUE8V4%3D&reserved=0 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 2:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression Hi R'Shmuel AMV"SH, I am using PCOMM. How do I display the Code Page? ISPF Option 0: Log/List Function keys Colors Environ Workstation Identifier Help ss ISPF Settings Command ===> Options Print Graphics Enter "/" to select optionFamily printer type 2 Command line at bottom Device name . . . . / Panel display CUA mode Aspect ratio . . . 0 / Long message in pop-up / Tab to action bar choices Tab to point-and-shoot fields General / Restore TEST/TRACE options Input field pad . . B Session Manager mode Command delimiter . ; / Jump from leader dots Edit PRINTDS Command / Always show split line Enable EURO sign Member list options Enter "/" to select option / Scroll member list Allow empty member list Allow empty member list (nomatch) / Empty member list for edit only Terminal Characteristics Screen format 3 1. Data2. Std 3. Max 4. Part Terminal Type 31. 3277 2. 3277A 3. 3278 4. 3278A 5. 3290A 6. 3278T 7. 3278CF 8. 3277KN 9. 3278KN10. 3278AR11. 3278CY 12. 3278HN 13. 3278HO14. 3278IS15. 3278L2 16. BE163 17. BE190 18. 3278TH19. 3278CU 20. DEU78 21. DEU78A22. DEU78T23. DEU90A 24. SW116 25. SW131 26. SW500 27. 3278GR 28. 3278L1 29. OTHER Regards, David On 2021-05-28 13:49, Seymour J Metz wrote: What code pages are you using and what does ISPF show under option 0? https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSZJDU_6.2.0%2Fcom.ibm.itnetviewforzos.doc_6.2%2Fdqd_custocbe_codepage.htm&data=04%7C01%7C%7C2425f20fbce34c88a69b08d9220a7b7e%7C84df9e7fe9f640afb435%7C1%7C0%7C637578250693252217%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=nF5yi9%2FkJHnG68RRv4eyYtoxp4Kl902gjnZqt726L4s%3D&reserved=0 "In codepage 037, the left bracket character [ is X'BA', the right bracket character ] is X'BB'. However, in code pages 1047 and 939, the left bracket character [ is X'AD', the right bracket character ] is X'BD'." -- Shmuel (Seymour J.) Metz https://na01.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3&data=04%7C01%7C%7C2425f20fbce34c88a69b08d9220a7b7e%7C84df9e7fe9f640afb435%7C1%7C0%7C637578250693252217%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=o%2FHWj%2BqGcjkPjDJ9SDk6qnlIW5B4jO5ojPHXZbUE8V4%3D&reserved=0 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 1:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF Edit Macro Regular Expression Hi, I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular Expression. I'm getting a ISRE997 on this line: "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 7CEDCCCE4CCDC4D7ACD775B774F444 F92954930695409DD12345678912345678923456789CBBDDF03000 I turned HEX ON so that my square brackets can be displayed. (I used x'AD' and x'BD'). I am trying to find the next JCL Statement with a valid label (i.e. an Alphabetic or National Character in Column 3). Ideally I would like to start my search at column 1 and FIND // followed Alphabetic/National in Column 3), Please help. Thanks and regards, David ---
Re: ISPF Edit Macro Regular Expression
There's probably a dialog variable for it, but I don't recall. Meanwhile, what happens with teminal type 4 and 6? If you manually start ISPF from the READY prompt, you can specify a codepage on ISPSTART. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 2:01 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF Edit Macro Regular Expression Hi R'Shmuel AMV"SH, I am using PCOMM. How do I display the Code Page? ISPF Option 0: Log/List Function keys Colors Environ Workstation Identifier Help ss ISPF Settings Command ===> Options Print Graphics Enter "/" to select optionFamily printer type 2 Command line at bottom Device name . . . . / Panel display CUA mode Aspect ratio . . . 0 / Long message in pop-up / Tab to action bar choices Tab to point-and-shoot fields General / Restore TEST/TRACE options Input field pad . . B Session Manager mode Command delimiter . ; / Jump from leader dots Edit PRINTDS Command / Always show split line Enable EURO sign Member list options Enter "/" to select option / Scroll member list Allow empty member list Allow empty member list (nomatch) / Empty member list for edit only Terminal Characteristics Screen format 3 1. Data2. Std 3. Max 4. Part Terminal Type 31. 3277 2. 3277A 3. 3278 4. 3278A 5. 3290A 6. 3278T 7. 3278CF 8. 3277KN 9. 3278KN10. 3278AR11. 3278CY 12. 3278HN 13. 3278HO14. 3278IS15. 3278L2 16. BE163 17. BE190 18. 3278TH19. 3278CU 20. DEU78 21. DEU78A22. DEU78T23. DEU90A 24. SW116 25. SW131 26. SW500 27. 3278GR 28. 3278L1 29. OTHER Regards, David On 2021-05-28 13:49, Seymour J Metz wrote: > What code pages are you using and what does ISPF show under option 0? > > https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSZJDU_6.2.0%2Fcom.ibm.itnetviewforzos.doc_6.2%2Fdqd_custocbe_codepage.htm&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=XMqut0VkUqEx3ZZ%2BZv0x6JhS66IclZN1N7uwhaLo928%3D&reserved=0 > "In codepage 037, the left bracket character [ is X'BA', the right bracket > character ] is X'BB'. However, in code pages 1047 and 939, the left bracket > character [ is X'AD', the right bracket character ] is X'BD'." > > > > -- > Shmuel (Seymour J.) Metz > https://na01.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=3qlObBaE0LnaMhGs57%2BI3aqdvUv5Qdo0SkdZIXw8qtI%3D&reserved=0 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of > David Spiegel [dspiegel...@hotmail.com] > Sent: Friday, May 28, 2021 1:27 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: ISPF Edit Macro Regular Expression > > Hi, > I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular > Expression. > I'm getting a ISRE997 on this line: > "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 > 7CEDCCCE4CCDC4D7ACD775B774F444 > F92954930695409DD12345678912345678923456789CBBDDF03000 > > I turned HEX ON so that my square brackets can be displayed. (I used > x'AD' and x'BD'). > I am trying to find the next JCL Statement with a valid label (i.e. an > Alphabetic or National Character in Column 3). > Ideally I would like to start my search at column 1 and FIND // > followed Alphabetic/National in Column 3), > > Please help. > > Thanks and regards, > David > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -
Re: ISPF Edit Macro Regular Expression
Hi R'Shmuel AMV"SH. I changed the brackets to x'BA' and x'BB'. Now, it works. Thank you! I still would like to know how to display which codepage I am using. Any ideas? Thanks and regards, David On 2021-05-28 13:49, Seymour J Metz wrote: What code pages are you using and what does ISPF show under option 0? https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSZJDU_6.2.0%2Fcom.ibm.itnetviewforzos.doc_6.2%2Fdqd_custocbe_codepage.htm&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=XMqut0VkUqEx3ZZ%2BZv0x6JhS66IclZN1N7uwhaLo928%3D&reserved=0 "In codepage 037, the left bracket character [ is X'BA', the right bracket character ] is X'BB'. However, in code pages 1047 and 939, the left bracket character [ is X'AD', the right bracket character ] is X'BD'." -- Shmuel (Seymour J.) Metz https://na01.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=3qlObBaE0LnaMhGs57%2BI3aqdvUv5Qdo0SkdZIXw8qtI%3D&reserved=0 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 1:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF Edit Macro Regular Expression Hi, I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular Expression. I'm getting a ISRE997 on this line: "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 7CEDCCCE4CCDC4D7ACD775B774F444 F92954930695409DD12345678912345678923456789CBBDDF03000 I turned HEX ON so that my square brackets can be displayed. (I used x'AD' and x'BD'). I am trying to find the next JCL Statement with a valid label (i.e. an Alphabetic or National Character in Column 3). Ideally I would like to start my search at column 1 and FIND // followed Alphabetic/National in Column 3), Please help. Thanks and regards, David -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
Hi R'Shmuel AMV"SH, I am using PCOMM. How do I display the Code Page? ISPF Option 0: Log/List Function keys Colors Environ Workstation Identifier Help ss ISPF Settings Command ===> Options Print Graphics Enter "/" to select option Family printer type 2 Command line at bottom Device name . . . . / Panel display CUA mode Aspect ratio . . . 0 / Long message in pop-up / Tab to action bar choices Tab to point-and-shoot fields General / Restore TEST/TRACE options Input field pad . . B Session Manager mode Command delimiter . ; / Jump from leader dots Edit PRINTDS Command / Always show split line Enable EURO sign Member list options Enter "/" to select option / Scroll member list Allow empty member list Allow empty member list (nomatch) / Empty member list for edit only Terminal Characteristics Screen format 3 1. Data 2. Std 3. Max 4. Part Terminal Type 3 1. 3277 2. 3277A 3. 3278 4. 3278A 5. 3290A 6. 3278T 7. 3278CF 8. 3277KN 9. 3278KN 10. 3278AR 11. 3278CY 12. 3278HN 13. 3278HO 14. 3278IS 15. 3278L2 16. BE163 17. BE190 18. 3278TH 19. 3278CU 20. DEU78 21. DEU78A 22. DEU78T 23. DEU90A 24. SW116 25. SW131 26. SW500 27. 3278GR 28. 3278L1 29. OTHER Regards, David On 2021-05-28 13:49, Seymour J Metz wrote: What code pages are you using and what does ISPF show under option 0? https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSZJDU_6.2.0%2Fcom.ibm.itnetviewforzos.doc_6.2%2Fdqd_custocbe_codepage.htm&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=XMqut0VkUqEx3ZZ%2BZv0x6JhS66IclZN1N7uwhaLo928%3D&reserved=0 "In codepage 037, the left bracket character [ is X'BA', the right bracket character ] is X'BB'. However, in code pages 1047 and 939, the left bracket character [ is X'AD', the right bracket character ] is X'BD'." -- Shmuel (Seymour J.) Metz https://na01.safelinks.protection.outlook.com/?url=http:%2F%2Fmason.gmu.edu%2F~smetz3&data=04%7C01%7C%7C2e49d42adc9d43b5f8de08d922010990%7C84df9e7fe9f640afb435%7C1%7C0%7C637578210126552575%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=3qlObBaE0LnaMhGs57%2BI3aqdvUv5Qdo0SkdZIXw8qtI%3D&reserved=0 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 1:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF Edit Macro Regular Expression Hi, I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular Expression. I'm getting a ISRE997 on this line: "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 7CEDCCCE4CCDC4D7ACD775B774F444 F92954930695409DD12345678912345678923456789CBBDDF03000 I turned HEX ON so that my square brackets can be displayed. (I used x'AD' and x'BD'). I am trying to find the next JCL Statement with a valid label (i.e. an Alphabetic or National Character in Column 3). Ideally I would like to start my search at column 1 and FIND // followed Alphabetic/National in Column 3), Please help. Thanks and regards, David -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Edit Macro Regular Expression
What code pages are you using and what does ISPF show under option 0? https://www.ibm.com/support/knowledgecenter/en/SSZJDU_6.2.0/com.ibm.itnetviewforzos.doc_6.2/dqd_custocbe_codepage.htm "In codepage 037, the left bracket character [ is X'BA', the right bracket character ] is X'BB'. However, in code pages 1047 and 939, the left bracket character [ is X'AD', the right bracket character ] is X'BD'." -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of David Spiegel [dspiegel...@hotmail.com] Sent: Friday, May 28, 2021 1:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF Edit Macro Regular Expression Hi, I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular Expression. I'm getting a ISRE997 on this line: "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 7CEDCCCE4CCDC4D7ACD775B774F444 F92954930695409DD12345678912345678923456789CBBDDF03000 I turned HEX ON so that my square brackets can be displayed. (I used x'AD' and x'BD'). I am trying to find the next JCL Statement with a valid label (i.e. an Alphabetic or National Character in Column 3). Ideally I would like to start my search at column 1 and FIND // followed Alphabetic/National in Column 3), Please help. Thanks and regards, David -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ISPF Edit Macro Regular Expression
Hi, I'm trying to write a Rexx ISPF Edit Macro which contains a FIND Regular Expression. I'm getting a ISRE997 on this line: "ISREDIT FIND R'ÝABCDEFGHIJKLMNOPQRSTUVWXYZ@#$¨'" 3 7CEDCCCE4CCDC4D7ACD775B774F444 F92954930695409DD12345678912345678923456789CBBDDF03000 I turned HEX ON so that my square brackets can be displayed. (I used x'AD' and x'BD'). I am trying to find the next JCL Statement with a valid label (i.e. an Alphabetic or National Character in Column 3). Ideally I would like to start my search at column 1 and FIND // followed Alphabetic/National in Column 3), Please help. Thanks and regards, David -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro behaivor in SDSF
Thanks Rob, the top of my rexx is basically the same as your test and seemed to behave the same as mine. But your suggestion prodded me in the right direction to an explanation of whats going on. What I discovered, is in the PFKey settings used in SDSF EDIT, 'ISF Keylist ISFEDKEY' I had the PFkeys set to: PF22 . . ;CA E PF23 . . ;CA V Once I removed the ';' from the beginning of the command all is well and working correctly. I thought at one time, the prefix ';' was needed on a pfkey to simulate the command preserving the cursor position, but apparently that isn't needed any more. Seems like it was initially needed for the QW clist to allow point and shoot at message numbers. Further, I don't find any reference to the prefix ';' in ISPF User's Guide Vol II. The only special characters shown there are ':' and '>'.Could this have changed sometime in the last (cough cough) years? Dana On Fri, 29 Mar 2019 14:07:12 +, Rob Scott wrote: > >I would double-check your REXX exec code - perhaps paste to the forum? > >"SE" and "SJ" use ISPF "EDIF" services - pretty much all SDSF does is supply >the data for the "get first/next" record request from EDIF. > >I have just executed the following simple REXX EDIT macro in SDSF SJ and SE in >2.2 and 2.3 and the results were as expected: > >address ISREDIT "MACRO" >address ISREDIT "(CURROW CURCOL) = CURSOR " >address ISREDIT "(CURLINE) = LINE "CURROW >say currow >say curline > > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro behaivor in SDSF
Dana I would double-check your REXX exec code - perhaps paste to the forum? "SE" and "SJ" use ISPF "EDIF" services - pretty much all SDSF does is supply the data for the "get first/next" record request from EDIF. I have just executed the following simple REXX EDIT macro in SDSF SJ and SE in 2.2 and 2.3 and the results were as expected: address ISREDIT "MACRO" address ISREDIT "(CURROW CURCOL) = CURSOR " address ISREDIT "(CURLINE) = LINE "CURROW say currow say curline Rob Scott Rocket Software. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Dana Mitchell Sent: Friday, March 29, 2019 1:15 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF edit macro behaivor in SDSF I have an edit macro that I've used in one form or another for many years, it's my version of the point and shoot edit. Place the cursor on a dataset name in a jcl member for instance, hit the PFK set to ';CA' and you are taken to edit of that dataset. It discerns the dataset name by doing a ISREDIT "(lne,col) = CURSOR" and parsing out the dataset name you are pointing at. I'm not sure when I first noticed it, but it appears to not operate correctly in SDSF (z/OS 2.2 currently) edit of JCL or output from the SJ or SE line command. The row and column returned are of the first non-blank character of the next line, someone pressed enter before invoking the macro, which usually with a JCL listing, just happens to be a '/' so you end up with a 'z/OS UNIX Directory List' of the root. I don't find any mention of any restrictions on edit macros in the SDSF FM. Anybody else tried this? is it pmr time? Dana -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ Main Office Toll Free Number: +1 855.577.4323 Contact Customer Support: https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - http://www.rocketsoftware.com/manage-your-email-preferences Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy This communication and any attachments may contain confidential information of Rocket Software, Inc. All unauthorized use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify Rocket Software immediately and destroy all copies of this communication. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ISPF edit macro behaivor in SDSF
I have an edit macro that I've used in one form or another for many years, it's my version of the point and shoot edit. Place the cursor on a dataset name in a jcl member for instance, hit the PFK set to ';CA' and you are taken to edit of that dataset. It discerns the dataset name by doing a ISREDIT "(lne,col) = CURSOR" and parsing out the dataset name you are pointing at. I'm not sure when I first noticed it, but it appears to not operate correctly in SDSF (z/OS 2.2 currently) edit of JCL or output from the SJ or SE line command. The row and column returned are of the first non-blank character of the next line, someone pressed enter before invoking the macro, which usually with a JCL listing, just happens to be a '/' so you end up with a 'z/OS UNIX Directory List' of the root. I don't find any mention of any restrictions on edit macros in the SDSF FM. Anybody else tried this? is it pmr time? Dana -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro API
Paul Gilmartin wrote: >I doubt this has changed (Bitsavers?) since the advent of Rexx in TSO/E r2, >MVS/XA. Ok. REXX, TSO and CLIST (and JCL!) are more or less "functionally stabilized". >>Thanks Paul for this pointer. >Jy is welkom. Groot Plesier! ;-) (Ok, for those poor guys who don't understand Afrikaans, he said 'You are welcome' and I replied 'Big pleasure!') >And proper setting of initial environment would facilitate a technique I use >otherwise in cosmopolitan EXECs: >if address()=='ISREDIT' >then 'MACRO (X)' >else parse arg X Good programming method. I wish every vendor does the same technique in their own software. I also do more or less the same especially if someone runs a Clist or REXX program, but it requires panels, so I check for the environment and then stop run if it was run in batch for example. Same goes for authorization and parameters received. Check, check and check everything and then let it continue to run. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro API
On Thu, 20 Apr 2017 08:45:34 -0500, Elardus Engelbrecht wrote: > ... >You mentioned REXX Reference on 2.2, but I am currently on 1.13 (yes, I know, >shh) and 2.1, not on 2.2 sofar... > I doubt this has changed (Bitsavers?) since the advent of Rexx in TSO/E r2, MVS/XA. >Thanks Paul for this pointer. > Jy is welkom. And proper setting of initial environment would facilitate a technique I use otherwise in cosmopolitan EXECs: if address()=='ISREDIT' then 'MACRO (X)' else parse arg X -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
Paul Gilmartin wrote: >>ADDRESS is used to send commands to a specific environment like ISREDIT for >>example. >>AFAIK, REXX interpreter does not know _where_ the program _should be_ running. >EDIT/VIEW need only tell it. The interface exists: >The exec block (EXECBLK) is a control block that describes the exec to be >loaded. ... >TSO/E provides a mapping macro IRXEXECB for the exec block. H, more interesting! I missed that IRXEXECB despite reading the same but older bookie you mentioned. Time for me to brush and polish up my RTFM skills... You mentioned REXX Reference on 2.2, but I am currently on 1.13 (yes, I know, shh) and 2.1, not on 2.2 sofar... Thanks Paul for this pointer. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
On Thu, 20 Apr 2017 07:55:30 -0500, Elardus Engelbrecht wrote: > >>I was afraid of that. How about a wrapper macro: >Interesting. Thanks, I believe it could be really useful to the OP. > Thanks. (But I was wrong the first time.) > >>address ISREDIT /* Why isn't this the default for Macros!? */ > >Good question. > >ADDRESS is used to send commands to a specific environment like ISREDIT for >example. >AFAIK, REXX interpreter does not know _where_ the program _should be_ running. > EDIT/VIEW need only tell it. The interface exists: z/OSIBM TSO/E REXX Reference Version 2 Release 2 SA32-0972-02 The exec block (EXECBLK) is a control block that describes the exec to be loaded. ... TSO/E provides a mapping macro IRXEXECB for the exec block. The mapping macro is in SYS1.MACLIB. Table 18 describes the format of the exec block. ... Field name ... SUBCOM Specifies the name of the initial host command environment when the exec starts running. (I got the idea from the operation of CMS XEDIT which starts macros with XEDIT as the host environment. It seems the ISPF developers at the start of TSO/E r2 had only a poor understanding of Rexx tradition. Who else the idiosyncratic ADDRESS ISREDIT 'MACRO (X)' rather than the conventional PARSE ARG X?) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
Paul Gilmartin wrote: >I was afraid of that. How about a wrapper macro: Interesting. Thanks, I believe it could be really useful to the OP. >address ISREDIT /* Why isn't this the default for Macros!? */ Good question. ADDRESS is used to send commands to a specific environment like ISREDIT for example. AFAIK, REXX interpreter does not know _where_ the program _should be_ running. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro (metareply)
A coupld metareplies on this: On Wed, 19 Apr 2017 21:35:30 +0200, R.S. wrote: > > ...It works OK, but in "attended" mode ... > Subject: should be as meaningful as convenient. How about instead? Subject: ISPF "unattended" edit macro (I've seen worse. As bad as "Subject: Question".) Are ISPF questions better addressed to ISPF-L? (But that's not modal behavior.) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
On Thu, 20 Apr 2017 12:49:26 +0200, R.S. wrote: >W dniu 2017-04-19 o 22:54, Paul Gilmartin pisze: >> [...] >> I believe "ADDRESS ISREDIT END" must appear *** inside nestmac ***. > >That's bad, because I want to call existing macros with no changes >inside. Otherwise I would need two flavours of every macro: for >"standalone" use and for "nested" (all members) use. > I was afraid of that. How about a wrapper macro: /* Rexx */ signal on novalue address ISREDIT /* Why isn't this the default for Macros!? */ macro (X) parse var X Target_Macro Target_Args Target_Macro Target_Args /* (Or just X?) */ 'END' /* (But CANCEL if SESSION is VIEW?) */ -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
W dniu 2017-04-19 o 22:54, Paul Gilmartin pisze: [...] I believe "ADDRESS ISREDIT END" must appear *** inside nestmac ***. That's bad, because I want to call existing macros with no changes inside. Otherwise I would need two flavours of every macro: for "standalone" use and for "nested" (all members) use. Regards -- Radoslaw Skorupka Lodz, Poland == -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696 złotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
On Wed, 19 Apr 2017 22:08:01 +0200, R.S. wrote: >No, I don't. Actually I don't know how to do it properly. >My rexx code (taken from RTFM): > >'ISREDIT MACRO (NESTMAC)' >'ISREDIT (DATA1) = DATAID' >'ISREDIT (CURMEM) = MEMBER' >Address ispexec 'LMOPEN DATAID('data1') OPTION(INPUT)' >member = ' ' >lmrc = 0 > >Do While lmrc = 0 > Address ispexec 'LMMLIST DATAID('data1') OPTION(LIST), > MEMBER(MEMBER) STATS(NO)' > lmrc = rc > If lmrc = 0 & member ^= curmem Then >do > Address ispexec 'EDIT DATAID('data1') MEMBER('member') >MACRO('nestmac')' > /* something HERE??? */ I believe "ADDRESS ISREDIT END" must appear *** inside nestmac ***. >end >End >/*/ >Address ispexec 'LMMLIST DATAID('data1') OPTION(FREE)' >Address ispexec 'LMCLOSE DATAID('data1')' >Exit 0 -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
I have some code that does this. I'll post it later when I get to the office. (It's 6 AM here)... On Thu, Apr 20, 2017 at 5:35 AM, R.S. wrote: > I have an edit macro for issuing another macro against all member is a > given library. > It works OK, but in "attended" mode - every change has to be confirmed by > issuing PF3 (or PF12 if you don't want changes in a given member). > > I'm looking for something more automated - a macro, which issues another > edit macro against all the members, but running unattended. I'm pretty sure > someone already invented this wheel. > > Any help? > > > -- > Radoslaw Skorupka > Lodz, Poland > > > > > == > > >-- > Treść tej wiadomości może zawierać informacje prawnie chronione Banku > przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być > jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś > adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej > przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, > rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie > zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, > prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale > usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub > zapisane na dysku. > > This e-mail may contain legally privileged information of the Bank and is > intended solely for business use of the addressee. This e-mail may only be > received by the addressee and may not be disclosed to any third parties. If > you are not the intended addressee of this e-mail or the employee > authorized to forward it to the addressee, be advised that any > dissemination, copying, distribution or any other similar activity is > legally prohibited and may be punishable. If you received this e-mail by > mistake please advise the sender immediately by using the reply facility in > your e-mail software and delete permanently this e-mail including any > copies of it either printed or saved to hard drive. > > mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, > www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy > XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru > przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień > 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi > 168.955.696 złotych. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Wayne V. Bickerdike -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
No, I don't. Actually I don't know how to do it properly. My rexx code (taken from RTFM): 'ISREDIT MACRO (NESTMAC)' 'ISREDIT (DATA1) = DATAID' 'ISREDIT (CURMEM) = MEMBER' Address ispexec 'LMOPEN DATAID('data1') OPTION(INPUT)' member = ' ' lmrc = 0 Do While lmrc = 0 Address ispexec 'LMMLIST DATAID('data1') OPTION(LIST), MEMBER(MEMBER) STATS(NO)' lmrc = rc If lmrc = 0 & member ^= curmem Then do Address ispexec 'EDIT DATAID('data1') MEMBER('member') MACRO('nestmac')' /* something HERE??? */ end End /*/ Address ispexec 'LMMLIST DATAID('data1') OPTION(FREE)' Address ispexec 'LMCLOSE DATAID('data1')' Exit 0 -- Radoslaw Skorupka Lodz, Poland W dniu 2017-04-19 o 21:38, Carmen Vitullo pisze: do you perform an ISREDIT SAVE ISREDIT END ? Carmen - Original Message - From: "R.S." To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, April 19, 2017 2:35:30 PM Subject: ISPF edit macro I have an edit macro for issuing another macro against all member is a given library. It works OK, but in "attended" mode - every change has to be confirmed by issuing PF3 (or PF12 if you don't want changes in a given member). I'm looking for something more automated - a macro, which issues another edit macro against all the members, but running unattended. I'm pretty sure someone already invented this wheel. Any help? == -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696 złotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
Check Mark Zelden's web site for EDMACALL. I believe it does what you want. Mike Myers Mentor Services Corporation On 04/19/2017 03:35 PM, R.S. wrote: I have an edit macro for issuing another macro against all member is a given library. It works OK, but in "attended" mode - every change has to be confirmed by issuing PF3 (or PF12 if you don't want changes in a given member). I'm looking for something more automated - a macro, which issues another edit macro against all the members, but running unattended. I'm pretty sure someone already invented this wheel. Any help? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
In the macro that issues the save issue "ISREDIT AUTOSAVE ON" See ISPF Edit and EDIT Macros for full syntax Dennis Roach, CISSP, PMP AIG IAM Platform Administration | Identity & Access Management 2929 Allen Parkway, America Building, 3rd Floor | Houston, TX 77019 Phone: 713-831-8799 dennis.ro...@aig.com | www.aig.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of R.S. Sent: Wednesday, April 19, 2017 2:36 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF edit macro I have an edit macro for issuing another macro against all member is a given library. It works OK, but in "attended" mode - every change has to be confirmed by issuing PF3 (or PF12 if you don't want changes in a given member). I'm looking for something more automated - a macro, which issues another edit macro against all the members, but running unattended. I'm pretty sure someone already invented this wheel. Any help? -- Radoslaw Skorupka Lodz, Poland == -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696 złotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF edit macro
do you perform an ISREDIT SAVE ISREDIT END ? Carmen - Original Message - From: "R.S." To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, April 19, 2017 2:35:30 PM Subject: ISPF edit macro I have an edit macro for issuing another macro against all member is a given library. It works OK, but in "attended" mode - every change has to be confirmed by issuing PF3 (or PF12 if you don't want changes in a given member). I'm looking for something more automated - a macro, which issues another edit macro against all the members, but running unattended. I'm pretty sure someone already invented this wheel. Any help? -- Radoslaw Skorupka Lodz, Poland == -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696 złotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
ISPF edit macro
I have an edit macro for issuing another macro against all member is a given library. It works OK, but in "attended" mode - every change has to be confirmed by issuing PF3 (or PF12 if you don't want changes in a given member). I'm looking for something more automated - a macro, which issues another edit macro against all the members, but running unattended. I'm pretty sure someone already invented this wheel. Any help? -- Radoslaw Skorupka Lodz, Poland == -- Treść tej wiadomości może zawierać informacje prawnie chronione Banku przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorized to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696 złotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN