Re: Ubiquitous ZOS Tape Utility?

[Mike Schwab]

Also, if using SSD in a raid array, you probably won't get a warning
of impending failure, and you usually have devices with very similar
lifetime of write and write history.  Which can lead to the entire
raid group going at once.
https://www.reddit.com/r/homelab/comments/17h1xgh/how_do_you_mitigate_the_risk_of_simultaneous/

On Tue, Sep 17, 2024 at 3:13 PM Radoslaw Skorupka
<0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:
>
> W dniu 17.09.2024 o 18:04, Steve Estle pisze:
> > A healthy tape would be defiined as a tape where you can successfully read 
> > the tape label and all written blocks on the tape volser without error (I/O 
> > error, equipment check, etc).
>
> Well, it is not so simple.
> 1. Media. Healthy tape media is no longer important for majority of
> installations, because nowadays we have VTS (any vendor) and last
> physical tape (TS1140) is really old, no longer supported, etc. However
> yes, healthy physical tape media means the tape can be read. From
> beginning to end of volume.
> 2. Healthy tape format. Yes, tapes have format. Labels, etc. Healthy
> tape means existing labels and consistence between labels and between
> labels and datasets (i.e. number of blocks).
> 3. Healthy virtual tape "media". Actually the tape volume is a file. The
> file is usually OK, however one can imagine broken format, i.e.
> accidentally overwritten fileds or other logical errors. Very unlikely
> IMHO, however some malware on VTS or just errors in microcode could do
> this.
> 4. Healthy physical media in VTS. Usually a VTS cache is RAID-protected
> disk array, so the problems seems to be unlikely. Of course some VTSes
> can offload virtual tape volumes on real tape - in that case the tape
> can be duplicated or not. However such error could mean lost of volume
> at all.
>
> My €0.02
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ISPF/PDF list/log file allocations

[Mike Schwab]

Log filling up?  Allocate a larger amount of space.
Review the disposition, if it is cataloged you can wrap around the
letters and numbers fairly fast and cant log on due to a duplicate
dataset name.  Rename or delete.

On Mon, Sep 16, 2024 at 5:26 PM Albertus de Wet
<062595278496-dmarc-requ...@listserv.ua.edu> wrote:
>
> PS. It's a COBOL programmer whos LOG dataset is filling up. I do not know
> what they are doing (sometimes I wonder if they do)
>
> On Mon, Sep 16, 2024, 16:24 Albertus de Wet  wrote:
>
> > Thanks.
> > I did look at the physical dataset allocation, therefore the pri, sec
> > space allocations.
> >
> > I will look there - thanks.
> >
> > On Mon, Sep 16, 2024, 15:00 Schmitt, Michael 
> > wrote:
> >
> >> It is in the System Profile (ISPSPROF) settings, Log and List Defaults. I
> >> think the IBM defaults are:
> >>
> >> LOG_PAGES_PRIMARY_QUANTITY   = 10
> >> LOG_PAGES_SECONDARY_QUANTITY = 10
> >>
> >> But what you said is odd...
> >>
> >> - The quantity is in "pages", not tracks.
> >> - Not a lot gets logged to the log. It is basically TSO commands entered
> >> by the user, or via menus. I'm a heavy ISPF user with a LOT of custom menus
> >> and applications and I never run out of log space.
> >> - The LIST file isn't written to AT ALL unless a user does a command that
> >> uses the LIST and directs the output to it
> >>
> >> So I'm wondering what is going on at your site that would fill up the log
> >> or list data set.
> >>
> >>
> >> -Original Message-
> >> From: IBM Mainframe Discussion List  On Behalf
> >> Of Bert de Wet
> >> Sent: Monday, September 16, 2024 3:37 PM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: ISPF/PDF list/log file allocations
> >>
> >> [Some people who received this message don't often get email from
> >> 062595278496-dmarc-requ...@listserv.ua.edu. Learn why this is
> >> important at https://aka.ms/LearnAboutSenderIdentification ]
> >>
> >> Where can the settings for ISPF-LOG and -LIST files be changed?
> >> The default we have is pri: 150trks, sec.10trks. Some of our users are
> >> running out of space (E37 abends).
> >>
> >> Thanks
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >>
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Is z/OS FTP encrypted?

[Mike Schwab]

Shared volume?  Terse, xmit, receive, unterse would be an alternate
path.  ADDRSU or other backup to (V)Tape and restore?

On Mon, Sep 16, 2024 at 1:50 PM Bob Bridges
<0587168ababf-dmarc-requ...@listserv.ua.edu> wrote:
>
> Newbie question:  I've just started work for a new client, and they 
> (understandably) don't care for me using Win FTP to load up my REXX tools 
> because it's not encrypted; the REXX execs aren't secret, but my ID and 
> password should be.
>
> But once I've laboriously gotten a bunch of things uploaded using IND$FILE, 
> what about moving them from one complex to another?  Is FTP encrypted once 
> I'm talking between two mainframes?
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* ...in February, United States coalition-building efforts are dealt a 
> severe blow when France announces that it will not participate in the 
> impending Iraq invasion, a decision that, in the words of Defense Secretary 
> Donald Rumsfeld, "could seriously impair our ability to surrender".  -Dave 
> Barry’s 2003 Year in Review */
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Ubiquitous ZOS Tape Utility?

[Mike Schwab]

IEBPTPCH first x record(s) of each file to print or dummy, start with
oldest unread tape?

On Mon, Sep 16, 2024 at 11:37 AM Steve Beaver
<050e0c375a14-dmarc-requ...@listserv.ua.edu> wrote:
>
> I was not aware VT tapes degraded like RT tapes
>
>
> Sent from my iPhone
>
> No one said I could type with one thumb
>
> > On Sep 16, 2024, at 11:27, Michael Oujesky  wrote:
> >
> > Define "health of tapes".
> >
> > Michael
> >
> > At 08:43 AM 9/16/2024, Steve Estle wrote:
> >
> >> Hello Community,
> >>
> >> We are having some issues with our VTS tape migration (I'm sparing vendor 
> >> to protect the innocent) that necessitates us going and manually reading 
> >> some tape numbers in question.  I am looking for some ubiquitous tape 
> >> utility that might be out there that can help validate the health of 
> >> tapes?  Ditto comes to mind but appears this might have been sunset - not 
> >> sure?   Any others that come to mind from folks (maybe CBT related)?
> >>
> >> Any suggestions / advice is appreciated.
> >>
> >> Thanks,
> >> Steve Estle
> >> sest...@gmail.com
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: PCOMM 15 UID

[Mike Schwab]

There have been bugs reported with 2 products having the same UUID.

https://community.veeam.com/blogs-and-podcasts-57/detecting-and-exporting-duplicate-bios-uuids-on-windows-computers-with-powershell-4523

On Sat, Sep 14, 2024 at 10:04 AM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 14 Sep 2024 16:30:21 +0200, Radoslaw Skorupka wrote:
>
> >I noticed that PCOMM v15 add UID= statement to the session.WS files.
> >The value is long hex number, I guess it is random.
> >
> >Q: what is the meaning of the UID?
> >
> >Q2: is there any PCOMM forum or group?
> >
> UID?  UUID?
> 
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Congratulations IBM!

[Mike Schwab]

Sure it isn't a lot of stock buybacks, authorized by Reagan ?

On Thu, Sep 12, 2024 at 1:27 PM Dave Beagle
<0525eaef6620-dmarc-requ...@listserv.ua.edu> wrote:
>
> Congratulations to IBM & the excellent management team. IBM stock hits a new 
> high today! I guess the demise of the mainframe in 1993 was greatly 
> exaggerated.
>
>
>
> Dave B.
>
> إسرائيل قتلت 40 ألف فلسطيني بريء
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: RMODE 64

[Mike Schwab]

z/OS 3.1 Limitations:  31 bit address.
https://www.ibm.com/docs/en/zos/3.1.0?topic=subcommands-test-command

On Tue, Sep 10, 2024 at 7:28 PM Joseph Reichman
<05812645a43c-dmarc-requ...@listserv.ua.edu> wrote:
>
> I am running this code under TEST I make a break point at the BASR
>
> I know I have a 64 address in r15
>
> (I used a test subcommand from the CBT system LG which displays the entire
> register)
>
> Its 0050_
>
> I make a break at the BASR instruction and right after It abends
>
> Seems its not picking bits 0 - 31 of r15 even though I am in 64 bit mode
>
>
> READY
>
> TESTAUTH 'JOER.TEST.AUTHLIB(TESTPRGH)'
>
>  TESTAUTH
>
> Q TESTPRGH.TESTPRGH.+0
>
>  TESTAUTH
>
> AT +58
>
>  TESTAUTH
>
> AT +54 (LG 0)
>
>  TESTAUTH
>
> GO
>
>  IKJ57024I AT +54
>
>   0R  0050_
>
>  TESTAUTH
>
> TESTAUTH
>
>  TESTAUTH
>
>  TESTAUTH
> AT +58
>  TESTAUTH
> AT +54
>  TESTAUTH
> AT +C0 TITLE ('RECOVERY')
>  TESTAUTH
> GO
>  IKJ57024I AT +58
>  TESTAUTH
> GO
>  IKJ57024I AT RECOVERY
>  TESTAUTH
>
>
>
>
> C0 0700 110 RECOVERY DCX'0700'
>
> 111 INDGX CAMLST NAME,APAY,,LOCAREA
>
> C4  112+INDGXDS0F
>
> C4 44   113+ DCAL1(68)
>
> C5 00   114+ DCAL1(0)
>
> C6 00   115+ DCAL1(0)
>
> C7 00   116+ DCAL1(0)
>
> C8 00D4 117+ DCA(APAY)
>
> CC  118+ DCA(0)
>
> D0 0100 119+ DCA(LOCAREA)
>
>
>
>
>
>
>
>
>
>  47  LOAD  EP=TESTPRGE
>
> 3C   49+ CNOP  0,4
>
> 3C 4DF0 30480004850+ BAS   15,LOAD2_0005
> BRANCH
> 40   51+LD2_0005DS 0H
>
> 40 E3C5E2E3D7D9C7C5  52+LE2_0005DC CL8'TESTPRGE'
> ENTRY
> 48   53+LOAD2_0005DS 0H
>
> 48 4100 F000054+ LA
> 0,LE2_0005-LD2_0005(,15)
> 4C 1B11  55+ SR1,1
> SHOW N
> 4E 0A08  56+ SVC   8
>
> 50 5400 3AD000AD057  N R0,=X'FFFE'
>
>
>
>   Active Usings: TESTPRGH,R3
>
>   Loc  Object CodeAddr1 Addr2  Stmt   Source Statement
>
> 54 B904 00F0 58  LGR   R15,R0
>
>
>
>
>  TESTPRGH CSECT
>  TESTPRGH AMODE 31
>  TESTPRGH RMODE 31
>   YREGS
>   STM   R14,R12,12(R13)
>   LLGTR R3,R15ESTABLISH ADDRESSABILITY
>   USING TESTPRGH,R3
>   LRR10,R13
>   LAR13,SAVEAREA
>   STR10,SAVEAREA+4
>   ESTAE RECOVERY
>   SAM64
>   LOAD  EP=TESTPRGE
>   N R0,=X'FFFE'
>   LGR   R15,R0
>   BASR  R14,R15
>
>
> T
> This is my 64 bit code
>
>
>  TESTPRGE CSECT
>  TESTPRGE AMODE 64
>  TESTPRGE RMODE 64
>   YREGS
>  XLNK EQU   14
>   STMG  R14,R12,8(R13)
>  *LGR   R11,R0 ESTABLISH ADDRESSABILITY
>   LGR   R11,R5 ESTABLISH ADDRESSABILITY
>   USING TESTPRGE,R11
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Binyamin Dissen
> Sent: Tuesday, September 10, 2024 1:18 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: RMODE 64
>
> Show the code that established your recovery routine.
>
> On Mon, 9 Sep 2024 20:12:25 -0400 Joseph Reichman
> <05812645a43c-dmarc-requ...@listserv.ua.edu
>  > wrote:
>
> :>Just want to corroborate something
>
> :>I had a program that I linked RMODE64
>
> :>I load it see an ADDRESS of 50_0001
>
> :>I do a sam64
>
> :>I load that address into R15
>
> :>Do BASR R14,R15 and get a S0C1 seems bits 0 - 31 which have a 0050 are
> :>not being recognized in my recovery routine I don't have SDWAXEME which is
> :>the 64 bit SDWA both bit 31 and 32 in the psw are one indicating amode 64
>
> :>I have gotten the program to run in rmode 64 with synch macro but this
> :>should work as well
>
> --
> Binyamin Dissen   > http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu   with the
> message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do 

Re: 24-bit private region on z16 processor

[Mike Schwab]

Varies by operating system level occasionally PTF, and user
configuration such as TSO in (non-)LPA area.

On Mon, Sep 9, 2024 at 8:25 AM Mark Jacobs
<0224d287a4b1-dmarc-requ...@listserv.ua.edu> wrote:
>
> Silly question. Is there anything different as it relates to sizing of the 
> 24-bit private region on z16 processors?
>
> Mark Jacobs
>
> Sent from [ProtonMail](https://protonmail.com), Swiss-based encrypted email.
>
> GPG Public Key - 
> https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Huawei storage mainframe

[Mike Schwab]

I found a mainframe modernization in cloud product.
https://www.huaweicloud.com/intl/en-us/about/info/2024/202406060001.html

On Thu, Sep 5, 2024 at 6:53 AM Radoslaw Skorupka
<0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:
>
> Does such storage device exist?
> I have never heard about it.
>
> Can you provide any link to this product?
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
> W dniu 05.09.2024 o 11:14, Peter pisze:
> > Hello
> >
> > Is there anyone who is using Huawei storage device for mainframe?
> > Just trying to get some feedback about Huawei storage for mainframe.
> >
> > Peter
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: POSTing a WAIT in another Address Space; POST ASCB= parameter; S602 Abend

[Mike Schwab]

How about RUCSA (or CSA)?  Common memory addressable by all address
spaces but only used by affected address spaces.
https://www.ibm.com/docs/en/zos/2.4.0?topic=overview-virtual-storage-address-space-esa-extensions

On Wed, Sep 4, 2024 at 2:48 PM Rob Scott
<0618c90e6fdf-dmarc-requ...@listserv.ua.edu> wrote:
>
> Alternatives to WAIT/POST include PAUSE/RELEASE and maybe when the waiter is 
> a server or resource-owning ASID using PC-ss to add the request to "resume" 
> to a server resident queue to be processed H=P=S by a queue-handler subtask.
>
> Rob Scott
> Rocket Software
>
> Get Outlook for Android
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Charles Mills 
> Sent: Wednesday, September 4, 2024 7:17:43 PM
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: POSTing a WAIT in another Address Space; POST ASCB= parameter; 
> S602 Abend
>
> EXTERNAL EMAIL
>
>
>
>
>
> Staying out of trouble with X-memory post is a tough assignment. Sad voice of 
> experience here: I am looking at a six-year-ago reprimand from IBM support 
> for making a mess in an LPAR with the x-memory post code in a vendor product 
> I wrote.
>
> Use IEAMSXMP! (Unless support for z/OS < V2R2 is necessary.)
>
> I would post code here but without a lot of context I don't think my IEAMSXMP 
> is very clear.
>
> If performance is important, consider bypassing the POST when possible with 
> CS. Here's how you do that:
>
>  L R0,AV_QECB  Get contents of ECB
> *
> PostTryAgain EQU *
> *  If post bit is already on then no need to post again
> *  If wait bit is on then have to actually POST to release task
>  TMLH  R0,X'C000'  Is it waiting or already posted?
>  JNZ   IsWaitingOrPosted Yes
>  LLILF R1,X'4000'  Post bit and post code
>  CSR0,R1,AV_QECB   Compare and swap to post ECB
>  JNZ   PostTryAgain  Failed, try again
>  J CountPOSTs  Worked, account just like did a POST
> *
> IsWaitingOrPosted EQU *Wait or Posted bit is on
>  TMLH  R0,X'8000'  Is anyone waiting?
> *No, then (a.) no need to POST; and
>  JZ   AlreadyPosted  (b.) Post bit must already be on
> *
> *  Wait bit is on so need to do a real POST
> and here is where your IEAMSXMP would go
>
> Hope this helps.
> Charles
>
>
> On Wed, 4 Sep 2024 17:37:21 +, Richard Zierdt 
>  wrote:
>
> >Thanks, Rob, Tom.  Yes, Key 0 is dangerous, but documented as a requirement 
> >(for LINKAGE=BRANCH anyway).
> >I was unaware of IEAMSXMP (and TCBTOKEN, which extracts the target program's 
> >TTOKEN).
> >So I'm coding for those now.
> >BTW, the standard from of POST supports register notation and RX-type.  Rx 
> >does a LA - ST into the POST's parameter list, which means it's the address 
> >of the ASCB, not the ASCB itself.  I'll try L  Rx,ASCB  and  POST . . . 
> >ASCB=(Rx) and test that.
> >Nonetheless, avoiding Key 0 is better.   I'll reply later with results.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> 
> Rocket Software, Inc. and subsidiaries ? 77 Fourth Avenue, Waltham MA 02451 ? 
> Main Office Toll Free Number: +1 855.577.4323
> Contact Customer Support: 
> https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
> Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
> http://www.rocketsoftware.com/manage-your-email-preferences
> Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy
> 
>
> This communication and any attachments may contain confidential information 
> of Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
> prohibited. If you are not the intended recipient, please notify Rocket 
> Software immediately and destroy all copies of this communication. Thank you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Storage Solution selection Criteria

[Mike Schwab]

Information needed to select equipment.
Processor, storage devices name, model, and capacity, FICON cards,
switches for each site, distance of each site from other sites,
network capacity between sites.

On Wed, Sep 4, 2024 at 3:52 AM Peter
<05e4a8a0a03d-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hello,
>
> I Must confess that I am not a Storage expert.  In our organization we are
> working on procuring a new storage box solution. I have been asked to
> study and give an opinion on which solution would be perfect for our
> mainframe environment.
>
> Could someone give me your advise based on your experience. When selecting
> a new storage solution what are the important points that needs to be
> looked into the vendors proposal ?
>
> Peter
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: SHELLSCR installation - Liberty sos

[Mike Schwab]

Prerequisites should handle it.

On Mon, Sep 2, 2024 at 8:09 AM Seymour J Metz  wrote:
>
> Are there appropriate holds?
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
>
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Brian Westerman <06ba4ed225c9-dmarc-requ...@listserv.ua.edu>
> Sent: Monday, September 2, 2024 1:17 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SHELLSCR installation - Liberty sos
>
> This si probably covered in the PTF, but the SHELLSCR ones sometimes have to 
> be applied one at a time in the order that they require.
>
> You can search the problem records and it will tell you about it.  It's dumb, 
> but required sometimes.
>
> Brian
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Non-reentrant program not allowed (where?); Advantages of reentrant programs?

[Mike Schwab]

For a perfect solution, you need a minimum of 256 bytes of constants
or add non-modified filler to reach the 256 byte amount?
Is there a technique to achieve this?
BR R14
ORG *+256
ORG *-256
LTORG
name DS  (unmodified)
ORG , * to address after 256 bytes unmodified storage

On Sat, Aug 24, 2024 at 2:03 PM Binyamin Dissen
<0662573e2c3a-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 24 Aug 2024 01:52:46 -0500 Brian Westerman
> <06ba4ed225c9-dmarc-requ...@listserv.ua.edu> wrote:
>
> :>As for execution speed, there is no real difference, once the program 
> starts, code is code.
>
> If the working storage is proximate to the code there will be a performance
> cost as data and code use different cache lines. So a change to data near code
> will require the cache line to be written to storage and read back into the
> code cache.
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Stubborn Flashcopy Relationship

[Mike Schwab]

CG means Copy Group, right?
Does the volume need to be removed from the copy group definition?

On Sat, Aug 24, 2024 at 11:43 AM Ed Jaffe
<05acc3c79bf7-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hello Storage Gurus!
>
> We're trying to get rid of an incremental Flashcopy relationship. We
> first query the device:
>
> FCQUERY DEVN(7080) SHOWRELS(ALL)
> ANTF0421I FCQUERY Relationship 2
> DEVN SSID LSS CCA  CU SERIAL   ACTMAX XC PC CC RV SE  SEQNUM
> 7080 7000  00  80 2107 000KCD91  1  65534  N  P  N  N NN 
> RELATIONSHIP DETAIL STARTING TRACK: 
> DEVICE LONG BUSY FOR CG: NO  WRITE INHIBITED: NO
> DEVICE IN SAFEGUARDED COPY RELATIONSHIP: NO
> ---
>PARTNERSOURCE   TARGET   S F C C P C T S F P R S R W
> LSS CCA SSID STARTSTARTO V O A R R W E S M A G R P
> --- ---    - - - - - - - - - - - - - -
>   04  80 7400   Y Y Y N Y 2 Y N N N N N N N
>   NO. OF TRACKS: 0006E0CD  TRACKS TO COPY: 
>   ESTABL: 2024/05/07 07:18:32  LAST INCR:  2024/05/11 07:19:02
> ANTF0001I FCQUERY COMMAND COMPLETED FOR DEVICE 7080, COMPLETION CODE: 00
>
> And then attempt to remove the relationship. Apparently, all is well:
>
> FCWITHDR SDEVN(7080) DDSW(YES)
> ANTF0001I FCWITHDR COMMAND COMPLETED FOR DEVICE 7080, COMPLETION CODE: 00
>
> But the relationship is still there!!!
>
> FCQUERY DEVN(7080) SHOWRELS(ALL)
> ANTF0421I FCQUERY Relationship 2
> DEVN SSID LSS CCA  CU SERIAL   ACTMAX XC PC CC RV SE  SEQNUM
> 7080 7000  00  80 2107 000KCD91  1  65534  N  P  N  N NN 
> RELATIONSHIP DETAIL STARTING TRACK: 
> DEVICE LONG BUSY FOR CG: NO  WRITE INHIBITED: NO
> DEVICE IN SAFEGUARDED COPY RELATIONSHIP: NO
> ---
>PARTNERSOURCE   TARGET   S F C C P C T S F P R S R W
> LSS CCA SSID STARTSTARTO V O A R R W E S M A G R P
> --- ---    - - - - - - - - - - - - - -
>   04  80 7400   Y Y Y N Y 2 Y N N N N N N N
>   NO. OF TRACKS: 0006E0CD  TRACKS TO COPY: 
>   ESTABL: 2024/05/07 07:18:32  LAST INCR:  2024/05/11 07:19:02
> ANTF0001I FCQUERY COMMAND COMPLETED FOR DEVICE 7080, COMPLETION CODE: 00
>
> This volume is part of a global mirror relationship with our DR site. Is
> it possible that interferes with this function?
>
> Thanks in advance,
>
> --
> Phoenix Software International
> Edward E. Jaffe
> 831 Parkview Drive North
> El Segundo, CA 90245
> https://www.phoenixsoftware.com/
>
>
> 
> This e-mail message, including any attachments, appended messages and the
> information contained therein, is for the sole use of the intended
> recipient(s). If you are not an intended recipient or have otherwise
> received this email message in error, any use, dissemination, distribution,
> review, storage or copying of this e-mail message and the information
> contained therein is strictly prohibited. If you are not an intended
> recipient, please contact the sender by reply e-mail and destroy all copies
> of this email message and do not otherwise utilize or retain this email
> message or any or all of the information contained therein. Although this
> email message and any attachments or appended messages are believed to be
> free of any virus or other defect that might affect any computer system into
> which it is received and opened, it is the responsibility of the recipient
> to ensure that it is virus free and no responsibility is accepted by the
> sender for any loss or damage arising in any way from its opening or use.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: HSM question

[Mike Schwab]

There is usually a delay of a few days to allow undeleted of the tape
volumes.  Best to set an retention period so they expire after so many
days / after n versions are created.

‪On Thu, Aug 22, 2024 at 12:03 AM ‫גדי בן אבי‬‎
 wrote:‬
>
> Hi,
> We use HSM to backup datasets to virtual tape on a TS7770.
>
> We are getting close the TS7770's capacity and want to reduce the capacity 
> used by HSM.
>
> The current strategy is to find backups we no longer want/need, delete the 
> from HSM, and then use RECYCLE command to merge the tapes that are not full.
>
> After we've done that, the used capacity that the TS7770 reports is not 
> reduced.
>
> My theory is that HSM does not release the tapes (and cache space they take 
> up) when they are empty.
>
> Is this correct?
>
> Is there a way to tell HSM to release empty tapes to the general SCRATCH pool?
>
> Gadi
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Improving OMVS performance using WLM ?

[Mike Schwab]

https://www.ibm.com/support/pages/how-do-i-tune-my-zos-unix-maxprocsys-maxprocuser-and-procusermax-settings

On Tue, Aug 20, 2024 at 4:25 PM Lionel B. Dyck
<057b0ee5a853-dmarc-requ...@listserv.ua.edu> wrote:
>
> Are there any studies, white papers, redbooks, presentations, articles, or
> ... that address how to use WLM to effectively improve the performance of
> long running shell scripts invoked via (a) TSO OMVS, (b) Batch job, or (c)
> ssh? With the script spawning several address spaces this can be a
> challenge.
>
> Thanks for any pointers.
>
>
> Lionel B. Dyck <><
> Github: https://github.com/lbdyck
> System Z Enthusiasts Discord: https://discord.gg/sze
>
> “Worry more about your character than your reputation. Character is what you
> are, reputation merely what others think you are.”   - - - John Wooden
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: getting HOLDDATE report after apply

[Mike Schwab]

???Retrieve the updated Holddata and look in the last several months
for the prefixes you have???

https://www.ibm.com/support/pages/enhanced-holddata-zos

On Sat, Aug 17, 2024 at 4:11 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 17 Aug 2024 15:04:21 -0500, Bill Giannelli wrote:
>
> >The syntax requires a select specified and I have some 1400 sysmods..
> >
> How about?:
> 
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: 3270 programming

[Mike Schwab]

https://www.ibm.com/docs/en/zos-basic-skills?topic=terminal-3270-data-stream
Specifically listed but no link,

On Thu, Aug 15, 2024 at 7:45 PM Tom Brennan  wrote:
>
> I don't think TN3270/TN3270E protocols are related to this manual.
> They're basically just a layer used to pass the binary 3270 data stream
> back and forth.
>
> But Lennie has a good point.  I have a printed copy -05 from 1990 and
> it's pretty beat up.  I seem to remember it on an IBM doc site until
> (guessing) 2005 or so, then it was suddenly gone.  Maybe someone made a
> mistake in removing it, because it's certainly required for anybody who
> wants to code their own 3720 screens, or simply wants to know how things
> work.
>
> On 8/15/2024 5:33 PM, Ken Bloom wrote:
> > 3270 is supported via tn3270 and tn3270E.   That’s the protocol supported 
> > by IBM OSA or Visara CCA3074 etc.   You can probably find some old coax 
> > manuals for native 3270.
> >
> > Ken
> >
> >
> > Kenneth A. Bloom
> > CEO
> > Avenir Technologies Inc
> > /d/b/a Visara International
> > 203-984-2235
> > bl...@visara.com<mailto:bl...@visara.com>
> > www.visara.com<http://www.visara.com/>
> >
> >
> > On Aug 15, 2024, at 8:22 PM, Lennie Bradshaw  
> > wrote:
> >
> > So if the protocol is still supported, and still used, and still a valid 
> > programming interface, why is there no *current* manual available from IBM 
> > documenting it?
> >
> > Lennie
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf Of 
> > Jay Maynard
> > Sent: 15 August 2024 23:02
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: 3270 programming
> >
> > I think IBM still supports 3270 access, if not the 3270s themselves.
> >
> > But if the data stream hasn't changed since the -7 manual was published, 
> > there's no need for an update...
> >
> > On Thu, Aug 15, 2024 at 4:54 PM Paul Gilmartin < 
> > 042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > On Thu, 15 Aug 2024 15:16:15 -0500, Mike Schwab  wrote:
> >
> > There have been no updates.
> >
> > Does IBM continue to support the device?  If not, there's little
> > business case to provide user's manuals.
> >
> > Regardless, some documentation is necessary as long as IBM products
> > depend on 3270 data streams.
> >
> > --
> > gil
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> >
> >
> > --
> > Jay Maynard
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send email 
> > to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: 3270 programming

[Mike Schwab]

There have been no updates.

On Thu, Aug 15, 2024 at 2:30 PM Lennie Bradshaw
 wrote:
>
> Many thanks for that David. That would be useful.
> Also thanks to Alexander for bitsavers reference.
>
> But does IBM no longer publish the 3270 interface material?
>
> Lennie
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> David Cole
> Sent: 15 August 2024 20:26
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: 3270 programming
>
> I have a -07 of that manual. I'll send it to you privately.
>
>
> At 03:54 PM 8/15/2024 +, Alexander Huemer wrote:
> >On Thu, Aug 15, 2024 at 03:49:34PM +, Lennie Bradshaw wrote:
> >> Years back there used to be a manual which described how to program
> >> to
> >the 3270 standards. It contained the values and definitions of fields
> >such as,
> >> Start Field,
> >> Attribute byte,
> >> Write control character,
> >>and so on.
> >> I think this was called something like "IBM 3270 Component reference".
> >> Do IBM still publish the interface to 3270 formatting? If so where?
> >
> >https://bitsavers.org/pdf/ibm/3270/GA23-0059-4_3270_Data_Stream_Program
> >m
> >ers_Reference_Dec88.pdf
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions, send
> >email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: trying to determine cause of LASTACK State

[Mike Schwab]

10,* is your Wide Area Network within your business router.  Similar
to 192,168.* within a smaller router

https://en.wikipedia.org/wiki/Private_network

On Mon, Aug 12, 2024 at 12:50 PM Lizette Koehler
 wrote:
>
>
>
> List
>
>
>
> I have a condition where if I do  TSO NETSTAT (PORT 23   -  Yep Mainframe
>
>
>
> I am seeing lots of IP Addresses in STATE LASTACK
>
>
>
> This cause me to do a lot of TCPIP DROP commands to clear it out
>
>
>
>
>
> I have had to build Several Automation functions to drop them hourly.  I
> have had to build an ISPF MACRO to filter the NETSTAT output for Summaries.
>
>
>
> Most of the IPs are 10. IPs.
>
>
>
>
>
> Anyone run into this issue?  Any suggestions of what to look for?
>
>
>
> Thank
>
>
>
> Lizette
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: How to "touch" mainframe files

[Mike Schwab]

Future?  I don't think so.  How about an IDCAMS or TSOBATCH print
COUNT(1) so you won't have to create any JCL.  And z/OS doesn't read
the whole file, so size will have little impact, just the files not
big enough to fill the buffers will be a little faster..

On Fri, Aug 2, 2024 at 10:06 AM Billy Ashton
<0665bda14df5-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi friends! Here's another in the series of "Friday Foibles!" (Why these
> questions always come up on Fridays is beyond me!)
>
> We have a need to run a job that will perform a process like the Unix
> touch command, so that the last access date of a file is updated.
>
> We don't want to do things like allocate, open, and print one record, as
> some of these files are huge (25-50GB). The list of files is somewhat
> dynamic, and may change week to week.
>
> Does anyone have a job that will update the last access date for a list
> of files, and ideally, set the last access date into the future a week
> or two, to ensure that the files will not get archived (since I am not
> sure we could easily recall some of them again)?
>
> Thank you and best regards,
> Billy Ashton
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Does MVCDK move 'per byte' like MVC?

[Mike Schwab]

How about
MVC DEST,=8C' '
MVC DEST+8, DEST (for LDEST-8)
Honors doubleword boundary yet reduces literal size to doubleword?

On Mon, Jul 29, 2024, 04:01 Erik Janssen <
062c999269e8-dmarc-requ...@listserv.ua.edu> wrote:

> On Sat, 27 Jul 2024 11:56:44 +, Peter Relson 
> wrote:
>
> >An alternative (no comment on relative performance) for this case since
> you know the intended data is:
> >SPKA  user-key
> >MVI   first-byte
> >MVC   overlapping
> >SPKA  your-key
> >
>
> Thank you, that works, although I did decide to just add a 255 byte field
> with spaces to the code and move that with MVCDK.
> Again, thank you to all that responded.
>
> Kind regards,
>
> Erik Janssen.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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

Re: Does MVCDK move 'per byte' like MVC?

[Mike Schwab]

It is 2 cycles to move 8 bytes, with extra cycle to start and finish..
source 567,01234 destination 34567,012 so
567 to 345, 01 to 67, 234 to 012.

If both are 01234567 then 1 cycle for every 8 bytes.

On Fri, Jul 26, 2024 at 5:24 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Fri, 26 Jul 2024 17:01:35 -0500, Mike Schwab wrote:
>
> >Sorry, it appears to operate between doubleword (multiple of 8 byte)
> >boundary to other processors, page 301 on
> >https://www.ibm.com/docs/en/SSQ2R2_15.0.0/com.ibm.tpf.toolkit.hlasm.doc/dz9zr006.pdf
> >
> I'm trying to visualize.  Either source or destination may span a page
> boundary, so up to 4 pages may be involved, possibly with different
> protection keys.
>
> So in the overlap case, all bytes will be moved sequentially until the
> very byte that causes an exception?
>
> In the non-overlap case, if an exception occurs, no bytes will have
> been moved?
>
> Even on a n antique s360?
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Does MVCDK move 'per byte' like MVC?

[Mike Schwab]

Sorry, it appears to operate between doubleword (multiple of 8 byte)
boundary to other processors, page 301 on
https://www.ibm.com/docs/en/SSQ2R2_15.0.0/com.ibm.tpf.toolkit.hlasm.doc/dz9zr006.pdf

On Fri, Jul 26, 2024 at 4:35 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Fri, 26 Jul 2024 16:03:40 -0500, Mike Schwab wrote:
>
> >MVC has another exemption.  The entire 256 bytes appear to move at
> >once.
> >
>  How can you tell?  How might this "appear" different from moving
> sequentially?  Was that true even on the earliest s/360?  Is that
> to say that the move appears "block concurrent"?
>
> >   ... Vs MVCL appears to move 1 byte at a time with register updates.
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Does MVCDK move 'per byte' like MVC?

[Mike Schwab]

MVC has another exemption.  The entire 256 bytes appear to move at
once.  Vs MVCL appears to move 1 byte at a time with register updates.

On Fri, Jul 26, 2024 at 3:47 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Fri, 26 Jul 2024 15:30:31 -0400, Tony Harminc wrote:
> >
> >No - MVC has a specific exemption ("When the operands overlap, the result
> >is obtained as if the operands were processed one byte at a time and each
> >result byte were stored immediately after fetching the necessary operand
> >byte.") from the general destructive overlap rule, and MVCDK doesn't.
> >
> To what is that an "exemption"?  If the operands do not overlap, may it
> appear not to perform the move bytewise?  Can a program detect that?
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Reading VSAM LDS data records

[Mike Schwab]

https://en.wikipedia.org/wiki/Linear_data_set#:~:text=A%20linear%20data%20set%20(LDS,bytes%20in%20increments%20of%204096.

It is just an array of data bytes.  Application reads by RBA.  No
pointers or control characters to signify a new record.



On Wed, Jul 24, 2024 at 1:25 PM Don Johnson
<02ee771a0785-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi all... I have a need to browse a fairly numerous set of VSAM Linear files, 
> and to do some reporting on some of the physical records in each file. I 
> understand that the physical recordsize on the LDS is the same as the CI Size 
> (Blocksize), and that there is no implicit way to separate the logical 
> records just by looking at the file. I can't go into much detail about what I 
> am seeking, but wanted to ask this great group how to read these LDS files.
>
> Can I read the LDS files like reading an ESDS file using COBOL? Does anyone 
> have an example of this, as I have tried a few different programs and could 
> not get them to even open the file.
>
> If COBOL won't work, does anyone have something else that will work? I would 
> be fine having a subprogram that does this I/O that I could call from Rexx or 
> COBOL. Once I get the record (whether 4, 8, 12K or whatever), I can then do 
> what I need with it.
>
> If you have a program that will help me read these LDS files, I would be so 
> grateful!
>
> Thanks!
> Don Johnson
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: World’s largest computer outage!

[Mike Schwab]

https://www.reddit.com/r/amateurradio/comments/u882o5/intro_to_tcpip_over_packet_radio/

On Fri, Jul 19, 2024 at 11:27 PM Paul Edwards
<0676ab6435a5-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 20 Jul 2024 13:04:00 +1000, Wayne Bickerdike  
> wrote:
>
> >*Are you suggesting using physical cash because software andhardware
> >engineers are unable to create a reliable alternative?*
> >
> >Absolutely yes. There are myriad reasons, in my case I have a pension paid
> >into a UK account. Domiciled in Australia it's the best way for me to
> >access these funds and have cash.
> >
> >In Australia there's a push to cashless, however, lots of businesses have
> >suffered through similar outages and are going back to cash. EFTPOS is a
> >cash cow for banks and network providers of ATMs.
>
> It may seem like a "cash cow", but you need to weigh up the cost
> of that electronic infrastructure vs the cost of the entire process
> of chopping down trees to making cash and humans counting
> the cash etc etc. Those costs are basically being hidden. Maybe
> they exceed the cost of the "cash cow" and if it is an economic
> question, then the government should pay those banks etc
> directly for taking pressure off the physical cash infrastructure
> and lost productivity.
>
> Basically I find it hard to believe that we (hardware and software
> engineers) can't construct something more cost-effective and
> even reliable than using dead trees. If we are tasked with doing
> such a thing. And if we are given budget to fix bugs instead of
> only being given a budget to add new features. And include the
> cost of physical cash being lost - perhaps in a house fire - or
> wallets being lost/stolen. And perhaps include the cost of the
> drug trade being facilitated (assuming that is a factor).
>
> >The PC would be fine
>
> Oh - let's start here. You envisage a solution. I'd like to hear it.
>
> > if it wasn't trying to do everything and had a myriad
> >of vulnerabilities in the registry and installation and update processes.
>
> So - what specifically needs to be done to eliminate this issue?
> Someone mentioned OS/2 as a possible solution. I will mention
> that PDOS and its supporting toolchain exists - not necessarily a
> solution. Definitely not as sophisticated as OS/2. But that's not
> necessarily a bad thing. It may or may not be a bad thing - it's
> an open question I have. We have a tangible problem. One instance
> of it, anyway. And I saw a couple of people here suggesting that the
> mainframe was the solution. It may or may not be - open question.
>
> BFN. Paul.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Connect:Direct

[Mike Schwab]

https://en.wikipedia.org/wiki/Connect:Direct
Mid 1980s The Systems Center created by UCC employees.  Determined
need for high speed data transfer between mainframe OSes, added
midrange then PCs.
Merged with VM Systems to form Systems Center Inc.
Bought by Sterling 1993.
Sterling Commerce sold to SBC (AT&T) 2001.
Sold to IBM 2010.

On Mon, Jul 15, 2024 at 6:52 PM Steve Beaver
<050e0c375a14-dmarc-requ...@listserv.ua.edu> wrote:
>
> It’s a major cash cow for IBM
>
>
> Sent from my iPhone
>
> No one said I could type with one thumb
>
> > On Jul 15, 2024, at 18:04, Ed Jaffe 
> > <05acc3c79bf7-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > On 7/15/2024 4:01 PM, Ed Jaffe wrote:
> >>> On 7/15/2024 12:42 PM, Steve Thompson wrote:
> >>> Who is the actual owner of Connect:Direct these days? I understand IBM 
> >>> still has rights to it, but I had heard they spun it off and there may 
> >>> have been a secondary spin-off.
> >>
> >> AFAIK it's still with IBM...
> >
> > NVM. It looks like it's now with HCL.
> >
> > --
> > Phoenix Software International
> > Edward E. Jaffe
> > 831 Parkview Drive North
> > El Segundo, CA 90245
> > https://www.phoenixsoftware.com/
> >
> >
> > 
> > This e-mail message, including any attachments, appended messages and the
> > information contained therein, is for the sole use of the intended
> > recipient(s). If you are not an intended recipient or have otherwise
> > received this email message in error, any use, dissemination, distribution,
> > review, storage or copying of this e-mail message and the information
> > contained therein is strictly prohibited. If you are not an intended
> > recipient, please contact the sender by reply e-mail and destroy all copies
> > of this email message and do not otherwise utilize or retain this email
> > message or any or all of the information contained therein. Although this
> > email message and any attachments or appended messages are believed to be
> > free of any virus or other defect that might affect any computer system into
> > which it is received and opened, it is the responsibility of the recipient
> > to ensure that it is virus free and no responsibility is accepted by the
> > sender for any loss or damage arising in any way from its opening or use.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Mainframe history - 12 inch floppies?

[Mike Schwab]

BBC wrote and broadcast sample programs for their computer, similar to
the sinclair zx spectrum.
https://retrocomputingforum.com/t/over-the-air-basic/1774/6

On Mon, Jul 15, 2024 at 11:12 AM Radoslaw Skorupka
<0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:
>
> W dniu 15.07.2024 o 14:35, Paul Gilmartin pisze:
> > On Mon, 15 Jul 2024 05:19:52 +, Timothy Sipples wrote:
> >> ...
> >> Drifting even further afield, ...
> >>
> > Many early personal computers used Compact Cassettes
> >  for program and
> > data storage, often using inexpensive audio recorders as
> > drives.
> >
> > Was the format standard?  Did they penetrate the IBM world?
>
> Yes, there was informal standard named after some radio station - Kansas
> City Standard
> Typical transfer and density: 300-2400 bps.
>
> BTW: Some radio station in Poland used  to transmit computer programs
> over regular audio channel.
> It was for 8-bit machines like ZX Spectrum or Atari 65XE.
> Copyright was not an issue because computer copyright law did not exist
> at the time. :-)
>
> However if you want to see really weird media solution search for
> stringy tapes.
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Sever error while opening the dataset in 3.4

[Mike Schwab]

PDS is limited to 1 volume 16 extents, PDSE limited to 1 volume 12? extents.
https://www.techagilist.com/mainframe/jcl/space-abend-sb37-sd37-se37-resolution/
says SE37 says no more volumes are available.
So, either you have 16 extents, or the secondary allocation is larger
than the largest free space extent, so is asking for another volume.

https://support.sas.com/kb/59/286.html says VTOC corruption after SE37
and was found in z/OS 2.2 in 2006.  Perhaps the same or similar error
was present but not found in the version you are using.

On Sat, Jul 13, 2024 at 8:36 AM raji ece
<05ff2ba04c83-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi,
>
> I have tried adding extra cylinders for PDS dataset which is in use.
>
> I have tried it using the tool PDS86 but the extend was failed with SE37,
> even though we have enough space on the volume.
>
> Now, I am getting a "Severe Error" While opening a Dataset in ISPF 3.4. Any
> Help on this?
>
> Regards,
> Raji M
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Mainframe history - 12 inch floppies?

[Mike Schwab]

Note 3830 was the dasd string controller for 3330 volumes

https://www.garlic.com/~lynn/2007d.html

floppy disk was originally developed for loading microcode into the
3830 disk controller ... and was also used for loading microcode into
many of the 370 mainframe machines. this typically happened
automatically at power-up ... however there has been recent subthread
here on the "IPL" button on 360/370 front consoles ... "initial
program load" ... which was software (boot) function. However 370s
also had "IMPL" button ... initial microcode program load ... if there
was some service update which included replacing the microprogram
floppy disk ... then the microcode could be reloaded (w/o a power
cycle).

3081 had service processor and a 3310/piccolo, FBA (fixed block
architecture) "hard disk" containing microcode for the 3081 processor
... and some processor functions could involve "paging" microcode from
the 3310.

this is different than an instruction, dynamically modifying some
(frequently immediately) following instruction, in the instruction
stream. a lot of 360 (software) code made use of this feature to
achieve real-storage compactness (compared to paging which also is
oriented towards real-storage compactness). However, it was something
of a performance penalty as processors started attempting to squeeze
instruction latency ... doing instruction decode and setup overlapped
with execution ... there had to be constant checking if some previous
instruction had modified a following instruction that had already been
fetched and decoded.


No details in 6th edition November 1976 of 3830/3330 manual
https://bitsavers.org/pdf/ibm/3830/GA26-1592-5_Reference_Manual_for_IBM_3830_Storage_Control_Model_1_and_IBM_3330_Disk_Storage_Nov76.pdf

On Thu, Jul 11, 2024 at 11:00 AM Radoslaw Skorupka
<0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:
>
> I just found information in some book that IBM mainframes used 12 inch
> floppy diskettes. Late 70's.
>
> Anybody heard about such diskettes?
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: another z/OSMF rant. -- Catch-22 is killing me

[Mike Schwab]

The server packs are that way too.  Geared toward building a brand new
system and never experience the customization issue to update an
existing system.

On Wed, Jul 10, 2024 at 11:32 PM Brian Westerman
 wrote:
>
> It just occurred to me that maybe the people who build z/OSMF never really 
> had to use it to build a production system.  Building something that IPLs is 
> simple. building a production replacement takes some doing and having someone 
> that might not really "get" the entire process can really make the process 
> quite hard.
>
> Just a thought.
>
> Brian
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: OS/VS2 Release 2: Happy 50th Anniversary!

[Mike Schwab]

1972 OS/VS1 introduced Virtual Storage.
1974 OS/VS2 introduced Multiple Virtual Storage
1983 MVS/XA introduced 31 bit storage / I/O subsystems
1988 ESA introduced Access Registers
2000 z/OS introduced 64 bit memory.

On Mon, Jul 8, 2024 at 11:23 PM Timothy Sipples  wrote:
>
> Michael Schmitt wrote:
> >What's surprising to me is that z/OS is coming up on 24 years old:
> >1974: OS/VS2R2
> >1978: MVS/SE
> >1980: MVS/SP
> >1983: MVS/XA
> >1988: MVS/ESA
> >1995: OS/390
> >2000: z/OS
> >Look back at the big architectural changes in MVS. So big that they
> >necessitated a change in the product name each time. [Except OS/390,
> >which was packaging and marketing 😊 ]
> >Compared to that, z/OS seems to be stagnant. Or stable, take your
> >pick.
>
> Well, a few points:
>
> 1. z/OS was introduced with the introduction of 64-bit addressing 
> (z/Architecture). 16 EiB of real addressable memory is still a fairly large 
> amount. The current model IBM z16 tops out at just shy of 40 TiB (~0.381 
> EiB). Some architectural improvements have more longevity than others. Anyone 
> remember "extended real addressing"?
>
> 2. Did the name really change from 1978 to 1995? It's all "MVS," merely with 
> suffixes.
>
> 3. CICS has kept its name since at least 1968, although it dropped a prefix 
> in 1969. It's a good name! It's also a radically different and vastly more 
> capable product now.
>
> 4. If you want you can formally ask IBM to change the name.
>
> —
> Timothy Sipples
> Senior Architect
> Digital Assets, Industry Solutions, and Cybersecurity
> IBM Z/LinuxONE, Asia-Pacific
> sipp...@sg.ibm.com
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: C interface to MVS

[Mike Schwab]

The MVS/380 effort was about compiling GCCMVS on MVS.  He has
concentrated on C/90, so may be out of date.

On Mon, Jul 8, 2024 at 5:08 PM Charles Mills  wrote:
>
> I wasn't sure what you meant. I think what you are asking is:
>
> Is there a fairly generic C library for MVS other than LE that provides a C 
> API to common MVS services?
>
> If so, I doubt it. But possibly ...
>
> There was an MVS C compiler in the pre-LE days. It was a port of one of the 
> common C compilers -- I am trying to remember the vendor. Lattice C -- I 
> think that's it. Then there was SAS C. We used both -- back before I knew C 
> -- at my old company in the roughly 1996-1998 timeframe. That's before LE, 
> right? What did they use for an MVS API?
>
> Also, "MVS" is a big tent. What specifically? ENQ/DEQ? WTO? Or what? Or by 
> "MVS" do you perhaps mean DFSMS? OPEN, CLOSE, GET, PUT, ...
>
> Do you have a basic C library? malloc(), printf(), etc.? What do they use as 
> an MVS interface?
>
> Charles
>
> On Wed, 3 Jul 2024 16:04:09 -0500, Paul Edwards  wrote:
>
> >There has been a recent development that means that I now
> >have a C90-compliant compiler, assembler and linker that
> >allows me to produce MVS load modules (in IEBCOPY unload)
> >on basically any environment - ASCII or EBCDIC (I've only tested
> >building on Windows and running on z/PDOS though).
> >
> >So here is what I do:
> >
> >gcc370 -Os -S -I. testmvs.c
> >as370 -a=testmvs.lst -o testmvs.o testmvs.s
> >
> >gcc370 -Os -S -I. mvs.c
> >as370 -a=mvs.lst -o mvs.o mvs.s
> >
> >as370 -a=llmvs.lst -o llmvs.o llmvs.asm
> >
> >pdld -e main --oformat mainframe -o testmvs.exe testmvs.o mvs.o llmvs.o
> >
> >
> >The executables used above are available in the dos directory
> >of the PDOS/386 hard disk image (pdos.zip) at pdos.org
> >
> >The assembler used is more-or-less standard HLASM, but the
> >pseudo-ops are not, and nor are macros available. However,
> >for my goal, that is not a problem as almost all assembler will
> >be temporary and C-generated. Also note that the object code
> >above is ELF - but again - temporary so I'm not concerned about
> >it being non-MVS-standard. Note that pdld accepts standard
> >object code also, and you can also have both forms of object
> >code as input. Also note that the pdld author is likely to be
> >willing to make small usability modifications if desired.
> >
> >And there are two different ways I would like my executables to run.
> >
> >One is to do an SVC, like SVC 35 to do a WTO.
> >
> >The other is for the application to detect at startup whether it was
> >called from a PDOS-generic environment, and if so, when it is time
> >to do an SVC - channeled into the __svc function - it instead does a
> >callback. So real SVCs do not need to exist/be accessible. The
> >PDOS-generic loader would probably do something like zap the
> >first 4 bytes of the executable to be a pointer to a structure.
> >Meaning the executables are limited to the ones that are built
> >aware of this. For my use case that is fine, but some other
> >mechanism could potentially be used.
> >
> >Normally my C programs have some startup assembler to create a
> >stack, as seen here:
> >
> >https://sourceforge.net/p/pdos/gitcode/ci/master/tree/pdpclib/mvsstart.asm
> >
> >But I have omitted that in my test program, thus the OS needs to provide
> >a stack, thus the test program at http://pdos.org/mftest.zip only works
> >with z/PDOS available from pdos.org
> >
> >I have also omitted the PDOS-generic environment detection and use.
> >
> >Anyway, this is my question.
> >
> >I am wondering whether there is an existing C interface to MVS. There
> >wasn't at the time of MVS 3.8J - not from IBM anyway - but there might
> >have been some 3rd party vendor. Or maybe IBM now provides one
> >that could be backdated to MVS 3.8J.
> >
> >It's unclear to me what the proper interface should be. I have experience
> >in adding wrappers to MSDOS APIs, like this:
> >
> >unsigned int PosDisplayOutput(unsigned int ch)
> >{
> >union REGS regsin;
> >union REGS regsout;
> >
> >regsin.h.ah = 0x02;
> >regsin.h.dl = ch;
> >
> >int86(0x21, ®sin, ®sout);
> >
> >return (regsout.h.al);
> >}
> >
> >(in pos.c in the pdos/src)
> >
> >
> >but the mainframe tends to only use a single register, and may
> >require a different breakdown. Here is what I did just to prove
> >that it works:
> >
> >#include "mvs.h"
> >
> >int wto(int len, int flags, char *msg)
> >{
> >char buf[84];
> >regs regsin;
> >regs regsout;
> >
> >*(short *)buf = len;
> >*(short *)(buf + 2) = flags;
> >if (len > 84) len = 84;
> >if (len < 4) return (0);
> >memcpy(buf + 4, msg, len - 4);
> >regsin.r[1] = (int)buf;
> >__svc(35, ®sin, ®sout);
> >return (0);
> >}
> >
> >Any suggestions/direction?
> >
> >Thanks. Paul.
> >
> >
> >
> >* Function __svc code
> > L r7,0(,r1)
> > L r8,4(,r1)
> > L r0,0(,r8)
> > L r1,4(,r8)
> > L

Re: Links to manuals?

[Mike Schwab]

https://www.ibm.com/docs/en/zos/3.1.0?topic=ucbs-retrieving-information-about-io-hardware-io-path
The format of the IHACDR is documented in z/OS® MVS™ Data Areas in the
z/OS Internet library. For more information about the contents of
CDRs, see ESA/390 Common I/O Device Commands.

On Tue, Jul 2, 2024 at 11:06 AM Seymour J Metz  wrote:
>
> Is there a z/Architecture replacement for  IBM ESA/390 Common I/O-Device 
> Commands and Self Description (SA22-7204) and what is its URL?
>
> What is the URL for The Load-Program-Parameter and the CPU-Measurement 
> Facilities (SC23-2260)
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Provenance of term "yonder"?

[Mike Schwab]

14th century middle English.  A long distance but within view.

https://www.merriam-webster.com/dictionary/yonder

On Mon, Jul 1, 2024 at 5:38 AM Seymour J Metz  wrote:
>
> Is the use of "yonder" to designate instructions with long displacements 
> official IBM nomenclature? What is its provenance?
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: RMDS error DBNV016

[Mike Schwab]

Most exits are assembler, right?

Run a disassembler and save the generated source.

Compare with sample and instructions of old version (last before
required recomplie) and create comments, variable names.

Review required changes and new facilities and update as needed.

On Sun, Jun 23, 2024 at 1:43 PM José I. Ríos
<067c0a7727ce-dmarc-requ...@listserv.ua.edu> wrote:
>
> Hi,
>
> Yes, but it was compiled apperantly without no changes long time ago. We
> are searching the source code. There was no new maintenance only that we
> moved the LPAR to a new z16.
>
> Best Regards,
> Josian
>
> On Sun, Jun 23, 2024, 11:18  wrote:
>
> > Is that a user exit for ends?  Do you have the source to see when the
> > message is issued?
> >
> >
> > Any maintenance installed?
> >
> >
> > Lizette
> >
> >
> > Sent from EarthLink Mobile mail
> >
> >
> > On 6/23/24, 07:34, José I. Ríos <
> > 067c0a7727ce-dmarc-requ...@listserv.ua.edu> wrote:
> >
> >
> > Hi,
> >
> >
> > We are having problems with RMDS (Report Management Distribution System),
> >
> > and we wonder if someone has stumbled in this situation. After an IPL, the
> >
> > users report in RMDS login screen the error:
> >
> >
> > DBNV016 SECURITY CHECK FAILED: DBNIXSEC
> >
> >
> > Our Security Team verified any errors with the users, but they did not find
> >
> > any security issues in their TSS reports.
> >
> >
> > The version of z/OS is 2.4, and RMDS is in version 2.3.
> >
> >
> > Thanks,
> >
> > Josian
> >
> >
> > --
> >
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> >
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Data Set Commander Monitor (DSCMON) Access Authority

[Mike Schwab]

We did UACC(WARN) and monitored to make sure somebody put RACF on it.
We eventually went to NONE.

On Sun, Jun 23, 2024 at 7:16 AM Radoslaw Skorupka
<0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:
>
> W dniu 23.06.2024 o 10:51, Mike Cairns pisze:
> > No Bob - I meant UACC(READ) or its equivalent.  I just don't see what gate 
> > is being closed by insisting that LinkList or LPA libraries must have 
> > UACC(NONE), when, as you confirm, they cannot be fetch protected and 
> > therefore the content is available to anyone on the system anyway.
>
> I met the following justification: when you have UACC(NONE) for
> linklisted library then you enforce use LNKLST instead of STEPLIB/JOBLIB.
> While I understand the above, I don't agree with the goal as being worth
> such configuration.
>
> And there is another approach: UACC above NONE should not be used at
> all. Just because mama (auditor) said so.
>
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: GRS in MONOPLEX without physical CTCs ?

[Mike Schwab]

I didn't see either form, but they made the correct length the second
time no charge.

On Sat, Jun 22, 2024 at 5:09 PM Seymour J Metz  wrote:
>
> What was in the proposal and what was in the contract? If they didn't deliver 
> what they signed off on, then you have legal recourse, but if your purchasing 
> people changed it then you're SOL.
>
> That reminds me of the time that we ordered a tie line and purchasing changed 
> it to a leased line because it was less expensive, without concerning 
> themselves over whether it would work. The first I heard about it was when 
> C&P (later part of  Bell Atlantic, then Verizon) asked where to install the 
> 208A. "You mean 208B. No, 208A."
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
> ____
> From: IBM Mainframe Discussion List  on behalf of 
> Mike Schwab <05962a42dc49-dmarc-requ...@listserv.ua.edu>
> Sent: Saturday, June 22, 2024 3:21 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: GRS in MONOPLEX without physical CTCs ?
>
> My site requested cables for x meters, the company won the bid based
> on x feet, won the bid because it was half the cost..  After
> delivering the x feet cables, they had to make the x meters cable. (1
> inch is defined as 25.4 mm, so 39.37 inches, 3.3 feet, 1.1 yards).
>
> On Sat, Jun 22, 2024 at 11:28 AM Tom Brennan  
> wrote:
> >
> > And don't do like I did a few years ago :)  A co-worker ordered four
> > 3-meter FICON cables for CTC connections from one card to another on the
> > same machine.  Since I'm American I don't really know how long a meter
> > is so I said "sure".  When I went on site, a couple of cables had to run
> > from one side of the z13s to the other, and they barely made it by going
> > under the frame - but still above the raised floor.  A bit tacky.
> >
> > On 6/21/2024 11:44 PM, Brian Westerman wrote:
> > > Ficon adapters and basic sysplex are far cheaper than MIM.  Also, with 
> > > MIM, PDSe sharing is still not completely correct.  At least not as of 
> > > 2023.
> > >
> > > Brian
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: GRS in MONOPLEX without physical CTCs ?

[Mike Schwab]

My site requested cables for x meters, the company won the bid based
on x feet, won the bid because it was half the cost..  After
delivering the x feet cables, they had to make the x meters cable. (1
inch is defined as 25.4 mm, so 39.37 inches, 3.3 feet, 1.1 yards).

On Sat, Jun 22, 2024 at 11:28 AM Tom Brennan  
wrote:
>
> And don't do like I did a few years ago :)  A co-worker ordered four
> 3-meter FICON cables for CTC connections from one card to another on the
> same machine.  Since I'm American I don't really know how long a meter
> is so I said "sure".  When I went on site, a couple of cables had to run
> from one side of the z13s to the other, and they barely made it by going
> under the frame - but still above the raised floor.  A bit tacky.
>
> On 6/21/2024 11:44 PM, Brian Westerman wrote:
> > Ficon adapters and basic sysplex are far cheaper than MIM.  Also, with MIM, 
> > PDSe sharing is still not completely correct.  At least not as of 2023.
> >
> > Brian
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: WIn-10 FTP logon failing after upgrade to z/OS 2.2

[Mike Schwab]

Well, if it stopped working before  the upgrade, the upgrade is not
the problem.  Possibly somebody else tried to login with the wrong
value and locked it up.  Has it been reset, or did somebody disable it
otherwise?

On Fri, Jun 21, 2024 at 2:11 PM Bob Bridges
<0587168ababf-dmarc-requ...@listserv.ua.edu> wrote:
>
> My client just asked me to look into an FTP.bat script that started failing 
> after we upgraded to z/OS 2.2.  It's odd; it says the PASS command fails, but 
> a) the password in the script matches the password that's expected, and b) it 
> looks like the password is being correctly transmitted during the logon 
> process.  Here's a transcript of a manual attempt:
>
> H:\>ftp
> ftp> open [IP address]
> Connected to [IP address].
> 220-FTPD1 IBM FTP CS V2R2 at [URL], 17:57:49 on 2024-06-21.
> 220 Connection will close if idle for more than 5 minutes.
> 501 command OPTS aborted -- no options supported for UTF8
> User (10.2.11.200:(none)): [ID]
> 331 Send password please.
> Password:
> 530 PASS command failed
> Login failed.
> ftp> quit
> 221 Quit command received. Goodbye.
>
> 1) Why do I say "since the 2.2 upgrade"?  The user used to run it about 
> weekly, and when it stopped working a few months ago he simply stopped using 
> it.  So he has a pretty good lock on when the problem started.
>
> 2) Is the password itself correct in the script?  Yes:  The script itself was 
> last changed in 2015.  The user showed me the script, and just to be sure I 
> changed the ID's password to match what the script claimed it should be.
>
> 3) Where does that OPTS command come from?  It's not in the script.  Web 
> research tells me that Win 10 adds that automatically right after the OPEN 
> command.  The -d option reveals that the command is "OPTS UTF8 ON".
>
> 4) So does the failure of the OPTS command cause the correct password to be 
> interpreted incorrectly on the other end?  No, for two reasons:  The original 
> poster of an identical problem back in 2018 eventually said "I did receive an 
> explanation that OPTS UTF8 ON is not the problem", and I see at 
> https://support.sas.com/kb/57/165.html that this error message does not 
> affect the FTP results.  Furthermore I ran FTP with the -d option and got 
> this:
>
> H:\>ftp -d
> ftp> open [IP addr]
> Connected to [IP addr].
> 220-FTPD1 IBM FTP CS V2R2 at [URL], 18:19:32 on 2024-06-21.
> 220 Connection will close if idle for more than 5 minutes.
> ---> OPTS UTF8 ON
> 501 command OPTS aborted -- no options supported for UTF8
> User ([IP addr]:(none)): [ID]
> ---> USER [ID]
> 331 Send password please.
> Password:
> ---> PASS [password]  /* this was the correct password */
> 530 PASS command failed
> Login failed.
> ftp> quit
> ---> QUIT
> 221 Quit command received. Goodbye.
>
> So the correct password is getting there.  Or, wait, maybe it isn't; the 
> mainframe connection didn't sent it back to the client, so it's gotta be Win 
> FTP that told me what it sent.  May still be wrong at the other end.
>
> I gotta believe this is happening to others, and that the fix is well 
> understood.  Can anyone explain?
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* Let the righteous smite me in kindness and reprove me.
> It is oil upon my head; do not let my head refuse it.  -Psalms 141:5 */
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: GRS in MONOPLEX without physical CTCs ?

[Mike Schwab]

Can z/VM do this?  Costs?

On Fri, Jun 21, 2024 at 8:45 AM MANCINI Frédéric (80)
 wrote:
>
> Actually, we do share a few DASD devices between our lpars.
>
> Thanks to all the replies, I understand better now what we must do in
> order to implement a fully functional GRS without buying an external
> coupling facility.
>
> I understand that we can leave our lpars in MONOPLEX mode and use GRS
> managed CTCs, possibly on a ring architecture in order to minimize the
> hardware connections.
>
> Using virtual CTCs without interconnecting the MONOPLEX lpars doesn't
> seem to make sense for resource serialization.
>
> Am I right ?
>
> 
> *De :* Tom Marchant [mailto:000a2a8c2020-dmarc-requ...@listserv.ua.edu]
> *Envoyé :* vendredi 21 juin 2024 à 15:30
> *Pour :* IBM-MAIN@LISTSERV.UA.EDU
> *Objet :* GRS in MONOPLEX without physical CTCs ?
>
> > The OP hasn't said whether or not any DASD is shared.
> >
> > If there is a need to share PDSE, it is only supported within a Sysplex. 
> > MIM is not sufficient
> >
> > --
> > Tom Marchant
> >
> > On Fri, 21 Jun 2024 13:49:29 +0200, Radoslaw Skorupka 
> >  wrote:
> >
> >> To complement:
> >> Parallel Sysplex - a CF is required, which mean sysplex links (emulated,
> >> free - for PS within single CPC). GRS is STAR mode is possible and
> >> strongly suggested. (GRSplex is required, the mode is suggested).
> >>
> >> Base Sysplex - CTC links required. In the old days also sysplex timer.
> >> Now it can be sysplex link to provide time synchronization for STP
> >> (Server Time Protocol). The GRS is mandatory and it's configuration is
> >> RING, which is not the best from performance point of view. For base
> >> sysplex within single CPC there are no STP-only links, but CTC over
> >> FICON is required. Note: the FICON can be shared, that means used for
> >> other purposes.
> >>
> >> Monoplex. GRSplex is still possible (unless something changed) and it is
> >> RING topology with drawbacks mentioned above. Of course multiple
> >> monoplex LPARs may share DASD without GRSplex, but again it is not
> >> seamless - at least PDSE sharing is almost impossible.
> >>
> >> ...and there is CA-MIM family of products. :-)
> >>
> >>
> >> --
> >> Radoslaw Skorupka
> >> Lodz, Poland
> >>
> >>
> >>
> >>
> >> W dniu 21.06.2024 o 08:41, Brian Westerman pisze:
> >>> You can just use extra FICON interfaces as FCTC's.  IBM refers to that 
> >>> method as a baby sysplex.  It allows you to have GRS in ring mode.  TO 
> >>> have star mode you need CF's.
> >>>
> >>> If you have multiple LPARs and you share dasd, then you need either CF's 
> >>> (expensive) or Ficon CTCs (pretty cheap).  The setup is very simple.  
> >>> CF's are much faster but ficon CTC's easily handle 3,4 or 5 lpars without 
> >>> any issues at all.
> >>>
> >>> Brian
> >>>
> >>> --
> >>> For IBM-MAIN subscribe / signoff / archive access instructions,
> >>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access instructions,
> >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ACS Routines Missing Source

[Mike Schwab]

OK.  Might help recreate the acs routines, I.E. HLQ or size or etc. to
determine a value.

On Wed, Jun 19, 2024 at 1:11 PM Michael Oujesky  wrote:
>
> Appears to be RACF related and not for ACS routines reconstruction,
>
> Michael
>
> At 07:23 PM 6/18/2024, Mike Schwab wrote:
>
> >Try CBTTAPE file 781.  >>
> >
> >//***FILE 781 is from John McKown, and is his
> >modification of an*   FILE 781
> >//*   IBM-distributed sample program
> >called RACSEQ.  The*   FILE 781
> >//*   disclaimer of the IBM sample
> >program allows that it   *   FILE 781
> >//*   be reproduced here, so that
> >members #IBMDOC,  *   FILE 781
> >//*   #IBMCODE and @IBMCODE are
> >transcribed here, pretty*   FILE 781
> >//*   much
> >verbatim.*   FILE 781
> >//*
> >*   FILE 781
> >//*   email:  "McKown, John"
> > *   FILE 781
> >//*
> >*   FILE 781
> >//* This is a modification of the IBM
> >supplied RACSEQ   *   FILE 781
> >//* program.  It has been modified to be
> >able to write its  *   FILE 781
> >//* output in XML format.  It has also been
> >extended to write   *   FILE 781
> >//* to a specified DDName, DSName, Sysout
> >class, or UNIX*   FILE 781
> >//* Path.  When writing to a DSName, it can
> >either be an*   FILE 781
> >//* existing DSName, or a new one.  If it is
> >a new one, the *   FILE 781
> >//* DSName will be allocated with either the
> >system defaults,   *   FILE 781
> >//* the SMS defaults as assigned by the ACS
> >routines, or with   *   FILE 781
> >//* the characteristics specified via a
> >USING() and/or LIKE()   *   FILE 781
> >//* parameter.
> >*   FILE 781
> >//*
> >*   FILE 781
> >//***FILE 782
> >
> >On Mon, Jun 17, 2024 at 11:35 AM Rebecca Martin
> ><050348c1817e-dmarc-requ...@listserv.ua.edu> wrote:
> > >
> > > Is there any way to recreate the ACS routines
> > source from the SMS ACDS/SCDS?  Anybody ever
> > dealt with missing ACS routines dataset?  If so, how did you recover?
> > >
> > > Thanks
> > > Rebecca
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> >
> >
> >--
> >Mike A Schwab, Springfield IL USA
> >Where do Forest Rangers go to get away from it all?
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ACS Routines Missing Source

[Mike Schwab]

Try CBTTAPE file 781.  >>

//***FILE 781 is from John McKown, and is his modification of an*   FILE 781
//*   IBM-distributed sample program called RACSEQ.  The*   FILE 781
//*   disclaimer of the IBM sample program allows that it   *   FILE 781
//*   be reproduced here, so that members #IBMDOC,  *   FILE 781
//*   #IBMCODE and @IBMCODE are transcribed here, pretty*   FILE 781
//*   much verbatim.*   FILE 781
//* *   FILE 781
//*   email:  "McKown, John"  *   FILE 781
//* *   FILE 781
//* This is a modification of the IBM supplied RACSEQ   *   FILE 781
//* program.  It has been modified to be able to write its  *   FILE 781
//* output in XML format.  It has also been extended to write   *   FILE 781
//* to a specified DDName, DSName, Sysout class, or UNIX*   FILE 781
//* Path.  When writing to a DSName, it can either be an*   FILE 781
//* existing DSName, or a new one.  If it is a new one, the *   FILE 781
//* DSName will be allocated with either the system defaults,   *   FILE 781
//* the SMS defaults as assigned by the ACS routines, or with   *   FILE 781
//* the characteristics specified via a USING() and/or LIKE()   *   FILE 781
//* parameter.  *   FILE 781
//* *   FILE 781
//***FILE 782

On Mon, Jun 17, 2024 at 11:35 AM Rebecca Martin
<050348c1817e-dmarc-requ...@listserv.ua.edu> wrote:
>
> Is there any way to recreate the ACS routines source from the SMS ACDS/SCDS?  
> Anybody ever dealt with missing ACS routines dataset?  If so, how did you 
> recover?
>
> Thanks
> Rebecca
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ACS Routines Missing Source

[Mike Schwab]

DCOLLECT SMSDATA can collect information on the storage class, data
class, management class, storage groups.  Does look like it gathers
the exit code.

https://www.ibm.com/docs/en/zos/2.4.0?topic=commands-dcollect

Have you tried HRECALL or HRECOVER?

On Mon, Jun 17, 2024 at 11:35 AM Rebecca Martin
<050348c1817e-dmarc-requ...@listserv.ua.edu> wrote:
>
> Is there any way to recreate the ACS routines source from the SMS ACDS/SCDS?  
> Anybody ever dealt with missing ACS routines dataset?  If so, how did you 
> recover?
>
> Thanks
> Rebecca
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: iewl/iebcopy device options

[Mike Schwab]

Well, https://ibmmainframes.com/references/disk.html shows
2311 with 3,625 bytes,
2314 with 7,294,
334x with 8,368,
3330 with 13,030,
2305 with 14,136,
3350 with 19,069,
3375 with 35,616,
3380 with 47,476,
3390 with 56,664.

Devices under 32K handle 32K physical blocks with track overflow.
So 6K fits 2311 onto 2 tracks reasonable utilization, fits 2314, 334x
on 1 track 1 block reasonable utilization, 3330, 2305 2 blocks per
track, 3350 3 blocks, 3375 5 blocks, 3380 7 blocks, 3390 9 blocks.
7K block would fit 3330 2305 with 1 block using just over half the track.

I've put together a spreadsheet estimating usage of nKB block sizes on
various DASD models.  I estimated the gaps as 1% of the track length
because I did not find a reference showing interblock gaps.  Don't
need space for the last gap, so a .99 might hold one more record.
Calculating n*TRK/(BLK+8+(2*GAP)) fraction shows the inefficiency of
the blocking for the device and the sum of the fraction parts shows
the overall inefficiency across all the device types. I'll update with
the actual gaps (and max 3380/3390 gap) if someone can find it
https://docs.google.com/spreadsheets/d/1cr3zl4k-Rpk449NNIuoqwZ8wV0q5MrkmKg-8jGdEkvM/edit?usp=sharing

Would be interesting to test by allocating 1 cylinder on each device
and copying records to fill blocks until abend.  Say 64 bytes of a
card image, 16 records per 1k, 3390 56k so 900 * 64 = 57,600, so
13,500 records would be more than 1 3390 cylinder.

On Sat, Jun 15, 2024 at 11:38 PM Paul Edwards
<0676ab6435a5-dmarc-requ...@listserv.ua.edu> wrote:
>
> Thanks all for your replies.
>
> > I agree with Binyamin - XMIT format (aka NETDATA format, also transportable
> > to VM systems) is fixed-length,
>
> Being fixed length isn't a selling point to me. zip files aren't
> fixed length either. It's actually a non-selling point.
>
> You can consider that I have a rival format for XMIT (rightly
> or wrongly, and I acknowledge in advance that most people
> will probably say "wrongly").
>
> > no RDW's needed,
>
> XMIT will indeed have RDWs embedded in the (more complicated
> in my opinion) format. XMIT/TERSE just go on top of IEBCOPY and
> will include the RDWs and possibly the BDWs from the IEBCOPY
> unload RECFM=V(S) dataset.
>
> It is the RDWs that I add (or ftp adds) that I consider to be simple.
>
> > and handles executables as well as plain text or object data.
>
> I use zip for those other things.
>
> > And there are public domain tools available at the MVS 3.8 level
> > to create into and extract from that format.
>
> They also exist (for decades) to handle the format that I outlined.
>
> What's new is just pdld.
>
> > Much easier to process than IEBCOPY unload format.
>
> I don't consider it to be easier, but that's one of the "eyes of
> the beholder" thing. I'm curious as to why you think IEBCOPY
> unload format is difficult to process. That's the exact problem
> IMO. And the other things are layered on top of IEBCOPY
> unload anyway.
>
> > If your "pdld" tool
>
> The tool is a linker btw. "ld" is from Unix.
>
> > can just create the executable format into a one-member, BLKSIZE=6144
> > PDS on any kind of DASD that supports that block size (i.e., just replace
> > the IEWL part),
>
> Well that's basically my question - "any kind of DASD". I had an idea
> that maybe I should use a 2314 so that there is only one block per
> track. Someone told me elsewhere that I can't use VIO regardless -
> you can't have a VIO PDS - I haven't confirmed that with a test yet.
>
> > current z/OS versions on any supported DASD, regardless of the
> > DASD type it originated from.
>
> Yes, that's what I'm after. It's just a question of what my options
> are. E.g. it is possible that I can't make the original DASD 3390
> if I want to restore to an unmodified MVS 3.8J that only supports
> 3350. But I may be willing to mandate a modified MVS 3.8J that
> has 3390 support added. That's my question, basically. What
> options do I have within the parameters specified to achieve
> my goal (not someone else's goal)?
>
> With regards to the other question about DEB - it's not me who wants
> a DEB - it's the IEBCOPY format that requires it to be there. Well - puts
> it there, anyway - I don't know if it is actually used in the load process
> such that I can put junk values there.
>
> BFN. Paul.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: DB2 V12 RSU2403

[Mike Schwab]

With a large number of PTF, sounds like one of the changes that
require a certain set of prerequisite compatibility PTFs be installed
on all systems and subsystems before the held PTFs are installed on
any system subsystem.  You have to read all the holddata comments.

On Sat, Jun 15, 2024 at 11:27 PM Brian Westerman
 wrote:
>
> I agree with everything except the last part about selecting the PTFs 
> individually.  I do the same thing that the OP is doing.  My reason is that I 
> can get the ones the "need" to be excluded from the applychk, but since he is 
> doing a RSU, he likely wants everything that is not going to fail because of 
> failed or missing prereqs.
>
> Coding defaults never hurts though.
>
> As far as getting through the 134 PTF's you pretty much have to look at them 
> all and see if the action is going to need you to do something that you can't 
> or don't want to do or will affect something poorly in your system.  It's 
> difficult to tell you for sure without knowing anything about your site and 
> if the required actions are going to present a problem for you.
>
> If it helps, most of the actions are likely fairly benign things, but again, 
> it's difficult to tell you without specific knowledge of the action items in 
> question.
>
> Brian
>
> On Sat, 15 Jun 2024 23:00:55 -0400, David Spiegel  
> wrote:
>
> >Hi Dave,
> >- RETRY(YES) and JCLINREPORT are defaults. There is no need to code them.
> >- The SYSUTx ALLOCATIONS might be too small
> >- The SMPWRKx Allocations could benefit from half-track blocking (i.e.
> >BLKSIZE=27920).
> >- Instead of PTFS and EXCLUDE, why not SELECT the 134 PTFs?
> >
> >Regards,
> >David
> >
> >On 2024-06-14 18:30, Dave Beagle wrote:
> >> Depends on the holds. DOC holds are easily bypassed. Others not entirely 
> >> bypass-able.(although most are) Some of them you might have to perform a 
> >> bind to finish the installation. Here is a sample.
> >> //WJJCAPCK JOB (3200,TBL1),'APCK DB2 MAINT',CLASS=8,MSGCLASS=Q,
> >> // NOTIFY=&SYSUID,REGION=6M
> >> /*JOBPARM SYSAFF=BCWD
> >> //*
> >> //S1   EXEC PGM=GIMSMP,
> >> // PARM='PROCESS=WAIT',
> >> // DYNAMNBR=120
> >> //*
> >> //* NOTE:  THIS JCL CREATED BY THE COMMAND GENERATION DIALOGS.
> >> //*
> >> //*SMP ZONE-RELATED FILES ARE DYNAMICALLY ALLOCATED,
> >> //*THIS INCLUDES THE SMPPTS, SMPLOG, AND SMPTLIB DATA SETS,
> >> //*IF APPLICABLE.
> >> //*
> >> //* SMP FILES
> >> //*
> >> //SMPCSI   DD DISP=SHR,DSN=SMPE.DB2V8R1.GLOBAL.CSI
> >> //SMPOUT   DD SYSOUT=*
> >> //SMPRPT   DD SYSOUT=*
> >> //SMPLIST  DD SYSOUT=*
> >> //SYSPRINT DD SYSOUT=*
> >> //*
> >> //*  UTILITY WORK DATA SETS IF REQUIRED FOR THE COMMAND
> >> //*  FOLLOW HERE.
> >> //*  INFORMATION FOR THE ALLOCATION OF THESE DATASETS IS
> >> //*  SET USING OPTION 0 (SETTINGS) FROM THE SMP/E PRIMARY
> >> //*  OPTION PANEL.
> >> //*
> >> //SYSUT1   DD UNIT=SYSDA,SPACE=(3120,(380,760))
> >> //SYSUT2   DD UNIT=SYSDA,SPACE=(3120,(380,760))
> >> //SYSUT3   DD UNIT=SYSDA,SPACE=(3120,(380,760))
> >> //SYSUT4   DD UNIT=SYSDA,SPACE=(3120,(38,100))
> >> //*
> >> //*  SMP TEMPORARY WORK DATA SETS
> >> //*
> >> //SMPWRK1  DD UNIT=SYSDA,
> >> //SPACE=(3120,(364,380,500)),
> >> //DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
> >> //SMPWRK2  DD UNIT=SYSDA,
> >> //SPACE=(3120,(364,380,500)),
> >> //DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
> >> //SMPWRK3  DD UNIT=SYSDA,
> >> //SPACE=(3120,(364,380,500)),
> >> //DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
> >> //SMPWRK4  DD UNIT=SYSDA,
> >> //SPACE=(3120,(364,380,500)),
> >> //DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
> >> //SMPWRK6  DD UNIT=SYSDA,
> >> //SPACE=(3120,(364,380,500)),
> >> //DCB=(RECFM=FB,BLKSIZE=3120)
> >> //*
> >> //*
> >> //SMPCNTL  DD *
> >>SETBOUNDARY (DSN8TRG)
> >>.
> >>APPLY
> >>   PTFS
> >>   BYPASS   (
> >> HOLDSYSTEM
> >>  (
> >>DOC
> >>DB2BIND
> >>IPL
> >>ACTION
> >>AO
> >>DEP
> >>DELETE
> >>  )
> >>)
> >>   JCLINREPORT
> >>   CHECK
> >>   EXCLUDE  (
> >> UK16725
> >> UK16766
> >> UK17549
> >> UK17614
> >> UK17616
> >> UK17619
> >> UK17786
> >> UK17972
> >> UK18140
> >> UK18173
> >> UK18509
> >> UK18859
> >> UK19013
> >> UK19209
> >> UK1

Re: ARC1114I

[Mike Schwab]

Define Alias Usercat updates the master catalog to point to the
correct usercatalog.  Required after import.

https://www.ibm.com/docs/en/zos/2.4.0?topic=catalogs-defining-aliases-user-catalog

On Wed, Jun 12, 2024 at 8:10 AM John Cassidy  wrote:
>
> > Hello  all,
> >
> > a little  saga.. this is all to do with a "what if" case. Purely an
> > exercise.
> >
> > Have ran a Tivoli Advanced Catalog Management reorg to put a usercat on
> > a different volume. All well RC=0. The catalog is addressable on the
> > new volume with aliases etc. Listcat reports everything to be as it
> > should.
> > Subsequently,  I ran an IDCAMS export/disconnect of the catalogue let
> > us call it usercat.xxx, then an IDCAMS import/connect of said
> > catalogue.
> > On running a HSEND recall against this catalogue (and its associated)
> > datasets, I am receiving a ARC1114I RC=14 reasoncode = 8 "CATALOG
> > LOCATE ERROR"
> >
> > 8 One of the following conditions has occurred:
> >
> > * The entry is not found.
> > * A CVOL pointer is found in a CVOL.
> > * An alias is found for a generation data group base.
> > * A protection check has failed for a VSAM password-protected data set.
> >
> > What am I doing wrong, or am I completely obtuse?
> >
> > IDCAMS JCL below
> >
> > // JOB '123456',MSGLEVEL=1,MSGCLASS=8,NOTIFY=RG03023,
> >
> > // USER=
> >
> > /*JOBPARM SYSAFF=
> >
> > //
> >
> > //EXP EXEC PGM=IDCAMS,REGION=4096K
> >
> > //SYSPRINT DD SYSOUT=*
> >
> > //SYSINDD *
> >
> > EXPORT USERCAT.XXX DISCONNECT
> >
> > //X JOB '1123456',MSGLEVEL=1,MSGCLASS=8,NOTIFY=&SYSUID
> >
> > //
> >
> > //IMP EXEC PGM=IDCAMS,REGION=4096K
> >
> > //SYSPRINT  DD SYSOUT=*
> >
> > //SYSIN DD *
> >
> > IMPORT CONNECT -
> >
> > OBJ((USERCAT.TESTCAT  -
> >
> > VOL(XX) -
> >
> > DEVT(3390)))
> >
> > Any bright ideas/pointers much appreciated.
> >
> > Sean
> >
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> "Aut viam inveniam aut faciam" - Hannibal.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Epoch Index

[Mike Schwab]

If I remember correctly, the timestamp runs from 1900 to 2042,
checking 1 high bit gives you 2 X 71 year epochs, 2 high bits gives 4
X 35.5 year epochs, 3 high bits gives 8 X 15.75 year epochs, 4 high
bits 16 X 7.875 year epochs.

Suggest checking 2 high bits, treating current and past 2 epochs (71-
106.5 years) as valid, and the next epoch as past data that needs to
be cleared before reuse.  From now to 2042, the future epoch of
b'00'did represent 1900-1935 so no past data, but starting in 2042 the
next epoch of B'01' currently used to represent 1936-1971 and might
have some data to be flagged.

On Wed, Jun 12, 2024 at 6:56 AM Peter Relson  wrote:
>
> 
> Am I correct in understanding that on current hardware an overflow from the 
> TOD
> will be carried into the Epoch Index, but only once?
> 
> No, that is not correct. The Epoch Index gets incremented upon the 
> wrap/overflow, for as many epochs as happen.
>
> 
> Am I correct in understanding that the Clock Comparator remains in 64-bit
> TOD format?  How will intervals spanning that time in 2042 be handled?
> 
> Yes, it is true. The short answer to the second question is "correctly".
> As a hint, try doing 64-bit arithmetic that subtracts a before-wrap 8-byte 
> TOD value from an after-wrap 8-byte TOD value and see what you get.
>
> Peter Relson
> z/OS Core Technology Design
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Inquiry about Installing Hercules on LinuxONE

[Mike Schwab]

We kept a system up for inquiries, finalizing transactions for a
couple of years.  Then the users printed reports and sent them to a
open systems so they could manually search them.


Hercules TK5 has Intercomm, a cics like application software, there is
also KicksForTso.  But the Cobol 68 compiler is quite old and only
ISAM/VSAM interface.

Moshix has had a TK4- instance up on Amazon cloud, and allowed others
to have accounts and simultaneous access.  Limited to 64K tracks so
3390-3.9, so lots of volumes, a UCB for every 3270 devices, so may
need many of those.  He would be a great person to set it up and
define more devices.  Virtual tapes can be uploaded and read /
written.

On Tue, Jun 11, 2024 at 5:53 PM Lennie Bradshaw
 wrote:
>
> If it is really not possible to run the z machine to extract your data, I 
> would recommend talking to ITC about running the IBM licensable z emulator 
> which runs z/OS. I think it is likely they have some kind of solution for 
> this.
>
> https://www.itconline.com/
>
> Lennie
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Jason Cai
> Sent: 11 June 2024 18:59
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Inquiry about Installing Hercules on LinuxONE
>
> Our organization's z mainframe has reached the end of its hardware service 
> life and is no longer capable of running z/OS. However, we have a LinuxONE 
> machine that remains operational.
>
> We possess historical data backups from our z/OS environment that we need to 
> access. To address this, we are considering the installation of the Hercules 
> emulator on our zLinux environment. Our goal is to utilize Hercules to 
> emulate the z/OS necessary to access our backup data sometime.
>
> Could you please advise on the feasibility of this approach? Specifically, we 
> are interested in understanding:
>
> 1. The compatibility of Hercules with zLinux on a LinuxONE machine.
> 2. Any known limitations or considerations we should be aware of when using 
> Hercules for this purpose.
> 3. The steps required to set up Hercules in a zLinux environment to access 
> z/OS backup data.
>
> Your expertise and guidance on this matter would be greatly appreciated. We 
> are eager to find a solution that allows us to utilize our existing resources 
> effectively while ensuring the integrity and accessibility of our historical 
> data.
>
> Thank you very much for your time and assistance.
>
> Best regards,
> Jason Cai
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Inquiry about Installing Hercules on LinuxONE

[Mike Schwab]

Hercules emulates Mainframe DASD on Open system disk.

On Tue, Jun 11, 2024 at 2:50 PM Jason Cai  wrote:
>
> Thank you very much for your response. Our historical backups are made 
> through DSS dumped to IBM TS7700 tape library, and the data mainly consists 
> of IMS and DB2 image copies and their unload datasets. We have over two years 
> of license time to use z14 and z/OS 2.5. We plan to restore the dumped data 
> to 3390 DASD through DSS, transfer it via FTP to disk on an x86 server, and 
> then convert this data from EBCDIC format to UTF-8 format. We intend to 
> completely abandon z/OS. However, given the large volume of data, we are 
> concerned about whether two years will be sufficient to complete this 
> migration.
>
> We are looking for a supplementary solution to continue our data transfer in 
> case the z14 is no longer available. I do not fully understand Linux 1. Can 
> Linux directly connect to TS7700, TS7600, and 3390 DASD ? Is Linux 1 
> restricted to connecting only to Linux-formatted DASD? Can Linux 1 handle the 
> conversion from EBCDIC to UTF-8?
>
> I remember many years ago purchasing an IBM zVDT to install on x86 for $1000 
> per year. Does IBM still offer this option?
>
> Is there another solution to solve our problem?
>
> Thank you very much.
>
> Jason Cai
> On Tue, 11 Jun 2024 14:50:39 -0400, Tony Harminc  wrote:
>
> >On Tue, 11 Jun 2024 at 13:58, Jason Cai  wrote:
> >
> >> Our organization's z mainframe has reached the end of its hardware service
> >> life and is no longer capable of running z/OS. However, we have a LinuxONE
> >> machine that remains operational.
> >>
> >> We possess historical data backups from our z/OS environment that we need
> >> to access. To address this, we are considering the installation of the
> >> Hercules emulator on our zLinux environment. Our goal is to utilize
> >> Hercules to emulate the z/OS necessary to access our backup data sometime.
> >>
> >
> >Hercules does not emulate *any *operating system. Hercules emulates *hardware
> >*from the S/370 all the way to zArch family.
> >
> >You would need to run an operating system under Hercules, no matter what
> >host platform (from Rasberry pi to Linux 1 and pretty much everything in
> >between) Hercules is running on.
> >
> >Even if it might work, you can't run z/OS for this purpose for IBM
> >licensing reasons.
> >
> >Could you please advise on the feasibility of this approach? Specifically,
> >> we are interested in understanding:
> >>
> >> 1. The compatibility of Hercules with zLinux on a LinuxONE machine.
> >>
> >
> >It should run, but probably hasn't been tested.
> >
> >2. Any known limitations or considerations we should be aware of when using
> >> Hercules for this purpose.
> >>
> >
> >Many...
> >
> >
> >> 3. The steps required to set up Hercules in a zLinux environment to access
> >> z/OS backup data.
> >>
> >
> >Again, you need an operating system, and presumably some application
> >program(s) that understand the format of your backup data. What format is
> >this historical data in? Backups on disk or (virtual?) tape? Made by what
> >program? Or is the historical data as-it-was on physical disks that were
> >attached to your former z/OS on an obsolete zArch machine and are now
> >attached to your Linux 1 box? In that case, what kind of disks, and what
> >kind of datasets?
> >
> >Depending on answers to the above, it is just faintly possible that you
> >could run MVS 3.8 in this environment, and use its understanding of IBM
> >disk geometry (limited 3390 support has been added by user mods) and access
> >methods to read the data. But there is still the question of what
> >application programs would read and interpret this data, whether they would
> >work on an old 24-bit MVS, and whether they too would have licensing issues.
> >
> >Without further information I would guess that writing new code in a modern
> >language to run directly under Linux on your Linux 1 machine and interpret
> >your historical data would be the best approach.
> >
> >Tony H.
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Inquiry about Installing Hercules on LinuxONE

[Mike Schwab]

Transactional execution facility instructions have not been implemented.

Has your z/OS machine stopped working or the current z/OS can't be
upgraded due to hardware requirements?


https://www.ibm.com/docs/bg/zos/2.4.0?topic=guide-transactional-execution

On Tue, Jun 11, 2024 at 12:58 PM Jason Cai  wrote:
>
> Our organization's z mainframe has reached the end of its hardware service 
> life and is no longer capable of running z/OS. However, we have a LinuxONE 
> machine that remains operational.
>
> We possess historical data backups from our z/OS environment that we need to 
> access. To address this, we are considering the installation of the Hercules 
> emulator on our zLinux environment. Our goal is to utilize Hercules to 
> emulate the z/OS necessary to access our backup data sometime.
>
> Could you please advise on the feasibility of this approach? Specifically, we 
> are interested in understanding:
>
> 1. The compatibility of Hercules with zLinux on a LinuxONE machine.
> 2. Any known limitations or considerations we should be aware of when using 
> Hercules for this purpose.
> 3. The steps required to set up Hercules in a zLinux environment to access 
> z/OS backup data.
>
> Your expertise and guidance on this matter would be greatly appreciated. We 
> are eager to find a solution that allows us to utilize our existing resources 
> effectively while ensuring the integrity and accessibility of our historical 
> data.
>
> Thank you very much for your time and assistance.
>
> Best regards,
> Jason Cai
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Inquiry about Installing Hercules on LinuxONE

[Mike Schwab]

hercules-390 on group.io will be you best support forum.
https://hercules-390.groups.io/g/group

On Tue, Jun 11, 2024 at 5:42 AM Jason Cai  wrote:
>
> Thank you for your prompt response.
>
> I have experience using Hercules on Windows and understand that I need it to 
> work with the relevant z/OS volume files. I have already downloaded Hercules, 
> but I do not recall needing to compile it. Could you please clarify if 
> compilation is necessary? If so, should I use Linux to download and compile 
> Hercules on LinuxONE?
>
> I would greatly appreciate detailed instructions on how to compile Hercules 
> on Linux. Additionally, I am interested in understanding the differences 
> between installing Hercules on Linux versus Windows.
>
> Thank you very much for your assistance.
>
> Jason Cai
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Inquiry about Installing Hercules on LinuxONE

[Mike Schwab]

Needs an OS already installed to download, compile, install Hercules
emulator.  Then you install an operating system on Hercules.

On Tue, Jun 11, 2024 at 4:58 AM Jason Cai  wrote:
>
> Hi all
>
> I am reaching out to see if anyone has experience installing Hercules on 
> LinuxONE. I have a few questions regarding this:
>
> 1. Is it possible to install Hercules on LinuxONE?
> 2. Is there any need to purchase a license or additional hardware to support 
> this installation?
>
> Any suggestions or advice would be greatly appreciated.
>
> Thank you in advance for your help.
>
> Best regards,
>
> Jason Cai
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: AI

[Mike Schwab]

Just like Tesla is the most valuable automobile manufacturer despite
the very low volume of autos manufactured.

On Wed, Jun 5, 2024 at 3:10 PM Dave Beagle
<0525eaef6620-dmarc-requ...@listserv.ua.edu> wrote:
>
> NVIDIA just passed 3 trillion in market cap. Based upon AI chips that they 
> are years ahead of the competition in producing. They are now the second most 
> valuable company and 1 of only 3 companies to ever achieve 3 trillion. Anyone 
> who thought AI wasn’t going to be huge wasn’t paying attention. Microsoft is 
> laying off workers in their cloud division.
> Beagle
>
>
> Sent from Yahoo Mail for iPhone
>
>
> On Wednesday, May 22, 2024, 8:53 PM, Dave Beagle 
> <0525eaef6620-dmarc-requ...@listserv.ua.edu> wrote:
>
> Well, NVIDEA reported earnings tonight and the growth was off the charts. 
> Growth never seen before. And no evidence of slowing down. Actually 
> accelerating. So much for the deniers.
>
> Nvidia shows no signs of AI slowdown after over 400% jump in data center 
> revenue
> https://www.cnbc.com/2024/05/22/nvidia-no-sign-of-ai-slowdown-after-over-400percent-jump-in-data-center-unit.html?__source=iosappshare%7Ccom.apple.UIKit.activity.CopyToPasteboard
>
>
> Beagle
>
> Sent from Yahoo Mail for iPhone
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: UUID for z/OS Instances

[Mike Schwab]

IBM Customer number?  You would have to manually retrieve from each
customer then apply to their records.  And customer number may apply
to the service provider and not the individual customers they support.

Stock ID on NYSE, AMEX, et?
Customer abbreviation of name?

On Tue, Jun 4, 2024 at 3:35 PM Matt Hogstrom  wrote:
>
> It’s a good question.  Perhaps I was too deep in my own problem.
>
> z/OS as an instance to me is a sysplex.sysname.smfid which would uniquely 
> identify that instance.  It could be IPL’d on different CECs but its still 
> the same “instance”.  So data is related to that instance of z/OS.
>
> z/OS does not have that kind of identifiable characteristic apart from the 
> sysplex.sysname.smfid and even that is a bit fungible because those names are 
> likely not unique.   For instance, if you were a service provider you could 
> have two different clients with a PLEXA.SMF1.SMF1 which are actually 
> different instances.
>
> Consider
>
> Coke PLEXA.SMF1.SMF1
> Pepsi PLEXA.SMF1.SMF1
>
> I’m  interested in being able to manage telemetry data from multiple 
> “instances” in a single database.  I can create my own discriminator to 
> separate them which is where I’m headed.
>
> Although, rather than assume that this problem is unique to me I thought I’d 
> ask to see if others have had issues of this nature and how they may have 
> addressed it.
>
>
> Matt Hogstrom
>
> > On Jun 4, 2024, at 15:32, Tony Harminc  wrote:
> >
> > On Tue, 4 Jun 2024 at 12:16, Matt Hogstrom  wrote:
> >
> >> I’m looking for a way to uniquely identify a z/OS instance across multiple
> >> clients/customers.  I see that z/OSMF has a get UUID but it appears to be
> >> for the z/OSMF instance and not for each z/OS.
> >>
> >> Is anyone aware of a generally accepted way to uniquely identify an
> >> instance?
> >>
> >> I’m asking because when emitting OTel telemetry data its common to have a
> >> UUID for an instance but that concept has really been foreign to z/OS
> >>
> >
> > I'm less than clear on what you mean by "instance".  Given that you have
> > some kind of "instance number", under what circumstances would you expect
> > it to change, and when should it stay the same?
> >
> > Upon IPL?
> >
> > Upon moving the software unchanged to a different LPAR on the same physical
> > machine?
> >
> > Upon changing the underlying hardware (CPU) but running the same LPAR
> > configuration?
> >
> > Upon restoring the z/OS image from backups and running it at a DR site?
> >
> > Upon applying maintenance to z/OS?
> >
> > Upon IPLing under zVM using a different VM userid?
> >
> > And doubtless several more situations.
> >
> > If none of the above cases would change your idea of the instance number,
> > then you probably want something that relates to the SMP/E or z/OSMF
> > database, as I see you're looking at.
> >
> > If some of them might change it, then one approach to look at is the STSI
> > instruction. This is a privileged instruction, but z/OS provides services
> > to access to much of the information it returns. There is a complex and
> > comprehensive MIB-like data structure returned by STSI, but it relates more
> > to the containing environment (LPAR, VM, etc.) rather then what's running
> > within.
> >
> > Perhaps you need both kinds of information.
> >
> > Tony H.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Missing SMF Record Type 89

[Mike Schwab]

In the system log check the SMF swap times and the batch jobs that
copy and re-initialize the SMF files.

On Mon, Jun 3, 2024 at 9:07 AM rpinion865
<042a019916dd-dmarc-requ...@listserv.ua.edu> wrote:
>
> We are running z/OS 2.4 on a z15 with three LPARs (Production, Development, 
> and Sandbox). We use SMF log streams to collect our SMF records. We kick off 
> a batch job everyday at 2:00 to capture the previous day's SMF records from 
> the log stream, and write them to a GDG dataset. SMF Type 89 is turned on for 
> all LPARs.
>
> This past month, May, our Sandbox LPAR has 23 hours missing on May 10th. The 
> LPAR was up on May 10th. Yet, there are no TYPE 89 records from 00:00 to 
> 23:00 on May 10th. I cannot determine why the SMF Type 89s were not cut for 
> that day. I have the syslog for that day and have looked at the messages 
> after midnight of the 10th. But I do not see anything regarding TYPE 89 
> records. What else can I do to determine why the 89s were not cut for that 
> one day only? Thanks in advance.
>
> Sent with [Proton Mail](https://proton.me/) secure email.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: VTOCs vs. catalogs

[Mike Schwab]

I didn't see where Lynn mentioned VSAM development, but several Future
Systems posts leading to
https://en.wikipedia.org/wiki/IBM_Future_Systems_project , where it
became S38, AS/400, IBM i.

https://www.garlic.com/~lynn/index.html#archpost is his posts.

On Fri, May 24, 2024 at 7:36 PM rpinion865
<042a019916dd-dmarc-requ...@listserv.ua.edu> wrote:
>
> What you described about VSAM is what I heard too, a replacement of the then 
> dominant access methods.
>
> Sent from Proton Mail Android
>
>
>  Original Message 
> On 5/24/24 8:18 PM, Joel C. Ewing  wrote:
>
> >  VSAM KSDS datasets were a clear win as a replacement for Indexed
> >  Sequental (ISAM) datasets when adding large numbers of keyed records.  I
> >  saw cases where a KSDS implementation literally ran two orders of
> >  magnitude faster  than ISAM and also took less DASD space, because ISAM
> >  required  that unblocked overflow records be serially searched when
> >  there was no remaining space in a block to insert a record with a given 
> > key.
> >
> >  In theory an ESDS dataset could be used to  replace a sequential dataset
> >  and BSAM/QSAM, but of course the application interfaces were
> >  considerably different, and VSAM constraints on block size meant you
> >  could take substantial hits on track efficiency and performance for
> >  certain logical record sizes.
> >
> >  An RRDS could be used as a functional replacement for direct access
> >  files, but again the restriction on block sizes caused compatibility
> >  issues, and tuning RRDS dataset access to get performance comparable to
> >  a well-tuned BDAM application was difficult to impossible.
> >
> >  You could probably have designed a functional replacement for PDS
> >  datasets with either a KSDS or RRDS organization, or a combination of
> >  KSDS and ESDS, but it wouldn't have been practical.  Many decades later
> >  PDSEs are almost a tranparent replacement for a PDS, but there are still
> >  some things possible with a PDS that are not supported for a PDSE.
> >
> >  If VSAM's goal was to replace all other file organizations, it failed.
> >  The only old dataset organization to be made totally obsolete by VSAM
> >  was ISAM.
> >
> >   JC Ewing
> >
> >  On 5/24/24 10:02, Paul Gilmartin wrote:
> >  > On Thu, 23 May 2024 22:24:06 -0500, Mike Schwab wrote:
> >  >> VSAM came from the Future Systems development as a complete
> >  >> replacement, Lynn Wheeler has posts about that.
> >  >> It was cut back to be an addition to MVS, then combined with CVOL
> >  >> catalogs to ICF.
> >  >>
> >  > "complete replacement" of what, specifically?  I have heard the
> >  > assertion that VSAM was intended to replace all other access
> >  > methods:  QSAM, BSAM, BPAM, ...
> >  >
> >  > ...
> >
> >  --
> >  Joel C. Ewing
> >
> >  --
> >  For IBM-MAIN subscribe / signoff / archive access instructions,
> >  send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: VTOCs vs. catalogs

[Mike Schwab]

Or one dataset on 59 DASD volumes.  Get one out of order you might
have problems.

On Fri, May 24, 2024 at 8:21 AM billogden  wrote:
>
> Subject: Re: VTOCs vs. catalogs
> > I'm curious whether any of you old-timers can explain why we have both
> VTOCs and catalogs.
>
> Please note that you can have datasets with exactly the same name on
> different volumes, but only one can be cataloged. This was (and might still
> be) a common practice for sysprogs who try to maintain a system. (I still do
> it when it is convenient.)
>
> Also, it is easy to move a non-VSAM non-SMS volume to a completely different
> z/OS system and simply recatalog the datasets (or some of them) on that
> volume.
>
> Bill Ogden
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: hints and tips and help for Git and GitHub for mainframers

[Mike Schwab]

DogeCICS is a live git project you can use.
(Linux on iOS or Android, Mocha 3270 lite),
Hercules, TK 4- or 5, KicksForTSO, 3270 emulator.

On Fri, May 24, 2024 at 8:05 AM Rick Troth
<058ff5c2d0a7-dmarc-requ...@listserv.ua.edu> wrote:
>
> howdy folks ...
>
> I was asked this week for help with Git. The target audience is
> mainframe people. (But I don't expect to be presenting.)
>
> I had previously helped this particular group get on-board using Git and
> GitHub, but that was several months ago. They're again looking at it, so
> their leader asked me for whatever material I might have.
> But I got nuthin. I don't see a PowerPoint deck in any of my stuff.
>
> Therefore, does anyone here have a PPT deck or a SHARE PDF for a
> Git/GitHub how-to for mainframers?
>
>
> thanks
>
>
> -- R; <><
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: VTOCs vs. catalogs

[Mike Schwab]

For the most part the catalog lets you locate your dataset no matter
which volume you put it on.
For non-vsam, that is about all that is stored, dataset
characteristics are in the VTOC.
And with non-SMS volumes you can have uncataloged datasets on DASD or tape.

VSAM came from the Future Systems development as a complete
replacement, Lynn Wheeler has posts about that.
It was cut back to be an addition to MVS, then combined with CVOL
catalogs to ICF.

On Thu, May 23, 2024 at 9:32 PM Phil Smith III  wrote:
>
> I'm curious whether any of you old-timers can explain why we have both VTOCs 
> and catalogs. I'm guessing it comes down to (a) VTOCs
> came first and catalogs were added to solve some problem (what?) and/or (b) 
> catalogs were added to save some I/O and/or memory, back
> when a bit of those mattered. But I'd like to understand. Anyone?
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: How to convert these IMS unload files from EBCDIC to UTF-8 encoding.

[Mike Schwab]

01 segment.record.
05 name1-length pic s9(04) comp.
05 name2-length pic s9(04) comp.
05 name3-length pic s9(04) comp.
05 name4-length pic s9(04) comp.
05 name5-length pic s9(04) comp.
05 name1-text.
10 name1-char pic x(01) occurs 0 to 99 times depending on name1-length.
05 name2-text.
10 name2-char pic x(01) occurs 0 to 99 times depending on name2-length.
05 name3-text.
10 name3-char pic x(01) occurs 0 to 99 times depending on name3-length.
05 name4-text.
10 name4-char pic x(01) occurs 0 to 99 times depending on name4-length.
05 name5-text.
10 name5-char pic x(01) occurs 0 to 99 times depending on name5-length.

On Tue, May 21, 2024 at 11:39 AM Mike Schwab  wrote:
>
> All thength fields MUST occur before length depending on.
>
> On Tue, May 21, 2024 at 10:23 AM Binyamin Dissen
>  wrote:
> >
> > On Tue, 21 May 2024 15:01:12 + "Schmitt, Michael"
> >  wrote:
> >
> > :>3. Depends on the language. IMS can have variable length segments but not 
> > variable length fields, so any variable length fields are defined by the 
> > application. If the application is in COBOL, there's no native variable 
> > length field format. Applications can simulate variable length fields but 
> > how they do it is in application logic.
> >
> > Well, I don't know about that.
> >
> >
> > 01  var-field-length  pic  s9(4)  comp.
> >
> > 01   var-field.
> >05  var-field-character pic x occurs 1 to 1000 times depending on
> > var-field-length.
> >
> >
> > When a MOVE is performed to or from VAR-FIELD the length from 
> > VAR-FIELD-LENGTH
> > is used.
> >
> > --
> > Binyamin Dissen 
> > http://www.dissensoftware.com
> >
> > Director, Dissen Software, Bar & Grill - Israel
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> --
> Mike A Schwab, Springfield IL USA
> Where do Forest Rangers go to get away from it all?



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

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

Re: How to convert these IMS unload files from EBCDIC to UTF-8 encoding.

[Mike Schwab]

All thength fields MUST occur before length depending on.

On Tue, May 21, 2024 at 10:23 AM Binyamin Dissen
 wrote:
>
> On Tue, 21 May 2024 15:01:12 + "Schmitt, Michael"
>  wrote:
>
> :>3. Depends on the language. IMS can have variable length segments but not 
> variable length fields, so any variable length fields are defined by the 
> application. If the application is in COBOL, there's no native variable 
> length field format. Applications can simulate variable length fields but how 
> they do it is in application logic.
>
> Well, I don't know about that.
>
>
> 01  var-field-length  pic  s9(4)  comp.
>
> 01   var-field.
>05  var-field-character pic x occurs 1 to 1000 times depending on
> var-field-length.
>
>
> When a MOVE is performed to or from VAR-FIELD the length from VAR-FIELD-LENGTH
> is used.
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: How to convert these IMS unload files from EBCDIC to UTF-8 encoding.

[Mike Schwab]

Each segment must be its own table with the combined key that includes
the key of the parent in parent order.

On Tue, May 21, 2024 at 6:56 AM Binyamin Dissen
 wrote:
>
> On Tue, 21 May 2024 04:08:16 -0500 Jason Cai  wrote:
>
> :>In the IMS system I work on, 99% of the segment fields are not defined in 
> the DBD.”
>
> From my IMS recollection, that is typical. The application code has maps of
> the segments. Only fields used in searches needed to be defined.
>
> So if you think you can ignore the segment data in the download/conversion
> 
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ./ ADD - which utility? (RANT)

[Mike Schwab]

Here's what is available.  Please submit any additions you may know.

https://www.cbttape.org/xmitview.htm

On Sat, May 18, 2024 at 4:32 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 18 May 2024 23:15:26 +0200, Radoslaw Skorupka  wrote:
> >...
> >Yes, we have some freeware XMIT viewers, we have some homegrown REXX
> >scripts, etc.
> >
> for which desktop target platforms?
>
> >But it is continuous reinventing the wheel.
> >IMHO it is up to IBM to assign few folks for few weeks to prepare such
> >tools. It need not to be officially supported.
> >IBM invest a lot of effort in z/OSMF and other "modernization", but such
> >simple things like PDS to directory are still left.
> >
> for which desktop target platforms?
>
> But if it's  Java, it might be nonpartisan.
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Fault Analyzer output for executed instructions?

[Mike Schwab]

Length is a nibble, x0 is one byte, one digit, one sign, xF is 16
bytes, 31 digits, 1 sign.

On Tue, May 14, 2024 at 6:48 PM Seymour J Metz  wrote:
>
> I have a program that is getting an S0C7 on an EX instruction. The output 
> from Fault Analyzer contains the target instruction as is, with a zero length 
> field, and only displays one byte of the operand. Is this a bug or a feature?
>
> Is there a way to force FA to display the entire field as defined in ADATA, 
> or to do the same logical or as the EX does?
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: DFSORT newline

[Mike Schwab]

https://www.editpadpro.com/tricklinebreak.html

Windows, and DOS before it, uses a pair of CR and LF characters to
terminate lines. UNIX (Including Linux and FreeBSD) uses an LF
character only. OS X also uses a single LF character, but the classic
Mac operating system used a single CR character for line breaks. In
other words: a complete mess.

MVS uses F / V record boundaries to denote newlines.

https://www3.rocketsoftware.com/bluezone/help/v50/en/bz/DISPLAY/IND$FILE/IND$FILE_Technical_Reference.htm

IND$FiLE uses ASCII CRLF to translate.

On Sat, May 11, 2024 at 8:25 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> in 
> ,
> I read:
> .   The period symbol matches any one character except the terminal 
> newline character.
>
> So how may the programmer match a newline character?
> I I read in an apparently related publication,
> ,
> $
> The dollar symbol matches the end of the string. (Use \n to match a 
> newline character.)
>
> Does "\n" work alike for DFSORT?
>
> What is the code point for the newline character?  It doesn't appear
> in Appendix D, Table 109 where it should be because it's mentioned
> elsewhere in the Guide.
>
> (I'm guessing it's x'15', but the reader shouldn't need to guess.)
>
> Thanks,
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Inquiry Regarding Sudden Increase in DFSMSrmm CDS Utilization

[Mike Schwab]

Is CA-Reclaim active to reuse empty control areas?  You can add it to
existing datasets but won't reclaim CAs already empty.

On Fri, May 10, 2024 at 5:00 AM Jason Cai  wrote:
>
> Dear all
>
>  We have encountered a situation that requires your expertise and guidance.
>
> Today, we have noticed a sudden increase in the utilization of our DFSMSrmm 
> Control Data Set (CDS) by 20%, from 55% to 75%, exceeding our warning 
> threshold of 70%. This surge is puzzling since our daily data backup volume 
> remains unchanged.
>
> Our question revolves around the possible DFSMSrmm activities, other than 
> backup operations, that could contribute to an increase in the RMM CDS 
> utilization. Currently, we only have the RMM journal .
>
> Could you kindly advise us on which messages we should be looking into to 
> identify the potential cause of this issue in the RMM journal?
>
> We would greatly appreciate any suggestions or recommendations that you could 
> provide.
>
> Thank you in advance for your time and assistance.
>
> Kind Regards,
>
> Jason Cai
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: [EXTERNAL] Re: JOB card format

[Mike Schwab]

357912 so 5x the 64k limit.
* 60 = 2,1474,720  seconds.
About 1/1000 of a 2GB limit if .001 second units.

On Thu, May 9, 2024 at 12:48 PM Pommier, Rex  wrote:
>
> Subject: [EXTERNAL] Re: JOB card format
>
> On Thu, 9 May 2024 10:44:10 -0500, Steve Beaver  wrote:
>
> >TIME=1440 turns off the timing  -- This depends on whether there is an
> >exit controlling the use of 1440
> >
> I wonder why the designers didn't choose , the  largest possible 4-digit 
> value, to mean "forever"?  (OTHH, I get cognitive dissonance with products 
> that use
> 0 to mean "unlimited".)
>
> --
> gil
>
> --
>
> Gil et al,
>
> So how did they come up with this one?  From the JCL reference manual:
>
> minutes
> Specifies the maximum number of minutes the step can use the processor. 
> Minutes must be a number
> from 0 through 357912 (248.55 days).
>
> 357912 minutes?  My brain isn't coming up with a logical explanation for that 
> number.
>
> Rex
>
> --
> The information contained in this message is confidential, protected from 
> disclosure and may be legally privileged. If the reader of this message is 
> not the intended recipient or an employee or agent responsible for delivering 
> this message to the intended recipient, you are hereby notified that any 
> disclosure, distribution, copying, or any action taken or action omitted in 
> reliance on it, is strictly prohibited and may be unlawful. If you have 
> received this communication in error, please notify us immediately by 
> replying to this message and destroy the material in its entirety, whether in 
> electronic or hard copy format. Thank you.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Restore members in a PDS - how/which tool?

[Mike Schwab]

If you have HSM backups, hrecover dsn should get the last backup (last night?).

On Wed, May 8, 2024 at 9:15 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Thu, 9 May 2024 01:52:31 +, Mark Jacobs wrote:
>
> >Look at this.
> >
> >https://cbttape.org/freepds.htm
> > .
> If "all members" were deleted it might be less tedious to restore a backup.
>
> CBTTape says it now supports PDSE.  Does recovering a PDSE member
> depend on version support?
>
> Is there a technique to effectively "delete"  a PDSE member by making all
> versions invisible to BLDL yet recoverable?  (That's possible with PDS until
> compress.)
>
>
> >On Wednesday, May 8th, 2024 ... wrote:
> >
> >> I have screwed up badly as I succeded to delete all members in my rexx ds.
> >>
> >> I know that there are tools/methods to restore them but those were among 
> >> the members I deleted...
> >> (That is by working with the pds as it is itself.)
> >>
> >> Any that info about how?
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Adoption of ASCII [Was: EBCDIC/ASCII - FTP]

[Mike Schwab]

And beyond the 7 bit ASCII there were many National ASCII code pages
using the 8th bit.

On Wed, May 8, 2024 at 12:07 PM Steve Thompson  wrote:
>
> I think the answer to this question "If IBM had "inflicted" ASCII
> on its customers in 1964, would the System/360 have had the wide
> acceptance that it did?" was the WANG VS series machines. Just
> from my personal experience, many banks were using them, and IBM
> was, to some degree, targeting them with MP2000 & 3000 boxes.
> Again from my experience in programming with the Wang VS systems,
> they appeared to me to be a S/360 with DAT. I think this may have
> been because Dr. Wang waited until the patents expired for the
> S/370 features. I was involved in migrating several of those
> systems into an MVS/JES3 environment (mid-1980s time frame) used
> by a major bank that was buying up small banks that were using
> WANG VS machines. I had to convert their banking software data to
> match Florida Software (for banks) [not to be confused with the
> State of Florida]. Steve Thompson
> On 5/8/2024 11:36 AM, Tom Marchant wrote:
> > I have seen this before, and I am not persuaded. I find it interesting
> > that all of the references provided were written by Mr. Beemer himself,
> > some of them with another author.
> >
> > Perhaps, in hindsight it would have been better if IBM had made the
> > System/360 an ASCII only machine. But at the time, ASCII was new and
> > relatively unknown. As it was, the market had generally rejected ASCII
> > on System/360, so the USASCII bit was removed with the introduction of
> > System/370 in 1970.
> >
> > Both ASCII and EBCDIC are limited. ASCII, even more so because it is a
> > 7 bit code, though there are proprietary 8 bit extensions. No one knew
> > in 1964 that Unicode would later be designed based upon ASCII.
> >
> > The claim that "A 1-to-1 translation between the two [ASCII and EBCDIC]
> > exists" is false.Each includes characters that are not defined in the
> > other. This has always been the case.
> >
> > If IBM had "inflicted" ASCII on its customers in 1964, would the
> > System/360 have had the wide acceptance that it did? We will never know.
> >
> > According to "Architecture of System/360"
> > https://cpb-us-w2.wpmucdn.com/sites.gatech.edu/dist/8/175/files/2015/08/IBM-360.pdf
> >
> > 
> > The reasons against such exclusive adoption was the
> > widespread use of the BCD code derived from and easily
> > translated to the IBM card code. To facilitate use of both
> > codes, the central processing units are designed with a
> > high degree of code independence, with generalized code
> > translation facilities, and with program-selectable BCD or
> > ASCII modes for code-dependent instructions. Neverthe-
> > less, a choice had to be made for the code-sensitive I/O
> > devices and for the programming support, and the solution
> > was to offer both codes, fully supported, as a user option.
> > Systems with either option will, of course, easily read or
> > write I/O media with the other code.
> > 
> >
> > Aside from that, it wasn't the "P-bit", but the A bit.
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: IMS - DFSRRC00 vs ODBA

[Mike Schwab]

VSAM?  No IMS / DB2 overhead.
Datacom?  PS-FB.

On Mon, Apr 15, 2024 at 5:08 PM Pierre Fichaud  wrote:
>
> I think in most cases, the database will be local.
>
> Assuming local, is access faster using DFSRRC00 or ODBA.
>
> If not local, what is faster?
>
> Thnx, Pierre
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ./ ADD - which utility?

[Mike Schwab]

You can set it up for a //SYSIN DD DATA,DLM='??' and add the
'??'
Card at the end.

On Sat, Apr 13, 2024 at 6:52 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sun, 14 Apr 2024 08:34:30 +1000, Wayne Bickerdike wrote:
>
> >I have some REXX code that extracts all members of a PDS and writes it to a
> >sequential file. Each member extracted is prefixed with the ./ADD card with
> >the original member name. Handy for moving a PDS to another system.
> >IEBUPDTE was the utility of choice when all we had was a card punch and
> >card reader. (1975).
> >
> Have you just rediscovered IEBPTPCH?
>
> How does this work if your input PDS is a JCL library containing some
> jobs with IEBUPDTE steps with instream commands?
>
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: ./ ADD - which utility?

[Mike Schwab]

No relation to the ditty bops band.
https://www.youtube.com/watch?v=iu7289s7l64

On Sat, Apr 13, 2024 at 4:56 PM Rupert Reynolds  wrote:
>
> Affectionately known in UK as I-E-B-up-ditty :-)
>
> On Sat, 13 Apr 2024, 15:39 ITschak Mugzach, <
> 05a7ced721d8-dmarc-requ...@listserv.ua.edu> wrote:
>
> > IEBUPDTE. JCL can be found in google
> >
> > ITschak Mugzach
> > *|** IronSphere Platform* *|* *Information Security Continuous Monitoring
> > for z/OS, x/Linux & IBM I **| z/VM coming soon  *
> >
> >
> >
> >
> > On Sat, Apr 13, 2024 at 5:30 PM   <
> > 0619bfe39560-dmarc-requ...@listserv.ua.edu> wrote:
> >
> > > Which utility do you use for control statement/input:
> > > ./ ADD
> > >
> > > A jcl for that would be nice too.
> > >
> > > ...Embarassed by my lack of memory after 8 years out of this
> > > envirinment...
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Posting issues?

[Mike Schwab]

https://www.theregister.com/2024/04/03/outlookcom_blocked_by_gmail/
Might be part of the issue.

On Sat, Apr 6, 2024 at 2:22 PM Phil Smith III
<060e4b8f09b8-dmarc-requ...@listserv.ua.edu> wrote:
>
> Indeed. I'm thinking that either UA.edu or their provider stepped up their 
> filtering. But that's why I'm asking: to see if other folks are in the same 
> boat, so at least I'd *know*. So far nothing definitive.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Walt Farrell
> Sent: Saturday, April 6, 2024 9:41 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Posting issues?
>
> On Fri, 5 Apr 2024 15:36:21 -0400, Phil Smith III  wrote:
>
> >Yeah, I have SPF records.
>
> But, increasingly, it seems to be necessary to have DMARC and DKIM properly 
> setup, too. I don't know if that would explain your problem with this mailing 
> list, though.
>
> --
> Walt
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Slow FTP's

[Mike Schwab]

How about processors (z15/z16)?

On Thu, Mar 28, 2024 at 7:30 AM Jousma, David
<01a0403c5dc1-dmarc-requ...@listserv.ua.edu> wrote:
>
> All,
>
> Grasping at straws here, IBM support center is baffled too.
>
> To clone z/OS maintenance to various disconnected sysplex’s I do a DFDSS 
> dump, and FTP it everywhere it needs to be.  Its roughly a 50Gb file 
> transfer.  There is some environmental issue causing slow file transfers to 
> some systems (40mb’s a sec) and fast file transfers (150Mb/sec) to other 
> systems on the same CEC.With IBM support help, we’ve narrowed down the 
> problem to the specification of MODE B and EBCDIC on the transfer since it is 
> a DSS dump.   Remove those, and the transfer is fast on the slow systems, and 
> still fast on the fast systems.  Obviously that isn’t a solution though.
>
> So, we are a GDPS shop.   The oddity is that all the “fast” transfers are to 
> the K systems(control systems), and all the “slow” transfers are to the 
> traditional application systems.   TEST, DEV, PROD makes no difference, nor 
> does LPAR busy or not busy.
>
> It seems there is something configured differently on the “slow” systems that 
> is affecting mode b, ebcdic file transfers, but for the life of me, I cannot 
> put my finger on what, nor can the support center, except that the issue is 
> at the remote end, in that the OS cannot offload the data fast enough, so 
> TCPIP/FTP is slowing the transfer pace.
>
> A virtual adult beverage of choice to the one that can point in a direction 
> to look….
>
>
> Dave Jousma
> Vice President | Director, Technology Engineering
>
>
>
>
>
> This e-mail transmission contains information that is confidential and may be 
> privileged.   It is intended only for the addressee(s) named above. If you 
> receive this e-mail in error, please do not read, copy or disseminate it in 
> any manner. If you are not the intended recipient, any disclosure, copying, 
> distribution or use of the contents of this information is prohibited. Please 
> reply to the message immediately by informing the sender that the message was 
> misdirected. After replying, please erase it from your computer system. Your 
> assistance in correcting this error is appreciated.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: IBM VTS and cloud

[Mike Schwab]

https://www.redbooks.ibm.com/redpapers/pdfs/redp5573.pdf Updated Jan 2024.

On Wed, Mar 27, 2024 at 11:07 AM Radoslaw Skorupka
<0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:
>
> The following scenario:
> Two TS770T (with TS4500 attached) connected in grid.
> Now there is a business requirement to keep third copy of data in a
> cloud, preferably Azure or Google.
> Q1: is it feasible?
> Q2: is it require to purchase third TS7700 with cloud attachment?
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Ideas for less-distruptive disruptions - Netmaster:Solve and CICS

[Mike Schwab]

Here is a set of CICS transactions to perform DogeCoin transactions
via CICS.  The first screen could be simplified to be display only,

https://github.com/mainframed/DOGECICS

On Wed, Mar 20, 2024 at 4:01 PM Tom Longfellow
<03e29b607131-dmarc-requ...@listserv.ua.edu> wrote:
>
> Paul
>
> The answer to your question is BOTH - Individual apps are being yanked before 
> the eventual complete shutdown of everything the region does.
>
> Our internal thoughts parallel your ideas for CICS.   One of the hurdles is 
> that since the mainframe is marked for death, we have no real access to 
> application programmers to write the new transaction.  I am too old to learn 
> all the skills required to write the code and screen maps for a new program.
>
> Solve is a VTAM session switcher. If we ever get a dedicated region with 
> only the "landing page" transaction, I would redirect SOLVE to send the 
> switching definition to the 'death zone' CICS.
>
> Has anybody developed an 'Out of Service' transaction for use during periods 
> of extended application or data base maintenance?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: TSO ALLOC with/wo unit

[Mike Schwab]

UNIT is defined in the I/O gen and is customized by each site.  3390,
SYSDA, etc may or may not be present.

On Wed, Mar 20, 2024 at 1:57 AM ITschak Mugzach
<05a7ced721d8-dmarc-requ...@listserv.ua.edu> wrote:
>
> I have a program in Rexx that allocates a dataset using dsname and volume
> serial (1) . it works well in my shop but requires a unit type (2) in
> another shop. Actually the error is msg "IKJ56241I SPECIFIED UNIT IS
> UNDEFINED".
> Why does 1 work here and fails in another shop?
>
>1. ALLOC F(XXX) DA('dsname') VOLUME(volser)
>2. ALLOC F(XXX) DA('dsname') VOLUME(volser) UNIT(390)
>
> ITschak
>
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Continuous Monitoring
> for z/OS, x/Linux & IBM I **| z/VM coming soon  *
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Hmm, 3 ... (Re: Rexx numeric digits and scientific notation question

[Mike Schwab]

https://github.com/CBTTape/CBT993

Probably other CBT tape members to process.

On Sun, Mar 17, 2024 at 7:11 PM Rupert Reynolds  wrote:
>
> SMF logging of data for management information? I never did much with SMF,
> but I can't see why not.
>
> I did briefly consider being able to parse existing mapping macros, but
> that's bound to be a bigger job than it seems, especially now I'm a bit
> rusty and only have Hercules to play with.
>
> Structures (maybe 'map' because 'str' is already short for the most basic
> type of 'string'). And pointers to them, yes. Wouldn't be without them :-)
>
> I'll probably be old and slow, or losing my concentration, before it's even
> half finished. Still, it keeps me out of mischief when I'm not at work or
> converting the van for mobile glamping  :-)
>
> Roops
>
> On Sun, 17 Mar 2024, 18:31 Seymour J Metz,  wrote:
>
> > I probably would use ":=" for assignment and "=" for equality.
> >
> > Are you supporting SMF-like structures?
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> > עַם יִשְׂרָאֵל חַי
> > נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
> >
> > 
> > From: IBM Mainframe Discussion List  on behalf
> > of Rupert Reynolds 
> > Sent: Sunday, March 17, 2024 2:08 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Hmm, 3 ... (Re: Rexx numeric digits and scientific notation
> > question
> >
> > It's too soon to publish much, especially when I have a full time job doing
> > something else. To be honest I probably never will, because it only suits
> > my pet bigotries :-)
> >
> > But briefly, I looked at day 1 notes (on back of a gas bill). They included
> > these, not all of which will ever make it into use of course:
> >
> > . fairly terse {} syntax, borrowing from 'C' etc.
> >
> > . strongly typed by default
> >
> > . one type is bignum--arbitrary precision and base arithmetic, trig, logs
> >
> > . correctness and flexibility more important than speed (like external
> > functions in Rexx scripts, for example)
> >
> > . project to include thorough test cases, and any bugs/unintended quirks in
> > either impl or tests will be fixed ruthlessly, not supported. If it fails
> > the test, it is not the real thing.
> >
> > . compiled code could include interpreter for scripting
> >
> > . preserves case, but keywords and functions etc. not case sensitive
> >
> > . all keywords can be abbreviated (eg. if min abbreviation is 3, 'fun' is
> > same as 'function')
> >
> > . '=' not required for assignment!
> >
> > . ability to convert 'C' style strings and call 'C' code
> >
> > . all built-in functions for handling null-terminated data and UTF-16 to be
> > prefixed gk_ (short for "ghastly kludge" ;-) )
> >
> > Feel free to laugh/crjticise, but please be kind--I was drinking during
> > lockdown when I finished that list :-)
> >
> > I made some progress on the bignum logarithms and trig early, borrowing
> > heavily on the external Rexx functions I used under Windows.
> >
> > It does basics such as finding and moving files interpreted, so I can use
> > it to test my Rexx admin scripts, and vice versa, but there are *huge*
> > gaps, and I'm moving house this year, so... :-)
> >
> > Roops
> >
> >
> > On Sun, 17 Mar 2024, 16:58 Seymour J Metz,  wrote:
> >
> > > >  I'm developing a language
> > >
> > > Have you published any details?
> > >
> > > --
> > > Shmuel (Seymour J.) Metz
> > > http://mason.gmu.edu/~smetz3
> > > עַם יִשְׂרָאֵל חַי
> > > נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
> > >
> > > 
> > > From: IBM Mainframe Discussion List  on behalf
> > > of Rupert Reynolds 
> > > Sent: Saturday, March 16, 2024 9:07 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: Hmm, 3 ... (Re: Rexx numeric digits and scientific notation
> > > question
> > >
> > > My experience of modern scripting languages, compared with classic Rexx,
> > is
> > > that they all do something new more easily, but also I can't think of one
> > > that doesn't have an obvious pitfall (such as, for example, stumbling
> > badly
> > > over certain byte values such as NUL in strings).
> > >
> > > Classic Rexx under TSO and Regina Rexx under Windows and Linux, despite
> > > certain old-fashioned quirks, are still sometimes what I reach for when I
> > > want to process some data while avoiding those pitfalls.
> > >
> > > The differences are so strong to me that I'm developing a language which
> > is
> > > effectively the best bits (IMHO) of Rexx, C and even older languages such
> > > as Algol 68 (much underrated in my book) and hints of PL/1. I don't make
> > > that much effort without reason :-)
> > >
> > > By definition it works the same interpreted or compiled, which brings a
> > > couple of restrictions I'm willing to live with :-)
> > >
> > > Roops
> > > p.s. I'm not convinced that that familiarity is a reason to criticise
> > > choosing a language. Using something you know well is often a way of
> > giving
> > > bettet value and rel

Re: What happens in HSM when I change a Management Class

[Mike Schwab]

You should be recycling tapes with a low percent of active datasets.
This copies the remaining active datasets to a new tape then marking
this on as inactive.  You can manually issue a recycle command against
a specific volume.

On Wed, Mar 13, 2024 at 10:56 AM Gadi Ben-Avi  wrote:
>
> Hi Paul,
> Thanks for your detailed explanation.
>
> I would like to delete extra copies of backups, backups that have been on HSM 
> for more than a specified number of days, and as a result of that, tapes that 
> become empty will be deleted.
>
> The end result would be that every backed-up dataset that still exists could 
> have more than one backup, and datasets that do not exist anymore would have 
> only one backup.
>
> Gadi
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Paul Feller <05aa34d46684-dmarc-requ...@listserv.ua.edu>
> Sent: Wednesday, March 13, 2024 16:09
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: What happens in HSM when I change a Management Class
>
> [You don't often get email from 
> 05aa34d46684-dmarc-requ...@listserv.ua.edu. Learn why this is important 
> at https://aka.ms/LearnAboutSenderIdentification ]
>
> Gadi, I have to ask.  Are trying to delete backups of individual datasets or
> the actual tapes created during dataset backup processing?
>
> If you are trying to manage the actual backups of individual datasets, have
> you looked at the different management classes used for the datasets?
>
> The following fields in the management class affect backups taken for an
> individual dataset.
>
> Retain Days Only Backup Ver:
>  Indicates how many days to keep the most recent backup version of a deleted
> data set, starting from the day DFSMShsm detects it has been deleted. This
> attribute applies only when a data set no longer exists on primary (level 0)
> or migrated (levels 1 and 2) storage. The default is 60. This field does not
> apply to objects. Backup copies of objects are not retained when the
> original object is deleted.
>
> Retain Days Extra Backup Vers:
>  Indicates how many days to keep backup versions other than the most recent
> one, starting from the day backups were created. It applies only when more
> than one backup version exists, and when a data set has low activity. This
> attribute applies whether the data set has been deleted or not. The default
> is 30. The number of extra versions is the number of backup versions minus
> one. If you specify 1 for Number of Backup Vers, there are no extra
> versions. For example, if you specify 3 for Number of Backup Vers (Data Set
> Deleted), the number of "extra" versions for deleted data sets is 2. These 2
> versions are managed according to the Retain Days Extra Backup Vers
> attribute. Any other versions that may have existed when the data set was
> deleted will be deleted the next time EXPIREBV is processed.
>
> Number of Backup Vers:
>  Specifies the maximum number of backup versions to retain for a data set.
> The default is 2 if the data set still exists and 1 if it has been deleted.
>  Creating a new backup version when the number of backup versions already
> equals the value specified for the appropriate Number of Backup Vers
> attribute (Data Set Exists) causes the oldest version of the appropriate
> type to be deleted.
>  The number of backup versions is used to determine whether OAM should write
> one or two backup copies of the objects, when you activate the
> SECONDBACKUPGROUP function for objects using SETOSMC in the CBROAMxx member
> of PARMLIB. If the number of backup versions is greater than 1 and AUTO
> BACKUP is Y, OAM will create two backup copies. When the original object is
> expired or deleted, all backup copies are also deleted.
>
>
>
> Paul
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Gadi Ben-Avi
> Sent: Wednesday, March 13, 2024 6:54 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: What happens in HSM when I change a Management Class
>
> Thanks
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Mark Jacobs
> Sent: יום ד 13 מרץ 2024 13:43
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: What happens in HSM when I change a Management Class
>
> [You don't often get email from
> 0224d287a4b1-dmarc-requ...@listserv.ua.edu. Learn why this is important
> at https://aka.ms/LearnAboutSenderIdentification ]
>
> I believe it'll take affect during your secondary space management cycle.
>
> Mark Jacobs
>
> Sent from ProtonMail, Swiss-based encrypted email.
>
> GPG Public Key -
> https://eur04.safelinks.protection.outlook.com/?url=https%3A%2F%2Fapi.protonmail.ch%2Fpks%2Flookup%3Fop%3Dget%26search%3Dmarkjacobs%40protonmail.com&data=05%7C02%7CGADI_B%40MALAM.COM%7C8464f7a0043742165f4308dc436740ff%7C2669957b2b9e4ff0859535b303d5fcec%7C0%7C0%7C638459357967173434%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C0%7C%7C%7C&sdata=nQjPuHbX%2FNSLUd%2F5ToERFZ2UepUpgz35HZ

Re: Mainframer Lunch

[Mike Schwab]

https://community.ibm.com/community/user/integration/communities/globalgrouphome?CommunityKey=e22492ad-a425-4d88-b8af-19d978e58af5

On Tue, Mar 12, 2024 at 9:41 PMwrote:
>
> Hey,
> I would like to have a LUNCH get together with any mainframer's in the 
> Indianapolis Indiana area.
> Maybe once a month?  If interested, let me know  ming...@prodigy.net
> David Mingee
> 317 903-9455
> Thanks
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Github infections

[Mike Schwab]

https://www.theregister.com/2024/03/01/github_automated_fork_campaign/?td=rt-3a

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

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

Re: 35th International Rexx Symposium in Birsbane (Australia) about to start

[Mike Schwab]

https://www.rexx.org/
Last Release Aug 2022.

On Fri, Mar 1, 2024 at 8:23 PM Paul Gilmartin
<042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 2 Mar 2024 09:44:54 +1100, ronyF wrote:
> >
> >The link to further symposium information including the schedule can be
> >found at , just click the box on the upper
> >...
> (drifting) That page links to the Regina page at:
>   which invites a subscription at:
> Support
> A mailing list exists for the announcement and discussion of Regina
> related matters.  To subscribe to this mailing list, send an email
> message to the list server  with
> the first line of the body of the message containing:
> subscribe regina-l
>
> ... but that fails with:
> 550: 5.1.1 Requested action not taken: mailbox unavailable
>
> Is the Regina list still active?
>
> --
> Thanks,
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: [Very much off-topic] Re: AI is the real deal.

[Mike Schwab]

Yep.  Magnetic fields moving over power lines generating massive
amounts of current.
https://www.sciencetimes.com/articles/44957/20230721/quebec-blackout-1989-lessons-geomagnetic-storm-shocked-entire-nation.htm

On Thu, Feb 22, 2024 at 9:08 PM Michael Oujesky  wrote:
>
> And all it will take is one solar flare like the one in 1859 (Carrington 
> event) to take the world back to pre-electricity days
>
> https://www.bu.edu/articles/2012/detecting-the-perfect-solar-storm/#:~:text=If%20a%20massive%20storm%20like,U.S.%20National%20Academy%20of%20Sciences.
>
> Michael
>
> On Thu, Feb 22, 2024, at 8:06 PM,Seymour J Metz wrote:
> > Dedicated fax machines, combo printer/scanner/fax or wokstations with
> > fax modems?
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> > עַם יִשְׂרָאֵל חַי
> > נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
> >
> > 
> > From: IBM Mainframe Discussion List  on
> > behalf of Gibney, Dave <03b5261cfd78-dmarc-requ...@listserv.ua.edu>
> > Sent: Thursday, February 22, 2024 7:29 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: [Very much off-topic] Re: AI is the real deal.
> >
> > Fax machines are still heavily used un medical and legal areas
> >
> >> -Original Message-
> >> From: IBM Mainframe Discussion List  On
> >> Behalf Of zMan
> >> Sent: Thursday, February 22, 2024 4:06 PM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: Re: [Very much off-topic] Re: AI is the real deal.
> >>
> >> [EXTERNAL EMAIL]
> >>
> >> The FAX machine's impact wasn't exactly tiny. Short-lived, yes.
> >>
> >> On Thu, Feb 22, 2024 at 7:04 PM Dave Beagle < 0525eaef6620-dmarc-
> >> requ...@listserv.ua.edu> wrote:
> >>
> >> > Picking on Krugman is typical of the right. But, that’s not exactly
> >> > what he said. Here’s the context.
> >> >
> >> >
> >> >
> >> https://secure-web.cisco.com/1CieSMPaZwvATHo3u6SeKwdTSLYWjrgzgHMj5G0cgeCU6OwRX-tYZ0dZywGFgIYxZ06npUpn5PdldAbPxondPyUXiudafJL2BDmpgDe6rIweSl28zsyyk2d3NIj-xPIx6hsP1J7Opb2qapLGK-iUSprkRmplH8sgKkH2Fa_GDPo3s5-6nMxBfty_xI1VeBOk3eZA2jCA0T-lEW75Uwsp9gT2BVKTGHZRysd2x6abN4KAFeZTovDz9zsB5F5HQrDt9snuZo7CYjPBb6oBbE3fHDt6B9Abfd4xRxhiXU5O_bnWnTmtJPekKqEj5EtxQBmN-0SFI7HoHDQAVGFH-ZEfBvmvGMg6Y97kUewFyxBcTIy8QDI833P3l0MKy3q3xE1_tkY9JoCGfDvLIb0ULhWAPS-s9z2pDcGcO2WS-9Q6JrVg/https%3A%2F%2Fnam12.safelinks.protection.outlook.com%2F%3Furl%3Dhttps%253A%252F%252Furld
> >> >
> >> efense.com%2Fv3%2F__https%3A%2F%2Fwww.businessinsider.com%2Fpau
> >> l-krugm
> >> > an-responds-to-internet-quote-2013-
> >> 12%3Famp__%3B!!JmPEgBY0HMszNaDT!pUV
> >> >
> >> U8USJPSqXuREx80y0bQ5MR7v2G271msUDJVyimwcA0x0oiPePyvVMbEFmX
> >> vp0KkVgyslQg
> >> >
> >> BkUcCIgOietLWEjpfoWVvXo%24&data=05%7C02%7CGIBNEY%40WSU.EDU%
> >> 7Ce292b02ec
> >> >
> >> ab547644c8d08dc34034e72%7Cb52be471f7f147b4a8790c799bb53db5%7
> >> C0%7C0%7C6
> >> >
> >> 38442436003405898%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAw
> >> MDAiLCJQIjoi
> >> >
> >> V2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C0%7C%7C%7C&sdata=rkxa
> >> e42Xnjdr
> >> > ZsbYsztE%2FeQftM45pYXwoSisSXM3MvA%3D&reserved=0
> >> >
> >> >
> >> >
> >> >
> >> >
> >> > Sent from Yahoo Mail for iPhone
> >> >
> >> >
> >> > On Thursday, February 22, 2024, 5:12 PM, Bob Bridges <
> >> > 0587168ababf-dmarc-requ...@listserv.ua.edu> wrote:
> >> >
> >> > Speaking of old predictions:  /* By 2005 or so, it will be clear that
> >> > the Internet's impact on the economy has been no greater than the fax
> >> > machine's.  -Paul Krugman, Nobel-prize-winning economist in 1998 */
> >> >
> >> > ---
> >> > Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
> >> >
> >> > -Original Message-
> >> > From: IBM Mainframe Discussion List  On
> >> > Behalf Of Lennie Dymoke-Bradshaw
> >> > Sent: Thursday, February 22, 2024 16:58
> >> >
> >> > Sorry, the date has been truncated on the left.
> >> > That should be 11994.
> >> >
> >> > -Original Message-
> >> > From: IBM Mainframe Discussion List  On
> >> > Behalf Of Allan Staller
> >> > Sent: 22 February 2024 19:42
> >> >
> >> > The last mainframe will be turned off in 1994 - Gartner Group
> >> >
> >> > -Original Message-
> >> > From: IBM Mainframe Discussion List  On
> >> > Behalf Of Seymour J Metz
> >> > Sent: Thursday, February 22, 2024 11:11 AM
> >> >
> >> > A 5-year prediction is generally safe, because in 5 years people will
> >> > have forgotten the predictions. Who remembers the failed 5-year
> >> > predictions for, e.g., controlled fusion, human level machine 
> >> > translation?
> >> >
> >> > I expect it to eventually happen, but as for when, Hypotheses non
> >> > fingo <
> >> >
> >> https://secure-web.cisco.com/1CieSMPaZwvATHo3u6SeKwdTSLYWjrgzgHMj5G0cgeCU6OwRX-tYZ0dZywGFgIYxZ06npUpn5PdldAbPxondPyUXiudafJL2BDmpgDe6rIweSl28zsyyk2d3NIj-xPIx6hsP1J7Opb2qapLGK-iUSprkRmplH8sgKkH2Fa_GDPo3s5-6nMxBfty_xI1VeBOk3eZA2jCA0T-lEW75Uwsp9gT2BVKTGHZRysd2x6abN4KAFeZTovDz9zsB5F5HQrDt9snuZo7CYjPBb6oBbE3fHDt6B9Abfd4xRxhiXU5O_bnWnTmtJPekKqEj5EtxQBmN-0SFI7HoHDQAVGFH-ZEfBvmvGMg6Y97kUewF

Re: Something keeps releasing space on a large (annual) DS

[Mike Schwab]

Our site submitted defrag jobs.  Not part of release processing.

On Wed, Feb 21, 2024 at 3:33 PM Ed Jaffe
<05acc3c79bf7-dmarc-requ...@listserv.ua.edu> wrote:
>
> On 2/21/2024 12:52 PM, Gibney, Dave wrote:
> > However, HSM Partial Release should consolidate extents...
>
> Not in my experience. It removes "extraneous" extents (if any), but
> doesn't actually do any sort of consolidation of occupied extents.
>
> That said, I believe if you migrate and then later recall a data set, a
> consolidation does occur.
>
> --
> Phoenix Software International
> Edward E. Jaffe
> 831 Parkview Drive North
> El Segundo, CA 90245
> https://www.phoenixsoftware.com/
>
>
> 
> This e-mail message, including any attachments, appended messages and the
> information contained therein, is for the sole use of the intended
> recipient(s). If you are not an intended recipient or have otherwise
> received this email message in error, any use, dissemination, distribution,
> review, storage or copying of this e-mail message and the information
> contained therein is strictly prohibited. If you are not an intended
> recipient, please contact the sender by reply e-mail and destroy all copies
> of this email message and do not otherwise utilize or retain this email
> message or any or all of the information contained therein. Although this
> email message and any attachments or appended messages are believed to be
> free of any virus or other defect that might affect any computer system into
> which it is received and opened, it is the responsibility of the recipient
> to ensure that it is virus free and no responsibility is accepted by the
> sender for any loss or damage arising in any way from its opening or use.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Something keeps releasing space on a large (annual) DS

[Mike Schwab]

Its probably doing a release.
Do a cylinder allocation to at average 7 tracks after release.
Defragment to consolidate extents weekly / twice a week / MWF / daily.


On Wed, Feb 21, 2024 at 11:45 AM Bob Bridges
<0587168ababf-dmarc-requ...@listserv.ua.edu> wrote:
>
> I'm not a sysprog (just a security geek), but I can at least allocate 
> datasets, and at the start of this year it fell to me to allocate a new 
> dataset in which are logged all changes made in the security system.  Past 
> year's log are in the 12000-track range, so I started with a smaller 
> allocation while I took the time to talk to our sysprog about space 
> requirements.  It's populated from a daily production job, by the way.
>
> When I re-allocated it, on his advice I tried a multi-volume and extended 
> allocation (PS-E).  Almost immediately the job started bombing, claiming that 
> the first four volumes it tried didn't have the necessary space to add an 
> extension.  The sysprog is puzzled - says it should have looked in volumes 
> that DO have the space, not the ones that don't.
>
> Second attempt (I don't count the temporary smaller allocation) I kept PS-E 
> but dropped the multi-volume requirement.  I've never done one of those 
> anyway, and don't trust 'em.  The system promptly dropped the extra tracks I 
> allocated, and a day or two later the job started bombing with a B37-04.
>
> Third attempt: Forget PS-E (I'm unfamiliar with that too) and just used 
> SPACE=(TRK,(9000,1000)).  That seemed to work for a whole week, but I just 
> noticed that something, somewhere, has released extra space AGAIN; 3.4 tells 
> me it's now 1960 tracks and 83%.  The job isn’t bombing yet; some time later 
> in the year I'm guessing it's going to.
>
> Pardon my frustration: WHAT THE HECK IS GOING ON?  Why does it keep releasing 
> space although I never specified RLSE?  The sysprog doesn't know either - but 
> he's an external contractor who just took over the system a few months ago 
> and if it's something simple he may not be aware yet of ... I dunno, 
> something in SMS maybe?
>
> Some wrinkles that may or may not be relevant:
>
> 1) The dataset is written using a REXX exec that calculates the DSN by 
> reference to the current year.  This relieves folks from having to update the 
> JCL every year, but maybe something about the way the exec does the allocate 
> is causing the problem?  I'm guessing not, because as far as I now this job 
> has run correctly for years.  But just in case:
>
>   "ALLOC DDN(CHG$$OT) DSN('') MOD CATALOG REUSE",
>   "SPACE(300,30) CYLINDERS RECFM(V,B) LRECL(304) BLKSIZE(27998)"
>
> 2) I don't know anything about SMS, but could something there be releasing 
> space?
>
> 3) What IS extended PS, anyway?  I'm told it allows more than 16 extents, but 
> a) how many more? And b) how else is it different?
>
> 4) I allocated the dataset each time using not batch JCL but 3.2 ... 
> expecting there's no difference.
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* Law #6 of combat operations:  If it's stupid but it works, it isn't 
> stupid. */
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Nanosecond resolution timestamps for HLL's?

[Mike Schwab]

On Tue, Feb 20, 2024 at 10:42 AM Ron Eddinger  wrote:
>
> unsubscribe
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Tn3270 back door

[Mike Schwab]

Its like closing a browser to get the new version.

On Fri, Feb 16, 2024 at 1:18 PM Steve Thompson  wrote:

> So you sometimes have to treat z/OS like Winderz ;-)
>
> Steve Thompson
>
> On 2/16/2024 1:29 PM, Geza Szentmiklosy wrote:
> > You need to stop and start the TN3270 port to pick up the new cert. The
> PAGENT refresh was needed also but you have already done that.
> > You can stop/start the port by:
> > 1 - TCPIP VARY commands.
> > 2 - Recycle TCPIP.
> > 3 - IPL.
> > Good luck.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: Insecure security - was SDSF PS Command column

[Mike Schwab]

On Wed, Feb 14, 2024 at 2:19 PM Radoslaw Skorupka <
0471ebeac275-dmarc-requ...@listserv.ua.edu> wrote:


> Last, but not least: no hacker know method to read paper notebook.
>


> --
> Radoslaw Skorupka
> Lodz, Poland
>
Webcam when they open the binder to enter the password.

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

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

Re: How read Cyl 0 from within a program?

[Mike Schwab]

Just for exploring?  Copy an IPL volume for testing purposes.  ZZSA is a
good program for reading (and emergency in place updates).  Included on TK3
CD-Rom.
https://www.youtube.com/watch?v=0ELZGZhyipg Moshix using ZZSA.

Cyl 0 Trk 0 IPLable volume first record is 3 card reader (initial CCWs) of
the IPL text on that volume.
https://www.ibm.com/docs/en/zos/2.1.0?topic=labels-direct-access-storage-device-architecture

Stand alone tool kit to run programs on bare metal.
https://github.com/s390guy/SATK

On Tue, Feb 13, 2024 at 9:42 PM Tony Harminc  wrote:

> On Tue, 13 Feb 2024 at 13:19, Charles Mills  wrote:
>
> > I am interested in writing a program to read the IPL records from a DASD
> > volume. (Read only, not update). I am comfortable with XDAP but how do I
> > OPEN a "dataset" that would include cylinder 0?
> >
>
> > APF, OPERATIONS and so forth are not out of the question.
> >
>
> You'll certainly need APF.
>
> There are many routines that do this kind of thing on the CBT tape that you
> could use to get the idea or as a model or perhaps even reuse. Some of the
> code is very old, and doesn't support new-fangled stuff like DSNTYPE LARGE
> and extended volumes and such. But to read the IPL records probably code
> from 1972 onwards will work.
>
> Try, for example, program CHRDUMP in file 558.
>
> Tony H.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: SDSF PS Command column

[Mike Schwab]

Should be 8 years.  IRS can go back 7 year years, plus the filing year.

On Mon, Feb 5, 2024 at 12:09 PM Colin Paice  wrote:

> One customer told me that some of their applications are run once a year -
> such as end of year accounts and tax.  Some applications (a few) were kept
> around for 4 years before they were finaly  killed off.
> Colin
>
> On Mon, 5 Feb 2024 at 17:28, Farley, Peter <
> 031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:
>
> > I am constantly amazed at how much this whole “zero trust” meme is
> > violating the concept of sharing everything among application developers.
> > I for one have no qualms about any other application programmer at my
> shop
> > seeing any coding I am doing (though I might be occasionally embarrassed
> by
> > my own dumb mistakes).
> >
> > It is not “innocent” to share access to application programming
> > information and styles and pitfalls, it is crucial to application
> > programmer development and advancement.  We learn from each other,
> > especially from sharing our mistakes as well as our best practices and
> > clever innovations.
> >
> > Add to that stupid security rules like “if you didn’t access this
> resource
> > for the last 180 days we revoke your access to that resource”, which
> causes
> > all kinds of headaches when you have to suddenly deal with issues in a
> > yearly weekend production process and you don’t have read rights to the
> > data files you need to view to resolve the issue and the security team
> only
> > works 9 to 5 weekdays and the on-call is out shopping somewhere.
> >
> > Shakespeare was almost right – first get rid of all the auditors, the
> > lawyers are easy to deal with compared to them.
> >
> > Peter
> > From: IBM Mainframe Discussion List  On Behalf
> > Of Paul Gilmartin
> > Sent: Monday, February 5, 2024 11:02 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: SDSF PS Command column
> >
> >
> > On Mon, 5 Feb 2024 11:02:07 +, Rob Scott wrote:
> >
> > >...
> >
> > >As to "why don't you just fix it ?"tstyle questions, we have to consider
> > quite a few compatibility issues across n-2 releases especially when the
> > "fix" requires changes to configuration and security ...
> >
> > >
> >
> > Such as users' embedding cryptographic keys in commands?  Ugh!
> >
> >
> >
> > UNIX arose in a more innocent age when no one worried much about such as:
> >
> > ls -lt /u
> >
> >
> >
> > --
> >
> > 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
>


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

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

Re: JES2 JOBDEF DUPL_JOB=NODELAY - Any gotchas?

[Mike Schwab]

Suggest a new class with this feature so if they pick it they know what
they are getting into.

On Fri, Feb 2, 2024 at 1:34 PM Frank Swarbrick 
wrote:

> I tried this once for a single class in our dev region and it screwed up
> some jobs that depend on DELAY for sequencing.  🙁
> Of course something could be done about that, but I didn't feel like
> dealing with it at the time.
>
>

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

Re: Antiquarian Curiosity: Pre-MVS/XA Mount Command for DASD Volumes

[Mike Schwab]

Still relevant for all non-SMS volumes.

On Thu, Feb 1, 2024 at 4:42 PM Seymour J Metz  wrote:

> It's still relevant if you're not using SMS.
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> עַם יִשְׂרָאֵל חַי
> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Willy Jensen 
> Sent: Thursday, February 1, 2024 4:34 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Antiquarian Curiosity: Pre-MVS/XA Mount Command for DASD
> Volumes
>
> Seems that the VATLSTxx parmlib member is still relevant.
>
> From the z/OS 2.5 MVS Initialization and Tuning Reference:
>
> The VATLSTxx member contains an optional VATDEF statement followed by
> entries that define the mount
> and use attributes of DASD volumes.
> Use the VATDEF statement in VATLSTxx to specify a default use attribute.
> If you do not specify VATDEF,
> the system assigns a default of PUBLIC to those volumes that are not
> specifically assigned a use attribute
> in the VATLSTxx member or in a MOUNT command.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: GTF trace for a JCL error?

[Mike Schwab]

Our system had 7 days.

On Tue, Jan 30, 2024 at 12:57 PM Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Tue, 30 Jan 2024 14:41:59 +, Allan Staller  wrote:
> >
> >You need to look at the JES output to determine the error.
> >Use the following command
> >S taskname,,,MSGCLASS=x  where x is a held sysout class.
> >
> >HTH,
> >
> Wouldn't it be a good Idea to have a class for "Delete after one hour"!?
>
> I've often wanted that.
> --
> gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: Regarding RBINTCOD

[Mike Schwab]

REGION=(24,31,64) memory limits is available

On Mon, Jan 29, 2024 at 12:27 PM Jon Perryman  wrote:

> On Mon, 29 Jan 2024 15:40:04 +0200, Binyamin Dissen <
> bdis...@dissensoftware.com> wrote:
>
> >Are you implying that an ESTAE(X) routine with SSWALOC=31 is guaranteed an
> >SDWA and there is no reason to check R0 for 12 and alternate code paths?
>
> Obviously Peter is not making that guarantee but how many jobs run with
> REGION=0M or 0K. If I remember correctly, SDWA allocation ignores REGION
> limits, which essentially ensures SDWA will always exist unless you have
> serious system problems. Above the line storage may not be guaranteed but
> the odds would be astronomical.
>
> Coding REGION= >16M is far more common. With all the advancements, filling
> below the line storage should never happen but it is conceivable.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: Regarding RBINTCOD

[Mike Schwab]

REGIONX=(24,31,53) memory limits is available.

On Mon, Jan 29, 2024 at 12:27 PM Jon Perryman  wrote:

> On Mon, 29 Jan 2024 15:40:04 +0200, Binyamin Dissen <
> bdis...@dissensoftware.com> wrote:
>
> >Are you implying that an ESTAE(X) routine with SSWALOC=31 is guaranteed an
> >SDWA and there is no reason to check R0 for 12 and alternate code paths?
>
> Obviously Peter is not making that guarantee but how many jobs run with
> REGION=0M or 0K. If I remember correctly, SDWA allocation ignores REGION
> limits, which essentially ensures SDWA will always exist unless you have
> serious system problems. Above the line storage may not be guaranteed but
> the odds would be astronomical.
>
> Coding REGION= >16M is far more common. With all the advancements, filling
> below the line storage should never happen but it is conceivable.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: ADRDSSU COMPRESS and enq

[Mike Schwab]

If the dataset goes into more extents the refresh won't pick up the new
extent(s) and the member fetch will fail.  Can also reach the maximum
number of extents.

On Fri, Jan 19, 2024 at 9:19 AM Steely.Mark  wrote:

> Unless I am missing something why not use IEBCOPY with specifying DISP=SHR
> on the dataset name.
> I have done this with datasets that were allocated to the LNKLST.
>
> Thanks
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Radoslaw Skorupka
> Sent: Friday, January 19, 2024 8:18 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ADRDSSU COMPRESS and enq
>
>
>
> CAUTION! EXTERNAL SENDER! STOP, ASSESS, AND VERIFY Do you know this
> person? Were you expecting this email? If not, report it using the Report
> Phishing Button!
>
> Gentlemen,
> First, thank you for your answers. I appreciate it.
>
> Regarding TOLENQF - it doesn't work with COMPRESS or CONSOLIDATE. The
> manual is clear here.
>
> Regarding rename - this is the thing I wanted to avoid for several reasons:
> 1. There is some risk to rename wrong "copy" of the dataset, or alter ICF
> entries for wrong copy.
> 2. Valid copies are located on non-SMS disk, but cataloged out of regular
> catalog search (SYS1.name in some UCAT). Plus some aliases, etc.
> I want to not destroy it.
> 3. I don't know how to rename such datasets! Yes, I could imagine access
> from another z/OS image, but it would be a series of manual ISPF r command.
> Non-repeatable, error prone. Is there any tool allowing to rename such
> datasets in batch? Wildcard support (i.e. REN SYS1.* SYS2.*) would be
> welcome.
>
>
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
>
> W dniu 19.01.2024 o 13:27, Radoslaw Skorupka pisze:
> > I want to compress some system datasets like SYS1.LINKLIB, but *not*
> > real "live", rather offline copies.
> > DSS ends with RC8, because of failed serialization.
> > SETPROG LNKLST,UNALLOCATE will not solve all the enqueues, because
> > some datasets are serialized by other entities like TSO users.
> >
> > And I also want to CONSOLIDATE some datasets as well.
> >
> >
> > Any clue?
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: VolCat - Reallocate ?

[Mike Schwab]

https://www.ibm.com/support/pages/apar/II13354

Used this about 2015-6.

On Tue, Jan 16, 2024 at 11:30 AM Shaffer, Terri <
017d5f778222-dmarc-requ...@listserv.ua.edu> wrote:

> Hi,
>   So I need to reallocate my VOLCAT, due to IMBED and REPLICATE present.
>
> So my question is what steps to perform? Like This maybe?
>
> Stop OAM?
> Export VOLCAT?
> Delete VOLCAT
> ALLOCATE new VOLCAT.
> IMPORT from Exported copy?
> Start OAM?
>
> Is this right, anyone have JCL example of EXP/IMPORT of a volcat?
>
> Or anything I am missing?
> Thanks
>
> Ms Terri E Shaffer
> Senior Systems Engineer,
> z/OS Support:
> ACIWorldwide – Telecommuter
> H(412-766-2697) C(412-519-2592)
> terri.shaf...@aciworldwide.com
>
>
> 
>  [https://go.aciworldwide.com/rs/030-ROK-804/images/aci-footer.jpg] <
> http://www.aciworldwide.com>
> This email message and any attachments may contain confidential,
> proprietary or non-public information. The information is intended solely
> for the designated recipient(s). If an addressing or transmission error has
> misdirected this email, please notify the sender immediately and destroy
> this email. Any review, dissemination, use or reliance upon this
> information by unintended recipients is prohibited. Any opinions expressed
> in this email are those of the author personally.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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

Re: Technical Reason? - Why you can't encrypt load libraries (PDSE format)?

[Mike Schwab]

IBM/MS-DOS 6 stored compressed programs by having a decompression stub and
the compressed program as the remainder of the file data.

On Sat, Jan 13, 2024 at 1:50 PM Grant Taylor <
023065957af1-dmarc-requ...@listserv.ua.edu> wrote:

> On 1/13/24 13:39, Gibney, Dave wrote:
> > It should be obvious, but as a practical matter, you can't encrypt
> > the modules that do the decryption and it also follows that you can't
> > encrypt the modules that provide the execution environment (z/OS)
> > for these modules.
>
> I would like to agree with you.
>
> Viruses (for PCs) have been self-decrypting for a long time.
>
> Given how people espouse that the mainframe can do everything that a PC
> can do ... I think it stands to reason that someone with sufficient
> motivation /could/ write a mainframe program that would decrypt itself.
>
> If we accept that it's hypothetically possible to write a mainframe
> program that can decrypt itself, then could we also accept the
> hypothetical possibility to do the same with a program that is part of
> the OS?
>
> It's been a very long time since I've looked at low level mainframe OS
> IPL / boot strap methods and procedures.  But I'm confident that the
> first part of the program that IPLs off of DASD doesn't know how to do
> most of what the OS ultimately does.
>
> It's all about have just enough recognizable -> executable code that can
> decode / decrypt more recognizable -> executable code that can decrypt
> even more.
>
> Hence in /concept/ I don't agree with you.
>
>
>
> --
> Grant. . . .
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


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

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