Re: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Andrew Rowley]

On 23/04/2024 11:55 am, Paul Gilmartin wrote:

On Tue, 23 Apr 2024 10:59:47 +1000, Andrew Rowley  wrote:

...
To me, it is much clearer to be explicit, including the concatenation, e.g.
"DELETE " || foo

That overkill is apt to confuse a POSIX shell partisan who would
see the blank as part of the command name


Isn't Rexx assembling it all into one string, which gets then run as the 
command?


There can be significant spaces between parts of the command, and no 
spaces allowed in other parts. So you could have e.g.


"DELETE ABC" || suffix
or
"DELETE" prefix || suffix
which is very different from
"DELETE" prefix suffix

and it can get much more complex. I would rather use a consistent 
concatenation operator and explicitly insert spaces rather than rely on 
getting the right concatenation operator in the right place.


It's a matter of style, but there are some things that just look like 
potential bugs to me.



--
Andrew Rowley
Black Hill Software

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

Re: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Paul Gilmartin]

On Tue, 23 Apr 2024 10:59:47 +1000, Andrew Rowley  wrote:
>...
>To me, it is much clearer to be explicit, including the concatenation, e.g.
>"DELETE " || foo
>seems much clearer about exactly what is happening/expected, which are
>variables and which are (expected to be) constant etc.
> 
That overkill is apt to confuse a POSIX shell partisan who would
see the blank as part of the command name and expect a
failure such as:
813 $ 'rm ' foo
-bash: rm : command not found
814 $ 

The maxim is assume your readers have a moderate, not
advanced, knowledge of the language and make little
concession to conventions of other languages.  Don't:
'DELETE' || ' ' || value( 'foo' )

My stumbling block learning Shell was excessive familiarity
with CMS, where command strings built by Rexx  are parsed
again by SVC 202.  I tried to build command strings with sh
to pass to a nonexistent subsequent parser.  I got better in
a couple days.

-- 
gil

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

Re: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Andrew Rowley]

On 23/04/2024 12:01 am, Seymour J Metz wrote:

delete foo

rather than

'DELETE' foo

is a simple example. In practise I often need multiple upper case constants in 
a single expression.


In this example, delete *looks like* an instruction rather than a 
variable - the fact that it is a variable is likely to surprise people.


It seems to be setting up for a problem like:

if  then
   delete = 'yes'
...
if delete = yes then
    delete foo

If I understand your example correctly,
delete foo
concatenates the values of the variable delete (which is 'DELETE' if 
hasn't been initialized) and foo, inserting an implied blank between 
them, then passes the result to an environment set up previously with an 
ADDRESS statement?


This is what I want to avoid using SIGNAL ON NOVALUE.

To me, it is much clearer to be explicit, including the concatenation, e.g.
"DELETE " || foo
seems much clearer about exactly what is happening/expected, which are 
variables and which are (expected to be) constant etc.


--
Andrew Rowley
Black Hill Software

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

Re: REXX vs other languages -- EXECIO intuitiveness

[Jon Perryman]

On Mon, 22 Apr 2024 18:14:50 +, Farley, Peter  
wrote:

>From the testing I have done so far,
> My suspicion (untested) is that the Rexx script itself is automagically 
> converted to EBCDIC as the interpreter
> is reading it, so that the interpreter only sees EBCDIC text.

Default REXX input routines would include support for UNIX files which are 
encoded. It makes sense they would make this generic and support multiple 
character sets. Why force it to only support the default encoding?

> the z/OS Unix Rexx interpreter SAY command only writes in EBCDIC.  

On other Unix variants, STDOUT does not perform encoding and it is typically 
performed by the application (language support). Imagine the difficulty in 
translating characters but skipping terminal commands without understanding the 
intentions of the app.  I would expect z/OS Unix to be the same and It would 
make sense that it is EBCDIC.

SAY is often environment specific. Rexx provides exits that are user 
replaceable allowing common functionality to be environment specific.

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

Re: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Jon Perryman]

On Mon, 22 Apr 2024 14:01:23 +, Seymour J Metz  wrote:

>delete foo
>rather than
>'DELETE' foo
>is a simple example. In practise I often need multiple upper case constants in 
>a single expression.

This isn't a valid example because 'delete' will also work. As Andrew said, 
rarely will you find a real need for REXX to uppercase an undefined REXX 
variable name. All parsers handle uppercase as needed. In this case, you're 
ignoring the TSO parser. Consider "alloc dsn('my.dataset') 
path('/my/unix/file')" where everything is specified in lowercase. Lowercase 
TSO commands, command option names, DSN and more are not valid. In this 
example, everthing except '/my/unix/file' will be automatically uppercased 
instead of failing the command because of lowercase.

Truthfully, REXX uppercasing rarely provides real advantages for most z/OS 
environments and is a problem for z/OS Unix where lowercase is the norm.

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

Re: zOSMF startup on 3.1

[Pommier, Rex]

Thank you, Brian and David.  That was the issue.  We brought our IZUPRM0 over 
from 2.4.  The sample in SAMPLIB has java 11 listed as the java_home.  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jousma, David
Sent: Friday, April 19, 2024 1:57 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: zOSMF startup on 3.1

Seems to say here that you need JAVA V17 on z/OS V3.1:  
https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/3.1.0?topic=installation-software-requirements-running-zos-31__;!!KjMRP1Ixj6eLE0Fj!oufMGxBu5eLmPTCi_YsNI43zS6uHpDgul4EBpg0l2nj_YuL-K5v3xMqqSopQXrgC1kAgBrgYdzTU1m1-gNqEz8SZ9tRjRZWcnxVm$
  If you already have that installed, just change your JAVA_HOME and give it a 
shot.

Dave Jousma
Vice President | Director, Technology Engineering





From: IBM Mainframe Discussion List  on behalf of 
Pommier, Rex 
Date: Friday, April 19, 2024 at 1:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: zOSMF startup on 3.1
Hello list, Just IPLed z/OS 3. 1 on our sandbox and tried to start zOSMF. The 
angel process started but the server process fails. I compared file permissions 
in the /global/zosmf directories between my 2. 4 system and 3. 1 system and 
they're the


Hello list,



Just IPLed z/OS 3.1 on our sandbox and tried to start zOSMF.  The angel process 
started but the server process fails.  I compared file permissions in the 
/global/zosmf directories between my 2.4 system and 3.1 system and they're the 
same.  The server is failing in the IZUSVR1 step with a cond code 2048.



STDOUT output:

Launching zosmfServer (z/OSMF 3.1.0/wlp-1.0.75.cl230320230319-1900) on IBM J9 
VM, version 8.0.8.20 - pmz6480sr8fp20-20240112_01(SR8 FP20) (en_US)

ÝAUDIT   ¨ CWWKE0001I: The server zosmfServer has been launched.

CWWKE0005E: The runtime environment could not be launched.

CWWKE0018E: An exception occurred while launching the runtime environment: 
java.lang.NullPointerException



STDERR output:

TRAS3005E: Failed to write messages to the 
/global/zosmf/data/logs/zosmfServer/logs/messages.log file.

com.ibm.ws.kernel.boot.LaunchException: Caught unexpected exception 
java.lang.IllegalStateException: Error initializing storage for Equinox 
container.

 at 
com.ibm.ws.kernel.boot.internal.KernelBootstrap.rethrowException(KernelBootstrap.java:734)

 at com.ibm.ws.kernel.boot.internal.KernelBootstrap.go(KernelBootstrap.java:222)

 "and several continuations of this error"



The first message in the STDERR says it couldn't write to the messages.log 
file.  That is incorrect.  Here's the output from that file:



product = z/OSMF 3.1.0 (wlp-1.0.75.cl230320230319-1900)

wlp.install.dir = /usr/lpp/liberty_zos/23.0.0.3/

server.config.dir = /global/zosmf/configuration/servers/zosmfServer/

server.output.dir = /global/zosmf/data/logs/zosmfServer/

java.home = /usr/lpp/java/J8.0_64

java.version = 1.8.0_401

java.runtime = Java(TM) SE Runtime Environment (8.0.8.20 - 
pmz6480sr8fp20-20240112_01(SR8 FP20))

os = z/OS (03.01.00; s390x) (en_US)

process = 16777379@TSTJES2

Classpath = 
/usr/lpp/zosmf/liberty/lib/native/zos/s390x/../../../../lib/ws-launch.jar:/usr/lpp/zosmf/liberty/lib/native/zos/s390x/..

/../../../lib/bootstrap-agent.jar

Java Library path = 
/usr/lpp/java/J8.0_64/lib/s390x/compressedrefs:/usr/lpp/java/J8.0_64/lib/s390x:/usr/lpp/java/J8.0_64/lib/s390x/c

ompressedrefs:/usr/lpp/zosmf/liberty/lib/native/zos/s390x/../../../../lib/native/zos/s390x:/usr/lpp/java/J8.0_64/bin/classic:$LIBPAT

H:/usr/lpp/tcpip/lib:/usr/lpp/gskssl/IBM:/usr/lpp/wbem/lib:/lib:/usr/lib



[4/19/24 17:33:43:388 GMT] 0001 
com.ibm.ws.kernel.launch.internal.FrameworkManager   A CWWKE0001I: The 
server zosmfServer has been launched.

[4/19/24 17:33:43:428 GMT] 0001 
com.ibm.ws.kernel.launch.internal.FrameworkManager   I CWWKE0940I: The 
zOSMFReg product

extension has a product identifier of com.ibm.zoszmf and a product installation 
location of /usr/lpp/zosmf/defaults. This product extension

 was enabled by specifying the WLP_PRODUCT_EXT_DIR environment variable.

[4/19/24 17:33:43:688 GMT] 0001 
com.ibm.ws.logging.internal.impl.IncidentImplI FFDC1015I: An 
FFDC Incident has

been created: "java.lang.IllegalStateException: Error initializing storage for 
Equinox container. com.ibm.ws.kernel.launch.internal.F

rameworkManager 678" at ffdc_24.04.19_15.50.44.0.log





I noticed it is running java 8 where I have java 11 and 17 installed.  Does 
zOSMF work on 3.1 with java 8?



Any idea what I may be missing here?



TIA

Rex



--

The information contained in this message is confidential, protected from 
disclosure and may be legally privileged. If the reader of this message is not 
the intended recipient or an employee 

Re: Rexx and DSFS

[Rupert Reynolds]

On Mon, 22 Apr 2024, 15:44 Paul Gilmartin, <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

I admit I didn't experiment much, but to make my existing code work under
Fedora I just renamed the functions. Or did I create links?

I was bored years ago and wrote some Rexx under Windows to add sqrt(),
loge(), sin(), cos(), tan(), pi() etc. The idea was that they would run
either as a command that sends the result to stdout, or as a function that
returns the result to the calling Rexx code.

Either way, I ended up using my Rexx code to find a couple of nasty bugs in
a maths library, so it wasn't wasted effort :-)

Roops


> Can't you quote the function name:
> 'Function'( args )  /* Ugh!  */
>

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

Re: ooRexx forum?

[Steve Thompson]

Try https://www.rexxla.org/  It gives me a page for "The Rexx 
Language Association" (and has some links that I have not yet 
tried).


Steve Thompson

On 4/22/2024 3:15 PM, Bob Bridges wrote:

References-in-passing to ooRexx are fine here, I suppose, but if I want to get 
into details, where should I go to ask questions?  The ooRexx documentation 
mentions www.rexxla.org/forum.html, but that nets me a 404 error.  And I looked 
at comp.lang.rexx (also recommended by the documentation), but it didn't seem 
to me any of the recent posts there were about REXX, much less ooRexx 
specifically.

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

/* If you are not being criticized, you may not be doing much.  -Donald 
Rumsfeld */

--
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: DFSort Report question

[Sri Hari Kolusu]

>> What I would like to do is change LEGACY/KDFAES to PASSPHRASE if possible.

Lionel,

You just want to change the ON value and not the header.  Assuming you have a 
COPY/SORT step to filter the data, you can change the values there.  I am 
showing for position 21, but you can change to that 616 in the control cards

//STEP0100 EXEC PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//IN   DD *
A   LEGACY
B   KDFAES
C   NOPHRASE
D   LIONEL
//T1   DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0),RLSE)
//REPORT   DD SYSOUT=*
//TOOLIN   DD *
  COPY FROM(IN) TO(T1) USING(CTL1)
  DISPLAY FROM(T1) LIST(REPORT)   -
 HEADER('Rectype')ON(001,01,CH)   -
 HEADER('PassPhrase') ON(021,10,CH)
/*
//CTL1CNTL DD *
  INREC OVERLAY=(021:21,10,CHANGE=(10,C'LEGACY',C'PASSPHRASE',
  C'KDFAES',C'PASSPHRASE'),
  NOMATCH=(21,10))
/*

The output from this is.

RectypePassPhrase
   
A  PASSPHRASE
B  PASSPHRASE
C  NOPHRASE
D  LIONEL


Hope that is what you want.

PS: if you don't have COPY/SORT pass before the DISPLAY , then you can do it 
using traditional reporting features.

Thanks,
Kolusu
DFSORT Development
IBM Corporation



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

Re: ooRexx forum?

[Seymour J Metz]

The rexxla-members list is a good place to start.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of Bob 
Bridges <0587168ababf-dmarc-requ...@listserv.ua.edu>
Sent: Monday, April 22, 2024 3:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: ooRexx forum?

References-in-passing to ooRexx are fine here, I suppose, but if I want to get 
into details, where should I go to ask questions?  The ooRexx documentation 
mentions 
http://secure-web.cisco.com/13gB4Pa0zm3lFahp_Pjle6ZJHt7vjrL9K9-Rl40qYrQKy8AFSpa5EjzfY-E0tEQvWSHSWJVV4eOIm0p0VrO4QXy8k_VUhb6baGmjzTdKOf2D-q0P13b6rxss9Db_lfV9Vc-1_FHwR-_BSs1M4NXQglDzbc7ypyhFpvqQ5o4RqJ5nUJ-NX4FvCvbUlv1TITE0BGR4_SkCxUgbrM1nrzGUrPCU4-rW00v-89HwCeMJpyRwbT92vadj0W_4N2DfUWJQFag6A-47-aPvWDGqH7sC2HvA5_MdGmGQnUIjOzsIR_jwcwcsbi59XNH6Mi_W8dKfui4ugrPgNwWLa_x5Amvaznc_nwqEWk4e2yRcHlQ3LJb5uExeVr_g3P41Z3cEA9jDIji033sQmCivcZDQuhbV7B2NObWBkDCqAVAV5oiJRh2A/http%3A%2F%2Fwww.rexxla.org%2Fforum.html,
 but that nets me a 404 error.  And I looked at comp.lang.rexx (also 
recommended by the documentation), but it didn't seem to me any of the recent 
posts there were about REXX, much less ooRexx specifically.

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

/* If you are not being criticized, you may not be doing much.  -Donald 
Rumsfeld */

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

ooRexx forum?

[Bob Bridges]

References-in-passing to ooRexx are fine here, I suppose, but if I want to get 
into details, where should I go to ask questions?  The ooRexx documentation 
mentions www.rexxla.org/forum.html, but that nets me a 404 error.  And I looked 
at comp.lang.rexx (also recommended by the documentation), but it didn't seem 
to me any of the recent posts there were about REXX, much less ooRexx 
specifically.

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

/* If you are not being criticized, you may not be doing much.  -Donald 
Rumsfeld */

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

Re: DFSort Report question

[Lionel B. Dyck]

In this case here is a sample record

HEADER('PassPhrase') ON(616,10,CH)

The ON value found in the input could be "LEGACY", "KDFAES" or "NOPHRASE".

What I would like to do is change LEGACY/KDFAES to PASSPHRASE if possible.

Thanks

Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Sri Hari Kolusu
Sent: Monday, April 22, 2024 2:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSort Report question

>> The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Lionel,

How do you determine which header value need to be used? I am guessing that
it is going to depend on a value in the file. If So we can dynamically
change it.

Thanks,
Kolusu
DFSORT Development
IBM Corporation

--
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: DFSort Report question

[Sri Hari Kolusu]

>> The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Lionel,

How do you determine which header value need to be used? I am guessing that it 
is going to depend on a value in the file. If So we can dynamically change it.

Thanks,
Kolusu
DFSORT Development
IBM Corporation

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

DFSort Report question - SYMNAMES DD ?

[Nash, Jonathan S.]

Can you set up a constant in the 
SYMNAMES DD to do that ? 

Or is that for different functions ?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Monday, April 22, 2024 2:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFSort Report question

Does anyone know who to change the value found in the ON to a more
meaningful value:

For example this:  HEADER('PassPhrase') ON(616,10,CH)

The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Thanks in advance

Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

"Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are."   - - - John Wooden

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

DFSort Report question

[Lionel B. Dyck]

Does anyone know who to change the value found in the ON to a more
meaningful value:

For example this:  HEADER('PassPhrase') ON(616,10,CH)

The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Thanks in advance

Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.”   - - - John Wooden

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

Re: REXX vs other languages -- EXECIO intuitiveness

[Farley, Peter]

From the testing I have done so far, the z/OS Unix Rexx interpreter SAY command 
only writes in EBCDIC.  My suspicion (untested) is that the Rexx script itself 
is automagically converted to EBCDIC as the interpreter is reading it, so that 
the interpreter only sees EBCDIC text.

On a “real ASCII” system I would expect ASCII hex output for that example.

Peter

From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Monday, April 22, 2024 1:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX vs other languages -- EXECIO intuitiveness


On Mon, 22 Apr 2024 16:59:21 +, Farley, Peter wrote:

>

>I have recently done some experiments with Rexx scripts stored in the z/OS 
>Unix file system encoded in ASCII and they will execute without a problem so 
>long as the starting script file is properly ...

>

FSVO "properly".  What does "say c2x( 'abcd' )" show?  Is it the same on

a real ASCII system?



--

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: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Seymour J Metz]

I'm not the who encountered it. I'd love to see the trace i output.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of Jon 
Perryman 
Sent: Monday, April 22, 2024 1:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX vs other languages WAS: Rexx numeric digits and scientific 
notation question

On Mon, 22 Apr 2024 01:41:21 +, Seymour J Metz  wrote:

>I was referring to 'I once found CMS ISPF to reauire "address isredit 'isredit 
>'".
>Otherwise the command went to ISPEXEC.', which clearly is b0rk3n.

This seems very unlikely given that IBM does good QA and this would have caused 
a HYPER to fix it. This would have broken a lot of existing customer code. My 
gut tells me that ISREDIT was set causing it not to be "ISREDIT".

--
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 startup on 3.1

[Wissink, Brad]

Is that the correct java.home path /usr/lpp/java/j8.0_64.Mayb need a 
capital 'J' ->  /usr/lpp/java/J8.0_64

Brad Wissink| Sr. Systems Programmer
Sammons® Financial Group Member Companies
8300 Mills Civic Parkway, West Des Moines, Ia 50266
Phone 515-267-2735 | ext. 33735 | Cell: 515-231-1511 

bwiss...@sfgmembers.com  | www.SammonsFinancialGroup.com

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Friday, April 19, 2024 12:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] zOSMF startup on 3.1

Hello list,

Just IPLed z/OS 3.1 on our sandbox and tried to start zOSMF.  The angel process 
started but the server process fails.  I compared file permissions in the 
/global/zosmf directories between my 2.4 system and 3.1 system and they're the 
same.  The server is failing in the IZUSVR1 step with a cond code 2048.  

STDOUT output:
Launching zosmfServer (z/OSMF 3.1.0/wlp-1.0.75.cl230320230319-1900) on IBM J9 
VM, version 8.0.8.20 - pmz6480sr8fp20-20240112_01(SR8 FP20) (en_US)  
ÝAUDIT   ¨ CWWKE0001I: The server zosmfServer has been launched.
   
CWWKE0005E: The runtime environment could not be launched.  
   
CWWKE0018E: An exception occurred while launching the runtime environment: 
java.lang.NullPointerException  

STDERR output:
TRAS3005E: Failed to write messages to the 
/global/zosmf/data/logs/zosmfServer/logs/messages.log file. 
 
com.ibm.ws.kernel.boot.LaunchException: Caught unexpected exception 
java.lang.IllegalStateException: Error initializing storage for Equinox 
container.
 at 
com.ibm.ws.kernel.boot.internal.KernelBootstrap.rethrowException(KernelBootstrap.java:734)
  
 at 
com.ibm.ws.kernel.boot.internal.KernelBootstrap.go(KernelBootstrap.java:222)

 "and several continuations of this error"

The first message in the STDERR says it couldn't write to the messages.log 
file.  That is incorrect.  Here's the output from that file:


product = z/OSMF 3.1.0 (wlp-1.0.75.cl230320230319-1900) 

wlp.install.dir = /usr/lpp/liberty_zos/23.0.0.3/

server.config.dir = /global/zosmf/configuration/servers/zosmfServer/

server.output.dir = /global/zosmf/data/logs/zosmfServer/

java.home = /usr/lpp/java/J8.0_64   

java.version = 1.8.0_401

java.runtime = Java(TM) SE Runtime Environment (8.0.8.20 - 
pmz6480sr8fp20-20240112_01(SR8 FP20))
os = z/OS (03.01.00; s390x) (en_US) 

process = 16777379@TSTJES2  

Classpath = 
/usr/lpp/zosmf/liberty/lib/native/zos/s390x/../../../../lib/ws-launch.jar:/usr/lpp/zosmf/liberty/lib/native/zos/s390x/..
/../../../lib/bootstrap-agent.jar   

Java Library path = 
/usr/lpp/java/J8.0_64/lib/s390x/compressedrefs:/usr/lpp/java/J8.0_64/lib/s390x:/usr/lpp/java/J8.0_64/lib/s390x/c
ompressedrefs:/usr/lpp/zosmf/liberty/lib/native/zos/s390x/../../../../lib/native/zos/s390x:/usr/lpp/java/J8.0_64/bin/classic:$LIBPAT
H:/usr/lpp/tcpip/lib:/usr/lpp/gskssl/IBM:/usr/lpp/wbem/lib:/lib:/usr/lib



[4/19/24 17:33:43:388 GMT] 0001 
com.ibm.ws.kernel.launch.internal.FrameworkManager   A CWWKE0001I: The 
server zosmfServer has been launched.   
 
[4/19/24 17:33:43:428 GMT] 0001 
com.ibm.ws.kernel.launch.internal.FrameworkManager   I CWWKE0940I: The 
zOSMFReg product 
extension has a product identifier of com.ibm.zoszmf and a product installation 
location of /usr/lpp/zosmf/defaults. This product extension
 was enabled by specifying the WLP_PRODUCT_EXT_DIR environment variable.
 
[4/19/24 

Re: REXX vs other languages -- EXECIO intuitiveness

[Paul Gilmartin]

On Mon, 22 Apr 2024 16:59:21 +, Farley, Peter wrote:
>
>I have recently done some experiments with Rexx scripts stored in the z/OS 
>Unix file system encoded in ASCII and they will execute without a problem so 
>long as the starting script file is properly ...
>
FSVO "properly".  What does "say c2x( 'abcd' )" show?  Is it the same on
a real ASCII system?

-- 
gil

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

Re: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Jon Perryman]

On Mon, 22 Apr 2024 01:41:21 +, Seymour J Metz  wrote:

>I was referring to 'I once found CMS ISPF to reauire "address isredit 'isredit 
>'".
>Otherwise the command went to ISPEXEC.', which clearly is b0rk3n.

This seems very unlikely given that IBM does good QA and this would have caused 
a HYPER to fix it. This would have broken a lot of existing customer code. My 
gut tells me that ISREDIT was set causing it not to be "ISREDIT".

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

Re: REXX vs other languages -- EXECIO intuitiveness

[Jeremy Nicoll]

On Sun, 21 Apr 2024, at 04:58, Steve Thompson wrote:

> And so, with Windows I/O is different (still talking REXX), same 
> problem with Linux. I/O is not handled the same for simple reads 
> and writes from my perspective.

There's an EXECIO in ooREXX now, provided by the

  address hostemu

extension; the docs suggest it works in Windows & Unix/linux.  The
parameter after diskr/diskw is the whole taget filename, most likely
enclosed in quotes.

I've not tried it yet.

-- 
Jeremy Nicoll - my opinions are my own.

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

Re: REXX vs other languages -- EXECIO intuitiveness

[Paul Gilmartin]

On Mon, 22 Apr 2024 16:59:21 +, Farley, Peter wrote:

>Practically speaking however, starting a Rexx script under one of the z/OS 
>Unix shell programs is pretty much the only way to get it done.  Although if 
>you use the BPXWUNIX() function from a TSO Rexx  script to start another Rexx 
>script stored in the z/OS Unix file system it might work.  I will have to try 
>that path out.
>

BPXWUNIX() runs a shell.


>I have recently done some experiments with Rexx scripts stored in the z/OS 
>Unix file system encoded in ASCII and they will execute without a problem so 
>long as the starting script file is properly tagged as ISO8859-1 text.  
>Untagged Rexx script files started from any z/OS Unix shell do have to be 
>encoded in EBCDIC though.
>
EBCDIC -- Who needs it!  suppose it's improperly tagged as ISO8859-1
text but writes UTF-8 strings to stdout?  Will they display nicely via ssh to
a UTF-8 desktop?

-- 
gil

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

Re: REXX vs other languages -- EXECIO intuitiveness

[Paul Gilmartin]

On Mon, 22 Apr 2024 11:40:33 -0500, Jon Perryman wrote:
>
>I've never tried it but a shell should not be required to automatically 
>integrate REXX & UNIX as long as you start REXX using z/OS Unix facilities in 
>a Unix address space. Technically, shells are not required by Unix but I doubt 
>that it has been tested much for obscure requirements.
> 
From the ISPF command line I've run a '~'-aware exec that does
ADDRESS SYSCALL chdir  which changes the default
directory for 3.17, etc.

I suspect that spawn( <, ... ); would work likewise.
Available and default command environments TBD.

-- 
gil

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

Re: REXX vs other languages -- EXECIO intuitiveness

[Farley, Peter]

Practically speaking however, starting a Rexx script under one of the z/OS Unix 
shell programs is pretty much the only way to get it done.  Although if you use 
the BPXWUNIX() function from a TSO Rexx  script to start another Rexx script 
stored in the z/OS Unix file system it might work.  I will have to try that 
path out.

I have recently done some experiments with Rexx scripts stored in the z/OS Unix 
file system encoded in ASCII and they will execute without a problem so long as 
the starting script file is properly tagged as ISO8859-1 text.  Untagged Rexx 
script files started from any z/OS Unix shell do have to be encoded in EBCDIC 
though.

Peter

From: IBM Mainframe Discussion List  On Behalf Of Jon 
Perryman
Sent: Monday, April 22, 2024 12:41 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX vs other languages -- EXECIO intuitiveness


On Sun, 21 Apr 2024 22:54:15 +, Seymour J Metz 
mailto:sme...@gmu.edu>> wrote:



>>Wait, what?  Are you saying TSO-REXXhaas LINEIN, CHAROUT and so on?



>Only in a EUnix environment. I don't know if syscalls is enough or if you 
>actually have t be running under the shell.



Syscalls does not setup a full z/OS Unix environment and in environments like 
TSO would only cause dubbing.



I've never tried it but a shell should not be required to automatically 
integrate REXX & UNIX as long as you start REXX using z/OS Unix facilities in a 
Unix address space. Technically, shells are not required by Unix but I doubt 
that it has been tested much for obscure requirements.

--



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: REXX vs other languages -- EXECIO intuitiveness

[Jon Perryman]

On Sun, 21 Apr 2024 22:54:15 +, Seymour J Metz  wrote:

>>Wait, what?  Are you saying TSO-REXXhaas LINEIN, CHAROUT and so on?

>Only in a EUnix environment. I don't know if syscalls is enough or if you 
>actually have t be running under the shell.

Syscalls does not setup a full z/OS Unix environment and in environments like 
TSO would only cause dubbing.

I've never tried it but a shell should not be required to automatically 
integrate REXX & UNIX as long as you start REXX using z/OS Unix facilities in a 
Unix address space. Technically, shells are not required by Unix but I doubt 
that it has been tested much for obscure requirements.

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

Re: S0c4 creation

[Michael Stein]

On Mon, Apr 22, 2024 at 02:38:08PM +0100, Rupert Reynolds wrote:
> For the record I chose (off the cuff) to use NC on some low storage with
> itself, because it would never actually attempt to alter that storage, but
> only to store the same values back again.

Or perhaps not the same values if the value changed between the implied
two fetches NC might do.  Reading the description of NC the accesses
are NOT interlocked and might get different values thus altering the
storage location from what it would have been.

I've used EX 0,* extensively, it's very obvious it's intentional
especially when you can look at the source code and see why this should
"never" happen.

An 0C1 would work but a bad branch can cause this too so it's not as
obvious it's intentional.  It is easier to cause in other code though
and only takes 2 bytes so only requires overlaying one instruction.

A store into location 0 sounds pretty safe if you need a real 0C4.
Without some real hardware (firemare/software) problem even key 0 it
should fail.  I once crashed VM from an MVS running under it when somehow
the low address protection status got confused and VM couldn't update
low storage...  This was long ago...

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

Re: S0c4 creation

[Jon Perryman]

>>Is there any sample Jobs or I can enforce a s0c4 abend in a Started task ?
>>I am trying to teach SLIP trap to a rookie..Is there any other efficient
>>way to do this?

> 0c4 is 7BAD and this explicit value is used on purpose by some products 
> to catch unintended or unwanted reference.

This is too funny. The system is littered with suppressed S0C4 abends. Set a 
generic SLIP SOC4 for any highly active STC and it should catch within a couple 
of minutes. The chances of you capturing your S0C4 is less than 50%. If you 
need your S0c4, then ask IBM for their S0C4 suppression slips. Be sure to use 
LIMIT=1 for your slip otherwise you may get more dumps than wanted. I once 
forgot to send those to a customer who saw that my slip caught the wrong S0C4 
and decided to increase the limit. Let's just say it was not pretty and I never 
made that mistake again.

If you create your own S0C4 program, you can easily run it in your automation 
product (e.g. Netview) without jumping thru hoops. Just write a REXX to call it 
and you can set the slip just before you call your program thus increasing the 
chances you S0C4 is captured.

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

Re: S0c4 creation

[Seymour J Metz]

SLIP behaves differently for a program check converted to an ABEND.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of 
Steve Thompson 
Sent: Monday, April 22, 2024 10:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: S0c4 creation

IN line with what was said, you can force it by issuing ABEND (or
related) and telling it what ABEND you want.

You can also EX an EX and get a S0C3. I've never seen that ABEND
by accident (e.g., wild branch into data). And no co-workers I've
had (all of us doing ALC based development) have ever seen that
one by accident.

Steve Thompson

On 4/21/2024 7:39 AM, Bernd Oppolzer wrote:
> I'd suggest to be very careful with such codings;
> a co-worker some years ago did this and - by accident - the
> code ran privileged,
> which caused the whole LPAR to hang.
>
> Same goes for ST at address zero, which was suggested by
> another poster.
>
> Maybe it would be better to write protect your own module and
> try to write
> into your own static CSECT. This would not put other jobs in
> your system in danger.
>
> Or: do your SLIP trap experiments with another sort of ABEND.
>
> Kind regards
>
> Bernd
>
>
> Am 21.04.2024 um 11:21 schrieb Rupert Reynolds:
>> If it's your STC, then include something dirty like
>>
>> BANG NC16(4,R0),16(R0)  AND CVT pointer with
>> itself--should fail
>>
>> although I should say that might raise eyebrows on a
>> production system ;-)
>>
>> Roops
>>
>> On Sun, 21 Apr 2024, 08:45 Peter, <
>> 05e4a8a0a03d-dmarc-requ...@listserv.ua.edu> wrote:
>>
>>> Hello
>>>
>>> Good morning
>>>
>>> Is there any sample Jobs or I can enforce a s0c4 abend in a
>>> Started task ?
>>>
>>> I am trying to teach SLIP trap to a rookie..Is there any
>>> other efficient
>>> way to do this?
>>>
>>> Peter
>>>
>>> --
>>>
>>> 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: Rexx and DSFS

[Paul Gilmartin]

On Mon, 22 Apr 2024 15:00:18 +0100, Rupert Reynolds wrote:
>
>My Linux lapdog uses #!/bin/rexx as the first line
>
This works on both MVS and several desktops:
/*bin/mkdir -p .; exec rexx "$0" "$@" # REXX  Magic!  */

>... (and external functions
>must be saved with upper case filenames to be found from Rexx code)
>
Can't you quote the function name:
'Function'( args )  /* Ugh!  */
???

>In some environments (TSO via ddname SYSEXEC, is it?) the Rexx comment was
>not required.
>
Required in SYSPROC and OMVS; optional is SYSEXEC.

-- 
gil

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

Re: S0c4 creation

[Steve Thompson]

IN line with what was said, you can force it by issuing ABEND (or 
related) and telling it what ABEND you want.


You can also EX an EX and get a S0C3. I've never seen that ABEND 
by accident (e.g., wild branch into data). And no co-workers I've 
had (all of us doing ALC based development) have ever seen that 
one by accident.


Steve Thompson

On 4/21/2024 7:39 AM, Bernd Oppolzer wrote:

I'd suggest to be very careful with such codings;
a co-worker some years ago did this and - by accident - the 
code ran privileged,

which caused the whole LPAR to hang.

Same goes for ST at address zero, which was suggested by 
another poster.


Maybe it would be better to write protect your own module and 
try to write
into your own static CSECT. This would not put other jobs in 
your system in danger.


Or: do your SLIP trap experiments with another sort of ABEND.

Kind regards

Bernd


Am 21.04.2024 um 11:21 schrieb Rupert Reynolds:

If it's your STC, then include something dirty like

BANG NC    16(4,R0),16(R0)  AND CVT pointer with 
itself--should fail


although I should say that might raise eyebrows on a 
production system ;-)


Roops

On Sun, 21 Apr 2024, 08:45 Peter, <
05e4a8a0a03d-dmarc-requ...@listserv.ua.edu> wrote:


Hello

Good morning

Is there any sample Jobs or I can enforce a s0c4 abend in a 
Started task ?


I am trying to teach SLIP trap to a rookie..Is there any 
other efficient

way to do this?

Peter

-- 


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: REXX vs other languages WAS: Rexx numeric digits and scientific notation question

[Seymour J Metz]

delete foo

rather than

'DELETE' foo

is a simple example. In practise I often need multiple upper case constants in 
a single expression.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of 
Andrew Rowley 
Sent: Sunday, April 21, 2024 10:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX vs other languages WAS: Rexx numeric digits and scientific 
notation question

On 22/04/2024 10:09 am, Seymour J Metz wrote:
> It shortens expressions, upper cases automatically and, IMHO, is more 
> readable.

Was that a reply about the usefulness of the default value being the
variable name, uppercase? If so, I still don't see it.

Can you give an example of how you would use it?

--
Andrew Rowley
Black Hill Software

--
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: Rexx and DSFS

[Rupert Reynolds]

This is one thing about using Rexx (or any  script language AFAICS) that is
awkward to remember.

My Linux lapdog uses #!/bin/rexx as the first line (and external functions
must be saved with upper case filenames to be found from Rexx code)

In some environments (TSO via ddname SYSEXEC, is it?) the Rexx comment was
not required.

But Rexx is still my first choice where I have to get the maths exactly
right first time, and where I don't want any nasty surprises when an
unexpected byte value sneaks in with the the input data.

MFC made some great choices when he created Rexx, which mean I'm willing to
work with a few quirks that were mainly born out of the time he created it
:-)

Roops




On Mon, 22 Apr 2024, 14:13 Lionel B. Dyck, <
057b0ee5a853-dmarc-requ...@listserv.ua.edu> wrote:

> One more point on this - the very 1st line of the REXX code *must* have /*
> REXX */ starting in column 1. While TSO and VM REXX just care that the word
> rexx is in a comment on the 1st line - the shell REXX requires it begin in
> column 1 with the 1st word being REXX.
>
> hth
>
>
> Lionel B. Dyck <><
> Github: https://github.com/lbdyck
> System Z Enthusiasts Discord: https://discord.gg/sze
>
> “Worry more about your character than your reputation. Character is what
> you are, reputation merely what others think you are.”   - - - John Wooden
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Paul Gilmartin
> Sent: Sunday, April 21, 2024 8:18 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Rexx and DSFS
>
> Can a Rexx Rexx exec usefully reside in a  DSFS?  It would need to be
> marked as executable.  The following doesn't make it clear:
> <
> https://www.ibm.com/docs/en/zos/3.1.0?topic=system-zos-unix-attributes-versus-data-set-attributes
> >
>
> Is there better information in the DSFS User's Guide?
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: S0c4 creation

[Seymour J Metz]

IBM promised to never use opcode 00, and that's what I use when I want (E)SPIE 
in the skie.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
עַם יִשְׂרָאֵל חַי
נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר


From: IBM Mainframe Discussion List  on behalf of 
Darrold Usher <062909c800f7-dmarc-requ...@listserv.ua.edu>
Sent: Monday, April 22, 2024 8:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: S0c4 creation

How about create a S0C1?

On Mon, Apr 22, 2024 at 7:21 AM Peter Relson  wrote:

> Bernd O wrote
> 
> I'd suggest to be very careful with such codings;
> a co-worker some years ago did this and - by accident - the code ran
> privileged,
> which caused the whole LPAR to hang.
>
> Same goes for ST at address zero, which was suggested by another poster.
> 
>
> I challenge both of those.
>
> The first will never happen unless something changed to key 0 (being
> privileged is relevant only to the extent that you could then change to key
> 0). And that doesn't happen without intent.
>
> The second will never happen outside of the OS itself in the absence of an
> APARable z/OS error (related to what we refer to as low-core protect).
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> 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: S0c4 creation

[Rupert Reynolds]

I have to say I find it hard to see an appreciable risk (especially for
some innocent code to accidentally issue the MODESET SVC), but of course no
risk is zero.

For the record I chose (off the cuff) to use NC on some low storage with
itself, because it would never actually attempt to alter that storage, but
only to store the same values back again.

So it might seem a bit of a cowboy move, but it's looks unlikely to cause
trouble in reality.

Roops

On Mon, 22 Apr 2024, 13:21 Peter Relson,  wrote:

> Bernd O wrote
> 
> I'd suggest to be very careful with such codings;
> a co-worker some years ago did this and - by accident - the code ran
> privileged,
> which caused the whole LPAR to hang.
>
> Same goes for ST at address zero, which was suggested by another poster.
> 
>
> I challenge both of those.
>
> The first will never happen unless something changed to key 0 (being
> privileged is relevant only to the extent that you could then change to key
> 0). And that doesn't happen without intent.
>
> The second will never happen outside of the OS itself in the absence of an
> APARable z/OS error (related to what we refer to as low-core protect).
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> 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: Rexx and DSFS

[Lionel B. Dyck]

The dataset is FB 80


Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Monday, April 22, 2024 8:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Rexx and DSFS

On Mon, 22 Apr 2024 06:50:15 -0500, Lionel B. Dyck  wrote:

>I ran a test and this is what I found - IT WORKS FINE
>
>/dsfs/txt/lbdyck/lionel.exec>dir whoson
>t IBM-1047T=on  -rwxrwxrwx   1 BPXROOT  OMVSGRP11367 Jan 31 15:14 
>whoson
>
Interesting: 

seems to imply that only members of RECFM=U PDS(E) are regarded as executable.
What were the MVS DCB attributes of the data set?

>/dsfs/txt/lbdyck/lionel.exec>./whoson
>Interactive Users on 1 Systems: TSO Users: 1 SSH Users: 2
>
>System:   CBT  Users: 3
>xxx x (ssh)
>LBDYCKLionel B. Dyck
>LBDYCKLionel B. Dyck (ssh)
>
>/dsfs/txt/lbdyck/lionel.exec>
>
Are there two different definitions of "executable"
which the publication fails to distinguish?

Could "chmod a-x" make the member mon-executable?

--
Thanks,
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: Rexx and DSFS

[Paul Gilmartin]

On Mon, 22 Apr 2024 06:50:15 -0500, Lionel B. Dyck  wrote:

>I ran a test and this is what I found - IT WORKS FINE
>
>/dsfs/txt/lbdyck/lionel.exec>dir whoson
>t IBM-1047T=on  -rwxrwxrwx   1 BPXROOT  OMVSGRP11367 Jan 31 15:14 
>whoson
>
Interesting: 

seems to imply that only members of RECFM=U PDS(E) are regarded as executable.
What were the MVS DCB attributes of the data set?

>/dsfs/txt/lbdyck/lionel.exec>./whoson
>Interactive Users on 1 Systems: TSO Users: 1 SSH Users: 2
>
>System:   CBT  Users: 3
>xxx x (ssh)
>LBDYCKLionel B. Dyck
>LBDYCKLionel B. Dyck (ssh)
>
>/dsfs/txt/lbdyck/lionel.exec>
>
Are there two different definitions of "executable"
which the publication fails to distinguish?

Could "chmod a-x" make the member mon-executable?

-- 
Thanks,
gil

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

Re: Rexx and DSFS

[Lionel B. Dyck]

One more point on this - the very 1st line of the REXX code *must* have /* REXX 
*/ starting in column 1. While TSO and VM REXX just care that the word rexx is 
in a comment on the 1st line - the shell REXX requires it begin in column 1 
with the 1st word being REXX.

hth


Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Sunday, April 21, 2024 8:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Rexx and DSFS

Can a Rexx Rexx exec usefully reside in a  DSFS?  It would need to be marked as 
executable.  The following doesn't make it clear:


Is there better information in the DSFS User's Guide?

--
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: S0c4 creation

[Rob Scott]

Easiest way to create a deliberate 0C1 is to branch to (or inject insteam to 
your executing code) a halfword of zeroes.

Rob Scott
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Darrold Usher
Sent: Monday, April 22, 2024 1:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: S0c4 creation

EXTERNAL EMAIL





How about create a S0C1?

On Mon, Apr 22, 2024 at 7:21 AM Peter Relson  wrote:

> Bernd O wrote
> 
> I'd suggest to be very careful with such codings; a co-worker some
> years ago did this and - by accident - the code ran privileged, which
> caused the whole LPAR to hang.
>
> Same goes for ST at address zero, which was suggested by another poster.
> 
>
> I challenge both of those.
>
> The first will never happen unless something changed to key 0 (being
> privileged is relevant only to the extent that you could then change
> to key 0). And that doesn't happen without intent.
>
> The second will never happen outside of the OS itself in the absence
> of an APARable z/OS error (related to what we refer to as low-core protect).
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> 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


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: SMP/E download anomaly

[Kurt Quackenbush]

> All cases, the CLIENT DD referenced the same PDS member.

Then I cannot easily explain the observed behavior.  If you want to pursue, 
then I suggest opening a support case and be prepared to supply the output for 
both a job that used HTTPS, and a job whose CLIENT DD uses the same PDS member 
and used FTPS.

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

Re: S0c4 creation

[Darrold Usher]

How about create a S0C1?

On Mon, Apr 22, 2024 at 7:21 AM Peter Relson  wrote:

> Bernd O wrote
> 
> I'd suggest to be very careful with such codings;
> a co-worker some years ago did this and - by accident - the code ran
> privileged,
> which caused the whole LPAR to hang.
>
> Same goes for ST at address zero, which was suggested by another poster.
> 
>
> I challenge both of those.
>
> The first will never happen unless something changed to key 0 (being
> privileged is relevant only to the extent that you could then change to key
> 0). And that doesn't happen without intent.
>
> The second will never happen outside of the OS itself in the absence of an
> APARable z/OS error (related to what we refer to as low-core protect).
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> 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: S0c4 creation

[Peter Relson]

Bernd O wrote

I'd suggest to be very careful with such codings;
a co-worker some years ago did this and - by accident - the code ran
privileged,
which caused the whole LPAR to hang.

Same goes for ST at address zero, which was suggested by another poster.


I challenge both of those.

The first will never happen unless something changed to key 0 (being privileged 
is relevant only to the extent that you could then change to key 0). And that 
doesn't happen without intent.

The second will never happen outside of the OS itself in the absence of an 
APARable z/OS error (related to what we refer to as low-core protect).

Peter Relson
z/OS Core Technology Design


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

Re: Continuing a reply during IPL

[Binyamin Dissen]

Saw the example, tried with and without quotes. No luck.

On Mon, 22 Apr 2024 05:58:20 -0500 Steve Horein
<05b0b4f1358b-dmarc-requ...@listserv.ua.edu> wrote:

:>I found this example in the doc (
:>https://www.ibm.com/docs/en/zos/2.4.0?topic=command-specifying-system-parameters1
:>):
:>R 00,'MLPA=(00,01,02,CONT' IEA116A CONTINUE SYSTEM PARAMETERS R
:>00,'03,L),BLDL=02'
:>
:>Perhaps single quotes are required, or fully padded '00' replyID?
:>A search in the commands doc did not reveal an explicit topic:
:>https://www.ibm.com/docs/en/search/CONT?scope=SSLTBW_2.4.0=ieag100
:>
:>On Mon, Apr 22, 2024 at 4:37?AM Binyamin Dissen 
:>wrote:
:>
:>> I had an occasion where the IEASYS PROG= entry was messed up (period in
:>> place
:>> of a comma). Cannot access the data.
:>>
:>> Using a similar system I  worked out a PROG= list to use, however the list
:>> was
:>> too long for the reply command.
:>>
:>> I was able to specify R 00,PROG=(list,CONT
:>>
:>> and was prompted to continue but could not figure out how to specify the
:>> continuation.
:>>
:>> R 0,continuelist)
:>>
:>> was rejected
:>>
:>> R 0,PROG=(remaininglist)
:>>
:>> overrode the list.
:>>
:>> Should I ever have a similar issue, how can I continue the reply?

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel

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

Re: Rexx and DSFS

[Lionel B. Dyck]

I ran a test and this is what I found - IT WORKS FINE

/dsfs/txt/lbdyck/lionel.exec>dir whoson
t IBM-1047T=on  -rwxrwxrwx   1 BPXROOT  OMVSGRP11367 Jan 31 15:14 whoson
/dsfs/txt/lbdyck/lionel.exec>./whoson
Interactive Users on 1 Systems: TSO Users: 1 SSH Users: 2

System:   CBT  Users: 3
xxx x (ssh)
LBDYCKLionel B. Dyck
LBDYCKLionel B. Dyck (ssh)

/dsfs/txt/lbdyck/lionel.exec>


Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you 
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Sunday, April 21, 2024 8:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Rexx and DSFS

Can a Rexx Rexx exec usefully reside in a  DSFS?  It would need to be marked as 
executable.  The following doesn't make it clear:


Is there better information in the DSFS User's Guide?

--
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: Continuing a reply during IPL

[Steve Horein]

I found this example in the doc (
https://www.ibm.com/docs/en/zos/2.4.0?topic=command-specifying-system-parameters1
):
R 00,'MLPA=(00,01,02,CONT' IEA116A CONTINUE SYSTEM PARAMETERS R
00,'03,L),BLDL=02'

Perhaps single quotes are required, or fully padded '00' replyID?
A search in the commands doc did not reveal an explicit topic:
https://www.ibm.com/docs/en/search/CONT?scope=SSLTBW_2.4.0=ieag100

On Mon, Apr 22, 2024 at 4:37 AM Binyamin Dissen 
wrote:

> I had an occasion where the IEASYS PROG= entry was messed up (period in
> place
> of a comma). Cannot access the data.
>
> Using a similar system I  worked out a PROG= list to use, however the list
> was
> too long for the reply command.
>
> I was able to specify R 00,PROG=(list,CONT
>
> and was prompted to continue but could not figure out how to specify the
> continuation.
>
> R 0,continuelist)
>
> was rejected
>
> R 0,PROG=(remaininglist)
>
> overrode the list.
>
> Should I ever have a similar issue, how can I continue the reply?
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
> --
> 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

Continuing a reply during IPL

[Binyamin Dissen]

I had an occasion where the IEASYS PROG= entry was messed up (period in place
of a comma). Cannot access the data.
 
Using a similar system I  worked out a PROG= list to use, however the list was
too long for the reply command.

I was able to specify R 00,PROG=(list,CONT

and was prompted to continue but could not figure out how to specify the
continuation.

R 0,continuelist)

was rejected

R 0,PROG=(remaininglist)

overrode the list.

Should I ever have a similar issue, how can I continue the reply? 

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel

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

Re: SMP/E download anomaly

[Norbert Gál]

Hello Kurt,


All cases, the CLIENT DD referenced the same PDS member.


Regards, 
Norbert



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Kurt Quackenbush
Sent: Friday, April 19, 2024 5:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: SMP/E download anomaly

> I have an interesting case what I cannot untangle. I was creating multiple 
> ORDERSERVER using the same job where downloadmethod="https" is specified, 
> only the SMPCSI changed. For products like zSecure, MFA, AO, Netview, etc, 
> the job ran fine and downloaded relevant PTFs, however in case I was using 
> z/OS 2.4 or 2.5 global zone, the download method set was not honored, and the 
> transfer turned into FTP.
Why? What am I missing?

Does your job define the  XML information, which includes the 
downloadmethod value, inline?  Or does it use a DDDEF entry to point to a data 
set that contains the  XML?

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

Unless stated otherwise above:
Kyndryl Hungary Korlátolt Felelősségű Társaság / Kyndryl Hungary Llc
8000 Székesfehérvár, Berényi út 72-100. 35. ép
Cg.07-09-031714 - registering court: Székesfehérvári Törvényszék Cégbírósága


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