Re: CASE constructs

2023-03-31 Thread Frank Swarbrick
COBOL:

EVALUATE A = 1
WHEN TRUE [...]
WHEN FALSE [...]
END-EVALUATE

(WHEN FALSE could be WHEN OTHER in this case.)

Not many people would use this over IF ELSE, but it's available.

There's also "EVALUATE TRUE" where each WHEN is a full evaluation, eliminating 
any need for IF ELSE/IF ELSE/IF ELSE.

From: IBM Mainframe Discussion List  on behalf of 
Gibney, Dave <03b5261cfd78-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, March 30, 2023 10:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: CASE constructs

In the CASE of Software AG's language, Natural, it is WHEN ANY and WHEN NONE. 
ANY would execute after the code of the successful WHEN condition. Once in a 
while, I would wish it would execute before rather than after.

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Bob Bridges
> Sent: Thursday, March 30, 2023 1:59 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value]
>
> [EXTERNAL EMAIL]
>
> Ok, I'll bite:  What's the difference between the ANY and OTHER conditions?
>
> Oh, wait, cool!  Does the ANY condition execute even any of the above
> conditions evaluate as true?
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* It is a serious thing to live in a society of possible gods and goddesses, 
> to
> remember that the dullest and most uninteresting person you talk to may
> one day be a creature which, if you saw it now, you would be strongly
> tempted to worship, or else a horror and a corruption such as you now meet,
> if at all, only in a nightmare.  All day long we are, in some degree, helping
> each other to one of these destinations.  -C S Lewis, quoted in "In His Image"
> by Dr Paul Brand and Phillip Yancey */
>
> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Wayne Bickerdike
> Sent: Wednesday, March 29, 2023 23:40
>
> I also like CA-IDEAL. A little bit PL/I like with a nice SELECT statement:
>
>   SELECT TRANS_CODE
> WHEN 'A'
>   DO ADD_RECORD_PROC
> WHEN 'D'
>   DO DEL_RECORD_PROC
> WHEN 'P'
>   DO PURCHASE_PROC
> WHEN 'R'
>   DO RECEIPT_PROC
> WHEN ANY
>   DO LOG_TRANS
> WHEN OTHER
>   DO INVALID_CODE
> ENDSEL
>
> --
> 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: zOSMF certificates

2023-03-31 Thread Mark Zelden
On Thu, 30 Mar 2023 18:55:17 +, rpinion865  
wrote:

>If you installed the zOSMF certificates from the IZUSEC member of 
>SYS1.SAMPLIB, you might want to check the certificate expiration date. Ours 
>was set to May 17, 2023. We've deleted and regenerated the certificate with a 
>much later date. Hopefully, past my retirement date.
>

Yeah, I  just had to work with the security team to renew them in 9 sysplexes 
in February. Fun!! 

I happen to have had an open case with IBM about disabling ciphers that my 
clients security scanner complained about in the middle of this activity and I 
did let them know the samples should be updated.  Even in z/OS 2.5 it is the 
same.  If someone was just implementing z/OSMF under z/OS 2.5 the and used the 
samples without paying attention to those dates,  they'd already be expiring.   
I implemented z/OSMF in 2018 under z/OS 2.3 based on the samples so at least we 
had 5 years.We put the new expiration 10 years out.  

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://search390.techtarget.com/ateExperts/
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Cloning SMPe Global, Target and DLIB

2023-03-31 Thread Mark Zelden
On Wed, 29 Mar 2023 03:40:03 -0500, Bill Giannelli  
wrote:

>Hi Mark,
>thanks for your response.
>One of the things of my posts that might be confusing, is that I am 
>specifically working with DB2 installations and it's tools. I do not work on 
>or change the z/OS system it's self. I am a Db2 Systems Programmer/ DBA. I 
>would never touch things like SYS1.LINKLIB.
>thanks
>Bill 

Well, that's a horse of a different color! ;)   I don't know why you would need 
to clone for something like that, but you may have a good reason.  If it were 
me, I would just backup the entire SMP/E environment including target / dlibs 
to tape with some date reference and if I needed to restore later for some 
reason I would restore to a different name.If you are just cloning to 
"split off" the current environment to support something else (as opposed to 
backup / recovery), then it is basically just DFDSS copy or FDRCOPY of all the 
zones, SMP/E datasets, target and dlib datasets to the name of your choosing 
and updating DDDEFs.   DDDEFs can be mass updated with ZONEEDIT DDDEF.  If 
different HLQs are used today, you can continue to do that or not...

I don't know your shop standards, but I personally prefer to have the entire 
SMP/E environment for a product under a single HLQ / naming convention.  
hlq.DB2V12.llq., or hlq1.hlq2.DB2V12.llq etc.That includes the CSI(s), SMP* 
datasets, target and dlib datasets.  Then you can back it all up and restore it 
together.   When a version or product is obsolete it is simple to delete the 
entire thing regardless of how it is spread out on dasd (SMS vs. non-sms 
control).  

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://search390.techtarget.com/ateExperts/
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Currency format suggestions, please?

2023-03-31 Thread Tony Harminc
On Fri, 31 Mar 2023 at 14:33, Rupert Reynolds  wrote:
>
> 360, with so its many factors, always seemed natural to me.
>
> I don't /think/ I'll be adding functions for Roman numerals, or the "Yan,
> tan, tethera, methera, pip" system used in parts of England for counting on
> the fingers :-)

That one gets a lot worse. Well, it's friday...
https://maximumeffort.substack.com/p/a-brief-history-of-dik

Tony H.

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


RTM/SDWA question

2023-03-31 Thread Joseph Reichman
Hi 

 

Are the registers at SDWASR00 the same as the registers pointed to by
SDWARBAD when SDWARBAD is around I have noticed most of the time they are
SDWAS00 doesn't have 64 bit registers 

Or PSW but if they are the same I can get them from the XSB

 

Thanks 

 


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


Re: Currency format suggestions, please?

2023-03-31 Thread Rupert Reynolds
360, with so its many factors, always seemed natural to me.

I don't /think/ I'll be adding functions for Roman numerals, or the "Yan,
tan, tethera, methera, pip" system used in parts of England for counting on
the fingers :-)

Roops

On Fri, 31 Mar 2023, 19:03 Mike Schwab,  wrote:

> Babylonians gave us 360 degrees, 60 minutes, 60 seconds as units of
> time and sky position.
>
> On Fri, Mar 31, 2023 at 12:56 PM Rupert Reynolds 
> wrote:
> >
> > Yes, I vaguely remember that the Mayans used zero, but India finished the
> > job properly, and the west took up the positional decimal system
> > originating there.
> >
> > "What have the Romans ever done for us?"
> >
> > Roops
> >
> > On Fri, 31 Mar 2023, 14:57 Mohammad Khan, <
> > 047f0e31a222-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > BTW Rudyard Kipling named his house "naulakha" may be because it cost
> him
> > > 9 lakhs to build it. As for Indians using base 10 system for numbers,
> keep
> > > in mind that this system was invented there.
> > >
> > > mkk
> > >
> > > On Fri, 31 Mar 2023 09:53:13 +0100, Rupert Reynolds <
> rreyno...@cix.co.uk>
> > > wrote:
> > >
> > > >For pairs of digits, I was thinking of commas as often used in India,
> > > where
> > > >an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
> > > >quoted as Rs 60,95,000.
> > > >
> > > >The next multiple bigger is another factor of 100. The only group of 3
> > > >digits is for units, tens and hundreds.
> > > >
> > > >Of course there are international businesses using groups of 3 in
> India as
> > > >well.
> > > >
> > > >At least it's base 10ten*! I read about some country using quinary,
> but
> > > >none so far using bakersdozenal.
> > > >
> > > >*ten, not 10. Every base is base 10. See jan Misali's
> > > >https://youtu.be/7OEF3JD-jYo if you're not convinced :-)
> > > >
> > >
> > >
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> 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: Currency format suggestions, please?

2023-03-31 Thread Mike Schwab
Babylonians gave us 360 degrees, 60 minutes, 60 seconds as units of
time and sky position.

On Fri, Mar 31, 2023 at 12:56 PM Rupert Reynolds  wrote:
>
> Yes, I vaguely remember that the Mayans used zero, but India finished the
> job properly, and the west took up the positional decimal system
> originating there.
>
> "What have the Romans ever done for us?"
>
> Roops
>
> On Fri, 31 Mar 2023, 14:57 Mohammad Khan, <
> 047f0e31a222-dmarc-requ...@listserv.ua.edu> wrote:
>
> > BTW Rudyard Kipling named his house "naulakha" may be because it cost him
> > 9 lakhs to build it. As for Indians using base 10 system for numbers, keep
> > in mind that this system was invented there.
> >
> > mkk
> >
> > On Fri, 31 Mar 2023 09:53:13 +0100, Rupert Reynolds 
> > wrote:
> >
> > >For pairs of digits, I was thinking of commas as often used in India,
> > where
> > >an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
> > >quoted as Rs 60,95,000.
> > >
> > >The next multiple bigger is another factor of 100. The only group of 3
> > >digits is for units, tens and hundreds.
> > >
> > >Of course there are international businesses using groups of 3 in India as
> > >well.
> > >
> > >At least it's base 10ten*! I read about some country using quinary, but
> > >none so far using bakersdozenal.
> > >
> > >*ten, not 10. Every base is base 10. See jan Misali's
> > >https://youtu.be/7OEF3JD-jYo if you're not convinced :-)
> > >
> >
> >
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: Currency format suggestions, please?

2023-03-31 Thread Mike Schwab
Maybe we should post the range of 1 digit numbers?
0-7, 0-9, 0-F.
Or I, V, X, L, C, D, M.

On Fri, Mar 31, 2023 at 3:53 AM Rupert Reynolds  wrote:
>
> For pairs of digits, I was thinking of commas as often used in India, where
> an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
> quoted as Rs 60,95,000.
>
> The next multiple bigger is another factor of 100. The only group of 3
> digits is for units, tens and hundreds.
>
> Of course there are international businesses using groups of 3 in India as
> well.
>
> At least it's base 10ten*! I read about some country using quinary, but
> none so far using bakersdozenal.
>
> *ten, not 10. Every base is base 10. See jan Misali's
> https://youtu.be/7OEF3JD-jYo if you're not convinced :-)
>
> On Fri, 31 Mar 2023, 00:43 Bob Bridges,  wrote:
>
> > What, you mean like 1 18 48 90 88?  Yeah, you'd think that would be
> > confusing when trying to think of it as 113MB.
> >
> > ---
> > Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
> >
> > /* Black's Rule of Inverse Metaphysical Certainty: The surer you are about
> > what happens when you die, the less I believe you.  -Terry Black */
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of Rupert Reynolds
> > Sent: Thursday, March 30, 2023 17:49
> >
> > Yes. Some sources say blanks as thousands separators are recognised
> > internationally, especially in Europe.  I wouldn't go that far, but I've
> > seen it in the wild in a few places around Europe.
> >
> > The pairs of digits between commas in India were the biggest surprise to
> > me, so far.
> >
> > --- On Thu, 30 Mar 2023, 22:04 Bob Bridges,  wrote:
> > > Spaces, really?  I thought I was the only one who'd adopted that.  I
> > > first saw it suggested by Isaac Asimov, but no one else seems to have
> > > got the memo.
> >
> > --
> > 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



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: Currency format suggestions, please?

2023-03-31 Thread Rupert Reynolds
Yes, I vaguely remember that the Mayans used zero, but India finished the
job properly, and the west took up the positional decimal system
originating there.

"What have the Romans ever done for us?"

Roops

On Fri, 31 Mar 2023, 14:57 Mohammad Khan, <
047f0e31a222-dmarc-requ...@listserv.ua.edu> wrote:

> BTW Rudyard Kipling named his house "naulakha" may be because it cost him
> 9 lakhs to build it. As for Indians using base 10 system for numbers, keep
> in mind that this system was invented there.
>
> mkk
>
> On Fri, 31 Mar 2023 09:53:13 +0100, Rupert Reynolds 
> wrote:
>
> >For pairs of digits, I was thinking of commas as often used in India,
> where
> >an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
> >quoted as Rs 60,95,000.
> >
> >The next multiple bigger is another factor of 100. The only group of 3
> >digits is for units, tens and hundreds.
> >
> >Of course there are international businesses using groups of 3 in India as
> >well.
> >
> >At least it's base 10ten*! I read about some country using quinary, but
> >none so far using bakersdozenal.
> >
> >*ten, not 10. Every base is base 10. See jan Misali's
> >https://youtu.be/7OEF3JD-jYo if you're not convinced :-)
> >
>
>
>

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


Re: Unzip on z/OS ?

2023-03-31 Thread Tom Harper
Michael,

The information is here on pages 127 to 128.

IBM states specifically that the callable interfaces can be invoked by COBOL. 

I have been using the authorized interface for zEDC for several years now, and 
I will be the first to admit that the documentation is obtuse and hard to 
follow with few examples, but it does work. 

Once you get it working, the technology is impressive. But not for the feint of 
heart. 

Tom Harper 

Phoenix Software International 

https://www.redbooks.ibm.com/redbooks/pdfs/sg248259.pdf



Sent from my iPhone

> On Mar 31, 2023, at 11:14 AM, Schmitt, Michael  
> wrote:
> 
> I'm missing how you would call zEDC from a COBOL programming running in 
> CICS. The Redbook has no examples - it just says there's a callable service 
> for High Level Languages. But the Services for HLL languages just says that 
> unauthorized programs can use a Unix-side library.
> 
> And google has a dearth of hits for COBOL calling zEDC.
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Tom Harper
> Sent: Thursday, March 30, 2023 5:07 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Unzip on z/OS ?
> 
> Michael,
> 
> I would consider using zEDC which can be called by authorized and 
> non-authorized programs in z/OS, and C and JAVA.
> 
> It’s very fast, and requires zEC12 GA2, zBC12, z13 or later. You must have 
> certain PTFs applied.
> 
> z15 and later machines have it built in.
> 
> This is a standard format and can be used on non-IBM systems.
> 
> If applicable, you can do it without program changes using DATACLAS.
> 
> Tom Harper
> 
> Phoenix Software International
> 
> Sent from my iPhone
> 
>> On Mar 30, 2023, at 5:05 PM, Schmitt, Michael  
>> wrote:
>> 
>> What if the requirement is to compress or decompress an area of memory, by 
>> calling something from a COBOL CICS transaction running on z/OS, in a way 
>> that it could be compatibly decompress or compress by a program running on 
>> another platform?
>> 
>> For example: CICS > compress > send across some communication path > 
>> transaction on Linux > program > decompress > same data as started with
>> 
>> The actual algorithm isn't critical, as long as it is compatible on both 
>> ends.
>> 
>> The compressed data isn't in a file, nor are jobs being run. This is 
>> transaction processing.
>> 
>> My preference would be an algorithm that has the compression ratio of 7zip 
>> with the performance of RLE. 
>> 
>> 
>> -Original Message-
>> From: IBM Mainframe Discussion List  On Behalf Of 
>> Rahim Azizarab
>> Sent: Friday, March 24, 2023 4:05 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: Unzip on z/OS ?
>> 
>> File #865 on Downloads at cbttape.org
>> 
>> I used it many times.
>> 
>> 
>> regards;
>> 
>> Rahim
>> 
>> 
>> 
>> 
>> 
>> --
>> For IBM-MAIN subscribe / signoff /


This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.


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


Re: Currency format suggestions, please?

2023-03-31 Thread Bob Bridges
I had to stare at this a second time before I got it.  Of course it's true; 
I've said it myself, but for a moment I was nevertheless caught in my reflexes.

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

/* A person needs to be truly understood by only two or three people. Everyone 
else is audience. Passion is in your head. Two people can be married for a 
dog's age and despite all the aches and bruises of matrimony they still look at 
each other and get excited. Nobody else understands this. Nobody else needs to. 
 -Garrison Keillor, 2005 */

--- On Fri, 31 Mar 2023 09:53:13 +0100, Rupert Reynolds  
wrote:
>ten, not 10. Every base is base 10.

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


Re: Unzip on z/OS ?

2023-03-31 Thread Schmitt, Michael
I'm missing how you would call zEDC from a COBOL programming running in CICS. 
The Redbook has no examples - it just says there's a callable service for High 
Level Languages. But the Services for HLL languages just says that unauthorized 
programs can use a Unix-side library.

And google has a dearth of hits for COBOL calling zEDC.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Harper
Sent: Thursday, March 30, 2023 5:07 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Unzip on z/OS ?

Michael,

I would consider using zEDC which can be called by authorized and 
non-authorized programs in z/OS, and C and JAVA.

It’s very fast, and requires zEC12 GA2, zBC12, z13 or later. You must have 
certain PTFs applied.

z15 and later machines have it built in.

This is a standard format and can be used on non-IBM systems.

If applicable, you can do it without program changes using DATACLAS.

Tom Harper

Phoenix Software International

Sent from my iPhone

> On Mar 30, 2023, at 5:05 PM, Schmitt, Michael  wrote:
>
> What if the requirement is to compress or decompress an area of memory, by 
> calling something from a COBOL CICS transaction running on z/OS, in a way 
> that it could be compatibly decompress or compress by a program running on 
> another platform?
>
> For example: CICS > compress > send across some communication path > 
> transaction on Linux > program > decompress > same data as started with
>
> The actual algorithm isn't critical, as long as it is compatible on both ends.
>
> The compressed data isn't in a file, nor are jobs being run. This is 
> transaction processing.
>
> My preference would be an algorithm that has the compression ratio of 7zip 
> with the performance of RLE. 
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Rahim Azizarab
> Sent: Friday, March 24, 2023 4:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Unzip on z/OS ?
>
> File #865 on Downloads at cbttape.org
>
> I used it many times.
>
>
> regards;
>
> Rahim
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise
received this email message in error, any use, dissemination, distribution,
review, storage or copying of this e-mail message and the information
contained therein is strictly prohibited. If you are not an intended
recipient, please contact the sender by reply e-mail and destroy all copies
of this email message and do not otherwise utilize or retain this email
message or any or all of the information contained therein. Although this
email message and any attachments or appended messages are believed to be
free of any virus or other defect that might affect any computer system into
which it is received and opened, it is the responsibility of the recipient
to ensure that it is virus free and no responsibility is accepted by the
sender for any loss or damage arising in any way from its opening or use.

--
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: finding DU-AL in a dump

2023-03-31 Thread Joseph Reichman
Just want to  extend TESTAUTH it does let me display a data space but only
if it’s created in the debugged address space and it’s private only
accessible by the debugged address space

How does TESTAUTH verify that this alet ( the one created in my address
space only accessible by the debugged address space is kosher ) I thought
it was simple look up from STCBALOV but it’s more complex

I am going to read 5-46 introduction to access registers in the pops book
and your email again and see if I can do what I want

Thanks  for your help

On Fri, Mar 31, 2023 at 10:56 AM Glen Garrison  wrote:

> Hmm Sounds like you are trying to say,  "I know 'that task' (not the
> one I am currently running under) has stuff aleserv'ed on it's access list
> and I want to be able to look at it's data."  I'd say this is a
> security issue the system probably wants to prohibit.
>
>Essentially you want an aleserv extract that will work against any
> TCB you point it to.  I know of no such feature.  For security purposes it
> would be up to the owning task to communicate the stokens to your task so
> you can aleserv it onto your own access list.   Since it's your app, maybe
> you can locate the stokens and aleserv them under the task your test is
> running under??   Beyond that, I think you would have to (knowing what the
> alets are) do the translations manually from that task's du-al.
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Joseph Reichman
> Sent: Thursday, March 30, 2023 6:30 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] Re: finding DU-AL in a dump
>
> I’m not interested in the PASN
>
> You want me to be specfic ok
>
> I have to Alets that I ALESERV ed
>
> To WORKUNIT=AL
>
> One is the Alet of another address space the other is a dataspace that I
> created in a SRB scope=all
>
> I put data into it running under TESTAUTH I cannt display it
>
> What I would like to is write a customized TESTAUTH subcommand that would
> go into the debugged TCB which I can get from the TCOMTAB get any Alets
> associated with it And display the Data in this dataspace
>
> > On Mar 30, 2023, at 6:09 PM, Glen Garrison  wrote:
> >
> >   So you are trying to determine, at any given point in time, if a task
> or srb has anything at all aleserv'ed?   From a task perspective, you can
> find the du-al as we have walked through.   But if someone running under
> that task has aleserv'ed to the pasn I know of no way you can identify
> that.The du-al is unique to a task but there is nothing in the pasn
> side that is task related that you would be able to locate and associate
> with a specific task, that I know of.
> >   I can't say I know the cross memory services task
> termination/supervisor functionality or programming requirements for owning
> a dataspace (for example) and having added it to the pasn.   So I don't
> really know how they clean up an in-use pasn ale, made in use by a task
> that may be going away.  (I say going away because that would require them
> to identify a specific ale by task.)I support real storage manager so
> my knowledge is on the dataspace and dat translation side.
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Joseph Reichman
> > Sent: Thursday, March 30, 2023 5:03 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: [EXTERNAL] Re: finding DU-AL in a dump
> >
> > Chapter 5 in the pops book is program execution on page 5-46 is access
> > register introduction being an ALET is loaded onto an access register
> > would reading up on that give me a better understanding of doing what
> > I want to do
> >
> > I mean finding/if there are any alets for that TASK/SRB
> >
> > thanks
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Glen Garrison
> > Sent: Thursday, March 30, 2023 4:11 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: finding DU-AL in a dump
> >
> > The du-al, as well as the pasn are access LISTS.  Tables used to
> translate an alet to the correct DAT structures for the "space" you have
> aleserv'ed onto the list.  Aleserv add obtains an entry in the list for
> your request and assigns it to your request and builds the alet based on
> the index of the entry chosen.You have to know the alet to get to the
> correct ale and then aste for the 'space' you are trying to translate to.
>   Since there can be multiple valid entries in the access list, to get to
> the correct one you must know the index in the alet.   If you're lucky,
> yours is the only one on the list and you can scan to see it but that's by
> chance.
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Joseph Reichman
> > Sent: Thursday, March 30, 2023 3:53 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: [EXTERNAL] Re: finding DU-AL in a dump
> >
> > How did you come up with that  ? I’ll Look
> >
> > Is there anyway figuring it out with our knowing the 

Re: Currency format suggestions, please?

2023-03-31 Thread Tony Harminc
On Fri, 31 Mar 2023 at 04:53, Rupert Reynolds  wrote:
>
> For pairs of digits, I was thinking of commas as often used in India, where
> an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
> quoted as Rs 60,95,000.
>
> The next multiple bigger is another factor of 100. The only group of 3
> digits is for units, tens and hundreds.
>
> Of course there are international businesses using groups of 3 in India as
> well.
>
> At least it's base 10ten*! I read about some country using quinary, but
> none so far using bakersdozenal.

Well... PL/I-F has a STERLING data type for pounds, shillings, and
pence (LSD). Now that's not decimal! Actually it's an example of the
more general idea of mixed-base number systems, of which time/calendar
representations are the most well known.
The APL language has convenient and general operators for dealing with
mixed-base data.

Tony H.

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


Re: finding DU-AL in a dump

2023-03-31 Thread Glen Garrison
Hmm Sounds like you are trying to say,  "I know 'that task' (not the one I 
am currently running under) has stuff aleserv'ed on it's access list and I want 
to be able to look at it's data."  I'd say this is a security issue the 
system probably wants to prohibit.   
   
   Essentially you want an aleserv extract that will work against any TCB 
you point it to.  I know of no such feature.  For security purposes it would be 
up to the owning task to communicate the stokens to your task so you can 
aleserv it onto your own access list.   Since it's your app, maybe you can 
locate the stokens and aleserv them under the task your test is running under?? 
  Beyond that, I think you would have to (knowing what the alets are) do the 
translations manually from that task's du-al.  


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Joseph Reichman
Sent: Thursday, March 30, 2023 6:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: finding DU-AL in a dump

I’m not interested in the PASN 

You want me to be specfic ok 

I have to Alets that I ALESERV ed

To WORKUNIT=AL

One is the Alet of another address space the other is a dataspace that I 
created in a SRB scope=all 

I put data into it running under TESTAUTH I cannt display it 

What I would like to is write a customized TESTAUTH subcommand that would go 
into the debugged TCB which I can get from the TCOMTAB get any Alets associated 
with it And display the Data in this dataspace 

> On Mar 30, 2023, at 6:09 PM, Glen Garrison  wrote:
> 
>   So you are trying to determine, at any given point in time, if a task or 
> srb has anything at all aleserv'ed?   From a task perspective, you can find 
> the du-al as we have walked through.   But if someone running under that task 
> has aleserv'ed to the pasn I know of no way you can identify that.The 
> du-al is unique to a task but there is nothing in the pasn side that is task 
> related that you would be able to locate and associate with a specific task, 
> that I know of.
>   I can't say I know the cross memory services task termination/supervisor 
> functionality or programming requirements for owning a dataspace (for 
> example) and having added it to the pasn.   So I don't really know how they 
> clean up an in-use pasn ale, made in use by a task that may be going away.  
> (I say going away because that would require them to identify a specific ale 
> by task.)I support real storage manager so my knowledge is on the 
> dataspace and dat translation side.  
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Joseph Reichman
> Sent: Thursday, March 30, 2023 5:03 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] Re: finding DU-AL in a dump
> 
> Chapter 5 in the pops book is program execution on page 5-46 is access 
> register introduction being an ALET is loaded onto an access register 
> would reading up on that give me a better understanding of doing what 
> I want to do
> 
> I mean finding/if there are any alets for that TASK/SRB
> 
> thanks   
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Glen Garrison
> Sent: Thursday, March 30, 2023 4:11 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: finding DU-AL in a dump
> 
> The du-al, as well as the pasn are access LISTS.  Tables used to translate an 
> alet to the correct DAT structures for the "space" you have aleserv'ed onto 
> the list.  Aleserv add obtains an entry in the list for your request and 
> assigns it to your request and builds the alet based on the index of the 
> entry chosen.You have to know the alet to get to the correct ale and then 
> aste for the 'space' you are trying to translate to.Since there can be 
> multiple valid entries in the access list, to get to the correct one you must 
> know the index in the alet.   If you're lucky, yours is the only one on the 
> list and you can scan to see it but that's by chance. 
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Joseph Reichman
> Sent: Thursday, March 30, 2023 3:53 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [EXTERNAL] Re: finding DU-AL in a dump
> 
> How did you come up with that  ? I’ll Look
> 
> Is there anyway figuring it out with our knowing the alet
> 
> I mean maybe by starting at the bottom And looking for a non zero 
> entry
> 
>> On Mar 30, 2023, at 3:41 PM, Glen Garrison  wrote:
>> 
>> Take the last 2 bytes of your alet, multiply by x'10' and add to the 
>> value of stcbalov. (index into the du-al).  That gets you to the ALE
>> 
>> -Original Message-
>> From: IBM Mainframe Discussion List  On 
>> Behalf Of Joseph Reichman
>> Sent: Thursday, March 30, 2023 8:44 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: [EXTERNAL] finding DU-AL in a dump
>> 
>> Hi
>> 
>> v
>> 
>> I have two  ALETS one from an address space one from a dataspace they 
>> are both on DU-AL I put them there via ALESERV 

Re: Currency format suggestions, please?

2023-03-31 Thread Mohammad Khan
BTW Rudyard Kipling named his house "naulakha" may be because it cost him 9 
lakhs to build it. As for Indians using base 10 system for numbers, keep in 
mind that this system was invented there.

mkk

On Fri, 31 Mar 2023 09:53:13 +0100, Rupert Reynolds  wrote:

>For pairs of digits, I was thinking of commas as often used in India, where
>an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
>quoted as Rs 60,95,000.
>
>The next multiple bigger is another factor of 100. The only group of 3
>digits is for units, tens and hundreds.
>
>Of course there are international businesses using groups of 3 in India as
>well.
>
>At least it's base 10ten*! I read about some country using quinary, but
>none so far using bakersdozenal.
>
>*ten, not 10. Every base is base 10. See jan Misali's
>https://youtu.be/7OEF3JD-jYo if you're not convinced :-)
>

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


Re: IBM SCRT query

2023-03-31 Thread Edward King
SCRT replaced the "percentage of data collected" reporting (Section H5) with
Sections H4 and H6 in SCRT 25.1.0 in 2017.

Section H4 reports, per LPAR, periods (that is, ranges of hours) for which no
SMF data was collected (or for which only SMF70s or SMF89s, but not both,
were collected). Section H6 reports periods where no SMF data was collected
from any system on the CPC.

A justification is required for any gaps lasting more than 1 hour.

Contractual data collection requirements remain at 100%, but reasonable
justifications for small gaps are generally accepted.

Regards,

Ed

On Thu, 30 Mar 2023 14:57:19 +0800, Tommy Tsui  wrote:

>Hi all
>
>Did anyone remember if we have some SMF record missing such as below 5 %,
>is it still valid to SCRT? I remember 95% is acceptable for SCRT long time
>ago. Is there any change on this rule
>
>--
>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: Open Job posting

2023-03-31 Thread Dave Jousma
On Thu, 30 Mar 2023 13:20:54 -0700, Tom Brennan  
wrote:

>Good to see!  Especially the not-going-away part.
>Also, this item is attractive - "SUPERVISORY RESPONSIBILITIES: None"
>
>On 3/30/2023 10:40 AM, Dave Jousma wrote:
>> All,
>>
>> I have a new job posting for Mainframe Storage Management/Sysprog position 
>> that can be seen here:  
>> https://fifththird.wd5.myworkdayjobs.com/53careers/job/Cincinnati-OH/Lead-Technical-Engineer---Mainframe-Storage-Management_R40828
>>
>> The job is primarily storage management, but with room for general sysprog 
>> cross-over.   We will consider fully remote for the right individual.   Our 
>> mainframe footprint is current, GDPS enabled, and has no plans to go away.
>>
>> Interested candidates should complete the online profile to be considered.
>>

Yep, no supervisory :).  We are a pretty compact team, so while the job is 
Storage based, and is where the immediate need is, the breadth of work duties 
is pretty wide depending on experience.  Feel free to reach out to me directly 
if there is some interest, but not ready to fill out the online paperwork.   
david.jou...@53.com

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


Re: Currency format suggestions, please?

2023-03-31 Thread Rupert Reynolds
For pairs of digits, I was thinking of commas as often used in India, where
an EV6 costs 60.95 Lakh,  (Lakh is a multiple 100,000). In Rupees it's
quoted as Rs 60,95,000.

The next multiple bigger is another factor of 100. The only group of 3
digits is for units, tens and hundreds.

Of course there are international businesses using groups of 3 in India as
well.

At least it's base 10ten*! I read about some country using quinary, but
none so far using bakersdozenal.

*ten, not 10. Every base is base 10. See jan Misali's
https://youtu.be/7OEF3JD-jYo if you're not convinced :-)

On Fri, 31 Mar 2023, 00:43 Bob Bridges,  wrote:

> What, you mean like 1 18 48 90 88?  Yeah, you'd think that would be
> confusing when trying to think of it as 113MB.
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* Black's Rule of Inverse Metaphysical Certainty: The surer you are about
> what happens when you die, the less I believe you.  -Terry Black */
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Rupert Reynolds
> Sent: Thursday, March 30, 2023 17:49
>
> Yes. Some sources say blanks as thousands separators are recognised
> internationally, especially in Europe.  I wouldn't go that far, but I've
> seen it in the wild in a few places around Europe.
>
> The pairs of digits between commas in India were the biggest surprise to
> me, so far.
>
> --- On Thu, 30 Mar 2023, 22:04 Bob Bridges,  wrote:
> > Spaces, really?  I thought I was the only one who'd adopted that.  I
> > first saw it suggested by Isaac Asimov, but no one else seems to have
> > got the memo.
>
> --
> 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: z/OS 3.1 Preview Webcast (Asia-Pacific Friendly Time)

2023-03-31 Thread Timothy Sipples
Colin Paice wrote:
>Will the charts be available to us?

Yes, after the Webcast.

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