Re: Assembler access to USS functions

[Jon Perryman]

On Fri, 6 Oct 2023 01:15:51 +, Seymour J Metz  wrote:

>The issue isn't what has access to environmental variables, but rather what 
>creates them. 

The creator is C on the first call of PUTENV. It can be any program which is 
not necessarily a shell.  Of all the large list of shells (e.g. ksh, bash, sh 
and many more) makes you think each shell has it's own implementation of PUTENV.

Some shells are open source. The ones I've looked at use putenv and setenv from 
STDLIB. However for accessing it, they ignore getenv because it is so 
lightweight. Instead, use envp external variable directly and access each array 
entry.

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

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 20:54:56 +, Seymour J Metz  wrote:

>Even if you have an OMVS segment,
> you don't get dubbed ntil you use a Unix service.

What is your point about the OMVS segment? It simply authorizes the system to 
dub an address space. More important, unless IBM implemented locking with UNIX 
services, you should be able to use environment variables without an OMVS 
segment.

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

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 17:31:32 +, Seymour J Metz  wrote:

>And what if a non-Unix application uses a serrvice that causes dubbing?

Environment variables are part of the C language. Regardless of dubbing, 
environment variables can be added by any programs using that feature.

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

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 17:20:37 +, Seymour J Metz  wrote:

>I'm saying that BPXBATCH is a shell and is not part of, e.g., EXEC.

BPXBATCH is not a shell. Most notably a shell language is missing.  

> I'm also saying that the mere act of getting dubbed does not cause BPXBATCH 
> to be involved.

Dubbing is the act of making UNIX features available to an address space. If 
you use TCP in your TSO address space, it will get dubbed because TCP uses UNIX 
features. BPXBATCH has nothing to do with TSO. It's simply an address space 
that will obviously get dubbed.

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

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 15:04:51 +, David L. Craig  wrote:

>Nobody has pointed out environment variables are a component
>of the POSIX definition; thus, for the MVS universe it was
>only intended to be what was needed for POSIX certification
>and is so only available within USS. 

Actually environment variables are a feature of C implemented in STDLIB. It is 
available to all environments that support locking which probably means GRS.

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

Re: SMF Extract Using to find the user id who deleted datasets

[Edward Gould]

> On Sep 4, 2023, at 10:21 AM, Ituriel do Neto 
> <03427ec2837d-dmarc-requ...@listserv.ua.edu> wrote:
> 
> Hi,
> 
> There is a utility on CBT site that may help you to find it.
> It is called DAF.
> 
> 
> Best Regards
> 
> Ituriel do Nascimento Neto
> z/OS System Programmer
> 
> 
> 

Yes, that program saved me a lot of time finding the culprits. Its fast and 
easy to use. I forgot who wrote it but it was worth  every penny.
Ed
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: With regrets, after many years I will no longer be following IBM-MAIN

[Edward Gould]

> On Sep 4, 2023, at 12:36 AM, Brian Westerman  
> wrote:
> 
> I think even the ones that abuse the list the most still provide assistance 
> from time to time that is very useful.  I completely understand that 
> oftentimes they want the person to RTFM, which makes a lot of sense because 
> you also don't want the list to become a primary school.  The "new guys" need 
> to learn how to use the manuals and I think the "old guys" are trying to, in 
> their own way, help them to see that using the manuals and figuring stuff out 
> is a good thing.  Where it becomes an issue is when the newbie honestly can't 
> figure it out and may have truly tried to find the solution on their own. 
> 
> It might be helpful for them, in fact everyone, to disclose what you have 
> already tried or read about, that way everyone will see that they are trying 
> and won't just kiss them off as using the list instead of manuals (and the 
> internet) as opposed to using it in conjunction with attempting to learn.  
> 
> Sometimes they may have actually read the solution, but just don't see it as 
> such, and by disclosing what they have tried so far will allow people to let 
> them know where they missed something.  I think that no one likes to think 
> that the guy asking the question is not even really trying to work the 
> problem.  But without disclosing the path they are currently on, we have no 
> way to know otherwise.
> 
> Just a thought.
> 
> Brian
> 
> -

> Brian:
I had a situation years ago. We were looking for a entry level systems 
programmer. I came up with a simple request to write an assembler program in as 
short of statements as possible. I handed it to the third interviewee and asked 
for the answer the next day as I wanted to get to know the guy a little before 
hiring him.

This was in the 1990’s (early) IIRC. I was new to IBM-MAIN and was getting to 
know the contributors. When I got home that evening I looked at the email for 
the list and was surprised when I saw the candidate  that I had handed the 
quick quiz to. He asked the question I had a posed and wanted someone to help 
him out.
The next day he dropped off the answer to the question with a very short (well 
written) answer.

I looked at him and asked who on IBM-MAIN helped him out. He was surprised that 
I was on IBM-Main as well. He said no one, but I pushed back a little and he 
said finally a couple of people on here had helped him out a little. I thanked 
him and as he left I threw “his” answer in the trash can. I finally after about 
15 interviews hired a person, who worked out well and I was happy to see him 
get promoted almost on a yearly basis. I ended up leaving the company as they 
want to move to Florida to get cheap labor. I hated to leave as the company up 
until I left had excellent education offerings and 4 weeks every year of 
vacation and other great benefits.
Ed
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz  wrote:

>Where do you think process initialization gets the variable names and values?

Environment variables is empty until the first environment variable is added. 
Typically a shell is the first to add environment variables but it could just 
as easily be any language that calls the C environment variable APIs (e.g. 
Python and JAVA).   

There is an open source version of the STDLIB (Standard library) called GLIBC 
located at 
https://sourceware.org/git/?p=glibc.git;a=tree;f=stdlib;h=4c362998447b7664b4268fa732e90389bc1b8410;hb=HEAD
 which implements GETENV, PUTENV and other related functions.

IBM most likely did a similar implementation in IBM C but without seeing the 
source, I can't be 100% sure.  

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

Re: A Little off topic but reasonable post (IMO)

[Seymour J Metz]

I suspect that the SPF clones for Linux and Unix will also run on the Mac. 
There's also THE, which is a (mostly) XEDIT clone.


From: IBM Mainframe Discussion List  on behalf of 
Edward Gould <04bcc43af339-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, October 5, 2023 7:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: A Little off topic but reasonable post (IMO)

Hello,
I am looking for an ISPF editor(like) for MACOSX I will be needing this quite a 
bit in a month or two.
Can anyone give me a hint as to its availability/non.
Thanks,
Ed
--
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: Assembler access to USS functions

[Seymour J Metz]

The issue isn't what has access to environmental variables, but rather what 
creates them. 

Further, they are useful in other contexts. An otherwise legacy program that 
uses a Unix command may need to pass the odd environment variable to control 
options for which there are no switches.


From: IBM Mainframe Discussion List  on behalf of Jon 
Perryman 
Sent: Thursday, October 5, 2023 9:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler access to USS functions

On Thu, 5 Oct 2023 20:54:56 +, Seymour J Metz  wrote:

>Even if you have an OMVS segment, you don't get dubbed ntil you use a Unix 
>service.

Environment variables are not unique to UNIX and do not require dubbing. It is 
a feature of the C/C++ language that is in the STDLIB (standard library) and 
can be used in any environment.

Environment variables are only useful in languages that do not support global 
variables or inter-language global variables is not supported. I suspect that C 
and Cobol global variables are shared because of LE. Languages like shells, 
Python, Java and others which are runtime languages don't have access to C and 
Cobol global variables which makes environment variables a simple 
inter-language-communications feature.

--
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: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 20:54:56 +, Seymour J Metz  wrote:

>Even if you have an OMVS segment, you don't get dubbed ntil you use a Unix 
>service.

Environment variables are not unique to UNIX and do not require dubbing. It is 
a feature of the C/C++ language that is in the STDLIB (standard library) and 
can be used in any environment. 

Environment variables are only useful in languages that do not support global 
variables or inter-language global variables is not supported. I suspect that C 
and Cobol global variables are shared because of LE. Languages like shells, 
Python, Java and others which are runtime languages don't have access to C and 
Cobol global variables which makes environment variables a simple 
inter-language-communications feature.

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

Re: Is the IBM Assembler List still alive

[Edward Gould]

> On Sep 5, 2023, at 8:17 AM, Clem Clarke  wrote:
> 
> Yes, we send a bug report way back in the 1960's at Shell Oil in Melbourne.
> 
> We used COND codes a lot, and it mucked everything up!
> 
> Clem
> 
> 
> Colin Paice wrote:
>> I heard that IEFBR14  had the highest "bug rate" per line of code
>> 1) There was no CSECT statement
>> 2) It was not reentrant
>> 3) It did not clear R15 prior to exit
>> 4) It was missing an end statement
>> 
>> I was told this over 40 years ago... and may not be true


Clem,
I still remember getting called in at 2 AM because IEFBR14 did not set r15 with 
a zero before exiting. When I called it in to IBM and asked when can we expect 
a fix, 
I was told maybe in a month. I created my own version which did zero out r15. 
The next morning my boss’s boss came down from the tower and complemented me 
for fixing the issue. So quickly.
Later on in the year they handed out bonuses and I got a nice 3,000.00 check. I 
did not do anything that any other competent sysprog would have done.
Ed
Ps: I just don’t remember the year but I think it was in the 1970’s (probably 
late), boy do I feel old.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SMP/E and PATH existence

[Phil Smith III]

Jon Perryman wrote:
>Kurt is saying that APPLY CHECK does exactly what you want. CHECK
>verifies SMP/e has everything expected and will run 100% through. If 3
>DD / DDDEF's are missing, then you should see those 3 errors and any
>other errors that SMP/e detects. APPLY CHECK only validates DD /
>DDDEF's that are needed for the apply and ignores all other DD /
>DDDEF's. I've never experienced missing DD / DDDEF's, so I'm basing
>this on Kurt's recommendation.

Yep, I got that, thanks. But understand that by that point, they're halfway 
through the install. Far better for it to fail first thing, so they can fix 
that and then run through the entire process. Remember how alien many z/OS 
folks think USS is.


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

Re: Simple request from chatGPT to write assembler program.

[Edward Gould]

> Begin forwarded message:
> 
> From: Steve Thompson 
> Subject: Re: Simple request from chatGPT to write assembler program.
> Date: September 5, 2023 at 2:27:52 PM CDT
> To: IBM-MAIN@LISTSERV.UA.EDU
> Reply-To: IBM Mainframe Discussion List 
> 
> And so we can now understand that when a paralegal or newly minted attorney 
> uses it to find case law for points and authorities, it will will make them 
> up to match what was being searched for when it prepares a motion it was 
> asked for using the results of the search.
> 
> And some attorneys got a judge quite angry with them when they didn't tell 
> the court this, but the opposing council pointed out they could not find any 
> such case listed in the pleadings/motion. Then the judge's people also could 
> not find same This is the kind of thing that concerns me about AI today. 
> Once it has been taught enough to learn on its own
> 
> Steve Thompson

SNIP=

Steve,

This is a war story, so ignore it if you want.
I worked at a place in the 1970s and 80's that did a lot of "what if" or other 
type of DB2(type) inquiries that came from manufactures or food chains wanted 
answers to questions like in (either/or) stores/cities or regions how good a 
product was selling (it was essentially) ad-hoc inquiries. These inquiries came 
to us via the phone. The person answering the phone would create (on a CRT) the 
language that the application used (in this case, it was assembler H macro's). 
The phone person would write the inquiry up on the screen) and submit the job. 
This would essentially create a semi unexecuteable load module. At the end of 
the week/month, A program that ran on MVS would take these non-executable 
programs, use them essentially as an inquiry and would, run these inquiries, 
and would spit out reports that the client received and would tell the client 
how well campaign did for sales of a specific ad champaign.
These clerks were essentially entry level (sub entry?) programmers. In the day, 
it was a remarkable system. I am not an expert and only interacted with the 
programmers(real). The batch system's multi-tasking was complex, and they kept 
the wolves away from the system's people. The entire system was at one time 
CICS-based, but due to politics, they went to another CICS type system 
(Intercom?). I do remember INTERCOM(?) as the first time they tried the system 
up, and it amended on a SOC1and I was presented a dump with the explanation 
that it was a system error. I looked at it and told them to look at the manual 
as it was a valid OC1 and to talk to the INTERCOM people. The real programmers 
left with the dump and spoke to the INTERCOM systems people. They fixed it. 
Luckily, they looked at the dumps before they brought them down to us again. 
Ed
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: SMP/E and PATH existence

[Jon Perryman]

On Thu, 5 Oct 2023 19:09:45 -0400, Phil Smith III  wrote:

>Kurt Quackenbush wrote:
>>SMP/E APPLY CHECK and similar commands verify existence of directories

>Thanks. Since I really, really don't want them to get 3/4 of the way through 
> and then have to go hunt down someone with USS access

Phil,

Kurt is saying that APPLY CHECK does exactly what you want. CHECK verifies 
SMP/e has everything expected and will run 100% through. If 3 DD / DDDEF's are 
missing, then you should see those 3 errors and any other errors that SMP/e 
detects. APPLY CHECK only validates DD / DDDEF's that are needed for the apply 
and ignores all other DD / DDDEF's. I've never experienced missing DD / 
DDDEF's, so I'm basing this on Kurt's recommendation.

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

Re: A Little off topic but reasonable post (IMO)

[Mike Schwab]

https://primanew.amebaownd.com/posts/15535751/

On Thu, Oct 5, 2023 at 6:01 PM Edward Gould
<04bcc43af339-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hello,
> I am looking for an ISPF editor(like) for MACOSX I will be needing this quite 
> a bit in a month or two.
> Can anyone give me a hint as to its availability/non.
> Thanks,
> Ed
> --
> 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: SMP/E and PATH existence

[Phil Smith III]

Kurt Quackenbush wrote:
>SMP/E APPLY CHECK and similar commands verify existence of directories
>and data sets from DDDEF entries before they are used. There is no
>independent SMP/E command or utility to perform this verification.
>However, there is a capability in z/OSMF Software Management, the
>Software Instance Validation action, which does this kind of checking,
>among others.

Thanks. Since I really, really don't want them to get 3/4 of the way through 
and then have to go hunt down someone with USS access, I'll use 
BPXBATCH/IDCAMS. At least now I know I'm not missing something obvious!


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

Re: PARM='GRAPHICS(CHAIN(SN))'

[Phil Smith III]

For the record, while I was the one who used it, I did NOT know about it-a 
colleague did. I am only an egg when it comes to z/OS stuff. Just in case 
someone was wondering-which I know you weren't, but I didn't want to get credit 
where it wasn't due.


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

A Little off topic but reasonable post (IMO)

[Edward Gould]

Hello,
I am looking for an ISPF editor(like) for MACOSX I will be needing this quite a 
bit in a month or two.
Can anyone give me a hint as to its availability/non.
Thanks,
Ed
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Creating USSMSG10 ASM code from Screen text using CLIST or REXX

[Mark Regan]

Cross-posted to IBM-MAIN and IBMTCP-L

 

At one time, I had a CLIST or REXX code that would take the screen layout and 
turn it into the necessary USSMSG10 code. If anyone has that, I would 
appreciate it.

 

Example of source:

 

  ENTERPRISE DATA CENTER\  _  /.::o:. 
  SYSTEM PROGRAMMER  (\o/).::::o:.
 TEST SYSTEM ---  / \  ---:o:__:::
HAPPY HOLIDAYS>*< `:}_>()<_{:'
 >0<@< @`'//\\'`@ 
>>>@<<*  @ # //  \\ # @   
   >@>*<0<<<   __#_#/''\#_#_  
  >*>>@<<<@<<  _Y 
 >@>>0<<<*<<@< |=_- .-/\ /\ /\ /\--. =_-| 
>*>>0<<@<<<@<<<|-_= | \ \\ \\ \\ \ |-_=-| 
   >@>>*<<@<>*<<0<*<   |_=-=| / // // // / |_=-_| 
 \*/  >0>>*<<@<>0><<*<@<<  |=_- |`-'`-'`-'`-'  |=_=-| 
 ___\\U//___ >*>>@><0<<*>>@><*<0<< | =_-| o  o |_==_| 
 |\\ | | \\|>@>>0<*<<0>>@<<0<<<*<@<|=_- | ! (! |=-_=| 
 | \\| | _(UU)_ >((*))_>0><*<0><@<<<0<*<-,-=| !).! |-_-=| 
 |\ \| || / //||.*.*.*.|>>@<<*<<@>><0<<<((=_| ! __(:')__ ! |=_==| 
 |\\_|_|&&_// ||*.*.*.*|_\\db//__ (\_/)-|/5\=5=55=5=/5\| _=_| 
 |'.'.'.|~~|.*.*.*| |_   =('Y')=//,.  
 |'.'.'.|   55||>>|  ( ~~~ )/ 
  '`--'  `w---w`  `'  
  
Please note:  For everyone's mutual protection, ALL SYSTEM USE, including 
electronic mail, MAY BE MONITORED to protect against unauthorized use.
Enter your application name ===>  

 

Regards,

Mark Regan

z/OS Network Systems Programmer (z NetView, z/OS Communications Server)



 


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

Re: IPCS: Can ADPLSACC Service code access 64 bit storage

[Michael Stein]

On Thu, Oct 05, 2023 at 03:53:48PM -0400, Joseph Reichman wrote:
> Can ADPLSACC Service code access 64 bit storage

Context?

Oh, IPCS

z/OS MVS IPCS Customization
https://www.ibm.com/docs/en/zos/2.1.0?topic=services-invoking-exit-router

https://www.ibm.com/docs/en/zos/2.1.0?topic=sas-requirements

Field ADPLPAAD in ADPLPACC must contain the address of the requested dump data.

MVS Data Areas (ABE - IAR)
https://www.ibm.com/docs/en/zos/3.1.0?topic=iar-blsabdpl-information

 The following bit governs the masking of register zero prior
 to its use by the storage access service as a virtual
 storage address. If it is off, X'7FFF' will be
 logically ANDed with register zero to obtain the requested
 address. If it is on, X'00FF' will be logically ANDed
 with register zero to obtain the requested address.

Hard to fit 64 bits in x'7fff'

Don't know the real answer.  The first question I'd ask is if
the 64 bit storage was in the dump.  2nd is how to get to it...

take a look at:

https://www.ibm.com/docs/en/zos/3.1.0?topic=router-symbol-service

Symbol Service

https://www.ibm.com/docs/en/zos/3.1.0?topic=router-symbol-service

Note that in OS/390® Release 10 and higher, the symbol service supports
64-bit addresses and lengths.

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

Re: IPCS: Can ADPLSACC Service code access 64 bit storage

[Adam Johanson]

I recently fought this battle when writing a verb exit that needed to access 
64-bit storage. Perhaps it was because I couldn't see how to get ADPLSACC to 
access 64-bit storage.

The IPCS Customization doc mentions that the Storage Map Service (ADPLSMAP) can 
do it, so that's what I went with. It gets passed an XMSP area which points to 
another area that you need, the Storage Map Record, mapped by BLSRSASY. The 
XMSP points to the Storage Map Record via XMSPSAR.

Looking at the verb exit, the other relevant parts to accessing 64-bit storage 
seem to be:

- BLSRSASY specifying ABITS=64

- Setting flag XMSPV64 in the XMSP


Items for using ADPLSMAP that don't seem to be unique to accessing 64-bit 
storage:

-  I used the "Address Space Type Code" (field SASYAST) of "CPU ASID" via 
setting SASYAST to EQUate ZZZASTCV. For this "protocol", the ASID from which to 
get the storage is set in the 2nd qualifier (SASYAS2). In my case, I got the 
ASID from ADPLASID. The first qualifier (SASYAS1) is set to x''. This 
is mentioned towards the top of the BLSRSASY expansion.

- Set XMSPCODE to EQUate XMSPACC indicating that we're accessing storage

- Buffer to return storage into is pointed to by XMSPBUF

- Address of storage to get from the dump is set in SASYLAD

- Amount of storage to get is set in SASYFLE

- Data type code SASYDTY set to EQUate ZZZDTYU, indicating "area"


Those seem to be the important parts of what was required apart from the 
"administrative" stuff like setting the module name. I was also using an 
initialized BLSRSASY area from its macro invocation, so that could be setting 
(important) things that I missed mentioning.

It took a bit of trial and error, so there could be a better way. But the 
Storage Map Service seems pretty powerful, so I liked the idea of having a 
working example of how to use it for future reference.

===
Adam Johanson
Broadcom Mainframe Software Division

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

Re: Assembler access to USS functions

[Seymour J Metz]

Even if you have an OMVS segment, you don't get dubbed ntil you use a Unix 
service.



From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, October 5, 2023 3:10 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler access to USS functions

On Thu, 5 Oct 2023 17:31:32 +, Seymour J Metz wrote:

>And what if a non-Unix application uses a serrvice that causes dubbing?
>
I suppose you can call BPXBATCH a shell, but Humpty Dumpty.

Otherwise, you raise several related questions.  I looked at one of my 
favorites:

env
An optional argument, env is the name of a compound variable (stem) that 
contains environment variables for the command. env.0 must contain the number 
of environment variables to be passed to the command. env.1, env.2, ... contain 
the variables in the form variable_name=variable_value. If env is not 
specified, the current environment is passed to the shell.

I'll submit an RCF asking what "current environment" means in ah undubbed
address space such as IRXJCL.

Perhaps by a user with no OMVS segment; no DEFUSER; etc.


From: Paul Gilmartin
Sent: Thursday, October 5, 2023 9:05 AMs

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz wrote:

>Where do you think process initialization gets the variable names and values?
>
I believe:
o If the process is initialized by init (often PID 0), init creates the environ 
array.

o If the process is initialized by fork() the environ array is copied from the 
parent.

o If one of the exec family of functions replaces the current process image,
  the environ array is copied from the envp[] argument.

None of these require a shell.

--
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: SMP/E and PATH existence

[Kurt Quackenbush]

>>A long time ago, I wrote a program called DDDEFCHK that used the SMP/E 
>>API to check if normal DDDEF data sets exist - there is also a DDDEFPTH 
>>companion program to handle paths.

> Ah, so that kinda confirms that SMP/E can't do it natively. I think 
> BPXBATCH/IDCAMS are a better bet for us, then-nothing to maintain. Thanks.

SMP/E APPLY CHECK and similar commands verify existence of directories and data 
sets from DDDEF entries before they are used.  There is no independent SMP/E 
command or utility to perform this verification.  However, there is a 
capability in z/OSMF Software Management, the Software Instance Validation 
action, which does this kind of checking, among others.

Kurt Quackenbush
IBM  |  z/OS SMP/E and z/OSMF Software Management  |  ku...@us.ibm.com

Chuck Norris never uses CHECK when he applies PTFs.

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

IPCS: Can ADPLSACC Service code access 64 bit storage

[Joseph Reichman]

Can ADPLSACC Service code access 64 bit storage

thanks

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

Re: Assembler access to USS functions

[Paul Gilmartin]

On Thu, 5 Oct 2023 17:31:32 +, Seymour J Metz wrote:

>And what if a non-Unix application uses a serrvice that causes dubbing?
>
I suppose you can call BPXBATCH a shell, but Humpty Dumpty.

Otherwise, you raise several related questions.  I looked at one of my 
favorites:

env
An optional argument, env is the name of a compound variable (stem) that 
contains environment variables for the command. env.0 must contain the number 
of environment variables to be passed to the command. env.1, env.2, ... contain 
the variables in the form variable_name=variable_value. If env is not 
specified, the current environment is passed to the shell.

I'll submit an RCF asking what "current environment" means in ah undubbed
address space such as IRXJCL.

Perhaps by a user with no OMVS segment; no DEFUSER; etc.


From: Paul Gilmartin 
Sent: Thursday, October 5, 2023 9:05 AMs

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz wrote:

>Where do you think process initialization gets the variable names and values?
>
I believe:
o If the process is initialized by init (often PID 0), init creates the environ 
array.

o If the process is initialized by fork() the environ array is copied from the 
parent.

o If one of the exec family of functions replaces the current process image,
  the environ array is copied from the envp[] argument.

None of these require a shell.

-- 
gil

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

Re: [External] : Re: CA-1 Withdrawl from z/OS 2.5

[Richard McIntosh]

No IPL is necessary.

Stop all Tape processing.
Do final conversion of data if needed.

Use TMSINIT to deactivate CA1
https://techdocs.broadcom.com/us/en/ca-mainframe-software/performance-and-storage/ca-1-tape-management-system/14-0/utilities-and-reports/tmsinit-utility-activate-deactivate-ca-1/deactivating-ca-1.html

This will remove all the CA1 components from the system.

Once removed, you can place DFRMM into PROTECT mode.

Restart tape processing.

If you have a tape library, be sure to be using the IBM CBR exits and not your 
CA1 exits.

If you had the CA1 failsafe exit installed, you should deactivate that as well.

Rename the CA1 TMC and AUDIT files so nothing tries to use them.

Richard
 



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
paul zellermaier
Sent: Thursday, October 5, 2023 12:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] : Re: CA-1 Withdrawl from z/OS 2.5

        

Sent from Yahoo Mail on Android 
 
  On Thu, Sep 28, 2023 at 5:22 PM, Paul Gorlinsky 
wrote:   We are investigating what is necessary to remove CA-1 from the system 
after turning on RMM in protect mode. 

My original plan was to us TMSINIT to remove CA-1 and disable the PROC 
(TMSINIT) prior to starting DFRMM...

Or do I need to move it's SVC, re-IPL and not start TMSINIT and then start 
DFRMM...

Any help would be appreciated 

Thanks
Paul

--
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: SMP/E and PATH existence

[Phil Smith III]

Rob Scott wrote:
>A long time ago, I wrote a program called DDDEFCHK that used the SMP/E
>API to check if normal DDDEF data sets exist - there is also a
>DDDEFPTH companion program to handle paths.

Ah, so that kinda confirms that SMP/E can't do it natively. I think 
BPXBATCH/IDCAMS are a better bet for us, then-nothing to maintain. Thanks.


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

Re: CA-1 Withdrawl from z/OS 2.5

[paul zellermaier]

        

Sent from Yahoo Mail on Android 
 
  On Thu, Sep 28, 2023 at 5:22 PM, Paul Gorlinsky 
wrote:   We are investigating what is necessary to remove CA-1 from the system 
after turning on RMM in protect mode. 

My original plan was to us TMSINIT to remove CA-1 and disable the PROC 
(TMSINIT) prior to starting DFRMM...

Or do I need to move it's SVC, re-IPL and not start TMSINIT and then start 
DFRMM...

Any help would be appreciated 

Thanks
Paul

--
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: Assembler access to USS functions

[Seymour J Metz]

And what if a non-Unix application uses a serrvice that causes dubbing?


From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, October 5, 2023 9:05 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler access to USS functions

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz  wrote:

>Where do you think process initialization gets the variable names and values?
>
I believe:
o If the process is initialized by init (often PID 0), init creates the environ 
array.

o If the process is initialized by fork() the environ array is copied from the 
parent.

o If one of the exec family of functions replaces the current process image,
  the environ array is copied from the envp[] argument.

None of these require a shell.

From:  Jon Perryman
Sent: Wednesday, October 4, 2023 11:09 PM
On Thu, 5 Oct 2023 02:37:57 +, Seymour J Metz  wrote:

>The shell creates the environment variables.

No. The environment variable array is created by process initialization. The 
shell and programs can modify the array. I believe sub-shells in the same 
process use the same array.

--
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: Assembler access to USS functions

[Seymour J Metz]

I'm saying that BPXBATCH is a shell and is not part of, e.g., EXEC. I'm also 
saying that the mere act of getting dubbed does not cause BPXBATCH to be 
involved.


From: IBM Mainframe Discussion List  on behalf of Jon 
Perryman 
Sent: Thursday, October 5, 2023 11:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler access to USS functions

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz  wrote:

>Where do you think process initialization gets the variable names and values?

Process initialization initializes environment variables from /etc/environment. 
There is no requirement any shell environment (e.g. bash, csh or ...). Are you 
saying that PGM=BPXBATCH,PARM=’PGM program-name’ invokes a shell to create the 
environment variables? Most notably $PATH. Granted that shells simplify adding 
environment variables but programs are able to add environment variables 
without using export, setenv or ???.

--
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: PARM='GRAPHICS(CHAIN(SN))'

[Seymour J Metz]

> o If it's generally needed, why isn't it an option on DD SYSOUT?

Because the damage is already done. What is needed is for the utilities to stop 
checking for invalid characters. After that happens you can worry about SYSOUT 
filtering.


From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, October 5, 2023 12:19 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: PARM='GRAPHICS(CHAIN(SN))'

In a recent post, I saw:
//TESTDIR  EXEC PGM=IDCAMS,PARM='GRAPHICS(CHAIN(SN))'

o Why is PARM='GRAPHICS(CHAIN(SN))' still a thing?

o Cui bono?

o In this 21st Century, why isn't the default the identity translation?

o If it needs to ba thing, why doesn't every utility support it?

o If it's generally needed, why isn't it an option on DD SYSOUT?

(I was dismayed the first time I used IDCAMS and my comments vanished.)

--
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: PARM='GRAPHICS(CHAIN(SN))'

[Farley, Peter]

It is still “a thing” because IDCAMS PRINT was programmed to print the 
character side of the record ”DUMP” option using the most restrictive printed 
character set available at that time on actual printer devices (likely based on 
the 1403N1 48-character print chain most used for the fastest “business” report 
printing).

Personally, I always use 'GRAPHICS(CHAIN(TN))’ rather than “SN” because that 
print chain had the most available printed characters.  IIRC the “SN” chain 
lacked the EBCDIC super-script and sub-script characters that “TN” had, and 
perhaps a few others as well.

If you reported this to IBM I strongly suspect you would get WAD as the 
response.

Peter

From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Thursday, October 5, 2023 12:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: PARM='GRAPHICS(CHAIN(SN))'


In a recent post, I saw:

//TESTDIR  EXEC PGM=IDCAMS,PARM='GRAPHICS(CHAIN(SN))'



o Why is PARM='GRAPHICS(CHAIN(SN))' still a thing?



o Cui bono?



o In this 21st Century, why isn't the default the identity translation?



o If it needs to ba thing, why doesn't every utility support it?



o If it's generally needed, why isn't it an option on DD SYSOUT?



(I was dismayed the first time I used IDCAMS and my comments vanished.)



--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

Re: SMP/E and PATH existence

[Rob Scott]

Phil,

A long time ago, I wrote a program called DDDEFCHK that used the SMP/E API to 
check if normal DDDEF data sets exist - there is also a DDDEFPTH companion 
program to handle paths.

I believe these programs still exist in the public domain in the CBT tape site 
(www.cbttape.org) - see files 411 and 412.

Rob Scott
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Thursday, October 5, 2023 4:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SMP/E and PATH existence

EXTERNAL EMAIL





Is there a way to get SMP/E to validate the existence of a USS path on a DDEF? 
Thanks to y'all's help, I have externalized the USS path we use to a variable. 
However, if the directory doesn't exist, the user can get pretty far (to the 
RECEIVE step) before that's recognized. I've looked at the SMP/E doc but didn't 
find anything.

I realize I can do this with BPXBATCH:
//TESTDIR  EXEC PGM=BPXBATCH,PARM='SH test -d '

Or with IDCAMS:
//TESTDIR  EXEC PGM=IDCAMS,PARM='GRAPHICS(CHAIN(SN))'
//SYSINDD *,SYMBOLS=(JCLONLY,JESJCL)
ALLOCATE   DDNAME(VSHZFS1) PATH('')

But this seems like something SMP/E might reasonably also do "natively". Can it?


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


Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

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

Re: PARM='GRAPHICS(CHAIN(SN))'

[Mike Schwab]

Somebody was trying to print a pdf with box characters and NO codepages matched.

On Thu, Oct 5, 2023 at 11:20 AM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> In a recent post, I saw:
> //TESTDIR  EXEC PGM=IDCAMS,PARM='GRAPHICS(CHAIN(SN))'
>
> o Why is PARM='GRAPHICS(CHAIN(SN))' still a thing?
>
> o Cui bono?
>
> o In this 21st Century, why isn't the default the identity translation?
>
> o If it needs to ba thing, why doesn't every utility support it?
>
> o If it's generally needed, why isn't it an option on DD SYSOUT?
>
> (I was dismayed the first time I used IDCAMS and my comments vanished.)
>
> --
> gil
>
> --
> 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

PARM='GRAPHICS(CHAIN(SN))'

[Paul Gilmartin]

In a recent post, I saw:
//TESTDIR  EXEC PGM=IDCAMS,PARM='GRAPHICS(CHAIN(SN))'

o Why is PARM='GRAPHICS(CHAIN(SN))' still a thing?

o Cui bono?

o In this 21st Century, why isn't the default the identity translation?

o If it needs to ba thing, why doesn't every utility support it?

o If it's generally needed, why isn't it an option on DD SYSOUT?

(I was dismayed the first time I used IDCAMS and my comments vanished.)

-- 
gil

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

SMP/E and PATH existence

[Phil Smith III]

Is there a way to get SMP/E to validate the existence of a USS path on a DDEF? 
Thanks to y'all's help, I have externalized the USS path we use to a variable. 
However, if the directory doesn't exist, the user can get pretty far (to the 
RECEIVE step) before that's recognized. I've looked at the SMP/E doc but didn't 
find anything.

I realize I can do this with BPXBATCH:
//TESTDIR  EXEC PGM=BPXBATCH,PARM='SH test -d '

Or with IDCAMS:
//TESTDIR  EXEC PGM=IDCAMS,PARM='GRAPHICS(CHAIN(SN))'
//SYSINDD *,SYMBOLS=(JCLONLY,JESJCL)
ALLOCATE   DDNAME(VSHZFS1) PATH('')

But this seems like something SMP/E might reasonably also do "natively". Can it?


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

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz  wrote:

>Where do you think process initialization gets the variable names and values?

Process initialization initializes environment variables from /etc/environment. 
There is no requirement any shell environment (e.g. bash, csh or ...). Are you 
saying that PGM=BPXBATCH,PARM=’PGM program-name’ invokes a shell to create the 
environment variables? Most notably $PATH. Granted that shells simplify adding 
environment variables but programs are able to add environment variables 
without using export, setenv or ???.

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

Re: Assembler access to USS functions

[David L. Craig]

On 23Oct05:0616-0400, David Cole wrote:

> To all of you who responded to my query, I thank you.
> 
> Unfortunately (well, fortunately actually) I'm on the verge of leaving for
> vacation for the month (Viking cruise, Istanbul to Venice), so I won't get a
> chance to go over everything until November.
> 
> But all y'all have given me a lot to look at.
> 
> Thank you!
> Dave

Nobody has pointed out environment variables are a component
of the POSIX definition; thus, for the MVS universe it was
only intended to be what was needed for POSIX certification
and is so only available within USS.  Until Dave introduced
this topic, noone apparently had ever worried about this.

Second, any POSIX programmer will tell you environment
variables are process-specific.  When a shell spawns a
subshell process, it creates the new process' environment
variables by cloning its own and then modifying the clone
as needed.  The subshell has no access to the parent's
environment variables by design, nor does the parent have
access to the subshell's environment variables after it
has been started.
-- 

May the LORD God bless you exceedingly abundantly!

Dave_Craig__
"So the universe is not quite as you thought it was.
 You'd better rearrange your beliefs, then.
 Because you certainly can't rearrange the universe."
__--from_Nightfall_by_Asimov/Silverberg_

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

Re: Assembler access to USS functions

[Farley, Peter]

Hi Dave,

Since you are considering an XDCUSS(A) suite, I presume they will of necessity 
be LE POSIX(ON) programs, so the LE function ceebenv() function documented in 
the LE Vendor Interfaces manual should be available to assembler code to 
interrogate the environment variables.

I also remember seeing comments (possibly in the Vendor Interfaces manual) that 
the environment array may have its address in the CAA somewhere, or reachable 
from the CAA at any rate, and if your code doesn’t always have the CAA address 
at hand there is also an assembler interface to get the CAA address which is  
documented in either the Vendor Interfaces manual or in the normal LE reference 
manual.

HTH

Peter

From: IBM Mainframe Discussion List  On Behalf Of 
David Cole
Sent: Thursday, October 5, 2023 6:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler access to USS functions


Hi Jon, Hi Peter,



I must say, your insights have been quite helpful. Thank you!



Jon, You raise a good point. I neglected to say why I wanted to get

at the environment variables. Ok, here's why...







Classic z/XDC uses keyword ddnames as a very easy way to pass a fair

number of processing settings  into z/XDC. It's easy for the user to

use, and it's super easy for z/XDC to find.



We are considering writing a XDCUSS[A] analog to XDCCALL[A], and we'd

like to continue using the keyword ddname approach for passing

settings into z/XDC.

* However, my developer says that's not feasible, so I'm looking

for alternative approaches.

* To my naive mind, it seems to me that environmental variables

could be such an alternative.

* However, my developer says that environmental variables, while

available to C programs, are unavailable to assembler.

* I find that astonishing.

My developer has had little prior experience with USS; however, he is

an extraordinarily quick study, and has assimilated a lot of

knowledge in a very short time. Nevertheless, I thought I'd appeal to

the broader community in the hopes of learning what more experienced

minds have to say.





So our initial goal is to use environment variables for z/XDC's

internal control purposes.

But once that is accomplished, the broader purpose of providing

displays to the user will probably be undertaken.



Dave







At 10/5/2023 02:22 AM, Jon Perryman wrote:

>On Thu, 5 Oct 2023 05:46:48 +, Farley, Peter

> wrote:

>

> >Why does any programmer need to care where the environment

> variables are stored?

>

>Normally, I would agree but XDC is a very special case with very

>broad requirements. As a full z/OS system debugger, Dave Cole has

>many requirements that are atypical. E.g. does he want the ability

>to display environment variables from all processes instead of just

>the process being debugged? He also has restrictions such as

>debugging SRB, SVC, PC routines and more. More than likely, he

>doesn't want to use SRB's & IRB's to gather the data when access

>registers are simpler.

>

--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

Re: CICS List Serv

[Jon Butler]

cic...@listserv.uga.edu

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

CICS List Serv

[esst...@juno.com]

Does anyone know the procedure to reister for CICS Listserv ?

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

Re: SCHEDIRB

[Joseph Reichman]

Thanks I have verified the IRB ran to completion while at a test breakpoint in 
the originating TCB the IRB ran under IKJEFT01 on a different cpu 

> On Oct 4, 2023, at 10:56 PM, Jon Perryman  wrote:
> 
> On Mon, 2 Oct 2023 16:18:24 -0400, Joseph Reichman  
> wrote:
> 
>> Do suggest when scheduling an Async IRB I have a Wait/Post 
> 
> Joseph, yes you need to wait/post because an async IRB only serializes on 1 
> TCB (TCB with the IRB). If you do use WAIT, then you should implement 
> recovery in the IRB. While it's unlikely to abend, the wait must be posted 
> otherwise you have a hang. For instance, what happens if the LOAD does not 
> find the module? At the very least, code error return.
> 
> --
> 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: Assembler access to USS functions

[Paul Gilmartin]

On Thu, 5 Oct 2023 05:46:48 +, Farley, Peter  wrote:
>
>I am sorry to say that your comments so far appear merely pedantic to me, and 
>in particular not very useful to the OP.  If there is a substantive reason for 
>the OP to care about these kinds of details, please elaborate.
>
It probably does not matter to the OP.  It mattered to ma at one time
when I modified a multi-platform FOSS C program, relying on the
POSIX specification of putenv().  It worked as I intended on POSIX
conforming implementations, but failed on pre-1.2 z/OS.

-- 
gil

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

Re: Assembler access to USS functions

[Paul Gilmartin]

On Thu, 5 Oct 2023 11:07:03 +, Seymour J Metz  wrote:

>Where do you think process initialization gets the variable names and values?
>
I believe:
o If the process is initialized by init (often PID 0), init creates the environ 
array.

o If the process is initialized by fork() the environ array is copied from the 
parent.

o If one of the exec family of functions replaces the current process image,
  the environ array is copied from the envp[] argument.

None of these require a shell.

From:  Jon Perryman
Sent: Wednesday, October 4, 2023 11:09 PM
On Thu, 5 Oct 2023 02:37:57 +, Seymour J Metz  wrote:

>The shell creates the environment variables.

No. The environment variable array is created by process initialization. The 
shell and programs can modify the array. I believe sub-shells in the same 
process use the same array.

-- 
gil

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

Re: Assembler access to USS functions

[Mike Schwab]

How about a PGM=CGETENV with a 4K/16K/64K? memory area for the C
program to copy the ENV area into?

On Thu, Oct 5, 2023 at 5:43 AM David Cole  wrote:
>
> Hi Jon, Hi Peter,
>
> I must say, your insights have been quite helpful. Thank you!
>
> Jon, You raise a good point. I neglected to say why I wanted to get
> at the environment variables. Ok, here's why...
>
>
>
> Classic z/XDC uses keyword ddnames as a very easy way to pass a fair
> number of processing settings  into z/XDC. It's easy for the user to
> use, and it's super easy for z/XDC to find.
>
> We are considering writing a XDCUSS[A] analog to XDCCALL[A], and we'd
> like to continue using the keyword ddname approach for passing
> settings into z/XDC.
> * However, my developer says that's not feasible, so I'm looking
> for alternative approaches.
> * To my naive mind, it seems to me that environmental variables
> could be such an alternative.
> * However, my developer says that environmental variables, while
> available to C programs, are unavailable to assembler.
> * I find that astonishing.
> My developer has had little prior experience with USS; however, he is
> an extraordinarily quick study, and has assimilated a lot of
> knowledge in a very short time. Nevertheless, I thought I'd appeal to
> the broader community in the hopes of learning what more experienced
> minds have to say.
>
>
> So our initial goal is to use environment variables for z/XDC's
> internal control purposes.
> But once that is accomplished, the broader purpose of providing
> displays to the user will probably be undertaken.
>
> Dave
>
>
>
> At 10/5/2023 02:22 AM, Jon Perryman wrote:
> >On Thu, 5 Oct 2023 05:46:48 +, Farley, Peter
> > wrote:
> >
> > >Why does any programmer need to care where the environment
> > variables are stored?
> >
> >Normally, I would agree but XDC is a very special case with very
> >broad requirements. As a full z/OS system debugger, Dave Cole has
> >many requirements that are atypical. E.g. does he want the ability
> >to display environment variables from all processes instead of just
> >the process being debugged? He also has restrictions such as
> >debugging SRB, SVC, PC routines and more. More than likely, he
> >doesn't want to use SRB's & IRB's to gather the data when access
> >registers are simpler.
> >
> >--
> >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: RACF ICH408I messages

[Chalk, Shelia]

I will look at vanguard.

Thanks
Shelia Chalk

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Robert S. Hansel (RSH)
Sent: Thursday, October 5, 2023 4:38 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXT] Re: RACF ICH408I messages

Please Note: This email is from an [EXTERNAL] sender. Do not click on links or 
attachments unless you expect them from the sender and know the content is 
safe. Please contact the Service Desk if you have any concerns regarding this 
message.



Hi Shelia,

Assuming your RACF monitoring options have been set correctly, the ICH408I 
messages will likely have corresponding SMF records. You can use RACF's SMF 
Unload utility to generate text or XML output from these records for research 
and reporting. If you have an adjunct RACF SMF reporting product (e.g., zSecure 
Audit or Vanguard Advisor), it will provide ISPF menus for generating reports.

For more on setting up RACF monitoring options and using the SMF Unload, see 
our presentation on this topic.

https://www.rshconsulting.com/RSHpres/RSH_Consulting__RACF_Monitoring_&_Reporting__May_2019.pdf

Regards, Bob

Robert S. Hansel
Lead RACF Specialist
RSH Consulting, Inc.
617-969-8211
http://www.linkedin.com/in/roberthansel
http://www.rshconsulting.com/

Upcoming RSH RACF Training - WebEx
- RACF Level I Administration - DEC 4-8, 2023
- RACF Level II Administration - NOV 13-17, 2023
- RACF Level III Admin, Audit, & Compliance - OCT 30 - NOV 3, 2023***Date 
Change***
- RACF - Securing z/OS UNIX  - FEB 26 - MAR 1, 2024
-

-Original Message-
Date:Wed, 4 Oct 2023 17:38:18 +
From:"Chalk, Shelia" 
Subject: RACF ICH408I messages

Hello,

Is there a report that I can run to list all the ICH408i messages within a time 
period?

Thanks
Shelia Chalk

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

==
This email, and any files transmitted with it, is confidential and intended 
solely for the use of the individual or entity to which it is addressed. If you 
have received this email in error, please notify the system manager. This 
message contains confidential information and is intended only for the 
individual named. If you are not the named addressee, you should not 
disseminate, distribute or copy this e-mail. Please notify the sender 
immediately by e-mail if you have received this message by mistake and delete 
this e-mail from your system. If you are not the intended recipient, you are 
notified that disclosing, copying, distributing or taking any action in 
reliance on the contents of this information is strictly prohibited.

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

Re: Assembler access to USS functions

[Seymour J Metz]

Where do you think process initialization gets the variable names and values?


From: IBM Mainframe Discussion List  on behalf of Jon 
Perryman 
Sent: Wednesday, October 4, 2023 11:09 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler access to USS functions

On Thu, 5 Oct 2023 02:37:57 +, Seymour J Metz  wrote:

>The shell creates the environment variables.

No. The environment variable array is created by process initialization. The 
shell and programs can modify the array. I believe sub-shells in the same 
process use the same array.

--
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: Assembler access to USS functions

[David Cole]

Hi Jon, Hi Peter,

I must say, your insights have been quite helpful. Thank you!

Jon, You raise a good point. I neglected to say why I wanted to get 
at the environment variables. Ok, here's why...




Classic z/XDC uses keyword ddnames as a very easy way to pass a fair 
number of processing settings  into z/XDC. It's easy for the user to 
use, and it's super easy for z/XDC to find.


We are considering writing a XDCUSS[A] analog to XDCCALL[A], and we'd 
like to continue using the keyword ddname approach for passing 
settings into z/XDC.
   * However, my developer says that's not feasible, so I'm looking 
for alternative approaches.
   * To my naive mind, it seems to me that environmental variables 
could be such an alternative.
   * However, my developer says that environmental variables, while 
available to C programs, are unavailable to assembler.

   * I find that astonishing.
My developer has had little prior experience with USS; however, he is 
an extraordinarily quick study, and has assimilated a lot of 
knowledge in a very short time. Nevertheless, I thought I'd appeal to 
the broader community in the hopes of learning what more experienced 
minds have to say.



So our initial goal is to use environment variables for z/XDC's 
internal control purposes.
But once that is accomplished, the broader purpose of providing 
displays to the user will probably be undertaken.


Dave



At 10/5/2023 02:22 AM, Jon Perryman wrote:
On Thu, 5 Oct 2023 05:46:48 +, Farley, Peter 
 wrote:


>Why does any programmer need to care where the environment 
variables are stored?


Normally, I would agree but XDC is a very special case with very 
broad requirements. As a full z/OS system debugger, Dave Cole has 
many requirements that are atypical. E.g. does he want the ability 
to display environment variables from all processes instead of just 
the process being debugged? He also has restrictions such as 
debugging SRB, SVC, PC routines and more. More than likely, he 
doesn't want to use SRB's & IRB's to gather the data when access 
registers are simpler.


--
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: Assembler access to USS functions

[David Cole]

To all of you who responded to my query, I thank you.

Unfortunately (well, fortunately actually) I'm on the verge of 
leaving for vacation for the month (Viking cruise, Istanbul to 
Venice), so I won't get a chance to go over everything until November.


But all y'all have given me a lot to look at.

Thank you!
Dave

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

Re: RACF ICH408I messages

[Robert S. Hansel (RSH)]

Hi Shelia,

Assuming your RACF monitoring options have been set correctly, the ICH408I 
messages will likely have corresponding SMF records. You can use RACF's SMF 
Unload utility to generate text or XML output from these records for research 
and reporting. If you have an adjunct RACF SMF reporting product (e.g., zSecure 
Audit or Vanguard Advisor), it will provide ISPF menus for generating reports.

For more on setting up RACF monitoring options and using the SMF Unload, see 
our presentation on this topic.

https://www.rshconsulting.com/RSHpres/RSH_Consulting__RACF_Monitoring_&_Reporting__May_2019.pdf

Regards, Bob

Robert S. Hansel
Lead RACF Specialist
RSH Consulting, Inc.
617-969-8211
www.linkedin.com/in/roberthansel
www.rshconsulting.com

Upcoming RSH RACF Training - WebEx
- RACF Level I Administration - DEC 4-8, 2023
- RACF Level II Administration - NOV 13-17, 2023
- RACF Level III Admin, Audit, & Compliance - OCT 30 - NOV 3, 2023***Date 
Change***
- RACF - Securing z/OS UNIX  - FEB 26 - MAR 1, 2024
-

-Original Message-
Date:Wed, 4 Oct 2023 17:38:18 +
From:"Chalk, Shelia" 
Subject: RACF ICH408I messages

Hello,

Is there a report that I can run to list all the ICH408i messages within a time 
period?

Thanks
Shelia Chalk

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

Re: Assembler access to USS functions

[Jon Perryman]

Rather than get into a discussion that probably doesn't interest anyone here, 
we should make this about the problem Dave Cole is interested in solving. This 
is more about making sure he has considered things like sub-shells and other 
things he might have overlooked. I'm sure he'll ask if something piques his 
interest and he wants more clarification. 

On Wed, 4 Oct 2023 22:35:12 -0500, Paul Gilmartin  wrote:
>On Wed, 4 Oct 2023 22:09:42 -0500, Jon Perryman wrote:
>> I believe sub-shells in the same process use the same array.
>I believe otherwise.  Consider:
>foo=outer export foo; ( foo=inner export foo ); echo $foo
>("sub-shells in the same process" is an oxymoron.)

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

Re: Assembler access to USS functions

[Jon Perryman]

On Thu, 5 Oct 2023 05:46:48 +, Farley, Peter  
wrote:

>Why does any programmer need to care where the environment variables are 
>stored? 

Normally, I would agree but XDC is a very special case with very broad 
requirements. As a full z/OS system debugger, Dave Cole has many requirements 
that are atypical. E.g. does he want the ability to display environment 
variables from all processes instead of just the process being debugged? He 
also has restrictions such as debugging SRB, SVC, PC routines and more. More 
than likely, he doesn't want to use SRB's & IRB's to gather the data when 
access registers are simpler.

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