Re: RMM: Best, safest way to mass delete tape volumes
W dniu 2013-05-08 03:52, Jeffery Swagger pisze: A few months ago all of our 3480/3490 tapes were destroyed. Something like over 30,000. Not to mention the REEL tapes that are still defined but non-existent. I would like to remove these from the RMM database. Something is telling me in the back of my mind Don't try do do it all at once. I have nightmares of journals filling up, CDS corruption, etc, and other Bad Things, all of which I'd rather avoid. My environment: z/OS 1.13 on z10, current maintenance. 3 LPAR resource sharing SYSPLEX. I have been told that the only valid tape volumes are 05*. Anything else is obsolete and can be deleted. Oh, and these are all non-SMS and are actually STK/Oracle 94somethingorother residing in a STK/Oracle Silo. If that makes a difference. So, what is a good way to approach this? Any suggestions welcome, and thanks in advance, 1. Backup. CDS and other important datasets can be backed up before the action. 2. Restore. Yes, you should be sure that backup is usable, restore is the best way to prove it. 3. Test environment. Yes, tests should be performed on non-prod environment. 4. Now you can start the job. ;-) If you really afraid of mass delete then consider usage of TSO RMM commands (with CLIST option) - you can easily get subsets of your tape set. BTW: RMM is only directory. What do you plan to do with real data on real tape carts? Option 1. Quick and easy. Destroy the content using degausser. But the carts will become unusable. Option 2. Slow and harder. Use data erase facilities of the drives. It will take a lot of time (many minutes per cart). But the tapes will be still usable. Option 3. The quickest and the easiest, but somehow not recommended. Do nothing. Who would be interested your data? Who has such drives? ;-))) -- Radoslaw Skorupka Lodz, Poland -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, www.brebank.pl, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2013 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.555.904 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Meaningless Information in SDSF System Request panel
Hi, SDSF System Request panel started to display meaningless information after I updated consol member in SYS1.PARMLIB. I changed MPF parameter from 00 to 01. And I added MPFLST01 member into SYS1.PARMLIB. The content of the member is suppress two commands from console: SYS1.PARMLIB (MPFLST01) ** * Top of Data ** 000100 DSNW133I 000200 DSNW123I ** * Bottom of Data ** Iyi calismalar, Saygilar / Regards Kayhan Tanriverir Vizyon BT Uzman Sistem Programcisi / Senior Systems Programmer (Please consider the environment before printing this e-mail) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Meaningless Information in SDSF System Request panel
Kayhan Tanriverir wrote: SDSF System Request panel started to display meaningless information after I updated consol member in SYS1.PARMLIB. Please post that screen. I changed MPF parameter from 00 to 01. And I added MPFLST01 member into SYS1.PARMLIB. The content of the member is suppress two commands from console: What is the result if you use 'D MPF'? Do you have any active IEAVMXIT? Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: as OpenMVS assembler always gives ASMA935U
Nope, -mGOFF does not help, it gives me the same error. But the NODECK,OBJECT suggestion does work. This works: as -o bla.o --NODECK,OBJECT bla.s Thanks, Etienne On Mon, 6 May 2013 06:01:04 -0700, Lloyd Fuller leful...@sbcglobal.net wrote: Or just specify the GOFF (-mGOFF) option which forces OBJECT and is MUCH more useful when combining things with C. Lloyd - Original Message From: J R jayare...@hotmail.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Mon, May 6, 2013 7:13:13 AM Subject: Re: as OpenMVS assembler always gives ASMA935U SYSPUNCH is required for the assembler DECK option. SYSLIN is required for the assembler OBJECT option. Since an earlier post of yours mentioned pseudo JCL contained a SYSLIN statement, passing assembler options NODECK,OBJECT (in addition to other options that you are already using) may fix your problem. = = Date: Mon, 6 May 2013 02:11:17 -0500 From: e.thij...@chello.nl Subject: Re: as OpenMVS assembler always gives ASMA935U To: IBM-MAIN@LISTSERV.UA.EDU Thanks, this gives me one extra line: IEC1301 SYSPUNCH DD STATEMENT MISSING This looks like some setup or configuration problem to me, since I am not running any JCL... I'll have to refer this to the system administrator. There are no other files or logs, as far as I can see, containing any as output. Thanks, Etienne On Fri, 3 May 2013 14:55:16 -0500, Kirk Wolf k...@dovetail.com wrote: FWIW, when I'm using the z/OS Unix shell, I usually set: export _BPXK_JOBLOG=STDERR -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EMC 6000 Virtual Tape Drive
Our DCC product gives you the ability to query the DLM. Tso, batch, pc GUI, ispf interface. It can clone tapes into the dlm. Also can direct allocation so smstape does not need to be used. Www.dtssoftware.com Tom -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Undocumented VSAM Return/reason code
On Sat, 4 May 2013 06:25:41 -0700, Lizette Koehler stars...@mindspring.com wrote: It is also possible it is one of their undocumented codes that means something to IBM internally. Even if it is, my opinion is that IBM ought to document these if only to say it is an internal, reserved, only-to-be-known-to-IBM code. Maybe submit a reader comment form? Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RMM: Best, safest way to mass delete tape volumes
Jeff hello, firstly just to clarify the situation with the tapes as the first part of your mail states the tapes were destroyed, but the 2nd part implies they are still extant in the silo's If they still exist if you still have paths to the drives (not removed from HCD) you may want to data wipe/erase the volumes prior to removal and subsequent destruction. RMM has this facility, refer to running Edginers ERASE in the implementation customization guide chapter 18 also the Changevolume command in Managing and using removable media. This would be a due diligence exercise so you can prove to management/audit/compliance that you have taken reasonable precautions about data security before the tapes leave site. Also known as C.Y.A *** Do it all under your sites change management procedures That aside, yes you are quite correct that you will get issues with journal filling, master file filling up (fragmentation) if you just steam on in, so some basic checks are in order. (a) check your current rmm housekeeping jobs and make sure its actually working properly and that you are also backing up the master file and journal at least on a daily basis. (the edghskp backup will also null the journal when backup is succesfull, edgbkup will only backup) How many versions are kept? (b) do a listcat on your master file (usually) rmm.master and look at the high used rba and also volume check under tso 3.4 (or similar) Is it in extents? how many? is there plenty of freespace on the volume to do multiple extends? You may want to reorg or resize the masterfile before you start. It's a vsam ksds so beware the basic 4gb limitation; redefine as an extended dataset if needed. Reorg resizing are all covered in the manual. (c) same with RMM.Journal how big is it? do you want to resize? (d) check the rmm startup parms, the warning for journal full should be there; 80% is usual. You may have automation to watch for this and submit a job to backup master files and null the journal As to the doing, once you are happy with a,b,c,d above, i'd suggest batches of 500 to start, you canalways ramp up when you are comfortable with it. Under your change management protocols, schedule a large window on your plex when its at a quiet point tapewise, as if it all goes horribly wrong, ALL your tape processing is stuffed till you get it sorted out. An approach would be:- (1) ad hoc job to backup control dataset and journal and null the journal. (2) submit a batch job to run the tso command rmm deletevolume x force I dont believe you can do ranges, so its a command for each individual volume. (3) when 2 is succsessful (try display to volumes via tso rmm interface, should be gone) rmm deleterack x you can put a count field here but may be prefferable/safer to do it for each volume. (4) keep an eye on the master file journal after each batch and run additional ad hoc backup (and journal null) as needed or every 10,000 or so and definitely at the end. N.B as you will be doing multiple additional backups, make sure you don't overwrite them with subsequent runs, so have a 2nd step to copy to gdg's with a large limit! When you are all done, you may well want to reorg or resize the master file to get it nice tidy again. regards Dave P.S all opinions are my own and offerred on a no liability basis. *** A few months ago all of our 3480/3490 tapes were destroyed. Something like over 30,000. Not to mention the REEL tapes that are still defined but non-existent. I would like to remove these from the RMM database. Something is telling me in the back of my mind Don't try do do it all at once. I have nightmares of journals filling up, CDS corruption, etc, and other Bad Things, all of which I'd rather avoid. My environment: z/OS 1.13 on z10, current maintenance. 3 LPAR resource sharing SYSPLEX. I have been told that the only valid tape volumes are 05*. Anything else is obsolete and can be deleted. Oh, and these are all non-SMS and are actually STK/Oracle 94somethingorother residing in a STK/Oracle Silo. If that makes a difference. So, what is a good way to approach this? Any suggestions welcome, and thanks in advance, Jeff -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RMF data rentention Parm
On Tue, 7 May 2013 06:45:13 -0700, Lizette Koehler wrote: If you want to keep more RMF data available through the RMF ISPF application, you need to create more and larger RMF VSAM datasets. Do you have the dasd available for that? It is useful on occasion to be able to pull back RMF III data - as distinct from the SMF 70's. I find it useful to be able to get at the delay analysis for some time ago sometimes. Just back 'em up as normal - and re-allocate to the appropriate ddnames as needed if you want to time-travel. Effectively no limit to what can be handled. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Meaningless Information in SDSF System Request panel
Hi, Thank you, I saw the IEAVMXIT is inactive from the result of 'd mpf' comand also IEA590I WTO USER EXIT IEAVMXIT NOT FOUND I will use sample program CNZZVXT1 to link CNZZVMXT as IEAVMXIT D MPF,M IEE677I 10.42.17 MPF DISPLAY 056 MESSAGE ID -MPF SUPPRESS RETAIN AUTO TOKEN EXIT DSNW123I -01 YES YES NO DSNW133I -01 YES YES NO GENERAL WTO USER EXIT (IEAVMXIT) INACTIVE SUBSYSTEMS RECEIVING FOREIGN MESSAGES AND DOMS: *ALL IEAVMXIT exit is inactive Iyi calismalar, Saygilar / Regards Kayhan Tanriverir Vizyon BT Uzman Sistem Programcisi / Senior Systems Programmer (Please consider the environment before printing this e-mail) Kimden: Elardus Engelbrecht elardus.engelbre...@sita.co.za Kime: IBM-MAIN@LISTSERV.UA.EDU Gönderildiği Tarih: 8 Mayıs 2013 12:10 Çarşamba Konu: Re: Meaningless Information in SDSF System Request panel Kayhan Tanriverir wrote: SDSF System Request panel started to display meaningless information after I updated consol member in SYS1.PARMLIB. Please post that screen. I changed MPF parameter from 00 to 01. And I added MPFLST01 member into SYS1.PARMLIB. The content of the member is suppress two commands from console: What is the result if you use 'D MPF'? Do you have any active IEAVMXIT? Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EMC 6000 Virtual Tape Drive
So it's been a really long time since I set all this up, but I do remember I had to have a couple of special volumes defined in the library. These volumes were used to 'communicate' with the Bustech hardware. Below is the display for the 2 volumes from ISMF. VOLUME USE VOLUME CHECKPT LIBRARY SERIAL ATTRERROR STATUSVOLUME NAME BFLDRL PRIVATE NO ERROR--- LIBMVTS1 BFLLCL PRIVATE NO ERROR --- LIBMVTS1 VOLUME MEDIA RECORDING SPECIAL SERIAL TYPE TECHNOLOGY COMPACTIONATTRIBUTE BFLDRL MEDIA4128TRACK --- RDCOMPAT BFLLCL MEDIA4128TRACK --- RDCOMPAT I dont know why the client chose 2 different tape sizes. Seems illogical to me. The NL tapes I referenced had to do with running DLMCMD JCL which for the life of me I don't get. All I want to do is ask the machine is 1 - are you working and 2- what tape VOLSERs do you think you have defined inside of you? -- This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EMC 6000 Virtual Tape Drive
These are also not defined to my TMM (CA1). So it's been a really long time since I set all this up, but I do remember I had to have a couple of special volumes defined in the library. These volumes were used to 'communicate' with the Bustech hardware. Below is the display for the 2 volumes from ISMF. VOLUME USE VOLUME CHECKPT LIBRARY SERIAL ATTRERROR STATUSVOLUME NAME BFLDRL PRIVATE NO ERROR--- LIBMVTS1 BFLLCL PRIVATE NO ERROR --- LIBMVTS1 VOLUME MEDIA RECORDING SPECIAL SERIAL TYPE TECHNOLOGY COMPACTIONATTRIBUTE BFLDRL MEDIA4128TRACK --- RDCOMPAT BFLLCL MEDIA4128TRACK --- RDCOMPAT I dont know why the client chose 2 different tape sizes. Seems illogical to me. The NL tapes I referenced had to do with running DLMCMD JCL which for the life of me I don't get. All I want to do is ask the machine is 1 - are you working and 2- what tape VOLSERs do you think you have defined inside of you? -- This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Tue, 7 May 2013 12:49:32 -0500, Paul Gilmartin paulgboul...@aim.com wrote: On Tue, 7 May 2013 13:34:07 -0400, Gerhard Postpischil wrote: On 5/7/2013 5:02 AM, Lizette Koehler wrote: The only way I can think of restricting is an exit in JES2. Or if this is a TSO User you may wish to look at IKJEFT10 exit. You'd be surprised how many secure installations permit a TSO user to allocate an internal reader and write a job to it. Why is that a problem? I'm not sure why Gerhard thinks that is a security problem, gil. But certainy if users push jobs through the INTRDR directly (as opposed to via TSO/E SUBMIT or ISPF SUB) then you can't depend on any restrictions imposed by IKJEFF10; you would have to use JES or SMF exits. Actually, I'm not sure you can stop users from allocating an INTRDR and still allow them to submit jobs from TSO, since even SUBMIT goes through the INTRDR. So I've never believed in using IKJEFF10 to enforce installation restrictions on job content. Control resources, not tools. Definitely! -- Walt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: EMC 6000 Virtual Tape Drive
On Tue, 7 May 2013 19:15:55 -0500, Mike Wojtukiewicz mw...@attglobal.net wrote: I dont know why the client chose 2 different tape sizes. Seems illogical to me. The NL tapes I referenced had to do with running DLMCMD JCL which for the life of me I don't get. All I want to do is ask the machine is 1 - are you working and 2- what tape VOLSERs do you think you have defined inside of you? Now I know what you are referring to with the NL tapes. DLMCMD is a utility to basically run linux scripts from the mainframe and return the output to the mainframe. The scripts do various things like report on library usage (space, scratch tapes etc), gather logs, print tape headers, gather / display statistics. It can also issue commands to the VTE (virtual tape engine) console and return the output.The NL tape is a special work virtual tape on the DLm that has to be initialized and contains the output of the utility / command that is read by an IEBGENER step to spool the output. At least that is how it works in the version I am using, but from what I understand this is or has been re-written and doesn't need IEBGENER now. Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
Gerhard said that his client, the US f ederal entity acronym ed LUGA (Large Unnamed Government Agency), thought it was a security problem and eliminated the possibility that it could happen again when Gerhard showed how easy it was to do it. Bill Fairchild Franklin, TN - Original Message - From: Walt Farrell walt.farr...@gmail.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, May 8, 2013 7:37:40 AM Subject: Re: Duplicate Batch Job On Tue, 7 May 2013 12:49:32 -0500, Paul Gilmartin paulgboul...@aim.com wrote: On Tue, 7 May 2013 13:34:07 -0400, Gerhard Postpischil wrote: On 5/7/2013 5:02 AM, Lizette Koehler wrote: The only way I can think of restricting is an exit in JES2. Or if this is a TSO User you may wish to look at IKJEFT10 exit. You'd be surprised how many secure installations permit a TSO user to allocate an internal reader and write a job to it. Why is that a problem? I'm not sure why Gerhard thinks that is a security problem, gil. But certainy if users push jobs through the INTRDR directly (as opposed to via TSO/E SUBMIT or ISPF SUB) then you can't depend on any restrictions imposed by IKJEFF10; you would have to use JES or SMF exits. Actually, I'm not sure you can stop users from allocating an INTRDR and still allow them to submit jobs from TSO, since even SUBMIT goes through the INTRDR. So I've never believed in using IKJEFF10 to enforce installation restrictions on job content. Control resources, not tools. Definitely! -- Walt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On 5/8/2013 8:37 AM, Walt Farrell wrote: I'm not sure why Gerhard thinks that is a security problem, gil. But certainy if users push jobs through the INTRDR directly (as opposed to via TSO/E SUBMIT or ISPF SUB) then you can't depend on any restrictions imposed by IKJEFF10; you would have to use JES or SMF exits. I never said that I consider it a security problem, only that I installed software at sites that did. No idea what their auditors or management are concerned about. Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 10:33:46 -0400, Gerhard Postpischil wrote: On 5/8/2013 8:37 AM, Walt Farrell wrote: I'm not sure why Gerhard thinks that is a security problem, gil. But certainy if users push jobs through the INTRDR directly (as opposed to via TSO/E SUBMIT or ISPF SUB) then you can't depend on any restrictions imposed by IKJEFF10; you would have to use JES or SMF exits. I never said that I consider it a security problem, only that I installed software at sites that did. No idea what their auditors or management are concerned about. Ah! Job security! Walt suggests that it's pretty hard to stop them. How did you (or they) do it? I suppose if TSO SUBMIT operates in authorized state one could hack allocation to restrict INTRDR to authorized programs. Does ISPF SUBMIT invoke TSO SUBMIT in authorized state? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
Paul Gilmartin wrote: Does ISPF SUBMIT invoke TSO SUBMIT in authorized state? No. You can choose to exclude it in IKJPRMxx and the program SUBMIT (alias of IKJEFF01) in SYS1.CMDLIB has this attribute AC=00. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
Elardus Engelbrecht wrote a ^%$# TYPO! ... IKJPRMxx ... Must be IKJTSOxx Groan... :-/ Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On 5/8/2013 7:33 AM, Gerhard Postpischil wrote: On 5/8/2013 8:37 AM, Walt Farrell wrote: I'm not sure why Gerhard thinks that is a security problem, gil. But certainy if users push jobs through the INTRDR directly (as opposed to via TSO/E SUBMIT or ISPF SUB) then you can't depend on any restrictions imposed by IKJEFF10; you would have to use JES or SMF exits. I never said that I consider it a security problem, only that I installed software at sites that did. No idea what their auditors or management are concerned about. They might have simply put their 'control's in the wrong exits (TSO) and were too lazy to refit them into the (JES and SMF) exits where they belonged. -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
I do sometimes use a TSO/ISPF submit command in a development/testing context. In production I instead use the device of directing output to the INTRDR defined in a DD statement or the like. In two places where I could do so conveniently I have this morning checked the use of duplicate jobnames periodically, and what I found is 1) development programmers submitting a sequence of different jobs, chiefly compiles, etc. and assemblies, etc. reusing the same jobname and 2) a single production-control recovery/restart blunder. Paul Gilmartin's point is the crucial one. One can never stop up all the ratholes, but resources can be protected from being accessed at all or from being altered. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 08:37:12 -0700, Ed Jaffe wrote: They might have simply put their 'control's in the wrong exits (TSO) and were too lazy to refit them into the (JES and SMF) exits where they belonged. A plausible motivation is that they want all jobs submitted via their scheduler. On Tue, 7 May 2013 13:34:07 -0400, Gerhard Postpischil wrote: I once installed a package at a hush-hush installation (program needed configuration data, then submitted assembly/link jobs) and was told it wouldn't work because they prohibited TSO job submission. They were surprised when my jobs started running. Next time I talked to them, they had modified JES2 so that internal reader allocation went to class B (punch) instead! Does the class matter? If I allocate: //SYSUT2 DD SYSOUT=(B,INTRDR) ... will the job not run? Will the punch writer contend with INTRDR? (You mean they had a punch?) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 10:55:37 -0500, Paul Gilmartin paulgboul...@aim.com wrote: Does the class matter? If I allocate: //SYSUT2 DD SYSOUT=(B,INTRDR) ... will the job not run? Will the punch writer contend with INTRDR? (You mean they had a punch?) It will run. The B is the MSGCLASS if one is not specified on the JOBCARD. -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
Back before OCO, SUBMIT issued SVC 100 (called FIB, for foreground initiated background) and most of the code ran within that SVC. It probably still does. I think the SVC was/is also used by STATUS, CANCEL, and OUTPUT to access the JES subsystem interface. Bill On Wed, 8 May 2013 09:54:27 -0500, Elardus Engelbrecht wrote: Paul Gilmartin wrote: Does ISPF SUBMIT invoke TSO SUBMIT in authorized state? No. You can choose to exclude it in IKJPRMxx and the program SUBMIT (alias of IKJEFF01) in SYS1.CMDLIB has this attribute AC=00. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 11:08:36 -0500, Mark Zelden wrote: On Wed, 8 May 2013 10:55:37 -0500, Paul Gilmartin wrote: Does the class matter? If I allocate: //SYSUT2 DD SYSOUT=(B,INTRDR) ... will the job not run? Will the punch writer contend with INTRDR? (You mean they had a punch?) It will run. The B is the MSGCLASS if one is not specified on the JOBCARD. And the SYSPRINT piles up in the punch queue. If the submitters didn't specify a SYSOUT class. I think I'm seeing som whimsy in Gerhard's anecdote. Does the SYSOUT class on INTRDR override the class(es) in: // OUTPUT JESDS=ALL,... if MSGCLASS is not specified? (I suspect not.) I know that for some early JCL errors OUTPUT is not processed, but MSGCLASS is respected. I need to try to see how the class on INTRDR plays in this game. What class (if any) does TSO SUBMIT supply when it allocates INTRDR? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Undocumented VSAM Return/reason code
Combine all these codes into one manual for an easy look up. With a link to the proper manual to learn about what you need to change. On Wed, May 8, 2013 at 5:26 AM, Jantje. jan.moeyers...@gfi.be wrote: On Sat, 4 May 2013 06:25:41 -0700, Lizette Koehler stars...@mindspring.com wrote: It is also possible it is one of their undocumented codes that means something to IBM internally. Even if it is, my opinion is that IBM ought to document these if only to say it is an internal, reserved, only-to-be-known-to-IBM code. Maybe submit a reader comment form? Cheers, Jantje. -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 11:41:43 -0500, Paul Gilmartin paulgboul...@aim.com wrote: What class (if any) does TSO SUBMIT supply when it allocates INTRDR? It depends. A default is specified in UADS (if used) or RACF / security product. If nothing is there, it takes the default for INTRDR specified in JES2, and I assume JES3 has something similar. What is this, MVS 101? :-) -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 12:10:36 -0500, Mark Zelden wrote: What is this, MVS 101? :-) There's an aphorism I haven't used here in a while. I'll let readers guess. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Return codes
Hi , Can some one let me know why the return code generated is a mutilple of 4? e.g 4,8,12,16 Thanks, Ron T -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On 5/8/2013 10:14 AM, Paul Gilmartin wrote: On Wed, 8 May 2013 12:10:36 -0500, Mark Zelden wrote: What is this, MVS 101? :-) There's an aphorism I haven't used here in a while. I'll let readers guess. I'll assume no pun intended wrt use of the word readers. I'll further assume the aphorism contains the word, fine. ;) -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
While there's no hard and fast rule, i.e. nothing prevents you from generating any return code from your programs, it's a tradition that return codes are a multiple of 4. 0 - Normal 4- Warning 8 - Error 12 - Severe Error 16 - Terminal Error Mark Jacobs From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Ron Thomas [ron5...@gmail.com] Sent: Wednesday, May 08, 2013 1:45 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Return codes Hi , Can some one let me know why the return code generated is a mutilple of 4? e.g 4,8,12,16 Thanks, Ron T -- 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: Return codes
Can some one let me know why the return code generated is a mutilple of 4? e.g 4,8,12,16 Back in the day when every byte counted, programmers would use the RC in R15 as an index into a jump table, where each four byte entry was itself an unconditional branch instruction, which was a four byte instruction. Not needed anymore, but old habits die hard. Think of it as like a computed GOTO . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
On 5/8/2013 11:53 AM, Mark Jacobs wrote: While there's no hard and fast rule, i.e. nothing prevents you from generating any return code from your programs, it's a tradition that return codes are a multiple of 4. 0 - Normal 4- Warning 8 - Error 12 - Severe Error 16 - Terminal Error Which historically allowed you to handle return codes by using a branch table, if you invoked the service from an Assembler program. Mark Jacobs From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Ron Thomas [ron5...@gmail.com] Sent: Wednesday, May 08, 2013 1:45 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Return codes Hi , Can some one let me know why the return code generated is a mutilple of 4? e.g 4,8,12,16 Thanks, Ron T -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
I suspect they derive from assembler coding that looks like this (R15 needs to contain a value that is a multiple of 4): B BRTABLE(R15) BRTABLE B CODE00 B CODE04 B CODE08 B CODE0C B CODE10 Alan Field Technical Engineer Principal BCBS Minnesota Phone: 651.662.3546 Mobile: 651.428.8826 From: Ron Thomas ron5...@gmail.com To: IBM-MAIN@LISTSERV.UA.EDU Date: 05/08/2013 12:45 Subject:Return codes Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Hi , Can some one let me know why the return code generated is a mutilple of 4? e.g 4,8,12,16 Thanks, Ron T -- 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: Return codes
Ron: To add to Mark's reply, that's because the return code (in register 15), was traditionally used to index a table of branch instructions (each of which were 4 bytes long), such as: B RETTABLE(R15) ... RETTABLE B OK B FAIR B WORSE B BAD B FATAL Mike Myers On 05/08/2013 01:45 PM, Ron Thomas wrote: Hi , Can some one let me know why the return code generated is a mutilple of 4? e.g 4,8,12,16 Thanks, Ron T -- 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: Return codes
Mark Jacobs wrote: While there's no hard and fast rule, i.e. nothing prevents you from generating any return code from your programs, it's a tradition that return codes are a multiple of 4. 0 - Normal 4- Warning 8 - Error 12 - Severe Error 16 - Terminal Error IT version of Richter Scale? ;-) I see RC=0 also as Informational and RC=16 as Unrecoverable Error Could there be another reason? One reason I could think of is the usage of masking values (bitwise comparision) and ease of branching based on the RC. Something like this quick example (without masking) which may be suitable in some situation: * PROCESS RETURN CODE B *+4(R15) B SPECIAL RC = 0 AUTH B NOPROF RC = 4 AUTH B FAILRC = 8 AUTH Of course, you should check for non-standard RC too, perhaps by Compare and Branch on Equal. Another possible reason is - same return codes standards are also used for macros (system services) and system exits. So one set of convention is used to pass info including RC from one module to another. I think some greybeards will chime in... ;-) Groete / Greeting Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
On 5/8/2013 2:14 PM, Elardus Engelbrecht wrote: Another possible reason is - same return codes standards are also used for macros (system services) and system exits. So one set of convention is used to pass info including RC from one module to another. While I prefer the branch table conjecture, I have a number of programs that use a three-way branch (e.g., CH R15,=H'8') to save, what in the good old days was expensive storage. As for range checking, my all-time favorite is CL (e.g., CL R15,=F'16' / BH) that catches both negative and excessive values. IBM has complicated matters, starting with BPAM macros, by adding more return codes. I would have preferred the old 0,4,8,12 paradigm, with R0 set to a reason code. Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
There are also situations in which one wants to be able to set more than one of the diagnostic bits in a return code additively and unambiguously, and the alternative use of 0, 2, 4, 8, 16, . . . , i.e., the sequence 2^i, i = 0, 1, 2, . . . , powers of 2, permits this to be done. Still, the fact that successive branch-table addresses always differed by four bytes in probably explains the 4i, i = 0, 1, 2, . . . convention best. Now, of course, we need 8i, i= 0, 1, . . . , i.e., 0, 8, 16, 24, . . . John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 05/08/2013 11:55:37 AM: From: Paul Gilmartin paulgboul...@aim.com On Wed, 8 May 2013 08:37:12 -0700, Ed Jaffe wrote: A plausible motivation is that they want all jobs submitted via their scheduler. I agree that one should control resources. We have written a mechanism to replace SUBMIT which, based on an authorization scheme, a job runs with authority other than one's own. And all actions are logged. And noone has the authority to approve one's own job. The approval scheme is granular enough that each person has one or more demographics of group. Each approver has a list of groups they can approve. It has a number of usability features involving symbolic replacement and running lists of jobs. One can also specify the lpar to run on, but unfortunately not the plex. Written in Rexx assembler w/reports in cobol. - The information contained in this communication (including any attachments hereto) is confidential and is intended solely for the personal and confidential use of the individual or entity to whom it is addressed. If the reader of this message is not the intended recipient or an agent responsible for delivering it to the intended recipient, you are hereby notified that you have received this communication in error and that any review, dissemination, copying, or unauthorized use of this information, or the taking of any action in reliance on the contents of this information is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail, and delete the original message. Thank you -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
For those shops that don't have this kind of capability and don't have the resources to manage or control it, check out UpTown from RES (www.res-it.com). It does all of the below and more. Regards, Mitch McCluhan, Legacy Modernization Consultant -Original Message- From: Kirk Talman rkueb...@tsys.com To: IBM-MAIN IBM-MAIN@LISTSERV.UA.EDU Sent: Wed, May 8, 2013 12:50 pm Subject: Re: Duplicate Batch Job IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 5/08/2013 11:55:37 AM: From: Paul Gilmartin paulgboul...@aim.com On Wed, 8 May 2013 08:37:12 -0700, Ed Jaffe wrote: A plausible motivation is that they want all jobs submitted via their scheduler. I agree that one should control resources. We have written a mechanism to eplace SUBMIT which, based on an authorization scheme, a job runs with uthority other than one's own. And all actions are logged. And noone as the authority to approve one's own job. The approval scheme is granular enough that each person has one or more emographics of group. Each approver has a list of groups they can pprove. It has a number of usability features involving symbolic replacement and unning lists of jobs. One can also specify the lpar to run on, but nfortunately not the plex. Written in Rexx assembler w/reports in cobol. - he information contained in this communication (including any ttachments hereto) is confidential and is intended solely for the ersonal and confidential use of the individual or entity to whom t is addressed. If the reader of this message is not the intended ecipient or an agent responsible for delivering it to the intended ecipient, you are hereby notified that you have received this ommunication in error and that any review, dissemination, copying, r unauthorized use of this information, or the taking of any ction in reliance on the contents of this information is strictly rohibited. If you have received this communication in error, lease notify us immediately by e-mail, and delete the original essage. Thank you -- or IBM-MAIN subscribe / signoff / archive access instructions, end 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: OT - What is the proper term for K notation?
In 1367845369.9745.yahoomai...@web181401.mail.ne1.yahoo.com, on 05/06/2013 at 06:02 AM, Lloyd Fuller leful...@sbcglobal.net said: Actually, Univac played with it back in the 1960s/1970s. Any ternary logic or memory in the 1960's was probably implemented with discrete transistors rather than with IC's. -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: blue sky thought: new class of member name in a PDS
In CAAJSdjgxxP=+cGfTAer6+wEHKQ=nivp1no78c_lysn3we7o...@mail.gmail.com, on 05/06/2013 at 08:58 AM, John McKown john.archie.mck...@gmail.com said: This is just a weird thought, feel free to call me an idiot. But there are two classes of members in a PDS at present. There are normal member and there are ALIASes. It generally seems that an ALIAS does not contain a TTR per se, but actually contains the actual member name. Am I remembering correctly? No. -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
John, This is the first time I have had to take exception to a fact that you said and that is on the comment that we need a 8i multiple. Even with 64-bit addressing, it doesn't change the length of a branch or jump, they are still 4 bytes. A jump long is 6 bytes, so maybe 6i is possible, but that is a weird number to deal with in a binary environment. Of course you could use 8i with the following B *+4(R15) JLU COND0 NOPR 0 never executed, just here to fill space JLU COND8 NOPR 0 JLU COND16 NOPR 0 ... I think I will continue to prefer the more traditional 4i solution. Chris Blaicher Principal Software Engineer, Software Development Syncsort Incorporated 50 Tice Boulevard, Woodcliff Lake, NJ 07677 P: 201-930-8260 | M: 512-627-3803 E: cblaic...@syncsort.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Gilmore Sent: Wednesday, May 08, 2013 2:39 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Return codes There are also situations in which one wants to be able to set more than one of the diagnostic bits in a return code additively and unambiguously, and the alternative use of 0, 2, 4, 8, 16, . . . , i.e., the sequence 2^i, i = 0, 1, 2, . . . , powers of 2, permits this to be done. Still, the fact that successive branch-table addresses always differed by four bytes in probably explains the 4i, i = 0, 1, 2, . . . convention best. Now, of course, we need 8i, i= 0, 1, . . . , i.e., 0, 8, 16, 24, . . . John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ATTENTION: - The information contained in this message (including any files transmitted with this message) may contain proprietary, trade secret or other confidential and/or legally privileged information. Any pricing information contained in this message or in any files transmitted with this message is always confidential and cannot be shared with any third parties without prior written approval from Syncsort. This message is intended to be read only by the individual or entity to whom it is addressed or by their designee. If the reader of this message is not the intended recipient, you are on notice that any use, disclosure, copying or distribution of this message, in any form, is strictly prohibited. If you have received this message in error, please immediately notify the sender and/or Syncsort and destroy all copies of this message in your possession, custody or control. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
In cahtvvrww2c2_tq8uszm44p6pznvcbvgl6ffkkh68w8bogw4...@mail.gmail.com, on 05/07/2013 at 02:35 PM, Jake anderson justmainfra...@gmail.com said: The problem is that same Job is submitted multiple times and which Leads to unavailability of Initiator to other Genuine Jobs. If you are concerned with what the job does rather than with the job name then I doubt that there is any way to prevent duplicates. JES2 by default will only only allow a jobname on one initiator at a time, but that's a separate issue. -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
On Wed, 8 May 2013 14:41:28 -0400, Gerhard Postpischil wrote: While I prefer the branch table conjecture, I have a number of programs that use a three-way branch (e.g., CH R15,=H'8') to save, what in the good old days was expensive storage. As for range checking, my all-time favorite is CL (e.g., CL R15,=F'16' / BH) that catches both negative and excessive values. But does not catch values that are not multiples of 4. I suppose it's slightly more plausible that a future extension introduce RC=20 than that it introduce RC=3. IBM has complicated matters, starting with BPAM macros, by adding more return codes. I would have preferred the old 0,4,8,12 paradigm, with R0 set to a reason code. And ISRSUPC SRCHFOR returns RC=0 if the target is not found; RC=1 if the target is found. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
Chris Blaicher, Your sort of B/T has important uses, but one composed only of addresses is useful too. Perhaps it shoul;d be called an address table to avoid confusion. I will; send you an example privately. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
On May 8, 2013, at 3:50 PM, John Gilmore jwgli...@gmail.com wrote: Your sort of B/T has important uses, but one composed only of addresses is useful too. Perhaps it shoul;d be called an address table to avoid confusion. I will; send you an example privately. If you have a table with 8 byte addresses you can still use the multiple-of-4 return code convention, just shift left one bit before using it as an index. -- Curtis Pew (c@its.utexas.edu) ITS Systems Core The University of Texas at Austin -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
In cee89.5cf94be0.3ebad...@aol.com, on 05/07/2013 at 05:50 PM, Ed Finnell efinnel...@aol.com said: Yeah, we had a bright VMer said he could run circles around ISPF with XEDIT macros. Well, I'm a TSO bigot, but XEDIT has significant advantages over ISPF/PDF EDIT. OTOH, ISPF/PDF EDIT also has advantages over XEDIT. -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
Space in the JESx checkpoint area is also a finite resource even if the job never runs. Each job submitted requires a small amount of DASD space in the checkpoint area. Perhaps you should also consider preventing any given user from submitting an infinite number of valid, authorized, uniquely-named jobs. Bill Fairchild Franklin, TN - Original Message - From: Kirk Talman rkueb...@tsys.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, May 8, 2013 2:50:32 PM Subject: Re: Duplicate Batch Job IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 05/08/2013 11:55:37 AM: From: Paul Gilmartin paulgboul...@aim.com On Wed, 8 May 2013 08:37:12 -0700, Ed Jaffe wrote: A plausible motivation is that they want all jobs submitted via their scheduler. I agree that one should control resources. We have written a mechanism to replace SUBMIT which, based on an authorization scheme, a job runs with authority other than one's own. And all actions are logged. And noone has the authority to approve one's own job. The approval scheme is granular enough that each person has one or more demographics of group. Each approver has a list of groups they can approve. It has a number of usability features involving symbolic replacement and running lists of jobs. One can also specify the lpar to run on, but unfortunately not the plex. Written in Rexx assembler w/reports in cobol. - The information contained in this communication (including any attachments hereto) is confidential and is intended solely for the personal and confidential use of the individual or entity to whom it is addressed. If the reader of this message is not the intended recipient or an agent responsible for delivering it to the intended recipient, you are hereby notified that you have received this communication in error and that any review, dissemination, copying, or unauthorized use of this information, or the taking of any action in reliance on the contents of this information is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail, and delete the original message. 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: Return codes
But does not catch values that are not multiples of 4. I suppose it's slightly more plausible that a future extension introduce RC=20 than that it introduce RC=3. ISPF functions do return RC=20. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -Original Message- From: Paul Gilmartin paulgboul...@aim.com Sender: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Date: Wed, 8 May 2013 15:46:38 To: IBM-MAIN@LISTSERV.UA.EDU Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Return codes On Wed, 8 May 2013 14:41:28 -0400, Gerhard Postpischil wrote: While I prefer the branch table conjecture, I have a number of programs that use a three-way branch (e.g., CH R15,=H'8') to save, what in the good old days was expensive storage. As for range checking, my all-time favorite is CL (e.g., CL R15,=F'16' / BH) that catches both negative and excessive values. But does not catch values that are not multiples of 4. I suppose it's slightly more plausible that a future extension introduce RC=20 than that it introduce RC=3. IBM has complicated matters, starting with BPAM macros, by adding more return codes. I would have preferred the old 0,4,8,12 paradigm, with R0 set to a reason code. And ISRSUPC SRCHFOR returns RC=0 if the target is not found; RC=1 if the target is found. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
Perhaps we all should consider a better use of our time than worrying about
inconsequential things such as duplicate jobs being submitted? (8-{]}
I, for one, do not understand what the problem is. (8-{[}
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL
-Original Message-
From: DASDBILL2 dasdbi...@comcast.net
Sender: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
Date: Wed, 8 May 2013 22:19:02
To: IBM-MAIN@LISTSERV.UA.EDU
Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Duplicate Batch Job
Space in the JESx checkpoint area is also a finite resource even if the job
never runs. Each job submitted requires a small amount of DASD space in the
checkpoint area. Perhaps you should also consider preventing any given user
from submitting an infinite number of valid, authorized, uniquely-named jobs.
Bill Fairchild
Franklin, TN
- Original Message -
From: Kirk Talman rkueb...@tsys.com
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Wednesday, May 8, 2013 2:50:32 PM
Subject: Re: Duplicate Batch Job
IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on
05/08/2013 11:55:37 AM:
From: Paul Gilmartin paulgboul...@aim.com
On Wed, 8 May 2013 08:37:12 -0700, Ed Jaffe wrote:
A plausible motivation is that they want all jobs submitted via
their scheduler.
I agree that one should control resources. We have written a mechanism to
replace SUBMIT which, based on an authorization scheme, a job runs with
authority other than one's own. And all actions are logged. And noone
has the authority to approve one's own job.
The approval scheme is granular enough that each person has one or more
demographics of group. Each approver has a list of groups they can
approve.
It has a number of usability features involving symbolic replacement and
running lists of jobs. One can also specify the lpar to run on, but
unfortunately not the plex.
Written in Rexx assembler w/reports in cobol.
-
The information contained in this communication (including any
attachments hereto) is confidential and is intended solely for the
personal and confidential use of the individual or entity to whom
it is addressed. If the reader of this message is not the intended
recipient or an agent responsible for delivering it to the intended
recipient, you are hereby notified that you have received this
communication in error and that any review, dissemination, copying,
or unauthorized use of this information, or the taking of any
action in reliance on the contents of this information is strictly
prohibited. If you have received this communication in error,
please notify us immediately by e-mail, and delete the original
message. 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
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
On 8 May 2013 16:59, Pew, Curtis G curtis@austin.utexas.edu wrote: On May 8, 2013, at 3:50 PM, John Gilmore jwgli...@gmail.com wrote: Your sort of B/T has important uses, but one composed only of addresses is useful too. Perhaps it shoul;d be called an address table to avoid confusion. I will; send you an example privately. If you have a table with 8 byte addresses you can still use the multiple-of-4 return code convention, just shift left one bit before using it as an index. By the same token, you can have multiple-of-1 (i.e. arbitrary positive integer - is there a better name?) return codes, and shift left by 2 or 3 bits as appropriate. But it may be that the existing convention to some extent discourages very sparse return code domains, which makes the branch or address table scheme largely unusable. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Crypto Facility performance.
Ahem... Did you mean to say zEnterprise? System z is so last year. ;-) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of zMan Sent: Saturday, April 27, 2013 9:56 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Crypto Facility performance. zSeries doesn't support Protected Key. Oh, wait,you probably *really* meant System z. It's been eight years, time to upgrade your terminology, eh? On Fri, Apr 26, 2013 at 10:52 PM, Tim Henness ibmm...@henness.org wrote: 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: Crypto Facility performance.
Touche. But zEnterprise is a superset of System z, not a distinct architecture, isn't it? On Wed, May 8, 2013 at 7:35 PM, Dave Barry dba...@ups.com wrote: Ahem... Did you mean to say zEnterprise? System z is so last year. ;-) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of zMan Sent: Saturday, April 27, 2013 9:56 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Crypto Facility performance. zSeries doesn't support Protected Key. Oh, wait,you probably *really* meant System z. It's been eight years, time to upgrade your terminology, eh? On Fri, Apr 26, 2013 at 10:52 PM, Tim Henness ibmm...@henness.org wrote: 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 -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
John, My comments were based on what the previous people had been discussing, namely a branch table. An address table is a very viable alternative. Item of note, unless you are working with all your own code, you have to validate the value in R15 before just using it to branch into a branch table with tests that the value is within limits and the lower 2 bits are not on. Such as: BALR r14,r15Call your routine LRR14,R15DON'T DISTROY R15 CHI R15,16 CHECK HIGH LIMIT JHBADRETURN TOO BIG? DIE WITH MESSAGE N R14,=XL4'0003' ANY STRAY BITS? JNZ BADRETURN YES, DIE WITH MESSAGE B *+4(R15) BRANCH ACCORDING TO RC ... What I normally do is check for zero, if that is what you expect most often, then, if that fails, go through all the gyrations. BALR r14,r15Call your routine LTR R14,R15DID WE GET ZERO AS EXPECTED? BZRCZERO YES, - CHI R15,16 CHECK HIGH LIMIT JHBADRETURN TOO BIG? DIE WITH MESSAGE N R14,=XL4'0003' ANY STRAY BITS? JNZ BADRETURN YES, DIE WITH MESSAGE B *+4(R15) BRANCH ACCORDING TO RC ... I'm sure we all have our own techniques. Chris Blaicher Principal Software Engineer, Software Development Syncsort Incorporated 50 Tice Boulevard, Woodcliff Lake, NJ 07677 P: 201-930-8260 | M: 512-627-3803 E: cblaic...@syncsort.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Gilmore Sent: Wednesday, May 08, 2013 3:51 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Return codes Chris Blaicher, Your sort of B/T has important uses, but one composed only of addresses is useful too. Perhaps it shoul;d be called an address table to avoid confusion. I will; send you an example privately. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ATTENTION: - The information contained in this message (including any files transmitted with this message) may contain proprietary, trade secret or other confidential and/or legally privileged information. Any pricing information contained in this message or in any files transmitted with this message is always confidential and cannot be shared with any third parties without prior written approval from Syncsort. This message is intended to be read only by the individual or entity to whom it is addressed or by their designee. If the reader of this message is not the intended recipient, you are on notice that any use, disclosure, copying or distribution of this message, in any form, is strictly prohibited. If you have received this message in error, please immediately notify the sender and/or Syncsort and destroy all copies of this message in your possession, custody or control. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
And then you have C / C++ that uses RC=1 as the good return code. Any other is bad. Lloyd - Original Message From: Gerhard Postpischil gerh...@valley.net To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wed, May 8, 2013 2:41:51 PM Subject: Re: Return codes On 5/8/2013 2:14 PM, Elardus Engelbrecht wrote: Another possible reason is - same return codes standards are also used for macros (system services) and system exits. So one set of convention is used to pass info including RC from one module to another. While I prefer the branch table conjecture, I have a number of programs that use a three-way branch (e.g., CH R15,=H'8') to save, what in the good old days was expensive storage. As for range checking, my all-time favorite is CL (e.g., CL R15,=F'16' / BH) that catches both negative and excessive values. IBM has complicated matters, starting with BPAM macros, by adding more return codes. I would have preferred the old 0,4,8,12 paradigm, with R0 set to a reason code. Gerhard Postpischil Bradford, Vermont -- 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: OT - What is the proper term for K notation?
Not sure. I was just talking one time to one of the military people that were involved with Univac and the university (Oregon State, I think). He mentioned that they had experimented with it. And from the time frame you are probably correct that it was transistors rather than IC's. Lloyd - Original Message From: Shmuel Metz (Seymour J.) shmuel+...@patriot.net To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wed, May 8, 2013 4:28:58 PM Subject: Re: OT - What is the proper term for K notation? In 1367845369.9745.yahoomai...@web181401.mail.ne1.yahoo.com, on 05/06/2013 at 06:02 AM, Lloyd Fuller leful...@sbcglobal.net said: Actually, Univac played with it back in the 1960s/1970s. Any ternary logic or memory in the 1960's was probably implemented with discrete transistors rather than with IC's. -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: Duplicate Batch Job
Ted MacNeil's point is well taken. In any well-managed shop duplicate jobnames are chiefly if not exclusively a phenomenon of development LPARs, where they are neither deleterious nor important. We have here yet another instance of one or the other of the two least productive preoccuptations of IT managements: 1) If it can be counted, count it, repeatedly, even if it is not clear what use can be made of these counts, and 2) interdict, or anyway attempt to interdict, any practice that is judged to be anomalous. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
Lloyd Fuller wrote begin extract And then you have C / C++ that uses RC=1 as the good return code. Any other is bad. /end extract This practice reflects another C design defect. In the absence of an explicit boolean data type, C uses the dubious but ineluctable convention that a coded-arithmetic value of 1 represents truth and one of zero represents falsity. Values that are not 1, truth, are then by extension treated as representations of falsity. In and only in a UNIX | C/C++ ernvironment this convention has merit. Given the fraught decision to dispense with an explicit boolean data type, I cannot think of a convention that would be less objectionable; it makes the best of a bad situation; and it is also an interesting, all but unique instance of a retreat from the facilities that FORTRAN IV makes available in C, which is a very much more FORTRAN-like language than it is usually understood to be. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ternary logic, was: What is... K notation?
On 05/08/2013 08:02 PM, Lloyd Fuller wrote: Not sure. I was just talking one time to one of the military people that were involved with Univac and the university (Oregon State, I think). He mentioned that they had experimented with it. And from the time frame you are probably correct that it was transistors rather than IC's. Lloyd - Original Message From: Shmuel Metz (Seymour J.) shmuel+...@patriot.net To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wed, May 8, 2013 4:28:58 PM Subject: Re: OT - What is the proper term for K notation? In 1367845369.9745.yahoomai...@web181401.mail.ne1.yahoo.com, on 05/06/2013 at 06:02 AM, Lloyd Fuller leful...@sbcglobal.net said: Actually, Univac played with it back in the 1960s/1970s. Any ternary logic or memory in the 1960's was probably implemented with discrete transistors rather than with IC's. The Soviets actually built a computer model (Setun) with ternary logic in 1958, fifty built before production was finally halted in 1965. See http://en.wikipedia.org/wiki/Ternary_computer and http://en.wikipedia.org/wiki/Setun Those articles don't go into much detail, but other sources describe memory as being ternary as well, using two magnetic cores for a single ternary digit or two tracks on drum memory. Their ternary approach was apparently an ingenious solution to minimize costs within the constraints of existing technology. If the Soviets were trying that route, that alone would probably have caused our military to explore it. I would speculate that once large-scale integrated circuits tailored for binary logic became universally available, that effectively guaranteed that computers with binary logic and memory were much cheaper to build than ternary computers and probably explains why binary computers eventually replaced ternary development in the Soviet Union as well. -- Joel C. Ewing,Bentonville, AR jcew...@acm.org -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Duplicate Batch Job
On Wed, 8 May 2013 22:40:13 -0400, John Gilmore wrote: ... 2) interdict, or anyway attempt to interdict, any practice that is judged to be anomalous. In some cases when someone has espoused a practice or point of view that you judge to be anomalous, you characterize him as an intelligent Martian. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
When returning from function main() to the operating system, returning the macro value EXIT_SUCCESS is guaranteed to be equivalent to returning 0. EXIT_FAILURE is system dependent. For IBM's XL C/C++ compilers, EXIT_SUCCESS is defined as 0 and EXIT_FAILURE is defined as 8. :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On :: Behalf Of Lloyd Fuller :: Sent: Wednesday, May 08, 2013 6:00 PM :: To: IBM-MAIN@LISTSERV.UA.EDU :: Subject: Re: Return codes :: :: And then you have C / C++ that uses RC=1 as the good return code. Any :: other is :: bad. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ternary logic, was: What is... K notation?
On Wed, May 8, 2013 at 10:08 PM, Joel C. Ewing jcew...@acm.org wrote: On 05/08/2013 08:02 PM, Lloyd Fuller wrote: Not sure. I was just talking one time to one of the military people that were involved with Univac and the university (Oregon State, I think). He mentioned that they had experimented with it. And from the time frame you are probably correct that it was transistors rather than IC's. Lloyd - Original Message From: Shmuel Metz (Seymour J.) shmuel+...@patriot.net To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wed, May 8, 2013 4:28:58 PM Subject: Re: OT - What is the proper term for K notation? In 1367845369.9745.yahoomai...@web181401.mail.ne1.yahoo.com, on 05/06/2013 at 06:02 AM, Lloyd Fuller leful...@sbcglobal.net said: Actually, Univac played with it back in the 1960s/1970s. Any ternary logic or memory in the 1960's was probably implemented with discrete transistors rather than with IC's. The Soviets actually built a computer model (Setun) with ternary logic in 1958, fifty built before production was finally halted in 1965. See http://en.wikipedia.org/wiki/Ternary_computer and http://en.wikipedia.org/wiki/Setun Those articles don't go into much detail, but other sources describe memory as being ternary as well, using two magnetic cores for a single ternary digit or two tracks on drum memory. Their ternary approach was apparently an ingenious solution to minimize costs within the constraints of existing technology. If the Soviets were trying that route, that alone would probably have caused our military to explore it. I would speculate that once large-scale integrated circuits tailored for binary logic became universally available, that effectively guaranteed that computers with binary logic and memory were much cheaper to build than ternary computers and probably explains why binary computers eventually replaced ternary development in the Soviet Union as well. -- Joel C. Ewing,Bentonville, AR jcew...@acm.org Ternary, with values of 0,1,2, could be useful in a binary addition logic. You are only going to store 0 or 1, and the 2 represents a delayed carry of 1+1. -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ternary logic, was: What is... K notation?
Yeah, they even came up with flip-flap-flop nomenclature. Died pretty quick, but it sounded cool. In a message dated 5/8/2013 10:46:50 P.M. Central Daylight Time, mike.a.sch...@gmail.com writes: Ternary, with values of 0,1,2, could be useful in a binary addition logic. You are only going to store 0 or 1, and the 2 represents a delayed carry of 1+1 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Return codes
At 20:34 -0400 on 05/08/2013, Blaicher, Christopher Y. wrote about Re: Return codes: What I normally do is check for zero, if that is what you expect most often, then, if that fails, go through all the gyrations. BALR r14,r15Call your routine LTR R14,R15DID WE GET ZERO AS EXPECTED? BZRCZERO YES, - CHI R15,16 CHECK HIGH LIMIT JHBADRETURN TOO BIG? DIE WITH MESSAGE N R14,=XL4'0003' ANY STRAY BITS? JNZ BADRETURN YES, DIE WITH MESSAGE B *+4(R15) BRANCH ACCORDING TO RC Since you have already verified that R15 is not Zero, you can make that B *+4(R15) into a B *(R15) thus making the Branch Table handle only RC=4/8/12/16. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
