Re: Accessing JCL SETs in Rexx

[Jon Perryman]

 On Thursday, August 3, 2023 at 09:02:39 PM PDT, Paul Gilmartin wrote:

> I've found SCAN to be almost worthless.  It doesn't always report invalid 
> data set names.

I don't think that David cares about the value of TYPERUN=SCAN to you. If he 
uses it to solve his problem, then it is of great value to him.

> Is there a JES data set accessible by SDSF that shows symbols resolved?


Someone with z/OS access can quickly verify. I believe it's just after JESJOBLG 
which shows everything including proc expansion and I believe variable 
substitution.

> what does it show if symbol resolution extends a line beyond column 71?

Someone with z/OS access can quickly verify. Create an inline proc that has a 
variable with 20 or so characters and a DD where the DSN= starts in 
column 55.  

> In  fact, any continuation that splits a data set name can be "a little funky 
> to process."

This would not be my first choice but it's a solution that meets David's 
requirements of being processed by REXX and being free. If he understands the 
pattern, then he can program for it..

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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Jon Perryman]

> On Thursday, August 3, 2023 at 10:47:52 AM PDT, Joel C. Ewing 
>  wrote:

> There is a synergy that exists between z-architecture hardware and z/OS
> that has evolved over many decades.

IBM designs with insight whereas other manufacturers implement. You would never 
install 1 giant disk on IBM z. Instead you install multiple smaller disks to 
avoid bottlenecks. There is nothing that stops other manufacturers from 
designing everything IBM has designed. IBM thinks about everything from RAS to 
performance.

> The hardware is designed with redundancy to detect failures 

There is no doubt that IBM does an excellent job in RAS design. You get what 
you pay for. Don't expect to get a million $ computer for $5,000.  

> Undetected hardware errors don't happen.

Undetected by nature goes unnoticed. It's extremely rare for IBM but People 
aren't perfect and solutions to a problem simply change the problem. 

> designed with the philosophy that software failures may occur within
> parts of the operating system, either from a hardware failure or a
> system software bug.   System recovery routines exist to clean up after
> such failures, limit what running address spaces are affected, and allow
> production to continue in unaffected address spaces.

While IBM goes to great strides for RAS, they have their limits. GDPS and 
automation costs extra. They exist purely for RAS. 

> An explicit part of the design philosophy is that applications running
> in different address spaces are isolated: 

CICS and z/OS UNIX use an address space to run multiple applications (at least 
they used to). I suspect that programming languages have become so reliable 
that we simply don't experience many storage overlays caused by applications. 
On the other hand, UNIX and Linux processes are fully protected with each 
process having storage protected from other processes.  

> Another important feature of z/OS that requires some hardware
> coordination is the System Measurement Facility that gathers measurement
> of system activity and resource usage at a level to support performance
> tuning or billing based on resource usage.

SMF and RMF are simply free tools that provide basic information. Unix and 
Linux also provide a similar free tool for monitoring performance. On z/OS, you 
can upgrade to Omegamon, Intune and other tools for more in depth performance 
information.

> if you could somehow succeed in running it under
> Linux or on non-z hardware, it would lose the reliability, availability,
> and serviceability it gets from that hardware/software synergy that
> makes it an ideal production platform for critical workloads.

What I'm saying is that we should expect some z/OS components (not all) to 
appear in IBM RHEL on IBM z machines. Don't expect CICS on RHEL for z but 
migrating GRS is minor considering that the hardware and instruction set are 
the same. You only need to change the z/OS specific code. GRS improves RAS 
because it's a superior implementation of Unix mutex and semaphore. Same for 
SYSPLEX, some of DFSMS, JES, SSI and more. To have the same synergy as z/OS, 
RHEL only needs the components that provide the synergy.

 I've never said that z/OS will be implemented in non-z hardware. I've said 
there is nothing stopping other companies from implementing these designs. They 
simply have no desire to use 2 PCIe ports for redundancy when 1 works most of 
the time. 

I've never said that IBM would integrate z/OS into Linux but said in theory 
they have prior experience in doing such things like this.

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

Channelized I/O WAS: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Timothy Sipples]

David Crayford wrote:
>Other platforms have integrated AI engines, AMD ZenDNN,
>Intel oneDNN etc. Both ship with open source libraries and
>toolkits sadly lacking for z/OS.

Did you miss zDNN?

https://github.com/IBM/zDNN
https://www.ibm.com/docs/en/zos/2.5.0?topic=consider-z-deep-neural-network-library-zdnn

>I noticed that IBM have shipped patched Python packages for
>TensorFlow and SnapML that exploit Telum for Linux on Z.
>I suppose like everything, we’ll have to wait a while for z/OS.

Missed this one too?

https://community.ibm.com/community/user/ibmz-and-linuxone/blogs/evan-rivera/2023/02/24/python-ai-toolkit-for-ibm-zos

Quoting from the IBM Redpaper:

"The Python AI Toolkit for IBM z/OS also benefits from the IBM zSystems 
hardware investments that are lower in the stack. Acceleration from the IBM 
Integrated Accelerator for AI provides benefits when running AI workloads that 
are built on top of the Python AI Toolkit for IBM z/OS. With this workload 
execution acceleration, enterprises can meet successfully some of the most 
stringent service-level agreements (SLAs) when integrating AI into 
business-critical workloads."

https://www.redbooks.ibm.com/abstracts/redp5709.html

—
Timothy Sipples
Senior Architect
Digital Assets, Industry Solutions, and Cybersecurity
IBM zSystems/LinuxONE, Asia-Pacific
sipp...@sg.ibm.com


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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Bob Bridges]

I usually tell people that IBM invented really good hardware, and left it to 
others to make software that was decently user-friendly.  The IBM Selectric was 
great, and that little red eraser they invented for cursor movement on the 
laptops was - well, I still prefer plugging in a real trackball, but it was 
high-quality.  We still moon over the old 3270 keyboards.

But I tried using their early word processor software; it was awful.  And I can 
use RACF, but TSS is much easier to manage.

Let the flames begin.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* An engineer thinks that equations approximate reality.  A physicist thinks 
that reality approximates equations.  A mathematician never makes the 
connection. */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Grant Taylor
Sent: Thursday, August 3, 2023 21:24

I hope you mean "IBM /was/ the standard bearer in computer design".

I even question that or that hope you mean close to 30 years ago.

--- On 8/3/23 3:27 PM, Rahim Azizarab wrote:
> IBM is the standard bearer in computer design even when it came to 
> laptops, just see how well IBM designed the Thinkpads.

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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Bob Bridges]

Wow, the READY prompt!  I used to be quite familiar with that, before ROSCOE 
and ISPF.  I once wrote a CLIST that helped me navigate the OUTPUT command more 
easily, though I don't recall convincing anyone else it was better than the raw 
command.

Come to think of it, I still use TSO commands more often than some of the ISPF 
menu options - ED and VW and BR commands rather than options 1 and 2, for 
instance.  I'm just happier with a command interface than some menus.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* My father used to play with my brother and me in the yard.  Mother would 
come out and say "You're tearing up the grass."  "We're not raising grass," Dad 
would reply; "we're raising boys."  -Harmon Killebrew */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Brennan
Sent: Thursday, August 3, 2023 18:29

I seem to remember that action when working on a PDP11 using a VT100 terminal.  
It was as if the designers said, hey, you obviously want a CR in the middle of 
the line, so there you go.

And to Linux users, TSO READY mode must look really odd when they find they can 
move the cursor to a previous command and press Enter, but nothing happens 
until they overtype at least one byte.  We must look like nut cases sometimes :)

--- On 8/3/2023 1:27 PM, Rahim Azizarab wrote:
> One of its oddities was that if you typed a line and happened to have the 
> cursor before end of the line the right portion of the line was lost.

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

Re: Accessing JCL SETs in Rexx

[Paul Gilmartin]

On Fri, 4 Aug 2023 03:32:01 +, Jon Perryman wrote:

> > On Thursday, August 3, 2023 at 12:21:34 PM PDT, David Spiegel  wrote:
>> My intention is to read a Job and make sure that all datasets are available, 
>> but, the dsnames contain SET variables.
>
>The converter / interpreter will resolve variables. Submit the job with 
>typerun scan or hold should generate the information you want.
> 
I've found SCAN to be almost worthless.  It doesn't always report invalid data 
set names.

>If you're not comfortable with control blocks, IPCS and dumps, then you can 
>use SDSF to extract the converted JCL albeit a little funky to process.
> 
Is there a JES data set accessible by SDSF that shows symbols resolved?
what does it show if symbol resolution extends a line beyond column 71?

In  fact, any continuation that splits a data set name can be "a little funky
to process."

-- 
gil

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

Re: Accessing JCL SETs in Rexx

[Sri h Kolusu]

>/*
Doesn't that result in "SYSIN DD * GENERATED STATEMENT"?

Gil,

NO.  

PS:  Please ignore the previous email where I was responding to the wrong quote.


Thanks,
Kolusu

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

Re: Accessing JCL SETs in Rexx

[Sri h Kolusu]

>Does this work for symbols that are NOT exported?

Gil,

NO. 

Thanks,
Kolusu

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

Re: Accessing JCL SETs in Rexx

[Jon Perryman]

 > On Thursday, August 3, 2023 at 12:21:34 PM PDT, David Spiegel  wrote:
> My intention is to read a Job and make sure that all datasets are available, 
> but, the dsnames contain SET variables.


The converter / interpreter will resolve variables. Submit the job with typerun 
scan or hold should generate the information you want.

If you're not comfortable with control blocks, IPCS and dumps, then you can use 
SDSF to extract the converted JCL albeit a little funky to process.

I can't remember which control blocks you need to run. If you are more skilled, 
you could take a dump during the first step and search the storage for the job 
card. I would expect a CB eyecatcher which you should be able to find in the 
z/OS control blocks manual. From there, you find the pointers in the header. 
Keep chasing CB chains until you find one that is usable. Since you want to use 
REXX, then find the chain that either originates from PSAAOLD (your ascb) or 
PSATOLD (your TCB). 

Add a step to the JCL that runs your REXX and have it abend if a dataset is 
missing otherwise let it run the job. Realize that IF statements may cause you 
problems. You will also want to ignore datasets that are allocated in the job.



On Thursday, August 3, 2023 at 12:21:34 PM PDT, David Spiegel 
<0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:  
 
 Hi Gil,
My intention is to read a Job and make sure that all datasets are available, 
but, the dsnames contain SET variables.

Regards,
David

Sent from my Bell Samsung device over Canada’s largest network.

From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, August 3, 2023 1:58:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Accessing JCL SETs in Rexx

On Thu, 3 Aug 2023 17:11:08 +, David Spiegel wrote:
>
>Does anyone know how to access the JCL SET variables from Rexx.
>
What are your constraints?  I could envision invoking your REXX with
BPXWUNIX or BPXBATCH and passing your symbols in
    //STDPARM  DD  *,SYMBOLS=JCLONLY
        ...

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

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

Re: Accessing JCL SETs in Rexx

[Paul Gilmartin]

On Fri, 4 Aug 2023 02:32:02 +, Robert Garrett wrote:

>There are no native REXX functions or easily callable services you can use to 
>get your hands on them.  However, if you're handy with Assembler you could 
>write your own callable service to get them.  The service you need in order to 
>get access to JCL symbols is invoked via the IEFSJSYM macro.  
>
Will it return JCL symbols of a job that hasn't been submitted, or of a job 
other
than the requesting job?

>I once wrote a CICS utility program to fetch both system symbols and JCL SET 
>symbols while running as a CICS task.

-- 
gil

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

Re: Accessing JCL SETs in Rexx

[Robert Garrett]

There are no native REXX functions or easily callable services you can use to 
get your hands on them.  However, if you're handy with Assembler you could 
write your own callable service to get them.  The service you need in order to 
get access to JCL symbols is invoked via the IEFSJSYM macro.  

I once wrote a CICS utility program to fetch both system symbols and JCL SET 
symbols while running as a CICS task.

Cheers,
Robert

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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Grant Taylor]

On 8/3/23 3:27 PM, Rahim Azizarab wrote:
IBM is the standard bearer in computer design even when it came to 
laptops, just see how well IBM designed the Thinkpads.


I hope you mean "IBM /was/ the standard bearer in computer design".

I even question that or that hope you mean close to 30 years ago.

IBM was closely followed in the early days of the PC / AT / XT.  But 
other companies pulled along side and started leading the pack.  Notably 
Compaq servers in the late 386, 486, and Pentium time frame started 
eating IBM's lunch.


It seems like IBM jumped the shark with the PS/2 as far as PCs are 
concerned.  I think many in the industry -- though maybe not in this 
group -- will agree with me when I say that IBM was considered an "also 
built PCs" or "they still build PCs?" in the late '90s and early '00s.


The notable exception is the ThinkPad.  But IBM gave up on that with the 
sale to Lenovo in the early '00s.


I think that x Series servers have been good all along, but they are 
through the nose prices compared to competitors.




Grant. . . .

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

Re: Accessing JCL SETs in Rexx

[Paul Gilmartin]

On Fri, 4 Aug 2023 00:02:06 +, Sri h Kolusu wrote:
>
>Does this work for symbols that are NOT exported?
>
>// SET HLQ=
>// ...
>//SYMEX EXEC PGM=COZBATCH
>/*
Doesn't that result in "SYSIN DD * GENERATED STATEMENT"?
>//STDIN DD *
>ENV | GREP "JES_"
>/*
ITYM 'env | grep "JES_"'

Is the requester OK with requiring very useful third-party software?

But I believe the OP wanted to scan the "equivalent JCL" in a member
not submitted.

-- 
gil

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

Re: Accessing JCL SETs in Rexx

[Sri h Kolusu]

Kirk,

Does this work for symbols that are NOT exported?

For ex:

// SET HLQ=
// SET MLQ=SOME
// SET TLQ=DSN
// SET FLQ=DUMP
// SET MYDSN=
// SET MYVOL=SYS001
// SET DCLAS=EDCCOMPR
// SET SCLAS=STANDARD
// SET PRI=5000
// SET SEC=2000
// SET VU=3
// SET DV=SYSDA
// SET AU=TRK
//*
//SYMEX EXEC PGM=COZBATCH
//SYSMDUMP DD DSN=,
//DISP=(NEW,CATLG),
//DATACLAS=,STORCLAS=,EATTR=OPT,
//UNIT=(,),SPACE=(,(,),RLSE),
//DCB=(RECFM=FBS,LRECL=4160,BLKSIZE=24960)
/*
//STDIN DD *
ENV | GREP "JES_"
/*

Thanks,
Kolusu


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

Re: Channelized I/O WAS: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[David Crayford]

> On 3 Aug 2023, at 2:26 am, P H 
> <04843e86df79-dmarc-requ...@listserv.ua.edu> wrote:
> 
> The numbers quoted by Tom:
> 
> So I pointed out there's only 12 I/O drawers max on a z16 which is 12 x
> 16 = 192 slots or 384 ports max.  He replied, but didn't seem to fully
> accept that answer.
> 
> are 100% correct. These numbers are the MAXIMUM. Depending on the 
> configuration, these could be a lot less e.g. the number of coupling links 
> could reduce the numbers. If z16 is ordered with BPA power supplies, the MAX 
> I/O drawers go down from 12 to 10.
> 
> I have already mentioned things like cache, memory, I/O Subsystem, on chip 
> data compression/Crypto (z has been a leader for this)/Sort/AI capabilities.

Maybe for crypto but certainly not for AI. My iPhone has a more sophisticated 
AI engine than the z16.  Other platforms have integrated AI engines, AMD 
ZenDNN, Intel oneDNN etc. Both ship with open source libraries and toolkits 
sadly lacking for z/OS. I noticed that IBM have shipped patched Python packages 
for TensorFlow and SnapML that exploit Telum for Linux on Z. I suppose like 
everything, we’ll have to wait a while for z/OS. Java 11 still does not utilise 
zEDC compression on z/OS.

Talking about compression and crypto, Intel have hardware accelerators as part 
of QAT, either PCIe cards or on-die. You could argue that the compression tech 
is better than zEDC as it supports more formats then just gzip. 

https://www.intel.com/content/www/us/en/architecture-and-technology/intel-quick-assist-technology-overview.html


> 
> Talking about the I/O Subsystem, this is a key strength when it comes to 
> handling large number of I/Os. Unlike x86, the I/O Subsystem handles this 
> very well and lets the CP get on with what it's mean to do. What no one has 
> mentioned is the 'processing' power of z. In addition to the main CPs (up to 
> 200 for z16 Models A01 and L01), the I/O Subsystem has up eo 192 POWER 
> processors. These are in a N+1 config making a total of 384 in he sub-system 
> alone.
> 
> Impressive numbers. What do all these prove? Taken out of context, these are 
> meaningless. As I stated previously, one has to consisder the whole system. 
> This is where z has strengths. It has a 'balanced system design'. This 
> morning I decided to do a full virus scan on my 2 year old latop with an 
> Intel i5 chip. While the scan was running, I couldn't even open a 10 MB 
> Powerpoint presentation  (before the smartones give me their 2 cents worth, 
> I know I could have run the scan as a background task).
> 

Get yourself a better machine. My Mac runs clusters of Linux systems on 
Kubernetes running stacks like Kafka, ELK at a full pelt without breaking a 
sweat and I can watch YouTube in 4K at the same time.

For a more apples to apples comparison to x86 it would be more interesting to 
compare a z box to an HP Superdome kitted out with all the fruit. There are 
only three large systems remaining since Oracle killed off the SPARCs. Z, POWER 
and the super domes. The server market is dominated by single socket rack 
servers running distributed systems. 

> Talking about numbers, the Airbus A380 plane has been designed to have up to 
> 840 passengers. Are there any airlines with A380s which carry such numbers!
> 
> Horses for courses!!
> 
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Tom Brennan 
> Sent: 02 August 2023 17:34
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: Channelized I/O WAS: Mainframe Makers WAS: Ars Technica: The 
> IBM mainframe: How it runs and why it survives
> 
>> I’ve missed this thread.
> 
> He first said 1536 ports (not slots, not lanes) on a full z16.  I asked
> where he got that number.  Response was there are 12 fanout slots on a
> CEC drawer (true), so with 4 CEC drawers that's 48 fanout slots (true)
> which means the 4 CEC drawers could address 48 I/O drawers with 16 cards
> each and 2 ports per card = 1536 ports.
> 
> So I pointed out there's only 12 I/O drawers max on a z16 which is 12 x
> 16 = 192 slots or 384 ports max.  He replied, but didn't seem to fully
> accept that answer.
> 
> Later he said there are 1600 slots (not ports, not lanes) on a z16 so I
> asked where he got that new number.  He said he meant 1536 slots (not
> ports, not lanes) so the number doubled from last time.  I replied same
> as I did previously.
> 
> Below, he said 1536 slots again.  1536 cards on a single z16 could be
> over 3000 cables!  I've had to untangle some 150+ cable rats nests, but
> for that one I'd just say, Naw... I'm going home :)
> 
> On 8/2/2023 1:53 AM, David Crayford wrote:
>>> On 2 Aug 2023, at 12:15 pm, Tom Brennan  wrote:
>>> 
 The IBM z16 can have up to 1,536 PCIe+ slots
>>> 
>>> I'm gonna quit explaining this and just say, "WRONG" every time you say 
>>> this as if it's a fact :)
>> 
>> I’ve missed this thread. By 1,536 PCIe slots, that’s slots not lanes right? 
>> Even if it were lanes that would be a ludicrous 

Re: Accessing JCL SETs in Rexx

[Seymour J Metz]

I'm not sure whether that's the best approach, but the __environment stem 
variable would certainly provide easy access.


From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, August 3, 2023 2:39 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Accessing JCL SETs in Rexx

On Thu, 3 Aug 2023 17:48:56 +, Seymour J Metz wrote:

>The short answer is use ADDRESS LINKMVS. It's probably easier to write a 
>REXX-aware function in HLASM.
>
I have an Idea:  Exported JCL symbols should automatically be available
under OMVS as environment variables.

--
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: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Tom Brennan]

I seem to remember that action when working on a PDP11 using a VT100 
terminal.  It was as if the designers said, hey, you obviously want a CR 
in the middle of the line, so there you go.


And to Linux users, TSO READY mode must look really odd when they find 
they can move the cursor to a previous command and press Enter, but 
nothing happens until they overtype at least one byte.  We must look 
like nut cases sometimes :)


On 8/3/2023 1:27 PM, Rahim Azizarab wrote:

One of its oddities was that if you typed a line and happened to have the 
cursor before end of the line the right portion of the line was lost.


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

Re: Accessing JCL SETs in Rexx

[David Spiegel]

Hi R'Itschak AMVS"H,
Yes, it is a scan.
The purpose of the scan is to ensure that my jobs which implement a Middleware 
upgrade have a good chance of succeeding.
These jobs are SUBMITd at 02:00 when the adrenaline is flowing, Teams messages 
are non-stop and the stress level is through the roof.
The last thing I want to do is start looking for missing Datasets and/or RENAME 
conflicts.

Shabbat Shalom

Regards,
David

From: IBM Mainframe Discussion List  on behalf of 
ITschak Mugzach 
Sent: Thursday, August 3, 2023 3:54:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Accessing JCL SETs in Rexx

David,

So this is not a run time issue, but a scan of a jcl before submition?

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *




On Thu, Aug 3, 2023 at 10:21 PM David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

> Hi Gil,
> My intention is to read a Job and make sure that all datasets are
> available, but, the dsnames contain SET variables.
>
> Regards,
> David
>
> Sent from my Bell Samsung device over Canada’s largest network.
> 
> From: IBM Mainframe Discussion List  on behalf
> of Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
> Sent: Thursday, August 3, 2023 1:58:20 PM
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: Accessing JCL SETs in Rexx
>
> On Thu, 3 Aug 2023 17:11:08 +, David Spiegel wrote:
> >
> >Does anyone know how to access the JCL SET variables from Rexx.
> >
> What are your constraints?  I could envision invoking your REXX with
> BPXWUNIX or BPXBATCH and passing your symbols in
> //STDPARM  DD  *,SYMBOLS=JCLONLY
> ...
>
> --
> 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
>

--
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: Accessing JCL SETs in REXX

[Steve Beaver]

Since REXX became available I have not written much assembler.  REXX will
read anything literly 

Steve


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Kirk Wolf
Sent: Thursday, August 3, 2023 3:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Accessing JCL SETs in Rexx

Great idea! 

// EXPORT SYMLIST=(MYDSN,MYVOL)
// SET MYDSN=MYID.SOME.DSN
// SET MYVOL=SYS001
//*
//SYMEX EXEC PGM=COZBATCH
//STDIN DD *
env | grep "JES_"
//* 

results:
JES_SYS_CORR_CURRJOB=S434DTLZOS01CC27C5EA...:
JES_MYDSN=MYID.SOME.DSN
JES_MYVOL=SYS001

See Example #14:  https://coztoolkit.com/docs/cozbatch/examples.html

Kirk Wolf
Dovetailed Technologies
https://coztoolkit.com

On Thu, Aug 3, 2023, at 1:39 PM, Paul Gilmartin wrote:
> On Thu, 3 Aug 2023 17:48:56 +, Seymour J Metz wrote:
> 
> >The short answer is use ADDRESS LINKMVS. It's probably easier to write a
REXX-aware function in HLASM.
> >
> I have an Idea:  Exported JCL symbols should automatically be available
> under OMVS as environment variables.
> 
> -- 
> 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

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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Rahim Azizarab]

When it comes to mainframes IBM is the standard setter as well as the 
established standard.  I mostly worked on IBM systems; but at one point I 
worked on a UNISYS system that was essentially a weird adaptation of Linux.  
One of its oddities was that if you typed a line and happened to have the 
cursor before end of the line the right portion of the line was lost.  The 
system was more of a mini computer than a real mainframe.
IBM is the standard bearer in computer design even when it came to laptops, 
just see how well IBM designed the Thinkpads.
  

regards;

Rahim 




   

 

On Monday, July 31, 2023 at 10:40:31 AM CDT, Steve Thompson 
 wrote:  
 
 I just have to throw this in here.

IBM is not the only maker of Mainframes.

I understand that Fujitsu still makes mainframes.

Does UNISYS still make mainframes?

How about Honeywell Bull?

Why don't we see these systems being discussed (or maybe I just 
don't frequent the right web sites)?

Steve Thompson

--
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: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Bob Bridges]

Oh, surely not!  "Extremely rare", you must mean?  Redundancy can spot errors, 
but not all.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* The use of Fashions in thought is to distract the attention of men from 
their real dangersThe game is to have them all running about with fire 
extinguishers whenever there is a flood, and all crowding to that side of the 
boat which is already nearly gunwale under.  Thuscruel ages are put on 
their guard against Sentimentality, feckless and idle ones against 
Respectability, lecherous ones against Puritanism  -advice to a tempter, 
from The Screwtape Letters by C S Lewis */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Joel C. Ewing
Sent: Thursday, August 3, 2023 13:48

The hardware is designed with redundancy to detect failuresUndetected 
hardware errors don't happen.

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

Re: Accessing JCL SETs in Rexx

[Kirk Wolf]

Great idea! 

// EXPORT SYMLIST=(MYDSN,MYVOL)
// SET MYDSN=MYID.SOME.DSN
// SET MYVOL=SYS001
//*
//SYMEX EXEC PGM=COZBATCH
//STDIN DD *
env | grep "JES_"
//* 

results:
JES_SYS_CORR_CURRJOB=S434DTLZOS01CC27C5EA...:
JES_MYDSN=MYID.SOME.DSN
JES_MYVOL=SYS001

See Example #14:  https://coztoolkit.com/docs/cozbatch/examples.html

Kirk Wolf
Dovetailed Technologies
https://coztoolkit.com

On Thu, Aug 3, 2023, at 1:39 PM, Paul Gilmartin wrote:
> On Thu, 3 Aug 2023 17:48:56 +, Seymour J Metz wrote:
> 
> >The short answer is use ADDRESS LINKMVS. It's probably easier to write a 
> >REXX-aware function in HLASM.
> >
> I have an Idea:  Exported JCL symbols should automatically be available
> under OMVS as environment variables.
> 
> -- 
> 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: Accessing JCL SETs in Rexx

[ITschak Mugzach]

David,

So this is not a run time issue, but a scan of a jcl before submition?

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *




On Thu, Aug 3, 2023 at 10:21 PM David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

> Hi Gil,
> My intention is to read a Job and make sure that all datasets are
> available, but, the dsnames contain SET variables.
>
> Regards,
> David
>
> Sent from my Bell Samsung device over Canada’s largest network.
> 
> From: IBM Mainframe Discussion List  on behalf
> of Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
> Sent: Thursday, August 3, 2023 1:58:20 PM
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: Accessing JCL SETs in Rexx
>
> On Thu, 3 Aug 2023 17:11:08 +, David Spiegel wrote:
> >
> >Does anyone know how to access the JCL SET variables from Rexx.
> >
> What are your constraints?  I could envision invoking your REXX with
> BPXWUNIX or BPXBATCH and passing your symbols in
> //STDPARM  DD  *,SYMBOLS=JCLONLY
> ...
>
> --
> 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
>

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

Re: Accessing JCL SETs in Rexx

[Paul Gilmartin]

On Thu, 3 Aug 2023 19:21:27 +, David Spiegel wrote:
>
>My intention is to read a Job and make sure that all datasets are available, 
>but, the dsnames contain SET variables.
> 
By "read a Job" do you mean that JCL resides in a file or PDS member
and you want to read that JCL with EXECIO or linein() and identify
all data set names in equivalent JCL having substituted values in
its SET statements?

I doubt that you can do that without writing your own parser/interpreter.

But perhaps TYPRUN=HOLD and scan the JESJCL with the SDSF API.

-- 
gil

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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Tom Brennan]

I hope so, because when I worked part-time with Unix/Linux from maybe 
2003 to 2013, I used to have a joke, "If you get an error message that 
makes no sense at all, check if the disk is full."  Not really a joke 
because about half the time a vague error occurred, that was the cause.


When you make the application responsible for relaying common failures 
to the user or log, the app programmers tend to skip it.  One of the 
good things about z/OS is you get an abend such as x37 by default, with 
no application logic necessary.


On 8/3/2023 12:18 PM, Grant Taylor wrote:
Aside:  I think much of the Unix industry decided to move complexity and 
cost out of the hardware and instead put it into software that runs on 
more commodity / inexpensive hardware.


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

Re: Accessing JCL SETs in Rexx

[David Spiegel]

Hi Gil,
My intention is to read a Job and make sure that all datasets are available, 
but, the dsnames contain SET variables.

Regards,
David

Sent from my Bell Samsung device over Canada’s largest network.

From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, August 3, 2023 1:58:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Accessing JCL SETs in Rexx

On Thu, 3 Aug 2023 17:11:08 +, David Spiegel wrote:
>
>Does anyone know how to access the JCL SET variables from Rexx.
>
What are your constraints?  I could envision invoking your REXX with
BPXWUNIX or BPXBATCH and passing your symbols in
//STDPARM  DD  *,SYMBOLS=JCLONLY
...

--
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: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Grant Taylor]

On 8/3/23 12:47 PM, Joel C. Ewing wrote:
The hardware is designed with redundancy to detect failures in 
components (processors, memory, I/O subsystems, interconnection cables), 
correct any resulting data errors where possible, retry a failed 
operation using different hardware components where appropriate, vary a 
failing component off line, and in many cases allow concurrent repair of 
failing components while production continues.  Undetected hardware 
errors don't happen.


Save for retrying a failed operation the rest of those statements 
weren't specific to IBM mainframes.


I remember reading about a Unix server being demonstrated at a trade 
show that was running applications interactively wherein the 
demonstrators removed all but one CPU book from the system, reinserted 
the removed CPU books, then removed the one they hadn't removed, and 
then reinserted it.  At a later demonstration they took a cup of water 
and pored it into the top of the system.  What was running continued to 
run in both demonstrations.  The real time demo programs didn't even 
stutter.  What was obvious was that other non-real-time programs running 
on the system slowed down as the OS reacted to hardware going offline 
and rescheduling tasks on the remaining online CPUs.  Monitoring agents 
lit up like a Christmas tree as they removed CPU books but became 
happier as they were re-inserted.


My understanding was that this was a system that was shipping in the mid 
to late '90s and people were buying them.  Thus not a demonstration special.


I don't remember if this was an HP SuperDome running HP-UX or a Sun 
Enterprise 1 running Solaris.


RAS is not specific to IBM.  Though I do think that IBM trademarked the 
name / phrase.


I'm not aware of any x86_64 servers being anywhere near this level of 
reliability.


Aside:  I think much of the Unix industry decided to move complexity and 
cost out of the hardware and instead put it into software that runs on 
more commodity / inexpensive hardware.


Having a super reliable basket with all your eggs in it is still all 
your eggs in one basket.


z/OS not only coordinates with the hardware when resources visible to 
z/OS are affected by failures and concurrent maintenance, it is also 
designed with the philosophy that software failures may occur within 
parts of the operating system, either from a hardware failure or a 
system software bug.   System recovery routines exist to clean up after 
such failures, limit what running address spaces are affected, and allow 
production to continue in unaffected address spaces.


I can't enumerate things, but I feel like non-mainframes have things 
that can speak to this.


Another important feature of z/OS that requires some hardware 
coordination is the System Measurement Facility that gathers measurement 
of system activity and resource usage at a level to support performance 
tuning or billing based on resource usage.


How much of SMF is hardware vs software?

System accounting -- originally for billing -- has been used for a long 
time to provide information for system scaling.


Aside from fact that z/OS is closed-source and only licensed by IBM to 
specific hardware, if you could somehow succeed in running it under 
Linux or on non-z hardware, it would lose the reliability, availability, 
and serviceability it gets from that hardware/software synergy that 
makes it an ideal production platform for critical workloads.


There is an entire hobby genre doing exactly this.

I absolutely agree that it does not have anywhere near the same RAS that 
z Series has.  But I also realize that not everybody needs, much less is 
willing to pay for, such RAS features.


It doesn't matter how reliable the single basket is if the network 
connectivity into the facility is cut.  --  This is one of the places 
that having redundancy higher in the application stack and distributing 
load geographically starts to shine.


An IBM mainframe is a very impressive system.  A Cadillac is a very 
impressive car.  But using an IBM mainframe to serve files in a small 
office is about as appropriate as using the Cadillac to deliver pizzas.




--
Grant. . . .

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

Re: Liberty Server on zOS

[Keith Gooding]

IIRC the Liberty server that comes with z/OS was first bundled with z/OSMF, 
then it became a separate feature but limited by licence to use with z/OSMF and 
then those restrictions were relaxed allowing limited internal use with other 
applications. I do not know the rules now or how to find them but the basic 
idea was that people should continue to pay for Webserver Lliberty profile if 
they were using it for production work.

> On 3 Aug 2023, at 19:59, Colin Paice  wrote:
> 
> Hi,
> Yes Liberty can  be installed on z/OS.   It came installed on my system,
> and the documentation is pretty good (just look for it).  Eg Installing
> Liberty on z/OS
> 
> It is the basis for z/OS SMF, Z/OS explorer, z/OS Connect, MQ Web server
> and others.
> I've written many posts  on
> using it.
> 
> Colin
> 
>> On Thu, 3 Aug 2023 at 19:19, esst...@juno.com  wrote:
>> 
>> Hello.Does anyone know if a Liberty Serer can be installed on ZOS without
>> CICS or WebSphere?Any documentation ? .paul dangelo
>> 
>> --
>> 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: Liberty Server on zOS

[David Follis]

There is a copy of Liberty z/OS in /usr/lpp/liberty_zos/current that you can 
use "for non-production purposes".  That would be unsupported.
For production/supported use with your own applications you need to buy 
WebSphere Application Server for z/OS (or use the copy inside CICS).   

David Follis
IBM WebSphere z/OS

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

Re: Liberty Server on zOS

[Colin Paice]

Hi,
Yes Liberty can  be installed on z/OS.   It came installed on my system,
and the documentation is pretty good (just look for it).  Eg Installing
Liberty on z/OS

It is the basis for z/OS SMF, Z/OS explorer, z/OS Connect, MQ Web server
and others.
I've written many posts  on
using it.

Colin

On Thu, 3 Aug 2023 at 19:19, esst...@juno.com  wrote:

> Hello.Does anyone know if a Liberty Serer can be installed on ZOS without
> CICS or WebSphere?Any documentation ? .paul dangelo
>
> --
> 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: Accessing JCL SETs in Rexx

[Paul Gilmartin]

On Thu, 3 Aug 2023 17:48:56 +, Seymour J Metz wrote:

>The short answer is use ADDRESS LINKMVS. It's probably easier to write a 
>REXX-aware function in HLASM.
>
I have an Idea:  Exported JCL symbols should automatically be available
under OMVS as environment variables.

-- 
gil

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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[P H]

Well written.

Sent from Outlook for Android

From: IBM Mainframe Discussion List  on behalf of 
Joel C. Ewing 
Sent: Thursday, August 3, 2023 6:47:37 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Mainframe Makers WAS: Ars Technica: The IBM mainframe: How it 
runs and why it survives

There is a synergy that exists between z-architecture hardware and z/OS
that has evolved over many decades.

The hardware is designed with redundancy to detect failures in
components (processors, memory, I/O subsystems, interconnection cables),
correct any resulting data errors where possible, retry a failed
operation using different hardware components where appropriate, vary a
failing component off line, and in many cases allow concurrent repair of
failing components while production continues.  Undetected hardware
errors don't happen.

z/OS not only coordinates with the hardware when resources visible to
z/OS are affected by failures and concurrent maintenance, it is also
designed with the philosophy that software failures may occur within
parts of the operating system, either from a hardware failure or a
system software bug.   System recovery routines exist to clean up after
such failures, limit what running address spaces are affected, and allow
production to continue in unaffected address spaces.

An explicit part of the design philosophy is that applications running
in different address spaces are isolated:  a failure or bug in one
application cannot induce a failure in some different application in a
different address space, or induce a failure in the operating system
itself.

Another important feature of z/OS that requires some hardware
coordination is the System Measurement Facility that gathers measurement
of system activity and resource usage at a level to support performance
tuning or billing based on resource usage.

Aside from fact that z/OS is closed-source and only licensed by IBM to
specific hardware, if you could somehow succeed in running it under
Linux or on non-z hardware, it would lose the reliability, availability,
and serviceability it gets from that hardware/software synergy that
makes it an ideal production platform for critical workloads.

 Joel C Ewing

On 8/2/23 22:28, Jon Perryman wrote:
>   > On Wednesday, August 2, 2023 at 06:24:15 AM PDT, Rick Troth 
>  wrote:
>
>> I think Jon Perryman first asked us to define mainframe. And I bit!
>> [voice of Leonard Bones McCoy] "Dammit Jon! I'm a software developer,
>> not a field service engineer!"
>> But it really started with Andrew Hudson at Ars Technica getting a
>> number of facts wrong.
> The ARS Technica story made me wonder z/OS people think there is more than a 
> design difference between z/OS on z and Linux on Intel. Unix was ported ot 
> z/OS. I want to know why people think z/OS couldn't be ported to Linux. There 
> are people here who consider the article mostly true. What makes people think 
> that is more than a philosophical design difference? Would IBM be relevant if 
> it used Linux design philosophy?
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
Joel C. Ewing

--
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: Specific Question/Scenario on using Pass Tickets with RACF

[Keith Gooding]

The relevant documentation seems to be the section ‘Determining PTKTDATS 
profile names’ in the RACF security admin guide. This has a list of rules for 
determining the name for APPC, CICS,IMS, batch jobs, TSO etc and ends the list 
with ‘Other applications’ . That last paragraph states that if there is no APPL 
coded you should use the rules for batch jobs. I would be interested to know if 
that works - if you are able to change the application the surest way would be 
to code an APPL on the RACROUTE macro.

Keith

> On 2 Aug 2023, at 21:21, Robert Garrett  wrote:
> 
> Something that's been puzzling me:
> 
> Imagine an interactive application that requires valid user credentials (ID 
> and password) to access, but does NOT require specific authorization to the 
> application.
> In other words, the app does a RACROUTE REQUEST=VERIFY to validate 
> credentials and create the associated ACEE representing the user, but it does 
> NOT provide the APPL= parameter on the request, nor does it perform a 
> subsequent REQUEST=AUTH on an APPL resource.  In other words, if you've got a 
> valid ID/password, you can "log on" to the app - no PERMIT to the app itself 
> is required and there's also no corresponding APPL resource for it.
> 
> Now, what if I want to be able to generate pass tickets in place of passwords 
> to access this app?  Doing that requires a PTKTDATA resource whose name 
> matches the application to control pass ticket generation, but this 
> application doesn't provide a name for itself.
> Possible?
> Just plain not supported?
> Will RACF "assume" an application name (JOB/STC name, VTAM Applid, something 
> else) and use that to locate the applicable PTKTDATA resource (and if so, 
> what does it use)?
> 
> (If it matters, assume enhanced pass ticket via AES key in the ICSF CKDS).
> 
> Enquiring minds would really like an authoritative and accurate answer on 
> this one...
> 
> Thanks,
> Rob
> 
> --
> 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

Liberty Server on zOS

[esst...@juno.com]

Hello.Does anyone know if a Liberty Serer can be installed on ZOS without CICS 
or WebSphere?Any documentation ? .paul dangelo

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

Re: Accessing JCL SETs in Rexx

[Lennie Dymoke-Bradshaw]

I think the easiest way is to pass them as parameters to the REXX routine.
Alternatively specify them in an in-stream data set and use a DD statement
that specifies SYMBOLS=JCLONLY.

Lennie Dymoke-Bradshaw
https://rsclweb.com 
'Dance like no one is watching. Encrypt like everyone is.'

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
David Spiegel
Sent: 03 August 2023 18:11
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Accessing JCL SETs in Rexx

Hi,
Does anyone know how to access the JCL SET variables from Rexx.

Thanks in advance,
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

Re: Accessing JCL SETs in Rexx

[Paul Gilmartin]

On Thu, 3 Aug 2023 17:11:08 +, David Spiegel wrote:
>
>Does anyone know how to access the JCL SET variables from Rexx.
>
What are your constraints?  I could envision invoking your REXX with
BPXWUNIX or BPXBATCH and passing your symbols in
//STDPARM  DD  *,SYMBOLS=JCLONLY
...

-- 
gil

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

Re: Accessing JCL SETs in Rexx

[Seymour J Metz]

The short answer is use ADDRESS LINKMVS. It's probably easier to write a 
REXX-aware function in HLASM.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Spiegel [0468385049d1-dmarc-requ...@listserv.ua.edu]
Sent: Thursday, August 3, 2023 1:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Accessing JCL SETs in Rexx

Hi,
Does anyone know how to access the JCL SET variables from Rexx.

Thanks in advance,
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

Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Joel C. Ewing]

There is a synergy that exists between z-architecture hardware and z/OS 
that has evolved over many decades.


The hardware is designed with redundancy to detect failures in 
components (processors, memory, I/O subsystems, interconnection cables), 
correct any resulting data errors where possible, retry a failed 
operation using different hardware components where appropriate, vary a 
failing component off line, and in many cases allow concurrent repair of 
failing components while production continues.  Undetected hardware 
errors don't happen.


z/OS not only coordinates with the hardware when resources visible to 
z/OS are affected by failures and concurrent maintenance, it is also 
designed with the philosophy that software failures may occur within 
parts of the operating system, either from a hardware failure or a 
system software bug.   System recovery routines exist to clean up after 
such failures, limit what running address spaces are affected, and allow 
production to continue in unaffected address spaces.


An explicit part of the design philosophy is that applications running 
in different address spaces are isolated:  a failure or bug in one 
application cannot induce a failure in some different application in a 
different address space, or induce a failure in the operating system 
itself.


Another important feature of z/OS that requires some hardware 
coordination is the System Measurement Facility that gathers measurement 
of system activity and resource usage at a level to support performance 
tuning or billing based on resource usage.


Aside from fact that z/OS is closed-source and only licensed by IBM to 
specific hardware, if you could somehow succeed in running it under 
Linux or on non-z hardware, it would lose the reliability, availability, 
and serviceability it gets from that hardware/software synergy that 
makes it an ideal production platform for critical workloads.


    Joel C Ewing

On 8/2/23 22:28, Jon Perryman wrote:

  > On Wednesday, August 2, 2023 at 06:24:15 AM PDT, Rick Troth 
 wrote:


I think Jon Perryman first asked us to define mainframe. And I bit!
[voice of Leonard Bones McCoy] "Dammit Jon! I'm a software developer,
not a field service engineer!"
But it really started with Andrew Hudson at Ars Technica getting a
number of facts wrong.

The ARS Technica story made me wonder z/OS people think there is more than a 
design difference between z/OS on z and Linux on Intel. Unix was ported ot 
z/OS. I want to know why people think z/OS couldn't be ported to Linux. There 
are people here who consider the article mostly true. What makes people think 
that is more than a philosophical design difference? Would IBM be relevant if 
it used Linux design philosophy?


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


--
Joel C. Ewing

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

Re: Accessing JCL SETs in Rexx

[ITschak Mugzach]

I tried MVSVAR(SYMDEF,xxx). It does not do the job. If this is worth the
effort, try reading the JESJCL spool dataset using ISFEXEC.

ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *




On Thu, Aug 3, 2023 at 8:11 PM David Spiegel <
0468385049d1-dmarc-requ...@listserv.ua.edu> wrote:

> Hi,
> Does anyone know how to access the JCL SET variables from Rexx.
>
> Thanks in advance,
> 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

Accessing JCL SETs in Rexx

[David Spiegel]

Hi,
Does anyone know how to access the JCL SET variables from Rexx.

Thanks in advance,
David

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

Re: z/OS performance question

[Colin Paice]

Check all the DB2 address spaces.  What may be happening is something like

   1. Restore job reads a record, and calls DB2 to update the database,
   reads next record calls db2...
   2. DB2 buffer pools start filling up, so DB2 starts writing data out to
   the page sets
   3. DB2 may also be doing things like read ahead... so if it does a read
   before update it is in the buffer pool.  This also takes CPU

So overall DB2 may be using a lot of CPU

Try  Allan's advice for the service classes.  With service classes, you
only find that they are not configured optimally when they LPAR is short of
CPU, and they get used.

On Thu, 3 Aug 2023 at 17:18, Allan Staller <
0387911dea17-dmarc-requ...@listserv.ua.edu> wrote:

> Classification: Confidential
>
> You did not say where the TSO response time issues were being observed. I
> suspect, from the information provided it is on SC08D3(possible) or SC14D4
> (most likely).
>
> If you look, I suspect the majority of CPU consumption is from the *MSTR
> DB2 address space. DB2 will charge this back to the "user". This address
> space is most likely running in the SYSSTC Service class.
>
> I suggest you look at the service class definitions for TSO. At least 80%
> of all transactions should end in TSO Service Class Period 1, 80 % of the
> rest in TSO Service Class Period 2  (16%) and the remainder in TSO Service
> Class period 3 (4 %). Another variation could be TSO Service Class Period 1
> at 96% and TSO Service Class Period 2 4%; No TSO Service Class Period 3.
>
> Depending on the scheme chosen above, except for the last TSO Service
> Class, all should run as importance 1. They may have different performance
> goals, but the importance should be 1.
>
> " From the activation profile for Development (SC08D3) the Processor
> definition has the absolute Capping box Number of processors box set to
> 0.18.”. This sentence does not make sense as written.
>
> HTH,
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of rpinion865
> Sent: Thursday, August 3, 2023 10:10 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: z/OS performance question
>
> [CAUTION: This Email is from outside the Organization. Unless you trust
> the sender, Don’t click links or open attachments as it may be a Phishing
> email, which can steal your Information and compromise your Computer.]
>
> Let me start off by saying I am not a z/OS performance and capacity
> planning expert. If anything, I am a novice. I am looking for a trivial
> answer to a non-trivial question.
> We have a z15 (8562-T02) running three z/OS 2.4 LPAR's, Production
> (SC10D1), Development (SC08D3), and Sysprog (SC14D4). Below is information
> from the RMF Partition Report. My question/problem is this. On the
> Development LPAR, when a DB2 database restore job runs, the MVS Busy goes
> to 100% as seen from both SDSF DA and RMF CPU reports. Most of the CPU Busy
> goes to the DB2 restore job. The batch job runs in a discretionary service
> class, and TSO users run in a higher service class with goal mode. But,
> response time for the TSO users gets long, 3 to 5 seconds between enter
> keys, ISPF screen swaps etc.. Normally the TSO response time is sub-second.
> As you can see, the Development LPAR has one Logical CP defined. Based on
> the capping characteristics of Development as displayed below, would adding
> another Logical CP help TSO response time?
>
> 1 P A R T I T I O N D A T A R E P O R T
> PAGE 3
> z/OS V2R4 SYSTEM ID SC10 DATE 08/01/2023 INTERVAL 14.59.992 RPT VERSION
> V2R4 RMF TIME 05.45.00 CYCLE 1.000 SECONDS
> -
> MVS PARTITION NAME SC10D1 PHYS PROC NUM 5 LP GROUP NAME N/A INITIAL CAP NO
> IMAGE CAPACITY 138 CP 2 2 LIMIT N/A LPAR HW CAP NO NUMBER OF CONFIGURED
> PARTITIONS 5 ICF 1 AVAILABLE N/A HW GROUP CAP NO WAIT COMPLETION NO IIP 2 2
> ABS MSU CAP NO DISPATCH INTERVAL DYNAMIC
>
> MVS PARTITION NAME SC08D3 PHYS PROC NUM 5 LP GROUP NAME N/A INITIAL CAP NO
> IMAGE CAPACITY 10 CP 2 1 LIMIT N/A LPAR HW CAP YES NUMBER OF CONFIGURED
> PARTITIONS 5 ICF 1 AVAILABLE N/A HW GROUP CAP NO WAIT COMPLETION NO IIP 2 1
> ABS MSU CAP NO DISPATCH INTERVAL DYNAMIC
> -
>  PARTITION DATA --
> MSU --CAPPING---
> NAME S BT WGT DEF ACT DEF WLM% NUM TYPE
> SC10D1 A N 999 138 27 N N N 0.0 2.0 CP
> SC08D3 A N 60 10 3 N Y N 0.0 1.0 CP (1)
> SC14D4 A N 18 4 2 N N N 0.0 1.0 CP
> TOTAL 1077
>
> -  From the activation profile for Development (SC08D3) the Processor
> definition has the absolute Capping box Number of processors box set to
> 0.18.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> ::DISCLAIMER::
> 
> The contents of this e-mail and any attachment(s) are confidential and
> intended for the named recipient(s) only. E-mail transmission is not
> guaranteed to be secure or 

Re: z/OS performance question

[Allan Staller]

Classification: Confidential

You did not say where the TSO response time issues were being observed. I 
suspect, from the information provided it is on SC08D3(possible) or SC14D4 
(most likely).

If you look, I suspect the majority of CPU consumption is from the *MSTR DB2 
address space. DB2 will charge this back to the "user". This address space is 
most likely running in the SYSSTC Service class.

I suggest you look at the service class definitions for TSO. At least 80% of 
all transactions should end in TSO Service Class Period 1, 80 % of the rest in 
TSO Service Class Period 2  (16%) and the remainder in TSO Service Class period 
3 (4 %). Another variation could be TSO Service Class Period 1 at 96% and TSO 
Service Class Period 2 4%; No TSO Service Class Period 3.

Depending on the scheme chosen above, except for the last TSO Service Class, 
all should run as importance 1. They may have different performance goals, but 
the importance should be 1.

" From the activation profile for Development (SC08D3) the Processor definition 
has the absolute Capping box Number of processors box set to 0.18.”. This 
sentence does not make sense as written.

HTH,

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
rpinion865
Sent: Thursday, August 3, 2023 10:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: z/OS performance question

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don’t click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

Let me start off by saying I am not a z/OS performance and capacity planning 
expert. If anything, I am a novice. I am looking for a trivial answer to a 
non-trivial question.
We have a z15 (8562-T02) running three z/OS 2.4 LPAR's, Production (SC10D1), 
Development (SC08D3), and Sysprog (SC14D4). Below is information from the RMF 
Partition Report. My question/problem is this. On the Development LPAR, when a 
DB2 database restore job runs, the MVS Busy goes to 100% as seen from both SDSF 
DA and RMF CPU reports. Most of the CPU Busy goes to the DB2 restore job. The 
batch job runs in a discretionary service class, and TSO users run in a higher 
service class with goal mode. But, response time for the TSO users gets long, 3 
to 5 seconds between enter keys, ISPF screen swaps etc.. Normally the TSO 
response time is sub-second. As you can see, the Development LPAR has one 
Logical CP defined. Based on the capping characteristics of Development as 
displayed below, would adding another Logical CP help TSO response time?

1 P A R T I T I O N D A T A R E P O R T
PAGE 3
z/OS V2R4 SYSTEM ID SC10 DATE 08/01/2023 INTERVAL 14.59.992 RPT VERSION V2R4 
RMF TIME 05.45.00 CYCLE 1.000 SECONDS
-
MVS PARTITION NAME SC10D1 PHYS PROC NUM 5 LP GROUP NAME N/A INITIAL CAP NO 
IMAGE CAPACITY 138 CP 2 2 LIMIT N/A LPAR HW CAP NO NUMBER OF CONFIGURED 
PARTITIONS 5 ICF 1 AVAILABLE N/A HW GROUP CAP NO WAIT COMPLETION NO IIP 2 2 ABS 
MSU CAP NO DISPATCH INTERVAL DYNAMIC

MVS PARTITION NAME SC08D3 PHYS PROC NUM 5 LP GROUP NAME N/A INITIAL CAP NO 
IMAGE CAPACITY 10 CP 2 1 LIMIT N/A LPAR HW CAP YES NUMBER OF CONFIGURED 
PARTITIONS 5 ICF 1 AVAILABLE N/A HW GROUP CAP NO WAIT COMPLETION NO IIP 2 1 ABS 
MSU CAP NO DISPATCH INTERVAL DYNAMIC
-
 PARTITION DATA --
MSU --CAPPING---
NAME S BT WGT DEF ACT DEF WLM% NUM TYPE
SC10D1 A N 999 138 27 N N N 0.0 2.0 CP
SC08D3 A N 60 10 3 N Y N 0.0 1.0 CP (1)
SC14D4 A N 18 4 2 N N N 0.0 1.0 CP
TOTAL 1077

-  From the activation profile for Development (SC08D3) the Processor 
definition has the absolute Capping box Number of processors box set to 0.18.

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

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other 

Re: Specific Question/Scenario on using Pass Tickets with RACF

[Charles Mills]

I was really into passtickets about fifteen years ago and now I have forgotten 
some specifics.

Yes, passtickets are really cool and are totally appropriate for what you want.

Yes, even if you don't want application-specificity passtickets does. Yes, 
without your doing something about it you may get an application name that is 
unsatisfactory in some way -- perhaps varies from run to run. Yes, there should 
be a way to specify that application name. For example, here is how to specify 
an application name for the FTP server (and probably other OMVS processes):

PARM='ENVAR("_BPX_JOBNAME=MYFTP")'

No, I don't think anything in enhanced passtickets changes anything above.

HTH,
Charles

On Wed, 2 Aug 2023 20:22:09 +, Robert Garrett  
wrote:

>Something that's been puzzling me:
>
>Imagine an interactive application that requires valid user credentials (ID 
>and password) to access, but does NOT require specific authorization to the 
>application.
>In other words, the app does a RACROUTE REQUEST=VERIFY to validate credentials 
>and create the associated ACEE representing the user, but it does NOT provide 
>the APPL= parameter on the request, nor does it perform a subsequent 
>REQUEST=AUTH on an APPL resource.  In other words, if you've got a valid 
>ID/password, you can "log on" to the app - no PERMIT to the app itself is 
>required and there's also no corresponding APPL resource for it.
>
>Now, what if I want to be able to generate pass tickets in place of passwords 
>to access this app?  Doing that requires a PTKTDATA resource whose name 
>matches the application to control pass ticket generation, but this 
>application doesn't provide a name for itself.
>Possible?
>Just plain not supported?
>Will RACF "assume" an application name (JOB/STC name, VTAM Applid, something 
>else) and use that to locate the applicable PTKTDATA resource (and if so, what 
>does it use)?

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

z/OS performance question

[rpinion865]

Let me start off by saying I am not a z/OS performance and capacity planning 
expert. If anything, I am a novice. I am looking for a trivial answer to a 
non-trivial question.
We have a z15 (8562-T02) running three z/OS 2.4 LPAR's, Production (SC10D1), 
Development (SC08D3), and Sysprog (SC14D4). Below is information from the RMF 
Partition Report. My question/problem is this. On the Development LPAR, when a 
DB2 database restore job runs, the MVS Busy goes to 100% as seen from both SDSF 
DA and RMF CPU reports. Most of the CPU Busy goes to the DB2 restore job. The 
batch job runs in a discretionary service class, and TSO users run in a higher 
service class with goal mode. But, response time for the TSO users gets long, 3 
to 5 seconds between enter keys, ISPF screen swaps etc.. Normally the TSO 
response time is sub-second. As you can see, the Development LPAR has one 
Logical CP defined. Based on the capping characteristics of Development as 
displayed below, would adding another Logical CP help TSO response time?

1 P A R T I T I O N D A T A R E P O R T
PAGE 3
z/OS V2R4 SYSTEM ID SC10 DATE 08/01/2023 INTERVAL 14.59.992
RPT VERSION V2R4 RMF TIME 05.45.00 CYCLE 1.000 SECONDS
-
MVS PARTITION NAME SC10D1 PHYS PROC NUM 5 LP GROUP NAME N/A INITIAL CAP NO
IMAGE CAPACITY 138 CP 2 2 LIMIT N/A LPAR HW CAP NO
NUMBER OF CONFIGURED PARTITIONS 5 ICF 1 AVAILABLE N/A HW GROUP CAP NO
WAIT COMPLETION NO IIP 2 2 ABS MSU CAP NO
DISPATCH INTERVAL DYNAMIC

MVS PARTITION NAME SC08D3 PHYS PROC NUM 5 LP GROUP NAME N/A INITIAL CAP NO
IMAGE CAPACITY 10 CP 2 1 LIMIT N/A LPAR HW CAP YES
NUMBER OF CONFIGURED PARTITIONS 5 ICF 1 AVAILABLE N/A HW GROUP CAP NO
WAIT COMPLETION NO IIP 2 1 ABS MSU CAP NO
DISPATCH INTERVAL DYNAMIC
-
 PARTITION DATA --
MSU --CAPPING---
NAME S BT WGT DEF ACT DEF WLM% NUM TYPE
SC10D1 A N 999 138 27 N N N 0.0 2.0 CP
SC08D3 A N 60 10 3 N Y N 0.0 1.0 CP (1)
SC14D4 A N 18 4 2 N N N 0.0 1.0 CP
TOTAL 1077

-  From the activation profile for Development (SC08D3) the Processor 
definition has the absolute Capping box Number of processors box set to 0.18.

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

Re: [EXT] Using SAS/MXG to create a .csv file

[Crawford Robert C (Contractor)]

PROC EXPORT will create CSV files (DBMS=CSV) on Windows machines.  It doesn't 
work on mainframe, for some reasons with SAS.  However, I had a lot of luck 
creating CSV's with PROC EXPORT and WPS.

Since my current shop doesn't have WPS I wrote a SAS macro  that ultimate 
writes a CSV file to a USS directory.

Robert Crawford
Abstract Evolutions LLC
(210) 913-3822

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Regan
Sent: Wednesday, August 2, 2023 12:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXT] Using SAS/MXG to create a .csv file

 Is it possible to create a .csv file using both SAS & MXG? I ask because SAS, 
for PROC PRINT, only supports a line length of 256, and the report I want to 
create from SMF119, subtype 66 records, would be longer than that.

Regards,

Mark Regan, K8MTR General, EN80tg
CTO1 USNR-Retired (1969-1991)
Nationwide Insurance, Retired, 1986-2017 z/OS Network Systems Programmer (z 
NetView, z/OS Communications Server)

Email: marktre...@gmail.com
LinkedIn:  https://www.linkedin.com/in/mark-t-regan

--
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: Using SAS/MXG to create a .csv file

[Allan Staller]

Classification: Confidential

YES. Don't remember how. It is built in to SAS.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Regan
Sent: Wednesday, August 2, 2023 12:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Using SAS/MXG to create a .csv file

[CAUTION: This Email is from outside the Organization. Unless you trust the 
sender, Don't click links or open attachments as it may be a Phishing email, 
which can steal your Information and compromise your Computer.]

 Is it possible to create a .csv file using both SAS & MXG? I ask because SAS, 
for PROC PRINT, only supports a line length of 256, and the report I want to 
create from SMF119, subtype 66 records, would be longer than that.

Regards,

Mark Regan, K8MTR General, EN80tg
CTO1 USNR-Retired (1969-1991)
Nationwide Insurance, Retired, 1986-2017 z/OS Network Systems Programmer (z 
NetView, z/OS Communications Server)

Email: marktre...@gmail.com
LinkedIn:  https://www.linkedin.com/in/mark-t-regan

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

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. E-mail transmission is not guaranteed to be 
secure or error-free as information could be intercepted, corrupted, lost, 
destroyed, arrive late or incomplete, or may contain viruses in transmission. 
The e mail and its contents (with or without referred errors) shall therefore 
not attach any liability on the originator or HCL or its affiliates. Views or 
opinions, if any, presented in this email are solely those of the author and 
may not necessarily reflect the views or opinions of HCL or its affiliates. Any 
form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of HCL is strictly prohibited. If you have 
received this email in error please delete it and notify the sender 
immediately. Before opening any email and/or attachments, please check them for 
viruses and other defects.


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

Re: [EXTERNAL] Using SAS/MXG to create a .csv file

[Mark Regan]

Graham,

That does not work. My SAS (using base v9.4_M6) batch job doesn't even see
the ODS coding when I run the job.

Regards,

Mark Regan, K8MTR General, EN80tg
CTO1 USNR-Retired (1969-1991)
Nationwide Insurance, Retired, 1986-2017
z/OS Network Systems Programmer (z NetView, z/OS Communications Server)

Email: marktre...@gmail.com
LinkedIn:  https://www.linkedin.com/in/mark-t-regan




On Wed, Aug 2, 2023 at 8:16 PM Graham Harris  wrote:

> try this ODS example
>
> http://support.sas.com/kb/23/652.html
>
> On Wed, 2 Aug 2023 at 22:25, Horne, Jim  wrote:
>
> > I just googled to find it.  I haven't done a .CSV myself in ages but it
> > can be done.  You could use PROC SQL to create a macro variable then a
> > dummy data step to write it to a dataset or other techniques.  This is
> most
> > definitely a case where Google is your friend.  The closest thing I do
> to a
> > .CSV file these days is when I write a report to a single sheet Excel
> > spreadsheet.  That worked pretty well by 9.4.3.  Not knowing what level
> of
> > SAS 9.4 you are at makes it tough to know for sure what will work because
> > the latest release is 9.4.8.  Saying you run 9.4 is basically saying that
> > it was refreshed within the last 10 years or so.
> >
> > I apologize for not being more help
> > Jim Horne
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of Mark Regan
> > Sorry, that code is not working for me, as SAS is totally ignoring that
> > "%DS2CSV"
> > even exists. There are no errors in the SASLOG either. I'm using SAS
> v9.4.
> > 
> > NOTICE: All information in and attached to the e-mails below may be
> > proprietary, confidential, privileged and otherwise protected from
> improper
> > or erroneous disclosure. If you are not the sender's intended recipient,
> > you are not authorized to intercept, read, print, retain, copy, forward,
> or
> > disseminate this message. If you have erroneously received this
> > communication, please notify the sender immediately by phone
> (704-758-1000)
> > or by e-mail and destroy all copies of this message electronic, paper, or
> > otherwise. By transmitting documents via this email: Users, Customers,
> > Suppliers and Vendors collectively acknowledge and agree the transmittal
> of
> > information via email is voluntary, is offered as a convenience, and is
> not
> > a secured method of communication; Not to transmit any payment
> information
> > E.G. credit card, debit card, checking account, wire transfer
> information,
> > passwords, or sensitive and personal information E.G. Driver's license,
> > DOB, social security, or any other information the user wishes to remain
> > confidential; To transmit only non-confidential information such as
> plans,
> > pictures and drawings and to assume all risk and liability for and
> > indemnify Lowe's from any claims, losses or damages that may arise from
> the
> > transmittal of documents or including non-confidential information in the
> > body of an email transmittal. Thank 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: Specific Question/Scenario on using Pass Tickets with RACF

[Lennie Dymoke-Bradshaw]

Robert,

I think you will more likely get an answer on the RACF-L list rather than
IBMMAIN. I use both lists, but I do not know the answer to your question. I
think some on RACF-L will know.

Lennie

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Robert Garrett
Sent: 02 August 2023 21:22
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Specific Question/Scenario on using Pass Tickets with RACF

Something that's been puzzling me:

Imagine an interactive application that requires valid user credentials (ID
and password) to access, but does NOT require specific authorization to the
application.
In other words, the app does a RACROUTE REQUEST=VERIFY to validate
credentials and create the associated ACEE representing the user, but it
does NOT provide the APPL= parameter on the request, nor does it perform a
subsequent REQUEST=AUTH on an APPL resource.  In other words, if you've got
a valid ID/password, you can "log on" to the app - no PERMIT to the app
itself is required and there's also no corresponding APPL resource for it.

Now, what if I want to be able to generate pass tickets in place of
passwords to access this app?  Doing that requires a PTKTDATA resource whose
name matches the application to control pass ticket generation, but this
application doesn't provide a name for itself.
Possible?
Just plain not supported?
Will RACF "assume" an application name (JOB/STC name, VTAM Applid, something
else) and use that to locate the applicable PTKTDATA resource (and if so,
what does it use)?

(If it matters, assume enhanced pass ticket via AES key in the ICSF CKDS).

Enquiring minds would really like an authoritative and accurate answer on
this one...

Thanks,
Rob

--
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: [EXTERNAL] Using SAS/MXG to create a .csv file

[Horne, Jim]

Or this:
%MACRO DELIM(LIB,DSN,OUT,DLM);
  /* MACRO DELIM BUILDS AN OUTPUT FILE FROM INPUT VARS FOR EXCEL */
  /* THIS MACRO WAS OBTAINED FROM SAS INSTITUTE */
PROC SQL NOPRINT;
  SELECT NAME INTO :VARS SEPARATED BY ' +(-1)  '
 FROM DICTIONARY.COLUMNS
 WHERE LIBNAME=%UPCASE("") AND MEMNAME=%UPCASE("");
  SELECT "'"||TRIM(NAME)||"'" INTO :HEADER SEPARATED BY '  '
 FROM DICTIONARY.COLUMNS WHERE LIBNAME=%UPCASE("")
 AND MEMNAME=%UPCASE("");
  QUIT;
DATA _NULL_;
   FILE  NOPRINT;
   IF _N_=1 THEN
  PUT 
   SET 
   PUT 
RUN;
%MEND DELIM;


NOTICE: All information in and attached to the e-mails below may be 
proprietary, confidential, privileged and otherwise protected from improper or 
erroneous disclosure. If you are not the sender's intended recipient, you are 
not authorized to intercept, read, print, retain, copy, forward, or disseminate 
this message. If you have erroneously received this communication, please 
notify the sender immediately by phone (704-758-1000) or by e-mail and destroy 
all copies of this message electronic, paper, or otherwise. By transmitting 
documents via this email: Users, Customers, Suppliers and Vendors collectively 
acknowledge and agree the transmittal of information via email is voluntary, is 
offered as a convenience, and is not a secured method of communication; Not to 
transmit any payment information E.G. credit card, debit card, checking 
account, wire transfer information, passwords, or sensitive and personal 
information E.G. Driver's license, DOB, social security, or any other 
information the user wishes to remain confidential; To transmit only 
non-confidential information such as plans, pictures and drawings and to assume 
all risk and liability for and indemnify Lowe's from any claims, losses or 
damages that may arise from the transmittal of documents or including 
non-confidential information in the body of an email transmittal. Thank you.

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

Re: Question about RMF III Device Resource Delay

[Colin Paice]

I presume you are using the devr report...

See Pending, disconnect and other gobbledegook.

for some info on what the IO wait times mean.

It might be
Disconnect – Time spent accessing the disks.  This could be accessing local
disks, or accessing remote (mirrored) disks.  The Storage controller is not
doing any work while the disk is busy.

   - The volume is reserved by another system.
   - Waiting for the arm to move, or the disk to rotate (for spinning
   disks).
   - The disk is processing the request – for example a cache miss means
   the disk has to be read.
   - Waiting for a signal from a remote peer to say that write data has
   been stored.
   - Some SMF records have a field “Read Disconnect time”.This
   indicates the read wanted a record which was not in the controller cache.


You can collect SMF42-6 records - IO stats at the dataset level.  I have a
program which prints out these stats.
The RMF data you see  is also in the SMF 79-9 records.

Colin


On Thu, 3 Aug 2023 at 08:21, Jason Cai  wrote:

> Dear all,
>
>I have a question about the RMF III Device Resource Delay report
>
>I noticed that the DLY% value of one disk is 100 every 6 minutes. This
> disk has HyperPAV enabled.
>
>ACT RATE = 5.1,RESP TIME=200 ACT%=2 CON%=1 DSC%=1 USG%=0 DLY%=100
>
>
>According to the IBM manual, DLY% means "Percentage of time when the
> job was waiting to use the data set because of contention for the volume
> were the data set resides".
>
>I would like to know how to identify the cause of this contention. What
> command should I use? Do I need to enable GRS MONITOR?
>
>   Any suggestions would be greatly appreciated!
>
> Thank you for your attention and assistance.
>
> Sincerely,
>
> Jason Cai
>
> --
> 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: Channelized I/O WAS: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[P H]

The YouTube is excellent in promoting key strengths of z in a light hearted 
manner. With numerours z systems on the test floor during development, testing 
and product and stress testing the patch panel is key to enable 'any to any' 
configurations.



From: IBM Mainframe Discussion List  on behalf of Jon 
Perryman 
Sent: 03 August 2023 03:56
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Channelized I/O WAS: Mainframe Makers WAS: Ars Technica: The 
IBM mainframe: How it runs and why it survives

> On Wednesday, August 2, 2023 at 09:34:34 AM PDT, Tom Brennan wrote:
> So I pointed out there's only 12 I/O drawers max on a z16

Sorry Tom and all. I don't recall anyone saying max of 12 I/O drawers otherwise 
it would have been obvious my number was wrong. Yahoo mail does strange things 
with tab, backspace, space and other keys.

> which is 12 x 16 = 192 slots or 384 ports max.

Thanks to youtube, the first IBM z I've seen was the z16 tour at 
https://youtu.be/ZDtaanCENbc. You say 192 slots or 384 ports. I understand 
slots being PCIe but was is ports? Is this fiber optic cables or does it 
somehow split a PCIe slot?

> I've had to untangle some 150+ cable rats nests, but> for that one I'd just 
> say, Naw... I'm going home :)

Towards the end of the video, they show the patch panels which are true rats 
nests. Looks like some of the network rooms I've seen. Some people don't mind 
dealing with a mess.



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

Question about RMF III Device Resource Delay

[Jason Cai]

Dear all,

   I have a question about the RMF III Device Resource Delay report

   I noticed that the DLY% value of one disk is 100 every 6 minutes. This disk 
has HyperPAV enabled. 
   
   ACT RATE = 5.1,RESP TIME=200 ACT%=2 CON%=1 DSC%=1 USG%=0 DLY%=100
 

   According to the IBM manual, DLY% means "Percentage of time when the job was 
waiting to use the data set because of contention for the volume were the data 
set resides".

   I would like to know how to identify the cause of this contention. What 
command should I use? Do I need to enable GRS MONITOR?

  Any suggestions would be greatly appreciated!

Thank you for your attention and assistance.

Sincerely,

Jason Cai

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

Re: Channelized I/O WAS: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives

[Tom Brennan]

On 8/2/2023 7:56 PM, Jon Perryman wrote:
You say 192 slots or 384 ports. 


Not me, it's IBM doc along with Parwez Hamid​, top IBM tech person, 
redbook author, conference speaker, etc. etc. (retired now from IBM I 
believe).



I understand slots being PCIe but was is ports? Is this fiber optic cables or 
does it somehow split a PCIe slot?


IBM I/O cards almost all come with two plug ports, or SFP's, or whatever 
you want to call the spot where you plug in a cable.  The only cards I 
can think of that only have one plug port are the 10G OSA cards.  So 
that's why I said 384 ports MAX.


And crypto cards have no plug ports.  So if a machine has any of those, 
down goes that 384 max count.


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