Re: Examples of roll your own "LIKE()" for data sets?

[Mike Schwab]

Because it was written very early in the 360 era.
On Wed, Dec 5, 2018 at 10:35 AM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Wed, 5 Dec 2018 10:15:21 -0600, Tom Marchant  wrote:
> >
> >>the programmer must
> >>indicate to IEBGENER how much storage it needs.
> >
> >I think you mean that sufficient REGION must be provided. That is no 
> >different than any program.
> >
> >That same manual specifies
> >
> >
> >The minimum region sizes are:
> >o IEBCOPY -- REGION=28K + 2(largest blocksize in the job step) rounded
> >to the next highest 2K.
> >
> >
> I know I'm guessing, but when I see such as:
> MAXLITS=n
> specifies a number, from 1 to 2730, that is greater than or equal to the 
> total
> number of characters contained in the FIELD literals of subsequent RECORD
> statements. Any DBCS characters used as literals on FIELD parameters count
> as two characters each.
>
> ... I can't imagine why IEBGENER imposes such a chore on the programmer
> other than so it can GETMAIN a suitable, not profligate, amount of storage.
>
> Many other programs have nothing similar.
>
> (I'd say "bytes" for the first and last occurrences of "characters".)
>
> -- 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: IBM sells software portfolio including Notes and Domino to HCL for $1.8b | ZDNet

[Mike Schwab]

We had to dump the z/OS Tivoli backup for Lan.  They dropped large
block support and the backups took 10 times as long and did not
complete before the next business day (5pm - 8am).  Went back to the
previous version then switched to software on the LAN.
On Fri, Dec 7, 2018 at 11:51 AM Jack J. Woehr  wrote:
>
> On 12/7/2018 9:59 AM, Dave Jones wrote:
> > https://www.zdnet.com/article/ibm-sells-software-portfolio-including-notes-and-domino-to-hcl-for-1-8b/
>
>
> I think it's wonderful they got so much money for it.
>
> --
> Jack J. Woehr # Science is more than a body of knowledge. It's a way of
> www.well.com/~jax # thinking, a way of skeptically interrogating the universe
> www.softwoehr.com # with a fine understanding of human fallibility. - Carl 
> Sagan
>
> --
> 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: CA VIew Reports

[Mike Schwab]

I am not sure, but see if HercPrt can do what you want.  Set up a
printer to a TCP/IP address and port and set your HercPrt software to
receive, then print the file to the printer.
On Wed, Dec 12, 2018 at 5:00 AM venkat kulkarni
 wrote:
>
> Hello Group,
>
> Is there any way to offload reports  from CA View (SAR) to windows desktop
> in pdf format and also keeping report information like when it was
> originally created, Job name , Job ID etc.
>
> Any suggestions on this please.
>
> --
> 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: API for accessing available DASD to each LPAR in a sysplex.

[Mike Schwab]

IDCAMS DCOLECT VOLS(*) will give you the volume data you need.
Other record types can give you the cataloged data sets.
On Wed, Dec 12, 2018 at 12:41 PM Matt Hogstrom  wrote:
>
> Is there a callable API that returns the list of online volumes to LPARs in a 
> Sysplex?  I assume one could route a command and write scripts.  I’m looking 
> for an API that can be incorporated into a program where all the searching 
> and cataloging is done.
>
> Matt Hogstrom
> m...@hogstrom.org
> PGP Key: 0x90ECB270
>
> “It may be cognitive, but, it ain’t intuitive."
> — Hogstrom
>
>
> --
> 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: CFCC Performance

[Mike Schwab]

We had 4 CFs.  Two for the TestPlex and two for the Production Plex.

On Tue, Dec 18, 2018 at 10:37 AM Allan Staller  wrote:
>
> I am in the process or reconfiguring from a Single CF to multiple CFs (per 
> partition) to eliminate the single point of failure.
> The subject of CFCC Thin Interrupts has been evaluated and will most likely 
> be implemented.
>
> As part of this process the discussion of DUPLEX CF structure vs. use of 
> SYSTEM MANAGED Rebuild has also come up.
>
> I have heard the use of duplexing has been deprecated in favor of system 
> managed rebuild for performance reasons.
> CFCC Thin Interrupts might offset some of the (alleged) performance penalty.
>
> Can anyone point me to any documentation or contacts on the subject?
> Searches if IBM Techdocs, Redbooks, ResourceLink, etc. have produced very 
> limited information. Most of which seem to be leaning in the SYSTEM MANAGED 
> Rebuild direction.
>
> Thanks in advance,
> ::DISCLAIMER::
> --
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.
> --
>
> --
> 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: VTOC and Index calculation

[Mike Schwab]

Depends on the number of datasets you want to put on the volume.  1
track to a JES2 spool volume with a handful of datasets, or 2944 VTOC
tracks for a Mod 9 filled with 1 track data sets.

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.ickug00/ick40744.htm

On Sat, Dec 22, 2018 at 10:45 PM Peter  wrote:
>
> Hi
>
> Is there any kind of formula to keep the VTOC and INDEX for
> mod-3,mod-9,mod-27,mod-54 volume initialisation ?
>
> I would like to know is there any standard or any specific rules to keep
> the sizes of VTOC and Indexes ?
>
> Any advise would be much appreciated.
>
> 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: Retrocomputing: SUNY Stony Brook Pascal compiler written in XPL

[Mike Schwab]

So we should be able to run it under Hercules too?

On Mon, Dec 24, 2018 at 4:46 PM Robert Prins  wrote:
>
>  From news://comp.compilers:
>
>  Forwarded Message 
> Subject: Retrocomputing: SUNY Stony Brook Pascal compiler written in XPL
> Date: Mon, 24 Dec 2018 02:36:08 -0800 (PST)
> From: Shoefoot 
> Organization: Compilers Central
> Newsgroups: comp.compilers
>
> The SUNY Stony Brook Pascal compiler was written in the mid 70's by the
> Department of Computer Science at the State University of New York.  The
> compiler was written in XPL and uses an LL(1) parser to generate code for
> the IBM/360.  This is a three pass compiler that includes a Post Mortem Dump
> program to help diagnose failing code.
>
> The XPL compiler which came from SUNY closely resembles the XPL compiler
> described in the book "A Compiler Generator" by McKeeman, Horning and Wortman.
> Unlike the original XPL compiler this compiler does not use an MSP parser.  
> The
> parser is probably SLR or LALR(1).  The Analyzer used to generate the tables 
> was
> not included in the release from SUNY.  This compiler generates code for the
> IBM/360.
>
> The code generated by both the Pascal and XPL compilers can be run on the
> IBM/360 simulator.  The simulator, which was not part of the release from 
> SUNY,
> is written in C and can run on most machines that have a C compiler.  The
> simulator has an EBCDIC translator that allows it run executables from the
> original release tape.
>
> The compilers can be found here:
> https://sourceforge.net/projects/suny-pascal/
>
> --
> 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: TOD clock values, leap seconds and BLSUXTOD conversion service

[Mike Schwab]

One major consideration should be who sets the time zone.  Many
mainframes support users in multiple time zones.  So ideally the
mainframe should be set to UTC then the macro should convert to the
local time of the individual application / user.

On Fri, Dec 28, 2018 at 1:47 PM Peter Relson  wrote:
>
> I shouldn't have included "TIME" among the services I mentioned because
> that's "current", not "historic" (so only has to deal with "current" leap
> seconds) and because it does not let you choose STCK as the "zone" -- you
> must choose between local and UTC, both of which are defined with respect
> to leap seconds.
> Thus it must handle leap seconds, but also is not in the position of
> needing update for a "new" leap second.
>
> And, in case you're wondering, at the "instant" of bringing in a new leap
> second, there are various approaches in play that customers choose to
> adopt and I doubt that it is deterministic on which side of the fence you
> would necessarily fall if you used some service such as TIME (or if you
> did it yourself) -- perhaps the STCK was done "just before" but reference
> to CVTLSO was "just after". Something similar could happen with respect to
> time zone offset changes.
>
> 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: Zowe?

[Mike Schwab]

Last video might be a demo.  Several install videos.

https://www.youtube.com/channel/UC-WTXQQtz2m5iTflJLK59aw/videos

On Mon, Jan 7, 2019 at 12:06 AM Farley, Peter x23353
 wrote:
>
> Matt,
>
> Thanks for the extended and detailed response.  There are many of us out here 
> who are still wondering what this project really is.
>
> First, a caution: Please, please define your acronyms the first time you use 
> them.  E.G., what is JWT?  Most of us (well, this application programmer in 
> particular) have no idea what that is.  Java Work Tooling?  I am left to 
> guess.
>
> Another couple of examples: "HTML5 enabled desktop".  Does that mean code 
> that runs in a browser on my desktop?  "WebSocket enabled APIs"? Same 
> question.
>
> I thought I grokked this one: "JES Explorer (GUI to interact with JES much 
> like a Finder or Explorer on Windows would work" until the next sentence: 
> "web interface that doesn’t require 3270 to submit, etc.".  Again, does that 
> mean a separate program like Windows Explorer, or just a new browser 
> interface?
>
> It would help greatly if there was a video demonstration of these 
> capabilities.  Did any of the Zowe presentations at SHARE include live online 
> demonstrations of already-available capabilities, and if so are those video's 
> available through SHARE or on the Zowe website?
>
> For the application programmer (not for the systems gurus who maintain the 
> environment) what is the experience intended to be?  I'm not from anywhere 
> near Missouri, but I really need to be shown how what Zowe is touting could 
> help me in my everyday work.
>
> If I understand it, perhaps I can make a case to my management.  But first I 
> have to understand it.
>
> Still somewhat confused . . .
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Matt Hogstrom
> Sent: Sunday, January 6, 2019 6:16 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Zowe?
>
> Not to mention the difference between nappies and diapers.
>
> Zowe is an open source project created to host technologies that benefit the 
> Z platform from all members of the Z community (ISV’s and consumers).  The 
> initial code base was seeded with technologies from CA Technologies, IBM and 
> Rocket.   Each of us had developed capabilities that we wanted to use to 
> enhance the platform but proprietary products were not the way to create an 
> eco-system; creating proprietary products was just BAU.   We needed to see if 
> such a community was viable and so each contributed a set of technology and 
> we worked through the legal issues of moving what was new and some 
> long-standing code to an EPL-2.0 license which allows anyone to consume and 
> use the code.  The choice of three was more about being able to manage the 
> issues of community formation and not in any way to be exclusive.  Three was 
> a lot of work and we now have a good framework (legal, governance, hosting, 
> etc.) to start with.
>
> A late addition by CA was the addition of the Mediation Layer which we are 
> using to federate a number of platform services.  We have an advanced use of 
> JWT that allows for accessing multiple services only requiring a user to 
> sign-on once.  This is ahead of platform goals of using JWT in the Security 
> Managers.  Open source allows us to experiment and deliver capabilities 
> faster than traditional development methods and delivery streams on Z.
>
> The initial contributions were the CLI and some VS Code extensions from CA, 
> WebSocket enabled APIs from IBM and a HTML5 enabled desktop that allowed for 
> hosting multiple Angular applications.  Consider these contributions to be 
> more of the framework for enabling access to Z on-top of which new 
> applications can be built.  The applications that are provided as of now and 
> a few more candidates for 1.0 later this month are:
>
> CLI plugins (Console, TSO, file, JES interface, etc.) where developers that 
> are not accustomed to Z can interact using their shell of choice (we expect 
> most people to be some bash variant).  This interface uses direct z/OSMF APIs 
> for these services.
>
> JES Explorer (GUI to interact with JES much like a Finder or Explorer on 
> Windows would work).  Simple and familiar web interface that doesn’t require 
> 3270 to submit, retrieve check status on jobs, etc.
>
> MVS and USS explorer.  Provides access for retrieving / sending files to and 
> from the z/OS system.  Again, very Finder / Explorer like.  A significant 
> advantage here is the applications run in an HTML 5 framework and eliminate 
> the maintenance of Java and other frameworks on desktops.  There are a number 
> of customers that are looking to eliminate Desktop dependencies around Java.
>
> Contextual Editor (allows for editing and updating with a context sensitive 
> editor that is extensible with a language server).
>
> TN3270 Emulator - fully functional 3270 emulator that runs in the de

Re: z/OS 1.12 question

[Mike Schwab]

One option is to bring up the new z/OS on the z14 and restore the
applications and test and recompile as needed then freeze the data and
run from the new system.

On Mon, Jan 7, 2019 at 7:48 AM Edgington, Jerry
 wrote:
>
> Thanks everyone.
>
> Our current situation is, we have zBC10 running z/OS v1.12.  We want to 
> upgrade everything to current, including z/OS and hardware.  I understand we 
> can't get support for either z/OS or zBC12, but I am looking for options and 
> if anyone has successfully done this type of upgrade. If so, what steps were 
> taken?
>
> - Can we get maintenance for z/OS v1.12, understanding we might have to pay 
> IBM something for it?
> - Will z/OS v1.12 work on z14, I understand the answer is maybe.  But, has 
> anyone done it?  If so and willing to share, we would like to know
> - If not, we are looking at the possibility of move z/OS v1.12 to zBC12, 
> upgrade to z/OS v2.3, then z14.  Again, we probably would need maintenance on 
> z/OS v1.12
>
> Jerry
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Richards, Robert B.
> Sent: Monday, January 07, 2019 8:42 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: z/OS 1.12 question
>
> I must have misinterpreted the following then:
>
> " If not, any ideas of how to get z/OS *and* hardware upgrade to current."
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of R.S.
> Sent: Monday, January 07, 2019 8:26 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: z/OS 1.12 question
>
> IMHO the COD has nothing to do here.
> Jerry wrote about mahcine change (upgrade) , not OS upgrade.
>
> Jerry,
> Your system is out of service. That means you won't be able to get *for
> free* any PTFs released after EOS date. That means your system may not 
> recognize z14 correctly. It does NOT mean it won't work at all, but there's a 
> risk.
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
>
>
> W dniu 2019-01-07 o 14:01, Richards, Robert B. pisze:
> > https://www-01.ibm.com/common/ssi/cgi-bin/ssialias?infotype=an&subtype
> > =ca&appname=gpateam&supplier=897&letternum=ENUS218-458
> >
> > IBM Customized Offerings Driver V3.1, a prebuilt, stand-alone driving 
> > system to meet IBM z/OS installation requirements, has been updated.
> >
> > The IBM(r) Customized Offerings Driver is a prebuilt, stand-alone driving 
> > system that can be used to install z/OS(r) ServerPac, z/OS SystemPac (in 
> > dump-by-dataset format, where available), and z/OS Custom-Built Product 
> > Delivery Offering (CBPDO) packages when you do not have a driving system 
> > that meets the minimum requirements for IBM z/OS installation. The 
> > Customized Offerings Driver is updated and is now a subset of a z/OS V2.2 
> > system with Job Entry Subsystem 2 (JES2) that can run on any IBM Z(r) 
> > processor that is supported by z/OS V2.2, or later.
> >
> > The Customized Offerings Driver requires three 3390-9 or larger DASD 
> > volumes, a non-Systems Network Architecture (SNA) terminal or Hardware 
> > Management Console (HMC) 3270 emulator for a z/OS console, and an SNA 
> > terminal for a Time Sharing Option Extended (TSO/E) session. The Customized 
> > Offerings Driver is delivered on DVD media.
> >
> > For up-to-date information about the Customized Offerings Driver, including 
> > supported media, DASD volume sizes, product levels included, z/OS hardware 
> > and software prerequisites, and driving system requirements, see the 
> > current z/OS PSP bucket (Upgrade ZOSV2R3, Subset ZOSGEN) and z/OS Planning 
> > for Installation (GA32-0890) at the z/OS Internet Library.
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Edgington, Jerry
> > Sent: Monday, January 07, 2019 7:57 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: z/OS 1.12 question
> >
> > As anyone upgraded a z/OS 1.12 from zBC10 to z14, directly?  If so, what 
> > issues or gothas were there? Anything to look at for? If not, any ideas of 
> > how to get z/OS and hardware upgrade to current.
> >
> > Thanks,
> > Jerry Edgington
> >
> > --
> > 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 .
> >
>
>
> ==
>
> Jeśli nie jesteś adresatem tej wiadomości:
>
> - powiadom nas o tym w mailu zwrotnym (dziękujemy!),
> - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub 
> zapisałeś na dysku).
> Wiadomość ta może zawierać chronione prawem informacje, które może 
> wykorzy

Re: Generic query on Region allocation failure

[Mike Schwab]

I would like to make a suggestion.  REGION=xxx and other settings
should remain the same.  If you specify REGION=(#K,#M,#G), where you
are requesting 24, 31, and 64 bit memory amounts subject to other
suffixes and normal override measures.


On Tue, Jan 8, 2019 at 4:08 PM  wrote:
>
> Jesse,
>
> While I like Region=0, one should always remember that there are installation 
> parms and exits that control how "zero" is actually applied below and above 
> the line. Ann old version of SAS that liked to getmain everything up to the 
> top of private has bitten me in the past as it blew up on the system areas 
> allocated down from top ☹
>
> There is a wealth of data on private area usage in the SMF Type 30-4 records 
> and the Type 78-2 records that the OP can use to check the history of Private 
> and Common usage across changes in CEC, OS, etc.
>
> Simply checking the available private region for addresses before and after 
> the migration may help to drill down on the problem. A simple change in 
> Common storage can mean huge changes in available private.
>
> MXG is our friend.
>
> Ron Hawkins
> Director, Ipsicsopt Pty Ltd (ACN: 627 705 971) | m: +61 400029610 | h: +61 
> 387399252 | email: ron.hawk...@ipsicsopt.com
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Jesse 1 Robinson
> Sent: Wednesday, 9 January 2019 06:13
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] Generic query on Region allocation failure
>
> This post is not intended to be enlightening; it's merely corroborative. We 
> recently went from z12EC to z14. We had already upgraded to z/OS 2.3 with 
> hardware support service. In the week or so afterwards, we experienced a 
> handful of 'storage shortage abends' in tasks that had been running unchanged 
> for years. AFAIK no technical explanations ever came forth. In the few PMRs 
> we opened, the advice was to increase region size. We did. Problems went 
> away. Move on.
>
> I do have one piece of advice. Never specify a smallish region size. If it's 
> worth your time and effort to type in any region size at all, go for some 
> number >16M. It generally costs nothing and may save some debugging grief 
> down the road. I've seen cases where 0M may be required for a particular 
> product. Again, the cost of doing so is minimal. Why quibble? Someone needs 
> to refresh the communal coffee pot.
>
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Tom Marchant
> Sent: Tuesday, January 08, 2019 7:49 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: Generic query on Region allocation failure
>
> On Tue, 8 Jan 2019 10:16:00 +0400, Jake Anderson wrote:
>
> >IEF085I REGION NOT AVAILABLE ERROR CODE = 20 IEF187I NJJJ FAILED -
> >SYSTEM ERROR IN INITIATOR IEF472I NJJJ
>
> That means that the region that was specified is not available.
>
> Most likely, the region specified is less than 16M and that much storage is 
> not available below the line. It is certainly possible that the available 
> region size below the line is smaller on your old system than is available on 
> your new system.
>
> --
> Tom Marchant
>
> --
> 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: Generic query on Region allocation failure

[Mike Schwab]

Even a PTF and IPL could affect the memory map of the lowest 16MB
Might need to adjust the SQA, etc.

On Tue, Jan 8, 2019 at 9:36 PM Peter  wrote:
>
> Apologies for being ignorant
>
> So when we move to a higher version of hardware the storage area below the
> line shrinks ?
>
>
> On Wed 9 Jan, 2019, 2:52 AM Mike Schwab 
> > I would like to make a suggestion.  REGION=xxx and other settings
> > should remain the same.  If you specify REGION=(#K,#M,#G), where you
> > are requesting 24, 31, and 64 bit memory amounts subject to other
> > suffixes and normal override measures.
> >
> >
> > On Tue, Jan 8, 2019 at 4:08 PM  wrote:
> > >
> > > Jesse,
> > >
> > > While I like Region=0, one should always remember that there are
> > installation parms and exits that control how "zero" is actually applied
> > below and above the line. Ann old version of SAS that liked to getmain
> > everything up to the top of private has bitten me in the past as it blew up
> > on the system areas allocated down from top ☹
> > >
> > > There is a wealth of data on private area usage in the SMF Type 30-4
> > records and the Type 78-2 records that the OP can use to check the history
> > of Private and Common usage across changes in CEC, OS, etc.
> > >
> > > Simply checking the available private region for addresses before and
> > after the migration may help to drill down on the problem. A simple change
> > in Common storage can mean huge changes in available private.
> > >
> > > MXG is our friend.
> > >
> > > Ron Hawkins
> > > Director, Ipsicsopt Pty Ltd (ACN: 627 705 971) | m: +61 400029610 | h:
> > +61 387399252 | email: ron.hawk...@ipsicsopt.com
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On
> > Behalf Of Jesse 1 Robinson
> > > Sent: Wednesday, 9 January 2019 06:13
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: [IBM-MAIN] Generic query on Region allocation failure
> > >
> > > This post is not intended to be enlightening; it's merely corroborative.
> > We recently went from z12EC to z14. We had already upgraded to z/OS 2.3
> > with hardware support service. In the week or so afterwards, we experienced
> > a handful of 'storage shortage abends' in tasks that had been running
> > unchanged for years. AFAIK no technical explanations ever came forth. In
> > the few PMRs we opened, the advice was to increase region size. We did.
> > Problems went away. Move on.
> > >
> > > I do have one piece of advice. Never specify a smallish region size. If
> > it's worth your time and effort to type in any region size at all, go for
> > some number >16M. It generally costs nothing and may save some debugging
> > grief down the road. I've seen cases where 0M may be required for a
> > particular product. Again, the cost of doing so is minimal. Why quibble?
> > Someone needs to refresh the communal coffee pot.
> > >
> > > .
> > > .
> > > J.O.Skip Robinson
> > > Southern California Edison Company
> > > Electric Dragon Team Paddler
> > > SHARE MVS Program Co-Manager
> > > 323-715-0595 Mobile
> > > 626-543-6132 Office ⇐=== NEW
> > > robin...@sce.com
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Tom Marchant
> > > Sent: Tuesday, January 08, 2019 7:49 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: (External):Re: Generic query on Region allocation failure
> > >
> > > On Tue, 8 Jan 2019 10:16:00 +0400, Jake Anderson wrote:
> > >
> > > >IEF085I REGION NOT AVAILABLE ERROR CODE = 20 IEF187I NJJJ FAILED -
> > > >SYSTEM ERROR IN INITIATOR IEF472I NJJJ
> > >
> > > That means that the region that was specified is not available.
> > >
> > > Most likely, the region specified is less than 16M and that much storage
> > is not available below the line. It is certainly possible that the
> > available region size below the line is smaller on your old system than is
> > available on your new system.
> > >
> > > --
> > > Tom Marchant
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> > > 

Re: Abend 106 (was Generic query on Region allocation failure)

[Mike Schwab]

Fetch usually fails with INSUFFICIENT MEMORY.  Increase region size.
If you don't have one, look at the memory stats at the end of step
messages to see what was used and double. Otherwise suggest REGION=4M,
5M, 6M, 7M, 20M, 32M, 64M, etc.

On Wed, Jan 9, 2019 at 12:26 PM Peter Relson  wrote:
>
> I don't think the abend 106 that is discussed is part of the original
> discussion, so I guessed that it could do with a different thread name.
>
> The abend 106 itself is not helpful in finding out what is going on
> because that is just the generic result of a preceding problem which
> likely had message(s) and/or abend(s).
>
> It appears that what Wayne posted was truncated.
>
> IEW4000I FETCH FOR MODULE CEEBINIT FROM DDNAME *VLF*FAILED BECAUSE
> INSUFFICI
> CSV031I LIBRARY ACCESS FAILED FOR MODULE CEEBINIT, RETURN CODE 24, REASON
> CODE 2
>
> Can we get the complete information? It probably doesn't matter much. The
> missing part of IEW4000I is not going to help, but possibly having the
> rest of CSV031I (including the complete reason code) would.
>
> In at least one case, Fetch processing did a getmain, and the getmain
> failed.  Why? Because the application needed more region than was defined,
> probably.
> I'd suggest capturing a dump on the IEW4000I message issued by nucleus
> module CSVLLTCH. That's what IBM service will likely ask for.
>
> The message can also occur because of a problem with doing the relocation
> processing (I'm not sure why that lands with a message about insufficient
> storage).
>
> 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: Abend 106 (was Generic query on Region allocation failure)

[Mike Schwab]

 + X'7B5CE8')
>
>  Abend Code. . . . . . . . . : S106-X'C'
>
>  Machine Instruction . . . . : 0A0D  SVC 13 (ABEND)
>At Address. . . . . . . . : 01074DB8
>AMODE . . . . . . . . . . : 31
>
>  Instructions around point of failure:
>
>Offset   HexInstruction
> -22 43C0 5078  IC  R12,120(,R5)
> -1E 185C   LR  R5,R12
> -1C 8950 0008  SLL R5,8
> -18 16F5   OR  R15,R5
> -16 1824   LR  R2,R4
> -14 1837   LR  R3,R7
> -12 184B   LR  R4,R11
> -10 18E1   LR  R14,R1
>  -E 89E0 000C  SLL R14,12
>  -A 54E0 9038  N   R14,56(,R9)
>  -6 A5EA 8400  OILHR14,X'8400'
>  -2 181E   LR  R1,R14
>01074DB8 0A0D   SVC 13(ABEND)
>  +2 18FB   LR  R15,R11
>  +4 180C   LR  R0,R12
>  +6 181D   LR  R1,R13
>  +8 58E0 02FC  L   R14,764
> +C 58D0 E248  L   R13,584(,R14)
>+10 0DED   BASRR14,R13
>+12 18BF   LR  R11,R15
>
> Program Status Word (PSW) . : 070C1000 81074DBA
> PSW Summary . . . . . . . . : Primary Space Mode, PSW Key 0, AMODE 31,
>   Supervisor State
>
> General Purpose Registers (AMODE: 64 31 24 , Bytes: Dec Hex ):
>   R0:  0_1F00 (Storage invalid)
>   R1:  0_84106000 (Module IGC0013{ + X'9E000')
>   R2:  0_26080021 (Storage invalid)
>   R3:  0_000C (2,036 bytes of storage addressable)
>   R4:  0_0014 (2,028 bytes of storage addressable)
>   R5:  0_007FF8F0 (1,808 bytes of storage addressable)
>   R6:  0_7F5F7100 (1,089,280 bytes of storage addressable)
>   R7:  0_000C (2,036 bytes of storage addressable)
>   R8:  0_7F5F7168 (1,089,176 bytes of storage addressable)
>   R9:  0_010752E0 (7,456 bytes of storage addressable)
>   R10: 0_0024 (2,012 bytes of storage addressable)
>   R11: 0_0014 (2,028 bytes of storage addressable)
>   R12: 0_ (2,048 bytes of storage addressable)
>   R13: 0_7F5F7168 (1,089,176 bytes of storage addressable)
>   R14: 0_84106000 (Module IGC0013{ + X'9E000')
>   R15: 0_000C (2,036 bytes of storage addressable)
>
>  Load Module Name. . . . . . : IGC0101C (In Link Pack Area)
>
>At Address. . . . . . . . : 0417D000
>
>Load Module Length. . . . : X'1D6F0'
>
>
>
>  Machine Instruction . . . . : n/a
>
>At Address. . . . . . . . : 0418FDF0 (Module IGC0101C offset X'12DF0')
>
>AMODE . . . . . . . . . . : 31
>
>
>
>  Additional instructions around event offset:
>
>
>
>Offset   HexInstruction
>
>No instructions available.
>
>
>
>
>
>  Program Status Word (PSW) . : 070C1000 8418FDF2
>
>  PSW Summary . . . . . . . . : Primary Space Mode, PSW Key 0, AMODE 31,
>
>Supervisor State
>
>
>
>  General Purpose Registers (AMODE: 64 31 24 , Bytes: Dec Hex ):
>
>R0:  0032D125 (Module DFHEISUP + X'325195')
>
>R1:  7F5F7DF0 (1,085,968 bytes of storage addressable)
>
>R2:  0418FE08 (Module IGC0101C + X'12E08' - storage invalid)
>
>R3:   (2,048 bytes of storage addressable)
>
>R4:  007C5F68 (237,720 bytes of storage addressable)
>
>R5:  7F5F7428 (1,088,472 bytes of storage addressable)
>
>R6:  04192530 (Module IGC0101C + X'15530' - storage invalid)
>
>   R7:  7F5F7CF0 (1,086,224 bytes of storage addressable)
>   R8:  7F5F7438 (1,088,456 bytes of storage addressable)
>   R9:  007FC2E4 (15,644 bytes of storage addressable)
>   R10: 007FC258 (15,784 bytes of storage addressable)
>   R11:  (2,048 bytes of storage addressable)
>   R12: 7F5F7078 (1,089,416 bytes of storage addressable)
>   R13: 7F5F7078 (1,089,416 bytes of storage addressable)
>   R14: 8418FDE0 (Module IGC0101C + X'12DE0' - storage invalid)
>   R15:  (2,048 bytes of storage addressable)
>
>
>
>
> On Thu, Jan 10, 2019 at 5:56 AM Mike Schwab  wrote:
>
> > Fetch usually fails with INSUFFICIENT MEMORY.  Increase region size.
> > If you don't have one, look at the memory stats at the end of step
> > messages to see what was used and double. Otherwise suggest REGION=4M,
> > 5M, 6M, 7M, 20M, 32M, 64M, etc.
> >
> > On Wed, Jan 9, 2019 at 12:26 PM Peter Relson  wrote:
> > >
> > > I don't think the abend 106 that is discussed is part of the original
> > > discussion, so I g

Re: Using IF/THEN/ELSE for return code checking

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieab600/iea3b6_Example_3.htm

I would check each step after the backup with
//NOTIFYB   IF (ABEND OR TSOBATCH.RC >  OR BKDSN.RC > 0004) THEN
//ALERTBEXEC PGM=CICCRE01
//SYSPRINT  DD SYSOUT=*
//NOTIFYXB   ENDIF

and within the Proc.
//NOTIFYP   IF (ABEND
// OR CLEARIT.RC > 
// OR COPYS.RC > 
// OR COPYQ.RC > 
// OR CLEARIT.RC > 
// OR COPYB.RC > 
// OR CHKQMGR.RC > ) THEN
//ALERTPEXEC PGM=CICCRE01
//SYSPRINT  DD SYSOUT=*
//NOTIFYXP   ENDIF

If you wait until after the proc then you would need to add the PROC
INVOKATION name, IE
// OR STEP010.CLEARIT.RC > 

If 4 was acceptable on all steps or you submit a separate job after
the ADDRSU BACKUP
then it would be much simpler.

On Thu, Jan 17, 2019 at 3:51 AM Ward Able, Grant  wrote:
>
> This seems simple and I may be having a senior moment, but I don’t seem to be 
> able to get this to work.
> I have a number of batch jobs that do ADRDSSU backups, then execute a 
> variable number of PROC statements to copy files.
>  TSOBATCH PGM=IKJEFT01 CC= 
>  BKDSNPGM=ADRDSSU  CC= 0004
>
> Each PROC causes a series of steps to execute:
>  CLEARIT  PGM=IEBCOPY  CC= 
>  COPYSPGM=IEBCOPY  CC= 
>  COPYQPGM=IEBCOPY  CC= 
>  CLEARIT  PGM=IEBCOPY  CC= 
>  COPYBPGM=IEBCOPY  CC= 
>  CHKQMGR  PGM=IKJEFT01 CC= 
>
> Then the final step is to check the return codes and issue an alert for RC > 0
> //NOTIFY   IF (ABEND | RC > 0) THEN
> //ALERTEXEC PGM=CICCRE01
> //SYSPRINT  DD SYSOUT=*
> //NOTIFYX   ENDIF
>
> My question is this: how do I code the IF/THEN(/ELSE) to allow for RC=4 from 
> step BKDSN? I do not want an alert if this is the case, but any other step > 
> 0 should give me an alert.
>
> Regards – Grant
>
>
> DTCC Internal (Green)
> DTCC DISCLAIMER: This email and any files transmitted with it are 
> confidential and intended solely for the use of the individual or entity to 
> whom they are addressed. If you have received this email in error, please 
> notify us immediately and delete the email and any attachments from your 
> system. The recipient should check this email and any attachments for the 
> presence of viruses.  The company accepts no liability for any damage caused 
> by any virus transmitted by this 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: TS1160 parameters

[Mike Schwab]

https://www.ibm.com/us-en/marketplace/ts1160/specifications

On Thu, Jan 17, 2019 at 7:48 AM R.S.  wrote:
>
> Recently IBM announced new tape drive - TS1160 and new tape media
> Advanced Type E family (JE, JV, JM - Data, WORM, Economy).
> I cannot find technical parameters like number of tracks, number of
> heads, tape length, etc.
>
> Any clue?
>
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
> ==
>
> Jeśli nie jesteś adresatem tej wiadomości:
>
> - powiadom nas o tym w mailu zwrotnym (dziękujemy!),
> - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub 
> zapisałeś na dysku).
> Wiadomość ta może zawierać chronione prawem informacje, które może 
> wykorzystać tylko adresat.Przypominamy, że każdy, kto rozpowszechnia 
> (kopiuje, rozprowadza) tę wiadomość lub podejmuje podobne działania, narusza 
> prawo i może podlegać karze.
>
> mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
> Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
> Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
> NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
> 01.01.2018 r. wynosi 169.248.488 złotych.
>
> If you are not the addressee of this message:
>
> - let us know by replying to this e-mail (thank you!),
> - delete this message permanently (including all the copies which you have 
> printed out or saved).
> This message may contain legally protected information, which may be used 
> exclusively by the addressee.Please be reminded that anyone who disseminates 
> (copies, distributes) this message or takes any similar action, violates the 
> law and may be penalised.
>
> mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
> Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the 
> Capital City of Warsaw, 12th Commercial Division of the National Court 
> Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital 
> amounting to PLN 169,248,488 as at 1 January 2018.
>
> --
> 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: BALR and BAL in AMODE=24

[Mike Schwab]

First thing is it loads the address of the next instruction into R14.
It then jumps to that location.  Doesn't that cause some processors to
sync up the cache and instruction pipelines?

A BALR Rxx,0 would do the same thing but not perform the jump or
syncs, and is the usual statement before a USING.

On Tue, Jan 22, 2019 at 7:38 AM Vernooij, Kees (ITOP NM) - KLM
 wrote:
>
> I wonder what the purpose of this is.
> It branches to R14, usually the return address, unless you loaded the 
> destination address in R14 first.
> I am used to BALR R14,15, where R15 is the (conventional) destination address.
>
> Kees.
>
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> > Behalf Of esst...@juno.com
> > Sent: 22 January, 2019 14:31
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: BALR and BAL in AMODE=24
> >
> >  I remember back in the CICS/VS days we would code a BALR 14,14
> > It was a great Interview question to explain the workings of a BALR
> > instruction.
> >
> > -- Original Message --
> > From: John Gateley 
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: BALR and BAL in AMODE=24
> > Date: Tue, 22 Jan 2019 06:43:54 -0600
> >
> > Hello.
> >
> > The link information in the 24-bit addressing mode consists of the
> > instruction-length code (ILC), the condition code (CC), the program-mask
> > bits, and the rightmost 24 bits of the updated instruction address.
> >
> > I have never given much thought to the high byte when using this
> > instruction and switched to BASR and BAS years ago.
> >
> > Just for personal interest, does anyone recall a program using the
> > contents of the link register other than as a return address?
> >
> > Thanks for any replies.
> > John
> >
> > --
> > 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 information, services and offers, please visit our web site: 
> http://www.klm.com. This e-mail and any attachment may contain confidential 
> and privileged material intended for the addressee only. If you are not the 
> addressee, you are notified that no part of the e-mail or any attachment may 
> be disclosed, copied or distributed, and that any other action related to 
> this e-mail or attachment is strictly prohibited, and may be unlawful. If you 
> have received this e-mail by error, please notify the sender immediately by 
> return e-mail, and delete this message.
>
> Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
> employees shall not be liable for the incorrect or incomplete transmission of 
> this e-mail or any attachments, nor responsible for any delay in receipt.
> Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
> Airlines) is registered in Amstelveen, The Netherlands, with registered 
> number 33014286
> 
>
> --
> 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: Cobol Working Storage size in Dump

[Mike Schwab]

Each compile unit should tell you how big the working storage area is
for those program(s).
The link editor to store the compile unit should tell you the
attributes, and viewing or listing the individual program members.

On Sun, Jan 27, 2019 at 10:22 AM Lizette Koehler
 wrote:
>
> Yep, another question
>
> Is there a way in a SVC Dump or SYSUDUMP to determine the size of the working
> storage section?
>
> My original issue looks to be caused by two things,
>
>  1)  The working storage size increased
>  2)  There is one 24bit module linked with all the 31bit modules, thereby
> forcing it below the line
>
> Any guidance appreciated
>
>
>
> Lizette Koehler
> statistics: A precise and logical method for stating a half-truth inaccurately
>
> --
> 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: Newbie SMP/E questions

[Mike Schwab]

I think you can REJECT specific PTFs.

On Tue, Jan 29, 2019 at 10:07 AM Bob Bridges  wrote:
>
> I'm the Top-Secret admin for a client whose system programmer retired a 
> couple years ago.  The client tapped another employee to take his place, and 
> she's learning the job with frantic haste but insists with some justification 
> that she's not a system programmer yet.  Me, I came into security through the 
> applications-development side so I'm not even close.
>
> Together she and I are trying to learn SMP/E.  The immediate purpose is so we 
> can apply some TSS-related PTFs, but really, it's become clear to me that we 
> need no excuses to make it a priority; SMP/E is kind of important.
>
> I have embarked on a serious reading of the SMP/E User's Guide, but I still 
> need help.  I'll limit myself to a handful of questions to start with:
>
> Question #1) We started by applying a PTF - call it A for simplicity - and 
> its prerequisite B.  We did that last August and then the project languished 
> for the sake of other priorities.  Now we're working on it again and we want 
> to restore those two PTFs and do the APPLY again.  Why?  Well, partly because 
> it was 'way back in August and we're uncertain about exactly how we did it 
> back then.  We know more now.  Partly because we know more now and we want to 
> practice it better.  I dunno, partly because we just want to.  I think maybe 
> we bypassed some HOLDs back then too.
>
> Anyway, we attempted the RESTORE, but we got lots and lots of error messages 
> saying we need to include other PTFs in the RESTORE.  Some of these have an 
> indirect connection to A and B; B superceded at least three of them, for 
> example, which I can see were applied some years ago.  Others have no 
> relation to our PTFs that I can discern.  I haven't yet found the place in 
> the User's Guide that explains these relationship and their relevance.  Can 
> someone give a helpful explanation?
>
> Question #2) So far as we can tell by issuing LIST XREF commands, whoever ran 
> this thing in the past never did any ACCEPT, ever, except for the original 
> function code.  I see at least 11 PTFs that were applied (including our two), 
> but the distribution library shows no PTFs for any module I've yet LISTed.  
> If true, does that mean that to do a RESTORE of our two PTFs we'll have to 
> RESTORE everything back to the plain-vanilla base?
>
> Question #3) My partner the not-sysprog has in mind that maybe we need to set 
> aside this CSI (which is dedicated to Top Secret) and create another one 
> starting with the base software and build up from there.  I didn't realize 
> this could be done, but she thinks she can do it.  If it'll work, I like it; 
> we'll know in that case what we have, which we do not at present.  Anyone 
> have any thoughts on this plan?
>
> Question #4) This is a less-important add-on:  In both the online 
> documentation and the User's Guide, I read if I'm doing a RESTORE and name 
> PTFs A and B, including the GROUP operand causes SMP/E to add whatever other 
> PTFs are required for various reasons.  It doesn't seem to, though; it names 
> them and complains about them, but doesn't add them to the list.  Have I 
> misunderstood something?  I'm loathe to believe the documentation is flat 
> wrong.
>
> If you're getting ready to send rushed messages saying "DON'T DO ANYTHING 
> UNTIL YOU'VE CHECKED...", relax; we're planning to go slow.
>
> ---
> Bob Bridges, cell 336 382-7313
>   robhbrid...@gmail.com
>   rbrid...@infosecinc.com
>
> /* Anyone can do any amount of work, provided it isn't the work he is 
> supposed be doing at that moment.  -Robert Benchley */
>
> --
> 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: Internal Coupling Channel on z13

[Mike Schwab]

What is the percent busy at peak times?  How big a percent do you
need?  10% for the ICF partition?  Would you save that much by
converting Ring to Star?

On Wed, Jan 30, 2019 at 12:07 AM Brian Westerman
 wrote:
>
> No, just one single CP, no specialty processors are available.
>
> 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: ISPCFIGU not being used.

[Mike Schwab]

Double check the Catalog lists and the DSN / VOLSER between the
problem LPAR and the working LPAR.  I suspect it might be a
development LPAR with different DSNs.  Maybe check with IPLINFO too?

On Thu, Jan 31, 2019 at 12:45 PM Shaffer, Terri
<017d5f778222-dmarc-requ...@listserv.ua.edu> wrote:
>
> Ive verified the linklist dataset is where I generated the module, Ive done 
> multiple ISRFIND and ISRDDN just to make sure my concatenations are what I 
> expected.
>
> ,BROWSE   ,SYS2.USERMOD.LINKLIB(ISPCFIGU)
> ,Command ===>,
> * Top of
> .Ø..ISPCFIGU...o
> س...
> Ø..5695PMB01 ..Í-"
> Ø.dØ..569623400 .
>  ..q...q
> ISPCFIGU480R800101/31/19<<< This is what I expect
>
> This is where the utility placed the module with todays date and I can verify 
> that if I load this to an ISPLLIB dataset.
>
> What doesn’t work is if I try to pull the library from LINKLST.  Ive also 
> verified my usermod library is 30cyls and in 1 extent.
>
> Ive tried everything I can think of.. Even increasing the Sitewide Defaults 
> Version Level number and still not pulling the right one.
>
> This is what I get by default.
>
> Current Configuration Table,
> ,,Keyword File :,SYS9.ISPF.KEYWORDS(ACW2)
> ,,Identifier . :,ISPCFIGU,,Level  . . . :,480R8001,
> ,,Compile Date :,2014/11/20,  ,Compile Time :,15:13,
>
> Ms Terri E Shaffer
> Senior Systems Engineer,
> z/OS Support:
> ACIWorldwide – Telecommuter
> H(412-766-2697) C(412-519-2592)
> terri.shaf...@aciworldwide.com
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of R.S.
> Sent: Thursday, January 31, 2019 1:36 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: ISPCFIGU not being used.
>
> External Email
>
>
>
> W dniu 2019-01-31 o 19:18, Shaffer, Terri pisze:
> > Hi,
> >So I know I am missing something here as my predecessors did things 
> > uniquely.  So here my dilemma...
> >
> > I generated a new ISPCFIGU module and put it into my linklst, did the 
> > refresh, etc and its not being picked up.
> >
> > If I add the ISPCFIGU to my ISPLLIB, it works just fine.  And execute 
> > ISPCCONF, it states that fact with todays date.
> >
> > But if I try to setup for all users, it doesn’t...
> >
> > Ive searched all the LPA, LINKLST and other libraries in my TSO/ISPF logon 
> > and the module is nowhere to be found, except where I generated it too.
> >
> > Yet when I execute the ISPCCONF  command, it tells me its ISPCFIGU module 
> > from 2014.
> >
> > Ive done this same thing in my 5-way sysplex and everything worked like I 
> > expected, but the lpar off by itself, it doesn’t.
> >
> > Can someone shed light on what I'm missing?
>
> I don't put this module to LNKLST or LPA. I just created small PDS loadlib 
> just for the ISPF members and added this library to ISPLLIB.
> It works. It's simple.
>
> In your case it can be some duplicate member. Use ISRDDN or Mark Zelden's 
> FINDMOD to find it .
>
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
> ==
>
> Jeśli nie jesteś adresatem tej wiadomości:
>
> - powiadom nas o tym w mailu zwrotnym (dziękujemy!),
> - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub 
> zapisałeś na dysku).
> Wiadomość ta może zawierać chronione prawem informacje, które może 
> wykorzystać tylko adresat.Przypominamy, że każdy, kto rozpowszechnia 
> (kopiuje, rozprowadza) tę wiadomość lub podejmuje podobne działania, narusza 
> prawo i może podlegać karze.
>
> mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
> Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
> Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
> NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
> 01.01.2018 r. wynosi 169.248.488 złotych.
>
> If you are not the addressee of this message:
>
> - let us know by replying to this e-mail (thank you!),
> - delete this message permanently (including all the copies which you have 
> printed out or saved).
> This message may contain legally protected information, which may be used 
> exclusively by the addressee.Please be reminded that anyone who disseminates 
> (copies, distributes) this message or takes any similar action, violates the 
> law and may be penalised.
>
> mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
> Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the 
> Capital City of Warsaw, 12th Commercial Division of the National Court 
> Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital 
> amounting to PLN 169,248,488 as at 1 January 2018.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu wit

Re: [SPAM] Hmc for z as a virtual appliance?

[Mike Schwab]

I think they do a remote control of the HMC from another PC.

On Fri, Feb 1, 2019 at 4:11 AM ITschak Mugzach  wrote:
>
> I know, but there is a virtual appliance for rs6000. I need a hmc to
> develop an agent for our stig compliance automation product IronSphere, but
> zpdt (our mainframe) doean't have or support this facility.
>
> ITschak
>
>
> בתאריך יום ו׳, 1 בפבר׳ 2019, 12:01, מאת R.S.  >:
>
> > W dniu 2019-01-31 o 17:02, ITschak Mugzach pisze:
> > > I know power systems has one. Dies system z has such product?
> >
> > No.
> > Both HMC and SE are physical machines. PC vel x64.
> >
> > --
> > Radoslaw Skorupka
> > Lodz, Poland
> >
> >
> >
> >
> > ==
> >
> > Jeśli nie jesteś adresatem tej wiadomości:
> >
> > - powiadom nas o tym w mailu zwrotnym (dziękujemy!),
> > - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub
> > zapisałeś na dysku).
> > Wiadomość ta może zawierać chronione prawem informacje, które może
> > wykorzystać tylko adresat.Przypominamy, że każdy, kto rozpowszechnia
> > (kopiuje, rozprowadza) tę wiadomość lub podejmuje podobne działania,
> > narusza prawo i może podlegać karze.
> >
> > mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa,
> > www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. Warszawy
> > XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, NIP:
> > 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na
> > 01.01.2018 r. wynosi 169.248.488 złotych.
> >
> > If you are not the addressee of this message:
> >
> > - let us know by replying to this e-mail (thank you!),
> > - delete this message permanently (including all the copies which you have
> > printed out or saved).
> > This message may contain legally protected information, which may be used
> > exclusively by the addressee.Please be reminded that anyone who
> > disseminates (copies, distributes) this message or takes any similar
> > action, violates the law and may be penalised.
> >
> > mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950
> > Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the
> > Capital City of Warsaw, 12th Commercial Division of the National Court
> > Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital
> > amounting to PLN 169,248,488 as at 1 January 2018.
> >
> > --
> > 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: [SPAM] Hmc for z as a virtual appliance?

[Mike Schwab]

Well, the IBM S/360 and earlier had control panels.
This IBM S/370 is still running a 3277 operator console.
https://www.youtube.com/watch?v=HETSEyIPuv0

On Sat, Feb 2, 2019 at 5:00 AM R.S.  wrote:
>
> W dniu 2019-02-02 o 01:42, Tony Harminc pisze:
> > On Fri, 1 Feb 2019 at 09:29, R.S.  wrote:
> >> IMHO the topic is HMC for zPDT. Unfortunately zPDT does not have HMC in
> >> any form, real or emulated.
> >> It's not mainframe, it's only emulation.
> > No, zPDT *is* a mainframe. It implements a permitted subset of the
> > architecture documented in the Principles of Operation.
> >
> > The HMC is not described in the Principles of Operation. It replaces
> > the knobs, lights, and switches that provided the operator interface
> > on older systems. Some of the *functions* performed by the HMC are
> > architected (and are implemented by zPDT without an HMC), but none of
> > how it works or what the interface looks like. Here is the only
> > description of anything like an HMC in the POO:
>
> No, zPDT is not mainframe. It is emulator, like Hercules.
> Of course there is no single official definition of mainframe - you can
> say the emulator on PC is real machine, for me it's emulator, for some
> sales people big PC server deserves to be named mainframe (despite it
> can run Windows).
>
> Of course there were older IBM mainframes in pre-HMC era or just were
> non-IBM mainframes (ICL, GE...)
>
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
> ==
>
> Jeśli nie jesteś adresatem tej wiadomości:
>
> - powiadom nas o tym w mailu zwrotnym (dziękujemy!),
> - usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub 
> zapisałeś na dysku).
> Wiadomość ta może zawierać chronione prawem informacje, które może 
> wykorzystać tylko adresat.Przypominamy, że każdy, kto rozpowszechnia 
> (kopiuje, rozprowadza) tę wiadomość lub podejmuje podobne działania, narusza 
> prawo i może podlegać karze.
>
> mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
> Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
> Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
> NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
> 01.01.2018 r. wynosi 169.248.488 złotych.
>
> If you are not the addressee of this message:
>
> - let us know by replying to this e-mail (thank you!),
> - delete this message permanently (including all the copies which you have 
> printed out or saved).
> This message may contain legally protected information, which may be used 
> exclusively by the addressee.Please be reminded that anyone who disseminates 
> (copies, distributes) this message or takes any similar action, violates the 
> law and may be penalised.
>
> mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
> Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the 
> Capital City of Warsaw, 12th Commercial Division of the National Court 
> Register, KRS 025237, NIP: 526-021-50-88. Fully paid-up share capital 
> amounting to PLN 169,248,488 as at 1 January 2018.
>
> --
> 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: Wells Fargo? Well f*&%#d at the moment: Data center up in smoke, bank website, app down . The Register

[Mike Schwab]

They had an outage last week too???
https://www.msn.com/en-us/money/companies/wells-fargo-customers-furious-over-second-service-outage-in-a-week/ar-BBTijJE?ocid=st

I did see story about dust setting off the fire alarm.

I read a story a few months ago.  If you keep the O2 percent down to
15%, you can't have a fire.  16% and a match will ignite.

On Thu, Feb 7, 2019 at 5:09 PM Lester, Bob  wrote:
>
>
> Halon dumps are a real drag.  When I was in the USAF, we used to have to 
> do drills - and yes, they did drop the Halon on us operators.We had very 
> little time to drop and evacuate, as I recall.
>
> and it leaves quite a mess
>
> Thanks!
> BobL
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Lizette Koehler
> Sent: Thursday, February 7, 2019 3:51 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Wells Fargo? Well f*&%#d at the moment: Data center up in smoke, 
> bank website, app down . The Register [ EXTERNAL ]
>
> I think I have seen the phrase - If you do Banking you use IMS and it only 
> runs on Mainframe.
>
> I had heard that the halon system went off and caused the power to go down in 
> Minnesota
>
> Lizette
>
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Edward Finnell
> > Sent: Thursday, February 07, 2019 3:26 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Wells Fargo? Well f*&%#d at the moment: Data center up in
> > smoke, bank website, app down . The Register
> >
> > They used to have a large data center on Mission in SFO but don't know
> > what this server in Minn. did. Surely we'll hear more shortly.
> >
> > In a message dated 2/7/2019 4:13:25 PM Central Standard Time,
> > marktre...@gmail.com writes:
> > Does Wells Fargo use mainframes?
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> This e-mail transmission may contain information that is proprietary, 
> privileged and/or confidential and is intended exclusively for the person(s) 
> to whom it is addressed. Any use, copying, retention or disclosure by any 
> person other than the intended recipient or the intended recipient's 
> designees is strictly prohibited. If you are not the intended recipient or 
> their designee, please notify the sender immediately by return e-mail and 
> delete all copies. OppenheimerFunds may, at its sole discretion, monitor, 
> review, retain and/or disclose the content of all email communications.
>
>
> --
> 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: Hmc for z as a virtual appliance?

[Mike Schwab]

What serial number does he use if he doesn't have a z## processor?  He
only wants to test with the HMC.

On Thu, Feb 7, 2019 at 11:36 PM Timothy Sipples  wrote:
>
> ITschak Mugzach wrote:
> >What is the IBM product id of the HMC for system z? We would like
> >to order one from IBM.
>
> The HMC is a feature code ("FC"), ordered as part of (or added to) a
> particular machine with serial number. For example, for the IBM z14 ZR1 the
> machine type is 3907 and the model is ZR1. You would then choose either FC
> 0082 (Hardware Management Console, traditional/classic form factor) or FC
> 0083 (HMC, rack mount form factor). For FC 0082 you would also order FC
> 0148 (keyboard/monitor/mouse for a table or desk), or for FC 0083 you would
> also order FC 0154 (keyboard/monitor/mouse in rack mount form).
>
> To recap:
>
> 1. Contact your IBM representative or IBM Z reseller representative.
>
> 2. Give the representative your machine type and model (e.g. 3907-ZR1).
> Also give the representative your machine serial number. Your
> representative may already have this information, but it's best to confirm
> it, especially if you have more than one machine.
>
> 3. Ask to place an order for either FC 0082 plus FC 0148 (desktop), or FC
> 0083 plus FC 0154 (rack mount). Specify the quantity you want (typically
> quantity one). If you want to lease the equipment, ask your representative
> if it's possible.
>
> Step 2 will be a hard stop if you have machine that's not currently
> marketed (not generally available) or if you have a machine type/model that
> doesn't offer the Hardware Management Console. Of course, you can get past
> Step 2 if you order a currently marketed machine that offers the HMC, or if
> you order a machine upgrade (MES) with a new HMC, if applicable.
>
> 
> Timothy Sipples
> IT Architect Executive, Industry Solutions, IBM Z & LinuxONE
> E-Mail: 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: JVM errors running daily SCRT at currently available V26.1

[Mike Schwab]

Looks like you regressed your JVM from 1.8.0_181 8.0.5.20 (worked) to
1.8.0_171 8.0.5.15 (failed).

Maybe a steplib or someone had a problem

On Fri, Feb 8, 2019 at 5:21 AM Richards, Robert B.
<01c91f408b9e-dmarc-requ...@listserv.ua.edu> wrote:
>
> Has anyone else seen this recently? It worked yesterday, failed today and to 
> the best of my knowledge, nothing has been changed (production lpar at z/OS 
> 2.2).
>
> JVMJZBL1001N JZOS batch Launcher Version: 2.4.8 2017-09-13
> JVMJZBL1002N (C) Copyright IBM Corp. 2005, 2016
> java version "1.8.0_171"
> Java(TM) SE Runtime Environment (build 8.0.5.15 - 
> pmz6480sr5fp15-20180502_01(SR5 FP15))
> IBM J9 VM (build 2.9, JRE 1.8.0 z/OS s390x-64 Compressed References 
> 20180425_385365 (JIT enabled, AOT enabled)
> OpenJ9   - a7ffbfe
> OMR  - a531219
> IBM  - 59ef3dc)
> JVMJZBL1015N MVS commands are DISABLED
> JVMJZBL1023N Invoking com.ibm.scrt.SCRTe.main()...
> JVMJZBL1043N The Java virtual machine completed with System.exit(16)
>
> --
> 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: Friday history query

[Mike Schwab]

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

Possible matches:
1955 General Motors Operating System for IBM 701.
1956 GM-NAA I/O for IBM 704.

On Fri, Feb 8, 2019 at 6:55 PM Pew, Curtis G
 wrote:
>
> Since it’s Friday, I’ll go ahead and ask about this.
>
> My father, who passed away last spring, worked for IBM from about 1959 to 
> 1978. My mother was going through some things this week and found a letter of 
> commendation he received for work with something called the “GEM Operating 
> System Group” in early 1966.
>
> Googling variations on “GEM Operating System Group” only turns up things much 
> more recent, so I was wondering if someone on this list might have heard of 
> it and be able to point me to more information.
>
> Thanks.
>
>
> --
> Pew, Curtis G
> curtis@austin.utexas.edu
>
>
>
>
>
>
> --
> 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: Wells Fargo? Well f*&%#d at the moment: Data center up in smoke, bank website, app down . The Register

[Mike Schwab]

Mirroring the DASD to the backup site.

On Mon, Feb 11, 2019 at 4:50 PM Jesse 1 Robinson
 wrote:
>
> I have nothing but admiration for a shop that can slosh workload back and 
> forth between two data centers. There are those that can and those (like us) 
> that cannot. How does one get from the first group into the second?
>
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Vernooij, Kees (ITOP NM) - KLM
> Sent: Monday, February 11, 2019 5:58 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: Wells Fargo? Well f*&%#d at the moment: Data center 
> up in smoke, bank website, app down . The Register
>
> We run in 2 sites continuously. Mainly Prod in 1 site and Dev/Acc in the 
> other site, a CF in both sites and Dasd mirrored between the sites.
> Our DRP consists of moving workload from 1 site's LPARs to the corresponding 
> LPARs in the other site and adding capacity b.m.o. CBUs. No manipulation of 
> LPARs.
> We do this from time to time, sometimes as part of a DRP test, recently also 
> because of a potentially disastrous power maintenance in a site.
> A piece of cake, compared to the comments I read above.
>
> Kees.
>
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Allan Staller
> > Sent: 11 February, 2019 14:30
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Wells Fargo? Well f*&%#d at the moment: Data center up in
> > smoke, bank website, app down . The Register
> >
> > I have heard of a company in the Far East the periodically (every 6
> > mths., IIRC) flips from site A to site B (and back).
> > Aus(?) to Phillipines ?) and back.
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Savor, Thomas (Alpharetta)
> > Sent: Friday, February 8, 2019 7:08 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Wells Fargo? Well f*&%#d at the moment: Data center up in
> > smoke, bank website, app down . The Register
> >
> > >We've been doing DR mirroring for 20 years. It gets tested often.
> > >We've
> > moved production twice to another >data center using our procedures.
> > What we've never done is run production in another location
> > >temporarily. 'Temporary' means move it, run it until at least one
> > transaction is committed, then move it >*all* back. That is hugely
> > complex and costly.
> >
> > >A lot of management fantasizes about a big A-B switch that we throw
> > >one
> > way or the other. So wrong.
> >
> > About 5-6 years ago, I was working as a vendor (Daily Support) for
> > Credit Card Software for Halifax/Bank of Scotland.  I believe the
> > first time I was given a "heads up" was when we were supporting 12
> > Million Cardholders.  The "Heads up" was that on Friday evening at 6pm
> > Main site was going to shut down and the whole weekend PRODUCTION was
> > going to run on DR site, then 6am Monday Morning, Main site is to come
> > back up and continue as if nothing happened !!!  I literally peed  in my 
> > pants !!!
> > Probably everyone in Atlanta could hear me...NO !!!  Thinking
> > of all the network signons with Visa and Mastercard...all the credit
> > card Authorizations...there was absolutely zero chance of this working
> > without issues.
> >
> > Well, came in Monday morning after receiving no calls over the
> > week-end everything was fine.  We ran the Batch Monday night...and
> > that would be pulling in transactions from over the week-end from DR site.
> > NO ISSUES !!!   Everything was fine.
> >
> > Whoever did this, from a Systems perspectiveI tip my hat.  I've
> > never seen someone do this with Production, but it worked fine...so
> > what do I know.  Never seen anyone else do this in my 42 years of
> > Mainframing either.
> >
> > Unfortunately, Halifax/Bank of Scotland is no longer with us.  They
> > were absorbed by Lloyds Banking Group.
> >
> >
> > Thanks,
> > Tom Savor
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > ::DISCLAIMER::
> > --
> > --
> > --
> > --
> > --
> > --
> > --
> > The contents of this e-mail and any attachment(s) are confidential and
> > intended for the named recipient(s) only. E-mail transmission is not
> > guaranteed to be secure or error-free as information could be
> > intercepted, corrupted, lost, destroyed, arrive l

Re: Wells Fargo? Well f*&%#d at the moment: Data center up in smoke, bank website, app down . The Register

[Mike Schwab]

As soon as you start production at the DR site, you need to start
replication to your next site (production or third site).
If you have a clean shutdown and the mirroring software supports it,
you might be able to swap primary and secondary to avoid having to
copy the volumes.

On Mon, Feb 11, 2019 at 9:06 PM Jesse 1 Robinson
 wrote:
>
> Sorry Mike. That's what management seems to believe. It's what we've done for 
> TWENTY years. It allows us to fail over to the 'DR site' at will. Including 
> for-real failover where DR becomes the day-to-day home from then on. That's 
> not the hard part. The hard part is that after failover, production now lives 
> at the DR site, yet it's officially temporary. All new REAL customer data now 
> lives over the hill and through the woods, not at home.
>
> -- 1000's of volumes/UCBs worth of data that is suddenly obsolete 'at home' 
> and therefore useless.
>
> -- A GDPS mapping of all prod volumes to DR secondary volumes.
>
> -- A GDPS mapping of all secondary volumes to tertiary volumes, which we 
> actually IPL from. If we IPL'ed and ran with secondary volumes, mirroring 
> would be destroyed until we resynched.
>
>  -- We're under the gun to move back 'home' with some alacrity because two 
> CECs are required for CF redundancy. DR has only one CEC for economy.
>
> All of this bodes ill for willy-nilly switching back and forth between data 
> centers unless there's some secret trick(s) I don't know about.
>
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Mike Schwab
> Sent: Monday, February 11, 2019 5:03 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: Wells Fargo? Well f*&%#d at the moment: Data center 
> up in smoke, bank website, app down . The Register
>
> Mirroring the DASD to the backup site.
>
> On Mon, Feb 11, 2019 at 4:50 PM Jesse 1 Robinson  
> wrote:
> >
> > I have nothing but admiration for a shop that can slosh workload back and 
> > forth between two data centers. There are those that can and those (like 
> > us) that cannot. How does one get from the first group into the second?
> >
> > .
> > .
> > J.O.Skip Robinson
> > Southern California Edison Company
> > Electric Dragon Team Paddler
> > SHARE MVS Program Co-Manager
> > 323-715-0595 Mobile
> > 626-543-6132 Office ⇐=== NEW
> > robin...@sce.com
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Vernooij, Kees (ITOP NM) - KLM
> > Sent: Monday, February 11, 2019 5:58 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: (External):Re: Wells Fargo? Well f*&%#d at the moment: Data
> > center up in smoke, bank website, app down . The Register
> >
> > We run in 2 sites continuously. Mainly Prod in 1 site and Dev/Acc in the 
> > other site, a CF in both sites and Dasd mirrored between the sites.
> > Our DRP consists of moving workload from 1 site's LPARs to the 
> > corresponding LPARs in the other site and adding capacity b.m.o. CBUs. No 
> > manipulation of LPARs.
> > We do this from time to time, sometimes as part of a DRP test, recently 
> > also because of a potentially disastrous power maintenance in a site.
> > A piece of cake, compared to the comments I read above.
> >
> > Kees.
> >
> >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List
> > > [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Allan Staller
> > > Sent: 11 February, 2019 14:30
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: Wells Fargo? Well f*&%#d at the moment: Data center up
> > > in smoke, bank website, app down . The Register
> > >
> > > I have heard of a company in the Far East the periodically (every 6
> > > mths., IIRC) flips from site A to site B (and back).
> > > Aus(?) to Phillipines ?) and back.
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On
> > > Behalf Of Savor, Thomas (Alpharetta)
> > > Sent: Friday, February 8, 2019 7:08 PM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Re: Wells Fargo? Well f*&%#d at the moment: Data center up
> > > in smoke, bank website, app down . The Register
> > >
> 

Re: PPRC power failure

[Mike Schwab]

On the sending DASD there is a 1 bit per track table of updated
tracks.  When each track is sent the bit is reset.  When it gets
caught up it sets a sync point.

On Wed, Feb 13, 2019 at 9:44 PM Peter  wrote:
>
> Hi
>
> One of our DS box in DR had a power failure last night and our production
> LPARS logon got impacted . When I checked up the RMF i saw many DASD
> devices were overloaded and flood of PPRC error messages too in SYSLOG.
>
> Once we fixed the power failure and re-established the replication the
> logins and all the application started running.
>
> Is there any relationship to system performance with the PPRC failure ?
>
> 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

The 200 year old computer

[Mike Schwab]

Starts with the Jacquard loom using punched cards,
Babich's unfinished difference engine, and
Holreith's punched cards for the 1890 census.
https://www.youtube.com/watch?v=R7-a7kzlk9g

-- 
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: pax abend

[Mike Schwab]

Is Java installed?

https://www.mail-archive.com/search?l=ibm-main@listserv.ua.edu&q=subject:%22Re%5C%3A+GIM69209S+%5C%2A%5C%2A+RECEIVE+PROCESSING+HAS+FAILED+BECAUSE+PROGRAM+GIMJVCLT+COULD+NOT+BE+Started.%22&o=newest&f=1

On Mon, Feb 18, 2019 at 2:49 AM Gadi Ben-Avi  wrote:
>
> Hi,
> I am trying to install a product distributed as a pax file.
> When I run the pax command: pax -rvf paxfile I get:
> CEE5207E THE SIGNAL SIGABRT WAS RECEIVED.
> 1¤ + Done(131) pax -rvf F0AW020.pax.Z
>   33554468  Abort   /bin/pax
>
> Can anyone help me find out what the problem is.
>
> This is a brand new z/OS v2.3 system, and we are starting to install ISV 
> products.
>
> Thanks
>
> 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: Is there an HCD for Dummy's book anywhere?

[Mike Schwab]

http://www.redbooks.ibm.com/abstracts/sg247804.html?Open

Redbook from 2010, so a few versions out of date.

On Tue, Feb 19, 2019 at 7:38 PM Tony Thigpen  wrote:
>
> It suddenly dawned on me that I was miss-understanding "logical address
> (same as CUADD)". I was reading it as "logical address which will be set
> to the specified CUADD value" instead of "logical address (which others
> call CUADD)".
>
> Duh!
>
> Tony Thigpen
>
> Neubert, Kevin wrote on 2/19/19 7:07 PM:
> > Sounds like you have not gone far enough.
> >
> > After you add the CU, select the processor(s), should then have a panel 
> > with channel path IDs, unit address, logical address (same as CUADD), etc.
> >
> > If appropriate, might make a little more sense if you "add like" an 
> > existing VTL control unit.  Values can still be tailored using this manner.
> >
> > Regards,
> >
> > Kevin
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> > Behalf Of Tony Thigpen
> > Sent: Tuesday, February 19, 2019 2:52 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Is there an HCD for Dummy's book anywhere?
> >
> > The HCD panels are driving me crazy.
> >
> > I don't know if my eyeballs need replacing or if this is a 'they called it 
> > something else' problem.
> >
> > All I want to do is add a new control unit and some tapes for our VTL, but 
> > the control unit needs a specific CUADD= value and I just don't see any 
> > field on the panel that seems remotely where I would specify the CUADD= 
> > value.
> >
> > --
> > Tony Thigpen
> >
> > --
> > 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: Anyone ever seen/hear about a set of programs called SUPERCOP/SUPCOP1/SUPCOP2/SUPCOP3

[Mike Schwab]

After skipping over the movie references, I stumbled upon
https://docs.oracle.com/cd/E74851_02/fscm92/lcf92lcfs-b092018.pdf
Oracle's PeopleSoft Financials and Supply Change Management 9.2 with a section:

 Original location: https://github.com/majek/csiphash/ Solution
inspired by code from: Samuel Neves
(supercop/crypto_auth/siphash24/little) djb
(supercop/crypto_auth/siphash24/little2) Jean-Philippe Aumasson
(https://131002.net/siphash/siphash24.c) strtod and dtoa

Looks like Samuel Neves is still writing encryption routines at
https://github.com/sneves

Of course, if your site never had PeopleSoft, this is a wild goose.

On Sat, Feb 23, 2019 at 9:17 PM Feller, Paul
 wrote:
>
> Has anyone ever seen/hear about a set of programs called 
> SUPERCOP/SUPCOP1/SUPCOP2/SUPCOP3.  We ran into an issue with these programs 
> related to EAV volumes.  It seems we acquired these programs as part of a 
> merger many years ago.  No one seems to have any idea where the source could 
> be.  From what we can tell these may have been some freeware programs, but 
> can't say for 100%.  We searched the CBT website and did some Google searches 
> but could not find anything to help us.
>
> I would be interested in hearing from anyone that happens to know about these 
> programs and has source.
>
> As a side note with the use of the ASMDASM program and some detective work we 
> determined what was causing the issue and was able to ZAP the program SUPCOP1 
> to fix the issue.  It would be nice to have source for any future issues.
>
> Thanks..
>
> Paul Feller
> AGT Mainframe Technical Support
>
>
>
>
> --
> 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: z/OS V2R5 Will be the Last Release to Include JES3

[Mike Schwab]

JES3 will not start your job until datasets are released and space is
available.  JES2 starts your job then waits until the datasets are
available, and you can run out of space.

On Wed, Feb 27, 2019 at 10:18 AM Savor, Thomas (Alpharetta)
 wrote:
>
> >That means a) IBM has until September 2023 to fully bring JES2 up to
> >JES3 standard
>
> Is JES3 really considered by all to be better than JES2 ??
> I know it was 20 years ago, but JES3 gave me nightmares, whereas JES2 never 
> has.
> From an application point of view.
>
> Thanks,
>
> Tom Savor
>
> --
> 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: CPU time and zIIP

[Mike Schwab]

Especially since zIIPs are faster but cost lest, and CPs are slower.
One nice feature about reduced speed CPs is any delay waiting for
resources are not counted toward your reduced speed for a CP.

On Sat, Mar 2, 2019 at 2:49 PM Martin Packer  wrote:
>
> Agreed. I - for maybe 20 years - have recommended reporting on each
> processor pool separately.
>
> Cheers, Martin
>
> Martin Packer
>
> zChampion, Systems Investigator & Performance Troubleshooter, IBM
>
> +44-7802-245-584
>
> email: martin_pac...@uk.ibm.com
>
> Twitter / Facebook IDs: MartinPacker
>
> Blog:
> https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker
>
> Podcast Series (With Marna Walle): https://developer.ibm.com/tv/mpt/or
>
> https://itunes.apple.com/gb/podcast/mainframe-performance-topics/id1127943573?mt=2
>
>
> Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA
>
>
>
> From:   Peter Relson 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   02/03/2019 16:21
> Subject:Re: CPU time and zIIP
> Sent by:IBM Mainframe Discussion List 
>
>
>
> >is that true for CPU percent also?
>
> The original post and my answers were about SDSF. They did not show (to
> the best of my eyesight) or discuss any percentage fields.
>
> Are you now asking a question about a percentage shown in RMF? I don't
> pretend to know anything about what RMF displays, but it would likely not
> be a good idea to try to lump together busy percentages pertaining to
> standard CPs and zIIPs because the two types of processors are intended to
>
> have different characteristics in terms of how busy it is appropriate for
> them to be.
>
> 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
>
>
>
>
> Unless stated otherwise above:
> IBM United Kingdom Limited - Registered in England and Wales with number
> 741598.
> Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU
>
> --
> 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 many asterisks to change a lightbulb?

[Mike Schwab]

Just get magnetic lights prewired to connector.
https://www.amazon.com/s?k=magnetic+trailer+lights&ref=nb_sb_noss_1

On Thu, Mar 7, 2019 at 4:13 PM Schuffenhauer, Mark  wrote:
>
> They still use bayonet bases for 12 volt lighting.  I have also seen interior 
> 12 volt lighting with bayonet bases.  Either way, screw-in or bayonet, trying 
> to separate components sucks, when it's all rusted together, and you need 
> trailer lights NOW!
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Tom Marchant
> Sent: Thursday, March 07, 2019 4:05 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: How many asterisks to change a lightbulb?
>
> On Thu, 7 Mar 2019 20:42:42 +, Jesse 1 Robinson wrote:
>
> >Guys, gimme a break. This was MY thread. I chose the subject line. My 
> >'meaning' question was about "ditch the Edison screw and use a bayonet". Is 
> >that about US vs. EU light bulb design?
>
> Some light bulbs used in cars use bayonet bases. e.g. brake light and turn 
> signals.
> At least they used to. Not sure if they still do.
>
> --
> Tom Marchant
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> DISCLAIMER: This email and any attachments may contain confidential 
> information that is intended solely for use by the intended recipient(s). If 
> you are not the intended recipient, you are strictly prohibited from 
> disclosing, copying, distributing or using any of the information contained 
> in the communication. If you received this email in error, please contact the 
> sender by reply email and immediately delete the communication.
>
> --
> 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: CPU time and zIIP

[Mike Schwab]

On the full speed box the delays will be real.  On the faster
kneecapped box the delays will be counted as part of the kneecapping.

On Mon, Mar 11, 2019 at 3:40 PM Edward Finnell
<000248cce9f3-dmarc-requ...@listserv.ua.edu> wrote:
>
> Is the overhead noticeable from a thruput standpoint?
>
> Say we have a 100 MSU box and a 200 MSU box capped at 100 will same workloads 
> complete in close proximity?In a message dated 3/4/2019 9:36:11 PM Central 
> Standard Time, edja...@phoenixsoftware.com writes:
> So a better analogy might be that each CP is going around a race track
> and pulls into the pits on each lap. After servicing, sub-capacity
> models are held in the pits for awhile before they're allowed back on
> the track.
>
> --
> 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: IARST64 in addrr

[Mike Schwab]

PIC is Program Interuption Code.  Printed page 72 of
GA22-7000-4_370_Principles_Of_Operation_Sep75.pdf  shows this to be
page translation error.  That means the logical page references is not
in CORE (RAM).  The operating system need to read in the logical
memory from paging files and retry the instruction.

On Wed, Mar 13, 2019 at 2:32 AM Binyamin Dissen
 wrote:
>
> Mr.  Joseph Reichman tends to think his code is super sekrit  and thus asks
> for help supplying minimum detail rather than simply providing the code so
> that we can figure it out.
>
> On Wed, 13 Mar 2019 06:45:32 + Anthony Thompson
>  wrote:
>
> :>I believe the OP is referring to the system trace table entries for a page 
> fault.
> :>
> :>Ant.
> :>
> :>-Original Message-
> :>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Elardus Engelbrecht
> :>Sent: Wednesday, 13 March 2019 4:02 PM
> :>To: IBM-MAIN@LISTSERV.UA.EDU
> :>Subject: Re: IARST64 in addrr
> :>
> :>Joseph Reichman wrote:
> :>
> :>>I have been getting S0C4 pic 11 11 meaning not a translation error or a
> :>>invalid address but that it wasn’t allocated
> :>
> :>What is 'pic 11 11'? Just like the other wizards, I am also confused by 
> what you wrote.
> :>
> :>Please post the full Abend message(s) and all the return and reason codes 
> as well the register contents.
> :>
> :>Groete / Greetings
> :>Elardus Engelbrecht
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> 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 obtain DSN's of SL Tape using CBTTAPE

[Mike Schwab]

http://www.jaymoseley.com/hercules/cbt_ware/tapemap.htm is a good example.

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieab600/iea3b6_Syntax43.htm
If you are using a modern z/OS that has promoted DCB parameters, IBM's
suggestion is to take it out of the LABEL parameter.

On Wed, Mar 13, 2019 at 7:44 AM Hilario Garcia  wrote:
>
> The problem I have is that I do not know how many files there are in 
> cartridges that have been
> recorded as SL.
>
> I am trying to use the TAPEMAP program of the CBTTAPE.
>
> My jcl has the following format:
>
> // STEP0010 EXEC PGM=TAPEMAP
> // STEPLIBDD DSN=CBTTAPE.LINKLIB,DISP =SHR
> // SYSPRINT DD SYSOUT=*
> // AMSDUMP DD SYSOUT=*
> // SYSUT1DD DISP=OLD,
> //UNIT=3490,LABEL=(,BLP,EXPDT=98000),
> //VOL=(,RETAIN ,, SER= PUNLIB)
>
> Messages I receive from the system:
>
> IEF233A M 0581, PUNLIB ,, TAPEMAP, STEP0010, 173
> SYS19072.T143538.RA000.TAPEMAP.R0100030
> IEC502E RK 0581, PUNLIB, SL, TAPEMAP, STEP0010
> IEC501A M 0581, PUNLIB, NL ,, TAPEMAP, STEP0010, 
> SYS19072.T143538.RA000.TAPEMAP.R0100
>
> The system detects that the cartridge is SL (I have it encoded as BLP) to 
> obtain
> a list of all the files and DCB of the files in the cartridge.
>
> I am not using any ATL.
>
> Thank you very much in advance.
>
> --
> 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: Disturbing news in the z/OS 2.4 announcement letter

[Mike Schwab]

Several TN3270E emulators offer file transfer windows.  Doesn't Rocket
Software offer something similar?

On Wed, Mar 13, 2019 at 2:09 PM Don Leahy  wrote:
>
> "Withdrawal of ISPF Workstation Agent (WSA)
>
> z/OS V2.4 is planned to be the last release to support the ISPF Workstation
> Agent (WSA), also known as the ISPF Client/Server Component. WSA is an
> application that runs on your local workstation and maintains a connection
> between the workstation and the ISPF host. It is primarily used to transfer
> files between the workstation and the host. IBM recommends using more
> current file transfer solutions such as those provided by the Zowe Dataset
> Explorer, z/OS FTP, and similar file transfer mechanisms. These solutions
> have more capabilities, including the ability to provide secure
> communications."
>
>
> I have a lot of tools in my box that rely on WSA.  WSA is so easy to
> automate using ISPF services that I will hard pressed to find alternatives
> that are as seamless to use.
>
> On the other hand, I am only a few years away from retirement so I may not
> bother. :-)
>
> --
> 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: OpenSSH / Ported Tools / Co:Z

[Mike Schwab]

They got rid of Unformatted System Services?

On Sun, Mar 17, 2019 at 3:05 PM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sun, 17 Mar 2019 15:45:11 -0400, scott Ford wrote:
>
> >Very funny Rad ..USS wars is about right ...lol
> >
> >On Sat, Mar 16, 2019 at 4:27 PM R.S. wrote:
> >
> >> OK, who start "USS is not Unix System Services" war?
> >> Don't forget about "it's UNIX, not Unix" and "official acronym".
> >> Of course all the typos will be punished seriously.
> >>
> The z/OS glossary contains no definition of "USS".  I wonder what an RCF 
> would cause?
> 
> https://www.ibm.com/support/knowledgecenter/en/zosbasics/com.ibm.zglossary.doc/zglossary.html
> -- 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: OpenSSH / Ported Tools / Co:Z

[Mike Schwab]

Well, I did find VTAM USS (Unformatted System Services) TABLES.  I
believe these date back to the 1970s.

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.istrdr0/uss_table.htm

On Mon, Mar 18, 2019 at 5:49 PM David Mingee  wrote:
>
> C lever... I did find hits on google for acronym -  USS,  navy and Z/OS Unix 
> System Services .  For some reason it made me think of Snow White and the 7 
> dwarfs of mainframe.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Jesse 1 Robinson
> Sent: Monday, March 18, 2019 6:07 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: OpenSSH / Ported Tools / Co:Z
>
> So what's all the fUSS?
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Matt Hogstrom
> Sent: Monday, March 18, 2019 1:25 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: OpenSSH / Ported Tools / Co:Z
>
> Actually it is in every z/OS Unix System Services document.  Cleverly 
> disguised with the prefix ‘disc' and the suffix ‘ed’ ’ion’ or others.  For 
> example
>
> So far, we have discussed
> The following discussion
>
> There is it, USS hiding in plain sight in almost ALL IBM documents.
>
> Matt Hogstrom
> m...@hogstrom.org
> PGP Key: 0x90ECB270
>
> "Never attribute to malice that which is adequately explained by stupidity.” 
> - Hanlon’s Razor
>
> > On Mar 18, 2019, at 12:54 PM, Jesse 1 Robinson  
> > wrote:
> >
> > In an obscure corner of IBM's PK campus is a nondescript bunker-like 
> > building. The basement of that building houses the IBM Acronym Factory. The 
> > IAF is staffed by a cadre of probationary lawyers and a rotating squad of 
> > 14-year-old boys. A proposed acronym is first sprung on the boys; if they 
> > giggle, the PA is discarded. Otherwise it's tossed into the lawyer cage. If 
> > it emerges intact, it's on the road to acronymhood.
> >
> > 'USS' was relegated to wannabe status for reasons forever locked in the 
> > IAF. No matter how commonly it's used, it doesn't officially exist. Think 
> > of trying to sneak a snippet of Anglo Saxon slang past the Alliance 
> > Francaise. Cannot happen.
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Paul Gilmartin
> > Sent: Sunday, March 17, 2019 3:20 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: (External):Re: OpenSSH / Ported Tools / Co:Z
> >
> > On Sun, 17 Mar 2019 16:32:42 -0500, Mike Schwab wrote:
> >
> >> They got rid of Unformatted System Services?
> >>
> > Just the abbreviation.  Perhaps they'd rather not take sides.  Did the 
> > abbreviation appear in an older Glossary?  Wayback Machine?  BitSavers?
> >
> >> On Sun, Mar 17, 2019 at 3:05 PM Paul Gilmartin wrote:
> >>>
> >>> On Sun, 17 Mar 2019 15:45:11 -0400, scott Ford wrote:
> >>>
> >>>> Very funny Rad ..USS wars is about right ...lol
> >>>>
> >>>> On Sat, Mar 16, 2019 at 4:27 PM R.S. wrote:
> >>>>
> >>>>> OK, who start "USS is not Unix System Services" war?
> >>>>> Don't forget about "it's UNIX, not Unix" and "official acronym".
> >>>>> Of course all the typos will be punished seriously.
> >>>>>
> >>> The z/OS glossary contains no definition of "USS".  I wonder what an RCF 
> >>> would cause?
> >>>
> >>> https://www.ibm.com/support/knowledgecenter/en/zosbasics/com.ibm.zgl
> >>> o
> >>> ssary.doc/zglossary.html
> >
> > -- gil
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
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: CPC doubt

[Mike Schwab]

Here is the current LSPR page.  It rates mainframe models by
processors and speed.

https://www-01.ibm.com/servers/resourcelink/lib03060.nsf/pages/lsprITRzOSv2r2?OpenDocument

On Thu, Mar 21, 2019 at 9:26 AM johnnydeep san  wrote:
>
> Hello all,
>
> Just small question , I would like to know how many  CPC can add in single
> mainframe hardware box?.
>  - JD
>
> --
> 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: z/OS Management Facility

[Mike Schwab]

Do you have the Redbook?
http://www.redbooks.ibm.com/abstracts/sg247851.html?Open

On Thu, Mar 21, 2019 at 12:50 PM Bill Giannelli  wrote:
>
> What does it take to implement "z/OS Management Facility"?
> thanks
> Bill
>
> --
> 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: System name change rexx?

[Mike Schwab]

http://www.cbttape.org/freepds.htm
File 182.  PDS V 8.6 to search / replace PDS(E) members.


On Mon, Mar 25, 2019 at 7:36 PM Jesse 1 Robinson
 wrote:
>
> For another non-Rexx solution, consider StarTool (or I believe PDS command 
> from CBT tape). It has a REPLACE function that can work on an entire PDS(E). 
> It can be run in simulation mode so you can examine results without actually 
> changing anything.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Field, Alan
> Sent: Monday, March 25, 2019 1:12 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: System name change rexx?
>
> Only if you don't
>
> NAME  CPPUPDTE CPPUPDTE
> * CPPUPDTE IS AN ALIAS OF IPOUPDTE
> VER 062E 0A12   BLDL
> REP 062E 1BFF   SR   15,15
>
> Alan
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> David Spiegel
> Sent: Monday, March 25, 2019 2:36 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: System name change rexx?
>
> CAUTION:  This email originated outside of the organization.
> DO NOT CLICK links or open attachments unless you recognize the sender and 
> know the content is safe.
>
> __
> One thing to note:
> IMPORTANT: For CPPUPDTE and IPOUPDTE to work, each PDS to be searched M U S T 
> contain a member named $$$COIBM.
>
>
> On 2019-03-25 15:24, Carmen Vitullo wrote:
>
> Actually CPPUPDTE is a great idea, the JCL is part of the ServerPac or 
> CustomPac and is documented on it's use.
>
>
> Carmen Vitullo
>
> - Original Message -
>
> From: "ITschak Mugzach" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Sent: Monday, March 25, 2019 2:09:48 PM
> Subject: Re: System name change rexx?
>
> Tx. I'll write my own exec
> ITschak
>
> בתאריך יום ב׳, 25 במרץ 2019, 20:54, מאת Elardus Engelbrecht ‏<
> elardus.engelbre...@sita.co.za>:
>
>
>
> ITschak Mugzach wrote:
>
>
>
> I need to change several systems that was cloned from same source to
>
>
> different names. I know what to do and will write my own exec, but I wonder 
> if anyone here has such exec that replace all occurances of the system name 
> in parmlib and some system dsnames that has the name inside.
>
> Did you considered CPPUPDTE (for PDS like parmlib dsn and similar friends)? 
> Use that for one System Name and repeat for other clones a la 'attack of the 
> clones'. ;-)
>
> About 'exec', REXX has a function (sorry, I don't have access to my favourite 
> z/OS toy while writing this reply) you can use to replace a string on the 
> fly. Of course, you need to conjure up an exec to do that thing.
>
> I think I have a sample sitting somewhere (under a HSM ML2 mountain) which 
> could help you. I will look at it and if I have anything, I will reply again 
> to you.
>
> Groete / Greetings
> Elardus Engelbrecht
>
> Blue Monday joke:
>
> An old man went to see his Doctor for consultation over some lab test.
> "I've got good news and bad news!" said the Doctor.
> "Give me the good news first!" said the man.
> "The good news is you only have 24 hours to live!" the doctor said.
> "Geez! -if that's the good news, what's the bad news?" said the man.
> The Doctor says, "I forgot to tell you yesterday!!"
>
> --
> 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: Moving a Catalog to a Different Volume

[Mike Schwab]

https://www-01.ibm.com/support/docview.wss?uid=isg1II13354 has
complete instructions.  I have performed it several times.

On Wed, Mar 27, 2019 at 10:02 PM Jason Cai  wrote:
>
> Hi all
>  According z/OS DFSMS Managing Catalogs manual,we could move a Catalog to a 
> Different Volume using the following key JCL.
> //NEWVOL EXEC PGM=IDCAMS
> //SYSPRINT DD SYSOUT=A
> //SYSINDD *
>   IMPORT INDATASET(CATBACK.ICFCAT.USER.VSYS303) -
>   OUTDATASET(ICFCAT.USER.VSYS303) -
>   OBJECTS((ICFCAT.USER.VSYS303 -
>   VOLUMES(SYSNEW)))   -
>   ALIAS -
>   LOCK
> /*
> My question:
>  1. If we find any error in the catalog in the new volume(SYSNEW),How to 
> recovery the catalog to the Original volume ?  2. before and after we will 
> listc the catalog list,how to compare the two output of listc catalog to 
> confirm that  the original catalog in the old volume is the same as the 
> catalog in new volume
> Thanks a lot!
> 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: R+ / Reliability Plus

[Mike Schwab]

https://www-01.ibm.com/support/docview.wss?uid=swg21291812
EREP from IBM.

How to request the reports.
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.ieav100/lgrep.htm

Specify alternate name / destination.
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieae200/ieae200309.htm

On Thu, Mar 28, 2019 at 10:24 AM Steve Thompson  wrote:
>
> Does anyone remember this product? [Did SYS1.LOGREC processing
> and reporting for multiple entities]
>
> Does anyone know if there is an equivalent product for reporting
> on one's own sysplex(es)?
>
> I've been searching and I can't find who owns it or it if is
> still in use/available. And trying to find a similar product, "r"
> is a language, Plus gives you stuff you don't care about, etc. --
> makes it difficult to search.
>
> Thanks in advance,
> Steve Thompson
>
> --
> 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: AMODE 32

[Mike Schwab]

z/OS is already using the 2GiB to 4GiB area.

On Wed, Apr 3, 2019 at 7:51 PM Paul Edwards  wrote:
>
> On Wed, 3 Apr 2019 19:38:02 -0500, Paul Gilmartin  
> wrote:
>
> >>I was thinking that z/Arch and z/OS could
> >>be updated to support AMODE 32.
>
> >Cui bono?
>
> Combined with making GETMAIN LOC=ANY,
> when executed AM32, getting memory in the
> 2 GiB to 4 GiB region, it would allow a long
> term plan of having purely 32-bit and purely
> 64-bit software running on z/OS, with access
> to the full address space, the same as other
> platforms have. AM24 and AM31 software
> can be phased out.
>
> 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: AMODE 32

[Mike Schwab]

A lot of installations run multiple CICS / IMS / DB2 regions because
one or two 2GiB regions is not nearly enough.  JAVA does offer an
option to run from 2GiB to 8GiB using 4 bit pointers that are shifted
3 bits to a multiple of 8 bytes.  Almost no one uses this because the
shifting slow down every memory access, much cheaper to use more
memory for 64 bit pointers.

On Thu, Apr 4, 2019 at 10:31 AM Paul Edwards  wrote:
>
> On Thu, 4 Apr 2019 14:42:47 +0300, Binyamin Dissen 
>  wrote:
>
> >Sounds like a pretty narrow range of applications, where the existing above
> >the line is not enough, but an extra 2G will be enough forever.
>
> It's sometimes not a matter of "not enough"
> so much as "capability". E.g. a 32-bit editor
> is capable of editing either 2 GiB or 4 GiB
> files, depending on whether it is compiled
> AM31 or AM32. If you exceed the capability
> you are forced to use your less-preferred
> editor. I would like to give users the
> maximum capability that 32 bits can give.
>
> >Why do you feel 64bit is "overkill"?
>
> Because it invalidates all old hardware. An
> AM32 program can still run as AM31 on old
> hardware, or even AM24 on very old
> hardware.
>
> 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: AMODE 32

[Mike Schwab]

If you are wanting to run in AM64 and use 32 bit constants, that is
certainly possible.  You will then be limited to incrementing
registers by 4GiB or less.  Just establishing addressability will need
to set all 64 bits.

On Thu, Apr 4, 2019 at 2:40 PM Paul Edwards  wrote:
>
> On Thu, 4 Apr 2019 19:32:01 +, Martin Packer  
> wrote:
>
> >They will be (running 64-bit). However, apart from Db2*, much of their
> >virtual storage components can't tolerate being above the bar.
>
> Which virtual storage components can't tolerate
> being above the bar, and why is that and what
> would need to change?
>
> Thanks. 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: AMODE 32

[Mike Schwab]

Actually, they started under MVS with 8MiB user memory or so.  Plus
splitting different applications into their own regions to isolate,
close certain partition at specified times for batch and backup
processing, etc.

On Fri, Apr 5, 2019 at 11:55 AM Paul Edwards  wrote:
>
> Hi Mike.
>
> I'm trying to understand why some sites
> are running multiple CICS regions because
> 2 GiB is not enough. Yet they haven't
> gone to AM64. I want to know if they
> would be interested in going to AM32
> instead, if it were available. Can you
> elaborate? If AM32 was more practical
> for them, they would be able to halve
> the number of CICS regions they have.
>
> BTW, Rob Prins recently updated his
> 47,000-line RPF assembler program to
> make it AM32-clean, and it required
> very little effort. He was using "VL" in
> a variety of places, but the things he
> was calling were not actually variable
> parameter functions, so he just needed
> to delete the VL. No rewrite was
> necessary, as would be required if
> moving to AM64.
>
> Thanks. Paul.
>
>
>
>
> On Fri, 5 Apr 2019 02:41:15 -0500, Mike Schwab  
> wrote:
>
> >If you are wanting to run in AM64 and use 32 bit constants, that is
> >certainly possible.  You will then be limited to incrementing
> >registers by 4GiB or less.  Just establishing addressability will need
> >to set all 64 bits.
> >
> >On Thu, Apr 4, 2019 at 2:40 PM Paul Edwards  wrote:
> >>
> >> On Thu, 4 Apr 2019 19:32:01 +, Martin Packer 
> >>  wrote:
> >>
> >> >They will be (running 64-bit). However, apart from Db2*, much of their
> >> >virtual storage components can't tolerate being above the bar.
> >>
> >> Which virtual storage components can't tolerate
> >> being above the bar, and why is that and what
> >> would need to change?
> >>
> >> Thanks. 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
>
> --
> 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: Old hardware on e-bay

[Mike Schwab]

Looking at the photos it looks like a IBM 1401/1410 with tape drives,
especially the red and blue reels.

On Tue, Apr 9, 2019 at 1:20 PM Mike Stramba  wrote:
>
> What does "puma" refer to ?
>
> google translate  doesn't  translate it to anything;)
>
> google "ibm puma" doesn't turn up anything.
>
> Mike
>
> On 4/9/19, scott Ford  wrote:
> > Oh yes, I worked on 360/20s and up. In operations and systems programming.
> >
> > Scott
> >
> > On Tue, Apr 9, 2019 at 8:36 AM Doug  wrote:
> >
> >> Thanks for the memories, first machine my father worked on after the old
> >> wire board machines. Got me hooked to get my first job fixing 360 Common
> >> I/O Ah, those were the days
> >>
> >> Doug Fuerst
> >> Principal Consultant
> >> BK Associates
> >> 718.921.2620 (O)
> >> 917.572.7364 (C)
> >> d...@bkassociates.net
> >>
> >> -- Original Message --
> >> From: "John" 
> >> To: IBM-MAIN@listserv.ua.edu
> >> Sent: 4/9/2019 7:49:24 AM
> >> Subject: Old hardware on e-bay
> >>
> >> >The price is right.   Freight might be a problem.
> >> >
> >> >
> >> https://www.ebay.de/itm/seltene-Anlage-Puma-Computer-IBM-2020/202646831828?hash=item2f2eb142d4:g:izoAAOSwhV1cpw
> >> >
> >> >--
> >> >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
> >>
> > --
> > Scott Ford
> > IDMWORKS
> > z/OS Development
> >
> > --
> > 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: DASD-only logging

[Mike Schwab]

Jack Benny and Old Time Radio is pretty timeless.  The imbedded ads do
give you a sense of time.

On Sat, Apr 13, 2019 at 11:05 AM Jesse 1 Robinson
 wrote:
>
> I'm a huge fan of thin interrupts, which (it turns out) we depend totally on 
> to power our sandbox sysplex. However, we turn on thin interrupts on both 
> sides of the share: sandbox and production. In the prospective case (single 
> CEC only), the 'other side' of the share would be MVS, which has no notion of 
> CFCC. It would be playtime for two toddlers, one well-schooled in sharing, 
> the other clueless. An interesting prospect in any case.
>
> BTW Tom's sig line induced me to curl up for a while with Wikipedia. We in 
> the Southern 48 were never properly introduced to the Dead Dog Café.
>
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Tom Russell
> Sent: Friday, April 12, 2019 4:48 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: DASD-only logging
>
> A Coupling Facility Logical Partition can run on shared CPs.  It does not 
> require an ICF engine.  Normally I would not recommend the use of a CP, but 
> if you are careful not to use the CF a lot, and use DYNDISP=thin, it can be 
> quite useful. If all the connectors to the CF are in the same CEC, then there 
> is no real CF link hardware required. Connecting multiple CECs will require 
> purchasing hardware CF links.
>
> G. Tom Russell
> “Stay calm. Be brave. Wait for the signs” — Jasper FriendlyBear “… and 
> remember to leave good news alone.” — Gracie HeavyHand
>
>
>
> -Original Message-
>
> Date:Wed, 10 Apr 2019 19:05:40 +
> From:Jesse 1 Robinson 
> Subject: Re: DASD-only logging
>
> This box is for DASD mirroring (SDM) and system recovery. It has only one CP 
> except when CBU is fired up. No data host at all under normal circumstances. 
> As modestly priced as a CF might be, I don't think we could sell the idea 
> just for the benefit of sysprogs.
>
>
> --
> 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: Hex value for left slash EBCDIC

[Mike Schwab]

E0.  
https://www.ibm.com/support/knowledgecenter/SSAT4T_15.1.2/com.ibm.xlf1512.lelinux.doc/language_ref/asciit.html

On Sun, Apr 21, 2019 at 2:59 AM Peter  wrote:
>
> Hi
>
> I am not getting left slash in z/OS.
>
> Is there a Equavalent hex value for left slash in zOS ?
>
> I am struggling to get a UCM(universal character map) to zOS with the left
> slash in it.
>
> Any suggestions ?
>
> 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: Generating random values

[Mike Schwab]

Will it generate Valid Leap Day 02-29 in 2012, 2016, 2020, etc?
Will it generate invalid dates , 02-29, 02-30, 02-31, 04-31, 06-31,
09-31, 11-31, etc?

On Fri, Apr 26, 2019 at 12:48 PM Sri h Kolusu  wrote:
>
> > Also if you have any other ideas for generating random dates (MMDD)
> overall, I would welcome your thoughts!
>
> Bill,
>
> DFSORT has plethora of date arithmetic/conversion functions that can get
> you the desired results.   Here is a JCL that will generate dates for any
> year that you provide.
>
> You can pass 3 parms. The Begin-year , End year and Number of records.
>
> The Begin-Year and End Year parameters are self explanatory.   The number
> of records can either be a multiple of 365 or 366.   So if your number of
> records have a value that does NOT end with year end date, then you can use
> End year PARM to filter the records (Step0400)
>
> // EXPORT SYMLIST=*
> // SET BYEAR=1753
> // SET EYEAR=2019
> // SET NUMREC=310131
> //**
> //*  SET BYEAR   = NN   (VALID RANGE IS 1 TO ) *
> //*  SET EYEAR   = NN   (VALID RANGE IS 1 TO ) *
> //*  SET NUMREC  = NN   (REQUIRED NUMBER OF YEARS * 366)   *
> //* (VALID RANGE 366 TO 3659634)   *
> //**
> //*  BYEAR , EYEAR AND NUMREC CAN BE PASSED WITH LEADING ZEROS UPTO 10 *
> //*  10 DIGITS. ONLY THE FIRST 10 DIGITS YOU PASS ARE TAKEN INTO   *
> //*  CONSIDERATION.*
> //**
> //*  EXAMPLE 01 :  *
> //*  SET BYEAR = 1753  AND NUMREC = 310131 *
> //*  WILL GENERATE DATE CALENDAR FROM 1753-01-01 TO 2601-12-31 *
> //**
> //*  EXAMPLE 02 :  *
> //*  SET BYEAR = 0001  AND NUMREC =  * 366 = 3659634   *
> //*  WILL GENERATE DATE CALENDAR FROM 0001-01-01 TO -12-31 *
> //**
> //**
> //**
> //*  DELETE THE OUTPUT FILE IT EXISTS  *
> //**
> //STEP0100 EXEC PGM=IDCAMS
> //SYSPRINT DD SYSOUT=*
> //SYSINDD *,SYMBOLS=JCLONLY
>   DELETE '&SYSUID..GENERATE.YEARDATA'
>   SET MAXCC=0
> //*
> //**
> //*  VALIDATE THE PASSED PARMS AND BUILD SYMBOLS   *
> //**
> //STEP0200 EXEC PGM=SORT,
> // PARM=('JP1"&BYEAR"',
> //   'JP2"&NUMREC"',
> //   'JP3"&EYEAR"')
> //SYSOUT   DD SYSOUT=*
> //SYMNOUT  DD SYSOUT=*
> //SORTIN   DD *
>
> //SORTOUT  DD DSN=&&S,DISP=(,PASS),SPACE=(TRK,(1,1),RLSE)
> //SYSINDD *
>   OPTION COPY
>   INREC IFTHEN=(WHEN=INIT,BUILD=(01:JP1,11:JP2,21:JP3,80:X)),
>   IFTHEN=(WHEN=INIT,BUILD=(01:01,10,UFF,M11,LENGTH=10,
>11:11,10,UFF,M11,LENGTH=10,
>21:21,10,UFF,M11,LENGTH=10)),
>
>   IFTHEN=(WHEN=(01,10,ZD,EQ,0,OR,01,10,ZD,GT,),
>   OVERLAY=(01:9C'0',C'1'),HIT=NEXT),
>   IFTHEN=(WHEN=(11,10,ZD,LT,366,OR,11,10,ZD,GT,3659634),
>   OVERLAY=(11:7C'0',C'366'),HIT=NEXT),
>   IFTHEN=(WHEN=(21,10,ZD,EQ,0,OR,21,10,ZD,GT,),
>   OVERLAY=(21:6C'0',DATE1),HIT=NEXT),
>   IFTHEN=(WHEN=(21,10,ZD,LT,01,10,ZD),
>   OVERLAY=(21:01,10),HIT=NEXT),
>   IFTHEN=(WHEN=(01,10,ZD,GT,0,AND,01,10,ZD,LE,),
>   OVERLAY=(40:((+,SUB,7,4,ZD),ADD,+1),
> MUL,+366,M11,LENGTH=10),HIT=NEXT),
>   IFTHEN=(WHEN=(11,10,ZD,LT,40,10,ZD),
>   OVERLAY=(40:11,10))
>   OUTFIL BUILD=(C'BEGIN-YEAR,C''',07,4,C,/,
> C'END-YEAR,C''',27,4,C,/,
> C'RPT-VALUES,',43,7,80:X)
> //*
> //**
> //*  GENERATE THE DATES FROM 0001-01-01 TO -12-31  *
> //**
> //STEP0300 EXEC PGM=SORT
> //SYSOUT   DD SYSOUT=*
> //SYMNAMES DD DISP=(OLD,PASS),DSN=&&S
> //SYMNOUT  DD SYSOUT=*
> //SORTIN   DD *
>
> //SORTOUT  DD DSN=&&O1,DISP=(,PASS),SPACE=(CYL,(60,60),RLSE)
> //SYSINDD *
>   OPTION COPY
>   OUTFIL REPEAT=RPT-VALUES,IFOUTLEN=10,
>   IFTHEN=(WHEN=INIT,
>  BUILD=(11:BEGIN-YEAR,C'0101',
> 20:SEQNUM,8,ZD,START=0)),
>   IFTHEN=(WHEN=INIT,
>   OVERLAY=(11,8,Y4T,ADDDAYS,20,8,ZD,TOGREG=Y4T))
> /*
> //***

Re: Java no longer a free lunch

[Mike Schwab]

Java 12 released March 2019.  https://en.wikipedia.org/wiki/Java_version_history

On Thu, May 2, 2019 at 12:08 PM Lizette Koehler  wrote:
>
> I was not sure how this will affect the Mainframe and JAVA
>
> But I found this
>
> https://www.aspera.com/en/blog/oracle-will-charge-for-java-starting-in-2019/
>
>
> End of Public Updates for Oracle JDK 8
> Oracle will not post further updates of Java SE 8 to its public download sites
> for commercial use after January 2019. Customers who need continued access to
> critical bug fixes and security fixes as well as general maintenance for Java 
> SE
> 8 or previous versions can get long term support through Oracle Java SE 
> Advanced
> Desktop, or Oracle Java SE Suite. For more information, and details on how to
> receive longer term support for Oracle JDK 8, please see the Oracle Java SE
> Support Roadmap.
>
>
> Oracle has announced that, effective January 2019, Java SE 8 public updates 
> will
> no longer be available for "Business, Commercial or Production use" without a
> commercial license.
>
> Anyone know how this would affect the Mainframe?
>
> Thanks
>
>
>
>
> Lizette Koehler
> statistics: A precise and logical method for stating a half-truth inaccurately
>
> --
> 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: Crazy concatenation mystery

[Mike Schwab]

The object code blocks are written in multiples of 1K up to 32,760
bytes.  There are also text blocks that are usually under 1K unless
you have a lot of external symbols. A linkedit / binder / copymod will
try to fill the rest of the track, down to a 1K block.  The Advance
Print Function libraries should be 18K.

On Thu, May 2, 2019 at 9:16 PM David Spiegel  wrote:
>
> Hi Steve,
> You said: "... but the received wisdom is that all load libraries should
> have blksize=32K-8. ..."
>
> For optimal space usage, however, the BLKSIZE should be 27998 (i.e. 
> half-track blocking).
>
> Regards,
> David
>
> On 2019-05-02 21:57, Steve Smith wrote:
> > Well, Greg Price explained why the blksize issue doesn't arise in normal
> > execution.
> >
> > In addition, PDSEs don't really have a blksize; that is faked up on the fly
> > when BPAM or something similar is used.  Program Fetch uses something like
> > DIV or paging I/O to load program objects.  For classic PDS, the blksize is
> > "real", but again Program Fetch doesn't use access methods, and doesn't
> > care what size the blocks are.
> >
> > It's a little late in the day, but the received wisdom is that all load
> > libraries should have blksize=32K-8.  That predates PDSE by decades.  The
> > old linkage-editor was smart enough to fill tracks up with whatever block
> > size would fit.  As long as it wasn't artificially restricted to something
> > less than the max.  RECFM=U does not work like FB.
> >
> > btw, why are you running FA?  Has it ever done anything useful for you?
> >
> > sas
> >
> >
> >
> > On Thu, May 2, 2019 at 8:42 PM Attila Fogarasi  wrote:
> >
> >> The Binder is not invoked by Db2 when executing your application program --
> >> hence no error message and successful execution.  Fault Analyzer is
> >> invoking the Binder to get debugging info about the load module as part of
> >> its processing for the prior problem.  Other debugging tools handle this
> >> more elegantly but FA chooses to just confuse you with the irrelevant
> >> cascaded error which has no bearing on the defect it is trying to report.
> >>   Quick fix is to turn off Fault Analyzer as these "invalid" load module
> >> block sizes are perfectly valid for execution or even for use with the
> >> Binder with the right environment.  For better or worse the Binder defaults
> >> to using 32760 (maximum device supported blksize) whenever possible, unless
> >> directed otherwise.
> >>
> >> On Fri, May 3, 2019 at 8:43 AM Jesse 1 Robinson 
> >> wrote:
> >>
> >>> Thanks to the many contributions to this thread, I think we have it
> >>> (mostly) figured out. The key was identifying what changed on 14 April.
> >> No
> >>> module changes. No JCL changes. But of course something happened that I
> >>> didn't mention earlier because 'it could not be the cause'. What happened
> >>> on the 14th was an error in the data that caused an SQL duplicate record
> >>> condition, or 811. That led to a U3003 abend, which woke up Fault
> >> Analyzer
> >>> *for the first time*. Upon awakening, he looked around and saw the
> >> invalid
> >>> module block sizes and complained about them. For literally years FA had
> >>> never peeped because there had never been an actual abend. Why did fetch
> >>> not bellyache about BLKSIZE? I have no idea. The module named in the
> >> message
> > --
> > 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: Crazy concatenation mystery

[Mike Schwab]

Not for OBJECT modules.  The Binder calls a routine to determine the
remaining space on the track, round down to the next multplie of 1k,
and writes no more than that amount on that track.

On Fri, May 3, 2019 at 5:08 AM David Spiegel  wrote:
>
> Hi Greg,
> If someone uses BLKSIZE=32760, isn't it true that only one physical
> block fits on a (emulated) 3390 track, thereby definitely wasting
> (2*27998)-32760=23236 bytes per track (regardless of any Program Binder
> considerations)?
>
> Thanks and regards,
> David
>
> On 2019-05-03 03:41, Greg Price wrote:
> > On 2019-05-03 12:15 PM, David Spiegel wrote:
> >> Steve said: "... but the received wisdom is that all load libraries
> >> should
> >> have blksize=32K-8. ..."
> >>
> >> For optimal space usage, however, the BLKSIZE should be 27998 (i.e.
> >> half-track blocking).
> >
> > You might think that, but for load modules, you have to realize that
> > in-between the text blocks (which could be 27998 bytes long in your
> > scenario) there are RLD and/or CTL records which means that no single
> > track could contain 2 full-sized text blocks.
> >
> > Because of the "random" sizes of CSECTs and RLD usage (where "random"
> > means not really knowable at load library data set creation time) it
> > is not possible to know the best block size to use to minimize the
> > disk space used by a set of programs without doing some sort of
> > analysis on the load modules to be housed in that library.
> >
> > I mention CSECT because once a text block has some data to the end of
> > a section, the next section will not be started in that block unless
> > the whole section will fit in that block. That is why you see short
> > text blocks even though there is plenty more object text that follows on.
> >
> > And even though the linkage editor may make good use of remaining
> > track space, what happens when the blocks a shifted around by a data
> > set copy or a compress?
> >
> > So, it may be that BLKSIZE=32760 really is the best advice. At least
> > you could reasonably hope to minimize the amount of disk space wasted
> > on inter-block gaps.  (Of course, inter-block gaps may well be
> > emulated away these days, but they still exist for 3390 CKD accounting
> > purposes.)
> >
> > And as for PDSE program object libraries - how about this?
> >
> > If the BLKSIZE value doesn't matter in terms of how programs are
> > stored in the PDSE and fetched at run time, what about using
> > BLKSIZE=4096 for PDSE load libraries?
> >
> > Why? Because if you browse a program object in a PDSE and scroll
> > right, you will notice that all of the blocks end at column 4096. So
> > to read that member you have acquired 32760-byte buffers when
> > 4096-byte buffers would have sufficed.
> > :)
> >
> > In practice, 32760 for all program libraries is probably the best
> > choice to remove any block size hassles even if occasionally it causes
> > more storage to be used. After all, I keep hearing that storage is cheap.
> >
> > Just my thoughts, of course...
> >
> > Cheers,
> > Greg
> >
> > --
> > 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: COBOL 6.2 and ARCH(12)

[Mike Schwab]

Is the abend in the user compiled instructions?  Then check the
compiler processor settings.

Is the abend in the vendor compiled libraries or included subroutines?
 Then check the vendor's subroutine / runtime libraries.

On Fri, May 3, 2019 at 6:52 PM Charles Mills  wrote:
>
> I think I disagree.
>
> You compile the program for ARCH(8). IBM guarantees that it will run on a z10 
> (do I have that right?). They do NOT guarantee that the program plus LE will 
> behave on a z114 exactly as though it were running on a z10.
>
> No matter what ARCH the program were compiled for, I would expect that LE 
> running on a z114 might well exploit the actual hardware. I would be kind of 
> unhappy if it did NOT.
>
> The vendor product either supports z114's or it does not. If they do not 
> support z114 instructions, they should admit that they do not.
>
> > If LE really is doing this, why even have an ABO product
>
> To update ("optimize") the *compiled* object code. The OS-resident 
> support/library modules (LE) are a different matter. They are already (I am 
> guessing) at a current level.
>
> What is the z/OS release? I would expect LE to be built for the lowest level 
> hardware that that release supported, but LE might be clever enough to 
> dual-path, and I think that would be a good thing.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Mark Zelden
> Sent: Friday, May 3, 2019 3:35 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: COBOL 6.2 and ARCH(12)
>
> On Fri, 3 May 2019 15:57:34 -0400, Brian Chapman  wrote:
>
> >We have a vendor debugging product that is constantly causing 0C1 and 0C4
> >abends since we have upgraded to COBOL 6.2. It also caused these abends
> >when we were at COBOL 4,2, but the abend rate has grown considerably after
> >the upgrade.
> >
> >The vendor has produced countless patches, but so far they have not
> >resolved the issues. We were notified today that they believe they
> >understand the issue. They are stating that even though our COBOL compiler
> >is set with ARCH(8) (to support our DRE machine), LE run-time is
> >recognizing that the program is COBOL 6.2, running on a z14, and
> >automatically switch the ARCH level to ARCH(12). They believe the run-time
> >execution is exploiting the new Vector Packed Decimal Facility and
> >producing erratic behavior.
> >
> >I searched through several presentations and IBM manuals for COBOL 6.2, and
> >everything I have found states that a recompile with ARCH(12) is required
> >to take advantage of the new facility. Is the vendor correct?
> >
> >
>
> I've never heard of that and I wouldn't expect IBM to ever do something like 
> that,
> but heck, what do I know.  ;-)   LE shouldn't be trying to outsmart the 
> person that
> compiled the code (IMHO).
>
> 1) Have you verified the options in a compile listing are as you expected?
>
> 2) Are you running ABO and could that be involved?  Although I know nothing 
> about
> configuration ABO (I have never "seen" or used it), even if you were I woudn't
> think you would have it configured to use z14 instructions.
>
> If LE really is doing this, why even have an ABO product.   I certainly would 
> open
> an SR with IBM LE support about it.
>
> --
> 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: TS7700 physical tape drive failed

[Mike Schwab]

http://www.redbooks.ibm.com/redbooks/pdfs/sg248366.pdf

TS7700 V  Updated 2019.  Chapter 10.  This is a list of the mainframe
z/os console commands to operate the library, assuming properly
configured and data replicated.

DISPLAY SMS,LIBRARY(ALL),DETAIL or D SMS,LIB(ALL),DETAIL lists the
libraries and device types.
VARY SMS,LIBRARY(libname),ONLINE get the library online.
VARY unit,ONLINE gets the UCBs online.
DEVSERV QTAPE or DS QT show the status of the library.

On Sat, May 4, 2019 at 11:22 PM Jake Anderson  wrote:
>
> Hi
>
> Just to add
>
> I was looking through the TS7700 events and found a fix procedure as
>
> HYDIN0671I
> All drives are reported are in the busy state
>
> All the drives are reported as errno=5
>
> Which translates to physical library is offline to host
>
> Jake
>
> On Sun, 5 May, 2019, 8:05 AM Jake Anderson, 
> wrote:
>
> > Hi
> >
> > After the DR our VTL had a problem with its physical tape drive.
> >
> > There are almost 220GB of data waiting for to use physical tape drive
> >
> > Any clue on where I need to check ?
> >
> > The tape drive attached are in failed state .
> >
> > Any suggestions are welcome
> >
> > Jake
> >
>
> --
> 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: TS7700 physical tape drive failed

[Mike Schwab]

Timed automation to display status of libraries (once per hour?).
Message automation to react to offline status.

On Sun, May 5, 2019 at 3:24 PM Jake Anderson  wrote:
>
> Now it's resolved by IBM hardware engineer.
>
> The 3592 tape drive went offline after a firmware update and had to restart
> the VTL.
>
> Any clue to set an email alert when drives goes offline ?
>
> On Sun, 5 May, 2019, 8:39 AM Mike Schwab,  wrote:
>
> > http://www.redbooks.ibm.com/redbooks/pdfs/sg248366.pdf
> >
> > TS7700 V  Updated 2019.  Chapter 10.  This is a list of the mainframe
> > z/os console commands to operate the library, assuming properly
> > configured and data replicated.
> >
> > DISPLAY SMS,LIBRARY(ALL),DETAIL or D SMS,LIB(ALL),DETAIL lists the
> > libraries and device types.
> > VARY SMS,LIBRARY(libname),ONLINE get the library online.
> > VARY unit,ONLINE gets the UCBs online.
> > DEVSERV QTAPE or DS QT show the status of the library.
> >
> > On Sat, May 4, 2019 at 11:22 PM Jake Anderson 
> > wrote:
> > >
> > > Hi
> > >
> > > Just to add
> > >
> > > I was looking through the TS7700 events and found a fix procedure as
> > >
> > > HYDIN0671I
> > > All drives are reported are in the busy state
> > >
> > > All the drives are reported as errno=5
> > >
> > > Which translates to physical library is offline to host
> > >
> > > Jake
> > >
> > > On Sun, 5 May, 2019, 8:05 AM Jake Anderson, 
> > > wrote:
> > >
> > > > Hi
> > > >
> > > > After the DR our VTL had a problem with its physical tape drive.
> > > >
> > > > There are almost 220GB of data waiting for to use physical tape drive
> > > >
> > > > Any clue on where I need to check ?
> > > >
> > > > The tape drive attached are in failed state .
> > > >
> > > > Any suggestions are welcome
> > > >
> > > > Jake
> > > >
> > >
> > > --
> > > 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: Can backup mechanisms be used to steal RACF database? was Re: mainframe hacking "success stories"?

[Mike Schwab]

If you can transfer the backup file (real or virtual tape) to another
system, then you can use the admin authorization to restore any or all
files in the backup file.  Just like using a rescue system to restore
at a DR site.

On Thu, May 9, 2019 at 8:56 AM Peter Vander Woude
 wrote:
>
> On Tue, 7 May 2019 09:26:58 -0300, Clark Morris  wrote:
>
>
> >Could someone use DF/DSS, DF/HSM, FDR or FDR/ABR to copy the database
> >and then download the dump of the database?
> >
> >Clark Morris
> >>
>
> Clark,
>
> If they have read access to the database, yes.  That's what happened in the 
> Swedish bank hack, back in 2012.
>
> In that, once they got the database copy on their pc, they used hacker tools 
> that are out there, to crack all the passwords.
>
> 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: COPYING PDS AND PDSE

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.idau100/u1061.htm

Program objects are created automatically when load modules are copied
into a PDSE. Likewise, program objects are automatically converted
back to load modules when they are copied into a partitioned data set.
Note that some program objects cannot be converted into load modules
because they use features of program objects that do not exist in load
modules.

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.idau100/u1070.htm

COPYGRP is recommended for PDS Load Modules or PDSE Program Objects to
include any aliases that may be present.

On Thu, May 9, 2019 at 9:40 AM Seymour J Metz  wrote:
>
> The examples don't address the question. However, elsewhere there is a 
> warning not to use COPY for program objects.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> esmie moo <012780d99c7b-dmarc-requ...@listserv.ua.edu>
> Sent: Thursday, May 9, 2019 9:34 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: COPYING PDS AND PDSE
>
>  Thanks Lizette.  I will check it out.
> On Tuesday, May 7, 2019, 2:08:24 p.m. EDT, Lizette Koehler 
>  wrote:
>
>  Remember, that IEBCOPY has lots of examples and details on IBM.COM
>
> https://secure-web.cisco.com/1ELn9Oo9wuySjWKB8I6WlTvWD7Cc_xaNIesP50m-vrocfufi3dAM03Dy3YxgUZux4MVKCHj2hPleNF4k1_Od0jpZnOXShKXARvst9DUda7bv1b2wtkmMbAGTtFsbUnZjAD26zX3qULI3FQbNwE7Sy8HjGkbdoAWeWsNbOwWMhrUCMKPTinqYbekG62RidWRQhDsbWkpl2pjo_O-se3EBKxPYMSVlF9TGiNTHPyLuPD7-0CNqUIId-gOxkigWok0_aB-IZnZ1vtRffN1EaF40lCuKemyASdOCKqiaWzdGPOIAZ9VStmy5aQrH3UXM680jiQeZyYbnD49i604UqWq1I4JpHGjePtEW8A2a18ZbW9YV995ZwjR8rSw0ADnNZacJ5RZwDhoh7wP8D4pA4u1kAP9JFWih7SKzw8Cv3kmS5zhdRkV8su2ynU2rGQvPwoajc/https%3A%2F%2Fwww.ibm.com%2Fsupport%2Fknowledgecenter%2Fen%2FSSLTBW_2.3.0%2Fcom.ibm.zos.v2r3.idau100%2Fiebcopy.htm
>
>
> Unless specified, the examples will tell you exactly how to copy from a LibA 
> to a LibB
>
> Lizette
>
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf Of
> > esmie moo
> > Sent: Tuesday, May 07, 2019 10:37 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: COPYING PDS AND PDSE
> >
> >  Thanks Seymour and thanks to all who responded to my post.
> >On Tuesday, May 7, 2019, 11:39:43 a.m. EDT, Seymour J Metz
> >  wrote:
> >
> >  COPYMOD is for load module reblocking. There are no load modules in a PDSE.
> > Off the top of my head I don't even recall whether it is valid for program
> > objects. The COPY statement should work fine for PDSE.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List  on behalf of
> > esmie moo <012780d99c7b-dmarc-requ...@listserv.ua.edu>
> > Sent: Tuesday, May 7, 2019 9:15 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: COPYING PDS AND PDSE
> >
> >  I want to copy the PDSE to another.  I was told that COPYMOD was the
> > preferable parm when copying LOADLIBS.  Is it okay just to use COPY?
> >On Tuesday, May 7, 2019, 8:09:09 a.m. EDT, Elardus Engelbrecht
> >  wrote:
> >
> >  esmie moo wrote:
> >
> > >Are there special parms that I need to use in the copy PDS & PDSE'S?
> >
> > It depends. Do you want to copy all or specific members?
> >
> >
> > >For example if I want to copy a PDSE to another PDSE (some maybe LOADLIBS)
> > would the following be okay?
> >
> > PS: I have doctored your JCL sample for better readability! ;-)
> >
> > //COPYJCL1  EXEC PGM=IEBCOPY
> > //SYSPRINT DD SYSOUT=*
> > //SYSUT3  DD UNIT=SYSDA,SPACE=(CYL,(50,50))
> > //SYSUT4  DD UNIT=SYSDA,SPACE=(CYL,(50,50)) //INDDDD
> > DISP=OLD,DSN=MYDSN.CLIP.SHR //OUTDDDD DISP=OLD,DSN=MYDSN.CLIP.SHR.NEW
> > //SYSINDD *
> >  COPY INDD=INDD,OUTDD=OUTDD
> > /*
> > //
> >
> >
> > >Is the COPY command sufficient?
> >
> > It should be, a$$uming you want to copy ALL members without any reblocking
> > with COPYMOD and that both datasets RECFM, LRECL, BLKSIZE, etc. are the 
> > same.
> >
> > Perhaps you can drop SYSUT3 and SYSUT4 and add this one:
> >
> > //SYSOUT  DD SYSOUT=*
> >
> > Are you getting any error message(s)?
> >
> > Groete / Greetings
> > Elardus Engelbrecht
> >
>
> --
> 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, Spring

Re: iplinfo (Mark Zelden CBT434) - how to save edit

[Mike Schwab]

With those details, then I would issue
EDIT 'me.CLIST(IPLINFO)' (or using 3.4), then while editing:
COPY 'me.CBT434(IPLINFO)'
SAVE

On Sat, May 11, 2019 at 11:41 AM Mark Zelden  wrote:
>
> On Sat, 11 May 2019 05:13:12 -0400, Mike Stramba  
> wrote:
>
> >I've been using Mark Zelden's  IPLINFO rexx script from CBT 434 on both a 
> >z/os
> >1.10 and z/os 2.3 system.
> >
> >What is the procedure to save an 'edit'  option set ?
> >
> >I issue  ex 'me.cbt434(iplinfo)'  'all edit',  the "editor" starts up.
> >(actually PANELID - 'IPLINFOP'
> >
> >I then use  'cc'  line commands at the top and bottom.
> >
> >I enter  CREATE 'me.iplinfo.all'
> >
> >I get panel 'ISRMCALL' Allocate Target Data Set
> >
> >I choose  1. Allocate using the attributes of:
> > SYS19131.T040928.RA000.Z33854.R0114135
> >
> >I then get  (top right corner in ispfedit / IPLINFOP  'Data set
> >not cataloged'
> >
> >F1 : gives
> >
> >'SYS19131.T040928.RA000.Z33854.R0114135' was not found in catalog.
> >
> >Mike
>
> IPLINFO output all fits within 80 bytes, so just use the option to
> specify your own attributes of FB and 80 x (whatever).
>
> However, it is really much simpler to me to just use CUT and
> then PASTE the output into an FB 80 data set or PDS member.
>
> You can also run IPLINFO in TSO batch which is what some people
> did prior to me adding the EDIT option (although I used ISRDDN
> to just edit the temp data set instead of browsing it and used
> cut/paste from that.
>
> //IPLINFO  JOB (acct),CLASS=A,...
> //*
> //TMP EXEC PGM=IKJEFT01,PARM='%IPLINFO'
> //*
> //SYSPROC  DD  DISP=SHR,DSN=pds.with.iplinfo
> //*
> //SYSTSPRT DD  DSN=userid.IPLINFO.OUTPUT,
> // DISP=(NEW,CATLG,DELETE),
> // RECFM=FB,LRECL=80,BLKSIZE=0,DSORG=PS,
> // SPACE=(TRK,(45,15))
> //SYSTSIN  DD  DUMMY
>
>
> Best Regards,
>
> Mark
> --
> Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
> ITIL v3 Foundation Certified
> mailto:m...@mzelden.com
> Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
> Systems Programming expert at http://search390.techtarget.com/ateExperts/
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
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: iplinfo (Mark Zelden CBT434) - how to save edit

[Mike Schwab]

That would copy the PDS member.

On Sat, May 11, 2019 at 12:59 PM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sat, 11 May 2019 12:02:11 -0500, Mike Schwab wrote:
>
> >With those details, then I would issue
> >EDIT 'me.CLIST(IPLINFO)' (or using 3.4), then while editing:
> >COPY 'me.CBT434(IPLINFO)'
> >SAVE
> >
> Is that saving a copy of the script or of its output?
> Which did Mike want?
>
> >> On Sat, 11 May 2019 05:13:12 -0400, Mike Stramba wrote:
> >>
> >> >I've been using Mark Zelden's  IPLINFO rexx script from CBT 434 on both a 
> >> >z/os
> >> >1.10 and z/os 2.3 system.
> >> >
> >> >What is the procedure to save an 'edit'  option set ?
> >> >
> >> >I issue  ex 'me.cbt434(iplinfo)'  'all edit',  the "editor" starts up.
> >> >(actually PANELID - 'IPLINFOP'
> >> > ...
>
> -- 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: mainframe hacking "success stories"?

[Mike Schwab]

The big thing is the Business oriented compilers / instructions with
accuracies to the penny.  Lots of compilers don't have lots of fix
point numbers with large numbers of digits.  Sometimes it takes 2-3X
as long as expected due to having to get the math instructions just
right.

Plus the open system databases seem to want to load the whole database
into virtual memory, so start up shut down take a long time.  Vs the
mainframe just retrieves and stores the records as needed and shutdown
is much quicker.  Of course the ASCII (UTF-8) <=> EBCDIC uses cycles
and causes setup headaches that the rest of the world seems to have
solved with UTF-8.

On Sat, May 11, 2019 at 9:41 PM Grant Taylor
<023065957af1-dmarc-requ...@listserv.ua.edu> wrote:
>
> On 5/11/19 8:14 PM, Charles Mills wrote:
> > The mainframe seems to me to have also some "architectural"
> > advantages.
>
> It's my understanding that the mainframe has security related features
> in the hardware that some other architectures lack.
>
> > It seems to support a denser "clustering."
>
> Please elaborate what you mean by "clustering".
>
> > It does not seem to me that there is anything in the Windows/Linux
> > world that duplicates the advantages of 100 or so very-closely-coupled
> > (sharing all main storage potentially) CPUs.
>
> It's not Windows or Linux, but I'm fairly sure that Connection Machines
> from Thinking Machines qualify as a single machine with 100 (or more)
> processors.
>
> Check out the SpiNNaker Project.  They are (were in 2015) working on a
> 1,000,000 core machine.  They show a functioning 100,000 core machine in
> the video.  I'm not sure what OS they are running, but I'd be sort of
> surprised if it's not Linux.
>
> Link - Silicon Brain: 1,000,000 ARM cores - Computerphile
>   - https://youtu.be/2e06C-yUwlc
>
> According to Wikipedia, the million core milestone has been achieved.
>
> > Sure, you can link a thousand Windows or Linux 8-way servers on a
> > super-fast net, and it is fine for some things -- incredibly powerful
> > for some of them,
>
> I'm not at liberty to say how many, but my $EMPLOYER has some clusters
> with staggering numbers of computers in them.
>
> There are also some Cray systems that function as an extremely large
> NUMA computer.
>
> > but it seems there are some things the mainframe architecture is
> > inherently better at.
>
> I'd be curious to learn what a mainframe can do that these clusters
> can't do.
>
> Sure, the mainframe may be far better optimized.  But that doesn't
> render other things incapable of doing the work.
>
>
>
> --
> Grant. . . .
> unix || die
>
> --
> 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: Concatenating VB and FB ?

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.idad400/d4394b.htm

It uses the DCB of the FIRST DSN in the concatenation.
If F(B), then each block must be a multiple of the LRECL of the First
DSN.  Pretty sure the VB won't be.  And the length fields would be
read as data.
If V(B), then each record cannot exceed cannot exceed the LRECL of the
First DSN.  And the first bytes of a F DSN would be treated as the
length.

On Sun, May 12, 2019 at 9:35 PM Tim Hare  wrote:
>
> I seem to be finding different answers on this.
>
> A vendor used to ship some files as PDSes with RECFM=FB and LRECL=80 (BLKSIZE 
> 23440).   User-customized members at this shop were put in a different PDS, 
> with the same attributes, and concatenated in cataloged procedures,  ahead of 
> the vendor's libraries.  Pretty standard practice I'm sure most are familiar 
> with.
>
> Suddenly, because (I'm told) of a merging of code bases at the vendor, their 
> PDSes are now RECFM=VB and LRECL=2044 (BLKSIZE 27998) !   My instincts tell 
> me this isn't going to work well, but with changes in concatenation of 
> libraries over the course of my career I'm not sure.Here's what I think:  
> because of the "new" rule where the largest BLKSIZE sets the buffer size, 
> we'll be OK for reading the blocks (23440 fits into 27998)  but  when we try 
> to read a member from the VB library, the RDWs are going to mess things up.
>
> I have tried searching for the answer,  but haven't, apparently, found the 
> right source yet.
>
> What say you all?
>
> --
> 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 shutdown failure - OMVS will not shut down

[Mike Schwab]

Any system tasks using an OMVS file?

On Tue, May 14, 2019 at 10:07 PM Tony Thigpen  wrote:
>
> As everything indicates that OMVS was the problem, I brought the machine
> back up and try shutting down OMVS outside of my system shutdown. This
> is the results:
>
> 22.02.52 HUP1   F BPXOINIT,SHUTDOWN=FORKINIT
> 22.02.52 HUP1   BPXM037I BPXAS INITIATOR SHUTDOWN DELAYED.
> 22.02.52 HUP1 STC03368  IEF404I BPXAS - ENDED - TIME=22.02.52
> 22.02.52 HUP1 STC03334  IEF404I BPXAS - ENDED - TIME=22.02.52
> 22.02.52 HUP1 STC03368  $HASP395 BPXASENDED
> 22.02.52 HUP1 STC03369  IEF404I BPXAS - ENDED - TIME=22.02.52
> 22.02.52 HUP1 STC03334  $HASP395 BPXASENDED
> 22.02.52 HUP1 STC03370  IEF404I BPXAS - ENDED - TIME=22.02.52
> 22.02.52 HUP1 STC03369  $HASP395 BPXASENDED
> 22.02.52 HUP1 STC03370  $HASP395 BPXASENDED
> 22.03.16 HUP1   F OMVS,SHUTDOWN
> 22.03.16 HUP1   IEE342I MODIFY   REJECTED-TASK BUSY
>
> Thoughts?
>
> Tony Thigpen
>
> Tony Thigpen wrote on 5/14/19 5:55 PM:
> > F BPXOINIT,SHUTDOWN=FORKINIT
> > BPXM036I BPXAS INITIATORS SHUTDOWN.
> > F OMVS,SHUTDOWN
> > IEE342I MODIFY   REJECTED-TASK BUSY
> >
> > Tony Thigpen
> >
> > Cieri, Anthony wrote on 5/14/19 5:50 PM:
> >> Under the OAS column of your D A,L display there is still one task.
> >>
> >> Was a $P JES2 command ever issued. Usually, when we are at this
> >> point in a DR environment and the $P JES2 command is issued, JES2 may
> >> tell you what is still active if the stop command fails.
> >>
> >> Here are some other possibly useful commands:
> >>
> >> F BPXOINIT,SHUTDOEN=FORKINIT
> >> F OMVS,SHUTDOWN
> >>
> >> Hth
> >> Tony
> >>
> >> -Original Message-
> >> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> >> On Behalf Of Jerry Whitteridge
> >> Sent: Tuesday, May 14, 2019 5:40 PM
> >> To: IBM-MAIN@LISTSERV.UA.EDU
> >> Subject: Re: JES2 shutdown failure
> >>
> >> [[ SEI WARNING *** This email was sent from an external source. Do not
> >> open attachments or click on links from unknown or suspicious senders.
> >> *** ]]
> >>
> >>
> >> I'd be suspicious of your OMVS environment at this point. Try using a
> >> D A,A
> >> to see more tasks active.
> >>
> >> Jerry Whitteridge
> >> Delivery Manager / Mainframe Architect
> >> GTS - Safeway Account
> >> 602 527 4871 Mobile
> >> jerry.whitteri...@ibm.com
> >>
> >> IBM Services
> >>
> >> IBM Mainframe Discussion List  wrote on
> >> 05/14/2019 02:35:25 PM:
> >>
> >>> From: Brian France 
> >>> To: IBM-MAIN@LISTSERV.UA.EDU
> >>> Date: 05/14/2019 02:35 PM
> >>> Subject: [EXTERNAL] Re: JES2 shutdown failure
> >>> Sent by: IBM Mainframe Discussion List 
> >>>
> >>> init's drained?   lines drained? omvs shutdown?
> >>>
> >>> On 5/14/19 5:32 PM, Tony Thigpen wrote:
>  I am testing on a DR box, and I am seeing a shutdown problem with JES2.
> 
>  Here is the console log:
>  $da
>  $HASP612 NO ACTIVE JOBS
>  $P JES2
>  IEA964I HARDCOPY SUSPENDED, REASON=HCSW
>  $da
>  IEE707I $DA  NOT EXECUTED
>  D A,L
>   JOBS M/STS USERSSYSASINITS   ACTIVE/MAX VTAM
> >> OAS
>  020  0002500/0
> >> 1
>   JES2 JES2 IEFPROC  NSW  S  SHUTHUP1 SHUTHUP1 COMAND00 OWT
> >> S
> 
>  At this point, JES2 never seems to shut down. (The only job running is
>  SHUTHUP1 which is the automated shutdown procedure that runs outside
>  of JES2.)
> 
>  Thoughts?
> 
> >>> --
> >>> Brian W. France
> >>> Systems Administrator (Mainframe)
> >>> Pennsylvania State University
> >>> Administrative Information Services - Infrastructure/SYSARC
> >>> Rm 25 Shields Bldg., University Park, Pa. 16802
> >>> 814-863-4739
> >>> b...@psu.edu
> >>>
> >>> "To make an apple pie from scratch, you must first invent the universe."
> >>>
> >>> --
> >>> 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
> >
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu 

Re: mainframe hacking "success stories"?

[Mike Schwab]

Yep.  Just updated my Win 10 machines.  So bad they issued patches for
Win XP and up, out of support for several years.

On Wed, May 15, 2019 at 12:14 PM Bill Johnson
<0047540adefe-dmarc-requ...@listserv.ua.edu> wrote:
>
> Microsoft (MSFT) is warning users about a monster computer bug. The company 
> says it has fixed the flaw but says it's “highly likely” that it will end up 
> being used by malicious software. The flaw mainly affects older systems such 
> as Windows 7 and Windows 2003.
>
>
>
>
>
>
>
> --
> 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: File 228 CBT tape - HSM panel recovery

[Mike Schwab]

 I wrote a program to anaylize a IDCAMS output.  Every few years the
size of some fields would increase and the report literals would be
moved to allow the larger fields.  I would check these positions in
the analysis program.  Better would be to look at an IDCAMS DCOLLECT
filed because those positions never change.


On Thu, May 16, 2019 at 5:41 AM Peter  wrote:
>
> No the BCDS is not hard coded it's basically doing a HLIST and writing to
> ODS. unfortunately the output file is not read properly to display the HSM
> backup
>
> On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
> wrote:
>
> > Hi Peter
> >
> > I assume that the source code of the program in CBT file 228 has the name
> > of the BCDS hard coded. Please search for the BCDS name in the CLIST and
> > replace it using the one of your installation.
> >
> > Best regards
> > 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: File 228 CBT tape - HSM panel recovery

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.arcf000/s4334.htm
RECFM=FBA, LRECL=121.

On Thu, May 16, 2019 at 7:15 AM Allan Staller  wrote:
>
> HSM is *VERY PICKY* about the actual DCB characteristics of the ODS.
> If the ODS does not match what HSM expects, HSM gives up and produces nothing.
>
> I don’t remember what DCB characteristics are required, but it must be 
> documented somewhere.
>
> HTH,
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Peter
> Sent: Thursday, May 16, 2019 5:41 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: File 228 CBT tape - HSM panel recovery
>
> No the BCDS is not hard coded it's basically doing a HLIST and writing to 
> ODS. unfortunately the output file is not read properly to display the HSM 
> backup
>
> On Thu, 16 May, 2019, 2:29 PM Peter Glanzmann, 
> wrote:
>
> > Hi Peter
> >
> > I assume that the source code of the program in CBT file 228 has the
> > name of the BCDS hard coded. Please search for the BCDS name in the
> > CLIST and replace it using the one of your installation.
> >
> > Best regards
> > 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
> ::DISCLAIMER::
> --
> The contents of this e-mail and any attachment(s) are confidential and 
> intended for the named recipient(s) only. E-mail transmission is not 
> guaranteed to be secure or error-free as information could be intercepted, 
> corrupted, lost, destroyed, arrive late or incomplete, or may contain viruses 
> in transmission. The e mail and its contents (with or without referred 
> errors) shall therefore not attach any liability on the originator or HCL or 
> its affiliates. Views or opinions, if any, presented in this email are solely 
> those of the author and may not necessarily reflect the views or opinions of 
> HCL or its affiliates. Any form of reproduction, dissemination, copying, 
> disclosure, modification, distribution and / or publication of this message 
> without the prior written consent of authorized representative of HCL is 
> strictly prohibited. If you have received this email in error please delete 
> it and notify the sender immediately. Before opening any email and/or 
> attachments, please check them for viruses and other defects.
> --
>
> --
> 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: DFDSS QUESTION - PHYSICAL DATASET BACKUP

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2298.htm

INCLUDE(data.set.one, -
 data.set.two)

Commas are REQUIRED.

On Thu, May 16, 2019 at 9:51 AM John Dawes
<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:
>
> G'Day,
> I am encountering a problem performing a Physical dataset backup of several 
> dsn which are on a specific volume.  For some reason it doesn't work. I 
> receive the error message ADR129E (001)-RI01 (01), KEYWORD '  ' IS 
> IMPROPER
> Below is the job output and the JCL.  Can you spot my error?  Does DFDSS 
> support a phyisical backup of multiple dsns?
> ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE INNORUN 
> MODE DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)-
>   DATASET(INCLUDE(HESP.IMS.PROD.MATRIX  - 
>  HESP.NETVIEW.PRF))  -
>  TOL(ENQF) - OPT(4)ALLDATA(*) ALLEXCP
> ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP'
>
> ADR109I (R/I)-RI01 (01), 2019.136 10:21:19 INITIAL SCAN OF USER 
> CONTROLSTATEMENT
>
> ADR129E (001)-RI01 (01), KEYWORD ' ' IS IMPROPER
>
> ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND
>
> ADR017E (001)-CLTSK(01), 2019.136 10:21:19 TASK NOT SCHEDULED DUE TOERROR. 
> TASK
>
> /*
>
> //NORUN   EXECPGM=ADRDSSU,REGION=4096K,PARM='TYPRUN=NORUN'
>
> //*STEP1   EXECPGM=ADRDSSU,REGION=4M,TIME=1440,PARM='UTILMSG=YES'
>
> //DASD1DD  UNIT=SYSDA,VOL=SER=PROD03,DISP=SHR
>
> //TAPE1DD  DSN=MVS.PHYSICAL.BKUP.PROD03,
>
> //DISP=(,CATLG,DELETE),UNIT=3490,VOL=(,,,99)
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSMAP   DD SYSOUT=*
>
> //SYSINDD  *
>  DUMP INDDNAME(DASD1)OUTDDNAME(TAPE1)- 
> DATASET(INCLUDE(HESP.IMS.PROD.MATRIX-
> HESP.NETVIEW.PRF))-   TOL(ENQF)  -
> OPT(4) ALLDATA(*) ALLEXCP
> /*
>
>
>
> --
> 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: DFDSS copy to pre-allocated dsn

[Mike Schwab]

So you are making 3 copies on 3 different OUTDDNAMES?
If it is one dataset on 3 volumes it would be one OUTDDNAME, right?

On Thu, May 16, 2019 at 4:51 PM Elaine Beal  wrote:
>
> I've found a lot of " it's " confusing comments on this topic and I am 
> beleaguered-
> I am trying to copy a file to an existing, pre-allocated new name.
> Seems that should be pretty straight forward... but having to specify rename 
> to make a copy is anything but straight forward
>
> I'm getting ADR380E (001)-FDSCO(08) indicating REPLACEUNCONDITIONAL is not 
> specified
> but I get this whether I specify it or not-
>
>
>   COPY DATASET(INCLUDE(SYS7.R30.V22.ROOT.HFS))  -
>   LOGINDDNAME(DASD1)  -
>   OUTDDNAME(DASD2,DASD3,DASD4)  -
>   RENAMEU((SYS7.R30.V22.ROOT.HFS,   -
>   SYS7.R30.V22.RSU.ROOT.HFS)) -
>   REPLACEUNCONDITIONAL   -
>   NULLSTORCLAS BYPASSACS(**) -
>   ALLDATA(*) ALLEXCP CANCELERROR -
>   SHARE -
>   WRITECHECK
>
> Thanks for any help-
> Elaine
>
> --
> 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: z/OS Container Extensions

[Mike Schwab]

Kind of like a z/OS address space.  Includes application and user
software and database software.  Allows the hypervisor on a server to
switch quickly to other applications instead of waiting for more
transactions.

On Thu, May 16, 2019 at 6:12 PM Farley, Peter x23353
 wrote:
>
> Dumb question for the day: What exactly is a "Docker Container"?  Is there a 
> very simple overview tutorial anywhere of what it does and how it does it 
> that a mainframe programmer (with a small smattering of *ix knowledge) could 
> use to understand what they are and how they could be used in z/OS?
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Tina M Tarquinio
> Sent: Thursday, May 16, 2019 3:26 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: z/OS Container Extensions
>
> You can check out the details here -->
> https://www.ibm.com/support/z-content-solutions/container-extensions/
>
> There are some FAQs that cover what you ask below, and more!
>
> And if that doesnt cover it, we can get the team to meet with you
> directly!
>
>
> Tina M. Tarquinio
> Director, IBM z/OS  | @tinatarq | tina...@us.ibm.com
>
> From:   Frank Swarbrick 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   05/16/2019 03:03 PM
> Subject:[EXTERNAL] z/OS Container Extensions
> Sent by:IBM Mainframe Discussion List 
>
> Don't really know anything about this, but does anyone know what advantage
> there is to running a Docker container on z/OS over just running it Linux
> for Z?  Is it just for those who don't have Linux for Z but want to run
> Linux applications on the mainframe?  Does it allow "direct access" to
> z/OS resources (databases, CICS, etc.)?
>
> --
>
> 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



-- 
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: File 228 CBT tape - HSM panel recovery

[Mike Schwab]

http://www.cbttape.org/updates.htm


On Sun, May 19, 2019 at 4:31 AM Peter  wrote:
>
> Hi Peter
>
>
> I still don't find the updated 228 file in CBTTAPE.
>
> Could you please send me offline if you have now ?
>
> Peter
>
> On Fri, 17 May, 2019, 7:18 PM Peter Vander Woude, 
> wrote:
>
> > I just submitted to the cbt site, an updated file 228, that works
> > correctly.
> >
> > The problem lies in how the clist was parsing the output from the hsm
> > command.
> >
> > The format changed a long time ago.  I had got it working for me, just
> > didn't think about submitting the changes.
> >
> > 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: Exit Question

[Mike Schwab]

Well, if you use memory accessible from any address space for the file
handling, then writes would be defered until the buffer is full, and
the buffer writes would take place after you already return.  Reads
would have to wait if the requested data is not in the input buffers.

On Sun, May 19, 2019 at 4:19 PM scott Ford  wrote:
>
> I totally agree, that was also my “take” on doing I/O from a system exit. I
> realize
> there would be performance issues also, but I was asked the question by my
> management. Since I am the responsible party, I do the research,design, etc.
> I won’t write risky of iffy code, to me that’s not real responsible.
>
> Scott
>
> On Sun, May 19, 2019 at 7:59 AM Peter Relson  wrote:
>
> > Whether or not you are in an environment that would allow you to issue
> > I/O, you should also consider whether it is appropriate to do so.
> > Doing I/O from a system exit can cause system performance problems. It is
> > the responsibility of system exits to be "well behaved".'
> >
> > It is wrong to assume that lack of documentation means "it is OK". Quite
> > the reverse. Lack of documentation means that you should not assume "it is
> > OK" -- but you could/should ask that the documentation be clarified to be
> > explicit.
> >
> > 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
> >
> --
> Scott Ford
> IDMWORKS
> z/OS Development
>
> --
> 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: z/OS Container Extensions

[Mike Schwab]

You can run z/Linux on Hercules or Z mainframe. Go to
https://hub.docker.com/search?q=&type=image&architecture=s390x .
Select IBM Z as the hardware and there are 2001 images ready to download.
Pick one with the combination of database and language support you want.

On Mon, May 20, 2019 at 12:00 PM John McKown
 wrote:
>
> On Mon, May 20, 2019 at 7:56 AM Anthony Giorgio 
> wrote:
>
> > If you have specific questions about zCX, feel free to post them here.
> > I'll do my best to answer them, or find someone else who can.
> >
> > As far as the technical setup of zCX, it's essentially a z/OS hypervisor
> > (like z/VM) that is only configured to run Linux.  The Linux guest OS is
> > running Docker, and is a turnkey appliance.  You only have to configure
> > the appliance to run in your z/OS environment (network, DASD, CPUs, etc.)
> >
> > Once zCX is configured and the address space (or spaces!) is started,
> > the Docker service will be available to you in the appliance.  You can
> > use this service to pull containers from Docker registries.  A container
> > is essentially a packaged application+OS+libraries, which rather neatly
> > solves the "dependency hell" problem.  You can create your own
> > containers or use commercially published ones, and these can be deployed
> > to a "Docker registry" for use, either internally or externally.
> > --
> > Anthony Giorgio
> > Advisory Software Engineer, z/OS Container Extensions
> >
> >
> I know nothing about Docker at present. Would it be possible for me to use
> a Linux/Intel system and the s390x cross-build tools to make a Docker
> "image" which I could then deploy on z/OS?
>
> --
> This is clearly another case of too many mad scientists, and not enough
> hunchbacks.
>
>
> Maranatha! <><
> John McKown
>
> --
> 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 there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files?

[Mike Schwab]

IDCAMS command DCOLLECT for the dataset name into a file then read the
file.  Divide by about 55k to get the number of tracks used.  Assume
all tracks are full and the partial track would be the error amount.

On Thu, May 14, 2020 at 4:27 PM Lizette Koehler  wrote:
>
> Maybe the Catalog Search Function (CSI)  might be able to help.
>
> See it that could be something usable
>
> Lizette
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Seymour J Metz
> Sent: Thursday, May 14, 2020 9:20 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Is there any z/OS API to get byte file size for non-VSAM,
> non-zFS, non-database files?
>
> No, and I'm not even sure what the question means. If what you want is the
> sum of the record lengths then you have to read through the entire file and
> add up the lengths. If you want to know how big it will look to a Unix
> application hen you'll need to add the number of records to account for the
> LF or NL characters, unless the application is reading it as binary. The one
> exception is that if it is a valid FBS dataset then you can calculate the
> size.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> 
> From: IBM Mainframe Discussion List  on behalf of
> Farley, Peter x23353 
> Sent: Thursday, May 14, 2020 11:55 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Is there any z/OS API to get byte file size for non-VSAM, non-zFS,
> non-database files?
>
> This question came to me from a co-worker: Is there any API to get the byte
> file size of a non-VSAM, non-zFS, non-database file in z/OS?  I.E., byte
> file size for plain sequential files?
>
> I am aware of the "old way" of reading the VTOC of a volume to get the
> various DSCB's that total up disk extents, but that gets complicated quickly
> for multi-volume files, and was never guaranteed to be accurate as to the
> actual byte count of data in the file except in the RECFM=FS/FBS case
> anyway.
>
> There is always the performance-killing option of just reading the whole
> file and totaling up the length of every record (or block depending on how
> you structure the reads), but no one would call that an API.
>
> As far as I know there is no such API in z/OS, and this is what I told my
> co-worker, but am I wrong?  Is there an alternative of which I am not aware?
>
> TIA for your input.
>
> Peter
> --
>
>
>
> This message and any attachments are intended only for the use of the
> addressee and may contain information that is privileged and confidential.
> If the reader of the message is not the intended recipient or an authorized
> representative of the intended recipient, you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you have
> received this communication in error, please notify us immediately by e-mail
> and delete the message and any attachments from your system.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> 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: Does allocating an HFS or zFS erase all existing data?intervals formatted?

[Mike Schwab]

All VSAM datasets including Linear are formatted when created.  The
disk space used is not allocated to any other datasets.  Previous data
left by deleted datasets is usually left in place (erase on delete is
an option but not used frequently) but frequently overwritten in a
short time so restoring a deleted data set is almost always
impossible.

On Fri, May 15, 2020 at 4:25 PM Seymour J Metz  wrote:
>
> I want to edit the wiki article [[Disk formatting]] to clarify the statement 
> "s a general rule,[nb 1] formatting a disk erases most if not all existing 
> data on the disk medium". Normally I would consult the logic manuals :-(
>
> When you allocate an HFS or linear data set, does AMS preformat all of the 
> tracks? When you format a zFS, does that force formatting of all tracks? Can 
> you provide references that I can cite for the answers?
>
> Thanks.
>
>
>
> --
> 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: Does allocating an HFS or zFS erase all existing data?intervals formatted?

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.idai200/da6i2118.htm
Discussion on Speed / Recovery option.

On Fri, May 15, 2020 at 5:34 PM Seymour J Metz  wrote:
>
> Do you have something that I can cite for that, preferably something that all 
> wiki readers can look at?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Mike Schwab [mike.a.sch...@gmail.com]
> Sent: Friday, May 15, 2020 1:14 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Does allocating an HFS or zFS erase all existing data?intervals 
> formatted?
>
> All VSAM datasets including Linear are formatted when created.  The
> disk space used is not allocated to any other datasets.  Previous data
> left by deleted datasets is usually left in place (erase on delete is
> an option but not used frequently) but frequently overwritten in a
> short time so restoring a deleted data set is almost always
> impossible.
>
> On Fri, May 15, 2020 at 4:25 PM Seymour J Metz  wrote:
> >
> > I want to edit the wiki article [[Disk formatting]] to clarify the 
> > statement "s a general rule,[nb 1] formatting a disk erases most if not all 
> > existing data on the disk medium". Normally I would consult the logic 
> > manuals :-(
> >
> > When you allocate an HFS or linear data set, does AMS preformat all of the 
> > tracks? When you format a zFS, does that force formatting of all tracks? 
> > Can you provide references that I can cite for the answers?
> >
> > Thanks.
> >
> >
> >
> > --
> > 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
>
> --
> 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: Looking for clarification/guidance on SMTP DD FREE/SPIN

[Mike Schwab]

If you know how often the email is to be sent (1/2/3/4 times a day)
and the Bounce (IPL) schedule, you can repeat the DDNAME and each
message will use 1 DDNAME iteration.

On Fri, May 15, 2020 at 8:08 PM Charles Mills  wrote:
>
> I am designing a long-running Rexx program that will from time to time
> generate an e-mail via the SMTP server. The idea is to allocate a DD
> SYSOUT=(B,SMTP) and write the SMTP commands to it. I've never done that
> before so I have some questions:
>
> - Am I correct in my assumption that I will have to "spin" the dataset
> before the SMTP server will pick it up?
> - Assuming Yes to the first question, am I correct (a.) that
> FREE=CLOSE,SPIN=UNALLOC on the DD will get the records over to SMTP on
> EXECIO (FINIS; but that (b.) at that point the DD "no longer exists" -- that
> I will get an error if I try to open it again? (Recall the program is
> "long-running" and needs to generate multiple e-mails "from time to time."
> They need to go out more or less as created, not in a big batch later on.)
> - Not a huge deal if so, I guess. I can use BPXWDYN to allocate my DD again
> and again rather than JCL. Anyone have any better ideas?
>
> Thanks. Outside-the-above-box suggestions cheerfully considered. I'm pretty
> much set on Rexx, e-mails, and "long-running with multiple e-mails from time
> to time" but will consider other possibilities.
>
> Charles
>
> --
> 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 determine local time zone *name* in Rexx?

[Mike Schwab]

Yep.  You almost need a country code, and for multi zone countries a
zone indicator.  Especially since a shared time zone might have
different DST / ST switch dates in different countries.

On Sun, May 17, 2020 at 9:03 PM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Sun, 17 May 2020 13:39:18 -0700, Charles Mills wrote:
>
> >Please read the subject line ... :-)
> >
> Beware of ambiguity.  AST is both Arabia Standard Time and Atlantic Standard 
> Time,
> https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations
>
> ... and I hadn't gotten through the "A"s yet.
>
> -- 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: How determine local time zone *name* in Rexx?

[Mike Schwab]

East Bank Palestinians and Israelites use different times for the same location
Line Islands in Kiribati uses +14 time zone, same time one day earlier
as -10 Hawaii.
And agree the Unix time zone database is a great idea.

On Mon, May 18, 2020 at 2:58 AM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Mon, 18 May 2020 01:58:01 +, Mike Schwab wrote:
>
> >Yep.  You almost need a country code, and for multi zone countries a
> >zone indicator.  Especially since a shared time zone might have
> >different DST / ST switch dates in different countries.
> >
> And it's up to the recipient to unwind the process?
>
> That's the reason that SMTP date headers specify simply "+/-hhmm"
> (Which might be + for UTC.)
>
> Do you want to know the physical time the message originated,
> or the solar illumination at that point in spacetime?
>
> Otherwise, the Truth (which z/OS shuns) is:
> https://www.iana.org/time-zones
>
> >On Sun, May 17, 2020 at 9:03 PM Paul Gilmartin
> >> >
> >> Beware of ambiguity.  AST is both Arabia Standard Time and Atlantic 
> >> Standard Time,
> >> https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations
> >>
> >> ... and I hadn't gotten through the "A"s yet.
>
> -- 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: How determine local time zone *name* in Rexx?

[Mike Schwab]

Depends on the date.  If it is during daylight savings, MDT, otherwise CST.
-0500 used to prevent a bit of a challenge.  EST, CDT, or Indiana EST all year.

On Mon, May 18, 2020 at 5:02 PM Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Mon, 18 May 2020 11:26:17 -0500, Dale R. Smith wrote:
> >
> >z/VM has a CP QUERY TIMEZONE command:
> >query timezone
> >Zone  Direction   Offset   Status
> >UTC  00.00.00  Inactive
> >GMT  00.00.00  Inactive
> >EDT West 04.00.00  Active
> >EST West 05.00.00  Inactive
> >
> >So it's trivial to get the Zone name.  Of course, the name and the offset 
> >have to be defined to CP in either the system parms or via command.  You 
> >would think that IBM's "Premiere OS" would be able to provide something this 
> >simple!  :-)>
> >
> It ain't so easy, but it's been done at https://www.iana.org/time-zones
>
> On MacOS I see:
> ...
> 2504/usr/share/zoneinfo/.
> 2504total
>
> Ummm ... 2504 KiB.  Of course you don't need all that.  Poll your users
> on what to prune.  I expect no consensus.  See also:
> https://en.wikipedia.org/wiki/List_of_tz_database_time_zones
>
> ...  couple hundred entries.
>
> Should -0600 be MDT or CST?
>
> -- 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: How to get last node in DFSORT

[Mike Schwab]

https://www.youtube.com/watch?v=-cHB3Rbz1OI
Yakity Yak - The Coasters April 1958.  In The Great Outdoors with John
Candy and Twins with Arnold and Danny DeVito.

On Tue, May 26, 2020 at 2:42 PM Seymour J Metz  wrote:
>
> Well, in this case the hammer is the reverse function; 
> /\.([#$@[:upper:][:digit:]]{1,8})\n/, despite the awkward syntax, is still 
> cleaner.
>
> Wasn't there a song on the 1960's, Lexity, Lex, YACCitty YACC?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
> Sent: Tuesday, May 26, 2020 2:51 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: How to get last node in DFSORT
>
> On Sun, 24 May 2020 05:02:24 +, Seymour J Metz wrote:
>
> >That sounds like a great use case for regexen.
> >
> Ob"When your favorite tool is a hammer ..."
>
> >
> >From: Billy Ashto
> >Sent: Friday, May 22, 2020 3:57 PM
> >
> >I have an 80-byte LRECL list of filenames (starting in col 1, varying
> >lengths), and I need to capture just the last node of the file, and
> >store it as a separate word on the record, in col 51.
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
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: TIME a data set was created?

[Mike Schwab]

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.ieag200/iea3g2_Evaluating_Data_Set_Activity.htm

SMF Type 61 (catalog DSN)???

On Sat, May 30, 2020 at 2:01 AM Peter Vels  wrote:
>
> How does one get the TIME a z/OS data set was created?  The date is easy,
> but I'm after the time.
>
> Background: Periodically I update a list of data sets created by an
> application over which I have no control. I want to sort the list by
> descending date and time. Where can I get the time from?  LISTDSI won't
> provide it unless the data set is on an EAV volume (doesn't apply).
>
> Regards,
> PV
>
> --
> 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: TIME a data set was created?

[Mike Schwab]

If you know what job and step created it, you could look in the system log.

On Sat, May 30, 2020 at 4:43 AM Peter Vels  wrote:
>
> A number of people both on and off the list have mentioned SMF. Even if I
> had permission to read SMF data (I don't) I think it would be too much
> overhead to scan weeks of SMF records to find a few (~50) timestamps.
>
> On Sat, 30 May 2020 at 13:44, Lizette Koehler 
> wrote:
>
> > Do you have any tools like MICS/SAS/MXG?
> >
> > If not, can you download from cbttape.org the tool DAF (Dataset Audit
> > Facility)  - you can feed it SMF data based on dataset names, and it will
> > provide SMF records that probably have a timestamp
> >
> > Lizette
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On Behalf
> > Of Peter Vels
> > Sent: Friday, May 29, 2020 7:01 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: TIME a data set was created?
> >
> > How does one get the TIME a z/OS data set was created?  The date is easy,
> > but I'm after the time.
> >
> > Background: Periodically I update a list of data sets created by an
> > application over which I have no control. I want to sort the list by
> > descending date and time. Where can I get the time from?  LISTDSI won't
> > provide it unless the data set is on an EAV volume (doesn't apply).
> >
> > Regards,
> > PV
> >
> > --
> > 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: GDG relative number updates

[Mike Schwab]

It happens during the job.  And you can't access by relative number
until the job completes.  You can access by absolute number.

On Sat, May 30, 2020 at 8:41 AM Ron Hawkins  wrote:
>
> I always thought JES2 resolved relative GDG numbers during job initiation.
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of
> Joseph Reichman
> Sent: Wednesday, 27 May 2020 11:02 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: [IBM-MAIN] GDG relative number updates
>
> Hi
>
> I have have my sdump file DSN as a GDG I save the dsn name in the variable
> portion of the SDWA I am wondering when the system updates the relative
> number is it after a close and when you open the dataset again  the number
> has been updated
>
> 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



-- 
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: Base SYSPLEX setup

[Mike Schwab]

A coupling facility using a share CP processor only needs a few
percent of the processor dedicated.  If you are maxed out on CPU and
can't tolerate a slight slowdown at peak times, then one step up to
the next MSU setting should be enough.

On Sun, May 31, 2020 at 7:05 AM Brian Westerman
 wrote:
>
> Hi,
>
> I'm looking for information on how to set up a base SYSPLEX with only Ficon 
> CTC's that seem to be referred to as XCF CTC's.
>
> I'm sure someone had done this before and is probably doing it now for 
> Multiple LPARs that are running on the same processor CEC.  Configuration 
> help (parms etc.) would be greatly appreciated.  I think all we need to do to 
> connect the 3 existing LPARs is purchase 2 FICON cards (we currently have no 
> extras).  Unfortunately, the IBM docs seem to talk a lot about the full 
> parallel sysplexes (with Coupling facilities), but we don't have them, and 
> they seem to be a great deal more expensive than FICON cards which are all we 
> need to implement GRS anyway (that's our goal).  We can also apparently 
> create a virtual CF, but the overhead appears to be far greater than we can 
> spare.
>
> Any CXF CTC setup information would be greatly appreciated.
>
> Thanks
>
> 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: Punched cards and character set

[Mike Schwab]

Yep.  Same width as Roman Chariots, drawn by two horses, side by side..

On Tue, Jun 2, 2020 at 9:39 PM Jesse 1 Robinson  wrote:
>
> My favorite OT theme. Related in my mind. The diameter of the original space 
> shuttle booster rocket was an odd value determined as follows:
>
> -- The booster was built in rural Utah
> -- To reach the eventual launch pad, it had to travel through a train tunnel
> -- The booster had to fit through the tunnel
> -- So the spacing of train tracks determined the booster's diameter
> -- The spacing of RR tracks was influenced by the spacing of ancient wagon 
> wheels
> -- Wagon wheel spacing was influenced by the horses that once pulled them
> -- In other words, the diameter of the booster rocket derived from a horse's 
> *ss
> -- QED?
>
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Charles Mills
> Sent: Tuesday, June 2, 2020 2:31 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: (External):Re: Punched cards and character set
>
> CAUTION EXTERNAL EMAIL
>
> "Laced" (every hold punched) cards were an amusing bulletin board item.
>
> And yes, I believe I heard at the time @Jesse's premise as to why 'S' did not 
> use row 1.
>
> Actually, the alpha codes are as follow:
>
> A - I, row 12 plus rows 1 - 9
> J - R, row 11 plus rows 1 - 9
> S - Z, row 0 plus rows 2 - 9
>
> So you see that if S used row 1 it would have had two adjacent rows punched, 
> 0 and 1.
>
> (The rows, from top to bottom, are 12, 11, 0 - 9.)
>
> Non-alphanumeric punches were fairly rare, and column binary was extremely 
> rare.
>
> Object code decks of course contained non-alphanumeric punches. The X'02' 
> that begins each (traditional) object code record, preceding ESD, TXT, RLD or 
> END? I still think of it as "12-2-9.")
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Steve Smith
> Sent: Tuesday, June 2, 2020 2:07 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Punched cards and character set
>
> That's plausible, I think.  While there are plenty of adjacent punches in the 
> full 256-characters, I'm sure most cards were mostly alphanumeric only, and 
> it might pay to make them as strong as possible.  I remember seeing some 
> cards that were punched in every position; those were very delicate, and 
> definitely couldn't survive a pass through a card reader, regardless of the 
> fact they had no validity at all.
>
> sas
>
> On Tue, Jun 2, 2020 at 4:55 PM Jesse 1 Robinson 
> wrote:
>
> > I haven't seen this mentioned. The punch card codes for letters went
> > like
> > this:
> >
> > A - I rows 1 - 9
> > J - R rows 1 - 9
> > S - Z rows 2 - 9
> >
> > So why was S assigned to row 2 instead of row 1? The answer I was
> > taught was that row 1 was  too close to an adjacent location. The
> > punching/reading devices and card stock of the day could not reliably
> > handle punches that close together, so row 1 was skipped for the third 
> > alphabetic sequence.
> >
> > What's amusing is that this pattern was carried over to EBCDIC. The
> > code for S likewise skips a possible combination: D9 to E2; 'E1' is
> > not assigned to an alphabetic character.
> >
> >
>
>
> --
> 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: Gratuitous EXECIO Documentation

[Mike Schwab]

I like syntax diagrams.

On Fri, Jun 5, 2020 at 4:46 PM Charles Mills  wrote:
>
> The documentation is written to aid human beings. It is not a hard-core 
> exercise in logic.
>
> In writing doc I am often struck by a contrast to coding. In coding, if you 
> had to do the same three-line sequence at ten places in your code the right 
> thing would be to factor it out into a subroutine and invoke it ten times. In 
> writing doc OTOH the reader might be better served by your repeating the same 
> three sentences ten times rather than ten times saying "See the note at the 
> top of page 17" (which is roughly the documentation analog of a subroutine 
> call).
>
> It's a judgment call as to what will best help the reader. Sometimes 
> following logic rigorously is what best serves the reader. Probably better to 
> use a link to the JCL reference rather than doing a halfway job of explaining 
> DD statements in a COBOL manual. But as @Tony says, EXECIO is a particular 
> landmine for inexperienced Rexx coders. It is not wrong to make their lives 
> easier.
>
> And no, "therefore every technically similar feature should get the same 
> note" is not a valid corollary.
>
> Charles
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Paul Gilmartin
> Sent: Friday, June 5, 2020 9:15 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Gratuitous EXECIO Documentation
>
> On Fri, 5 Jun 2020 12:01:18 -0400, Tony Thigpen wrote:
>
> >In my experience, over 30 years of using REXX on first VM, then VSE and
> >now z/OS, I can't tell you how many times I have had to help people with
> >the EXECIO syntax as it relates to "what is a keyword" and "what is a
> >variable". I would put it at the top of the "common programming errors
> >in REXX" list.
> >
> >I have seen the following error S many times:
> >... "STEM" line.
> >Which should be:
> >... "STEM LINE."
> >
> >I would not consider this "gratuitous" documentation.
> >
> I'm outvoted.  I  shall submit one RCF for each command description
> that does not contain such a caution asking that one be added.
>
> (I haven't checked.  Perhaps they already exist.)
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
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: Old Code Gets Younger Every Year - Marianne Bellotti - Medium

[Mike Schwab]

Our shop had one agency still running report writer reports using the
free built in version (78?).

On Tue, Jun 9, 2020 at 3:47 PM Seymour J Metz  wrote:
>
> Ultimately it's a management issue common to all languages: if programmers 
> are not required to document and to keep documentation up to date, or, worse, 
> are prohibited from "wasting time" doing so, there will be downstream 
> consequences. In the case of COBOL there is also the pernicious myth that it 
> is self documenting - no language is.
>
> BTW, is there any shop still using CODASYL COBOL?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Mark Regan [marktre...@gmail.com]
> Sent: Tuesday, June 9, 2020 11:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Old Code Gets Younger Every Year - Marianne Bellotti - Medium
>
> https://secure-web.cisco.com/1b-5A-k6m87QTuqyzbtnQj11SHVaJXaKjTnUPxpdSFiuZdewfEpzGWXFrNQU429jqXYBeZ4hkAlxT3dwOqilF88CSRyW-_NgSwlWsyj7sRwwUDLDv42jM5to-s_cB2PwkNZOAwdlREnOqHj8Z5NG_geFUVQiQSalS9G2b_-Vv-lOmNzr1w2DoxFhTgpEe1vl5WSMDwwChgYvdh2p8moci0AHnOb23dU-X5x1IgQZDBRRWxQV7SL-iUr-bBmPkjtCWqW5OoUGnpWYfYAgHKjgsIN0yd7RfpAuQstdzLgyxmoxhUXAMW7tz8nsr8yvioxLnon7_S31Bq7HViahTEIhK-n_F46JT4alOq53UrcW0QmMxL-X7nuNlhvhzy61B2WLAnBwT-dikGqH-DzsncM4a7jNKW-_Ok9sJM1Ef0H7sZ3n0XN5RiQm2VQ-pLaCJ3jGR_jCvq8GbbjxaqhnwgjHgAw/https%3A%2F%2Fmedium.com%2F%40bellmar%2Fold-code-gets-younger-every-year-3bd24c7f2262
>
> Regards,
>
> Mark T. Regan
>
> --
> 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: COBOL Question

[Mike Schwab]

4GL - I've used Telon which takes a screen layout and database layout
and generates the cobol code and editing rules.  ADR-Datacom had Ideal
which was similar, later CA.  Easytrieve plus I really liked,
especially the report generation part.

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

Re: "Everyone wants to retire mainframes"

[Mike Schwab]

Apple Did the high school thing.  That's where they got their devotees.

On Tue, Jun 9, 2020 at 3:54 PM Tom Brennan  wrote:
>
> When I bought my Yamaha piano in 1989, I heard a story that Yamaha had
> been supplying free pianos to universities for years.  It was more than
> them just being nice, they knew that someone practicing every day on the
> school grand piano would likely go on to buy one, or be the decision
> maker for an orchestra, night club, or whatever.  I always thought that
> was super smart of them.  What I always thought was rather dumb, is that
> IBM doesn't do similar with educational use of all their software.  And
> that's just copied bits ... no wood, metal, delivery, tuning, etc.
>
> On 6/9/2020 5:02 AM, Bob Bridges wrote:
> > A coworker just sent me this brief article.
> >
> > https://www.techrepublic.com/article/everyone-wants-to-retire-mainframes-but-74-of-modernization-efforts-fail/
> >
> > I'm interested in two aspects of this:
> >
> > 1) The writer uses the word "modernization" quite a bit, and as far as I 
> > can tell she uses it, without explanation, to mean "switching from 
> > mainframes to more recently invented platforms".  This is the old 
> > assumption we've talked about recently.
> >
> > 2) There's a really surprising number in there:
> >
> > "...almost 100% of survey respondents plan to move legacy applications to 
> > the cloud this year and the motivation to move is clear:
> >
> > - 60% strongly agree they will be left behind competitively if they fail to 
> > modernize
> > - 33% say modernizing has allowed the company to be more reactive to market 
> > changes
> > - 34% say legacy modernization has accelerated digital transformation 
> > projects
> >
> > About three-quarters of leaders said they have started a modernization 
> > program but failed to complete it"
> >
> > Can that "almost 100%" claim be true?  I confess that three out of my last 
> > three clients are talking about eliminating the mainframe, but I supposed 
> > it to be an anomaly.  Maybe the survey used the word "modernize" and the 
> > author ~assumed~ this must mean dropping the mainframe.
> >
> > The article also says "Mainframes are still critical to business operations 
> > with 71% of the Fortune 500 depending on these machines, including 92 of 
> > the world's 100 largest banks".  Come on - she's telling us that almost 
> > ~all~ of those companies intend to switch legacy applications to the cloud? 
> >  I just can't buy that.  ~My~ bank had certainly better not be planning 
> > such a move.
> >
> > ---
> > Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
> >
> > /* If a problem has a single neck, it has a simple solution. */
> >
> > --
> > 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: Old Code Gets Younger Every Year - Marianne Bellotti - Medium

[Mike Schwab]

Yes.  Without all the END-??? statements.

On Tue, Jun 9, 2020 at 5:46 PM Seymour J Metz  wrote:
>
> Wouldn't that be VSCOBOL, well beyond CODASYL?
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Mike Schwab [mike.a.sch...@gmail.com]
> Sent: Tuesday, June 9, 2020 1:42 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Old Code Gets Younger Every Year - Marianne Bellotti - Medium
>
> Our shop had one agency still running report writer reports using the
> free built in version (78?).
>
> On Tue, Jun 9, 2020 at 3:47 PM Seymour J Metz  wrote:
> >
> > Ultimately it's a management issue common to all languages: if programmers 
> > are not required to document and to keep documentation up to date, or, 
> > worse, are prohibited from "wasting time" doing so, there will be 
> > downstream consequences. In the case of COBOL there is also the pernicious 
> > myth that it is self documenting - no language is.
> >
> > BTW, is there any shop still using CODASYL COBOL?
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> > Mark Regan [marktre...@gmail.com]
> > Sent: Tuesday, June 9, 2020 11:16 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Old Code Gets Younger Every Year - Marianne Bellotti - Medium
> >
> > https://secure-web.cisco.com/1b-5A-k6m87QTuqyzbtnQj11SHVaJXaKjTnUPxpdSFiuZdewfEpzGWXFrNQU429jqXYBeZ4hkAlxT3dwOqilF88CSRyW-_NgSwlWsyj7sRwwUDLDv42jM5to-s_cB2PwkNZOAwdlREnOqHj8Z5NG_geFUVQiQSalS9G2b_-Vv-lOmNzr1w2DoxFhTgpEe1vl5WSMDwwChgYvdh2p8moci0AHnOb23dU-X5x1IgQZDBRRWxQV7SL-iUr-bBmPkjtCWqW5OoUGnpWYfYAgHKjgsIN0yd7RfpAuQstdzLgyxmoxhUXAMW7tz8nsr8yvioxLnon7_S31Bq7HViahTEIhK-n_F46JT4alOq53UrcW0QmMxL-X7nuNlhvhzy61B2WLAnBwT-dikGqH-DzsncM4a7jNKW-_Ok9sJM1Ef0H7sZ3n0XN5RiQm2VQ-pLaCJ3jGR_jCvq8GbbjxaqhnwgjHgAw/https%3A%2F%2Fmedium.com%2F%40bellmar%2Fold-code-gets-younger-every-year-3bd24c7f2262
> >
> > Regards,
> >
> > Mark T. Regan
> >
> > --
> > 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: "Everyone wants to retire mainframes"

[Mike Schwab]

Yep.  We used to get a lot of errors for out of volumes in a storage
groups, and the users would want us to add more volumes.  For several
calls I would point out that the data set had a very small primary and
secondary space value.  I would go through all the extents on one
volume, then proceed through the rest, and run out volumes despite
lots of space in the storage group.  They didn't want to reallocate,
so I suggested they migrate and recall the dataset.  Then the existing
space would be in 1 extent on 1 volume and plenty of extents and
volumes to extend onto.  The problem started going away after that.

Would the new 1st extent on the first volume from the recall become
the default 1st allocation on subsequent volumes?

On Wed, Jun 10, 2020 at 12:48 AM Seymour J Metz  wrote:
>
> My pet peeve is the default for SPACE; "Absolute track not available" is not 
> a user friendly error message for forgetting to specify SPACE.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Bob Bridges [robhbrid...@gmail.com]
> Sent: Tuesday, June 9, 2020 8:33 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: "Everyone wants to retire mainframes"
>
> JCL: I used to complain about JCL's arcane and in some cases backward syntax. 
>  I mean, "COND=(0,LT,step.procstep)" - who made that up?  But somehow over 
> the years I've made my peace with JCL.  It is what it is.  And I would have 
> done no better, back then.
>
> EBCDIC: A couple of years ago, when I was employed by a small mainframe 
> security consulting company, a client came to them asking for help with a 
> project to create a security product that would reside on a distributed 
> platform but handle security on the mainframe.  They were going to develop it 
> for a client that was using Top Secret, but it could have been any of the 
> three.  These folks didn't know mainframes, which is why they hired my 
> employers, who assigned me to the project.
>
> I said they "didn't know mainframes"; let's start with the fact that they 
> didn't know about EBCDIC.  But that's no problem, right?  There are lots of 
> things one can do to translate between EBCDIC and ASCII.  In the process of 
> working on this project I wrote, my very own self, a socket server that would 
> handle both ASCII and EBCDIC clients.  (I mention this because I'd never done 
> any such thing before, and I was inordinately pleased with the fact that I 
> could do anything so cool.  Those of you who've done hundreds of those and 
> take it for granted, please don't burst my bubble.)
>
> Then they discovered the whole issue of 3270 emulation.  And I probably 
> wasn't helping by trying to explain the complexities of mainframe security at 
> about the same time.  The client went away to think about the communications 
> issue, and somehow they never came back; the project never went anywhere 
> after that.
>
> ---
> Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
>
> /* Always look a gift horse in the mouth.  It may have hoof-and-mouth 
> disease.  -Bob Bridges, 1977 */
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
> Behalf Of Paul Gilmartin
> Sent: Tuesday, June 9, 2020 19:18
> >
> Yes, but JCL.  JCL is to programming as Roman numerals are to arithmetic.
>
> And EBCDIC.  "Doesn't play well with others."
>
> --
> 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: DASD migration -- Re: Hitachi RAID box going out of support

[Mike Schwab]

I have used FDRPAS, TDMF which were all vendor compatible, and Dell
z/OS Migrator which must have their hardware as the target.  Most
movement was done with the system running at full speed.  The
different software packages did require different software products to
be down to SWAP their files.  Did require IPL to use new volumes.
25TB 3000 volumes in two days from an IBM F20 / 800 source with vendor
assistance for the z/OS migrator to Dell / EMC VMAX.  TDMF was in
house and did as 'time as available' task.  Consolidating onto bigger
volumes is what takes time and we would have exceeded UCB count limit
on LCU without it. But you are unlikely to be attempting that process.
So your purchase should include software to move your data while the
system is operating.

Probably a 90 day window once the hardware is operating, with one week
vendor assistance (onsite / webex).  For the mainframe, I would
suggest a z13 so you can IPL your old system with 31 bit IPL text that
switches to 64 bit operation.  Its old so you should be able to get a
cheap one but with a maintenance contract.  And watch the
compatibility on FICON cards / directors.

On Fri, Jun 26, 2020 at 3:04 PM Grant Taylor
<023065957af1-dmarc-requ...@listserv.ua.edu> wrote:
>
> On 6/26/20 3:16 AM, R.S. wrote:
> > 3. 18 months is close to half of typical service contract for new dasd
> > array. Still we don't know how sure is 18 months - maybe it would be 36
> > months? Even 12 months means the dasd array would have some residual value.
>
> n00b questions:
>
> 1)  Is it possible to migrate from old DASD to new DASD?
>
> 2)  How disruptive would this be to the day-to-day operation of the
> existing mainframe?
>
> 3)  What sort of prerequisites exist for this?
>
> I have some experience with this in the Open Systems environment, but
> I'd like to know more about how such a storage migration would be done
> in the mainframe world.
>
>
>
> --
> Grant. . . .
> unix || die
>
> --
> 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: Migrate z/OS DASD volumes from Mainframe to Hercules Environment

[Mike Schwab]

If you are only testing on Hercules and will continue to run
production on IBM z series hardware, I believe IBM doesn't care.  But
the SOFTWARE does check the hardware levels and you have to include a
particular configuration statement for a recent Z operating system to
run on Hercules.  But if you post the exact message we can help you
figure out the problem you are actually experiencing.

On Tue, Jun 30, 2020 at 10:54 AM Binyamin Dissen
 wrote:
>
> Have you complied with the licensing requirements?
>
> On Tue, 30 Jun 2020 05:25:23 -0500 Jasi Grewal  wrote:
>
> :>I am sorry I am just learning Hercules Systems and trying to migrate one of 
> my z/OS DASD Systems from Mainframe to Hercules Environment.
> :>I have z/VM running on Hercules but when I tries to IPL z/OS it seems that 
> there is a corruption and that is most probably cause of wrong process.
>
> :>I believe that there must be some method to migrate the z/OS DASD from 
> Mainframe to Hercules.
> :>I used z/VM DDR+Terse to migrate zOS Dasd but I don't think that is the 
> correct process.
> :>Is there a Documentation in how to migrate z/OS Systems to Hercules? That 
> would be appreciated.
>
> :>Any guidance would be appreciated.
> :>Thank you in advance,
> :>Regards,
>
> :>Jasi Grewal.
>
> --
> Binyamin Dissen 
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
>
> Should you use the mailblocks package and expect a response from me,
> you should preauthorize the dissensoftware.com domain.
>
> I very rarely bother responding to challenge/response systems,
> especially those from irresponsible companies.
>
> --
> 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: USS "pwd" returns nothing? Maybe file system created wrong?

[Mike Schwab]

Are you using CKD or CCKD64 volumes?  CCKD has a 4GB limit and CKD has
to have a multi file setup.

On Tue, Jun 30, 2020 at 9:29 AM Michael Knigge  wrote:
>
> All,
>
> have you ever came accross something like that?
>
> I can change into an directory, „ls“ works but „pwd“ returns…. Nothing?!?   
> When I’m in this particular directory a „cd ..“ returns „EDC5122I 
> Input/output error.“
>
>
> I’m pretty new to this „USS administration“ (I’m administering a z/OS running 
> with an z/PDT)… So let me tell what I’ve done – I might have done something 
> really wrong….
>
>
> I need some space in USS so I’ve created some new fresh volumes (3390-9) for 
> my zPDT and formatted them.
>
> INIT UNITADDRESS(0AE0) NOVERIFY VOLID(USS010) -
>STORAGEGROUP -
>VTOC(3,0,50) -
>INDEX(1,0,30)
>
> Now I have some volumes each with 10010 free CYLs.
>
> Then I’ve created a Data Set for the ZFS file system:
>
> DEFINE CLUSTER -
>(NAME (USSSET.DAT.ZFS) -
>VOLUMES (USS002 USS003 USS004 USS005  -
> USS006 USS007 USS008 USS009) -
>LINEAR CYL(1 1) SHAREOPTIONS(3))
>
> The idea was that when the file system needs to be enlarged this is done 
> automatically (let z/OS allocate an additional extend of 1 CYLs from one 
> of the dedicated volumes). I know that every extend neary uses the full 
> volume – this is okay for me in this case…
>
> Okay, then I’ve created the file system:
>
> FORMAT EXEC PGM=IOEAGFMT,REGION=0M,
>  PARM=(' -aggregate USSSET.DAT.ZFS -compat -perms 775 ')
>
>
> Mounted… everything all right…. I saw that just one of the volumes was 
> „used“. So I filled the mounted file system and saw that after some time the 
> log messages
>
> IOEZ00312I Dynamic growth of aggregate USSSET.DAT.ZFS in progress, (by user 
> ADCDZ).
> IOEZ00309I Aggregate USSSET.DAT.ZFS successfully dynamically grown (by user 
> ADCDZ).
>
>
> So for me I guess everything worked as expected… But now…. This „pwd anomaly“ 
> ….. Did I something wrong? Any idea how to get thigs working as expected?
>
>
> Thank you,
> Michael
>
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://www.set.de
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> Geschäftsführer: Dr.-Ing. Tobias Baum, Arthur Brack, Hendrik Leder
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
>
>
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> www.set.de
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> Geschäftsführer: Tobias Baum, Arthur Brack, Hendrik Leder
>
> --
> 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