CBT Usermod Collection for ISPF (CUCI) V1R7 RELEASED!

2022-04-20 Thread Tom Conley

FYI,

I'm pleased to announce Version 1 Release 7 of the CBT Usermods 
Collection for ISPF (CUCI), available at http://www.cbttape.org.  If you 
want EDIT highlighting for other languages, if you want useful 
modifications to ISPF panels, if you want a way to set default ISPF 
options that are not in the ISPCCONF dialog, then CUCI is for you! V1R7 
contains the following enhancements (both RFE's and the new z Idea 
Portal enhancements are provided in this release) and maintenance items:


Total RFEs delivered to date:  39
Total IBM Ideas delivered to date:  03

ZOS-I-3292 - ISPF Enhanced PANEL Edit Highlighting
ZOS-I-2852 - ISPF Edit highlighting for R
RFE 154404 - ISPF Edit highlighting for R
ZOS-I-2174 - HILITE PLI - End-of-line Comment // support (requires OA62409)
RFE 144625 - HILITE PLI - End-of-line Comment // support (requires OA62409)

- Interrogate ZHIPAREN to determine if parens should be highlighted for 
FLOWASM (requires OA62409)
- Add code to bypass highlighting Top of Data, Bottom of Data, blank 
lines, and MSG, NOTE, etc. lines.

- Eliminate extraneous and unnecessary code for performance.
- Fix JCL errors in $MANHACJ when assembling ISRPXASM.  *** Thanks to 
Lionel Dyck for this update!! ***
- Fix error in ISR@PRIM which caused the USRCCONF keyword file name and 
output file content option not to be saved.
- Alter language for message USRL001 to be more clear and to add R and 
PANELX language support.

- Miscellaneous cleanup of various installation members

This new release adds highlighting support for 2 more languages, 
bringing the total number of supported languages to 20:


ACS (much better than CLIST highlighting)
CARLA
FLOWASM
FORTRAN
GO
JAVA
JAVASCRIPT
JSON
KOTLIN
PANELX (panel highlighting the way it should have been from the beginning)
PERL
PHP
PYTHON
R (the R statistics language, available as a Rocket Ported Tool)
RUBY
SAS (could use some help here, there are thousands more keywords to 
identify)

SHELL
SQL
TYPESCRIPT
XMLASCII (a must if you're working with or customizing z/OSMF workflows)

Ideas and contributions are always welcome, so download CUCI and try it 
out.  Please feel free to contact me if you have any questions or concerns.


--
Regards,
Tom Conley

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Use of zCX

2022-04-20 Thread kekronbekron
Apologies if this seems rash.
Certainly don't mean to belittle people's work; many are restricted with 
choices, procedures, etc.
If it isn't for the cost of being an MF s/w vendor, competent new solutions 
would steal the show.
Much like most of y'all, I want Z to remain king of the hill.

-KB

--- Original Message ---
On Thursday, April 21st, 2022 at 9:06 AM, kekronbekron 
<02dee3fcae33-dmarc-requ...@listserv.ua.edu> wrote:


> As an observer, I reckon IBM are forced to use OpenShift because they've got 
> to get RedHat in there.
> Also, since everyone knows the word Docker now, the Z "has to have it".
> Surely the industry is now waking up to the mess that is the Kubernetes 
> ecoystem mgmt., service MESS.
>
> I do wonder... for those who thought setting up zOSMF RACF was painful, what 
> their journey will be for zCX and OpenShift.
> Just saying, "it's free because zIIP" doesn't make it good.
> No Ferrari owner should be "compelled" to use a unicycle's wheel just because 
> it's free.
>
> IMHO, "Me too" solutions are seriously ruining the reputation of the Z with 
> the ridiculous CPU, memory, storage requirements.
> I thought it was ridiculous that RDz wanted a few gigabytes of memory for the 
> JVM.
> Rebadged oldware, with web stack & interface from early 2010s, are now coming 
> to compete with Chrome, in their lust for memory and such.
>
> - KB
> --- Original Message ---
> On Thursday, April 21st, 2022 at 4:22 AM, Tony Harminc t...@harminc.net wrote:
>
>
>
> > On Wed, 20 Apr 2022 at 18:00, Robert Garrett rob...@garrettfamily.us wrote:
> >
> > [...]
> >
> > > It likes a LOT of real memory and it appears that the running instance 
> > > consumes the full amount of real memory allocated to it for the duration, 
> > > making it unavailable to zOS for paging or any other use. Don't believe 
> > > the claim that it can run in as little
> > > as 2GB. The experimental test instance that I built had 3GB allocated to 
> > > it (the most I could give it on the LPAR I was using) and it took a full 
> > > 15 minutes (yes minutes) by the clock for the address space to initialize 
> > > and reach the point where it was
> > > functional - on every start up. Admittedly, this was on a zOS image that 
> > > was being hosted under zVM at IBM Dallas, so I'm sure that had some 
> > > impact.
> >
> > That smells like three levels of SIE, which to my understanding is
> > never going to perform reasonably.
> >
> > Tony H.
> >
> > --
> > 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: Use of zCX

2022-04-20 Thread David Crayford

On 21/4/22 06:00, Robert Garrett wrote:

I've dabbled with it some, enough to bring up an instance and get a couple of 
containers running under it, a REDIS database instance for example.


I ported Redis to z/OS many years ago. I updated it to v5 a couple of 
years back. I handed it over to our Zowe devs as they were considering 
using it for a caching layer. It's on Github 
https://github.com/lchudinov/redis





It likes a LOT of real memory and it appears that the running instance consumes 
the full amount of real memory allocated to it for the duration, making it 
unavailable to zOS for paging or any other use.   Don't believe the claim that 
it can run in as little as 2GB.  The experimental test instance that I built 
had 3GB allocated to it (the most I could give it on the LPAR I was using) and 
it took a full 15 minutes (yes minutes) by the clock for the address space to 
initialize and reach the point where it was functional - on every start up.   
Admittedly, this was on a zOS image that was being hosted under zVM at IBM 
Dallas, so I'm sure that had some impact.

The tooling for provisioning it leaves a lot to be desired, at least it did a 
year ago when I worked through it all.   Everything about building a zCX 
instance requires using tooling in zOSMF, and the zOSMF server itself requires 
just about every optional service available there is to be configured and 
available.I also found that using the tooling to make configuration changes 
to a previously built but running instance mostly doesn't work.  In my 
experience, I got much better results by instead wiping out the whole image and 
rebuilding it from scratch any time I needed to make a configuration change, 
even a seemingly minor one.

I did write a fairly detailed  'experience' document about everything, but I 
was doing so as part of a project for a client at the time so I'm not free to 
publish or share it without their permission.

Cheers,

Robert Garrett
Garrett Family Enterprises
rob...@garrettfamily.us
IBM Gold Consultant - 2022




-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Matt Hogstrom
Sent: Wednesday, April 20, 2022 2:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Use of zCX

As an ISV are interested in leveraging containers for delivery of services into 
zCX … I’m curious if

1. You have zCX installed, or plan to?
2  If so, are you looking to use IBM’s recently announced OpenShift or another 
orchestrator?

It’s always nice to know if you’re delivering content that there is a healthy 
ecosystem to use it.

If you would like to share but don’t want to on the list you can DM me.

Appreciate your thoughts and insight.

Matt Hogstrom
m...@hogstrom.org


Frodo:  “I wish the ring had never come to me.  I wish none of this had 
happened.”
Gandalf:  “So do all who live to see such things.  But it is not for them to 
decide.  All you have to do is decide what to do with this time that is given 
to you.”


--
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: Use of zCX

2022-04-20 Thread kekronbekron
As an observer, I reckon IBM are forced to use OpenShift because they've got to 
get RedHat in there.
Also, since everyone knows the word Docker now, the Z "has to have it".
Surely the industry is now waking up to the mess that is the Kubernetes 
ecoystem mgmt., service MESS.

I do wonder... for those who thought setting up zOSMF RACF was painful, what 
their journey will be for zCX and OpenShift.
Just saying, "it's free because zIIP" doesn't make it good.
No Ferrari owner should be "compelled" to use a unicycle's wheel just because 
it's free.

IMHO, "Me too" solutions are seriously ruining the reputation of the Z with the 
ridiculous CPU, memory, storage requirements.
I thought it was ridiculous that RDz wanted a few gigabytes of memory for the 
JVM.
Rebadged oldware, with web stack & interface from early 2010s, are now coming 
to compete with Chrome, in their lust for memory and such.

- KB
--- Original Message ---
On Thursday, April 21st, 2022 at 4:22 AM, Tony Harminc  wrote:


> On Wed, 20 Apr 2022 at 18:00, Robert Garrett rob...@garrettfamily.us wrote:
>
> [...]
>
> > It likes a LOT of real memory and it appears that the running instance 
> > consumes the full amount of real memory allocated to it for the duration, 
> > making it unavailable to zOS for paging or any other use. Don't believe the 
> > claim that it can run in as little
> > as 2GB. The experimental test instance that I built had 3GB allocated to it 
> > (the most I could give it on the LPAR I was using) and it took a full 15 
> > minutes (yes minutes) by the clock for the address space to initialize and 
> > reach the point where it was
> > functional - on every start up. Admittedly, this was on a zOS image that 
> > was being hosted under zVM at IBM Dallas, so I'm sure that had some impact.
>
>
> That smells like three levels of SIE, which to my understanding is
> never going to perform reasonably.
>
> Tony H.
>
> --
> 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: Use of zCX

2022-04-20 Thread Tony Harminc
On Wed, 20 Apr 2022 at 18:00, Robert Garrett  wrote:
[...]
> It likes a LOT of real memory and it appears that the running instance 
> consumes the full amount of real memory allocated to it for the duration, 
> making it unavailable to zOS for paging or any other use.   Don't believe the 
> claim that it can run in as little
> as 2GB.  The experimental test instance that I built had 3GB allocated to it 
> (the most I could give it on the LPAR I was using) and it took a full 15 
> minutes (yes minutes) by the clock for the address space to initialize and 
> reach the point where it was
> functional - on every start up.   Admittedly, this was on a zOS image that 
> was being hosted under zVM at IBM Dallas, so I'm sure that had some impact.

That smells like three levels of SIE, which to my understanding is
never going to perform reasonably.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Use of zCX

2022-04-20 Thread Robert Garrett
I've dabbled with it some, enough to bring up an instance and get a couple of 
containers running under it, a REDIS database instance for example.

It likes a LOT of real memory and it appears that the running instance consumes 
the full amount of real memory allocated to it for the duration, making it 
unavailable to zOS for paging or any other use.   Don't believe the claim that 
it can run in as little as 2GB.  The experimental test instance that I built 
had 3GB allocated to it (the most I could give it on the LPAR I was using) and 
it took a full 15 minutes (yes minutes) by the clock for the address space to 
initialize and reach the point where it was functional - on every start up.   
Admittedly, this was on a zOS image that was being hosted under zVM at IBM 
Dallas, so I'm sure that had some impact.

The tooling for provisioning it leaves a lot to be desired, at least it did a 
year ago when I worked through it all.   Everything about building a zCX 
instance requires using tooling in zOSMF, and the zOSMF server itself requires 
just about every optional service available there is to be configured and 
available.I also found that using the tooling to make configuration changes 
to a previously built but running instance mostly doesn't work.  In my 
experience, I got much better results by instead wiping out the whole image and 
rebuilding it from scratch any time I needed to make a configuration change, 
even a seemingly minor one. 

I did write a fairly detailed  'experience' document about everything, but I 
was doing so as part of a project for a client at the time so I'm not free to 
publish or share it without their permission.

Cheers,

Robert Garrett
Garrett Family Enterprises 
rob...@garrettfamily.us
IBM Gold Consultant - 2022




-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Matt Hogstrom
Sent: Wednesday, April 20, 2022 2:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Use of zCX

As an ISV are interested in leveraging containers for delivery of services into 
zCX … I’m curious if 

1. You have zCX installed, or plan to?
2  If so, are you looking to use IBM’s recently announced OpenShift or another 
orchestrator?

It’s always nice to know if you’re delivering content that there is a healthy 
ecosystem to use it.  

If you would like to share but don’t want to on the list you can DM me.  

Appreciate your thoughts and insight.

Matt Hogstrom
m...@hogstrom.org


Frodo:  “I wish the ring had never come to me.  I wish none of this had 
happened.”  
Gandalf:  “So do all who live to see such things.  But it is not for them to 
decide.  All you have to do is decide what to do with this time that is given 
to you.”


--
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: Use of zCX

2022-04-20 Thread David Crayford
A well timed question. We are also exploring zCX and would like to know 
how widely it has been adopted. There is no doubt that customers can 
save a lot of money by exploiting zCX workloads running on zIIPs. 
There's an interesting paper from IBM WRT offloading MQ workloads 
https://ibm-messaging.github.io/mqperf/MQ%20with%20zCX.pdf. Of course, 
zIIPs don't come for free.


OpenShift is fantastic but the system requirements are eye-watering. 
It's certainly an investment.



On 21/4/22 03:56, Matt Hogstrom wrote:

As an ISV are interested in leveraging containers for delivery of services into 
zCX … I’m curious if

1. You have zCX installed, or plan to?
2  If so, are you looking to use IBM’s recently announced OpenShift or another 
orchestrator?

It’s always nice to know if you’re delivering content that there is a healthy 
ecosystem to use it.

If you would like to share but don’t want to on the list you can DM me.

Appreciate your thoughts and insight.

Matt Hogstrom
m...@hogstrom.org


Frodo:  “I wish the ring had never come to me.  I wish none of this had 
happened.”
Gandalf:  “So do all who live to see such things.  But it is not for them to 
decide.  All you have to do is decide what to do with this time that is given 
to you.”


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

2022-04-20 Thread Carmen Vitullo
not at my current gig, at a former outsourcer one of our clients had 
Datacom as their primary DB


Carmen

On 4/20/2022 2:58 PM, Steve Beaver wrote:

Now here is the tough one. Has any one written a little application using Data
And that has become critical and you have no way out.

Sent from my iPhone

No one said I could type with one thumb


On Apr 20, 2022, at 14:51, Carmen Vitullo  wrote:

not unknown to my management but forced to use Datacom for CA-7 and 11 :(

Carmen



On 4/20/2022 2:47 PM, Steve Beaver wrote:
Just out of happy curiosity, how many of you are using Datacom under the
covers unbeknownst to your management?

  


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send emailtolists...@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: Dadacom

2022-04-20 Thread Steve Beaver
Now here is the tough one. Has any one written a little application using Data 
And that has become critical and you have no way out.

Sent from my iPhone

No one said I could type with one thumb 

> On Apr 20, 2022, at 14:51, Carmen Vitullo  wrote:
> 
> not unknown to my management but forced to use Datacom for CA-7 and 11 :(
> 
> Carmen
> 
> 
>> On 4/20/2022 2:47 PM, Steve Beaver wrote:
>> Just out of happy curiosity, how many of you are using Datacom under the
>> covers unbeknownst to your management?
>> 
>>  
>> 
>> --
>> 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


Use of zCX

2022-04-20 Thread Matt Hogstrom
As an ISV are interested in leveraging containers for delivery of services into 
zCX … I’m curious if 

1. You have zCX installed, or plan to?
2  If so, are you looking to use IBM’s recently announced OpenShift or another 
orchestrator?

It’s always nice to know if you’re delivering content that there is a healthy 
ecosystem to use it.  

If you would like to share but don’t want to on the list you can DM me.  

Appreciate your thoughts and insight.

Matt Hogstrom
m...@hogstrom.org


Frodo:  “I wish the ring had never come to me.  I wish none of this had 
happened.”  
Gandalf:  “So do all who live to see such things.  But it is not for them to 
decide.  All you have to do is decide what to do with this time that is given 
to you.”


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Dadacom

2022-04-20 Thread Carmen Vitullo

not unknown to my management but forced to use Datacom for CA-7 and 11 :(

Carmen


On 4/20/2022 2:47 PM, Steve Beaver wrote:

Just out of happy curiosity, how many of you are using Datacom under the
covers unbeknownst to your management?

  



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


Dadacom

2022-04-20 Thread Steve Beaver
Just out of happy curiosity, how many of you are using Datacom under the
covers unbeknownst to your management?

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X

2022-04-20 Thread CM Poncelet
I cannot remember what the purpose was. I realise it is a bit odd to
have X2C(C2X(<...>)). Perhaps it was just to have the same X2C(<...>)
parms in the BITAND(): e.g. RB_TYPE_VAL =
C2X(BITAND(X2C(X_E0),X2C(RBSTAB1)))
 

On 20/04/2022 04:37, Tony Harminc wrote:
> On Tue, 19 Apr 2022 at 20:58, CM Poncelet
> <03e99a92061c-dmarc-requ...@listserv.ua.edu> wrote:
>> FWIW No idea what "runarray" does, but attached is an example [in this
>> case for a CICS SVC dump] of some native IPCS REXX [as IPCSREXX.txt] -
>> which can then be modified to read/process any system dump.
>>
>> BTW Was written to be executed from within IPCS - else add "ARG" and
>> "ADDRESS IPCS" etc. cards at the start of the REXX code if to be invoked
>> via TSO batch JCL.
> I'm just curious what the purpose of
>
> X_E0 = C2X('E0'X)
> X_00 = C2X('00'X)
> X_40 = C2X('40'X)
> X_60 = C2X('60'X)
> X_80 = C2X('80'X)
> X_C0 = C2X('C0'X)
>
> is.
>
> Tony H.
>
> --
> 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: SYSLOG port usage

2022-04-20 Thread Tom Longfellow
Thanks, I read those comments and also could not find a way to specify port 
type or port number from either side.

I am saddened by the inability to change either side of this equation.   The 
IBM equipment will not talk to the IBM software.   So much for the mainframe 
and dasd being a full network citizen like other platforms.

I am not irritated enough to request an enhancement to either the mainframe 
code OR the DS8884 code.   The process is long and convoluted and 'designed by 
committee'.   I was just hoping to get basic information for urgent problems 
without buying a suite of SIEM tools or SAN monitoring tools or SNMP tools or 
any of the other plethora of products.  Simple syslog was going to be a basic 
window to get a kind of real time look at whats going on.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: I knew Cobol 6.3 takes more resources to compile than 4.2 but should I be concerned about how much?

2022-04-20 Thread Greg Shirey
Your issue does seem a bit out of the ordinary - it might be a problem.  If you 
have the time, you could open a ticket with IBM.   

At our shop, we had a COBOL program that took 62 minutes to compile.  I 
reported it to IBM and their initial reaction was that they thought that might 
be okay.   But they eventually reviewed the program and issued a fix.   


Regards,
Greg Shirey
Ben E. Keith Co. 

-Original Message-
From: Jantje.  
Sent: Tuesday, April 19, 2022 4:19 AM

On Mon, 18 Apr 2022 20:18:18 +, Pommier, Rex  
wrote:

>Hi list,
>
>Should I be concerned about the amount of resources Cobol 6.3 is occasionally 
>using as compared to 4.2?
No. But you have to cater for the requirements...




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X

2022-04-20 Thread Seymour J Metz
RUNARRAY executes an IPCS command on each element of an array.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of CM 
Poncelet [03e99a92061c-dmarc-requ...@listserv.ua.edu]
Sent: Tuesday, April 19, 2022 8:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Request: Examples of an IPCS RUNARRAY command where the EXEC 
clause display storage using a pointer as a displacement off of X

FWIW No idea what "runarray" does, but attached is an example [in this
case for a CICS SVC dump] of some native IPCS REXX [as IPCSREXX.txt] -
which can then be modified to read/process any system dump.

BTW Was written to be executed from within IPCS - else add "ARG" and
"ADDRESS IPCS" etc. cards at the start of the REXX code if to be invoked
via TSO batch JCL.

HTH


On 19/04/2022 23:45, Richard Pace wrote:
> Hi Ben: Not sure if you're still looking...Here's my example. I had an array 
> of 512 size blocks that I wanted to display 6 bytes from offset +8 in each 
> block (a volser). I positioned IPCS at the first block and tried this:
>
> ipcs runarray address(+0) length(512) entries(1:10) exec((list X+8 length(6)))
>
> This did not work. It listed the first control block repeatedly, similar to 
> what you experienced I think.  On advice from IBM, I changed the command to 
> this:
>
> ipcs runarray address(+8) length(512) entries(1:10) exec((list X length(6)))
>
> This worked -- setting the displacement value, +8,  in the address field, 
> instead of trying to add to X.   I didn't really get an explanation from IBM; 
> just "working as designed".  However, I suspect that inside the EXEC,  LIST 
> X+n is treated different than LIST X; i.e. X only needs to be evaluated once 
> for X+n, whereas X by itself, List knows to use the new position as 
> determined by the origin start (the offset value, +8), the entry number, and 
> entry length (512).
> Richard
>
> --
> 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: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X

2022-04-20 Thread Seymour J Metz
Burning CPU cycles. Code like X_E0='E0' would work just as well


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Tony Harminc [t...@harminc.net]
Sent: Tuesday, April 19, 2022 11:37 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Request: Examples of an IPCS RUNARRAY command where the EXEC 
clause display storage using a pointer as a displacement off of X

On Tue, 19 Apr 2022 at 20:58, CM Poncelet
<03e99a92061c-dmarc-requ...@listserv.ua.edu> wrote:
>
> FWIW No idea what "runarray" does, but attached is an example [in this
> case for a CICS SVC dump] of some native IPCS REXX [as IPCSREXX.txt] -
> which can then be modified to read/process any system dump.
>
> BTW Was written to be executed from within IPCS - else add "ARG" and
> "ADDRESS IPCS" etc. cards at the start of the REXX code if to be invoked
> via TSO batch JCL.

I'm just curious what the purpose of

X_E0 = C2X('E0'X)
X_00 = C2X('00'X)
X_40 = C2X('40'X)
X_60 = C2X('60'X)
X_80 = C2X('80'X)
X_C0 = C2X('C0'X)

is.

Tony H.

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