Re: S0c4 creation
I didn't notice that reference to the B2Ex opcodes before. Bitsavers https://bitsavers.org/pdf/ibm/370/princOps/ has several old editions of the POO, wherein I see: The -4 edition of the System/370 POO (1974) has the reference to the B2Ex opcodes. The -6 edition (1980) does not reference B2Ex, but only 00. There is a change bar on that, so I assume the change went in with that edition, but I don't have a -5 to verify that. This seems to continue to be the same, though I didn't check all editions. The -4 edition of the z/Architecture POO (2005) has the same reference that it is "improbable" that opcode 00 will ever be used. Starting in the -5 edition of the z/Architecture POO (2007) it was changed to "Operation code 00 hex will never be assigned to an instruction implemented in the CPU." So the reference to the improbability of B2Ex opcodes ever being implemented was a short lived one. The two opcodes in that range, B2E8 (PPA) and B2EC (ETND) first appeared in the -9 edition of the z/Architecture POO in 2012. -- Tom Marchant On Tue, 23 Apr 2024 18:39:01 -0400, Tony Harminc wrote: >On Mon, 22 Apr 2024 at 09:50, Seymour J Metz wrote: > >> IBM promised to never use opcode 00, and that's what I use when I want >> (E)SPIE in the skie. >> > >But way back when (around the last S/370 PofO they said "The operation code >00, with a two-byte instruction format, and the set of sixteen 16-bit >operation codes B2E0 to B2EF, with a four-byte instruction format, are >allocated for software uses where indication of invalid operation is >required. It is improbable that these operation codes will ever be assigned >to an instruction implemented in the CPU." > >Then at some point (z10 era?), they defied improbability and used some of >the B2Ex opcodes. You'd think it wouldn't have killed them to keep a range >of just 16 two-byte opcodes available for customers. > >Tony H. > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is there a free format only Abend-Aid program?
As far as I know there is nothing available outside of the Abend-AID product. Long ago, Abend-AID wrote its report to the SYSUDUMP/SYSABEND DD, but that was changed decades ago. Now, Abend-AID writes its reports to a VSAM sat set in a proprietary format. Assuming that the report was sent to you by a client, they probably exported the report using the CWDDALLU or similar utility. That same utility can also print the report. -- Tom Marchant Abend-AID development BMC On Wed, 17 Apr 2024 22:37:23 +0300, Binyamin Dissen wrote: >I have a received what appears to be an abend-aid dump. > >Is there a free formatter for it (not the full product, just the ability to >format the dump into a readable format)? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Join the COBOL 6 modernization features survey
This survey is BS. On the first page, it touts interoperability between 31-bit and 64-bit. This is only a thing because of the ridiculous decision to use XPLINK linkage for 64-bit Cobol. The z/OS architects made that a non-issue with F4SA, F5SA, etc. LE designers made some bad decisions when they designed XPLINK applications incompatible with standard applications, then they compounded that when they designed XPLINK-64 to be incompatible with XPLINK and standard applications. As an example, there are three formats of the CAA. One for standard linkage, one for XPLINK and a third for XPLINK-64, and they are not compatible. -- Tom Marchant On Mon, 15 Apr 2024 05:07:50 -0500, Dan Zhang wrote: >Take our quick survey on IBM Enterprise COBOL for z/OS (COBOL) 6 modernization >features: https://ibmxm.qualtrics.com/jfe/form/SV_5zhKYEpP68L4Yjc! Share your >feedback on learning and using the latest advancements in COBOL 6. It only >takes 5 minutes to complete. Your insights will shape the future of our >products and services to better serve you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Console Address Space
When I first saw this post, my first thought was to see if the system entered a disabled wait state. You didn't say whether you looked for any other signs of life. VTAM or TCP/IP, for example. Were TSO users all locked out? Are you looking at a standalone dump to diagnose this? If so, there might be LOGREC records. -- Tom Marchant On Wed, 10 Apr 2024 11:54:13 +, Allan Staller wrote: >This past weekend I had an issue where a system became totally unresponsive >and incommunicado. >HMC access also failed, and the only conclusion I can come up with, is that >the console address space abended. > >I am working through that debug process, but is there anyway to dynamically >restart the console address space? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Posting issues - why do some posts have anonymous FROM-addresses?
As I said, I use the web interface to reply, rather than send an email to the list server. Perhaps that is what causes the sender's address to appear that way. For my post that you referenced, this is what I see in the web interface: Subject:Re: Posting issues - why do some posts have anonymous FROM-addresses? From: Tom Marchant Reply To: IBM Mainframe Discussion List I am set to NOMAIL so I can't look at the email headers at the moment. -- Tom Marchant On Wed, 10 Apr 2024 08:52:50 -0700, Tom Brennan wrote: >Your own email is an example :) Here's what I see using Thunderbird: >https://www.mildredbrennan.com/mvs/email_address.png > >On 4/10/2024 8:30 AM, Tom Marchant wrote: >> On Wed, 10 Apr 2024 13:50:03 +0100, Jeremy Nicoll >> wrote: >> >>> I just noticed that some posts here show the poster's own email address >>> whereas others have something like >>> >>> 0xxx-dmarc-requ...@listserv.ua.edu >> >> I haven't seen that. Can you show an example? I have seen attributions in >> some posts that look like that, but not an actual From: address. >> I use the Listserv web interface exclusively to see posts and respond to >> them. >>> >>> Does the latter indicate a post made via newsgroup bit.listserv.ibm-main >>> (if the gateway between NNTP & listserv still works?) while the former >>> indicate "posts" made directly to the listserv by email? >> >> I thought that the gateway between Listserv and Netnews was one way. That >> is, IBM-Main is sent to bit.listserv.ibm-main, but posts to >> bit.listserv.ibm-main are not sent to the mailing list. >> > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Posting issues - why do some posts have anonymous FROM-addresses?
On Wed, 10 Apr 2024 13:50:03 +0100, Jeremy Nicoll wrote: >I just noticed that some posts here show the poster's own email address >whereas others have something like > > 0xxx-dmarc-requ...@listserv.ua.edu I haven't seen that. Can you show an example? I have seen attributions in some posts that look like that, but not an actual From: address. I use the Listserv web interface exclusively to see posts and respond to them. > >Does the latter indicate a post made via newsgroup bit.listserv.ibm-main >(if the gateway between NNTP & listserv still works?) while the former >indicate "posts" made directly to the listserv by email? I thought that the gateway between Listserv and Netnews was one way. That is, IBM-Main is sent to bit.listserv.ibm-main, but posts to bit.listserv.ibm-main are not sent to the mailing list. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RACF, external password management
FWIW, the list of messages that I posted came from the web interface. On Tue, 9 Apr 2024 22:25:57 +0100, Jeremy Nicoll wrote: >On Tue, 9 Apr 2024, at 21:29, Tom Marchant wrote: >> I haven't noticed. How did you determine that they are gone? I see >> these posts from you, some of which reference zMFA. > >I just looked in the list archive whose address is specified in the > > List-Archive: <http://listserv.ua.edu/cgi-bin/wa?LIST=IBM-MAIN> > >header in every mail. I had to register a password for the website >to do that ... but it looks as if the mails are there. > >So... does Linda mean that they vanished from her gmail account, >or something else? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RACF, external password management
I haven't noticed. How did you determine that they are gone? I see these posts from you, some of which reference zMFA. Re: RACF, external password management Linda Hagedorn 2024-02-29 15:53IBM-MAIN Re: RACF, external password management Linda Hagedorn 2024-02-29 13:00IBM-MAIN Re: RACF, external password management Linda Hagedorn 2024-02-29 12:44IBM-MAIN Re: RACF, external password management Linda Hagedorn 2024-02-29 12:43IBM-MAIN Re: RACF, external password management Linda Hagedorn 2024-02-29 12:31IBM-MAIN Re: RACF, external password management Linda Hagedorn 2024-02-29 12:30IBM-MAIN RACF, external password management Linda Hagedorn 2024-02-28 16:35IBM-MAIN On Tue, 9 Apr 2024 13:20:56 -0500, Linda Hagedorn wrote: >Has anyone else noticed their posts deleted? >My posts re: zMFA are gone. Poof. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMP/E
Just issue the UPGRADE command. IIRC FIXCAT support was added to SMP/E around 2008. Your global zone must have been created with a release of SMP/E before that. -- Tom Marchant On Fri, 29 Mar 2024 21:59:49 +, Steely.Mark wrote: >I recently received this message: GIM58903WSMP/E COULD NOT PROCESS A >++HOLD FIXCAT MCS BECAUSE IT WOULD HAVE MADE A CHANGE TO THE GLOBAL ZONE THAT > > CANNOT BE PROCESSED COMPLETELY BY PRIOR LEVELS OF SMP/E. USE THE > UPGRADE COMMAND TO ALLOW SMP/E TO MAKE > > SUCH CHANGES. > >The message says you can execute the upgrade command. ( I am not sure if I >can do that without having some type of maintenance applied) > >It has been a while since I upgraded SMP/e independently of a Service Pack or >some other type of installation. > >I thought I would just install the new release of SMP/e - for some reason I >can't find it on ShopzSeries. > >I have tried to look all over the internet for the answer, but I always gets >hits on installing other products using SMP/e. > >We are currently at SMP/E 37.13 >Our SMP/E is 2.4 FMID - HMP1K00. > >What should I do ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How can I determine MVS FQDSN from DD Name in Batch COBOL Program?
Is your SPOOL so constrained that you are concerned about running out of space if a job issues even a few million lines of sysout? -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ideas for less-distruptive disruptions - Netmaster:Solve and CICS
SHARE proceedings are available to SHARE members only. Log in with your SHARE user ID. -- Tom Marchant On Mon, 25 Mar 2024 06:53:47 -0400, David Spiegel wrote: >Hi Wayne, >I followed the link and saw the description. >How do I access the content? > >Thanks and regards, >David > >On 2024-03-25 01:26, Wayne Bickerdike wrote: >> Tom Longfellow. >> >> I presented a session at Share in Phoenix in 2019 on the subject of CICS >> transactions written in REXX. >> >> https://www.share.org/Events/Past-Events/Proceedings/Proceeding-Details/cics-and-rexx-some-useful-tips-and-tricks >> >> The capability has been around for years. Just happens that nobody bothers >> to install the feature (unless it's me, LOL). >> >> >> >> >> On Fri, Mar 22, 2024 at 6:35 AM Sri Hari Kolusu wrote: >> >>>>> I see a lot more research in my future. >>> Tom, >>> >>> Here is something to get you started. >>> >>> https://www.ibm.com/docs/en/cics-ts/beta?topic=server-rexxcics-commands >>> >>> Thanks, >>> Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Continous Delivery
AFAIK, There is nothing special that a customer needs to do for continuous delivery. Continuous delivery means that new features are delivered by PTF rather than installing a new release. I believe that IMS fully supports continuous delivery. You might want to look at IMS 15 documentation to see what they say about it. As an example, going from IMS 15.3 to IMS 15.4 is done by applying PTF(s). -- Tom Marchant On Fri, 22 Mar 2024 12:35:06 GMT, esst...@juno.com wrote: >Hello >. >Does anyone have experience with IBMs Continous Delivery ? >. >My understanding is that it is Not a product You order . >. >I An installaion would configured/installed/ertup their environment to >support Continous Delivery - >. >Is My assesment correct ? >. >Are ther any REDBOOKS, Tech Notes, Publications that describe how to >setup/configure/install Continous Delivery for a specifc product such as CICS >or MQ ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Jes message $HASP311
"End of memory" means that the address space terminated. JES2 refers to an address space as a "memory". It may or may not be due to a storage related problem. -- Tom Marchant On Wed, 13 Mar 2024 19:07:36 -0400, Joseph Reichman wrote: >Regarding the above message and I'll put down the entire text > >$HASP311 JOER$RE-QUEUED AT END OF MEMORY AND HELD > >Would any anyone know what causes it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Line comments in DFSORT
I was on bitsavers, so I looked.I thought I remembered that the old Sort/Merge program supported comments on the control cards. See pages 11 and 12. http://www.bitsavers.org/pdf/ibm/360/os/R01-08/C28-6543-2_Sort_Merge_Apr66.pdf I'm sure that DFSORT would have always accepted any valid Sort/Merge statements. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to reduce the overhead of WLM?
Would it help to have more of those address spaces in SYSSTC so that WLM doesn't try to manage them? -- Tom Marchant On Tue, 5 Mar 2024 01:03:27 +, Graham Harris wrote: >A few years back, I did a deep dive into tuning CPU usage across a >multitude of very small z/OS guests under z/VM, and WLM was certainly a big >hitter for many of them, but as there were so many instances, I was able to >see notable differences in WLM use between "LPARs", which was obviously "of >interest". >The upshot seemed to be that WLM costs had a fairly firm relationship with >the number of active address spaces on the "LPAR", presumably down to the >amount of sampling that WLM has to do against each address space every >250ms (I think). I did enquire of IBM as to whether the sampling rate >could be "adjusted", and that came back with a negative response (not >really a surprise). >So the obvious answer may be to only have address spaces started, when they >are only really needed to be there. >Although you may need to assess the cost of stopping/starting those address >spaces, versus the background WLM cost. > > >On Mon, 4 Mar 2024 at 23:08, Wendell Lovewell < >01e9c0ee0673-dmarc-requ...@listserv.ua.edu> wrote: > >> This is probably a strange question, but is there a way to reduce WLM cpu >> usage? Here's the situation: >> >> - The system is a lightly used development system. Unless something is in >> a loop (very rare), CPU % probably is usually less than 10%. And except >> for system regions & CICS, it's rare to have multiple jobs running >> concurrently. >> - Only one processor defined to the VM. No ZIIP either. >> - We are charged for CPU cycles. >> - WLM is the highest consumer of CPU. JES2, TCPIP, ZFS and SDSFAUX round >> out the top 5 consumers. >> >> There is a lot of information about WLM tuning, but as best I can tell >> almost none of it relates to reducing WLM usage. >> >> From reading the Init & Tuning manual, I'm trying these settings: >> AIMANAGEMENT=NO >> HIPERDISPATCH=NO >> CCCAWMT=45 >> RMPTTOM=15000 >> >> I was thinking that perhaps reducing whatever processing intervals I could >> might help. But I can't tell these changes made a difference. (I don't >> have a tool to measure WLM usage.) >> >> Any suggestions would be appreciated. >> >> TIA, >> >> Wendell >> >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN >> > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SDWAEC1
I very much doubt that he is changing code supplied on the CBT tape at his employer's direction or as part of his employment. -- Tom Marchant On Tue, 27 Feb 2024 14:49:30 -0600, Paul Gilmartin wrote: >On Tue, 27 Feb 2024 13:48:18 -0600, Jon Perryman wrote: >> >>Joseph, you missed Peter's point. Clearly you don't understand this is not >>about "seems like". By ignoring several clarification requests, you caused >>lots of confusing posts because you forced false speculation that would have >>been avoided by the clarifications. ... >> >I have never known Joseph to supply actual code samples when >invited, even urged, to do so. I can readily suspect that terms >of his employment preclude that for reasons such as work product >or confidentiality. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Has there always been STIMER TASK?
Bitsavers has IBM System/360 Operating System Control program Services, dated April, 1968. STIMER is in page 108. TASK and REAL are both there, as are exit and wait. Does that count as "always"? http://www.bitsavers.org/pdf/ibm/360/os/R01-08/C28-6541-1_Control_Program_Services_Apr66.pdf -- Tom Marchant On Fri, 26 Jan 2024 18:55:12 +, Schmitt, Michael wrote: >In IMS Transaction Manager you can define a PROCLIM for each transaction, with >a count and/or CPU-time-per-transaction, aka the "processing limit count >time". The manual says: > >This is the amount of time (for non-Fast-Path transactions, in seconds; for >Fast Path transactions, in hundredths of seconds) allowable to process a all >messages for a given transaction during a single schedule. The number >specifies the maximum CPU time allowed for each message to be processed in the >message processing region. The value is a number that can range from 1 to 65 >535. Specifying the maximum value means that no time limit is placed on the >application program. > >When a transaction exceeds the limit IMS abends it with a U0240: "a message >processing program exceeded the allowable execution time." > >I swear that it used to be that the calling chain of every U0240 ended in the >application calling IMS, e.g. a DLI call via CBLTDLI or equivalent. That >implied that the way it worked was: > > > * IMS saves the transaction's CPU time at the start of the transaction (or > perhaps when the application retrieved its input message). > * Whenever the application called IMS, IMS would compute the CPU time used > so far and compare it to the process limit. > >But now I see U0240's are the result of an interrupt, which can hit anywhere. >For example, if the application was in it's own code when the time runs out, >the interrupt fires and IMS then abends with the U0240. > >What I'm wondering is, why the change? > >I'm guessing the way it is working now is IMS is setting an STIMER TASK with >an exit, which measures a 'task-time interval', measured by the CPU timer only >while the task is in execution. > >Was that not always an option? > >__ >Michael Schmitt | DXC Apps Development | MassMutual -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Custom ISPF command
"Obviously, you still need to restart ISPF to enable the new commands." It isn't obvious to me. For another example of modifying the command table dynamically, see Gilbert Saint-Fluor's FASTPATH command on the CBT tape. I use it regularly. Issuing the FASTPATH command within ISPF adds some commands to the command table and they are immediately usable. -- Tom Marchant On Tue, 23 Jan 2024 14:03:30 +, Robert Prins wrote: >Here's the free-of-any errorchecking, I've only ever used it myself, small >exec to update command tables using the standard ISPF dialog. Obviously, >you still need to restart ISPF to enable the new commands. And of course >saving them, like I do, in my private EXEC library could be omitted. > >Enjoy > >/* REXX exec to update my command tables */ >/*** trace ?r * \| * >* (C) Copyright Robert AH Prins, 2009-2010 * > >* -- * >* | Date | By | Remarks | * >* |+--+--| * >* || | | * >* |+--+--| * >* | 2010-05-13 | RAHP | Use ISPTABL, not ISPPROF | * >* |+--+--| * >* | 2009-04-16 | RAHP | Now RAHP- and HERECMDS | * >* |+--+--| * >* | 2009-04-08 | RAHP | Initial version | * >* |+--+--| * > >* UCMDS is a REXX exec to update my site-independent (RAHPCMDS) and* >* site-specific (HERECMDS) tables. Because it is not possible to * >* update an open ISPF command table, this exec copies it to CMDS, * >* invokes ISPUCM (the command table update program) with a parameter * >* of and then copies the updated table back to USERCMDS. Note * >* that is necessary to restart ISPF to enable any new commands.* >* * >* Copies of the new command tables are saved to my exec library. * >* * >* Note:* >* * >* *"GETVAR" is my routine that retrieves site-dependent information,** >* *such as the names of my datasets allocated to ISPF etc.* * > >* Send questions, suggestions and/or bug reports to: * >* * >* rob...@prino.org / robert.ah.pr...@gmail.com * >* * >* Robert AH Prins * >* Ozkiniu gatve 48 * >* Vilnius 08405* >* Lithuania* > >* This program is free software: you can redistribute it and/or* >* modify it under the terms of the GNU General Public License as * >* published by the Free Software Foundation, either version 3 of * >* the License, or (at your option) any later version. * >* * >* This program is distributed in the hope that it will be useful, * >* but WITHOUT ANY WARRANTY; without even the implied warranty of * >* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * >* GNU General Public License for more details. * >* * >* You should have received a copy of the GNU General Public License* >* along with this program. If not, see <http://www.gnu.org/licenses/> * >***/ >parse source source >parse value source with . . moi . > >user. = -1 >user.1 = 'RAHP' >user.2 = 'HERE' > >"ispexec vget (ucmds) shared" > >if rc = 0
Descriptive subject was Re: Let Me Restate this Challenge
You might get more response with a subject that summarizes the issue. On Wed, 17 Jan 2024 15:54:55 -0600, Steve Beaver wrote: >Statement of the issue is the Customer wants to move to Pervasive Encryption > >I have some huge DB2 DB's that the customer wants to encrypt >(data at rest). > >Data-in-flight is being handed by CONNECT: Direct with Digital >Certs > >I have ICSF and EKMF on the LPARS on the CEC. > >With all those givens should I use ICSF or Digital Certs to encrypt the >databases > >With ICSF or Digital Certs? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMPE HOLDDATA - when received?
Look at your SMPLOG for the most recent RECEIVE HOLDDATA. Once you find it, look at that line in hex. The first few bytes is the date and time in packed decimal. -- Tom Marchant On Wed, 17 Jan 2024 17:47:33 +0100, Radoslaw Skorupka wrote: >How can I check the date of HOLDDATA in my SMPE CSI? > > >-- >Radoslaw Skorupka >Lodz, Poland > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: sdwagrsv not equal rbgrsave
You are doing a poor job of responding to questions and providing details. When a program running in TCB mode is interrupted, the registers are stored in the TCB and the PSW is stored in the RB. If a new RB is created, for example because of SVC 13, the registers from the TCB are copied into the new RB. Chaining back from the abending RB (via RBLINK) will not provide useful information about the abend. Did you look in the next RB? -- Tom Marchant On Tue, 16 Jan 2024 09:43:16 -0500, Joseph Reichman wrote: >I was running under TESTAUTH > >I produced an abend in a space switching pc stacking routine > >SDWAEC2 matched up with the linkage stack PSW > >SDWAEC1 matched up with RBOPSW of SDWARBAD sdwagrsv didn’t match the rb regs >Chaining back RBLINK equal TCB so I was at the end of the RBs > >> On Jan 16, 2024, at 9:39 AM, Seymour J Metz wrote: >> >> Was it SRB or TCB? Which RBs did you look at. >> >> Providing more details in your questions would enable better answers. If you >> have a situation where you're not allowed to post details, it's best to say >> so up front. >> >> -- >> Shmuel (Seymour J.) Metz >> http://mason.gmu.edu/~smetz3 >> עַם יִשְׂרָאֵל חַי >> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר >> >> >> From: IBM Mainframe Discussion List on behalf of >> Joseph Reichman >> Sent: Tuesday, January 16, 2024 9:33 AM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: Re: sdwagrsv not equal rbgrsave >> >> Seymour in my case sdawgrsv wasn’t in either TCB regs or rb regs >> >> Im sure Peter knows where they are located if they are in some internal IBM >> controls block ( in which case he can not or it would be useless to tell me) >> >> But I just don’t think that’s the case >> >>> On Jan 16, 2024, at 9:29 AM, Seymour J Metz wrote: >>> >>> Logic does not dictate where to store registers; there are at least two >>> equally logical locations. In a z/OS TCB environment, the RB holds the >>> caller's registers and the TCB holds the current registers with a few >>> exceptions. This is documented. >>> >>> For SRB mode I'm not sure how much is GUPI. >>> >>> -- >>> Shmuel (Seymour J.) Metz >>> http://mason.gmu.edu/~smetz3 >>> עַם יִשְׂרָאֵל חַי >>> נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר >>> >>> >>> From: IBM Mainframe Discussion List on behalf of >>> Joseph Reichman >>> Sent: Tuesday, January 16, 2024 8:34 AM >>> To: IBM-MAIN@LISTSERV.UA.EDU >>> Subject: Re: sdwagrsv not equal rbgrsave >>> >>> Peter >>> >>> Its my understanding that everything in the SDWA is copied from another >>> control block somewhere in the case of SDWAEC2 you helped me locate that in >>> the linkage stack. >>> >>> For SDWAEC1 I was able to locate that in the RBOPSW of SDWARBAD >>> >>> My logic tells me that PSW and REGS go together but when I tried to match >>> up SDWAGRSV to TBGRSAVE it didn’t. >>> >>> I think tried chaining back via RBLINK, but I got the TCB address meaning >>> it was the end of the chain. >>> >>> Grasping at straws I looked at TCBREGS, but it was there either. >>> >>> If the error regs SDWAGRSV are in some private IBM control block I can >>> understand that you cannot, or it would be useless to tell me. >>> >>> But my gut tells me it somewhere I can access it. >>> >>> >>> thanks >>> >>> -Original Message- >>> From: IBM Mainframe Discussion List On Behalf Of >>> Peter Relson >>> Sent: Tuesday, January 16, 2024 5:09 AM >>> To: IBM-MAIN@LISTSERV.UA.EDU >>> Subject: Re: sdwagrsv not equal rbgrsave >>> >>> Simple experimentation will show what you need to know about what is saved >>> where. >>> For example, suppose your mainline links to another routine.You mainline's >>> RB and the LINK target's RB can be examined. >>> Or suppose your mainline has an ESTAE and abends.You can examine the >>> mainline's RB, then the (next newer) RTM SVRB, then the (next newer) ESTAE >>> routine's PRB. >>> If you were trying to think about why it does what you will figure out that >>> it does, you'd realize that the regs that the SVC interrupt handler >>> processing wants to use have to be saved really quickly but the PSW is >>> already captured (in SVC Old PSW). >>> >>> Peter Relsonz/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Traversing The Linkage Stack
I'm pretty sure that nothing about the way MVS works with the Linkage Stack is a programming interface. How old is that presentation you are using? The Linkage Stack changed significantly with z/Architecture. The definitive documentation is the Principles of Operation. If you want to learn about the structure of the Linkage stack, issue several BAKR instructions and abend. Use IPCS to process the resulting SYSMDUMP. Look at the formatted linkage stack entries in the dump and compare that to storage. -- Tom Marchant On Wed, 10 Jan 2024 10:18:42 -0500, Joseph Reichman wrote: >Hi > >I am using a share PDF as a guide "Dul Address Space & Linkage Stack" as >guide to looking thru a WU Linkage Stack > >In the case of a TCB I believe the current is pointed to by STCBLSDP > >This is I understand it points to the header of which there four different >types each of X'128' bytes in Length > >Header looking the zone portion of the first byte 1001 or 9 >Trailer 1010 or A >Branch Entry C >PC entry D > >In the case of header in order to calculate the address of the next stack it >would be header - 4 > >When I get a X'89' the 8 being the stack suppression bit - 4, -16 , or >even -32 from the header is all zeros > > >Thank you > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IBM-MAIN access with Usenet / news (NNTP) reader
IIRC the list is sent to USENET using a one way link and it is not possible to send posts back to the link from USENET. This has been discussed before. Search the archives for more information. -- Tom Marchant On Fri, 5 Jan 2024 04:33:02 -0600, Niemand @ thuis.nl wrote: >Is access possible to the UA Listserv via an NNTP client, e.g., Thunderbird? >And if so, what is the URI of the server? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Why do I have IEE159E MESSAGE WAITING
Why do you keep sending questions to the list without providing adequate information? You have been asked specific questions that you have refused to answer. Do you enjoy wasting our time? -- Tom Marchant On Tue, 2 Jan 2024 11:36:34 -0500, Joseph Reichman wrote: >HI > >I have the following message on the console > >IEE612I CN=C908 DEVNUM=0908 SYS=S0W1 > > > > > >IEE163I MODE= RD IEE159E MESSAGE >WAITING > >Looking at my parmlib definition > >I have CON(N) and DEL(RD) > >Wondering why this happening > >CONSOLE > DEVNUM(908) > AUTH(MASTER) > CON(N) > DEL(RD) > MFORM(J,T) > MONITOR(JOBNAMES-T) > NAME(C908) > PFKTAB(PFKTAB1) > RNUM(19) > ROUTCODE(ALL) > RTME(1) > SEG(14) > > >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
Re: Question about IEAMSCHD
If I were you I wouldn't advertise to the world that I have an integrity exposure. -- Tom Marchant On Sat, 30 Dec 2023 17:25:03 -0600, Steve Beaver wrote: >I have the code to turn on the >JSCBAUTH however it is a SVC -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What is RSED and do I need it on the Mainframe
I'm curious. Why do you want to shut it down? Is it causing a problem? -- Tom Marchant On Tue, 19 Dec 2023 05:20:30 -0700, Lizette Koehler wrote: >Exactly what I am planning to do > >Hopefully no one will miss it > >Lizette > >-Original Message- >From: IBM Mainframe Discussion List On Behalf Of >Jousma, David >Sent: Thursday, December 14, 2023 12:57 PM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: Re: What is RSED and do I need it on the Mainframe > >If the STC proc looks similar to this, it’s a part of z/explorer and/or iDZ. >You could shut it down, and see who complains. There is usually a JMON task >that goes with it for JES interface. > >//RSED PROC IVP=, * 'IVP' to do an IVP >//PORT=, >//CNFG='/etc/zexpl', >//HOME='/usr/lpp/IBM/zexpl' >//* >//RSED EXEC PGM=BPXBATSL,REGION=0M,TIME=NOLIMIT, >// PARM='PGM /bin/rsed.sh -C -P' >//STDOUT DD SYSOUT=* >//STDERR DD SYSOUT=* > > > >Dave Jousma >Vice President | Director, Technology Engineering > > > > > >From: IBM Mainframe Discussion List on behalf of >Lizette Koehler >Date: Thursday, December 14, 2023 at 2:50 PM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: What is RSED and do I need it on the Mainframe What is the STC RSED? >Is it something I need or can I shut it down and remove the software? I have >very little documentation on this function and how it is used in a Mainframe >Thank you Lizette >-- > > > > > > >What is the STC RSED? Is it something I need or can I shut it down and > >remove the software? > > > > > > > >I have very little documentation on this function and how it is used in a > >Mainframe > > > > > > > > > >Thank you > > > > > > > >Lizette > > > > > >-- > >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 contains information that is confidential and may be >privileged. It is intended only for the addressee(s) named above. If you >receive this e-mail in error, please do not read, copy or disseminate it in >any manner. If you are not the intended recipient, any disclosure, copying, >distribution or use of the contents of this information is prohibited. Please >reply to the message immediately by informing the sender that the message was >misdirected. After replying, please erase it from your computer system. Your >assistance in correcting this error is appreciated. > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, send email to >lists...@listserv.ua.edu with the message: INFO IBM-MAIN > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's
I should have added that when I clone zones, I like to copy the SMPLOG as well, so that the full history is preserved. Don't forget to define the disposition for SMPLOG as MOD or the SMPLOG will be useless. -- Tom Marchant On Thu, 14 Dec 2023 12:31:15 -0600, Tom Marchant wrote: >Create a new ZONEINDEX in the Global zone for each new zone (target and DLIB), >and relate them to each other. > >If each zone is in its own CSI you can copy with IDCAMS REPRO. Otherwise use >ZONECOPY. > >You can use ZONEEDIT to change the DDDEFs in your new zone(s). Don't forget >that the target zone needs the DLIB data sets, must have their own SMPLTS, >SMPMTS, SMPSTS, SMPSCDS. These can also be defined to your DLIB zone. IIRC, >only the SCDS is required in the DLIB zone. > >Your target and DLIB zones will need DDDEFs for the SMPPTS > >Be careful that you have not left any DDDEFs pointing to the previous zone's >data sets. > >-- >Tom Marchant > >On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn >wrote: > >>I’m upgrading a product in my DB2v13 global zone. I plan to use my existing >>target & DLIB zones and just update my DDDEFs to point to my new dataset >>names. >>My question is - if I want to create new CSI’s (copied from my existing CSIs) >>for the target & DLIB what’s the best way to point the target & DLIB to those >>new CSI’s? My thought is using new CSI’s would allow me to keep the >>previous FMID around if I needed it for any reason. >> >>Thanks, >>Ross Vaughn >>OneMain Financial >> >> >> >> >> >> >> >> >> >> >> >> >>-- >>For IBM-MAIN subscribe / signoff / archive access instructions, >>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMP/E - Pointing Existing TARG & DLIB Zones To New CSI's
Create a new ZONEINDEX in the Global zone for each new zone (target and DLIB), and relate them to each other. If each zone is in its own CSI you can copy with IDCAMS REPRO. Otherwise use ZONECOPY. You can use ZONEEDIT to change the DDDEFs in your new zone(s). Don't forget that the target zone needs the DLIB data sets, must have their own SMPLTS, SMPMTS, SMPSTS, SMPSCDS. These can also be defined to your DLIB zone. IIRC, only the SCDS is required in the DLIB zone. Your target and DLIB zones will need DDDEFs for the SMPPTS Be careful that you have not left any DDDEFs pointing to the previous zone's data sets. -- Tom Marchant On Thu, 14 Dec 2023 11:27:16 -0600, Ross Vaughn wrote: >I’m upgrading a product in my DB2v13 global zone. I plan to use my existing >target & DLIB zones and just update my DDDEFs to point to my new dataset >names. >My question is - if I want to create new CSI’s (copied from my existing CSIs) >for the target & DLIB what’s the best way to point the target & DLIB to those >new CSI’s? My thought is using new CSI’s would allow me to keep the previous >FMID around if I needed it for any reason. > >Thanks, >Ross Vaughn >OneMain Financial > > > > > > > > > > > > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMP/E question of the day
Does this help, from the SMP/E User's Guide: The superzap control statements are the same as you would use if you were calling the superzap utility. The only exception is that on the NAME statement, you should specify only the CSECT name within the distribution library module, rather than the load module name and the CSECT name. When SMP/E installs the SYSMOD, it determines all the load modules into which this distribution module was link-edited and then calls the superzap utility for each of these load modules, modifying the NAME statement as appropriate. -- Tom Marchant On Thu, 14 Dec 2023 11:54:28 -0500, Phil Smith III wrote: >From a coworker, who tried to post but it seems to have vanished-not even a >bounce?! If it just got stuck somewhere, this might be a duplicate, sorry. > > > > > >I am having problems trying to convert a normal ZOS AMASPZAP to a SMPE ++ZAP. > > > >When I run the zap through a standalone AMASPZAP process everything works fine: > > > >IGWSPZAP INSPECTS, MODIFIES, AND DUMPS CSECTS OR SPECIFIC DATA RECORDS ON >DIRECT ACCESS STORAGE. > >AMA168I SYSIN PROCESSING STARTED > >NAME ABCDITSK ABCPROC#C C_CODE > >VER 067A EC0A008C,A077 > >VER 0680 5800926C > >VER 0684 A7011000 > >VER 0792 58F0301E > >VER 0796 E54CD0E0, > >VER 07AA E300D13B,0094 > >VER 07B0 EC060018,007E > >REP 067A EC0A0102,A077 > >AMA122I OLD DATA WAS EC0A008CA077 > >CHECKSUM C08C1494 > >AMA132I CHECKSUM WAS CORRECT, IS NOW 0. > >AMA163I PREVIOUS GROUP ENDED, ASSOCIATED MESSAGES FOLLOW: > >AMA125I IDR COUNT = 1 FOR SECTION = ABCPROC#C > >AMA164I END OF MESSAGES FOR PREVIOUS GROUP > >AMA168I SYSIN PROCESSING COMPLETED > >AMA100I IGWSPZAP PROCESSING COMPLETED > > > >However when I try to apply: > > > >++VER(Z038) FMID(VABC840) . > >++ZAP(ABCDITSK) . > >NAME ABCDITSK ABCPROC#C C_CODE > >VER 067A EC0A008C,A077 > >VER 0680 5800926C > >VER 0684 A7011000 > >VER 0792 58F0301E > >VER 0796 E54CD0E0, > >VER 07AA E300D13B,0094 > >VER 07B0 EC060018,007E > >REP 067A EC0A0102,A077 > > > >SMPE has issues > > > > SET BOUNDARY(TARGET) . > >GIM20501ISET PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 00. > > > > > > APPLY S(ABC8401) . > > > >--NAME ABCDITSK ABCPROC#C C_CODE > >GIM23101E ** THERE IS A SYNTAX ERROR IN A ZAP CONTROL STATEMENT FOR MODULE > > ABCDITSK IN SYSMOD ABC8401. > >GIM30216IAPPLY PROCESSING FAILED FOR SYSMOD ABC8401. SYSTEM UTILITY > > PROCESSING FAILED FOR AN ELEMENT IN ABC8401. > >GIM20501IAPPLY PROCESSING IS COMPLETE. THE HIGHEST RETURN CODE WAS 08. > > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Abend producing SDWARBAD
I looked briefly at it. One of the files described it as the sample recovery routine from a SHARE presentation. It is pretty small, most of it formatting and issuing WTO messages containing the kinds of things that IEA995I provides. I didn't see any recovery code, but I didn't look closely. -- Tom Marchant On Tue, 28 Nov 2023 13:36:48 +, Peter Relson wrote: >"Asked to update" does not shed much light. I wouldn't bet that I'm allowed to >look at the CBT tape files (the word bandied about is "contamination"), so I >don't know what file 192 has. "Asked to update" in what way? > >A "general recovery routine" is highly unlikely to be overly useful. That is >because recovery generally is not "general", rather it is unique to the code >it is intending to cover. But I don't know what the author intended to mean by >"general recovery routine". > >We have what we call "minimum RAS guidelines" that refer in part to data to >make sure is placed into the SDWA in case it is recorded. >That's something that is indeed "general". > >What exactly are you trying to accomplish? What actually is a "general >recovery routine"? I hope it's not a recovery routine that is supposed to be >able to work whether the recovery was established via SETFRR, ESTAE, ESTAEX, >ARR-definition, IEAARR, ESTAI-definition? That can be quite a challenge (it's >not obvious it's fully possible to accomplish without input via the parameter; >I have not tried). > >So I will ask again: what are you trying to accomplish? More specifically, >what are you trying to do with SDWARBAD? > >Why is it important if the abend code (completion code) is in the RB? The >completion code is in the SDWA (as long as there is an SDWA, and if there >isn't an SDWA you don't have SDWARBAD anyway). If it was indeed an "abend" >issued by a task then the register 1 slot of some RB will have the abend code >because Abend itself is a type 2 SVC. Abend's can be issued by CALLRTM >TYPE=ABTERM as well, for example. > >If you'd like opinions on what you're doing (especially since this is for >general consumption), then please ask questions that will get you the answers >you need. > >Peter Relson >z/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Page Datasets in User Catalog
The Initialization and Tuning Reference seems to say otherwise. https://www.ibm.com/docs/en/zos/3.1.0?topic=ieasysxx-page "Usually, page data sets specified by any means must have been allocated, cataloged in the system's master catalog, and preformatted in VSAM format before an IPL can start." "It is unnecessary to specify either UNIT or VOLSER because all page data sets must be cataloged in the system's master catalog." It might be possible to use PAGEADD to add a page data set that is cataloged in a user catalog, but I wouldn't be surprised if that leads to problems at the next IPL Surely, at CLPA time the Catalog address space is not yet available. -- Tom Marchant On Wed, 22 Nov 2023 17:32:26 +, Mark Jacobs wrote: >Our storage administrator had told me that in a previous organization they >successfully used page datasets that were cataloged in a user catalog rather >that in the master catalog by using an MLA in the MCAT. I tried it in our >sandbox environment (2.5) and it didn't work. I had never heard of doing this >before and I had my doubts, but wanted to try it anyway. Has anyone else tried >it and gotten it to work? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: External Functions in C on z/OS
An XL C/C++ may or may not have a DSA address in R13. If it is XPLINK, it will not. 64-bit C/C++ programs always use XPLINK-64 linkage. In fact, 64-bit LE programs only use XPLINK-64 linkage. -- Tom Marchant On Wed, 15 Nov 2023 17:54:44 +, Farley, Peter wrote: >Isn’t there is some C library function (maybe unique to XLC/C++) that lets you >get the value of R13 (current DSA pointer)? With that pointer value in hand, >couldn’t one chain up the DSA stack to get to the saved registers at entry, or >is that not possible? > >At worst, an inline ASM routine to copy the value of the current R13 to a C >pointer variable, then chain up the DSA stack? > >Peter > >From: IBM Mainframe Discussion List On Behalf Of >Charles Mills >Sent: Wednesday, November 15, 2023 12:39 PM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: Re: External Functions in C on z/OS > > >I see, in my C++ projects, EFPL, ENVB, EVALB and SHVB structs that appear to >me to have been produced from IBM macros by the EDCDSECT tool. > > > >Have you looked for the IRX macros in SYS1.MACLIB? > > > >Are you familiar with EDCDSECT? > > > >Slightly changing the subject, to interface with ehe Rexx environment from a >called function you will need the entry R0, I found no great way to get that. >I had to write a tiny front end in assembler that passes R0 to a C/C++ main(). > > > >Charles > > > >On Wed, 15 Nov 20 3 10:57:14 -0600, Eric Erickson >wrote: > > > >>I've written quite a few callable external funitions for Rexx over the years. >>On z/OS I've always used assembler as we needed to access system services for >>a variety of tasks. I've written them in C for other platforms (OS/2 & >>Windows) over the years. I need to write some on z/OS, but I want to use C, >>but can not seem to find any examples or header files for the Rexx Control >>Blocks. I can't believe nobody has done this over the years? Is it even >>supported? > > > >-- > >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
Re: JES2 NOTIFY EMAIL=
JES2 Initialization and Tuning Guide https://www.ibm.com/docs/en/zos/2.5.0?topic=guide-jes2-email-delivery-services-eds Why is it so difficult to find the manual? -- Tom Marchant On Wed, 1 Nov 2023 13:22:51 -0700, Donald Russell wrote: >New in zOS 2.3 is the NOTIFY statement. >//label NOTIFY EMAIL= > >I code that in my job but never get an email. > >I assume something has to be configured to tell JES where the email server >is, but our sysprog has “scoured the manuals and can’t find anything”. > >Any clues? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Programatically setting JCL symbols
JCL symbols exist only within a job. A symbol set in one job cannot be checked in another job. Sorry if this isn't "*constructive*". -- Tom Marchant On Thu, 19 Oct 2023 09:17:34 -0500, Charles Hardee wrote: >My apologies, I didn't mean to stir up the hornet's nest of opinions on the >viability of my question. > >I will "grossly" explain what I want to do. >I am not interested in other methods, I have other methods, but I am >interested in this method the most, if it can be done. > >Program A executes and sets a global symbol to a certain value and >terminates. >Many other jobs execute and, in each one, as needed, the programs check to >see if the global symbol is set and, if it is, to what value. >They then make logic path decisions within the program based on the value >of the global symbol. >Finally, Program B runs, or maybe it's just Program A again, and the global >symbol is deleted. > >So, my question is, still, is it possible to define SET symbols from within >a program? > >Thanks, again, in advance for any *constructive* assistance. >Chuck -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Access to PDS(E) ISPF statistics outside of TSO/ISPF
ISPF statistics are kept in the directory. You can read the directory entry with BLDL. Or read the directory directly and look for the entry. Directory blocks are 256 bytes. Mapping macro is IHAPDS. -- Tom Marchant On Tue, 10 Oct 2023 12:53:26 -0400, Matt Hogstrom wrote: >I’m looking for a way to access ISPF statistics from Java or C outside of a >TSO / ISPF environment. Does such an animal exist out there ? > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z/OS 3.1 documentation
I downloaded it to /downloads/zos 3.1 docs, then extracted it into the same folder. You can put it wherever it makes sense to you. Having downloaded it, open zOS310-GA-Indexed-PDF-package-(2023-09-29).pdx with Adobe reader. It is the only .pdx file in the collection. -- Tom Marchant On Fri, 29 Sep 2023 10:42:23 -0500, Lionel B. Dyck wrote: >You found the problem with the download collection. > >See this IBM Idea (and please vote if you agree) >https://ibm-z-hardware-and-operating-systems.ideas.ibm.com/ideas/ZOS-I-3848 > >In summary I'm requesting that IBM add a READ_ME_FIRST_ZOS_V3R1_TOC.HTM as >they had in previous z/OS download collections. > >It would also be VERY NICE if they made it more obvious how/where to >download the full collection. > > >Lionel B. Dyck <>< >Website: https://www.lbdsoftware.com >Github: https://github.com/lbdyck > >�Worry more about your character than your reputation. Character is what you >are, reputation merely what others think you are.��� - - - John Wooden > >-Original Message- >From: IBM Mainframe Discussion List On Behalf Of >Lennie Dymoke-Bradshaw >Sent: Friday, September 29, 2023 10:28 AM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: z/OS 3.1 documentation > >Having seen the announcement of z/OS 3.1 today I have tried to obtain the >usual PDF collection of documentation. > >I found it can be downloaded in zip form here, by selecting "IBM z/OS >Indexed PDF/PDX Collection". This has given me the set of pdf files. > >https://www.ibm.com/docs/en/zos/3.1.0 > >However, there seems to be no way of selecting individual manuals by title, >as there was at previous z/OS levels. > >Have I downloaded the wrong package? Or is this no longer to be available? > >Lennie Dymoke-Bradshaw > > > > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, send email >to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Why it's important to take Seymour's advice
No. z/Architecture, as well as System/360, 370 and 390 have consistently numbered bits from left to right. You would do well to read, very carefully, https://d.cxcore.net/Eric%20S%20Raymond/How%20To%20Ask%20Questions%20The%20Smart%20Way.pdf -- Tom Marchant On Wed, 20 Sep 2023 07:57:05 -0400, Joseph Reichman wrote: >Bit 0 would be if I did this O R5,=X’0001’ > >> On Sep 19, 2023, at 9:33 PM, Seymour J Metz wrote: >> >> That's bit 0. >> >> >> From: IBM Mainframe Discussion List on behalf of >> Joseph Reichman >> Sent: Tuesday, September 19, 2023 9:20 PM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: Re: Why it's important to take Seymour's advice >> >> I have a O R5,=X’8000’ >> To set bit 31 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: I have an Idea for ISPF...
It is done with the TSO ISPCCONF command from within ISPF. Option 7 will convert the configuration table that is currently loaded to source that you can edit. After making your changes, option 4 will build the table load module. The table load module is placed in a data set in your ISPLLIB concatenation -- Tom Marchant On Mon, 18 Sep 2023 13:38:38 -0700, M. Ray Mullins wrote: >I have done this, too. Since I’m on vacation, I couldn’t remember all the >steps to do this, so I didn’t want to mention it. > >Sent from my iPad > >> On Sep 18, 2023, at 13:22, Tom Marchant >> <000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote: >> >> I have been unable to convince my site to increase the maximum number of >> split screens, so I created my own ISPCFIGU that allows 32 and placed it in >> ISPLLIB. I've shown a few other people how to do it. I often use more than >> 8, and sometimes more than 16. >> >> -- >> Tom Marchant >> >>> On Mon, 18 Sep 2023 13:11:23 -0700, M. Ray Mullins >>> wrote: >>> >>> Just a correction: the default number of screens in ISPF is 8, but you can >>> configure up to 32. My site uses 16. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: I have an Idea for ISPF...
I have been unable to convince my site to increase the maximum number of split screens, so I created my own ISPCFIGU that allows 32 and placed it in ISPLLIB. I've shown a few other people how to do it. I often use more than 8, and sometimes more than 16. -- Tom Marchant On Mon, 18 Sep 2023 13:11:23 -0700, M. Ray Mullins wrote: >Just a correction: the default number of screens in ISPF is 8, but you can >configure up to 32. My site uses 16. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Bill Johnson
Thank you Darren. Bill was primarily disruptive and contributed very little to the list. It would be a shame if his disruptive tactics resulted in the list being shut down. -- Tom Marchant On Mon, 18 Sep 2023 19:24:23 +, Darren Evans-Young wrote: >I have removed Bill Johnson from the IBM-MAIN list and you all know why. > >He has now officially lodged a complaint against me accusing me of >discrimination >and violating his 1st Amendment rights. This complaint was sent to the >President and >the Chief Administrative Officer at The University of Alabama. > >Worst case, I'll have to dissolve IBM-MAIN. If you are at a university that >hosts >listserv lists, and would be able to host IBM-MAIN in the event I'm told to >take >the list down, please contact me off-list >(dar...@ua.edu<mailto:dar...@ua.edu>). > >Darren > >P.S. - Please do not contact Bill Johnson. It will only make things worse. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EXTENDEDALIAS support
As of z/OS 1.13 you can issue: F CATALOG,ENABLE(EXTENDEDALIAS) "when all systems in the sysplex are z/OS V1R13 or greater." -- Tom Marchant On Fri, 15 Sep 2023 07:38:33 -0700, Tom Sims wrote: >Can EXTENDEDALIAS support be enabled "on the fly," with no other changes >in an existing BCS (V2R2+)? > >What, if any, are the pitfalls, roadblocks, pre-reqs? > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Building AMODE 31 Assembler DLL
I see that no one has offered any help with this yet. Perhaps if you were to tell us where you looked for information it would help someone who knows more than I do to point you in the right direction. I see that there is a chapter on building and using DLLs in the LE programming guide. I suspect that there are some SHARE presentations too. -- Tom Marchant On Thu, 14 Sep 2023 14:03:05 -0500, Eric Erickson wrote: >I've found a bunch of information on creating AMODE 64 Assembler DLLs, but >having much luck in finding any information about creating AMODE31 Assembler >DLLs. > >I've got a bunch of LE enabled assembler helper routines that I call from C, I >want to package these all as a DLL so that I can share the code between load >modules and not have to statically link them. But as I've stated, not having >much luck in finding information on doing this for AMODE 31. In fact my >biggest question that I can not seem to find the info about in the manual, is >if I have an assembler routine, how do I specify that I want the entry point >exported when I do the bind. Without the export I don't get the side-deck >created with the import statements. > > >Ultimately I would like to take these routines and package them with my AMODE >31 C DLL routines as a mixed C/Assembler DLL for sharing between my load >modules. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Free SMPE product to just practice
I don't know of any. Maybe someone else does. You could use any product that your installation runs and install it into your own data sets. That will get you practice applying, accepting, restoring, rejecting, etc. And if you get stuck, you can blow it all away and start over. Or you could build your own product. You don't need much. Just a load module, maybe a source to generate it. The result doesn't even have to do anything. But if you create a function sysmod (FMID) and apply it, you will learn a lot more. On Thu, 14 Sep 2023 23:36:22 +0400, Jake Anderson wrote: >Is there any freeware product which can be installed using SMP/e. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Commands from systsin
Why does it have to be in your private storage? What is wrong with CSVDYLPA? -- Tom Marchant On Thu, 14 Sep 2023 08:03:25 -0400, Joseph Reichman wrote: >I would like to debug my subsystem function under TESTAUTH towards that end >I need it in private storage for the duration of my time logged on to TSO >in between sessions of TESTAUTH I’m schedirb to load the routine and have >the TCB ptr point to IKJEFT01 aka TCBJSTCB > >On Thu, Sep 14, 2023 at 7:27 AM Peter Relson wrote: > >> Please stay away from LOAD GLOBAL=YES. In almost all circumstances where >> the loading address space can terminate, this can lead to a system >> integrity exposure. Specifically, you would have to be able to ensure with >> 100% certainty that no program in any other address space is executing >> within "your module" at the point that "your address space" terminates >> since at that point the storage would be freed. >> >> That is why CSVDYLPA is a better choice usually. And that has additional >> diagnostic advantages. >> Or, less good but better than LOAD GLOBAL=YES, LOAD with ADDR= where the >> storage you obtained is in common storage. >> >> In neither of the latter choices would the system ever free the storage >> automatically. >> >> Peter Relson >> z/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Commands from systsin
>only TESTAUTH let’s you debug code with PSW bit 15 being 0 Obviously you haven't tried z/XDC. >All I want is to debug a program that was preloaded under a different TCB Have you considered using CSVDYLPA to load in into dynamic LPA? Probably overkill for your purposes, but you can do it so that it will stay after task termination. -- Tom Marchant On Wed, 13 Sep 2023 15:10:19 -0400, Joseph Reichman wrote: >First off tried it only TESTAUTH let’s you debug code with PSW bit 15 being 0 > >Not really sure what not being a good idea that is usually reserved for moving >using non standard code into production as other problems will pop up > >All I want is to debug a program that was preloaded under a different TCB >after I get the kinks out I’ll have LOADTOGLOBAL=YES > >> On Sep 13, 2023, at 3:04 PM, Farley, Peter >> <031df298a9da-dmarc-requ...@listserv.ua.edu> wrote: >> >> I agree with other posters that your suggested solution is not a good idea. >> >> If you have the HLASM Toolkit product licensed on your system you can use >> the ASMIDF debugger to remotely debug batch jobs from a VTAM session, but >> using ASMIDF requires that pre-established VTAM APPL’s and LU’s are defined >> by your VTAM/network team. >> >> I have used it to debug assembler code and it is a pretty reasonable >> debugging tool (not as good as z/XDC, but reasonable nonetheless, and IMHO >> better than TSO TEST) IFF you can get your network team to set up the VTAM >> APPL’s and LU’s for you. It’s all documented in the install/reference >> manual for the HLASM Toolkit. >> >> IIRC, ASMIDF even has the ability to debug authorized code, but check the >> manual to be sure. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mysterious S0C4 pic 10
SLIP trap will just give you another dump. You do have a dump DD statement, don't you? If you have a SYSMDUMP DD the resulting dump will be very similar to an SVC dump. -- Tom Marchant On Mon, 11 Sep 2023 11:09:08 -0400, Joseph Reichman wrote: >Is there some thing like setting a slip trap that might help me -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Can I search the Archives
Apparently you can't. Here we go again with insufficient information. You didn't tell us: How you are trying to search. web or email What web/email address the precise error message. -- Tom Marchant On Thu, 7 Sep 2023 09:29:55 -0400, Joseph Reichman wrote: >I tried to search archives i registered my password > >Had it activated > >After all that told me I wasn’t authorized > >Can I do search the archives ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Simple request from chatGPT to write assembler program.
Nor does it know how to code instructions. I don't know what this should be, but it isn't adequateor correct: >MAIN C 0NUM1 Check if NUM1 is zero ZERO is not a label on code: > BE ZEROBranch to ZERO if true NUM1 is not a DCB address > GETNUM1,NUMIN Read NUM1 from input Wrong: > LA 0,NUM1 Load NUM1 into register NUM2 is not a DCB address: > GETNUM2,NUMIN Read NUM2 from input NUM1 is not a register number: > A NUM1,NUM2 Add NUM1 and NUM2 > ST NUM1,RESULT Store the result in RESULT RESULT is not a DCB address: > PUTRESULT,NUMOUT Print the result -- Tom Marchant On Tue, 5 Sep 2023 14:10:20 -0400, David Spiegel wrote: >Hi Tom, >It looks like ChatGPT is not aware of "Housekeeping". > >Regards, >David > >On 2023-09-05 13:47, Tom Brennan wrote: >> GET and PUT use R14, so as Tom Marchant said, if the program managed >> to get that far it would never return to the OS. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Simple request from chatGPT to write assembler program.
No. You are too lazy to verify that what you copied/pasted matched the source and you want others to make your argument for you? Not me. I've got work to do. -- Tom Marchant On Tue, 5 Sep 2023 16:04:05 +, Bill Johnson wrote: >Lol, how about going to chatgpt and asking the same question. So that cut and >paste isn’t a factor. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Simple request from chatGPT to write assembler program.
I see 8 errors. There might be more. If you were to correct the missing comma that David pointed out, it would abend. Probably with a S0C1 on the GET. But if those errors were to be corrected and it made it to the BR 14, it would loop. This is what it does when it decides on the specifications for the program. That is the most generous test possible. -- Tom Marchant On Tue, 5 Sep 2023 11:43:07 -0400, Steve Thompson wrote: >I doubt it will assemble. And even if it does, the results are >unpredictable, other than it will probably ABEND for one reason >or another. > >There are no DCB, OPEN, CLOSE macros while GET and PUT are being >used. > >Me thinks this AI system is confusing a few different assembly >languages together. I wonder how close they came for DOS I/O. >Steve Thompson > > > >On 9/5/2023 11:20 AM, Tom Marchant wrote: >> You're right, Tom. That is not a program. Certainly not one that will do >> what it claims to do. >> >> -- Tom Marchant On Mon, 4 Sep 2023 10:42:51 -0700, Tom Brennan >> wrote: >>> I can't be sure I formatted it properly, but after looking over the >>> code, I have nothing to say but WTF? >>> >>> PRINT NOGEN >>> TITLE 'Simple Addition Program' >>> ** Define storage for input numbers and result >>> * >>> NUM1 DSF First input number >>> NUM2 DSF Second input number >>> RESULT DSF Result of addition >>> ** Main program >>> * >>> MAIN C 0NUM1 Check if NUM1 is zero >>> BE ZEROBranch to ZERO if true >>> ** Read the first number from input >>> * >>> GETNUM1,NUMIN Read NUM1 from input >>> LA 0,NUM1 Load NUM1 into register >>> ** Read the second number from input >>> * >>> GETNUM2,NUMIN Read NUM2 from input >>> A NUM1,NUM2 Add NUM1 and NUM2 >>> ST NUM1,RESULT Store the result in RESULT >>> ** Print the result >>> * >>> PUTRESULT,NUMOUT Print the result >>> ** Terminate the program >>> * >>> SR 15,15 Set return code to 0 >>> BR 14 Return to caller >>> ** Define input and output areas >>> * >>> NUMINDCF'0' Input buffer for numbers >>> NUMOUT DCF'0' Output buffer for result >>> ZERO DCF'0' Constant zero >>> END MAINEnd of program -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Simple request from chatGPT to write assembler program.
You're right, Tom. That is not a program. Certainly not one that will do what it claims to do. -- Tom Marchant On Mon, 4 Sep 2023 10:42:51 -0700, Tom Brennan wrote: >I can't be sure I formatted it properly, but after looking over the >code, I have nothing to say but WTF? :) > > PRINT NOGEN > TITLE 'Simple Addition Program' >** Define storage for input numbers and result >* >NUM1 DSF First input number >NUM2 DSF Second input number >RESULT DSF Result of addition >** Main program >* >MAIN C 0NUM1 Check if NUM1 is zero > BE ZEROBranch to ZERO if true >** Read the first number from input >* > GETNUM1,NUMIN Read NUM1 from input > LA 0,NUM1 Load NUM1 into register >** Read the second number from input >* > GETNUM2,NUMIN Read NUM2 from input > A NUM1,NUM2 Add NUM1 and NUM2 > ST NUM1,RESULT Store the result in RESULT >** Print the result >* > PUTRESULT,NUMOUT Print the result >** Terminate the program >* > SR 15,15 Set return code to 0 > BR 14 Return to caller >** Define input and output areas >* >NUMINDCF'0' Input buffer for numbers >NUMOUT DCF'0' Output buffer for result >ZERO DCF'0' Constant zero > END MAINEnd of program -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: With regrets, after many years I will no longer be following IBM-MAIN
PKB 72 of the 1223 posts in August were from you. That's 5.88% of all the posts, or about 1 in 17. Clearly, you are one of the "20-30 who dominate this platform with drivel." -- Tom Marchant On Thu, 31 Aug 2023 19:38:17 +, Bill Johnson wrote: >Everyone needs to add their 2 cents to the thread they were complaining about. >This is why there are few younger mainframers here. The same 20-30 who >dominate this platform with drivel. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is the IBM Assembler List still alive
The web interface is at https://listserv.uga.edu/scripts/wa-UGA.exe?A0=ASSEMBLER%2dLIST If you haven't received anything for several months, it might have been directed to spam by your mail client. -- Tom Marchant On Fri, 1 Sep 2023 14:33:51 +, Bill Hitefield wrote: >I received something from it within the last few weeks. > >==> "IBM Mainframe Assembler List" wrote on >08/19/2023 11:34:03 AM: > >Looks like the "G" may be missing in the link you have. > >Bill Hitefield > >> -Original Message- >> From: IBM Mainframe Discussion List On >> Behalf Of Robert Raicer >> Sent: Friday, September 01, 2023 10:29 AM >> To: IBM-MAIN@LISTSERV.UA.EDU >> Subject: Is the IBM Assembler List still alive >> >> Hi folks; >> >> It's been several months since I've received anything from the IBM Assembler >> List Server. The last I knew, the list server e-mail address was: ASSEMBLER- >> l...@listserv.uga.edu >> >> Is this still correct? >> Are any of you still getting e-mails from that list server? >> >> Thanks for the help! >> >> Bob Raicer -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Please stay on-topic and professional
There have been many posts on IBM-Main lately that are not related to IBM mainframes. Please don't post off-topic subject matter here. There are plenty of other places. There have also been many insults. If you are about to post something that includes words like fool, absurd, or idiot, please reconsider. And remember, when someone else posts something like this, it is never helpful to feed the troll. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXTERNAL] Re: z13s going EOS anytime soon?
On Tue, 29 Aug 2023 07:53:50 -0700, Ed Jaffe wrote: >On 8/29/2023 5:46 AM, Pommier, Rex wrote: >> What I found somewhat disheartening was that IBM is dropping support for >> both the z13 and z13s at the same time despite the fact the z13s was made >> available a year later than its big brother. > >That has always, Always, ALWAYS been true. When a hardware generation is >dropped, it is dropped. Jim Elliott's blog disagrees. https://jlelliotton.blogspot.com/p/cmos-processor-table.html and, for example, z9 EC https://www.ibm.com/docs/en/announcements/system-z9-enterprise-class z9 BB https://www.ibm.com/docs/en/announcements/system-z9-business-class -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Creating an SMP install tape
I assume you mean SMP/E. GIMZIP can be used to create a file that can be processed with SMP/E RECEIVEFROMNTS. The file is created in the Unix filesystem and can be transferred to another system using your favorite mechanism. Of course, you will also have to code a SYSMOD with all the necessary Modification Control Statements to describe what needs to be done to install it. This is part of the input to GIMZIP. -- Tom Marchant On Tue, 22 Aug 2023 21:11:18 +1000, Clem Clarke wrote: >I have some PDSes that need to be installed with SMP on Z/OS. > >A couple are text files, one an object file and one a load module PDS. >They all have multiple members. > >What would be the easiest way to create a files that can be installed >with SMP? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: BLDL User Data
IIRC there is only entry point in a directory entry for a load library. Other entry points would be in alias directory entries if there are any. -- Tom Marchant On Fri, 18 Aug 2023 17:28:32 -0400, Joseph Reichman wrote: >Just looking the user data I got from a BLDL specifically the entry name I >have multiple (4) entry points the BLDL returned the entry /offset in the >last entry for PDS2EPA using IHAPDS to map the returned data > >Was wondering if there was a way to get the other entry points -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
z/OS 3.1
I noticed this in the z/OS 3.1 announcement: ISPF PDSE V2 member generations ISPF support for PDSE V2 member generations are enhanced to allow the specification of generation numbers in the Edit and View panels and on the Edit and Browse primary commands BROWSE, EDIT, and VIEW. Additionally, a generation list can be viewed for members with generations, allowing the use of line commands to access commonly-used functions for desired generations. Select ISPF services are also enhanced with additional member generations information. "We've been waiting for this for hundreds of years." -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Has anyone
Same here. I use Libre office. I prefer it over Microsoft office. -- Tom Marchant On Tue, 15 Aug 2023 15:49:13 +, Seymour J Metz wrote: >I find OpenOffice and LibreOffice perfectly adequate. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
You can do all of those things with the workplace. It has been available since ISPF 4.2 in 1995. If you don't have it on your primary option panel, you can access it with ISPFWORK from any panel. I have been using it for the last 25 years and haven't had the need to use 3.4 since then. The biggest difference between 11 and 3.4 is that, unless you have "Prefix Dsname Level" checked on 3.4, you don't need quotes around the DSNAME Level. With the Workplace, AFAIK, it always acts the way 3.4 does if you have "Prefix Dsname Level" selected. Also, the workplace always gives you enhanced member lists. The major thing that the workplace gives me is the ability to create arbitrary lists of DSNAME masks and have them all included. For example, if you create a list that includes 'foo.**.bar' 'bar.**' and issue DL against that list, you will get a data set list that includes all foo.**.bar data sets and all data sets beginning with bar. Having done that, I can issue SRCHFOR against them all, as just one example The list that I use the most has something like this: 'app1.release1.source 'app1.release1.maclib 'app1.release1.listing 'app1.release1.load 'app2.release2.source 'app2.release2.maclib 'app2.release2.listing 'app2.release2.load etc. for the products that I typically work with. The actual HLQ is not app1, etc, but something more descriptive of the product, so I couldn't use app*. You wouldn't have to reinvent anything, just learn something that is new to you In case you wondered, it has nothing to do with the ISPF Workstation Agent. I used to use that for z/OS <-> PC file transfer, but the WSA has been removed. It wasn't fast, but it was easy to use, at least for me. -- Tom Marchant On Fri, 4 Aug 2023 15:05:23 -0400, Bob Bridges wrote: >Hm, not use 3.4? I still have to go there pretty often, for tasks such as > >- When cleaning up DATASET-class permissions in the security system, I need to >know what datasets actually exist >- When deleting old user IDs, I want to pass any important datasets belonging >to the dearly departed to his old boss >- When I'm hunting for production job that might do a task I'm interested in >(although I guess I would mostly use 3.14 for that) >- While investigating a parmfile or procfile or other system dataset for the >first time > >Dunno that I could live without 3.4. Well, I ~could~, but I'd basically have >to reïnvent it is all. > >Option 11; not sure that's in the menu my current client provided to me. >Obviously I haven't been using it. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
I use data set lists in the ISPF workplace (option 11) for similar reasons. I have rarely used 3.4 for decades. -- Tom Marchant On Fri, 4 Aug 2023 13:14:54 -0400, Bob Bridges wrote: >No, sorry, what I really mean is that instead of going to ISPF option 2 and >typing in a DSN, I generally type "tso ed " on the ISPF command line. >Same for VW and BR, and a few other REXX execs. > >The ED, BR and VW commands run the DSN I give it through RENDSN, a routine >that checks the string against a list I maintain. So if I say "tso ed jg", >it'll look up JG and return the name of whatever PDS I'm using at the current >installation for general JCL. The RENDSN list has a few dozen DSNs in it that >I use often enough to bother recording them; that way I don't have to remember >the name of the production CFILE, or where the SuperSession parms are stored, >or whether at this client the common REXX library for the security team is >this or that. So most of my most commonly used "DSNs" are really two- or >three-char shortcuts. Saves me some thinking and a lot of typing. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
ITYM ISPF commands. Or maybe FASTPATH commands. Surely you don't often use the TSO editor rather than the ISPF editor? -- Tom Marchant On Fri, 4 Aug 2023 00:22:39 -0400, Bob Bridges wrote: >Come to think of it, I still use TSO commands more often than some of the ISPF >menu options - ED and VW and BR commands rather than options 1 and 2, for >instance. I'm just happier with a command interface than some menus. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Accessing JCL SETs in Rexx
I see IEFC653I in the JESJCL data set. I don't know why IEFC653I seems to have replaced IEF653I. -- Tom Marchant On Fri, 4 Aug 2023 11:04:24 +, Seymour J Metz wrote: >Back in the bad old days, IBM showed the expansion immediately after the JCL. >Alas, in MVS they chose to show it as a message in a separate JES dataset. >Have they moved IEF653I to be inline since then? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Accessing JCL SETs in Rexx
What if you copy the JCL to a new data set, replacing all the EXEC PGM=xxx to EXEC PGM=IEFBR14? and submit it? JCL errors would be pretty obvious. -- Tom Marchant On Thu, 3 Aug 2023 21:58:22 +, David Spiegel wrote: >The purpose of the scan is to ensure that my jobs which implement a Middleware >upgrade have a good chance of succeeding. >These jobs are SUBMITd at 02:00 when the adrenaline is flowing, Teams messages >are non-stop and the stress level is through the roof. >The last thing I want to do is start looking for missing Datasets and/or >RENAME conflicts. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
A z/16 has a maximum I/O bandwidth of 128 GBps. The limitation is no the number of channels, but the bandwidth to memory. I don't know if the I/O bandwidth has any impact on processor access to memory, but my understanding is that there is little, if any. The z16 implementation allows one processor chip to access the cache in other processor chips. This helps to ensure integrity when one chip alters a memory location and another chip needs to access the same location. What happens in x86 architecture systems when one chip has data in cache that it alters and another chip needs to access the same location in the shared memory? What happens when a DMA I/O operation needs to access the same memory that is contained in a processor's cache? The hard part of designing an x86 system to handle very large amounts of I/O is the memory design, allowing the I/O subsystem to access large amounts of memory without impacting the processors. -- Tom Marchant On Wed, 2 Aug 2023 09:24:59 -0500, Grant Taylor wrote: >On 8/1/23 10:26 PM, David Crayford wrote: >> When you consider that a standard commodity rack server such as an >> AMD EPYC can support 128 PCIe lanes and up to 8 memory channels I >> would suggest x86 can handle a lot of I/O if you have the right gear. > >I think it's important to note that all of these are distinct and germane: > > - what the hardware can theoretically support > - what the OS can support > - what is asked of them > - what people are willing to pay for > >Having the right gear is very important. Effectively utilizing it is >also important. > >Grant. . . . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
I had a brief exposure to Burroughs machines in the mid-1970s. I would say that the B6700 was definitely a mainframe, as well as the B6800 that followed it. I've never worked with any Univac mainframes, nor am I familiar with the current line from Unisys. It has been said here that the current Unisys machines use x86 processors. I don't consider that to be relevant in discussing whether or not they are mainframes. IOW, whether or not anyone is doing it, it is possible to design a mainframe using commodity processors, x86 or otherwise. -- Tom Marchant On Tue, 1 Aug 2023 16:10:48 -0400, Rick Troth wrote: >On balance, I encountered a Unisys machine, with the instruction set of >a much older system (which might have been a mainframe in its time) >which was definitely *not* a mainframe (because the contemporary box >just did not fit the class). >So Unisis machines not so much. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
I don't know what you mean, Mike. Access Registers (introduced with ESA/390) do not point to pages or bytes, but to address spaces or data spaces. -- Tom Marchant On Tue, 1 Aug 2023 15:09:01 -0500, Mike Schwab wrote: >Of course ¿ESA? did create access registers that point to 4K pages instead >of bytes, so 8/16 TB was possible. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
On Mon, 31 Jul 2023 16:29:22 -0400, Steve Thompson wrote: >Fujitsu did not "buy" Amdahl machines, Phil didn't say that Fujitsu bought Amdahl machines. He said that they bought Amdahl. This is true. >Fujitsu supplied Amdahl with their machines I worked for Amdahl too, from 1978 to 1984. I started as a field Systems Engineer, often finding and occasionally fixing bugs in MVS. When MVS abended on an Amdahl machine, IBM would take the position that it must be the hardware, unless the customer could reproduce it in an IBM machine.Then I cross-trained to hardware, then an SE Specialist. During that time frame, Fujitsu did not supply Amdahl with their machines. Amdahl designed and built their own machines. IIRC Amdahl designed the chips. I don't remember who fabricated the chips, but it might have been Fujitsu. Probably other components were supplied by Fujitsu as well. >with the MODs we (yeah, I worked for Amdahl >prior to 1990) asked for/needed, and then for instructions we >didn't have micro-store for, Micro-store? There was no micro-store on the 470 or 580 (5850,5860, 5870 and 5880) systems. All instructions were implemented entirely in hardware. On the 470 series, that caused Amdahl to be at a disadvantage when IBM added new instructions. Instead, Amdahl used software emulation for the new instructions. The first of these was MVS/SE Assist, an enhancement to the Program Interruption First-Level Interrupt Handler. It would detect the PIC 1 and emulate the instruction in software if it was something that it handled. The 580 had a radical new design. During a three month stint at headquarters, I worked with the 580 console project and I had my own, numbered and registered copy of the ALTA Principles of operation. Among other things, it defined a mechanism to permit another level of virtualization, allowing 4 Domains to be defined and mapping System storage to domain storage. Sometimes I wish I had "forgotten" to return it when I left... To manage it, there was a new state, System state, in addition to Problem and Supervisor state. System state registers registers for use only when in System state. Special System state instructions to do things like moving data between the normal registers and the system state registers. The design included 31 or 32 bit memory (I forget which) and a much improved channel subsystem. When 370/XA came out a year or two later, I looked in the XA POO for anything that didn't more or less fit in the ALTA design and didn't find anything. Macrocode ran in System state IIRC it was loaded into System storage by the console processor. The console on the 580 was a separate 370 processor on one MCC that ran the UTS flavor of Unix. That was my first exposure to Unix. Macrocode mapped System storage to domain storage and system channels to domain channels. All interruptions went through Macrocode. New instructions could be simulated by Macrocode >we used FAM (Fast Assist Mode) which >we then emulated instructions (part of MacroCode). > ... > >And I still think my time at Amdahl was the best job and >education in machine hardware I could have ever had for the short >time I was there. Same here. And the training was top notch. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe Makers.... WAS: Ars Technica: The IBM mainframe: How it runs and why it survives
On Mon, 31 Jul 2023 14:33:26 -0400, Phil Smith III wrote: >I also STR that Fujitsu builds some of IBM's stuff, which doesn't mean >anything much but is sorta interesting, maybe. IIRC it was Hitachi that built the z800 and z890 using IBM chips. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IMS/Transaction Manager
Just a wild guess. The same reason ASP and HASP were so radically different. They were written by different people with different priorities. -- Tom Marchant On Tue, 25 Jul 2023 19:55:31 +, Schmitt, Michael wrote: >So whi is the CICS architecture so radically different than IMS/TM? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXT] Ars Technica: The IBM mainframe: How it runs and why it survives
Both CICS and IMS were originally written in the 1960s. What is your point? -- Tom Marchant On Tue, 25 Jul 2023 11:36:54 -0500, Mike Schwab wrote: >IMS was written in the 1960s for NASA Apollo parts management. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Curved Flat Screen
In the office, I had a pair of 24 inch monitors. Working from home, I bought a 43 inch 4k TV that I use as a monitor. It gives me the equivalent resolution of two 1080P monitors side by side, with two more above them, but without the borders between them. I'm not familiar with a 23x11 flat screen. What is that? -- Tom Marchant On Tue, 25 Jul 2023 09:50:39 -0500, Steve Beaver wrote: >Like all of us I run a pair of 23x11 flat screens because we need the real >estate. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Apply job failed GIM240001E for connect direct 6.2
You didn't show us the instruction that got the Unidentified operation code message, so we can only guess. So far we seem to have guessed wrong. -- Tom Marchant -- Tom Marchant On Tue, 25 Jul 2023 17:40:57 +0530, Sathish Kumar wrote: >I have updated SYSLIB CONCAT SYS1.MODGEN and rerun the job it's failed with >same error. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ignorant z/OS question
Ok, so you want to use the virtual system console. That was what I meant by "the console on the HMC". Poor terminology on my part. If you issue D C,L,S you can look for a console with HMCS in the TYPE column. That is your system console. I'm not sure how to help you further, but maybe we've refined your question enough for someone else to help. FWIW, the system console wouldn't be my first choice if I was configuring this. I'd rather have a virtual 3270 connected to the master console, which in your case is at device number (we used to call it address) 03E1. I think that was what Mr. Metz was talking about. -- Tom Marchant On Thu, 20 Jul 2023 18:02:01 -0400, Phil Smith III wrote: >Tom Marchant asked: >>Are you trying to connect to the hardcopy SYSLOG device, if one id defined to >>z/OS? > >Um. Maybe? I'm trying to see things like >IEE389I MVS COMMAND PROCESSING AVAILABLE >so I know to send >VINPUT VMSG V CN(*),ACT > >>Or do you want to connect as a console terminal? >>Or do you want to see what would go to the console on the HMC? >>Or something else? >Does the previous response answer these? I dunno! > >>What do you get if you issue D C from an operator console on MVS? >RESPONSE=S0W1 >CNZ4100I 16.57.52 CONSOLE DISPLAY 662 >CONSOLES MATCHING COMMAND: D C >MSG:CURR=0LIM=1500 RPLY:CURR=0LIM=99SYS=S0W1 PFK=NONE >HARDCOPY LOG=(SYSLOG) CMDLEVEL=CMDS > ROUT=(ALL) >S0W103E1 TYPE=MCS STATUS=ACT-S0W1 > DEFINED=(*ALL) > MATCHED=(*ALL) >ATTRIBUTES ON S0W1 > AUTH=(MASTER)CMDSYS=*NBUF=0SUPSBY=N > DEV=03E1 LOGON=OPTIONAL USERID=N/A TIMEOUT=N/A > MFORM=(T,J) AREA=(Z)PFKTAB=*DEFAULT > USE=FC DEL=RD RTME=1RNUM=19 SEG=19CON=N > LEVEL=(ALL) > MONITOR=(NONE) INTIDS=N UNKNIDS=N > ROUT=(ALL) > MSCOPE=(*ALL) > >As you can tell, I know just about enough to be dangerous. But this is a dev >system, nobody on it but us chickens. > > > >And Steve Thompson suggested asking on IBMVM; I can do that, sure-I thought >this would be more up MVSers' alley, but what do I know? Doesn't hurt to try, >will do! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ignorant z/OS question
Are you trying to connect to the hardcopy SYSLOG device, if one id defined to z/OS? Or do you want to connect as a console terminal? Or do you want to see what would go to the console on the HMC? Or something else? What do you get if you issue D C from an operator console on MVS? -- Tom Marchant On Thu, 20 Jul 2023 14:57:26 -0400, Phil Smith III wrote: >Shmuel wrote: >>Define a 3270 address that you can DIAL into; don't forget to use >>RESET rather than DETACH when you're done. > >Yeah, that's not the answer, alas-if I wanted a 3270 session, I would just log >onto the guest. What I've seen before is that the SECUSER sees all the z/OS >SYSLOG traffic, and can reply via CP SEND. I'm sure I'm not describing it >well-someone will (I hope!) say "You need a virtual device at that z/OS recognizes>" or "You need the XYZZY configuration in a PARMLIB >member".` -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Will z/OS be obsolete in 5 years?
You have just convinced me that your posts are not worth reading. On Thu, 20 Jul 2023 03:00:38 +, Jon Perryman wrote: > >>How could you not find official references when so many people are > >>infuriated. > >> How dare I fail to read everything that you do! > >> If this was a Linux list perhaps your arrogant response would be warranted. > > >I don't look at much Linux stuff these days but IBM RHEL closed source is >popping up everywhere. I only looked at a couple items out of interest. How >dare you not read anything. You asked for a reference which a quick search >returned the RedHat response I provided. An arrogant response is warranted >because you didn't make a basic attempt to find something that returns so many >hits. > >> That page doesn't say what you said it says, >> "IBM RHEL announced it's move to closed source (IBM RedHat Enterprise >> Linux)." >> Not only does it not say that, it refutes it. > > >The article denies but does not refute. RHEL says that paywall and NDA isn't >closed source. The Linux community says open source is not restricted source. >They consider this to be closed source but it's never been tested by the >courts. > >>> but not in the spirit of GPL by restricting access to the executables. > >> What does that mean? > > >By "spirit", I'm saying opinion. As we learned from SCOTUS interpretation of >the Constitution, it's open to opinion otherwise every SCOTUS decision would >be unanimous. > >>> DB2 for Linux and Windows is not DB2 for z/OS. > >> Of course not. Who cares? For one thing, the I/O interfaces are different. >> For another, z/OS is EBCDIC and Linux is not. > > >Customers care. For instance, large SAP customers choose DB2 on z/OS because >DB2 on other platforms is not performant nor as reliable. For these customers >to move to RHEL on z, Linux must include DB2 for z/OS without the need for >z/OS. > >>Sysplex is the ability to tightly couple up to 32 z16 boxes. > >> I know what Sysplex is, and it is decades older than z16. >> Sysplex is a software construct, not hardware, although certain hardware is >> required to implement it. > > >Sysplex is both software combined with hardware constructs. Shared dasd, >coupling facilities and other hardware combined with various software >components are required for sysplex. > >>>At the moment, z/OS is the OS of choice for utilizing sysplex. > >> No. z/OS (and MVS before it) is the operating system that implements Sysplex. >> It is not something implemented in hardware that z/OS utilizes. >. >Without required structures in the coupling facility, you can't have sysplex. >You may not be aware of these structures but nonetheless they are a hardware >requirement for sysplex. > >On Wednesday, July 19, 2023 at 04:06:14 PM PDT, Tom Marchant > <000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote: > > On Wed, 19 Jul 2023 18:54:04 +, Jon Perryman wrote: > >> >>> You didn't bother to cite any reference, so I am highly skeptical. >>> I looked for this "announcement" and didn't find it. >> >> >>How could you not find official references when so many people are infuriated. > >How dare I fail to read everything that you do! >If this was a Linux list perhaps your arrogant response would be warranted. > >>For instance, see >>https://www.redhat.com/en/blog/red-hats-commitment-open-source-response-gitcentosorg-changes >> where a RedHat VP tries to calm the rage. > >That page doesn't say what you said it says, "IBM RHEL announced it's move to >closed source (IBM RedHat Enterprise Linux)." Not only does it not say that, >it refutes it. > >> > Linux is licensed under the GPL. >> >> >>Access to IBM RHEL executable and source access now requires paying for >>services and signing an NDA. Technically, they are following GPL by providing >>source with executables > >Yes, that is consistent with the GPL. > >> but not in the spirit of GPL by restricting access to the executables. > >What does that mean? GPL has always allowed you to charge for a GPL licensed >program. > >Version 3 says it this way to make it clear: > >"You may charge any price or no price for each copy that you convey, and you >may offer support or warranty protection for a fee." > >>> Db2 has been available for Linux for many years. >> >>DB2 for Linux and Windows is not DB2 for z/OS. > >Of course not. Who cares? For one thing, the I/O interfaces are different. For >another,
Re: Will z/OS be obsolete in 5 years?
On Wed, 19 Jul 2023 18:54:04 +, Jon Perryman wrote: > >> You didn't bother to cite any reference, so I am highly skeptical. >> I looked for this "announcement" and didn't find it. > > >How could you not find official references when so many people are infuriated. How dare I fail to read everything that you do! If this was a Linux list perhaps your arrogant response would be warranted. >For instance, see >https://www.redhat.com/en/blog/red-hats-commitment-open-source-response-gitcentosorg-changes > where a RedHat VP tries to calm the rage. That page doesn't say what you said it says, "IBM RHEL announced it's move to closed source (IBM RedHat Enterprise Linux)." Not only does it not say that, it refutes it. > > Linux is licensed under the GPL. > > >Access to IBM RHEL executable and source access now requires paying for >services and signing an NDA. Technically, they are following GPL by providing >source with executables Yes, that is consistent with the GPL. > but not in the spirit of GPL by restricting access to the executables. What does that mean? GPL has always allowed you to charge for a GPL licensed program. Version 3 says it this way to make it clear: "You may charge any price or no price for each copy that you convey, and you may offer support or warranty protection for a fee." >> Db2 has been available for Linux for many years. > >DB2 for Linux and Windows is not DB2 for z/OS. Of course not. Who cares? For one thing, the I/O interfaces are different. For another, z/OS is EBCDIC and Linux is not. > >> What is a "sysplexed Linux"? > >Sysplex is the ability to tightly couple up to 32 z16 boxes. Yes, I know what Sysplex is, and it is decades older than z16. Sysplex is a software construct, not hardware, although certain hardware is required to implement it. >At the moment, z/OS is the OS of choice for utilizing sysplex. No. z/OS (and MVS before it) is the operating system that implements Sysplex. It is not something implemented in hardware that z/OS utilizes -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Equivalent of TSOLIB for batch
On Wed, 19 Jul 2023 13:58:15 -0500, Paul Gilmartin wrote: >On Wed, 19 Jul 2023 17:49:08 +, Jim Mulder wrote: > >> Yes, TSOLIB is part of TSO/E and is correctly implemented by ATTACHing >> subsequent commands with a TASKLIB. >> >TASKLIB should not depend on TSO/E It doesn't. It is used TSO/E, among other products. > and should satisfy the OP's need. TASKLIB has a specific purpose, but it is not clear to me that it fits the OP's needs. The OP is knowledgeable, but he hasn't clearly stated his need. From what he has said, it sounds to me as if he has a program run in batch and he wants to effectively alter STEPLIB from that program while it runs. >Are TSOLIB and TASKLIB inherited alike by grandchild tasks? TSOLIB is a command. TASKLIB is part of the standard search order, ahead of STEPLIB or JOBLIB. It is assigned by ATTACH. did you even try to look up inheritance? From the ATTACH macro documentation: ,TASKLIB=dcb addr Specifies the address of the DCB for the library to be used as the attached task's library. Otherwise, the task library is propagated from the originating task. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Will z/OS be obsolete in 5 years?
On Wed, 19 Jul 2023 15:41:44 +, Kevin Mckenzie wrote: > 2. RedHat is not moving to closed source. RedHat couldn't make RHEL closed > source if they wanted to. RedHat doesn't own the copyright to something like > 90% of RHEL, and whatever copyright they do own, they've assigned to the > Linux Foundation and the like. I guess in theory, RedHat could create a > closed-source fork of Linux and rewrite the 90% of the code they never owned, > and not contribute future code to the open source world, but that seems like > a huge amount of work for not a lot of reward. Right. The Linux Kernel is licensed under the GNU General Public License Version 2, which states, in part, 2. You may modify your copy or copies of the Program or any portion of it, thus forming a work based on the Program, and copy and distribute such modifications or work under the terms of Section 1 above, provided that you also meet all of these conditions: a) You must cause the modified files to carry prominent notices stating that you changed the files and the date of any change. b) You must cause any work that you distribute or publish, that in whole or in part contains or is derived from the Program or any part thereof, to be licensed as a whole at no charge to all third parties under the terms of this License. c) If the modified program normally reads commands interactively when run, you must cause it, when started running for such interactive use in the most ordinary way, to print or display an announcement including an appropriate copyright notice and a notice that there is no warranty (or else, saying that you provide a warranty) and that users may redistribute the program under these conditions, and telling the user how to view a copy of this License. (Exception: if the Program itself is interactive but does not normally print such an announcement, your work based on the Program is not required to print an announcement.) These requirements apply to the modified work as a whole. If identifiable sections of that work are not derived from the Program, and can be reasonably considered independent and separate works in themselves, then this License, and its terms, do not apply to those sections when you distribute them as separate works. But when you distribute the same sections as part of a whole which is a work based on the Program, the distribution of the whole must be on the terms of this License, whose permissions for other licensees extend to the entire whole, and thus to each and every part regardless of who wrote it. AFAIK, most of the rest of what we colloquially refer to as "Linux" is actually the GNU Operating System and is covered under version 3 of the GPL, which has similar language. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Will z/OS be obsolete in 5 years?
On Wed, 19 Jul 2023 00:47:04 +, Jon Perryman wrote: >IBM RHEL announced it's move to closed source (IBM RedHat Enterprise Linux). You didn't bother to cite any reference, so I am highly skeptical. I looked for this "announcement" and didn't find it. Linux is licensed under the GPL. It does not belong to IBM, and they have no legal right to "close source" it, or anything derived from it. Maybe they think that their lawyers are powerful enough to steal the GNU/Linux operating system with impunity, but it is bad PR, at the very least. >With some changes, DB2, RACF and other z/OS products could run in Linux on z16 Of course, they could. Db2 has been available for Linux for many years. >in one sysplexed Linux image. What is a "sysplexed Linux"? -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Equivalent of TSOLIB for batch
Peter, I'm a little over my head on this, but isn't TSOLIB in TSO implemented with TASKLIB on ATTACH? -- Tom Marchant On Wed, 19 Jul 2023 12:04:12 +, Peter Relson wrote: >Scary stuff being asked about. Certainly there is nothing that is supported >(and that likely includes whatever TSOLIB does and whatever is on the CBT >tape), and nothing that won't put your customer at risk (including possibly >introducing system integrity problems). > >TASKLIB on ATTACH is the only supported way to influence the search order for >the system module fetch interfaces such as LINK, LOAD, ATTACH, and XCTL, aside >from providing a DCB on those interfaces. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RSU Maintenance: Asking For a Friend
In a Sysplex environment it is possible to shift the workload off of one system so that it can be IPLed at any time, not just on weekends. IMO, customers that are stuck in the old way of doing things should not serve as a model for others. -- Tom Marchant On Tue, 18 Jul 2023 06:52:02 -0400, David Spiegel wrote: >Hi Brian, >One of my customers decided (many years ago) to upgrade software/apply >maintenance once a year (on each of their 4 complexes). >There are not enough weekends in the year to do this more frequently >(due to other groups doing upgrades and "blocked out" weekends). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Code Page for dataset names
Under this proposal, how would SUBMIT handle characters represented in the terminal code page that have no representation in 037? -- Tom Marchant On Wed, 5 Jul 2023 16:00:55 -0500, Paul Gilmartin wrote: >How about an RFE, I mean "Idea" that the ISPF SUBMIT command should >use that information to convert from the terminal code page to 037? > >I hate EBCDIC! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Double ampersand?
By OS/360 release 19 (1970) & was the documented way to specify a temporary data set. See page 168 of http://www.bitsavers.org/pdf/ibm/360/os/R19_Jun70/GC28-6704-0_JCL_Reference_Rel_19_Jun70.pdf If you do include the DSNAME parameter, the temporary data set name can consist of 1 through 8 characters and is preceded by two ampersands (&). The character following the ampersands must be an alphabetic or national (~r#,$) character: the remaining characters can be any alphameric or national characters. (A temporary data set name that is preceded by only one ampersand is treated as a temporary data set name as long as no value is assigned to it either on the EXEC statement for this job step when it calls a procedure, or on a PROC statement within the procedure. If a value is assigned to it by one of these means, it is treated as a symbolic parameter. There is no change bar on that paragraph, so it was likely introduced with an earlier release. I don't have access to an earlier JCL manual, other than the one from 1967 that Shmuel referenced. -- Tom Marchant On Thu, 6 Jul 2023 02:15:28 +, Seymour J Metz wrote: >In that era, double ampersand was invalid. When IBM added symbolic parameters, >they added double ampersand as an escape for a single ampersand. I don't know >whether they were thinking about temporary DSNs when they came up with the >rule. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Code Page for dataset names
Sorry, I neglected to include the link. https://www.ibm.com/support/pages/sites/default/files/inline-files/690450_SA22-7832-03.pdf -- Tom Marchant On Wed, 5 Jul 2023 14:48:59 -0500, Tom Marchant wrote: >On Wed, 5 Jul 2023 14:04:55 -0500, Paul Gilmartin wrote: > >>I see no difference among these/ Are there others? >> >>513 $ printf '#$@' | iconv -f UTF-8 -t CP1047 | od -tx1 >>000 7b 5b 7c >>003 >>514 $ printf '#$@' | iconv -f UTF-8 -t CP037 | od -tx1 >>000 7b 5b 7c >>003 >>515 $ printf '#$@' | iconv -f UTF-8 -t CP500 | od -tx1 >>000 7b 5b 7c >>003 > >Perhaps Appendix I of this old POO will help. Especially note 4 on page I-4. > > >Five columns of EBCDIC graphics are shown. The first is the 81-character >character >set 0640, called the syntactic character set, that is mapped the same on all >EBCDIC >code pages. The second is the standard IBM 94-character character set mapped >on >code page 00037. The third is code page 00037, named USA/Canada - CECP (Country >Extended Code Page). The fourth is code page 00500, named International #5. >The >fifth is code page 01047, named Latin 1/Open Systems. Code pages 00037, 00500, >01047, and 00819 (ISO-8) all map the 189-character character set 0697. >Source: National Language Support Reference Manual Volume 2, SE09-8002. > > >-- >Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Code Page for dataset names
On Wed, 5 Jul 2023 14:04:55 -0500, Paul Gilmartin wrote: >I see no difference among these/ Are there others? > >513 $ printf '#$@' | iconv -f UTF-8 -t CP1047 | od -tx1 >000 7b 5b 7c >003 >514 $ printf '#$@' | iconv -f UTF-8 -t CP037 | od -tx1 >000 7b 5b 7c >003 >515 $ printf '#$@' | iconv -f UTF-8 -t CP500 | od -tx1 >000 7b 5b 7c >003 Perhaps Appendix I of this old POO will help. Especially note 4 on page I-4. Five columns of EBCDIC graphics are shown. The first is the 81-character character set 0640, called the syntactic character set, that is mapped the same on all EBCDIC code pages. The second is the standard IBM 94-character character set mapped on code page 00037. The third is code page 00037, named USA/Canada - CECP (Country Extended Code Page). The fourth is code page 00500, named International #5. The fifth is code page 01047, named Latin 1/Open Systems. Code pages 00037, 00500, 01047, and 00819 (ISO-8) all map the 189-character character set 0697. Source: National Language Support Reference Manual Volume 2, SE09-8002. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z/OSMF
On Wed, 5 Jul 2023 08:52:41 -0500, Matthew Stitt wrote: >My son got me a keyboard very much like the classic IBM Type "M" for Christmas >a few years ago. It is USB attached and has the name "UNICOMP" on it. I bought two Unicomp buckling-spring keyboards. The first one, purchased in 2013 eventually failed, so I bought another in 2020. The quality on the newer one was considerably less than the older one. The buckling-spring keyboard has some travel after the connection is made (and heard and felt). Some of the keys in the newer one didn't have that extra travel. They bottomed out as the contact was made. For a few keys, they would sometimes bottom out without making contact at all. I sent it back (under warranty) and they improved it just enough to be usable. Still, there was an inconsistent feel, with some keys bottoming out sooner than others. I found it disconcerting, but I kept using it for another year until it failed just like the first one, with several keys not registering even though the spring buckled and the contact was apparently made. Just out of warranty. I gave up on them. As for monitors, I have a 43 inch 4k TV that I use as a monitor. When we worked in the office, I had 2 24 inch 1080P monitors. The 4k monitor gives the same horizontal resolution as 2 1080P monitors, but on a single screen. As a bonus, it gives the same vertical resolution as two more 1080P monitors above the other two. At 43 inches the size of the pixels is a bit smaller than with 24 inch monitors, but it works well for me. My 3270 sessions are set to 99 x 142. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: 0C1 abend
Unfortunately, the address of the READ/WRITE/GET/PUT routine in the DCB after open used for other things before open. The Breaking Event Address is helpful to determine the cause of many S0C1 abends. -- Tom Marchant On Tue, 4 Jul 2023 11:23:19 -0500, John McKown wrote: >I really wish that IBM had put the address of a routine in the DCB or ACB >so that a documented ABEND would occur. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: 0C1 abend
I think that Steve's "eternal quest for things to do" was simply a reference to the fact that the CPU always fetches another instruction after processing the last one, except when the last one was to load a wait state PSW. -- Tom Marchant On Sat, 1 Jul 2023 13:15:37 -0500, Paul Gilmartin wrote: >On Sat, 1 Jul 2023 10:22:23 -0400, Steve Smith wrote: > >>The "normal cause" is that an invalid opcode came up in the CPU's eternal >>quest for things to do. >> >"quest for things to do" sounds like speculative execution. What >happens to a program check in speculative execution? Does it >speculatively enter the exception handler, etc.? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: 0C1 abend
The only way to determine the cause is to analyze the dump. There is no "normally", though there are several "commonly". -- Tom Marchant On Sat, 1 Jul 2023 08:03:59 -0500, Bill Giannelli wrote: >How do I resolve a 0C1 abend. what is normally the cause? >thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z/OSMF
I don't see why, and that wouldn't be consistent with what they have done in the past. Some examples: z/OS 2.1 was available September 2013. It was not supported on a z990 or a Z890. Support for those were dropped in 2014 and 2016 z/OS 2.2 was available in 2015. It was not supported on a z9. z9 EC was supported until 2017. z9 BC was supported until 2019. z/OS 2.3 was available in 2017. It was not supported on a z196 (support dropped 2021) or z114 (supported until 2022). z/OS 2.5 was available in 2021. It was not supported on a zEC12 or a zBC12. AFAIK, support for those have not yet been dropped. I'm not sure, but I think that what IBM has done is to support a level of hardware until the last release of z/OS that is supported on that machine is off support, or at least withdrawn from marketing. Not to support a new release of the operating system on all processors that are currently supported at GA. -- Tom Marchant On Fri, 30 Jun 2023 01:01:21 -0500, Brian Westerman wrote: >So is IBM definitely dropping support for the z13s BEFORE z/OS 3.1 is >officially out? If not, then it should be supported by z/OS 3.1. . . . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How batch create a PDSE2 with Generations?
Here is something more current. https://www.ibm.com/docs/en/zos/2.5.0?topic=allocation-required-esoteric-device-groups Yes, there are current procs that specify SYSDA. -- Tom Marchant On Thu, 29 Jun 2023 17:20:28 +, Seymour J Metz wrote: >It's about as far from current as it gets - OS/360. I don't know whether any >current procs use SYSDA. > > >From: IBM Mainframe Discussion List on behalf of >Paul Gilmartin <042bfe9c879d-dmarc-requ...@listserv.ua.edu> >Sent: Thursday, June 29, 2023 1:11 PM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: Re: How batch create a PDSE2 with Generations? > >On Thu, 29 Jun 2023 16:59:46 +, Seymour J Metz wrote: > >><http://www.bitsavers.org/pdf/ibm/360/os/R13_Sep67/C28-6554-3_OS_Sysgen_R13_Aug67.pdf> >> >Is that current and do all parts remain in force? For example: >SYSCPcard punch > > >On Thu, 29 Jun 2023 16:34:50 +, Seymour J Metz wrote: > >>SYSDA is a name that the installation is expected to define >> >Cite? Perhaps an Install and Config book? > >> ... and that IBM procs depended on. I'm not sure how relevant it is in an >> era of SMS. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How batch create a PDSE2 with Generations?
When I refer to creating a data set with an IEFBR14 step, what I mean is that the initiator creates the data set based upon the DD statement with DISP=NEW (or DISP=MOD for a data set that doesn't yet exist). Most programs do not create data sets -- Tom Marchant On Wed, 28 Jun 2023 10:28:31 -0500, Paul Gilmartin wrote: >Probably even from JC, as a program which actually creates a data set, >unlike IEFBR14 which doesn't create data sets even though many >programmers say it does so. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How batch create a PDSE2 with Generations?
Where did I get the idea that SVC 99 code runs in Supervisor state? It is an SVC. SVC code receives control in Supervisor state. It doesn't require that the program issuing the SVC 99 have any privileges -- Tom Marchant. On Tue, 27 Jun 2023 20:27:27 -0400, Steve Smith wrote: >Let me be the first of likely many who will say "where did you get that >idea?" It doesn't require any more privilege than ALLOC or bpxwdyn. Or >// DD. > >sas > >On Tue, Jun 27, 2023 at 7:47 PM Tom Marchant < >000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote: > >> On Tue, 27 Jun 2023 14:32:18 -0500, Paul Gilmartin >> wrote: >> >> >The parsing and interpretation should be done by SVC 99, not in >> >code replicated and maintained in the various utilities/ >> >> I disagree. SVC 99 is a Supervisor state function. >> Parsing and interpretation is a function that does not require running in >> Supervisor state or any other privileged mode. It should be done by Problem >> state code. >> >> -- >> 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How batch create a PDSE2 with Generations?
On Tue, 27 Jun 2023 14:32:18 -0500, Paul Gilmartin wrote: >The parsing and interpretation should be done by SVC 99, not in >code replicated and maintained in the various utilities/ I disagree. SVC 99 is a Supervisor state function. Parsing and interpretation is a function that does not require running in Supervisor state or any other privileged mode. It should be done by Problem state code. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXTERNAL] Re: z/OSMF
On Tue, 27 Jun 2023 13:35:47 +, Pommier, Rex wrote: >We're running a 2-way, 316 MSU machine and my business customers would squawk >loudly if I had to move our workload to a 4 way with no more horsepower. We >have several single-threaded processes that run that would be woefully >impacted if the per-engine thruput was halved. > You are running several processes that each need more than 50% of a CP, and your CEC has two CPs? How much CPU do these processes use? -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PDS/PDSE Member information
I think you mean ISPF statistics. That would be in the user data area in the directory entries. You might try the LM ISPF services. -- Tom Marchant On Thu, 15 Jun 2023 16:10:20 +0100, Jack Zukt wrote: >Hi all, > >Is there a way to get the PDS/PDSE member information, namely, >member/userid/last change date in batch? I have not been able to get to it >using rexx. >Regards, >Jack > >-- >For IBM-MAIN subscribe / signoff / archive access instructions, >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe help now available!
Orchestra conductor talking to a violin player: "I know you usually play the violin, but today we need another french horn player. You are a musician. You can do it." -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CVT or PSA field with ever changing value?
My first guess would be one of the old PSWs -- Tom Marchant On Mon, 5 Jun 2023 20:03:06 +0300, Binyamin Dissen wrote: >Is there some PSA/CVT field that most of the time where it is examined (not >talking microseconds here) the value will be different. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Why does ISPF BROWSE abend with S878 searching a large sequential file?
On Wed, 24 May 2023 11:35:19 -0400, Steve Thompson wrote: >RECFM=F,LRECL=4160,BLKSIZE=0 (I think blocking works with dumps now) Yes SYSMDUMP can be blocked. But if it is going to be blocked, RECFM must be FBS. RECFM=F will be unblocked. >And SPACE=(CYL,100,30) I think that should be able to hold the >whole dump. Why such a small secondary allocation? That is a pretty small allocation for a SYSMDUMP, though it may be adequate for the OP's region size. When I create a SYSMDUMP in batch, and I do it several times a year,, I code (CYL,(300,500),RLSE). DCB parameters need not be specified, as they will be filled in properly by the system. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
