Re: Has anybody tried downloading a new version of tapetools recently using FTPTOOLS or FTPTOOLX job.

[Farley, Peter x23353]

Using an old copy of IE that still supports "ftp://.../"; addresses I see the 
same.  See partial browser screen paste below.

I suspect the OP is right and the block is at his end.

Peter

Partial browser screen paste:

FTP Listing of Root at ftp.software.ibm.com

**
**  
*  IBM's internal systems must only be used for conducting IBM's *
*  business or for purposes authorized by IBM management.*
**
*  Use is subject to audit at any time by IBM management.*
**   
*  Important  Please read* 
**
*  Machine Code updates provided through this site are available *
*  only for IBM machines that are under warranty or an IBM hardware  * 
*  maintenance service agreement Code for operating systems or other *
*  software products is available only where entitled under the  * 
*  applicable software warranty or IBM software maintenance  * 
*  agreement. All code (including Machine Code updates, samples, * 
*  fixes or other software downloads)provided through this site  *  
*  is subject to the terms of the license agreements which   *
*  govern the use of the associated code. Some exceptions may*  
*  apply. IBM reserves the right to change, modify or withdraw its* 
*  offerings, policies and practices at any time. * 
**



Apr 18 2008 00:00Directory 4700
Dec 20 1995 00:00 6981 TRADEMARKS.TXT
Feb 09 2018 00:00Directory aix
Mar 04 2011 00:00Directory annualreport
May 08 2020 00:00Directory as400
Oct 25 2010 00:00Directory bin
. . . Many lines removed for message brevity . . .
Apr 09 2009 00:00Directory solutions
Dec 09 2021 00:00Directory storage
Sep 21 2015 00:00Directory support
Jun 12 2020 00:00Directory systems
Feb 05 2009 00:00Directory virtualworlds


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Benik, John E
Sent: Friday, October 14, 2022 2:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Has anybody tried downloading a new version of tapetools recently 
using FTPTOOLS or FTPTOOLX job.

Looks like we are blocking it then.


Regards,

John Benik
Senior Systems Management Analyst – zSeries Storage Delivery

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Friday, October 14, 2022 1:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Has anybody tried downloading a new version of tapetools recently 
using FTPTOOLS or FTPTOOLX job.

On Fri, 14 Oct 2022 18:10:26 +, Benik, John E 

>If you have an example or if you go into option 6 what do you get?
>  Here's what I got,
>
>ftp.software.ibm.con
>
Is that the entire command you entered at option 6?

> EZA1554I Connecting to: ftp-www3-software.southdata.ibm.com 170.225.126.17 
> port  
>  : 21.
>
> EZA2590E connect error from initIPv4Connection - EDC8127I Connection timed 
> out.  
>   (errno2=0x) 
>
>
>Seems like either we are blocking port 21 or IBM has it blocked.
> 
It appears not to be IBM.  With curl on my desktop I see a log:
220 ProFTPD Server (proftpd) [9.214.168.52]
331 Anonymous login ok, send your complete email address as your password
230 Anonymous access granted, restrictions apply
257 "/" is the current directory
229 Entering Extended Passive Mode (|||34173|)
200 Type set to A
150 Opening ASCII mode data connection for file list
226 Transfer complete

The file list has 21 lines, some as recent as 2021.
curl ftp://ftp.software.ibm.com   | wc
  51 4633253
--


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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

On Sunday, October 9, 2022 3:52 PM, Paul Gilmartin wrote:

>On Sun, 9 Oct 2022 19:00:26 +0000, Farley, Peter x23353 wrote:
>

>
>> ... At the time of that ISO8859-1 test I know I did NOT have the LRECL/RECFM 
>> override in place for the SYSEXEC allocation, so that may have been the 
>> problem rather than the file encoding.
>>
>If it doesn't work it deserves an SR.  Can you Edit/View files so tagged with 
>ISPF?

IIRC I have to use the 3.17 Unix directory browser and a "/" to execute "View 
ASCII/UTF8" or "Edit ASCII/UTF8", as I am unfamiliar with the 3.17 line 
commands to do that (VA or EA maybe?  I really need to go look those up and 
start using them), but yes, I CAN view or edit them when so tagged.

>>I originally did not think of using LRECL/RECFM overrides on the SYSEXEC 
>>allocation because I thought they would be incompatible with the PATH 
>>keywords.  
>>
>I'd say you underestimate IBM, but I've had too much unpleasant experience 
>overestimating IBM in such matters.  BTW, DCB=(LRECL,...) is incompatible with 
>PATH.  WHY!?

Good question, but probably not one to which we can get a straight answer.  At 
a guess, old and crotchety JCL interpretation code that no one wants to touch 
(if it ain't broke, don't fix it), while the "outside a DCB" keywords are 
probably in newer OCO code that is "easier" (FSVO "easier") to maintain.

>> IBM could provide better and more complete examples of accessing Unix 
>> files from a TSO or batch task
>+1
>At least complete examples for IEBGENER SYSUT1 and HLASM SYSLIB, both showing 
>examples of mixed concatenation.  The best I find easily is in Using Data Sets:
>//SYSUT2  DD PATH='/sj/sjpl/xsam/xpm17u01/paytime',
>//   PATHDISP=(KEEP,DELETE),
>//   PATHOPTS=(OCREAT,ORDWR),
>//   PATHMODE=(SIRUSR,SIWUSR,
>// SIRGRP,SIROTH),
>//   FILEDATA=TEXT

+1
Not just HLASM SYSLIB, but also Binder SYSLIB and any/all HLL compiler 
SYSLIB's, STEPLIB/JOBLIB, et alia: Basically, anywhere a Unix directory can 
validly be used as a library.  Such usage probably warrants a sub-chapter of 
its own, or at least a page or two somewhere prominent.

Suggested (sub)chapter title: "Using Unix Directories as libraries".  JCL 
Programmer's Guide perhaps, with sufficient examples to cover all the bases for 
both TSO and batch execution.

Actually, I don’t think I've even looked at the JCL Programmer's Guide in too 
many years, so maybe I should go see what's there these days.

>>   ... that show which DD keywords are compatible with Unix allocations, but 
>> I won't hold my breath waiting for such to be created.  There may be some 
>> table(s) somewhere (maybe in the JCL reference manual?) that show 
>> compatibility, but it's my fault that I haven't looked for them yet.
>> 
>There used to be such a matrix, in the JCL Ref., IIRC.  Perhaps it outgrew 
>page size and IBM simply dropped it in favor of scattered "Relationship to 
>other parameters"
>sentences.
--

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

I believe I tried just removing the DSNTYPE(HFS) and it failed, but I will try 
that again at my next opportunity to see what happens.

Yes, my Rexx programs are tagged (IBM1047 and text), and yes, the 
auto-conversion incantations are active.  I thought I tried tagging as 
ISO8859-1 and text and it failed to execute a called Rexx program in the Unix 
directory with a WRONG.LENGTH.RECORD error, but I will repeat that test to 
verify.  At the time of that ISO8859-1 test I know I did NOT have the 
LRECL/RECFM override in place for the SYSEXEC allocation, so that may have been 
the problem rather than the file encoding.

I probably won’t be able to repeat these tests for at least a week because 
other tasks have priority, but I will report back after they are done.

I originally did not think of using LRECL/RECFM overrides on the SYSEXEC 
allocation because I thought they would be incompatible with the PATH keywords. 
 IBM could provide better and more complete examples of accessing Unix files 
from a TSO or batch task that show which DD keywords are compatible with Unix 
allocations, but I won't hold my breath waiting for such to be created.  There 
may be some table(s) somewhere (maybe in the JCL reference manual?) that show 
compatibility, but it's my fault that I haven't looked for them yet.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Saturday, October 8, 2022 7:53 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

On Sat, 8 Oct 2022 21:40:26 +, Farley, Peter x23353  wrote:

>Follow-up #2: I found out through further experimentation that there is an 
>ASSUMPTION of LRECL(80) RECFM(F) when SYSEXEC is a Unix directory, but you can 
>override that assumption by using LRECL and RECFM on the ALLOC for SYSEXEC:
>
>  "ALLOC FI(SYSEXEC) PATH('/u/tsouser/exec') DSNTYPE(HFS)" ,
> "PATHMODE(SIRUSR,SIXUSR) PATHOPTS(ORDONLY)" ,
> "FILEDATA(TEXT) PATHDISP(KEEP, KEEP) LRECL(4096) RECFM(V)"
> 
Attribute overrides have worked that way for a half century, longer than MVS 
UNIX has existed.

Does DSNTYPE(HFS) do anything, given that HFS is no longer supported?

PATH for SYSEXEC used not to work.  Apparently it has been fixed.

>EBCDIC encoding of the Rexx programs stored in the Unix directory is still 
>required.
>
Are your Rexx programs tagged with CCSID (ASCII, if you want), and have you 
issued the incantations to enable autoconversion?  If you have and it still 
doesn't work, an SR or an RFE is in order.

ISPF Edit recognizes and respects CCSID tagging of UNIX files, converting 
to/from your terminal CCSID.

--

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Follow-up #2: I found out through further experimentation that there is an 
ASSUMPTION of LRECL(80) RECFM(F) when SYSEXEC is a Unix directory, but you can 
override that assumption by using LRECL and RECFM on the ALLOC for SYSEXEC:

  "ALLOC FI(SYSEXEC) PATH('/u/tsouser/exec') DSNTYPE(HFS)" ,
 "PATHMODE(SIRUSR,SIXUSR) PATHOPTS(ORDONLY)" ,
 "FILEDATA(TEXT) PATHDISP(KEEP, KEEP) LRECL(4096) RECFM(V)"

EBCDIC encoding of the Rexx programs stored in the Unix directory is still 
required.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Thursday, September 15, 2022 6:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

Follow-up: Unexpected and dumb restriction found.

While using the knowledge I built during this investigation to write a 
real-world use of the process, I found that the "address TSO" process from a 
starting Rexx in a Unix directory has a record-length restriction on SYSEXEC of 
80 bytes.

In other words, ALLOC of a Unix directory as the SYSEXEC DD makes TSO (and/or 
Rexx itself) "AssUMe" that the LRECL for the directory is 80.

In JCL you may be able overcome this using a dummy first PDS with a longer or 
variable-length RECFM/LRECL, but as far as I can tell ALLOC has no way to 
CONCAT a PDS (dummy or otherwise) with a Unix directory.  BPXWDYN may be able 
to do better, I really need to research that.

Anyway, if any line in the second Unix directory Rexx script (the one you 
really want to run) that is executed under "address TSO" is > 80 bytes, you get 
a "WRONG.LENGTH.RECORD" error and I/O abend from BPAM.

At least the first Rexx (the one you start from Unix) continues running to 
report the error(s).

Peter

-----Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, September 12, 2022 4:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

Apologies, I spotted a typo after hitting send:

3.  The TESTLSA, TESTREXA1, and TESTREXA3 scripts are duplicates of the 
TESTLS, TESTREX1, and TESTREX3 scripts but stored as ISO8859 text rather than 
as IBM1047 text.

TESTREX3, not TESTREX2

Peter

-----Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, September 12, 2022 3:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

I finally found the round tuits to finish this exercise, so here is what I 
found works.  I hope my test pastes here make it through the listserver 
manipulations.  Apologies if they do not.

Setup:

1.  In my Unix $HOME directory I created a new "exec" directory
2.  Below are listed the contents of that "exec" directory with CCSID tags 
shown (and non-relevant lines omitted), followed by a listing of each of the 
three scripts TESTLS, TESTREX1, TESTREX3
3.  The TESTLSA, TESTREXA1, and TESTREXA3 scripts are duplicates of the 
TESTLS, TESTREX1, and TESTREX2 scripts but stored as ISO8859 text rather than 
as IBM1047 text.
4.  The PDSE named TSOUSER.EXEC contains a copy of TESTLS identical to the 
/u/tsouser/exec/TESTLS file

The TESTREX1 script executes the TESTLS script stored in the TSOUSER.EXEC PDSE. 
 The TESTREX3 script executes the TESTLS script stored in 
/u/tsouser/exec/TESTLS.

The TESTLS script executes a LISTDSI using the DSN passed as its only argument 
and prints out the RC and SYSREASON from the LISTDSI, and if the RC is zero it 
then prints some of the LISTDSI returned variable contents.

Listed first below are the results of running the TESTREX1 and TESTREX3 scripts 
directly from the Unix shell command prompt.  Note that running the ISO8859 
versions TESTREXA1 or TESTREXA3 will generate the same results as TESTREX1 and 
TESTREX3.  The key requirement is that if you want to execute a Rexx script 
stored in a Unix directory under "ADDRESS TSO" then that script MUST be coded 
in IBM1047 (or, I suspect, any valid EBCDIC CCSID).  The "starting" script (the 
one you execute from the shell prompt) can be coded in either an EBCDIC CCSID 
or in ISO8859 (and probably also UTF-8) but that capability is probably under 
the influence of the AUTOCVT option(s).

The first key takeaway is that a Rexx script stored in the Unix file system and 
executed under "ADDRESS TSO" in a Rexx script executed from the shell MUST be 
stored in an EBCDIC CCSID.  If you change the Unix-stored script name to be 
executed under "ADDRESS TSO" in the TESTREX3 script to TESTLSA (the ISO8859 
version), it fails with a WRNG.LEN.REC I/O error from BPAM.

The second key takeaway is that the stack does not survive the transition from 
"ADDRESS TSO" back to the script executing under the shell.  I tried using 
"

Re: COBOL V3.2 to COBOL V6.3 conversion effort and Any z/OS or LE limits

[Farley, Peter x23353]

Michael,

I have to disagree with your blanket statement about never trying to debug 
optimized code.  While it is sometimes true that debugging optimized code 
presents a problem, this is NOT always the case.  Certainly recompiling with 
OPT(0) makes debugging easier, but it can hide subtle bugs if you do that.  The 
TEST(SOURCE) compiler option is very helpful for debugging optimized code.  At 
least in my experience, TEST(SOURCE) makes the Intertest debugger behave a lot 
better.  TEST(SOURCE) seems to force the compiler to use "a little less 
optimization" regarding intermediate results, and for example to actually 
populate the target of a MOVE at the time of (or very near the time of) that 
MOVE statement.  Without TEST(SOURCE) you may well see only garbage or a prior 
value in that target variable even after the MOVE has supposedly been executed, 
because for optimization purposes the compiler is keeping the actual value in a 
generated temp field invisible to any debugger.

In other words, TEST(SOURCE) reduces a little bit of optimization in return for 
making debugging optimized code much more effective and possible.  This can be 
a critical advantage when shooting a production issue at oh-dark-thirty with 
Operations and other management breathing down your neck for a resolution NOW 
before their critical (to them) SLA is missed.

It is only when the compiler tells you (in the messages at the end of the 
listing) that it "copied procedures" to multiple locations where it is 
performed that one always has a problem, because any interactive breakpoint set 
in the "copied" paragraphs will never stop there.  In that case it is 
unfortunately true that one must recompile with OPT(0) to see what is actually 
happening in those "copied" paragraphs.

Otherwise (again, in my experience), optimized code can be debugged fairly 
easily if TEST(SOURCE) is used.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Michael Schmitt
Sent: Thursday, October 6, 2022 6:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL V3.2 to COBOL V6.3 conversion effort and Any z/OS or LE 
limits

IBM COBOL for z/OS V5 and later can not live in a PDS library. You must link to 
a PDS/E Program Object library. This may have consequences.
 
If you are using IGZERRE to establish a resusable run-time environment, you 
must convert to CEEPIPI.

If you are using ORDER statements in the Binder, they will not behave as 
expected when the module contains a mixture of COBOL 6 and assembler or COBOL 3 
modules.

If you are solving dumps without aid of an abend diagnosis product, you will be 
severely challenged. It is much harder to find your program's working storage 
in a dump.

Do not attempt to debug optimized COBOL 6 code. The compiler drastically 
rearranges the code path. When debugging, compile as OPT(0).

If you are using SuperZAP to zap modules, it takes different commands because 
the COBOL 6 sections are in a different class name.

...those are the biggest differences that we've hit.
--


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: COBOL V3.2 to COBOL V6.3 conversion effort and Any z/OS or LE limits

[Farley, Peter x23353]

IBM provides some significant help on their COBOL Migration portal here:

https://www.ibm.com/docs/en/cobol-zos/6.4?topic=SS6SG3_6.4.0/migration-portal.html

Tom Ross has given SHARE presentations on migration to V5 and then to V6, if 
you have a SHARE membership check the 2016 and 2017 proceedings archives.  He 
probably also presented them at more recent SHARE conferences as well.

FWIW, we are running V6.1 (+ back-ported updates) and have many existing V3.x 
programs and subroutines working fine without any changes.  The rubber hits the 
road when you need to re-compile an older module to add new function or repair 
a defect.  That's when you need to be aware of what changed and how it might 
affect your program.  Watch out particularly for changes in the way DISPLAY 
NUMERIC's are handled, that is one of the places our teams have found tacit 
assumptions that are no longer necessarily true in the V5/6 compiler output 
code.  E.G., in V3/V4 compiled code, a DISPLAY NUMERIC field that contains all 
SPACES at runtime will successfully compare to the ZEROES literal but will NOT 
compare successfully to ZEROES in V5/6 compiled code because the hardware 
instructions output from the compiler for the compare operation have changed.

I can't answer authoritatively about CICS V5.6, but since V3/V4 compiled code 
runs without issue in batch I would tend to assume it will continue to run fine 
in CICS too, at least for the foreseeable future.  IBM's decades of adherence 
to backward compatibility is a pretty good track record to depend on, but if 
you have CICS-specific questions I suggest asking again over on CICS-L.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gorlinsky
Sent: Thursday, October 6, 2022 12:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: COBOL V3.2 to COBOL V6.3 conversion effort and Any z/OS or LE limits

I have a customer that is still using COBOL V3.2 on z/OS 1.13, 2.2 and 2.4 with 
CICS V5.3, IMS 15.2 and DB2 V12.

Are there any major issues taking them to V6 COBOL ... 

Are there limits on LE interface with COBOL V3 going forward ..

Are there limits on CICS V5.6 interface with COBOL V3 

Thanks in advance ...

Paul
--


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: IBM python documentation? [was: RE: IBM SMF Export with Python]

[Farley, Peter x23353]

I have read that tagging behavior page and it makes sense when applied to files 
stored in the Unix file system.  MVS datasets could just as easily just be 
considered always tagged as cp1047 (with an option to change the CCSID to 037 
or one of the European EBCIDIC code pages) and then you just go on from there.  
Connecting to the MVS file system "under the covers" is the runtime 
implementor's job, not the application developer's job.

As to providing a package to specifically access MVS datasets, my first 
question is why IBM didn't provide one in the first place, or better yet build 
it into the python I/O subsystem from the start?  Why does the community need 
to provide such a basic functionality?  "zoautil_py" is one such 
implementation, but it is extraordinarily "heavyweight" and expensive to use, 
and is not an acceptable solution in a world where every second counts and 
costs real money.  The lack of easy-to-use and efficient MVS file access may 
well discourage more widespread use of python on z/OS for everyday computing 
tasks.

And yes, I can accept that my expectations are not realistic.  It is just a 
shame that an easy-to-use and efficient access to MVS datasets isn't and won't 
be there unless the "community" provides it.  IMHO it should have been 
part-and-parcel of the original language implementation, but I know what my 
opinions and expectations are worth.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Crayford
Sent: Monday, October 3, 2022 1:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM python documentation? [was: RE: IBM SMF Export with Python]

On 3/10/22 07:18, Farley, Peter x23353 wrote:
> Where, for instance, in the documentation that you linked to is there 
> information on whether the python "open()" function for files will or will 
> not support direct access to MVS datasets without transferring them down to 
> the Unix file system?  I.E.,  are either of these calls to the open() 
> function valid or not:
>
> Myfile = open("//'MVS.DATA.SET.NAME", "rt", ccsid="1047")
>
> Myfile = open("//:DDNAME", "rt", ccsid="1047") # This of course 
> assumes that a call to "bpxunix" (or by other means) has been used to 
> establish a DD allocation in the AS where the python program is 
> executing

This will *never* happen. If you read the doc WRT tagging behaviors you will 
understand why 
https://urldefense.com/v3/__https://www.ibm.com/docs/en/python-zos/3.9?topic=translation-tagging-behaviors__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!O2czdpcmZt_bBNIuRr4UXedStf34QpBfTBkZ-wQNwNFosWZR2zrDSP1nat8ZFfmZnRA9s7TVhDN6jaUYFy-CaGg$
  . 
Rocket's Python port supported reading MVS data sets but it was not a 
documented feature and was used with great care. Patching the Python core I/O 
libraries to support MVS data sets is not a great idea. It's much better to 
write a specific library that *only* support MVS data sets and not z/OS UNIX 
files. A good reference implementation is the JZOS ZFile class. If you open an 
RFE IBM may do this. Or maybe the community can contribute? Either way it's 
going to be implemented as a specific package.

Porting tools to support MVS data sets in trivial. They use open() because it's 
a low-level API and read/write support sockets, FIFO's, pipes etc. It's not 
just a case of replacing open with fopen(). Python implements a fdopen() 
https://urldefense.com/v3/__https://docs.python.org/3/library/os.html*os.fdopen__;Iw!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!O2czdpcmZt_bBNIuRr4UXedStf34QpBfTBkZ-wQNwNFosWZR2zrDSP1nat8ZFfmZnRA9s7TVhDN6jaUY6MzWLWc$
   method for wrapping 
file descriptors.
--


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: IBM python documentation? [was: RE: IBM SMF Export with Python]

[Farley, Peter x23353]

As the OP of the other thread on python documentation, let me answer that what 
I expected from IBM for python documentation was the same sort of Language 
Reference and Programmers Guide manuals as they provide for all of the other 
major programming languages that they support.  My understanding at the moment 
is that that hasn't been done and is not likely to be done.

Where, for instance, in the documentation that you linked to is there 
information on whether the python "open()" function for files will or will not 
support direct access to MVS datasets without transferring them down to the 
Unix file system?  I.E.,  are either of these calls to the open() function 
valid or not:

Myfile = open("//'MVS.DATA.SET.NAME", "rt", ccsid="1047")

Myfile = open("//:DDNAME", "rt", ccsid="1047") # This of course assumes that a 
call to "bpxunix" (or by other means) has been used to establish a DD 
allocation in the AS where the python program is executing

In other words, where are the z/OS-specific enhancements to the standard python 
functions and libraries documented (assuming there are any such enhancements, 
which I am beginning to doubt)?  For other IBM-supported programming languages, 
that information would probably be available in the Language Reference manual 
and practical examples and performance-enhancing advice would be provided in 
the Programmers Guide manual.

The first link that you provided is fine for the systems programmer who 
installs the language on z/OS, but has basically nothing relevant for the 
python application programmer.

The "zoautil_py" library does provide some "direct access" to MVS datasets for 
python programs, but the package is quite "heavyweight" and consumes a large 
amount of elapsed and CPU time to use, as recent experimentation I have 
performed clearly showed.  I found that downloading an MVS dataset to the Unix 
file system with the "zowe" CLI interface and accessing that file with "normal" 
python file access functions proved far less expensive than using the 
"zoautil_py" functions to access the same data.  Nowhere in the IBM-provided 
ZOAU documentation did I find any reference to performance characteristics or 
performance-enhancing advice.

That separate python libraries for z/OS maintain separate python documentation 
of their functionality is OK, but then the IBM-specific library websites need 
to provide the same sort of automatic linking to the library documentation that 
the standard python documentation websites use.  I.E., the IBM-specific 
libraries need to have their documentation directly available on the 
".readthedocs.io" website and linked to from their specific page 
on the Pypi indexing website and not just at their github location.

ISTM that IBM is a day late and a dollar short on application-level 
documentation for this language on their systems.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Crayford
Sent: Saturday, October 1, 2022 9:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM SMF Export with Python

On 2/10/22 01:31, Charles Mills wrote:
> We LOVE Python.
>
> When is IBM going to love it enough to ship it and document it as though they 
> loved it?

You can order Python via zShop and install it via SMP/E or download a pax file. 
That's choice right there.

What's wrong with the doc? https://www.ibm.com/docs/en/python-zos/3.10 has all 
the information I need to install, customize and build extensions.

For z/OS specific Python libraries the doc is either shipped with the product 
so as ZAOU or for open source projects with the code in a repository. For 
example, the Python DB2 library and doc can be found on Github 
https://github.com/ibmdb/python-ibmdb  . z/OS specific doc here 
https://github.com/ibmdb/node-ibm_db*configure-odbc-driver-on-zos  . This is 
standard for any open source project. I understand that may be uncomfortable to 
folks that have no experience working with open source.

Another example is https://github.com/ambitus/pyzkiln   which is maintained by 
IBMers from Poughkeepsie but part of the OMP. Anybody interested in writing 
Python libraries that include calling HLASM should take a look at that repo.

Honestly, I don't see what the issue is with doc? It's no different to Java. If 
I need doc for the JRE I read the Oracle doc. If I need doc for Python I head 
on over to the Python doc. Everything I need for z/OS is covered.

>
> (Rhetorical question. I know that David does not know the answer.)
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of David Crayford
> Sent: Friday, September 30, 2022 11:09 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: IBM SMF Export with Python
>
> I know Python is not well received on this forum but as an example of 
> IBMs investment they have announced a new Python toolkit to process 
> SMF data using Jupyter notesbooks, an industry standard visualization 
> too

Re: Is DEBE still alive?

[Farley, Peter x23353]

The DEBE source is available on CBTTAPE.org, file 011.  Comments say it was 
updated to run on MVS/XA, so I would think the answer is "yes".

I always loved that name - "Does Everything But Eat".

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
ITschak Mugzach
Sent: Tuesday, September 27, 2022 9:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Is DEBE still alive?

I don't have this module installed, but wonder if it will work on a Z/OS
system if it was installed.

ITschak Mugzach
--

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: IBM python documentation?

[Farley, Peter x23353]

Thanks for the reminder about the zoautil_py functions, I did know about them 
but there are gaps -- e.g. ZOAU has no direct support for simple sequential 
processing of VSAM files (e.g., to download a copy of VSAM data to a flat file 
in the Unix Services environment for analysis there).  I have used a Rexx 
script that executes the FileManager batch utility program FMNMAIN to perform 
such functions.  The FileManager batch program proved to be the most compatible 
in generating correct Unix Services output files for various flavors of VSAM 
input files where IDCAMS REPRO or DFSORT "OPTION COPY" outputs were less so.

Re: "ADDRESS TSO" needs - Rexx is not necessarily needed, as there is also the 
Unix Services command "tso" (or "tsocmd" for authorized services) to execute a 
single TSO command.  The python subprocess.run() function could handle 
executing that command and capturing the output as needed.

For more complicated "ADDRESS TSO" needs, yes one can execute a Rexx script in 
the Unix Services environment which uses "ADDRESS TSO" to execute a Rexx script 
also stored in that environment (or in an MVS library assigned to SYSEXEC) that 
then actually uses "ADDRESS TSO" functions.  A bit Rube Goldberg, but it does 
work, as my recent experimentation with getting LISTDSI output from the Unix 
Services environment proved.  Conceivably one could write that first Rexx 
script to set up an ISPF environment (all the needed DD's, etc.) and execute 
the second (functional) script in an ISPF environment (I haven't tried that 
yet; here there be dragons).

Re: Writing an MVS I/O package for IBM python - ISTM that without documentation 
of the runtime architecture of the IBM python port (and also possibly access to 
the source of the port) it is not likely to succeed.  OCO strikes again.

The new DSFS functionality may or may not relieve the need for an MVS-specific 
I/O package.  That remains to be seen.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Matt Hogstrom
Sent: Monday, September 26, 2022 8:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM python documentation?

If IIRC IBM loosely paired the IBM ZOAU to “assist Python”.  
https://community.ibm.com/community/user/ibmz-and-linuxone/blogs/austin-wells1/2020/12/11/using-ibm-open-enterprise-python-for-zos-and-zoau
  

The challenge I see currently with Python is that is runs in a USS environment 
so if you need to “ADDRESS TSO” you need to call a REXX from Python in USS and 
do the other work.  Its probably not going to happen but a “System” Python 
might fill that gap.

Matt Hogstrom
m...@hogstrom.org

“It may be cognitive, but, it ain’t intuitive."
— Hogstrom

> On Sep 25, 2022, at 11:15 PM, David Crayford  wrote:
> 
> On 26/9/22 10:43, Charles Mills wrote:
>>> It's trivial to write an MVS I/O package if you have a C compiler.
>> One might ask then why IBM has not done so.
> 
> I would suggest that they have not had a requirement. IBM use Python in their 
> analytics products and for new stuff like Ansible. Same with golang, they 
> need it for Kubernetes and OpenShift for z/CX containers. I doubt very much 
> if many customers have tried golang. It's a great language now it supports 
> generics. As fast as C++ with many advantages.
> 
> 
>> Charles
>> 
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
>> On Behalf Of David Crayford
>> Sent: Sunday, September 25, 2022 6:57 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: IBM python documentation?
>> 
>> On 26/9/22 07:34, Farley, Peter x23353 wrote:
>>> I know Rocket's port of python has some documented enhancements to support 
>>> MVS dataset access among other things, but I have failed to find any 
>>> documentation on the IBM websites for an IBM-produced "python Programmers 
>>> Guide" (or similar) that would describe and provide examples for any 
>>> "IBM-specific" functional enhancements to the base language facilities.
>>> 
>>> Is there any such documentation?  Or are the python.org 
>>> documentation websites the only reference material available for the 
>>> IBM port of python? (i.e., no functional enhancements at all are 
>>> provided in the IBM port)
>> Correct! It's trivial to write an MVS I/O package if you have a C compiler.
--

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 

IBM python documentation?

[Farley, Peter x23353]

I know Rocket's port of python has some documented enhancements to support MVS 
dataset access among other things, but I have failed to find any documentation 
on the IBM websites for an IBM-produced "python Programmers Guide" (or similar) 
that would describe and provide examples for any "IBM-specific" functional 
enhancements to the base language facilities.

Is there any such documentation?  Or are the python.org documentation websites 
the only reference material available for the IBM port of python? (i.e., no 
functional enhancements at all are provided in the IBM port)

Peter

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

Net nanny voodoo [was: RE: Assembler courses]

[Farley, Peter x23353]

Wow, talk about "nanny state" link protection - have a gander at the hugely 
complex mess that René's perfectly reasonable links to the IDCP and Marist 
copies of Mr. Ehrman's opus turned into below.  Someone else's web link safety 
filter added "https://nam11.safelinks.protection.outlook.com"; around René's 
link and then my employer's filter added " https://urldefense.com/v3"; around 
that filter.

I know it is important to keep the untrained masses from clicking on dangerous 
links, but this is getting really ridiculous.

Strangely, I can only see René's actual email to the list on the IBM-MAIN 
archive.  I never received it here, and it did not wind up in my employer's 
email filter cache (off-prem quarantine of just plain junk and actually 
dangerous emails).  I only received Seymour's response to René's message.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Sunday, September 18, 2022 10:59 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler courses

I haven't read it, but surely nobody could question the credentials of the 
author (ז״ל). I miss him.

--
Shmuel (Seymour J.) Metz
https://urldefense.com/v3/__http://mason.gmu.edu/*smetz3__;fg!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!ImPNbMPUrUVpkPeOd2RbYZN1oF-ZEdWfIW9gt1rwgJYYfJKHkammPPpw_A4YtbGJGiCOG2-BZIOB8Q4AmqG0LA$
  


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
René Jansen [rene.vincent.jan...@gmail.com]
Sent: Sunday, September 18, 2022 9:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler courses

I don’t know if someone on the assembler list mentioned this already, but 
https://urldefense.com/v3/__https://nam11.safelinks.protection.outlook.com/?url=https*3A*2F*2Fidcp.marist.edu*2Fdocuments*2F33945*2F44724*2FAssembler.V2.alntext*2BV2.00.pdf*2Fad61965e-8485-65e1-f385-e5cd56f08c63*3Ft*3D1551806232272&data=05*7C01*7Csmetz3*40gmu.edu*7Ca8141b8f50784d579bf208da9978d579*7C9e857255df574c47a0c00546460380cb*7C0*7C0*7C637991043314749524*7CUnknown*7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0*3D*7C3000*7C*7C*7C&sdata=c0XkXdhzNBoLf*2Bu1AjGbrI9WXLtivAFVMotq8J32cc0*3D&reserved=0__;JSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJQ!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!ImPNbMPUrUVpkPeOd2RbYZN1oF-ZEdWfIW9gt1rwgJYYfJKHkammPPpw_A4YtbGJGiCOG2-BZIOB8Q6vStHKog$
   
 should be everything you need, and it’s free! Plus other resources on 
https://urldefense.com/v3/__https://nam11.safelinks.protection.outlook.com/?url=https*3A*2F*2Fidcp.marist.edu*2Fassembler-resources&data=05*7C01*7Csmetz3*40gmu.edu*7Ca8141b8f50784d579bf208da9978d579*7C9e857255df574c47a0c00546460380cb*7C0*7C0*7C637991043314749524*7CUnknown*7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0*3D*7C3000*7C*7C*7C&sdata=fIPsXHRJZ4VJO1kJdZzNvg*2FZCiI63Nb1yEpcTW49QQo*3D&reserved=0__;JSUlJSUlJSUlJSUlJSUlJSUlJSUl!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!ImPNbMPUrUVpkPeOd2RbYZN1oF-ZEdWfIW9gt1rwgJYYfJKHkammPPpw_A4YtbGJGiCOG2-BZIOB8Q4zauEFww$
   
.

Actually, it is so good that I tried to get the bookie source to modernise it a 
bit - make it searchable etc. I called John’s old boss and department … but 
it’s complicated …

Best regards,.

René.

> On 18 Sep 2022, at 15:11, Bob Bridges  wrote:
>
> Twenty years ago I wrote a few programs for Excel, and didn't see what 
> all the fuss was about: "object-oriented" didn't seem very different 
> from traditional programming that I'd been doing for 25 years.  (At 
> the same time I was frequently infuriated at the message "...does not 
> support this property or method", exactly because I ~didn't~ 
> understand what was different about OO codi

Re: Assembler courses

[Farley, Peter x23353]

Great link Mike, thanks.  I'll be passing that one on to people I know who 
might be interested in learning at least the basics.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mike Beer
Sent: Saturday, September 17, 2022 2:27 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: Assembler courses

This could be interesting:
https://urldefense.com/v3/__https://github.com/adelosa/learnasm370__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!I2imP9wOmcYJDEMYAGWcpDH5l3cYWjvbUpgzAh8aDfMqV7jLx7t2SYvXmMixpVVFu8sRvImdrWgxeeqmMQ$
  

best regards
Mike

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von
Mike Hochee
Gesendet: Saturday, September 17, 2022 20:11
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: Assembler courses

Hey Gary, 

I can't recommend these folks as I haven't actually used their services, but
know they offer some assembler courses (including 'advanced', whatever that
means). I've also heard that both BMC and Rocket utilize their training,
unconfirmed.  Anyway... 

Darren Surch COO Interskill Learning
O:214.459.6322   M:469.826.1811   dsu...@interskill.com

HTH,
Mike 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Gary Weinhold
Sent: Friday, September 16, 2022 10:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Assembler courses

To help a person who has COBOL and C language experience learn to write
assembler, I would like them to learn from the start both reentrant and
baseless coding techniques.  Is there training available that assumes the
instruction set available on the z12 is the starting point and that teaches
reentrancy as the norm?

(Cross-posted to IBM-Main and Assembler-list)

Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: weinh...@dkl.com
--

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: Assembler courses

[Farley, Peter x23353]

My experience was the opposite of yours over a few more years (50).  I learned 
assembler early via OJT at one of my first permanent jobs, and got to use it 
more and more as I moved to other employers.  Knowing assembler got me in the 
door at more than one of those employers.

It was the FORTRAN I learned in engineering college that I never used anywhere 
else.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
T Roller
Sent: Saturday, September 17, 2022 3:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler courses

Learning assembler is like taking latin in high school. It might help you on 
Jeopardy but will not be of much help in real life. I took assembler in college 
& never used it and never worked at an employer that used it. That’s a dozen+ 
employers over 45 years.

Sent from Proton Mail for iOS

On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:

> To help a person who has COBOL and C language experience learn to write 
> assembler, I would like them to learn from the start both reentrant and 
> baseless coding techniques. Is there training available that assumes the 
> instruction set available on the z12 is the starting point and that teaches 
> reentrancy as the norm?
>
> (Cross-posted to IBM-Main and Assembler-list)
>
> Gary Weinhold
> Senior Application Architect
> DATAKINETICS | Data Performance & Optimization
> Phone:+1.613.523.5500 x216
> Email: weinh...@dkl.com
--

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

More appropriately, since my ALLOC of SYSEXEC to a PATH specified 
FILETYPE(TEXT), it seems to me that should signal to the system (whoever 
creates and opens the SYSEXEC DCB) that the data in that file are presumptively 
RECFM=V,LRECL=(some reasonable maximum like 4096).

Hindsight is always 20/20.

I will try out both LRECL on the existing ALLOC and the BPXWDYN method and see 
which works.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Thursday, September 15, 2022 7:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

On Thu, 15 Sep 2022 22:19:40 +, Farley, Peter x23353 
 wrote:

>Follow-up: Unexpected and dumb restriction found.
>
>While using the knowledge I built during this investigation to write a 
>real-world use of the process, I found that the "address TSO" process from a 
>starting Rexx in a Unix directory has a record-length restriction on SYSEXEC 
>of 80 bytes.
>
>In other words, ALLOC of a Unix directory as the SYSEXEC DD makes TSO (and/or 
>Rexx itself) "AssUMe" that the LRECL for the directory is 80.
>
>In JCL you may be able overcome this using a dummy first PDS with a longer or 
>variable-length RECFM/LRECL, but as far as I can tell ALLOC has no way to 
>CONCAT a PDS (dummy or otherwise) with a Unix directory.  BPXWDYN may be able 
>to do better, I really need to research that.
>
ADDRESS TSO "call bpxwdyn 'concat(SYSEXEC,...)'"

>Anyway, if any line in the second Unix directory Rexx script (the one you 
>really want to run) that is executed under "address TSO" is > 80 bytes, you 
>get a "WRONG.LENGTH.RECORD" error and I/O abend from BPAM.
>
Can't you specify LRECL on ALLOCATE (or BPXWDYN) PATH ...?

Many years ago I encountered a similar (I felt it was worse) problem because a 
PATH hasn't a DSORG acceptable for REXX.  Has that been fixed?  DYNALOC should 
supply PO or PS as suitable, or at least make DSORG not mutually exclusive with 
PATH in JCL.  I circumvented with CONCAT.

And I got an ABEND from FREEMAIN (I guess) at exec termination (storage key 
conflict, I guess.)  I ignored it because it occurred at completion and no data 
were lost.

--

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Follow-up: Unexpected and dumb restriction found.

While using the knowledge I built during this investigation to write a 
real-world use of the process, I found that the "address TSO" process from a 
starting Rexx in a Unix directory has a record-length restriction on SYSEXEC of 
80 bytes.

In other words, ALLOC of a Unix directory as the SYSEXEC DD makes TSO (and/or 
Rexx itself) "AssUMe" that the LRECL for the directory is 80.

In JCL you may be able overcome this using a dummy first PDS with a longer or 
variable-length RECFM/LRECL, but as far as I can tell ALLOC has no way to 
CONCAT a PDS (dummy or otherwise) with a Unix directory.  BPXWDYN may be able 
to do better, I really need to research that.

Anyway, if any line in the second Unix directory Rexx script (the one you 
really want to run) that is executed under "address TSO" is > 80 bytes, you get 
a "WRONG.LENGTH.RECORD" error and I/O abend from BPAM.

At least the first Rexx (the one you start from Unix) continues running to 
report the error(s).

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, September 12, 2022 4:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

Apologies, I spotted a typo after hitting send:

3.  The TESTLSA, TESTREXA1, and TESTREXA3 scripts are duplicates of the 
TESTLS, TESTREX1, and TESTREX3 scripts but stored as ISO8859 text rather than 
as IBM1047 text.

TESTREX3, not TESTREX2

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, September 12, 2022 3:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

I finally found the round tuits to finish this exercise, so here is what I 
found works.  I hope my test pastes here make it through the listserver 
manipulations.  Apologies if they do not.

Setup:

1.  In my Unix $HOME directory I created a new "exec" directory
2.  Below are listed the contents of that "exec" directory with CCSID tags 
shown (and non-relevant lines omitted), followed by a listing of each of the 
three scripts TESTLS, TESTREX1, TESTREX3
3.  The TESTLSA, TESTREXA1, and TESTREXA3 scripts are duplicates of the 
TESTLS, TESTREX1, and TESTREX2 scripts but stored as ISO8859 text rather than 
as IBM1047 text.
4.  The PDSE named TSOUSER.EXEC contains a copy of TESTLS identical to the 
/u/tsouser/exec/TESTLS file

The TESTREX1 script executes the TESTLS script stored in the TSOUSER.EXEC PDSE. 
 The TESTREX3 script executes the TESTLS script stored in 
/u/tsouser/exec/TESTLS.

The TESTLS script executes a LISTDSI using the DSN passed as its only argument 
and prints out the RC and SYSREASON from the LISTDSI, and if the RC is zero it 
then prints some of the LISTDSI returned variable contents.

Listed first below are the results of running the TESTREX1 and TESTREX3 scripts 
directly from the Unix shell command prompt.  Note that running the ISO8859 
versions TESTREXA1 or TESTREXA3 will generate the same results as TESTREX1 and 
TESTREX3.  The key requirement is that if you want to execute a Rexx script 
stored in a Unix directory under "ADDRESS TSO" then that script MUST be coded 
in IBM1047 (or, I suspect, any valid EBCDIC CCSID).  The "starting" script (the 
one you execute from the shell prompt) can be coded in either an EBCDIC CCSID 
or in ISO8859 (and probably also UTF-8) but that capability is probably under 
the influence of the AUTOCVT option(s).

The first key takeaway is that a Rexx script stored in the Unix file system and 
executed under "ADDRESS TSO" in a Rexx script executed from the shell MUST be 
stored in an EBCDIC CCSID.  If you change the Unix-stored script name to be 
executed under "ADDRESS TSO" in the TESTREX3 script to TESTLSA (the ISO8859 
version), it fails with a WRNG.LEN.REC I/O error from BPAM.

The second key takeaway is that the stack does not survive the transition from 
"ADDRESS TSO" back to the script executing under the shell.  I tried using 
"QUEUE" instead of "SAY" in the TESTLS script, but the values stacked got 
"executed" under the "ADDRESS TSO" umbrella, so "ADDRESS TSO" scripts that want 
to return data have to use "SAY" to transmit information back to the invoking 
script.

Peter

/u/tsouser/exec > TESTREX1 'TSOUSER.EXEC'
 3 *-* parse source env how fullname fromddn fromdsn fromname hostcmd 
hostasn
   >>>   "TSO"
   >>>   "COMMAND"
   >>>   "./exec/TESTREX1"
   >>>   "PATH"
   >>>   "./exec/TESTREX1"
   >>>   "?"
   >>>   "SH"
   >>>   "OMVS OpenMVS"
 4 *-

Re: Is HFS still a thing?

[Farley, Peter x23353]

Well, both JCL and the TSO/E ALLOCATE command still only take "HFS" as a value 
for DSNTYPE when allocating a Unix PATH file.

E.G. for ALLOC:

ALLOC FI(MYDDNAME) PATH('/u/tsouser/file') DSNTYPE(HFS) PATHMODE(SIRUSR) 
PATHOPTS(ORDONLY) FILEDATA(TEXT) PATHDISP(KEEP, KEEP)

For JCL, see here:  
https://www.ibm.com/docs/en/zos/2.5.0?topic=dp-syntax-10
For ALLOCATE see here:  
https://www.ibm.com/docs/en/zos/2.5.0?topic=command-allocate-operands

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Wednesday, September 14, 2022 2:05 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Is HFS still a thing?

I just submitted an RCF on various z/OS 2.5. TSO/E publications which
mention HFS with no mention of HFS EOS.

-- 

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Apologies, I spotted a typo after hitting send:

3.  The TESTLSA, TESTREXA1, and TESTREXA3 scripts are duplicates of the 
TESTLS, TESTREX1, and TESTREX3 scripts but stored as ISO8859 text rather than 
as IBM1047 text.

TESTREX3, not TESTREX2

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, September 12, 2022 3:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

EXTERNAL EMAIL

I finally found the round tuits to finish this exercise, so here is what I 
found works.  I hope my test pastes here make it through the listserver 
manipulations.  Apologies if they do not.

Setup:

1.  In my Unix $HOME directory I created a new "exec" directory
2.  Below are listed the contents of that "exec" directory with CCSID tags 
shown (and non-relevant lines omitted), followed by a listing of each of the 
three scripts TESTLS, TESTREX1, TESTREX3
3.  The TESTLSA, TESTREXA1, and TESTREXA3 scripts are duplicates of the 
TESTLS, TESTREX1, and TESTREX2 scripts but stored as ISO8859 text rather than 
as IBM1047 text.
4.  The PDSE named TSOUSER.EXEC contains a copy of TESTLS identical to the 
/u/tsouser/exec/TESTLS file

The TESTREX1 script executes the TESTLS script stored in the TSOUSER.EXEC PDSE. 
 The TESTREX3 script executes the TESTLS script stored in 
/u/tsouser/exec/TESTLS.

The TESTLS script executes a LISTDSI using the DSN passed as its only argument 
and prints out the RC and SYSREASON from the LISTDSI, and if the RC is zero it 
then prints some of the LISTDSI returned variable contents.

Listed first below are the results of running the TESTREX1 and TESTREX3 scripts 
directly from the Unix shell command prompt.  Note that running the ISO8859 
versions TESTREXA1 or TESTREXA3 will generate the same results as TESTREX1 and 
TESTREX3.  The key requirement is that if you want to execute a Rexx script 
stored in a Unix directory under "ADDRESS TSO" then that script MUST be coded 
in IBM1047 (or, I suspect, any valid EBCDIC CCSID).  The "starting" script (the 
one you execute from the shell prompt) can be coded in either an EBCDIC CCSID 
or in ISO8859 (and probably also UTF-8) but that capability is probably under 
the influence of the AUTOCVT option(s).

The first key takeaway is that a Rexx script stored in the Unix file system and 
executed under "ADDRESS TSO" in a Rexx script executed from the shell MUST be 
stored in an EBCDIC CCSID.  If you change the Unix-stored script name to be 
executed under "ADDRESS TSO" in the TESTREX3 script to TESTLSA (the ISO8859 
version), it fails with a WRNG.LEN.REC I/O error from BPAM.

The second key takeaway is that the stack does not survive the transition from 
"ADDRESS TSO" back to the script executing under the shell.  I tried using 
"QUEUE" instead of "SAY" in the TESTLS script, but the values stacked got 
"executed" under the "ADDRESS TSO" umbrella, so "ADDRESS TSO" scripts that want 
to return data have to use "SAY" to transmit information back to the invoking 
script.

Peter

/u/tsouser/exec > TESTREX1 'TSOUSER.EXEC'
 3 *-* parse source env how fullname fromddn fromdsn fromname hostcmd 
hostasn
   >>>   "TSO"
   >>>   "COMMAND"
   >>>   "./exec/TESTREX1"
   >>>   "PATH"
   >>>   "./exec/TESTREX1"
   >>>   "?"
   >>>   "SH"
   >>>   "OMVS OpenMVS"
 4 *-* SAY "PARSE SOURCE =" env how fullname fromddn fromdsn fromname 
hostcmd hostasn
   >>>   "PARSE SOURCE = TSO COMMAND ./exec/TESTREX1 PATH ./exec/TESTREX1 ? 
SH OMVS OpenMVS"
PARSE SOURCE = TSO COMMAND ./exec/TESTREX1 PATH ./exec/TESTREX1 ? SH OMVS 
OpenMVS
 5 *-* CALL OUTTRAP OUT.
   >>>   "OUT."
   >>>   "OUT."
 6 *-* ADDRESS TSO
 7 *-* "ALLOC FI(SYSEXEC) DA('TSOUSER.EXEC') SHR"
   >>>   "ALLOC FI(SYSEXEC) DA('TSOUSER.EXEC') SHR"
 8 *-* "TESTLS 'TSOUSER.EXEC'"
   >>>   "TESTLS 'TSOUSER.EXEC'"
 9 *-* "FREE FI(SYSEXEC)"
   >>>   "FREE FI(SYSEXEC)"
10 *-* DO I=1 TO OUT.0
   >>>   "1"
   >>>   "4"
11 *-*  SAY OUT.I
   >>>"PARSE SOURCE = TSO COMMAND TESTLS SYSEXEC ? ? TSO TSO/E ?"
PARSE SOURCE = TSO COMMAND TESTLS SYSEXEC ? ? TSO TSO/E ?
12 *-* END
10 *-* DO I=1 TO OUT.0
11 *-*  SAY OUT.I
   >>>"RUNNING LISTDSI('TSOUSER.EXEC')"
RUNNING LISTDSI('TSOUSER.EXEC')
12 *-* END
10 *-

Re: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

fromdsn fromname hostcmd 
hostasn
   >>>   "TSO"
   >>>   "COMMAND"
   >>>   "./exec/TESTREX3"
   >>>   "PATH"
   >>>   "./exec/TESTREX3"
   >>>   "?"
   >>>   "SH"
   >>>   "OMVS OpenMVS"
 4 *-* SAY "PARSE SOURCE =" env how fullname fromddn fromdsn fromname 
hostcmd hostasn
   >>>   "PARSE SOURCE = TSO COMMAND ./exec/TESTREX3 PATH ./exec/TESTREX3 ? 
SH OMVS OpenMVS"
PARSE SOURCE = TSO COMMAND ./exec/TESTREX3 PATH ./exec/TESTREX3 ? SH OMVS 
OpenMVS
 5 *-* CALL OUTTRAP OUT.
   >>>   "OUT."
   >>>   "OUT."
 6 *-* ADDRESS TSO
 7 *-* "ALLOC FI(SYSEXEC) PATH('/u/tsouser/exec') DSNTYPE(HFS)" , 
"PATHMODE(SIRUSR,SIXUSR) PATHOPTS(ORDONLY)" , "FILEDATA(TEXT) 
PATHDISP(KEEP, KEEP)"
   >>>   "ALLOC FI(SYSEXEC) PATH('/u/tsouser/exec') DSNTYPE(HFS) 
PATHMODE(SIRUSR,SIXUSR) PATHOPTS(ORDONLY) FILEDATA(TEXT) PATHDISP(KEEP, KEEP)"
10 *-* "TESTLS 'TSOUSER.EXEC'"
   >>>   "TESTLS 'TSOUSER.EXEC'"
11 *-* "FREE FI(SYSEXEC)"
   >>>   "FREE FI(SYSEXEC)"
12 *-* DO I=1 TO OUT.0
   >>>   "1"
   >>>   "4"
13 *-*  SAY OUT.I
   >>>"PARSE SOURCE = TSO COMMAND TESTLS SYSEXEC ? ? TSO TSO/E ?"
PARSE SOURCE = TSO COMMAND TESTLS SYSEXEC ? ? TSO TSO/E ?
14 *-* END
12 *-* DO I=1 TO OUT.0
13 *-*  SAY OUT.I
   >>>"RUNNING LISTDSI('TSOUSER.EXEC')"
RUNNING LISTDSI('TSOUSER.EXEC')
14 *-* END
12 *-* DO I=1 TO OUT.0
13 *-*  SAY OUT.I
   >>>"LISTDSI RC = 0 REASON = "
LISTDSI RC = 0 REASON = 
14 *-* END
12 *-* DO I=1 TO OUT.0
13 *-*  SAY OUT.I
   >>>"DSN=TSOUSER.EXEC,DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=32720"
DSN=TSOUSER.EXEC,DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=32720
14 *-* END
12 *-* DO I=1 TO OUT.0
15 *-* EXIT

/u/tsouser > ls -laT exec
total 192
drwxr-xr-x   2 TSOUSER   USERGRP 8192 Aug 30 01:40 .
drwxr-x---  11 TSOUSER   USERGRP 8192 Sep 12 13:22 ..
t IBM-1047T=on  -rwxr-xr-x   1 TSOUSER   USERGRP  416 Sep 12 12:54
TESTLS
t ISO8859-1   T=on  -rwxr-xr-x   1 TSOUSER   USERGRP  416 Sep 12 13:03
TESTLSA
t IBM-1047T=on  -rwxr-xr-x   1 TSOUSER   USERGRP  385 Aug 29 22:12
TESTREX1
t IBM-1047T=on  -rwxr-xr-x   1 TSOUSER   USERGRP  471 Aug 29 23:40
TESTREX3
t ISO8859-1   T=on  -rwxr-xr-x   1 TSOUSER   USERGRP  353 Aug 29 22:17
TESTREXA1
t ISO8859-1   T=on  -rwxr-xr-x   1 TSOUSER   USERGRP  501 Sep 12 12:58
TESTREXA3

This is the TESTLS script:

/* REXX */
TRACE "O"
parse source env how fullname fromddn fromdsn fromname hostcmd hostasn
SAY "PARSE SOURCE =" env how fullname fromddn fromdsn fromname hostcmd hostasn
ARG DSN2LIST
SAY "RUNNING LISTDSI("DSN2LIST")"
RRC = LISTDSI(DSN2LIST)
SAY 'LISTDSI RC =' RRC 'REASON =' SYSREASON
IF RRC = 0 THEN DO
   SAY 'DSN='SYSDSNAME',DSORG='SYSDSORG',RECFM='SYSRECFM ||,
   ',LRECL='SYSLRECL',BLKSIZE='SYSBLKSIZE
END

This is the TESTREX1 script:

/* REXX */
TRACE 'R'
parse source env how fullname fromddn fromdsn fromname hostcmd hostasn
SAY "PARSE SOURCE =" env how fullname fromddn fromdsn fromname hostcmd hostasn
CALL OUTTRAP OUT.
   ADDRESS TSO
  "ALLOC FI(SYSEXEC) DA('TSOUSER.EXEC') SHR"
  "TESTLS 'TSOUSER.EXEC'"
  "FREE FI(SYSEXEC)"
   DO I=1 TO OUT.0
  SAY OUT.I
   END
EXIT

This is the TESTREX3 script:

/* REXX */
TRACE 'R'
parse source env how fullname fromddn fromdsn fromname hostcmd hostasn
SAY "PARSE SOURCE =" env how fullname fromddn fromdsn fromname hostcmd hostasn
CALL OUTTRAP OUT.
   ADDRESS TSO
  "ALLOC FI(SYSEXEC) PATH('/u/tsouser/exec') DSNTYPE(HFS)" ,
 "PATHMODE(SIRUSR,SIXUSR) PATHOPTS(ORDONLY)" ,
 "FILEDATA(TEXT) PATHDISP(KEEP, KEEP)"
  "TESTLS 'TSOUSER.EXEC'"
  "FREE FI(SYSEXEC)"
   DO I=1 TO OUT.0
  SAY OUT.I
   END
EXIT

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Friday, August 26, 2022 12:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

Thank you Hank.  I was able to use those examples and your suggestion to get 
something working that uses LISTDSI.  I will post my results later after a bit 
more

Re: Why is my second Rexx SYSCALLS read failing?

[Farley, Peter x23353]

The RC values are documented here for all SYSCALLS functions (including -21, 
-22, ...):

https://www.ibm.com/docs/en/zos/2.5.0?topic=values-returned-from-syscall-environment

Note though that there is also language saying that various "other" RC values 
can be produced by "some" functions without a list or table of the exceptional 
functions and values.  That lack may well call for an RCF.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Sunday, September 11, 2022 1:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why is my second Rexx SYSCALLS read failing?

On Sun, 11 Sep 2022 11:29:07 -0500, Charles Mills wrote:

>... Bad open of course yields a bad fd which yields a -21. It is all new 
> code and I had not tested open failures specifically. 
>
>Not sure where you saw the example that you cited. The IBM doc that I am 
>looking at has the following for an example (in its entirety):
>
>"open /u/linda/my.exec" o_rdwr+o_trunc+o_creat 700
>
>which is of course useless with regard to how one checks for errors. IBM could 
>do better, especially if open is atypical in how it reports errors. 
>
>(https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/2.5.0?topic=descriptions-open__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!L7gY3iiW9XBWoek9Fsjq0fdDz_0RnVlGyAETtbKnP6KER4VB3pgLFDxBipH85Zm3rn1tFStB-MFvZSGT9_NWtMbWqqg72Q68YLVSfUef$
>  )
>
-1 is highly typical among UNIX functions, perhaps even in the purview
of "ça va sans dire", but there are numerous atypical cases for which the
programmer must check ERRNO; for example EAGAIN.  If you intend
to read from a transient stream (pipe, terminal), you should check EAGAIN.

-21 is extraordinary.  If it's not clearly documented (where?) it merits an 
RCF';
probably even an SR.

-- 

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: IBM Redbook SG24-8205-06 - zPDT Guide

[Farley, Peter x23353]

I am curious - why do you say that Wazi is not good for systems programmer 
learning?  What is restricted there for systems programmers?  Are the images 
they start with not kept private to your own instance so that any systems-level 
changes you make to your private instance persist across virtual IPL's of that 
instance?

I did a minimal amount of research on Wazi and I *sort of* like that the 
instances are hosted on "real iron" z hardware, so I presume you get a z/VM 
login from which to IPL your z/OS instance.  There are good and bad points 
there.  Assuming it is hosted for "Learners" versions at Dallas RDP, there are 
other issues that can come up, like the recent Dallas network outage.

OTOH, the "aaS" aspect may indicate that they control update of the 
system-level images to the point where you cannot update (or automatically lose 
updates to) certain system-level features in order to provide "good service".

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Jay 
Maynard
Sent: Wednesday, September 7, 2022 11:00 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM Redbook SG24-8205-06 - zPDT Guide

That's what I'd heard.
Wazi is great if all you want to do is play with application programming, but 
as a systems programmer learning tool, it sucks rocks.

On Wed, Sep 7, 2022 at 9:58 AM Tom Brennan 
wrote:

> On 9/7/2022 7:18 AM, Farley, Peter x23353 wrote:
> > I was told my application would be "moved into the approval queue" 
> > in
> February 2022, but significant numbers of unanswered emails later I 
> still do not have a copy.  They just stopped responding at all.
> >
> > The FAQ at url
> https://urldefense.com/v3/__https://www.ibm.com/products/z-development-test-environment/pricing__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!JCU20a5vNTFZsapeX6Gz6vfgNpz4NDcJnXtWQqS0tdzvZcfpJUO2SNYFMP-nqNGsQjIcRCP7-ej-blM2b1bvIOp7$
>now
> says:
> >
> > "Learner's Edition is currently being updated and will return soon."
>
> A couple of months ago I was on a phone meeting with IBMer's for some 
> other reason, and the manager of zPDT happened to be on the call.  So 
> I couldn't help asking about the status.  He said it was "on pause" 
> (which mirrors that web page text), but he also said the plan at that 
> time was to move it to Wazi.
--

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: IBM Redbook SG24-8205-06 - zPDT Guide

[Farley, Peter x23353]

I was told my application would be "moved into the approval queue" in February 
2022, but significant numbers of unanswered emails later I still do not have a 
copy.  They just stopped responding at all.

The FAQ at url 
https://www.ibm.com/products/z-development-test-environment/pricing now says:

"Learner's Edition is currently being updated and will return soon."

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Regan
Sent: Wednesday, September 7, 2022 7:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM Redbook SG24-8205-06 - zPDT Guide

I bot the Learners Edition installed and running back in June. I just kept 
following up with IBM until I finally got it.

​Regards,

Mark Regan, K8MTR General, EN80tg
CTO1 USNR-Retired (1969-1991), 
RUENAAA/CNO WASHINGTON DC//OP-009QCP
Nationwide Insurance, Retired, 1986-2017
z/OS Network Software Consultant (z NetView, z/OS Communications Server)
Contractor, Checks & Balances, Inc.
Email: marktre...@gmail.com
LinkedIn:  
https://urldefense.com/v3/__https://www.linkedin.com/in/mark-t-regan__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KJ_1Zringnz2fpGQWUOaFv5F6nqeBIu5W-C3FSJGUQL2OZss5JzOvbX6CqnfJ_m4pspLDbRMh_wLMxy3PhyF26Di$
  

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Brian Westerman
Sent: Wednesday, September 7, 2022 00:37
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM Redbook SG24-8205-06 - zPDT Guide

Has anyone successfully received the zD&T learners edition setup yet?  I 
realize this is about zpdt, but it reminded me that I was told that I was 
approved last November, but nothing seems to have happened after that time.

Brian

On Tue, 6 Sep 2022 10:54:26 -0500, Parwez Hamid  
wrote:

>Wanted to make the List aware of the following which some might find 
>useful - especially those new to zPDT
>
>
>IBM Redbook SG24-8205-06
>
>IBM ISV zPDT Guide and Reference
>
>https://urldefense.com/v3/__https://www.redbooks.ibm.com/redpieces/abstracts/sg248205.html__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KJ_1Zringnz2fpGQWUOaFv5F6nqeBIu5W-C3FSJGUQL2OZss5JzOvbX6CqnfJ_m4pspLDbRMh_wLMxy3PjQC2hi7$
>  
>
--

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

Network issues at Dallas RDP site?

[Farley, Peter x23353]

The IBM Zxplore systems at the Dallas RDP site are unreachable (the Zxplore 
website says "network issues").

Has anyone heard anything about what those issues may be?

Peter

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Apologies for not responding sooner, but I will reply with working example 
soon, have been busy on other things.

However, I can report that the OUTTRAP works from shell-initiated Rexx because 
the "address tso" fork inherits FD's 0, 1, 2 and OUTTRAP captures FD 1 
(SYSTSPRT from the TSO fork) with no problem.  This is documented behavior.

Rexx variables like SYSREASON, etc., set by LISTDSI in the TSO fork do not get 
set in the OMVS address space, which is also documented behavior.  The TSO fork 
has to output values needed in the OMVS address space to SYSTSPRT (or maybe to 
the stack, still testing to see if that works or not).  STEMPUSH/STEMPULL may 
also work as a communication path if the stack survives the TSO fork.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Sunday, August 28, 2022 7:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

On Fri, 26 Aug 2022 00:21:06 -0500, Hank Oerlemans wrote:

>See 
>https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/2.4.0?topic=environment-examples__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KesIc3TuKFptIfS99HLPkItYC57T3-XBb_a8ys87AZ1h99dzxzncHglIwjzi5SNqrng0k3qbkEbI7zpOrBXnbR7m58EpuMzuNMVK5iI1$
>  
>
>Use your OMVS Rexx to Address TSO 'exec (mydsi)' your working code and outtrap 
>to work with the results.
> 
I suspect that outtrap will take effect in the TMP fork, not in the OMVS fork.

You might use a POSIX pipe (address syscall pipe p.), details left as an 
exercise
for the student.

--

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

I think you are correct about LISTDSI not being in the shell Rexx environment.  
The various documents are not complete or consistent in what they say about TSO 
"external" routines, and the description of exactly what "address TSO" in a 
Rexx script run from the shell does for you with respect to "external" routines 
is not very clear either.  Some practical examples using TSO "external" 
functions would help.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Friday, August 26, 2022 10:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

That looks like LISTDSI is not in the function package for the Unix shell. 
IMHO, this is something that the documentation should explicitly mention in an 
obvious location.

z/OS 2.5 TSO/E REXX Reference, SA32-0972-50. includes LISTDSI on p. 94 of 
Built-in functions in Chapter 4. Functions, which I took to mean that it was 
generally available. However , stumbled on Table 13. Summary of using 
instructions, functions, commands, and services in Summary of writing execs for 
different address spaces in Chapter 8. Using REXX in different address spaces, 
which on p. 94 shows LISTDSI as being available only in a TSO address space. I 
would have caught on sooner had the wording in Chapter 4 been "LISTDSI is a 
TSO/E external function and is only available in a TSO address space." instead 
of "LISTDSI is a TSO/E external function.".

Similarly, Using REXX and z/OS UNIX System Services, SA23-2283-50, didn't 
address the issue of the nonavailability of TSO functions under the shell.

I've cc'd this to IBM in hopes that they will update both manuals.


--
Shmuel (Seymour J.) Metz


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Farley, Peter x23353 [031df298a9da-dmarc-requ...@listserv.ua.edu]
Sent: Thursday, August 25, 2022 2:32 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

Results under TSO/ISPF:

  3 *-* address TSO
  4 *-* Myrc = LISTDSI("'TSOUSER.EXEC'")
>L>   "'TSOUSER.EXEC'"
>F>   "0"
  5 *-* Say 'RC='Myrc',reason='SYSREASON
>L>   "RC="
>V>   "0"
>O>   "RC=0"
>L>   ",reason="
>O>   "RC=0,reason="
>V>   ""
>O>   "RC=0,reason="
 RC=0,reason=
Results under Unix shell:

/u/tsouser > cat test.rex
/* REXX */
trace "I"
address TSO
Myrc = LISTDSI("'TSOUSER.EXEC'")
say "Myrc="Myrc",reason="SYSREASON
/u/tsouser > ls -la test.rex
-rwxr-xr-x   1 'TSOUSER  IPGROUP  100 Aug 25 13:17 test.rex
/u/tsouser > test.rex
 3 *-* address TSO
 4 *-* Myrc = LISTDSI("'TSOUSER.EXEC'")
   >L>   "'TSOUSER.EXEC'"
 4 +++ Myrc = LISTDSI("'TSOUSER.EXEC'")
IRX0043I Error running ./test.rex, line 4: Routine not found
/u/tsouser >


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Thursday, August 25, 2022 10:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

The current environment shouldn't matter,  What is the output from Sample code 
to get LISTDSI information on 'profilename.EXEC':

/* Rexx */
trace i
Myrc = LISTDSI('EXEC')
Say 'RC='Myrc',reason='SYSREASON

Do the results change if you fully qualify the name?

--
Shmuel (Seymour J.) Metz


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Farley, Peter x23353 [031df298a9da-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, August 24, 2022 11:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How to use LISTDSI from Rexx under Unix shell?

Posted earlier today on MVS-OE but got no responses there.

I know this has probably been discussed previously but I can't seem to get the 
Marist MVS-OE archive search to work for me.

Is there any way to use the LISTDSI TSO external function from "address tso" in 
a Rexx program run under the Unix shell?

I can only get it to return RC = -3, "routine not found".  Sample code below.

RTFM seems to indicate that "address tso" in a REXX program run under the Unix 
shell will run a TSO TMP in a separate address space, which is OK, I can 
capture the output from that as needed, but I am not getting any execution of 
LISTDSI at all.

Peter

Sample code to get LISTDSI information on 'profilename.EXEC':

/* Rexx */
Address tso
Myrc = LISTDSI('EXEC')

Re: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Thank you Hank.  I was able to use those examples and your suggestion to get 
something working that uses LISTDSI.  I will post my results later after a bit 
more experimentation.

It appears that LISTDSI is not *immediately* available in a Rexx script started 
directly from the shell, but *IS* available when you run another Rexx routine 
with "address TSO" from a Rexx script started directly from the shell.

I'll post more later about exactly what works and what does not.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Hank Oerlemans
Sent: Friday, August 26, 2022 1:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

See 
https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/2.4.0?topic=environment-examples__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NSbZd0CNeUaU5BZESy4PzCYcXfYNfc_-HKIWdGYsJ1Msk5gyoo6kuUDqq1LLiI5hNhxUcBIlkTXgbGAIT_xeMlIM0ZT36o6fwu7OPmoq$
  

Use your OMVS Rexx to Address TSO 'exec (mydsi)' your working code and outtrap 
to work with the results.

--

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: How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Results under TSO/ISPF:

  3 *-* address TSO  
  4 *-* Myrc = LISTDSI("'TSOUSER.EXEC'")
>L>   "'TSOUSER.EXEC'"  
>F>   "0"
  5 *-* Say 'RC='Myrc',reason='SYSREASON 
>L>   "RC="  
>V>   "0"
>O>   "RC=0" 
>L>   ",reason=" 
>O>   "RC=0,reason=" 
>V>   "" 
>O>   "RC=0,reason=" 
 RC=0,reason=
Results under Unix shell:

/u/tsouser > cat test.rex
/* REXX */
trace "I"
address TSO
Myrc = LISTDSI("'TSOUSER.EXEC'")
say "Myrc="Myrc",reason="SYSREASON
/u/tsouser > ls -la test.rex
-rwxr-xr-x   1 'TSOUSER  IPGROUP  100 Aug 25 13:17 test.rex
/u/tsouser > test.rex
 3 *-* address TSO
 4 *-* Myrc = LISTDSI("'TSOUSER.EXEC'")
   >L>   "'TSOUSER.EXEC'"
 4 +++ Myrc = LISTDSI("'TSOUSER.EXEC'")
IRX0043I Error running ./test.rex, line 4: Routine not found
/u/tsouser >


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Thursday, August 25, 2022 10:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to use LISTDSI from Rexx under Unix shell?

EXTERNAL EMAIL

The current environment shouldn't matter,  What is the output from Sample code 
to get LISTDSI information on 'profilename.EXEC':

/* Rexx */
trace i
Myrc = LISTDSI('EXEC')
Say 'RC='Myrc',reason='SYSREASON

Do the results change if you fully qualify the name?




--
Shmuel (Seymour J.) Metz
https://urldefense.com/v3/__http://mason.gmu.edu/*smetz3__;fg!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PklzQNpdawcFoesdvpTMIAxVFV0YwB_wzbMOiqhtRUydn0TkPM5kN2sOFZL7gnoPboy6U6-8YX_XX-K26lo4PA$
  


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Farley, Peter x23353 [031df298a9da-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, August 24, 2022 11:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How to use LISTDSI from Rexx under Unix shell?

Posted earlier today on MVS-OE but got no responses there.

I know this has probably been discussed previously but I can't seem to get the 
Marist MVS-OE archive search to work for me.

Is there any way to use the LISTDSI TSO external function from "address tso" in 
a Rexx program run under the Unix shell?

I can only get it to return RC = -3, "routine not found".  Sample code below.

RTFM seems to indicate that "address tso" in a REXX program run under the Unix 
shell will run a TSO TMP in a separate address space, which is OK, I can 
capture the output from that as needed, but I am not getting any execution of 
LISTDSI at all.

Peter

Sample code to get LISTDSI information on 'profilename.EXEC':

/* Rexx */
Address tso
Myrc = LISTDSI('EXEC')
Say 'RC='Myrc',reason='SYSREASON


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

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

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

How to use LISTDSI from Rexx under Unix shell?

[Farley, Peter x23353]

Posted earlier today on MVS-OE but got no responses there.

I know this has probably been discussed previously but I can't seem to get the 
Marist MVS-OE archive search to work for me.

Is there any way to use the LISTDSI TSO external function from "address tso" in 
a Rexx program run under the Unix shell?

I can only get it to return RC = -3, "routine not found".  Sample code below.

RTFM seems to indicate that "address tso" in a REXX program run under the Unix 
shell will run a TSO TMP in a separate address space, which is OK, I can 
capture the output from that as needed, but I am not getting any execution of 
LISTDSI at all.

Peter

Sample code to get LISTDSI information on 'profilename.EXEC':

/* Rexx */
Address tso
Myrc = LISTDSI('EXEC')
Say 'RC='Myrc',reason='SYSREASON


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: reading an ascii file

[Farley, Peter x23353]

In a python program I would use the "encoding" option of the "open()" function, 
something like this:

file1 = open("file1.name", mode="r", encoding="utf-8")

Or "ISO8859" if you prefer.

Or change the tag on the file before you run your program to tell the system 
what is really in there.

What does the command "chtag -p file1.name" tell you?

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Colin Paice
Sent: Wednesday, August 3, 2022 3:34 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: reading an ascii file

If I open a normal OMVS file with fopen(..,"r") and use fgets I get the
first line of the file.
However If this is a tagged file eg python file(in ascii)  so it has *ls -T
my.py* of IBM8859-1 , I get the whole file read in ( presumably because
there were no x15 characters to say end of line)
Are there any options I need to specify at fopen/fread/fgets which will
allow me to read the file line by line.
I'm thinking I'll have to read a big chunk from the file, convert ASCII to
EBCDIC, and search for x15 to split the line up

Colin
--

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: Running z/OS 1.12 apps on 2.4

[Farley, Peter x23353]

EasyTrieve is both interpreted and compiled.  Not entirely sure of the 
internals ("compiled" may only be "store the interpretable code in an 
executable" like compiled Rexx), but EasyTrieve programs can be run as source 
or compiled to an executable program.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Charles Mills
Sent: Monday, August 1, 2022 7:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Running z/OS 1.12 apps on 2.4

Echoing what others have said, upward OS compatibility for compiled and linked 
applications is a hallmark of MVS and its descendants. I would be stunned if 
you had a problem with the COBOL apps. Trust but verify: you might want to run 
a test or two on the new hardware. And it's not the end of the world, right? 
You/they *could* recompile a failing application?

Is Easytrieve interpreted or compiled? My recollection is interpreted. If so, 
it's hard to see how there could be an upward compatibility problem.

Charles
--

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: [EXTERNAL] Running z/OS 1.12 apps on 2.4

[Farley, Peter x23353]

I agree.  All COBOL code, all versions, should run without issues.

With respect to the EasyTrieve programs, we are on z/OS V2.4 here and run 
several different generations of EasyTrieve without any issues.  If your 
current version of EasyTrieve is relatively recent they should be fine.   I 
would tell them to ask the "service" what version of EasyTrieve the "service" 
runs just to check.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Monday, August 1, 2022 2:53 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Running z/OS 1.12 apps on 2.4

Shouldn't be an issue.  We're running 2.4 and just disabled our Cobol 4.2 
compiler to keep people from trying to use it.  We also just finished migrating 
our Cobol code from 4.2 and Cobol 2.  We didn't recompile any of that code when 
we migrated to 2.4.  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
John McKown
Sent: Monday, August 1, 2022 1:21 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Running z/OS 1.12 apps on 2.4

My current employer is still running stuff on z/OS 1.12 on a z10BC. They are 
shutting it down. But they have mentioned an "archive solution" for ???
apps which might not make the "hard" decommission date.

Their latest idea is basically outsourcing to an "on demand" service. It is 
running 2.4 . I am curious if they might run into problem with old COBOL code 
with the new LE. It's just curiosity because I will not be involved, 
supposedly. I am not sure about EasyTrieve Plus either.

Thanks for any thoughts. My actual work for them will end, supposedly end 1Q23, 
but my employment & pay will last until 1Aug23, regardless (a kind of 
severance).
--

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: Location of IBM python SDK language and standard library documentation?

[Farley, Peter x23353]

Thanks Colin, I did already find that manual, but the only two useful things in 
there for ordinary programmers is the zos_util documentation and the table of 
"tagging" behavior.

There are also the zoautil command line utilities and python API, but the file 
"read()" and "write()" functions there assume you can read/write the entire 
file into/from memory.  No "readline()" ow "writeline()" functions are provided 
as far as I can see.  And the "read()" and "write()" functions are quite slow 
(6 to 9 seconds to read a 300-record LRECL=80 PDS member for instance).

I was hoping for better integration and performance than what I have seen so 
far, as well as better z/OS-specific documentation.  A "Programmers Guide" kind 
of book.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Colin Paice
Sent: Sunday, July 31, 2022 3:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Location of IBM python SDK language and standard library 
documentation?

The manual SC28-3143-02 I*BM Open Enterprise SDK for Python 3.10* may be what 
you want

import zos_util
f = open("//'USER.Z24C.PROCLIB(PYT)'","r")
read_data = f.read()
print(read_data)

gives

Traceback (most recent call last):

  File "/u/tmp/zos/z.py", line 1, in 

f = open("//'USER.Z24C.PROCLIB(PYT)'","r")

FileNotFoundError: [Errno 129] EDC5129I No such file or directory.:
"//'USER.Z24C.PROCLIB(PYT)'"

I've blogged on several Python topics on z/OS ... see here 
<https://urldefense.com/v3/__https://colinpaice.blog/category/python/__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!N01KSqYEyXJOjU0ho5xjSSa-mOam2p_MmXx6GvuEKYJZN4Jw3NCavz64oy3NIhoCUpc9mWbZjmzLZNuTOtarBwZY9w$
 >.
I'm currently looking at writing an extension to use fopen etc. and read 
datasets, so please contact me offline if you would like more info

Colin

On Sun, 31 Jul 2022 at 00:03, Farley, Peter x23353 < 
031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:

> I have been looking around on various IBM websites trying to find the 
> IBM versions of the normal python language and python standard library 
> documentation to answer a few z/OS-specific python questions.
>
> 1.  Does the z/OS implementation of the python language standard
> function "open()" accept z/OS Unix System Services file name format 
> for MVS flat and PDS(E) datasets (e.g., "//'MVS.FLAT.FILE'" and 
> "//'MVS.PDS(PDSMEM)'")?  (I.E., under the covers does it use the "open()"
> or "fopen()" C library function?)
> 2.  Is the "zos_util" library package available in all versions of the
> z/OS python SDK?
>
> TIA for any RTFM or url's you can point me to.  PDF's of the 
> documentation for offline reading would be welcome if they are available.
>
> Peter
--

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

Location of IBM python SDK language and standard library documentation?

[Farley, Peter x23353]

I have been looking around on various IBM websites trying to find the IBM 
versions of the normal python language and python standard library 
documentation to answer a few z/OS-specific python questions.

1.  Does the z/OS implementation of the python language standard function 
"open()" accept z/OS Unix System Services file name format for MVS flat and 
PDS(E) datasets (e.g., "//'MVS.FLAT.FILE'" and "//'MVS.PDS(PDSMEM)'")?  (I.E., 
under the covers does it use the "open()" or "fopen()" C library function?)
2.  Is the "zos_util" library package available in all versions of the z/OS 
python SDK?

TIA for any RTFM or url's you can point me to.  PDF's of the documentation for 
offline reading would be welcome if they are available.

Peter
--


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: Name conflict: CICS macro name IDENTIFY conflicts with MVS macro name

[Farley, Peter x23353]

Yes, it is the SDFHMAC library.  Our local CICS sysprogs established a set of 
DSN alias names with HLQ's CICS.BASE and CICS.NEXT to point to the current and 
next-release CICS-shipped libraries.  I believe we are on CICS TS V5.4 and 
transitioning to V5.6.

The local person responsible for the library setup is on jury duty at the 
moment so I am waiting for that person to be available again to resolve the 
issue.  In the meantime our SCLM team made a temporary change to put 
SYS1.MACLIB ahead of the CICS.BASE.MACLIB library for the one application team 
that needed it so they could complete their work in a timely manner.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter Relson
Sent: Friday, July 29, 2022 10:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Name conflict: CICS macro name IDENTIFY conflicts with MVS macro 
name

EXTERNAL EMAIL

Which CICS release is being referred to? And what is the "current product 
version library" data set?

CICS V5.2, 5.3, 5.4, 5.5, 6.0, 6.1, for example, do not appear to ship an 
IDENTIFY macro. I might have been looking in the wrong data set, though. I was 
looking at the install data set that ended with SDFHMAC.

Peter Relson
z/OS Core Technology Design
--

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: OS DITTO MLC Cost

[Farley, Peter x23353]

However, shops who do NOT have IBM File Manager or an ISV's equivalent 
available may need DITTO as the most convenient (perhaps only) way to 
browse/edit VSAM files.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Peter Van Dyke
Sent: Monday, July 25, 2022 3:34 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OS DITTO MLC Cost

Hi David,
Sorry, I don't know the MLC for DITTO. However, in case you and others are not 
aware, IBM File Manager was developed on top of DITTO and includes most of the 
functions provided by DITTO. So if you have File Manager you may not need to 
continue paying for DITTO.

Regards,
Peter Van Dyke
HCL Software


On Mon, 25 Jul 2022 at 14:05,wrote:

> Anyone know the MLC Cost for OS DITTO?  Last I heard is that it is 
> very expensive and probably not needed at most sites.
>
--


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: Name conflict: CICS macro name IDENTIFY conflicts with MVS macro name IDENTIFY

[Farley, Peter x23353]

Update: I have followed up with John Tilling over on CICS-L about this.  The 
member named IDENTIFY in our local CICS MACLIB looks like it may be an artifact 
of the product delivery or build mechanism, and may not have been intended to 
be left there.  Not sure at this point if IBM or the local product maintenance 
team are the ones who need to address why it is there and how to remove it.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Joe 
Monk
Sent: Wednesday, July 20, 2022 10:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Name conflict: CICS macro name IDENTIFY conflicts with MVS macro 
name IDENTIFY

Moreover, a CICS macro would start with DFH... it wouldnt be called
IDENTIFY.

Joe

On Wed, Jul 20, 2022 at 8:41 AM Ward Able, Grant  wrote:

> As stated by IBM Hursley (John Tilling) on the CICS-List,  CICS does not
> ship an IDENTIFY macro!
>
> Regards - Grant.
> Telephone Internal: 201496 (London)
>
> EAM - Enterprise Application Middleware
>
> In theory, there's no difference between theory and practice. In practice,
> there is.
>
> Worry more about your character than your reputation.  Character is what
> you are, reputation merely what others think you are. - John Wooden
>
> If you don't have time to do it right, when will you have the time to do
> it over? - John Wooden
>
>
>
> DTCC Public (White)
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Seymour J Metz
> Sent: 20 July 2022 14:18
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Name conflict: CICS macro name IDENTIFY conflicts with MVS
> macro name IDENTIFY
>
> ATTENTION: External Email - Be Suspicious of Attachments, Links and
> Requests for Login Information.
>
> IDENTIFY has existed and been documented since Old Man Noach got high on
> PCP. Yes, CICS should have known better.
>
> The RFE wouldn't be for unique names; that ship has sailed. It would be
> for new syntax on COPY.
>
> If your program needs both, you're screwed. Welcome to CM Hell.
>
> --
> Shmuel (Seymour J.) Metz
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Paul Gilmartin [042bfe9c879d-dmarc-requ...@listserv.ua.edu]
> Sent: Wednesday, July 20, 2022 9:11 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Name conflict: CICS macro name IDENTIFY conflicts with MVS
> macro name IDENTIFY
>
> On Wed, 20 Jul 2022 12:18:56 +, Seymour J Metz wrote:
>
> >There is no COPY ddname(member) in HLASM. That sounds like an obvious
> candidate for an RFE.
> >
> Hasn't the MVS macro name IDENTIFY existed long enough that CICS should
> have known better?
>
> That's not an RFE; tt's a bug; BAD.  Suppose a program needs both services.
>
>
> >-Original Message-
> >From: Farley, Peter x23353
> >Sent: Tuesday, July 19, 2022 2:07 PM
> >
> >Cross-posted to IBM-MAIN and CICS-L.
> >
> >We just encountered this.  Our SDLC mechanism has CICS.BASE.MACLIB (an
> >ALIAS for the current product version library) positioned in the
> >assembler translate step BEFORE the SYS1.MACLIB library.  SOP, put all
> >licensed product libraries ahead of base system libraries, right?
> >
> >Not in this case.  Turns out we have some old assembler ode that uses
> >the MVS IDENTIFY macro for reasonable business purposes, but now the
> >CICS MACLIB ALSO has a macro named IDENTIFY.
--

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

Name conflict: CICS macro name IDENTIFY conflicts with MVS macro name IDENTIFY

[Farley, Peter x23353]

Cross-posted to IBM-MAIN and CICS-L.

We just encountered this.  Our SDLC mechanism has CICS.BASE.MACLIB (an ALIAS 
for the current product version library) positioned in the assembler translate 
step BEFORE the SYS1.MACLIB library.  SOP, put all licensed product libraries 
ahead of base system libraries, right?

Not in this case.  Turns out we have some old assembler ode that uses the MVS 
IDENTIFY macro for reasonable business purposes, but now the CICS MACLIB ALSO 
has a macro named IDENTIFY.

Now that assembler program cannot be maintained or changed until the SYSLIB 
setup in the SDLC mechanism is updated (never a short process).

The obvious solution here is of course to change the SDLC setup to put the CICS 
MACLIB after SYS1.MACLIB, but was this documented to the sysprogs that there is 
a (new?) name conflict here?

Do the CICS and MVS sysprogs even talk to each other or to the SDLC mechanism 
maintainers?

Peter
--


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: CIO vs CMO

[Farley, Peter x23353]

There is a large difference between what programmers need to see and what "data 
owners" need to see.  As an application programmer, I need to be able to READ 
everything in order to solve program defects and program new enhancement / 
maintenance requests.  I should NOT be able to delete or modify any production 
data.  That's understood and totally acceptable.

The security wonks don’t want to let me (or anyone) read ANYTHING unless I have 
to do it every day.

Either you trust your programmers or you don't.  If you don’t trust them, then 
don't expect quick resolution of production abends to meet strict SLA's.  And 
no, so-called "break glass" procedures are NOT good enough.

Shakespeare was *almost* right -- First get rid of all the auditors.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Tony Perri, Santa Rosa Software
Sent: Tuesday, July 19, 2022 12:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CIO vs CMO

EXTERNAL EMAIL

At a previous company, as newly hired vp of marketing. After consecutive 
requests for additional accesses to the company intranet, one of the IT admins 
got tired of the one-off requests and just gave me access to everything. I 
could view/download EVERYTHING. 
Has anyone else seen anything along these lines? 

Best regards, 

Tony Perri, CEO/Co-founder
Santa Rosa Software, LLC
https://urldefense.com/v3/__https://santarosasoftware.com__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PlOFs8QoWQ_mYLFXhhBAl8QKqu46fYu9wiypR_SyEgR90yw4JBpqsj8Pb7JW_5e9J8wq57EPD5pVIWgmk7iDKRzqIbDgXsIg8w$
  
tony.pe...@santarosasoftware.com


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
Bridges
Sent: Thursday, July 14, 2022 8:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CIO vs CMO

I've not seen that, but I've a nitpick about something else in your question:  
You said "...versus IT teams managing it".  If you meant that the way you said 
it, ok, but I've been places where "managing" was thought to mean "deciding who 
gets access to".  I just want to take issue with that misunderstanding, which I 
realize may not be what you meant.

The security admins do indeed "manage" access to the data, but they do it (or 
ought to do it) at the direction of the data owners.  In theory the CEO owns 
all the data, but of course he doesn't bother with that; in practice it's 
delegated downward until it reaches a knowledgeable user.  So the GL manager 
owns the GL data, or delegates it to one of his staff who knows what datasets 
are out there.  The HR files and production processes are owned by someone in 
HR, and so on.  I envision it like the old feudalism, with each manager holding 
ownership of the data and processes entrusted to him from above and parceling 
out portions of it to underlings who will hold it in fief, until the downward 
delegation reaches the person who knows what needs to be done.  The security 
admins should (but often don't) have a record of who's been named the owner of 
each set of data, and that's the person who should (repeat should) approve 
requests for access.

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

/* -attributed to Alexander Pope:
Be not the first by whom the new is tried Nor yet the last to lay the old 
aside. */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Tony Perri
Sent: Thursday, July 14, 2022 13:06

I'm doing a presentation at a conference next month about who controls "money 
making" data in large enterprises (large enough for z/OS). The general idea is 
that CxOs on the business side in the past 5-10 years see data as a money maker 
and are letting CMOs have more access to data (think CRM and marketing 
automation systems) so they can make money from it. 

My question here is this: 
--Have you (or a colleague) experienced firsthand any occurrence where the CEO, 
COO or other business-side exec said "we want to let so-and-so and his or her 
team take over this data store. Give them whatever they need."? 

The implication was that sales/marketing folks are going to put the data to 
better use to make more money for the organization. The caveat here is the data 
security risk of letting sales and marketing people manage data versus IT teams 
managing it. Thanks in advance. 

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

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 notifie

Re: Converting assembler to COBOL help

[Farley, Peter x23353]

Apologies, you are probably correct.  Bad habits acquired dealing with 
management who don’t like that method.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Saturday, July 9, 2022 2:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Converting assembler to COBOL help

On Sat, 9 Jul 2022 18:10:54 +, Farley, Peter x23353 wrote:

>Answers in the order of your questions:
>
Wouldn't it be more legible to interleave your answers rather than "in the 
order of ..."?



--


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: Converting assembler to COBOL help

[Farley, Peter x23353]

That's a reasonable suggestion.  Many pitfalls to watch out for (like the 
branch gates example I gave earlier), but like you said, possibly 75% coverage 
for the code portion.  System macro conversion could be a big headache too, but 
at least feasible to try.

Trickier could be conversion of the DSECT and non-reentrant variable storage 
area definitions.  I would expect much of that to need careful human review and 
manual adjustment.

Unlike HLL's, assembler allows many hardware-specific "tricks" that make 
automated analysis, like classical compiler construction to generate "parse 
trees" and "directed graphs" and such, much more difficult.  It may be possible 
to do, but the work involved to create and validate such a beast would be 
massive.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of W 
Mainframe
Sent: Saturday, July 9, 2022 10:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Converting assembler to COBOL help

Hi,A suggestion... I did similar thing some years ago using z390 Macro 
Language. In summary you can create macros and replace used macros by Cobol 
statements.The macros just punch Cobol statements to an output.I converted 
about 250 critical Cobol code.Main question... Is it 100%, of course not... But 
I would say 75%.
RegardsDan


Sent from Yahoo Mail for iPhone


On Friday, July 8, 2022, 8:53 PM, Paul Gilmartin 
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

On Fri, 8 Jul 2022 22:51:38 +, Farley, Peter x23353 wrote:
>
>    ...  The business logic was totally scrambled, sometimes by "old-timer" 
>tricks like non-reentrant branch gates and other such no-no's under current 
>maintainability and pipeline-flush avoidance rules, other times just by 
>flagrantly awful spaghetti code even a human would struggle to understand.
> 
Was that merely faithfully replicating deficiencies in the input?

What architecture level?

What might it do with such as RISBG?

-- 


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: Converting assembler to COBOL help

[Farley, Peter x23353]

Answers in the order of your questions:

In most cases, yes, but the COBOL implementation chosen was MUCH worse than the 
original, far less readable or maintainable, and in many cases unnecessarily 
more complicated.

The converted assembler code was decades old, all pre-2000, so ESA at best, and 
most probably at XA level or earlier.

Nothing of the "newer" instruction sets (FSVO "new") was present in any of the 
converted assembler source that I was asked to review.  In all the cases that I 
reviewed, the code being converted could have run on the earliest 370 hardware 
and in some cases on 360 hardware.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Friday, July 8, 2022 7:54 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Converting assembler to COBOL help

On Fri, 8 Jul 2022 22:51:38 +, Farley, Peter x23353 wrote:
>
>...  The business logic was totally scrambled, sometimes by "old-timer" 
> tricks like non-reentrant branch gates and other such no-no's under current 
> maintainability and pipeline-flush avoidance rules, other times just by 
> flagrantly awful spaghetti code even a human would struggle to understand.
> 
Was that merely faithfully replicating deficiencies in the input?

What architecture level?

What might it do with such as RISBG?

-- 

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: Converting assembler to COBOL help

[Farley, Peter x23353]

Tom,

I don't know who the vendor actually was (it wasn't done in my application 
area), but a few years ago we tried one of them who had an automated tool of 
some kind to do that conversion, and the resulting COBOL code that I was asked 
to peer-review was unreadable and unmaintainable.  The business logic was 
totally scrambled, sometimes by "old-timer" tricks like non-reentrant branch 
gates and other such no-no's under current maintainability and pipeline-flush 
avoidance rules, other times just by flagrantly awful spaghetti code even a 
human would struggle to understand.

That project was canceled, and now we do it (when actually needed) in the 
old-fashioned way - by hand, by a senior programmer experienced in both 
languages.   Usually only when something breaks and management needs the 
business logic preserved in a more "supportable" form.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Ross
Sent: Friday, July 8, 2022 6:32 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Converting assembler to COBOL help

Greetings mainframers!

This has porobbaly been asked and answered, but are there tools or companies 
that can convert or help to rewrite assembler applications or just programs 
into COBOL?  Any suggestions?


Cheers,
TomR  >> COBOL is the Language of the Future! <<
AKA:  Captain COBOL, Tom Ross
--

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

BSF? [was: RE: Java (Re: Some questions on SYSCALL)]

[Farley, Peter x23353]

OK, I'll bite: What is BSF please?  I do know of PCRE (though I really do not 
like the Perl RE syntax, I prefer Posix/gawk RE syntax) but BSF is a new 
acronym to me.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Thursday, July 7, 2022 8:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Java (Re: Some questions on SYSCALL



BSF has been available for a long time; why doesn't every Rexx programmer know 
about it and PCRE? Thanks for putting in the work.
--

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: Interesting PR move

[Farley, Peter x23353]

Interesting and heartening.  Now could IBM US and major US city governments get 
it together and do the same for the hundreds of thousands of inner-city youth 
with similar limited access to high-quality education?

That would be a game changer.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Thursday, June 30, 2022 11:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Interesting PR move

But good stuff:

IBM opens school program for Mi'kmaw students in Cape Breton 
https://www.cbc.ca/news/canada/nova-scotia/ibm-opens-school-for-mikmaw-students-1.6206261
--

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

[Farley, Peter x23353]

Not intending to continue this thread, but awk is a favorite tool of mine.  You 
certainly can run z/OS awk in a fairly simple batch JCL, though I have not 
tried it under TSO or batch TSO.

I far prefer the GNU awk (gawk) on my personal machines (Win10 64-bit), but 
z/OS awk is (mostly) POSIX awk, so most of the parts you want are there.  
Significantly lacking from z/OS awk are the extra time and date functions 
provide by gawk, and a few other niceties, but by and large it "just works".

For Windows gawk binaries (and a lot of other useful *ix tools) I find this 
site is the best:

https://sourceforge.net/projects/ezwinports/files/

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
Bridges
Sent: Wednesday, June 29, 2022 7:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: REXX outside TSO

I've heard the word "awk", but never been exposed to it.  I had the impression, 
though, that I've heard of it in the context of Unix; am I mistaken?

Remember, the topic of the moment was whether there's any use for REXX 
~outside~ TSO.  This was on a Windows system; I'm guessing awk wouldn't be one 
of the available tools (even if I knew anything about it, I mean).

---

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: Some questions on SYSCALL

[Farley, Peter x23353]

Gentle listers,

Can we all agree to let this discussion be resolved by agreeing to the Perl 
mongers motto, TMTOWTDI?

I think the discussion you have had so far is more than sufficient.  I would 
also suggest that you take it offline if you would prefer to continue along 
these lines.

I will say in defense of parts of this discussion that I learned a few things 
about Rexx on z/OS that I previously had not encountered and which will give me 
assistance in future activities, so thank you to the contributing posters for 
those nuggets of knowledge.

Peter
--

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: Some questions on SYSCALL

[Farley, Peter x23353]

Bill,

Your input and advice and "tools and toys" for z/OS have been most helpful to 
so many of us over all these years.  Thank you for everything you have done for 
us.

May you enjoy good health and a relaxed retirement.  All the best.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Bill Schoen
Sent: Wednesday, June 29, 2022 8:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Some questions on SYSCALL

There are quite a few topics in this thread, some well addressed, some maybe 
not, but I'll pitch in...

re: syscalls environment should be integrated into rexx this is included in the 
default environments for rexx running in mvs (irxjcl), tso, and ispf calling 
syscalls('ON') is not required to use address syscall all that does is define 
the syscall variables The only reason I can imagine if you get errors if not 
using syscalls() is you probably have replacements for the default environments 
that were probably made a long time ago and do not include syscall.

re: syscalls('ON') and return code
used as above is a function call which does return a return code.
if you don't assign that to a variable or use it in an expression or use call, 
the rexx processor will execute the return code in the current address 
environment as a command

re: syscalls('OFF')
this causes your process to undub which is typically unnecessary and often 
results in confusion

re: write buffer is a variable name
This was done for a variety of reasons, but primarily, rexx has a limit to 
number of parameters that can be passed to an address environment.
I think TSO rexx limits it to 20.  If it took a string you would be limited to 
very few blank delimited words.
a number of syscall commands take variable/stem names to avoid issues with 
input or output rexx restrictions.
.
Probably my last post before retirement tomorrow.
Bill Schoen
--

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: is there any documentation on using the new 64 bit instructions?

[Farley, Peter x23353]

IBM Mainframe Assembler List 

Do you have z/XDC available for debugging?  Or better yet, c/XDC, which is Cole 
Software's C debugger?  One or both might be of tremendous help to you here.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Colin Paice
Sent: Tuesday, June 28, 2022 11:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: is there any documentation on using the new 64 bit instructions?

Peter,
I call my Assembler  program from C  using


*#pragma linkage(QEDIT   , OS)   rc = QEDIT( pParm ); *
and get round the XPLINK challenge.

I could not find an assembler list... please could you send details of this.  
It would have been my first port of call.

thank you

Colin

On Tue, 28 Jun 2022 at 15:47, Farley, Peter x23353 < 
031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:

> Doesn't 64-bit C call your amode 31 program using the XPLINK interface?
> I'm not sure XPLINK has the right value in R14 for PR to set the 
> return mode correctly, but I confess I have done no practical work 
> with XPLINK, so I may be off base here.
>
> You could CC your question to the Assembler list as well, though I 
> think almost everyone who lurks there also lurks here.
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Colin Paice
> Sent: Tuesday, June 28, 2022 10:13 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: is there any documentation on using the new 64 bit instructions?
>
> I've been working on calling an (amode 31) assembler program from a 64 
> bit C program, and have been struggling.Is there is a good guide on 
> how to use these new instructions?
> For example
> 1)
> I've found you need to use a  LLGTR R1... instruction to clear the 
> register before using a L R1... because without it the high part of 
> the register will have some 64 bit rubbish in it
>
> 2)
> I used
>
> BAKR  R14,0
> PR
> But it kept returning in amode 24 bit mode.  It needs BSM   14,0  before
> the  BAKR.__
>
> The POP tells you all about the instructions - but not how to use it.  
> The z/OS doc says use BACK/PR  without mentioning the  BSM, so this is 
> not completely trustworthy.
> _
> Is there a better place to ask?
>
> Colin
--

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: is there any documentation on using the new 64 bit instructions?

[Farley, Peter x23353]

Doesn't 64-bit C call your amode 31 program using the XPLINK interface?  I'm 
not sure XPLINK has the right value in R14 for PR to set the return mode 
correctly, but I confess I have done no practical work with XPLINK, so I may be 
off base here.

You could CC your question to the Assembler list as well, though I think almost 
everyone who lurks there also lurks here.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Colin Paice
Sent: Tuesday, June 28, 2022 10:13 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: is there any documentation on using the new 64 bit instructions?

I've been working on calling an (amode 31) assembler program from a 64 bit C 
program, and have been struggling.Is there is a good guide on how to use these 
new instructions?
For example
1)
I've found you need to use a  LLGTR R1... instruction to clear the register 
before using a L R1... because without it the high part of the register will 
have some 64 bit rubbish in it

2)
I used

BAKR  R14,0
PR
But it kept returning in amode 24 bit mode.  It needs BSM   14,0  before
the  BAKR.__

The POP tells you all about the instructions - but not how to use it.  The z/OS 
doc says use BACK/PR  without mentioning the  BSM, so this is not completely 
trustworthy.
_
Is there a better place to ask?

Colin
--

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: Copy file, omitting first X characters

[Farley, Peter x23353]

Sorry, I replied too quickly - Your statement is correct.  In the context of 
the actual variable record (including the RDW), it DOES mean 1 to 4 and 17 to 
end.

Apologies.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, June 27, 2022 6:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Copy file, omitting first X characters

EXTERNAL EMAIL

NO!  (1,4,17) means "Keep positions 1-4 and 13 to end"!!!  In SORT control 
cards for variable records, positions after 1-4 are PLUS 4 from the "record" 
position.  Column 13 of your data (AFTER THE RDW BYTES which are invisible in a 
BROWSE or EDIT session) is "17" in the SORT control card (13 + 4)!!!

Always remember a variable record is 4 bytes longer than your actual data due 
to the RDW at the front.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Monday, June 27, 2022 6:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Copy file, omitting first X characters

OK, so with BUILD=(1,4,17) this must mean "Keep positions 1-4 and 17-end).  
This works.  Thanks!

From: IBM Mainframe Discussion List  on behalf of 
Farley, Peter x23353 <031df298a9da-dmarc-requ...@listserv.ua.edu>
Sent: Monday, June 27, 2022 1:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Copy file, omitting first X characters

Sort input control cards (DFSORT or SYNCSORT):

 OPTION COPY
 INREC BUILD=(1,4,(5+X))

Where (5+X) is a constant equal to 5 plus the X characters you want to strip -- 
e.g. to strip the first 8 characters X=8 so (5+8) = 13, so " INREC 
BUILD=(1,4,13)".

Another way to calculate the position to start copying is "column I want to 
keep + 4", in the above example (9+4) = 13.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Monday, June 27, 2022 3:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Copy file, omitting first X characters

EXTERNAL EMAIL

I know this is very basic, but it's been a while...  I want to copy a file 
where each record in the new file omits the first X number of characters from 
the source file, but includes everything else.  Both files are variable length 
files.
I imagine sort (I have IBM DFSORT) is the appropriate tool, but I'm simply not 
sure what options to specify.
Thanks!

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

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

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

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

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: Copy file, omitting first X characters

[Farley, Peter x23353]

NO!  (1,4,17) means "Keep positions 1-4 and 13 to end"!!!  In SORT control 
cards for variable records, positions after 1-4 are PLUS 4 from the "record" 
position.  Column 13 of your data (AFTER THE RDW BYTES which are invisible in a 
BROWSE or EDIT session) is "17" in the SORT control card (13 + 4)!!!

Always remember a variable record is 4 bytes longer than your actual data due 
to the RDW at the front.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Monday, June 27, 2022 6:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Copy file, omitting first X characters

OK, so with BUILD=(1,4,17) this must mean "Keep positions 1-4 and 17-end).  
This works.  Thanks!

From: IBM Mainframe Discussion List  on behalf of 
Farley, Peter x23353 <031df298a9da-dmarc-requ...@listserv.ua.edu>
Sent: Monday, June 27, 2022 1:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Copy file, omitting first X characters

Sort input control cards (DFSORT or SYNCSORT):

 OPTION COPY
 INREC BUILD=(1,4,(5+X))

Where (5+X) is a constant equal to 5 plus the X characters you want to strip -- 
e.g. to strip the first 8 characters X=8 so (5+8) = 13, so " INREC 
BUILD=(1,4,13)".

Another way to calculate the position to start copying is "column I want to 
keep + 4", in the above example (9+4) = 13.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Monday, June 27, 2022 3:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Copy file, omitting first X characters

EXTERNAL EMAIL

I know this is very basic, but it's been a while...  I want to copy a file 
where each record in the new file omits the first X number of characters from 
the source file, but includes everything else.  Both files are variable length 
files.
I imagine sort (I have IBM DFSORT) is the appropriate tool, but I'm simply not 
sure what options to specify.
Thanks!

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

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

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

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: Copy file, omitting first X characters

[Farley, Peter x23353]

Sort input control cards (DFSORT or SYNCSORT):

 OPTION COPY
 INREC BUILD=(1,4,(5+X))

Where (5+X) is a constant equal to 5 plus the X characters you want to strip -- 
e.g. to strip the first 8 characters X=8 so (5+8) = 13, so " INREC 
BUILD=(1,4,13)".

Another way to calculate the position to start copying is "column I want to 
keep + 4", in the above example (9+4) = 13.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Frank Swarbrick
Sent: Monday, June 27, 2022 3:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Copy file, omitting first X characters

EXTERNAL EMAIL

I know this is very basic, but it's been a while...  I want to copy a file 
where each record in the new file omits the first X number of characters from 
the source file, but includes everything else.  Both files are variable length 
files.
I imagine sort (I have IBM DFSORT) is the appropriate tool, but I'm simply not 
sure what options to specify.
Thanks!

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

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: SFTP JOB Data parameter

[Farley, Peter x23353]

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Wednesday, June 22, 2022 12:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SFTP JOB Data parameter

On Wed, 22 Jun 2022 16:06:06 +, Sri h Kolusu wrote:


> > I for one prefer using the existing IBM utilities and there are utilities 
> > like DFSORT (of course I am biased towards it ) which does have plethora of 
> > Date arithmetic functions.
>  I never mastered the syntax of DFSORT commands.

IMHO SORT control syntax and usage are valuable and useful skills for any 
mainframe programmer to have.  One should make the effort to learn them if one 
can find the time; they make seemingly hard jobs far easier.  Start with small 
jobs and work your way up.

I am still learning about SORT capabilities, though I have at least partially 
mastered using JOINKEYS (with the kind help of the esteemed Mr. Kolusu) to 
perform large matching and selecting operations I could not have easily solved 
otherwise.

Not a master of that universe yet, only a journeyman at most.

I'll match my awk skills against anyone's, but even there I am sure I have 
things to learn.

The fun of learning new things is what makes each day easier to get through.

Peter
--


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: Debit vs Credit card for cash at ATM? [was: RE: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS]

[Farley, Peter x23353]

I have never actually used any of my credit cards at my (or any) bank's ATM's 
to get cash.  I was in fact making an assumption that a bank ATM does not have 
any such option for credit cards.

It makes sense that banks would allow such an option as a convenience for their 
customers.  I was not aware of it and did AssUMe.  Mea culpa.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Doug Henry
Sent: Tuesday, June 21, 2022 9:54 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Debit vs Credit card for cash at ATM? [was: RE: Modernize 
Mainframe Applications for Hybrid Cloud with IBM and AWS]

On Fri, 17 Jun 2022 18:21:24 -0400, Phil Smith III  wrote:

>Peter Farley wrote:
>
>>Curious - How do you get cash at an ATM directly from your checking or
>savings account without a bank debit card?
>
>>Using a credit card to get cash from an ATM usually means drawing "Cash
>Advance" money on that card, which is subject to interest costs on the
>credit cards I own.

This is certainly not true. The atm I use (USbank) brings up a menu when you 
use your credit card. From the menu you have to ability to choose a debit 
withdraw from your checking account.You can take a cash advance from credit but 
I certainly would not do that.
Doug
--

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: How to search large loadlib

[Farley, Peter x23353]

Check out CBT file 321 (COBANALZ).  The SYSPRINT output will contain embedded 
CSECT information.  For a large loadlib like yours the SYSPRINT output will be 
pretty voluminous, but relatively easy to search mechanically (I would use an 
awk script to do the search, but any search utility you are comfortable with 
will do).  It may not be less volume than an AMBLIST output but you can do it 
without any control cards per-member.  COBANALZ default action is to process 
the entire library (or maybe that's PARM=ALL, it's been a while since I had 
occasion to use it).

I once had a thought to update the COBANALZ SUMMARY output to (optionally) 
include embedded application CSECT information, but never found the round tuits 
to make that update.  The issue there would be correctly ignoring the IBM 
library function CSECT's (IGZx or CEEx and others for PL/I or Fortran). 
 The issue gets even murkier for REALLY old HLL load members and compiled Rexx 
and ISV compiled code like EasyTrieve, etc.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Donald Blake
Sent: Monday, June 20, 2022 2:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How to search large loadlib

I have a large PDSE loadlib with just under 10,000 members. Most of the
load members are COBOL programs. Some of them were incorrectly linked with
a batch module, called ABCDE and issue  the COBOL verb CALL 'ABCDE'.

I do have the source for all of the COBOL programs, but it is scattered
around a bunch of libraries. So dealing with it isn't really practical.

Does anybody know of a utility that will let me scan all of the members for
those which were linked with CSECT ABCDE? ABCDE doesn't have a MODHEAD
which I can look for. It's a small assembler language program. I was
wondering if there's a utility, possibly in the CBT tape, which can do
this? Also, looked at PDS also from the CBT tape, but if  one of the
subcommands allows for that, I didn't see it.

I know I can run AMBLIST against each individual load module, but due to
10,000 members in that dataset, it might take me quite a while.

Any thoughts?

-- 

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: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS

[Farley, Peter x23353]

In NYC in the 1980's the traffic lights were controlled by a room full of IBM 
1130 machines, not Univac.  No idea what they use today.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Monday, June 20, 2022 7:41 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS

Before MQ there were QTAM and TCAM.

There have been mainframes running real time applications since the 1960s. Air 
traffic control. Airline reservations. Controlling traffic lights (UNIVAC, not 
IBM.) These may not be the best examples, but they were the first to come to 
mind, and used off the shelf mainframes.


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
René Jansen [rene.vincent.jan...@gmail.com]
Sent: Monday, June 20, 2022 5:50 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS

You can make that 'about 30 years ago' - time flies while we're having fun.

René.

> On 20 Jun 2022, at 09:51, Colin Paice  wrote:
>
> MQ from IBM developed about 20+ years ago helped get from Batch to real
> time.   You put messages to a queue, and it can run IMS transactions
> (including OTMA),  CICS transactions, or even batch!.  You can put on one
> member in a sysplex and get in another member.
> It has single put, and also publish/subscribe capability.
>
> Colin
>
--

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: Some UNIX file usage questions

[Farley, Peter x23353]

Agreed; I did not spell out all the details, silly me.

close(old)
rename(old)
open(new)

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Sunday, June 19, 2022 4:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Some UNIX file usage questions

On Sun, 19 Jun 2022 19:45:49 +, Farley, Peter x23353  wrote:
>...
>For discretely split data files (stop writing at EOD/end-of-period and start a 
>new file) using the same approach as the unix syslog demon would seem to be 
>useful.  Rename current to current-plus-timed-qualifier (date and/or time), 
>
close(); open();
Otherwise you continue writing to the renamed file.

>... write new with initial data, proceed as before.

-- 

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: Some UNIX file usage questions

[Farley, Peter x23353]

Rexx VSAM file access from TSO/batch/STC is supported by the RXVSAM package 
(CBT file 268).  Not sure if using RLS for an ESDS file would assist in the 
"timed writer, occasional reader" scheme the OP wants, but it might help if he 
wants to try that path.

It would seem to me to be easier to use the unix file approach though.  If I 
understand the unix file system storage structure at all, it is a "byte" 
stream, so any issue of "short blocks" as questioned by one earlier post are an 
irrelevant question.  Write-append just adds bytes to the end of the existing 
file inside the architected storage system.  Any needed storage efficiency 
issues are controlled at the kernel level, far below any application interface.

For discretely split data files (stop writing at EOD/end-of-period and start a 
new file) using the same approach as the unix syslog demon would seem to be 
useful.  Rename current to current-plus-timed-qualifier (date and/or time), 
write new with initial data, proceed as before.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Sunday, June 19, 2022 9:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Some UNIX file usage questions

On Sun, 19 Jun 2022 09:02:53 -0400, Steve Smith wrote:

>Well, I said ESDS; a KSDS would add useless complication and overhead.
> 
I said I was entirely VSAM-naive.

>Anyway, there doesn't seem to be any support for VSAM in REXX.  Not 
>sure about USS functions,
>
Are you thinking of: 
?
(That page is a mere fraction of what's available.)

>   ... but it seems much more straightforward to use USS files with USS 
>functions.
>
Amen.

>On Sat, Jun 18, 2022 at 5:05 PM Paul Gilmartin wrote:
>> ...
>> The KSDS method sounds promising.  I'm entirely VSAM-naive.

--

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: Debit vs Credit card for cash at ATM? [was: RE: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS]

[Farley, Peter x23353]

Curious - How do you get cash at an ATM directly from your checking or savings 
account without a bank debit card?  Using a credit card to get cash from an ATM 
usually means drawing "Cash Advance" money on that card, which is subject to 
interest costs on the credit cards I own.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Bill Johnson
Sent: Friday, June 17, 2022 5:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Modernize Mainframe Applications for Hybrid Cloud with IBM and AWS

The debit card loss is max $500 as long as you report it stolen within 60 days. 
After 60, unlimited. Agree with you about never having one.

https://consumer.ftc.gov/articles/lost-or-stolen-credit-atm-debit-cards*limit 

Sent from Yahoo Mail for iPhone

On Friday, June 17, 2022, 5:20 PM, Seymour J Metz  wrote:

In the US, under certain circumstances, there is a $50 cap on fraud losses with 
credit cards but the cap for debit cards is $500. That's why I don't have a 
debit card and don't plan to eveer have one, absent a change in the law.
--

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: Introducing IBM Virtual Dev and Test for z/OS

[Farley, Peter x23353]

That thought also crossed my mind when reading the data at the "landing page" 
that Timothy provided, but as usual pricing is the real issue.

I would think IBM could price it like they proposed to do with the Learner's 
Edition of ZD&T, and it would be less burdensome for them because no dongle 
need be distributed since the cloud version on z/Linux can use an IBM license 
server.

But that is thinking logically, and who knows how IBM will think about it.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Thursday, June 16, 2022 10:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Introducing IBM Virtual Dev and Test for z/OS

If IBM hosted then it would seem a better option than the ZDNT Learners Edition 
for students/hobbyists who want to code/develop without having to be s systems 
programmer. 


Lionel B. Dyck <><
Website: 
https://urldefense.com/v3/__https://www.lbdsoftware.com__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NnXg6k7ZOLjLY_6n3-illSNVNHYqPY8vKmJUXGA4rvds2NVnxAD1ytOXelwn7UY5doYZYuA2Vvjs7ivNA4M$
Github: 
https://urldefense.com/v3/__https://github.com/lbdyck__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NnXg6k7ZOLjLY_6n3-illSNVNHYqPY8vKmJUXGA4rvds2NVnxAD1ytOXelwn7UY5doYZYuA2VvjsFbAu7A4$
 

"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 
Farley, Peter x23353
Sent: Thursday, June 16, 2022 09:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Introducing IBM Virtual Dev and Test for z/OS

Lionel,

That's what I was wondering myself, but after checking the "landing page"
that Timothy provided, it looks like it is meant for on-premises use by 
existing z hardware customers - It's running on z/Linux on IFL's (min of 2) on 
your z hardware or on Wazi hardware in the IBM cloud.

No mention of x86 or students in there from what I could see.  And no pricing 
information at all, just "see your friendly IBM representative".

But I do hope Timothy answers as well, this is just my reading of the data he 
provided.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Thursday, June 16, 2022 9:39 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Introducing IBM Virtual Dev and Test for z/OS

Is this an alternative to the ZDNT Learners Edition?

What's the cost?  Can hobbyists use it?


Lionel B. Dyck <><
Website:
https://urldefense.com/v3/__https://www.lbdsoftware.com__;!!Ebr-cpPeAnfNniQ8
HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiY
uBeI6Dh0J1oNJR1tRJzYOs$
Github:
https://urldefense.com/v3/__https://github.com/lbdyck__;!!Ebr-cpPeAnfNniQ8HS
AI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuB
eI6Dh0J1oNJR1HE-FJiU$ 

"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 
Timothy Sipples
Sent: Thursday, June 16, 2022 03:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Introducing IBM Virtual Dev and Test for z/OS

IBM Wazi as a Service provides near instant (within just a few minutes), on 
demand access to z/OS instances for development, unit testing, and training.
These instances run in IBM Cloud, and the performance is excellent since they 
run on real mainframes. Wazi as a Service is in limited preview now and will be 
more generally available this year. See here for more information:

https://urldefense.com/v3/__https://www.ibm.com/cloud/wazi-as-a-service__;!!
Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5
xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR1zpaVZ_A$ 

One question we got is, "Great, but can I also do this on premises?" Well, yes, 
you "always" could/can with development LPARs and z/VM guests. And also on your 
Linux PC (or a X86 server) with the IBM Z Development and Test Environment 
(ZD&TE), although in that case it's real z/OS but with emulation overhead.

Now there's yet another great option: the IBM Virtual Dev and Test for z/OS, 
generally available THIS FRIDAY. The announcement letter is available here:

https://urldefense.com/v3/__https://www.ibm.com/downloads/cas/US-ENUS222-251
-CA/name/US-ENUS222-251-CA.P__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9
ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR1qOF_h_E$
DF

And the landing page is here:

https://urldefense.com/v3/__https://www.ibm.com/products/virtual-dev-and-tes
t-zos__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0
W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR13Gg4FHw$ 

This product also provides virtualized z/OS instances on IFLs for development, 
unit testing, and training. You wi

Re: Introducing IBM Virtual Dev and Test for z/OS

[Farley, Peter x23353]

Lionel,

That's what I was wondering myself, but after checking the "landing page" that 
Timothy provided, it looks like it is meant for on-premises use by existing z 
hardware customers - It's running on z/Linux on IFL's (min of 2) on your z 
hardware or on Wazi hardware in the IBM cloud.

No mention of x86 or students in there from what I could see.  And no pricing 
information at all, just "see your friendly IBM representative".

But I do hope Timothy answers as well, this is just my reading of the data he 
provided.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Thursday, June 16, 2022 9:39 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Introducing IBM Virtual Dev and Test for z/OS

Is this an alternative to the ZDNT Learners Edition?

What's the cost?  Can hobbyists use it?


Lionel B. Dyck <><
Website: 
https://urldefense.com/v3/__https://www.lbdsoftware.com__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR1tRJzYOs$
 
Github: 
https://urldefense.com/v3/__https://github.com/lbdyck__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR1HE-FJiU$
 

"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
Timothy Sipples
Sent: Thursday, June 16, 2022 03:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Introducing IBM Virtual Dev and Test for z/OS

IBM Wazi as a Service provides near instant (within just a few minutes), on
demand access to z/OS instances for development, unit testing, and training.
These instances run in IBM Cloud, and the performance is excellent since
they run on real mainframes. Wazi as a Service is in limited preview now and
will be more generally available this year. See here for more information:

https://urldefense.com/v3/__https://www.ibm.com/cloud/wazi-as-a-service__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR1zpaVZ_A$
 

One question we got is, "Great, but can I also do this on premises?" Well,
yes, you "always" could/can with development LPARs and z/VM guests. And also
on your Linux PC (or a X86 server) with the IBM Z Development and Test
Environment (ZD&TE), although in that case it's real z/OS but with emulation
overhead.

Now there's yet another great option: the IBM Virtual Dev and Test for z/OS,
generally available THIS FRIDAY. The announcement letter is available here:

https://urldefense.com/v3/__https://www.ibm.com/downloads/cas/US-ENUS222-251-CA/name/US-ENUS222-251-CA.P__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR1qOF_h_E$
 
DF

And the landing page is here:

https://urldefense.com/v3/__https://www.ibm.com/products/virtual-dev-and-test-zos__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PWNjDuIXI2E9ayvAZqhD4UpV2YEbt9O2_s0W-hzk2U3s5xk2AR2lgD_cVrdiYuBeI6Dh0J1oNJR13Gg4FHw$
 

This product also provides virtualized z/OS instances on IFLs for
development, unit testing, and training. You will need at least 2 IFLs (on
an IBM zSystems or LinuxONE server), although they can be potentially shared
with other workloads. Of course you'll need some memory and disk space. The
latter can be any reasonable Linux-attachable storage. (It does not have to
be specifically ECKD/FICON-attached.) IBM Virtual Dev and Test for z/OS
licenses are available via IBM Passport Advantage in your choice of one-time
charge license (with annual Subscription & Support) or monthly license (with
monthly Subscription & Support). You can start with monthly then switch to
one-time charge if you wish.

Did I mention it's generally available this Friday? :-)

Speaking to z/OS system programmers and other operators for a moment (and my
personal views here, as always)... The intention behind these offerings is
to make sure developers have whatever they need without constraints or
delay. Let them do their jobs and be productive at speed. If each developer
wants her own z/OS instance, FINE. If the developer "destroys" that z/OS
instance, no problem, the developer can spin up another one from "last known
good." (That's part of learning, and that's a good thing.) And if you won't
let developers develop (and unit test), and maybe even stumble once in a
while, we'll do it...with a very reasonable hourly rate for IBM Wazi as a
Service, with "walk up" service just a few clicks/taps away from anywhere.
But you can do it, too, so go do it (too), OK?

With both Wazi as a Service and IBM Virtual Dev and Test for z/OS developers
can use the pre-built "ADCD" z/OS image or use a tool IBM provides to take a
"snapshot" of the current development LPAR(s) and use that as a starting
point. These z/OS instances can be automated, and we encourage that, so they
can be used for DevOps pipe

Re: SFTP JOB Data parameter

[Farley, Peter x23353]

Thanks again Sri.  After reading those posts, I do see the issue.  That would 
be the "Don't break existing jobs" mantra.

I would instead have said "Go ahead and break them in QA so we can fix the 
broken ones", but I don't pay the bills and "breaking them in QA" AssUMes that 
QA batch initiator classes are distinct from Production batch initiator 
classes, which isn't true at any large shop where I have worked.

But I agree with Gil's final post in that thread - it should have been 
implemented as a new JCL option (similar to EXPORT SYMLIST) rather than an 
initiator class parameter.  Positive opt-in for jobs that want to use it, leave 
the others alone.  Perhaps a global parameter for the JCL interpreter to allow 
or disallow the new JCL option during the initial transition so shops could 
choose to allow or disallow use of the new JCL option to prevent accidental 
breakage by too-eager programmers until automated SDLC rules for JCL are 
updated and enforced.

Water under the proverbial bridge now.  At least we have EZACFSM1 as an 
alternative, so that's good.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Sri 
h Kolusu
Sent: Wednesday, June 15, 2022 1:32 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SFTP JOB Data parameter

>>> But that raises the question why NOT always allow system symbols in 
>>> every batch initiator?  Allowing them just seems like a no-brainer 
>>> to me

Peter,

There have been several discussions on IBM-MAIN about SYSSYM=ALLOW and here is 
a post which explains one of the reason.

https://www.mail-archive.com/ibm-main@listserv.ua.edu/msg62638.html 

Thanks,
Kolusu
--

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: SFTP JOB Data parameter

[Farley, Peter x23353]

Thanks Sri, I did not know about SYSSYM=ALLOW.  But that raises the question 
why NOT always allow system symbols in every batch initiator?  Allowing them 
just seems like a no-brainer to me, but then I'm just an application programmer 
who expects to be able to use all of the available tools to get the job done.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Sri 
h Kolusu
Sent: Wednesday, June 15, 2022 1:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SFTP JOB Data parameter

>> Why is EZACFSM1 required to use &LYYMMDD in an instream DD?  Couldn't the OP 
>> just use:

Peter,

Not all shops SYSSYM=ALLOW defined. So if your jobclass is NOT defined to allow 
symbols, the symbols will not be translated.  However with program EZACFSM1 
will translate all the symbols defined to the system.


Thanks,
Kolusu
--

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: SFTP JOB Data parameter

[Farley, Peter x23353]

Why is EZACFSM1 required to use &LYYMMDD in an instream DD?  Couldn't the OP 
just use:

//TSOUSERX JOB . . . 
// EXPORT SYMLIST=*
// SET MYDATE=&LYYMMDD
//SYSTSIN DD *,SYMBOLS=JCLONLY
CONTROL CARD UISNG &MYDATE
/*

to substitute that value? (tested using IEBGENER with a SYSUT1 instream and 
SYSUT2 DD SYSOUT=*)

Using symbols in a regular file (Unix or MVS) of course requires EZACFSM1, but 
for an instream control card file it is not required.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Michael Oujesky
Sent: Wednesday, June 15, 2022 11:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SFTP JOB Data parameter

As a starting point:
//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=&SYSUID
//TAILOR  EXEC PGM=PGM=EZACFSM1
//SYSOUT   DD   DISP=(NEW,PASS,DELETE),DSN=&CMDS,
// UNIT=VIO,SPACE=(TRK,(1)),
// RECFM=FB,LRECL=80,BLKSZE=800
//SYSINDD *
OSHELL { echo 'lcd /u/op117/';
  echo 'cd /FRB/EBCClearing/Staging/tmp';+
  echo 'ASCII'; +
  echo 'get EBC-GOV-&LYYMMDD..txt'; } | +
sftp -P  eftmfge...@10.222.xx.xx
OGET '/u/op117/EBC-GOV-&LYYMMDD..txt'  -
  'NBFDP.DATA.XX.XX.SFTP'
//STEP1   EXEC PGM=IKJEFT01,REGION=0M
//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC
//SYSTSIN   DD DSN=&CMDS,DISP=(OLD,DELETE)
//OUTPUT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
/*

At 05:44 AM 6/15/2022, saurabh khandelwal wrote:
>--
>
>Dear All,
>
>I am am running below Job in TSO env and getting to get file file from 
>windows to Mainframe env.
>
>Initially file was static and all worked well. But now, requirement is 
>to get the file, which has current time stamp on daily basis.
>
>Ex : EBC-GOV-mmdd.txt'   in this mmdd should be replace with 
>year/month/date.
>
>But I am unable to find way to achieve this goal. Can you please help 
>on this issue.
>//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=&SYSUID
>//STEP1   EXEC PGM=IKJEFT01,REGION=0M
>//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC
>//SYSTSIN   DD DSN=NP.LIB.CLIST(SFTPSEBC),DISP=SHR
>//OUTPUT DD SYSOUT=*
>//SYSTSPRT DD SYSOUT=*
>/*
>EDIT  NP.LIB.CLIST(SFTPSEBB) - 01.01Columns 1 00072
>Command ===>  Scroll ===> CSR
>07 OSHELL { echo 'lcd /u/op117/';
>08  echo 'cd /FRB/EBCClearing/Staging/tmp';+
>09  echo 'ASCII'; +
>10  echo 'get EBC-GOV-mmdd.txt'; } | +
>11sftp -P  eftmfge...@10.222.xx.xx
>12 OGET '/u/op117/EBC-GOV-mmdd.txt'  -
>13  'NBFDP.DATA.XX.XX.SFTP'
>
>**  Bottom of Data
>
--

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: dfsort -TASK I/O TABLE EXCEEDS TIOT LIMIT OF 0064K

[Farley, Peter x23353]

The simple solution is to split the single job into multiple jobs.  As a start, 
put the first 250 into JOB1, the second 250 into JOB2 and the last 250 into 
JOB3.

It means 3 passes of the input file instead of one, but the jobs will run and 
you will get the result you need.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Ron 
Thomas
Sent: Saturday, June 11, 2022 12:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: dfsort -TASK I/O TABLE EXCEEDS TIOT LIMIT OF 0064K

Hello -

We are splitting a very large files in to 750 files dynamically based on key , 
which means if the key changes the file is moved to the respective ones


we are getting the message 

STEPBB - TASK I/O TABLE EXCEEDS TIOT LIMIT OF 0064K STEPBB - STEP WAS NOT 
EXECUTED.

and hence the step is not getting executed .

File LRECL = 500 Key is from position 19,4.

Here is the control card used

SORT FIELDS=COPY
OUTREC IFTHEN=(WHEN=GROUP,KEYBEGIN=(19,4),PUSH=(501:ID=3))
OUTFIL FNAMES=OUT001,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,001)
OUTFIL FNAMES=OUT002,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,002)
OUTFIL FNAMES=OUT003,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,003)
OUTFIL FNAMES=OUT004,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,004)
OUTFIL FNAMES=OUT005,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,005)
OUTFIL FNAMES=OUT006,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,006)
OUTFIL FNAMES=OUT007,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,007)
OUTFIL FNAMES=OUT008,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,008)
---
--
OUTFIL FNAMES=OUT749,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,749)
OUTFIL FNAMES=OUT750,BUILD=(1,500),INCLUDE=(501,3,ZD,EQ,750)


so could some let me know how to get this fixed ? of is there any other way we 
can build this one ?


Regards
Ron T
--

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: FTP Software for Mainframe to PC

[Farley, Peter x23353]

There is also WS_FTP Professional.  There used to be a free version called 
WS_FTP LE (limited edition I think) that was free for personal use back in the 
Win95 days, but I don't think they offer that option any more, and the old 
16-bit Win95 version can't run on Windows 64-bit systems.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Friday, June 10, 2022 10:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTP Software for Mainframe to PC

Lizette wrote:

> Just looking to create a list of software that does FTP from the 
>mainframe to the PC

But then started with IND$FILE. At the risk of being called pedantic (not the 
first time), that's not FTP. If you mean "file transfer", sure. And add Kermit 
to the list (mostly kidding, I think it's pretty dead).
--

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: FTP Software for Mainframe to PC

[Farley, Peter x23353]

FTP from z/OS client to PC can work only if you have an FTP *server* on your 
PC.  FileZilla can act as an FTP server on your PC, assuming your z/OS allows 
an outbound connection from z/OS to your PC's IP address and your PC's IP 
address is static or at least stable.  If you VPN into your z/OS and your ISP 
dynamically changes your IP address or you reboot your ISP modem and get a new 
dynamic IP address all bets are off.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Robin Atwood
Sent: Friday, June 10, 2022 9:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTP Software for Mainframe to PC

Err, FTP, in both directions. 😊

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lizette Koehler
Sent: 10 June 2022 19:49
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: FTP Software for Mainframe to PC

Just looking to create a list of software that does FTP from the mainframe to 
the PC

I know

IND$FILE 
FILEZILLA

Are there any others?

Cost or no cost is okay.

Lizette
--

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

[Farley, Peter x23353]

It might get you better answers if we knew what SNOW stands for . . . just 
sayin'.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Beaver
Sent: Thursday, June 9, 2022 12:21 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SNOW

Has anyone in this group ever programmed SNOW?  
--

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: SYNCSORT question: How to treat variable length KSDS as variable length input to SORT JOINKEYS

[Farley, Peter x23353]

I am happy to report that just providing TYPE=V on the JOINKEYS statement for 
the VSAM file worked and treated the VSAM file as variable-length.  Thank you 
again!

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Tuesday, June 7, 2022 10:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYNCSORT question: How to treat variable length KSDS as variable 
length input to SORT JOINKEYS

Thanks Alan, I will give that a try later today when I get back to work from 
other appointments.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Alan Young
Sent: Tuesday, June 7, 2022 2:13 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYNCSORT question: How to treat variable length KSDS as variable 
length input to SORT JOINKEYS

Add a TYPE=V parameter to the JOINKEYS statement for the VSAM file. It might 
also need a RECFM=V on the SORTJNFx DD for the VSAM file.
 
Alan
 
-Original Message-
From: IBM Mainframe Discussion List 
Sent: Jun 6, 2022 6:07 PM
To: 
Subject: SYNCSORT question: How to treat variable length KSDS as variable 
length input to SORT JOINKEYS
 
I have two files, one a flat file with RECFM=VB,LRECL=8004, one a VSAM KSDS 
with RECORDSIZE(3000 26000) denoting variable length records for that KSDS.
 
However, when using that VSAM file as one side of a JOINKEYS operation, 
SYNCSORT claims the KSDS is RECFM=F:
 
WER482I JNF2 STATISTICS
WER483B 32,780K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER483B 0 BYTES RESERVE REQUESTED, 996K BYTES USED
WER108I IN2 : RECFM=F ; LRECL= 26000; CISIZE = 28672
 
Listcat of the VSAM file shows it is, in fact, defined as variable:
 
ATTRIBUTES
KEYLEN15 AVGLRECL3000 BUFSPACE---61440 
CISIZE-28672
RKP1 MAXLRECL---26000 EXCPEXIT--(NULL) 
CI/CA-26
STRIPE-COUNT---1
ACT-DIC-TOKENX'4009054005FE08FE0DFE0EFE0AFE'
SHROPTNS(2,3) SPEED UNIQUE NOERASE INDEXED NOWRITECHK UNORDERED REUSE
NONSPANNED COMP-FORMT EXTENDED EXT-ADDR
 
How do I get SYNCSORT to recognize and treat this variable-length KSDS as 
variable, just like the flat file which is my other JOINKEYS input?
 
Copying the VSAM to a flat RECFM=VB isn't a currently viable alternative due to 
large file size and limited "test" disk space. Besides, I ought to be able to 
process a variable length file as a variable length file no matter what the 
actual file organization may be.
 
Peter
 --

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: SYNCSORT question: How to treat variable length KSDS as variable length input to SORT JOINKEYS

[Farley, Peter x23353]

Thanks Alan, I will give that a try later today when I get back to work from 
other appointments.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Alan Young
Sent: Tuesday, June 7, 2022 2:13 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYNCSORT question: How to treat variable length KSDS as variable 
length input to SORT JOINKEYS

Add a TYPE=V parameter to the JOINKEYS statement for the VSAM file. It might 
also need a RECFM=V on the SORTJNFx DD for the VSAM file.
 
Alan
 
-Original Message-
From: IBM Mainframe Discussion List 
Sent: Jun 6, 2022 6:07 PM
To: 
Subject: SYNCSORT question: How to treat variable length KSDS as variable 
length input to SORT JOINKEYS
 
I have two files, one a flat file with RECFM=VB,LRECL=8004, one a VSAM KSDS 
with RECORDSIZE(3000 26000) denoting variable length records for that KSDS.
 
However, when using that VSAM file as one side of a JOINKEYS operation, 
SYNCSORT claims the KSDS is RECFM=F:
 
WER482I JNF2 STATISTICS
WER483B 32,780K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER483B 0 BYTES RESERVE REQUESTED, 996K BYTES USED
WER108I IN2 : RECFM=F ; LRECL= 26000; CISIZE = 28672
 
Listcat of the VSAM file shows it is, in fact, defined as variable:
 
ATTRIBUTES
KEYLEN15 AVGLRECL3000 BUFSPACE---61440 
CISIZE-28672
RKP1 MAXLRECL---26000 EXCPEXIT--(NULL) 
CI/CA-26
STRIPE-COUNT---1
ACT-DIC-TOKENX'4009054005FE08FE0DFE0EFE0AFE'
SHROPTNS(2,3) SPEED UNIQUE NOERASE INDEXED NOWRITECHK UNORDERED REUSE
NONSPANNED COMP-FORMT EXTENDED EXT-ADDR
 
How do I get SYNCSORT to recognize and treat this variable-length KSDS as 
variable, just like the flat file which is my other JOINKEYS input?
 
Copying the VSAM to a flat RECFM=VB isn't a currently viable alternative due to 
large file size and limited "test" disk space. Besides, I ought to be able to 
process a variable length file as a variable length file no matter what the 
actual file organization may be.
 
Peter
 --

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

SYNCSORT question: How to treat variable length KSDS as variable length input to SORT JOINKEYS

[Farley, Peter x23353]

I have two files, one a flat file with RECFM=VB,LRECL=8004, one a VSAM KSDS 
with RECORDSIZE(3000 26000) denoting variable length records for that KSDS.

However, when using that VSAM file as one side of a JOINKEYS operation, 
SYNCSORT claims the KSDS is RECFM=F:

WER482I  JNF2 STATISTICS
WER483B  32,780K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER483B 0 BYTES RESERVE REQUESTED, 996K BYTES USED
WER108I  IN2  : RECFM=F; LRECL= 26000; CISIZE = 28672

Listcat of the VSAM file shows it is, in fact, defined as variable:

  ATTRIBUTES
KEYLEN15 AVGLRECL3000 
BUFSPACE---61440 CISIZE-28672
RKP1 MAXLRECL---26000 
EXCPEXIT--(NULL) CI/CA-26
STRIPE-COUNT---1

ACT-DIC-TOKENX'4009054005FE08FE0DFE0EFE0AFE'
SHROPTNS(2,3)  SPEED UNIQUE   NOERASE INDEXED   
NOWRITECHK UNORDERED  REUSE
NONSPANNEDCOMP-FORMT EXTENDEDEXT-ADDR

How do I get SYNCSORT to recognize and treat this variable-length KSDS as 
variable, just like the flat file which is my other JOINKEYS input?

Copying the VSAM to a flat RECFM=VB isn't a currently viable alternative due to 
large file size and limited "test" disk space.  Besides, I ought to be able to 
process a variable length file as a variable length file no matter what the 
actual file organization may be.

Peter

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: [EXTERNAL] New IBM Community Blog - ISPF List/Log Viewing

[Farley, Peter x23353]

Some of us do not get to choose whether the links we post get converted to 
urldevense.com instead.  Corporate email servers do that without consulting us.

What I do us "reply" to the email and then cut and paste the "real" url into my 
browser (the part between double-underscores).

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Paul Gilmartin
Sent: Friday, June 3, 2022 1:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] New IBM Community Blog - ISPF List/Log Viewing

EXTERNAL EMAIL

On Jun 3, 2022, at 07:23:18, René Jansen wrote:
> 
> Ha, that does not work either. Fortunately Paul sent a link that was not cut 
> off anywhere.
> 
"urldefense.com" is another thing I'd distrust.  What's their business model?
They get to inspect too much of your web traffic.

>> On 3 Jun 2022, at 14:49, Pommier, Rex wrote:
>> 
>> I couldn't get René's  link to work.  If you can't either, try this one.
>> 
>> shorturl.at/uwPSY
>> 
>> Rex
>> 
>> -Original Message-
>> From: IBM Mainframe Discussion List  On Behalf Of 
>> René Jansen
>> Sent: Friday, June 3, 2022 6:25 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: [EXTERNAL] Re: New IBM Community Blog - ISPF List/Log Viewing
>> 
>> For those of us who are searching: shorturl.at/HNPQ9 
>> >  >
>> 
>> 
>>> On 3 Jun 2022, at 13:20, Lionel B. Dyck wrote:
>>> 
>>> I think y'all will enjoy this new blog
-- 

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: Publicly available site for SA23-7832-13 zArch PoOP for z16?

[Farley, Peter x23353]

Yep, I got it from Bill G.'s reply, thanks.  PEBKAC.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Alan Young
Sent: Friday, June 3, 2022 2:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?

The link for 013 is embedded in the paragraph text at the top of the page.
https://urldefense.com/v3/__http://publibfp.dhe.ibm.com/epubs/pdf/a227832d.pdf__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!PSHnr3iwCycr_CbU0xB1tqN0-_PjjMTGrqWlAP5N1YCu_3snY3hQkz74jFK1nUepDeU5eIWTpwDil32fAAPXmA$
 
 
-Original Message-
From: IBM Mainframe Discussion List
Sent: Jun 3, 2022 7:30 AM
To: 
Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?
 
Thanks for that link, but those are all the ones up to the -12 edition, not 
including the new -13 edition yet.
 
Peter
 
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Alan Young
Sent: Friday, June 3, 2022 6:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?
 
https://urldefense.com/v3/__https://linux.mainframe.blog/zarchitecture-principles-of-operation__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KFbcdz-pDFxDB3WHjV0LI3pEuEoWOTMyO6VUlAsDZ25PtBD7XWM_XKq2hGVPwejBkoN10zXRKVSvFZUpnAVvjw$
  has a link to that version and older versions of it.
 
Alan
 
-Original Message-
From: IBM Mainframe Discussion List
Sent: Jun 2, 2022 9:39 PM
To:
Subject: Publicly available site for SA23-7832-13 zArch PoOP for z16?
 
Even Jim Elliiot's CMOS website only has a ResourceLink url to get it, and some 
of us do not have ResourceLink ID's.
 
Has anyone found it on a publicly available website that needs no login?
 
I do have an IBM developer login, but apparently that one does not give me 
access to ResourceLink.
 
Peter
--

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: Publicly available site for SA23-7832-13 zArch PoOP for z16?

[Farley, Peter x23353]

Bingo!  Thank you , I missed that link when I first went to the page.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Bill Godfrey
Sent: Friday, June 3, 2022 12:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?

That same page has a link to the -13 edition, in parentheses, in the paragraph 
above all the others. No ResourceLink login required.

On Fri, 3 Jun 2022 14:29:59 +, Farley, Peter x23353 wrote:

>Thanks for that link, but those are all the ones up to the -12 edition, not 
>including the new -13 edition yet.
>
>Peter
>
>-Original Message-
>From: IBM Mainframe Discussion List  On 
>Behalf Of Alan Young
>Sent: Friday, June 3, 2022 6:23 AM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?
>
>https://urldefense.com/v3/__https://linux.mainframe.blog/zarchitecture-principles-of-operation__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KFbcdz-pDFxDB3WHjV0LI3pEuEoWOTMyO6VUlAsDZ25PtBD7XWM_XKq2hGVPwejBkoN10zXRKVSvFZUpnAVvjw$
>  has a link to that version and older versions of it.
> 
>Alan
> 
>-Original Message-
>From: IBM Mainframe Discussion List
>Sent: Jun 2, 2022 9:39 PM
>To: 
>Subject: Publicly available site for SA23-7832-13 zArch PoOP for z16?
> 
>Even Jim Elliiot's CMOS website only has a ResourceLink url to get it, and 
>some of us do not have ResourceLink ID's.
> 
>Has anyone found it on a publicly available website that needs no login?
> 
>I do have an IBM developer login, but apparently that one does not give me 
>access to ResourceLink.
> 
>Peter
--

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: Publicly available site for SA23-7832-13 zArch PoOP for z16?

[Farley, Peter x23353]

Yes I did try that link.  When you click on the PDF link it sends you to the 
ResourceLink site, which requires login.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Sri 
h Kolusu
Sent: Friday, June 3, 2022 11:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?

EXTERNAL EMAIL

>> Thanks for that link, but those are all the ones up to the -12 edition, not 
>> including the new -13 edition yet.

Peter,

Did you try this link ?

https://urldefense.com/v3/__https://www.ibm.com/support/pages/zarchitecture-principles-operation__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!IdeaCoNOiQH7BoRjEa0hDXgWoxf0GWa9-M06WEcrDkrKh1NY5UFHLqIxE6SWPzfgd98pyh135RtO6Es_vlPb_w$
 


Thanks,
Kolusu
--

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: Publicly available site for SA23-7832-13 zArch PoOP for z16?

[Farley, Peter x23353]

Thanks for that link, but those are all the ones up to the -12 edition, not 
including the new -13 edition yet.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Alan Young
Sent: Friday, June 3, 2022 6:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Publicly available site for SA23-7832-13 zArch PoOP for z16?

https://urldefense.com/v3/__https://linux.mainframe.blog/zarchitecture-principles-of-operation__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!KFbcdz-pDFxDB3WHjV0LI3pEuEoWOTMyO6VUlAsDZ25PtBD7XWM_XKq2hGVPwejBkoN10zXRKVSvFZUpnAVvjw$
  has a link to that version and older versions of it.
 
Alan
 
-Original Message-
From: IBM Mainframe Discussion List
Sent: Jun 2, 2022 9:39 PM
To: 
Subject: Publicly available site for SA23-7832-13 zArch PoOP for z16?
 
Even Jim Elliiot's CMOS website only has a ResourceLink url to get it, and some 
of us do not have ResourceLink ID's.
 
Has anyone found it on a publicly available website that needs no login?
 
I do have an IBM developer login, but apparently that one does not give me 
access to ResourceLink.
 
Peter
--

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

Publicly available site for SA23-7832-13 zArch PoOP for z16?

[Farley, Peter x23353]

Even Jim Elliiot's CMOS website only has a ResourceLink url to get it, and some 
of us do not have ResourceLink ID's.

Has anyone found it on a publicly available website that needs no login?

I do have an IBM developer login, but apparently that one does not give me 
access to ResourceLink.

Peter

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: Pricing for a single-user copy of PCOMM?

[Farley, Peter x23353]

Thanks again Timothy.  Good information to know, and I appreciate the prompt 
reply.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Timothy Sipples
Sent: Tuesday, May 31, 2022 1:30 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Pricing for a single-user copy of PCOMM?

Peter Farley wrote:
>Can you point to a page or document that describes the IBM policy
>for HACP version upgrades?  I am concerned that if I buy a copy but
>receive an earlier-than-current version (e.g., V13.0 vs the more current
>V14.0) from a non-IBM distributor that I would not be entitled to
>upgrade without another charge.

No danger of that. There's no media shipment for these products, not without a 
media part number and additional charge anyway. You're not going to get some 
stale box that gathered dust on a shelf somewhere. There's no box. It's the 
21st century now. :-)

When you purchase the license from an authorized IBM Business Partner that 
company registers your entitlement(s) in IBM's Passport Advantage or Passport 
Advantage Express system. ("Express" is for individuals and small businesses.) 
You can then electronically download your entitled software products directly 
from IBM Passport Advantage, in this case Personal Communications and Host 
On-Demand.

If you want Version 13, and if it's still available for download (yes, usually 
past versions are kept around), then you grab that. If you want Version 14, you 
grab that. If you want both, you grab both. Any new versions or releases of 
that product released during your Subscription & Support term are also 
ordinarily available for download. And you can open problem cases with IBM 
during your S&S term if you need to.

This particular license (IBM Host Access Client Package) is a one-time charge 
perpetual license with annually renewable S&S. There's a renewal part number, 
but that's easy since you should get invitations to renew before it's due 
without having to worry about digging up the part number. If you don't renew 
your S&S you're still licensed to run the version(s) released during your 
active S&S period, and prior versions. If you want to resume S&S after an 
interruption you can, but there's a different reinstatement part number for 
that - and a higher price, of course.

Service updates and fixes are typically available via IBM Fix Central, so don't 
assume what you download from Passport Advantage is the latest build. Check Fix 
Central, too. You can subscribe to notices and alerts for your product(s).

By the way, there's a 90 day trial version of IBM Personal Communications for 
Windows available here (direct link, subject to change):

https://urldefense.com/v3/__https://www.ibm.com/account/reg/us-en/signup?formid=urx-31769__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NzWLfuJGF2yegTsQo7exySBSH8uwgP_bXDmSZSmxyOf8Uu4CdHyWw0JRMul5uAkO6iLlksTw1ZOUR0l8DxBsmw$
 

I just checked, and you can currently download any of these Personal 
Communications 90 day trial versions: 14.0.4, 14.0, 13.0, 12.0.2, or 6.0.14. 
Ordinarily you'll want the latest, but you have choices. I believe one of the 
significant changes in Version 14.0 is that it's a 64-bit Windows program, so 
you might need 13.0 if you're still running a 32-bit flavor of Windows.

Obviously IBM's official documents govern if I've misstated anything.
--

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: Pricing for a single-user copy of PCOMM?

[Farley, Peter x23353]

Thanks Timothy.  My "favorite search engine" actually only found one 
distributor who actually publishes pricing for that part number, but there was 
at least one.  The rest all required one to submit an RPQ to reveal pricing.

Can you point to a page or document that describes the IBM policy for HACP 
version upgrades?  I am concerned that if I buy a copy but receive an 
earlier-than-current version (e.g., V13.0 vs the more current V14.0) from a 
non-IBM distributor that I would not be entitled to upgrade without another 
charge.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Timothy Sipples
Sent: Monday, May 30, 2022 3:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Pricing for a single-user copy of PCOMM?

As you've already figured out, you license IBM Personal Communications via the 
IBM Host Access Client Package ("HACP"). This license includes Personal 
Communications (for Windows) and Host On-Demand for all supported platforms 
(Linux, macOS, Windows, etc.) One license entitlement = one authorized user. 
It's not per installation, so if there's only one of you then the license 
quantity would be 1 even if you're going to use two PCs/laptops. If your 
sibling for example wants to use this software then she/he would need another 
license.

You then need the IBM Passport Advantage part numbers, but I can help with 
that. (You can find them in past announcement letters, but I looked them up for 
you.) There are two part numbers of particular interest:

D6152LL: new license with the first 12 months of Subscription & Support
D6154LL: trade up license with first 12 months S&S

"Trade up" means you've got some other "competitive" software product that this 
product is going to replace. You have to stop using whatever that other product 
is.

A search using (your favorite Internet search engine) finds multiple 
distributors selling both of these part numbers, so the rest should be fairly 
easy.

Hope that helps!
--


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: Pricing for a single-user copy of PCOMM?

[Farley, Peter x23353]

Thanks Mike, but BTDT.  I've been a Vista TN3270+ user for quite a while, as 
Tom B. can testify.

My goal here is to explore the IBM offering as an educational experience.  
Tom's Vista TN3270+ Just Works (tm) as many of us already know.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mike Schwab
Sent: Sunday, May 29, 2022 10:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Pricing for a single-user copy of PCOMM?

Tom Brennans Vista is highly recommended.

On Sun, May 29, 2022 at 5:03 PM Farley, Peter x23353 
<031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:
>
> I've been roaming around the IBM websites looking for a published price for a 
> single-user copy of IBM Personal Communications, but I have not been able to 
> find anything resembling that information.
>
> Does anyone have a link or information on where one can find that pricing 
> (assuming it even exists)?  Pricing for host system Windows version 10+ 
> and/or Ubuntu version 20+ would be ideal.
>
> I would like to use PCOMM for TSO access to the system used by the IBM 
> training site Zxplore.
>
> TIA for any leads you can provide.  I do already have a copy of TN3270+ but I 
> would also like to have a recent copy of PCOMM for training and exploration 
> purposes.
>
> Peter
--

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: Pricing for a single-user copy of PCOMM?

[Farley, Peter x23353]

Having just done a bit more exploration of IBM websites, I came to realize it 
would also be useful to be able to obtain a copy of the full IBM Host Access 
Client Package, which includes the Host on Demand component.  When I got to the 
IBM page for that product, the "Pricing" button led nowhere, it just flashed 
the screen.

So if you know of any actual pricing documentation for either product I would 
appreciate a pointer.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Sunday, May 29, 2022 6:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Pricing for a single-user copy of PCOMM?

I've been roaming around the IBM websites looking for a published price for a 
single-user copy of IBM Personal Communications, but I have not been able to 
find anything resembling that information.

Does anyone have a link or information on where one can find that pricing 
(assuming it even exists)?  Pricing for host system Windows version 10+ and/or 
Ubuntu version 20+ would be ideal.

I would like to use PCOMM for TSO access to the system used by the IBM training 
site Zxplore.

TIA for any leads you can provide.  I do already have a copy of TN3270+ but I 
would also like to have a recent copy of PCOMM for training and exploration 
purposes.

Peter
--

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

Pricing for a single-user copy of PCOMM?

[Farley, Peter x23353]

I've been roaming around the IBM websites looking for a published price for a 
single-user copy of IBM Personal Communications, but I have not been able to 
find anything resembling that information.

Does anyone have a link or information on where one can find that pricing 
(assuming it even exists)?  Pricing for host system Windows version 10+ and/or 
Ubuntu version 20+ would be ideal.

I would like to use PCOMM for TSO access to the system used by the IBM training 
site Zxplore.

TIA for any leads you can provide.  I do already have a copy of TN3270+ but I 
would also like to have a recent copy of PCOMM for training and exploration 
purposes.

Peter

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: [EXTERNAL] Re: IBM BLSR subsystem

[Farley, Peter x23353]

When change means being able to more consistently meet your contractual SLA's 
and handle ever-increasing client input volume that tends to make the politics 
a lot easier.  Missed SLA's hit their bottom line, so that's where they tend to 
focus.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Friday, May 20, 2022 9:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: IBM BLSR subsystem

At some sites, the most gargantuan thing about making a change like this is 
getting past the politics of getting managers who don't want to change anything.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Radoslaw Skorupka
Sent: Thursday, May 19, 2022 6:53 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: IBM BLSR subsystem

Excuse me, what is gargantuan in moving to extended format?
Note: we are talking about *application* datasets, not ICF, SyS1.MANx, system, 
VVDS or whatever.
Note2: it need NOT to be big bang approach, you can change definitions for 
some/few datasets. And only for new allocations.

IMHO it is like walk to the park - the most gargantuan thing is to make first 
step.

--
Radoslaw Skorupka
Lodz, Poland



W dniu 19.05.2022 o 16:48, Michael Watkins pisze:
> Thanks for the history and a definitive word on BLSR. From your (and others') 
> remarks, it seems obvious that BLSR has been supereceded by SMB. So why not 
> just implement SMB?
>
> Doesn't SMB only work if the clusters whose buffers you want to manage are 
> defined as extended format? In contrast, BLSR does not require extended 
> format, correct?
>
> Extended format datasets are the exception where I am employed, not the rule. 
> Recreating the DASD farm in extended format would be a gargantuan task, 
> requiring the buy-in of far-flung managers with limited technical acumen 
> who'd see such efforts as a lot of work for very little benefit. At this 
> point, implementing BLSR until SMB can be a reality might provide some 
> immediate relief.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Jim Mulder
> Sent: Thursday, May 19, 2022 12:55 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: IBM BLSR subsystem
>
> BLSR was initially developed by Washinton System Center as an assembler 
> language sample program to go along with a book they were writing about using 
> the Subsystem Interface.  At the time, IBM was desperately looking for "ESA 
> Exclusives" in order to sell 3090 machines vs the PCM manufacturers, who 
> machines had not yet implemented ESA.  This sample program happened to use 
> one BAKR/PR, which meant that it did require ESA.
>
>   So MVS management wanted to instead ship the program an OCO part of the MVS 
> BCP, and I was commanded to review the code to see what that would  entail.
> I raised several objections concerning the maintainability of the code, the 
> lack of serviceability (no ESTAEs, no dumping, no control block eyecatchers,  
> we didn't want new assembler code), no message IDs, lack of messages and 
> message control, an integrity exposure, etc, etc.  Also, VSAM functionality 
> was not really in the BCP's bailiwick, and we would end up having to support 
> this code for decades.
> So I recommended that we should not do this.
>
>But, since selling machines trumps everything, I lost that argument, and 
> was instead assigned to remediate all of my objections to the sample code.
> I recoded  the whole thing in PL/AS and fixed all of the issues, and wrote 
> lots of testcases,  and it got shipped as a PTF on top of MVS/ESA SP3.1.3.
> MVS Project Management did contribute the "Batch LSR" name.
>
>Decades later, we continue to support it and probably always will, but at 
> least the right solution eventually got implemented by SMB in DFSMS.
>
>And now you know...  the rest of the story.
>
> James Harvey Mulder  z/OS Diagnosis, Design, Development, Test  IBM 
> Corp. Poughkeepsie NY
--

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: VTAM USSTAB

[Farley, Peter x23353]

If you license the HLASM Toolkit, you should have the DISASM utility to 
disassemble CSECT's.  A little tricky to set up and get working right, but it 
can be done.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
PINION, RICHARD W.
Sent: Tuesday, May 17, 2022 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: VTAM USSTAB

Does anybody know of a way to reverse assemble USSTAB load modules?

Award-winning 
service
--

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: IBM BLSR subsystem

[Farley, Peter x23353]

I agree with Mark, you can look up "system managed buffering" (SMB) in the JCL 
Reference and JCL Users Guide manuals.  AFAIK, BLSR documentation indeed has 
not been updated since somewhere around OS390 times, so the documentation you 
found is probably the most current.

That said, IMHO BLSR is still a viable I/O saving mechanism that Just Works 
(tm).  There are ISV products that claim to do better than IBM's solutions 
(BLSR or SMB) but they are not perfect either.

One reason I like BLSR is that it puts the amount of storage you want to 
dedicate to saving I/O under your direct control, via the HBUFNO and HBUFNI 
parameters.  The drawback is that the amount of memory to use is under your 
control and therefore you are required to maintain / monitor those amounts as 
your application matures and changes to make sure you are using the most 
cost-effective amounts.  A two-edged sword.

Head-to-head measurements of BLSR vs SMB that I performed a long time ago 
(probably 10 years or more) gave a slight edge to BLSR in terms of saved 
elapsed time, but not always.  It would be smart to try both methods and see 
which one works best for your applications.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mark Jacobs
Sent: Monday, May 16, 2022 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM BLSR subsystem

Take a look at the AMP=ACCBIAS keyword. It specifies the assigned VSAM System 
Managed Buffering specification.

Mark Jacobs

Sent from ProtonMail, Swiss-based encrypted email.

GPG Public Key - 
https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com 


--- Original Message ---
On Monday, May 16th, 2022 at 10:36 AM, Pommier, Rex  
wrote:


> Hi list,
>
> Is the BLSR subsystem (batch local shared resources) still a viable/valuable 
> thing or has it been replaced by something bigger/better/faster? I seem to be 
> stuck in the mid-90s because the most current documentation I can find on it 
> is from MVS/ESA 5.1 dated 1994. Is there more current documentation on how to 
> use it and how it works? Has it been replaced and deprecated? I just had a 
> developer use it last week and experienced a 40+ reduction in I/Os but I 
> wanted to read up on its limitations - especially around using it on a shared 
> VSAM dataset. However I can't find anything newer than 25+ years old. I did 
> multiple internet searches which is where I found the ESA manual. I checked 
> the knowledge center and my own z/OS 2.2 and 2.4 collections all to no avail.
>
> Thanks,
>
> Rex
--


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: The Story of Mainframe Passwords

[Farley, Peter x23353]

Yes, "keyed BDAM" was (and is) a supported (if little used these days) access 
method.  AFAIR, "keyed BDAM" was one of the 3 file types supported by PL/1 F 
"REGIONAL" files.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
PINION, RICHARD W.
Sent: Thursday, May 12, 2022 4:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: The Story of Mainframe Passwords

Non-relative track address BDAM used it to, right?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Thursday, May 12, 2022 3:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: The Story of Mainframe Passwords

Yes, ISAM positively did use hardware keys.  BTDTGTTS, and I do mean scars.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Smith
Sent: Thursday, May 12, 2022 3:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: The Story of Mainframe Passwords

VSAM does not use hardware keys.  What I know of that does are PDS directories 
(KL=8) (not PDSE), VTOCs (KL=44), SYS1.BRODCAST (KL=1), and just heard about 
PASSWORD.  They are (of course) available for user application with BDAM 
(Google suggests I meant "BDSM"... almost appropriate ;-).  I don't know 
whether ISAM ever used them.

They're basically a relic from when DASD was much much slower, and much more 
expensive.

sas


On Thu, May 12, 2022 at 3:04 PM Tom Brennan 
wrote:

> Yes... Now that you mention it, I do remember the key in PDS 
> directories, but I never worked with those others directly.  Do VSAM 
> datasets use disk keys?

--

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 Award-winning 
service<https://urldefense.com/v3/__https://www.firsthorizon.com/global/About-Us/Awards__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!JW2yRj9cVg-_N2hrwYqAa_RzauktPp7ziS6BdjKw3krq5RiAPjMT-J8L_emc9WyP4rbnDoMA-juH09nh-IkjbGpPaXo$
 >

Confidentiality notice:
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 
the employee or agent responsible for delivery of this message to the intended 
recipient(s), you are hereby notified that any dissemination, distribution, or 
copying of this e-mail message is strictly prohibited. If you have received 
this message in error, please immediately notify the sender and delete this 
e-mail message from your computer.

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

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: The Story of Mainframe Passwords

[Farley, Peter x23353]

Yes, ISAM positively did use hardware keys.  BTDTGTTS, and I do mean scars.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Steve Smith
Sent: Thursday, May 12, 2022 3:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: The Story of Mainframe Passwords

VSAM does not use hardware keys.  What I know of that does are PDS directories 
(KL=8) (not PDSE), VTOCs (KL=44), SYS1.BRODCAST (KL=1), and just heard about 
PASSWORD.  They are (of course) available for user application with BDAM 
(Google suggests I meant "BDSM"... almost appropriate ;-).  I don't know 
whether ISAM ever used them.

They're basically a relic from when DASD was much much slower, and much more 
expensive.

sas


On Thu, May 12, 2022 at 3:04 PM Tom Brennan 
wrote:

> Yes... Now that you mention it, I do remember the key in PDS 
> directories, but I never worked with those others directly.  Do VSAM 
> datasets use disk keys?

--

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: Potential Resource Savings Techniques

[Farley, Peter x23353]

Only if your SYSIN is not DUMMY.  When SYSIN for IDCAMS is DUMMY it does (and 
can do) nothing at all, rather more expensively in CPU time than IEFBR14, but 
still nothing by comparison.

Only if you are allocating and using REPRO from a DUMMY to a new sequential 
file or an actual DEFINE for a VSAM cluster for instance would IDCAMS do what 
you describe.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
 
Sent: Wednesday, May 11, 2022 11:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Potential Resource Savings Techniques

Thanks for your response.
IDCAMS does an open and close on the new file and writes zero records, so if 
RLSE is coded with the SPACE for output file(s) then the unused trks or cyls
Are released.  Secondary space will be used if needed when data is created in 
the file later. 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Spiegel
Sent: Wednesday, May 11, 2022 11:07 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Potential Resource Savings Techniques

HI David,
I do not understand this at all.
How does any program differ from IEFBR14 (with respect to allocation/freeing 
unused disk space by DD Statement)?

Maybe your shop has an Exit or add-on product which does Storage Management?

David

On 2022-05-11 01:53,   wrote:
> 5.  Consider changing IEFBR14 for allocating new files to IDCAMS with
> SYSIN DD DUMMY.  This will release unused disk space.

--

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: z/OS Data Set File System (DSFS) Now Available

[Farley, Peter x23353]

Bill,

I tend to agree with Paul on this.  It is quite simple:

1.  EVERYWHERE a PDS/PDSE can be used should allow a Unix directory path to 
be used instead
2.  EVERYWHERE a sequential file can be used should allow a Unix file to be 
used instead.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Bill Schoen
Sent: Friday, May 6, 2022 9:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS Data Set File System (DSFS) Now Available

EXTERNAL EMAIL

>> "Good Job IBM!" "'Bout Damn Time".. but also
>> "Where's the rest (VSAM, VBS, z/OS to OMVS) ?

Not sure what z/os to omvs is.  There has been access method support for a long 
time.
Perhaps more function is needed?
I hope "the rest" doesn't take quite so long.
vsam sequential and vbs are on my list along with about a dozen functions.
By all means ask for what you need, and who knows...  
At the moment there still is a development team.

Bill Schoen

--

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: Checksum of "legacy" load module?

[Farley, Peter x23353]

Why not checksum (or otherwise securely hash) the memory images of the module 
after each one to be compared is LOADed to the same starting storage address so 
that address resolution doesn't cause irrelevant differences?  Wouldn't that be 
simpler?

Of course, then you would have to somehow deal with overlay modules and RMODE 
SPLIT modules . . .  Never mind, dumb idea.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Charles Mills
Sent: Wednesday, May 4, 2022 4:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Checksum of "legacy" load module?

I should close the loop on this. I never actually did this, having determined 
that the checksum test would be negative (different) in any event.

It appears that depending on the order that PTFs were applied, the CSECTs are 
in a different order in the load module, and so two programs that are utterly 
functionally equivalent would have different checksums.

You know what would be an interesting product? A program that would take a load 
module, "decompose" it into its constituent CSECTs, and checksum them 
(including RLDs and ESDs), both individually and as a whole (in some consistent 
order, such as collating sequence by name). That would let you compare two load 
modules "logically," and if they were different, tell you which CSECTs were 
different, independent of CSECT order, block size, etc. 

(Yes, you can hypothesize a program where CSECT order made a difference, but it 
sounds unusual to me.)

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Thursday, April 28, 2022 8:57 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Checksum of "legacy" load module?

I apologize. Other things got in the way and I have not yet done this.

I recognize the great possibility of "false negatives": two load modules could 
be functionally identical but checksum differently.

One might even quibble about the meaning of "functionally identical": if one 
load module does LHI R0,0 and another does LA R0,0 are they functionally 
identical? Most people would say they were, but obviously a checksum program 
would (or should!) disagree.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Thursday, April 28, 2022 5:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Checksum of "legacy" load module?

If you do a COPY then the records, and hence the hash, should be identical.
It's COPYMOD that reblocks.

I don't know of any utility that will compare only the csect text. Further, two 
load modules might differ only in the RLD records, and that definitely should 
be picked up as a change in version.

--

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: SDSF - ISPF questions (wishes?)

[Farley, Peter x23353]

I see the "local workaround" in that APAR says this:

As a work-around, the SDSF special DD ISFMIGRL can be
allocated to avoid this problem.

Maybe that's the solution?

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Wednesday, May 4, 2022 1:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SDSF - ISPF questions (wishes?)

Rob Scott wrote:

>Try adding the following lines to your test exec after the ISFCALLS
statement :

>Rc=ISFQUERY("INIT")
>Say "Prefix="isfprefix " Owner="isfowner " Dest="isfdest " 
>JES="isfjesname

 

But when I do so, those variables do not get set:

/* REXX */
  arg j
  rc = isfcalls('ON')

  rc = isfquery('INIT')
  say "RC from isfquery('INIT') was" rc
  say "Prefix="isfprefix "Owner="isfowner "Dest="isfdest ,
"JES="isfjesname

  isfprefix = '*'
  address SDSF 'ISFEXEC ST' j
  say 'RC from ISFEXEC ST' j 'was' rc';' jname.0 'jobs found'

 

output is:

* TOP OF DATA
**

READY
%ST VSH1
RC from isfquery('INIT') was 1
Prefix=ISFPREFIX Owner=ISFOWNER Dest=ISFDEST JES=ISFJESNAME RC from ISFEXEC ST 
VSH1 was 0; 1 jobs found READY END
 BOTTOM OF DATA

Hm, rc from ISFQUERY was 1. Which seems to be undocumented. Mind you, Googling 
"ISFQUERY" gets a total of FOUR hits, which seems unlikely (especially since 
none of those is a copy of the SDSF User's Guide on IBM-there is one on 
manualzz). I hunted down the actual IBM SDSF User's Guide, which still doesn't 
document ISFQUERY return codes, but I found this code snippet in there:

rc=isfquery()

if rcsym;0 then

do

Say "** SDSF environment does not exist, exec ending."

Exit 20

end

Yes, complete with sym; -- wow. Anyway, that seems unlikely. What am 
I missing this time? I get the same results whether I put the isfquery before 
or after the isfcalls (yes, Rob, you said after, but the IBM sample has it 
before, so I tried both).

Lionel: I'm thinking that if we get this working, it would be useful output 
from your utility, since at a minimum it will save some "Why isn't this 
working?" (may lead to "How do I override it?" but at last it won't be a total 
mystery!)

Wait, just as I was about to hit send:
https://urldefense.com/v3/__https://www.ibm.com/support/pages/apar/PH27154__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!NznHebwIf8mNFJoFd4sdTJv9HmPfPQfmJ4w4P1chZcZ2i1JdkxDLILhZhVJYZkrtSy_64lyjXlHR-YH7NDY$
  sounds like "ISFQUERY is flat-out busted in 2.4, we don't care, will fix 
eventually maybe". Am I reading that right? Or is this talking about something 
else? It would be nice if it documented what "will not complete successfully" 
meant-RC=1?

...phsiii
--

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

ISPF EDIT COMPARE question - How to specify and use a SYSIN file?

[Farley, Peter x23353]

I have never been able to figure this out, so I am asking here (with a CC to 
ISPF-L).

When I am editing a COBOL source member in ISPF EDIT and I enter the bare 
COMPARE command without any argument, I get this pop-up menu:

   Edit Compare Settings and Command Parameters
Command ===>   
   
SuperC Options: Display options:   
  Enter "/" to select option  Lines displayed  
  /  Case Insensitive Compare with EXCLUDE  . . . 5   (0 - 12) 
  /  Ignore Reformat Differences  Label Prefix  . . . O  (A - Y)   
 Data Contains DBCS Characters 
  Use a label of the form .O to
  change the highlighting of a line
  to mark it as only existing in   
  the current file.
   
Compare Command Parameters:
Name . . . . .  +  
Volume . . . . 
  Enter "/" to select optionEnter "/" to select option 
 Exclude   Save
 SYSIN Set SYSIN data set  
   
Enter END to save changes. If NAME is set, Compare will run

I did figure out that the "Name" field is to specify the file to compare 
against, but how and where do I specify compare parameters (like "CMPCOLM 
007:072" for instance)?

I have tried entering a "/" on the "SYSIN" and on the "Set SYSIN data set" 
options but neither one lets me specify or create a SYSIN file for the compare 
containing the options I want to use.

Any help or RTFM you can provide is appreciated.

Current z/OS level is 2.3 if that makes a difference.

Peter

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: SDSF - ISPF questions (wishes?)

[Farley, Peter x23353]

What is your default SDSF "PREFIX" value?  Does Lionel's script change that 
value?

Maybe set PREFIX * before the ST request?

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Tuesday, May 3, 2022 11:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SDSF - ISPF questions (wishes?)

Lionel and I have been communicating about his very nice SDSFXDD, because it
wasn't working for me.

For me it only finds jobs whose jobname starts with your userid. If I have
jobs in O queue:
NP   JOBNAME  JobIDOwnerPrty C FormsDest Tot-Rec
 PHS1 JOB04436 PHS   144 A STD  LOCAL  7
 PHS1 JOB04436 PHS   144 A STD  LOCAL  1,094
 VSH1 JOB04440 PHS   144 A STD  LOCAL  7
 VSH1 JOB04440 PHS   144 A STD  LOCAL  1,094

and I create a trivial test program:
/* REXX */   
trace r  
  arg j  
  rc=isfcalls('ON')  
  address SDSF "ISFEXEC ST" j
  say 'RC from ISFEXEC ST' j 'was' rc';' jname.0 'jobs found'

Run against VSH1 it finds nothing; against PHS1 it works (finds the job).
Meanwhile, if I do ST VSH1 in SDSF, I see:
NP   JOBNAME  JobIDOwnerPrty Queue  C   Pos
 VSH1 JOB09766 RAW 1 PRINT  A58
 VSH1 JOB09767 RAW 1 PRINT  A59
 VSH1 JOB09768 RAW 1 PRINT  A60
 VSH1 JOB09769 RAW 1 PRINT  A61
 VSH1 JOB09781 RAW 1 PRINT  A62
 VSH1 JOB09782 RAW 1 PRINT  A63
 VSH1 JOB04440 PHS 1 PRINT  A   101

It isn't getting confused by those other jobs, because if I run XYZZY and
then try my trivial test (or SDSFXDD) against that, I get nothing as well. I
did think I had seen something at one point that said "Jobnames starting
with PHS" but now I can't find wherever that was.

Anyone know what's going on here? Our system is very vanilla, no fancy
exits/program products beyond RACF involved here.

...phsiii
--

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: [EXTERNAL] Re: General Query --- Any comments on thin clients as mainframe consoles.

[Farley, Peter x23353]

Shakespeare was almost right - First get rid of all the auditors . . . 😊

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Friday, April 29, 2022 1:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: General Query --- Any comments on thin clients as 
mainframe consoles.

Sad - I've seen that as well.  

During Y2K a number of phones had to be replaced because the display only 
showed 2 digits for the year when displaying the date. Go figure the mentality 
of those making those decisions (they probably got a kick back for the money 
spent).


Lionel B. Dyck <><
Website: 
https://urldefense.com/v3/__https://www.lbdsoftware.com__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!L5Dqohcv6J-vDwDKpMbXIx4OkeblrZc3IHR8_3eHK9706tXYsHt76WNP98HiVBy38nQTBSHI7dZ01OBjHrQ$
Github: 
https://urldefense.com/v3/__https://github.com/lbdyck__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!L5Dqohcv6J-vDwDKpMbXIx4OkeblrZc3IHR8_3eHK9706tXYsHt76WNP98HiVBy38nQTBSHI7dZ0MSANE8c$
 

“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 
Pommier, Rex
Sent: Friday, April 29, 2022 12:27 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: General Query --- Any comments on thin clients as 
mainframe consoles.

Because somebody will come back showing the corporate standard that says ALL 
Windows PCs must be kept current with patches and anti-virus software.  Network 
connection or not.  A prior site I worked at had a key card entry system that 
worked just fine but it had an old PC running it on an unsupported OS (windows 
98 I think).  The only thing this PC was attached to was the card readers - via 
dedicated wiring inside the walls of the building.  They had to replace the 
security system because some pinhead decreed that the PC was a security risk 
because it wasn't running antivirus.  No amount of "it's behind a locked door 
behind another locked door and has absolutely no way of getting out to get 
infected" would convince him.  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Friday, April 29, 2022 12:05 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: General Query --- Any comments on thin clients as 
mainframe consoles.

But why worry about doing updates if all you are doing is TN3270 on those 
Windows workstations? Delete all the games, etc. and lock them down.


Lionel B. Dyck <><
Website: 
https://urldefense.com/v3/__https://www.lbdsoftware.com__;!!KjMRP1Ixj6eLE0Fj!qD9sf0tTqsZzajRs7r3P14zpkC9D_mxTEOdivNXUvP_4Aow3DGQ4PJ73hZq8tWkC_GINdUXsiUmLyo9j$
Github: 
https://urldefense.com/v3/__https://github.com/lbdyck__;!!KjMRP1Ixj6eLE0Fj!qD9sf0tTqsZzajRs7r3P14zpkC9D_mxTEOdivNXUvP_4Aow3DGQ4PJ73hZq8tWkC_GINdUXsiayFHRLF$
 

“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 
Thomas Kern
Sent: Friday, April 29, 2022 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: General Query --- Any comments on thin clients as mainframe 
consoles.

We had Windows PCs as consoles for our ICC. All of them were not on the real 
network, so no regular Windows updates. Once a month, we took a long Ethernet 
cable and connected each console PC to the real network and updated Windows and 
then reconnected to the ICC. Not too hard to do.


/Tom Kern

On 4/29/2022 3:28 AM, Brian Westerman wrote:
> There is no real reason that your ICC consoles need to be on the rest of your 
> network.  However, there are people who set it up with a VPN so they can 
> operate consoles from home.
>
> --

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: General Query --- Any comments on thin clients as mainframe consoles.

[Farley, Peter x23353]

Would Chromebooks fit your need?  Inexpensive, not Windows, but not sure if 
they auto-reboot for updates (I don't actually own one).

OTOH tn3270 capabilitiy would be limited to whichever one(s) Chrome supports.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Longfellow
Sent: Wednesday, April 27, 2022 4:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: General Query --- Any comments on thin clients as mainframe consoles.

We are looking at retiring the coax connected consoles and terminals at our 
site.

The obvious answer is an OSA-ICC with ethernet connected tn3270 devices.

Anybody have a glowing recommendation for the replacement device for the 
classic 3270 "green screen"  workstation console?

I am trying to avoid any full blown PC workstation with external internet 
connectivity issues.  I want an 'appliance' that we plug-in,  configure and 
come back in a few years.
These leads me away from windows based solutions because of their constant 
cycle of reboots to install mandatory and recommended maintenance.   And if a 
full function PC is provided, I know that the operators will swap screens and 
miss that one important message that just highlighted on the console.   I have 
some Linux appliances for other purposes that have a 2+ year uptime and don't 
wake me up at night with failures.   I reboot THEM when I get an itch.

My urge is to set up a hub between the OSA-ICC and the workstation devices.   
Air-gapped from the rest of the world.  Again, any other suggestions are 
welcomed.

--

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: Marx Zelden - IPLINFO utility

[Farley, Peter x23353]

Never mind, I just checked the RACF-L archive and that thread started today so 
I haven't seen it in any digest yet.

Based on the OP's initial question and a couple of the other "hide everything" 
responses on RACF-L, I agree with Phil - it would be pointless to discuss 
hiding all the information in low-core and other system-wide accessible control 
blocks at this late stage of OS history.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Tuesday, April 26, 2022 4:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Marx Zelden - IPLINFO utility

I receive the RACF-L digest every day and I see no references to IPLINFO in any 
of the digests for the last week or ten days.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Tuesday, April 26, 2022 3:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Marx Zelden - IPLINFO utility

Oops. Wrong list! RACF not IBM-MAIN.

From: Phil Smith III 
Sent: Tuesday, April 26, 2022 2:39 PM
To: ibm-m...@bama.ua.edu
Subject: Re: Marx Zelden - IPLINFO utility

This is a pointless discussion. Protecting this storage will break myriad 
programs, and adding a subsystem or service to provide controlled access would 
be a huge undertaking, both for IBM to implement and for customers and ISVs to 
use. I would predict that even if IBM did it, people would turn it off so they 
could get work done. (Think early days of Windows UAC-and yes, that got better, 
but with significant investment in/revamp of Windows, plus it's mostly 
transparent to programs. Not the same thing, just similar in that folks just 
turned it off because it was too intrusive.)

Put another way: this is arguably a fundamental design flaw in OS/360. At this 
point, it's not fixable.

...phsiii

P.S. There's gotta be a joke about "Marx" Zelden and universal access to low 
core in there somewhere!
--

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: Marx Zelden - IPLINFO utility

[Farley, Peter x23353]

I receive the RACF-L digest every day and I see no references to IPLINFO in any 
of the digests for the last week or ten days.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Tuesday, April 26, 2022 3:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Marx Zelden - IPLINFO utility

Oops. Wrong list! RACF not IBM-MAIN.

From: Phil Smith III  
Sent: Tuesday, April 26, 2022 2:39 PM
To: ibm-m...@bama.ua.edu
Subject: Re: Marx Zelden - IPLINFO utility

This is a pointless discussion. Protecting this storage will break myriad
programs, and adding a subsystem or service to provide controlled access
would be a huge undertaking, both for IBM to implement and for customers and
ISVs to use. I would predict that even if IBM did it, people would turn it
off so they could get work done. (Think early days of Windows UAC-and yes,
that got better, but with significant investment in/revamp of Windows, plus
it's mostly transparent to programs. Not the same thing, just similar in
that folks just turned it off because it was too intrusive.)

Put another way: this is arguably a fundamental design flaw in OS/360. At
this point, it's not fixable.

...phsiii

P.S. There's gotta be a joke about "Marx" Zelden and universal access to low
core in there somewhere!
--

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: [EXTERNAL] Re: I knew Cobol 6.3 takes more resources to compile than 4.2 but should I be concerned about how much?

[Farley, Peter x23353]

It will be interesting to see what IBM responds to your ticket.  Please share 
if you can when it is closed.

I wonder if using the pre-processor vs the co-processor for the CICS compile 
would affect the total time, if you are able to set up JCL to allow that.  We 
don't use the co-processor here and can't easily set up to use it (peculiar 
SCLM issues) , so I don't know what kind of memory/time factor(s) it adds to 
the compile step.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Monday, April 18, 2022 6:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: I knew Cobol 6.3 takes more resources to compile 
than 4.2 but should I be concerned about how much?

Hi Peter,

I agree that IBM has warned of significantly higher CPU and memory 
requirements, and we've seen increases, but to go from .3 CPU seconds to over 
500 - a 1500 fold increase seems more than a bit excessive to me.  

We're using the CICS coprocessor.  

Rex

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Monday, April 18, 2022 3:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: I knew Cobol 6.3 takes more resources to compile than 
4.2 but should I be concerned about how much?

Memory usage is much higher in the COBOL V5/6.x versions than in any earlier 
version.  IBM tells you this explicitly in all its migration advice that I have 
seen.  In our shop we use the max locally allowed memory per programmer batch 
job (IEFUTL00 limit) for every compile step, 640M.

IBM also explicitly warns about possibly significantly increased CPU usage, but 
I think I remember they did say that was (mainly) for the advanced 
optimization.  If you are using OPT(0) that shouldn't add to CPU vs V4.2.

Are your CICS compiles using the CICS co-processor in the compile step or the 
CICS pre-processor utility?  Ours still use the preprocessor for both CICS and 
for DB2 and for combinations of CICS and DB2.  It's possible that would make a 
difference if you are currently using the co-processor.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Monday, April 18, 2022 4:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: I knew Cobol 6.3 takes more resources to compile than 4.2 but should I 
be concerned about how much?

Hi list,

Should I be concerned about the amount of resources Cobol 6.3 is occasionally 
using as compared to 4.2?  I have one particular example that was brought to 
our attention due to the fact that we ran out of page space in our small shop.  
I finally got it to compile after tripling my page space.  It is a CICS program 
and is only 11270 lines long.  I am compiling with Expediter, but have 
optimization(0) configured so there is no additional compile-time processing 
being done to optimize the load module.   I removed Expediter and still had the 
issues.  Here are my comparisons.  Has anybody else seen this kind of huge 
increase?


Cobol42 without Expediter  TCB .00499 minuteswall clock 2 seconds  paging 0 
  serv  14956
Cobol42 with Expediter   TCB  .0138 minutes   wall clock 2 seconds   paging 0   
serv 39158
Cobol63 without Expediter  TCB  8.665 minutes   wall clock 31 minutes  paging 
3185K   serv  23,371,699
Cobol63 with Expediter  TCB  8.519 minutes  wall clock 23 minutes  paging 4522K 
  serv  22,980,890

I will be opening a ticket with IBM but was wondering if anybody else has seen 
this kind of spike.  I have only seen this on one program and I have had my 
developers compile hundreds of programs.  I've seen CPU and wall clock time 
increases but nothing like this.  Obviously wall clock time is so variable due 
to other tasks running, I just included it to show the drastic increase.  2 
seconds to 23-31 minutes is insane.

Thanks,

Rex

--

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: I knew Cobol 6.3 takes more resources to compile than 4.2 but should I be concerned about how much?

[Farley, Peter x23353]

Memory usage is much higher in the COBOL V5/6.x versions than in any earlier 
version.  IBM tells you this explicitly in all its migration advice that I have 
seen.  In our shop we use the max locally allowed memory per programmer batch 
job (IEFUTL00 limit) for every compile step, 640M.

IBM also explicitly warns about possibly significantly increased CPU usage, but 
I think I remember they did say that was (mainly) for the advanced 
optimization.  If you are using OPT(0) that shouldn't add to CPU vs V4.2.

Are your CICS compiles using the CICS co-processor in the compile step or the 
CICS pre-processor utility?  Ours still use the preprocessor for both CICS and 
for DB2 and for combinations of CICS and DB2.  It's possible that would make a 
difference if you are currently using the co-processor.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Pommier, Rex
Sent: Monday, April 18, 2022 4:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: I knew Cobol 6.3 takes more resources to compile than 4.2 but should I 
be concerned about how much?

Hi list,

Should I be concerned about the amount of resources Cobol 6.3 is occasionally 
using as compared to 4.2?  I have one particular example that was brought to 
our attention due to the fact that we ran out of page space in our small shop.  
I finally got it to compile after tripling my page space.  It is a CICS program 
and is only 11270 lines long.  I am compiling with Expediter, but have 
optimization(0) configured so there is no additional compile-time processing 
being done to optimize the load module.   I removed Expediter and still had the 
issues.  Here are my comparisons.  Has anybody else seen this kind of huge 
increase?


Cobol42 without Expediter  TCB .00499 minuteswall clock 2 seconds  paging 0 
  serv  14956
Cobol42 with Expediter   TCB  .0138 minutes   wall clock 2 seconds   paging 0   
serv 39158
Cobol63 without Expediter  TCB  8.665 minutes   wall clock 31 minutes  paging 
3185K   serv  23,371,699
Cobol63 with Expediter  TCB  8.519 minutes  wall clock 23 minutes  paging 4522K 
  serv  22,980,890

I will be opening a ticket with IBM but was wondering if anybody else has seen 
this kind of spike.  I have only seen this on one program and I have had my 
developers compile hundreds of programs.  I've seen CPU and wall clock time 
increases but nothing like this.  Obviously wall clock time is so variable due 
to other tasks running, I just included it to show the drastic increase.  2 
seconds to 23-31 minutes is insane.

Thanks,

Rex

--

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: "The Computers Nobody Wanted"

[Farley, Peter x23353]

Umm -- Have you heard of CGI?  Or Noam Chomsky?  Back in the days discussed by 
Phil CGI as such did not yet exist of course (the hardware was much too 
primitive), but I don't think anyone can deny that computers provide serious 
tools for art of many kinds, both linguistic and visual.

Chomsky's linguistic concepts were seminal for many computer-based language 
tools of today.  Automated concordances are the least of them.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
Bridges
Sent: Friday, April 15, 2022 7:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: "The Computers Nobody Wanted"

Speaking as a computer geek with no talent whatever for the visual arts, I'm 
curious:  Why in the world would artsy folks back then (or even now) want a 
Computing Office?  What did he do with it?

And yes to Beowulf!  I read it as a child and adored it; I still have vivid 
mental images of monsters in deep water-filled pits in a swamp, and of dragon's 
acid hissing on one's skin.  Ghoulish creatures, little boys are.

---

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Phil Smith III
Sent: Friday, April 15, 2022 15:37

Yes to the editing!

The Xerox I learned PL/C on was a Xerox 530, a midrange that my dad bought for 
the nascent Arts Computing Office at University of Waterloo, which he was 
creating to bring computing to the Arts faculty. At the time, UofW had a 360/75 
and a /44, but those were in the Math building and inaccessible to Artsies.

He had started in computing in the 50s working on machine translation for The 
Government (read: CIA), a failed project that led into another failed project 
to do the same thing at IBM Yorktown in the 60s. At CIA, he was the linguist, 
and would tell a programmer what he wanted a program to do; the programmer 
would write it out on autocoder sheets, give it to a keypunch operator, and a 
day later he'd find out that it didn't work. He figured out that if he could 
learn to write the programs, it'd be faster and easier, so he did.

That led into creating concordances, first of Beowulf (there's a throwaway line 
in Annie Hall, "Just don't take anything where they make you read Beowulf", 
which my family finds inordinately humorous, since we lived with that book for 
*years* during this project) and then of various other things, including Freud 
and Virginia Wolff.

--

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