Re: Why does Enterprise COBOL V4.1 optimization complain about a PERFORM loop?
On 23 Apr 2012 12:36:08 -0700, in bit.listserv.ibm-main (Message-ID:985915eee6984740ae93f8495c624c6c21e1d43...@jscpcwexmaa1.bsg.ad.adp.com) peter.far...@broadridge.com (Farley, Peter x23353) wrote: 33PERFORM PARA-1 THRU PARA-EXIT. 34GO TO RETURN-TO-CALLER. 35 36PARA-1. 37IF PARM-MM 06 38 1 MOVE +2 TO WS-SUB. 39PERFORM SUB-PARA-2. 40PERFORM SUB-PARA-1. ==40== IGYOP3094-W There may be a loop from the PERFORM statement at PERFORM (line 40.01) to itself. PERFORM statement optimization was not attempted. 41MOVE WS-SUB TO RETURN-CODE. 42GO TO PARA-EXIT. 43 44SUB-PARA-1. 45IF WS-SUB 6 46 1MOVE 0 TO WS-SUB 47 1GO TO PARA-EXIT. 48 49SUB-PARA-2. 50DISPLAY WS-SUB. 51 52PARA-EXIT. 53EXIT. It's been a *long* time since I coded Cobol, but I suspect the compiler is right. SUB-PARA-1 is part of the PERFORM in line 33. Thus, as far as the compiler can tell, you're performing yourself from within the perform, which could easily lead to an endless recursion. Try moving both SUB-PARAs out of PARA-1 and give each their own EXIT. If you want that extra execution of -2, code it as another PERFORM. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at pobox dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: A JCL Problem question
On 26 May 2011 13:46:10 -0700, in bit.listserv.ibm-main (Message-ID:c3ecc2048cc02a42806c6211b832a597048a01d...@srvmailsp01.gravames.com.br) sergio.co...@cetip.com.br (Sérgio Lima Costa) wrote: But, when try run, this mistake appear, and I can't see where is the problem : IEC130I SYSTSIN DD STATEMENT MISSING IEF472I BINDSYS DB2COB - COMPLETION CODE - SYSTEM=000 USER=0102 REASON= The SYSTSIN is there, where is the problem ? You have a SYSTSIN on the 2nd step, but the error message seems to be coming from the first step. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at pobox dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Does an 'operator error' counts as a 'glitch?
On 13 Jul 2010 11:05:44 -0700, in bit.listserv.ibm-main (Message-ID:aanlktinbp3mc8a7iukmsoxccygys-gj7fplatsvwo...@mail.gmail.com) zedgarhoo...@gmail.com (zMan) wrote: I use a site that requires 8-byte passwords, changed every n days, with no more than 3 characters from the previous password in a row and at least one digit,, which can't be leading or trailing. Surprise, we use ABCnnDEF, where the nn is what changes. Fortunately this isn't an important site, so I'm not worried about someone getting at it, but it's an example where the stupid restrictions fail. One company had arcane RACF rules for password composition but for security reasons wouldn't even tell the users what those rules were. After trying several times to give it a password it liked, I was told that everyone just uses a certain fixed pattern, part of which was part of the userid, and certain positions were numerics which get changed when needed. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at pobox dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Delete all members of a PDS that is allocated
(Sorry, I originally sent this to the newsgroup instead of the Listserv.) On 23 Jun 2010 17:39:54 -0700, in bit.listserv.ibm-main (Message-ID:listserv%201006231937408428.0...@bama.ua.edu) gsg_...@yahoo.com (gsg) wrote: Does anyone know of a way to delete all of the members of a PDS which is allocated by job scheduler software? We currently use an assembler program that does a reset(I think), but management wants us to not use assembler. In other words, you have a technique which has been working, and has been tested over time. It costs nothing. Instead, your management wants you to come up with something new, that will cost, at minimum, many man-hours to find, write, debug, test, and get moved into production. It's quite possible that the solution you come up with (e.g. Startools or its free cousin, the PDS command from the CBT tape) is also written in assembler. You might start by asking your management why they want to waste money or man-hours in a tight economy. You might also tell them that you're *not* using assembler; you're using an executable program that's very little different from any other executable except that it does just what you want it to do. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Heads Up: APAR IO11698 - New SAF FACILITY class definition required for any SMP/E use
On 2 Apr 2010 21:41:10 -0700, in bit.listserv.ibm-main (Message-ID:ofa817fc6f.38ddd672-on852576fa.0017ea06-852576fa.0019b...@us.ibm.com) d10j...@us.ibm.com (Jim Mulder) wrote: And this whole idea of trying to hide Integrity APARs has outlived its usefulness. If it ever had any. I have no gripe with fixing the hole then letting the cat out of the bag, but never doing it ?. Don't vendors ever learn ?. We have no way of knowing when all customers have applied a System Integrity fix to all systems, so that there are no longer any exposed systems anywhere in the world. Discussions right here on IBM-MAIN suggest that some customers run releases which are no longer supported, and a fix will never be available for those unsupported releases. As a courtesy to customers with exposed systems, we do not discuss the nature of System Integrity APARs, since understanding an exposure is one of the steps towards formulating a method of attack on an exposed system. Naturally, you may be curious about the nature of an exposure, and of course, we would love to show off how clever we were in discovering an exposure by telling you all about it. However, we feel that your curiosity and our desire to show off are overridden by the need to avoid unnecessarily assisting potential attackers. This particular fix, though, requires each company's security department to define who can use SMP/E and in what way. Without knowing what the security hole is, how can they know how to assign access? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at pobox dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/OS V1R11 Library unzip problem
On 30 Mar 2010 12:41:02 -0700, in bit.listserv.ibm-main (Message-ID:cc4c42804bc20a41acb7e937e4a758e8057185b...@c1mbc130.corp.alliance.lan) luke.ra...@countryfinancial.com (Rabbe, Luke) wrote: IBM Online Library: z/OS V1R11 and Software Products DVD Collection, September 2009 Download to your workstation in KITZIP format - (k3t4271n.zip)(5375.0 MB) The ZIP file ended up being over 1GB on my PC. My problem is that I'm unable to extract the files using WinZip or WinRAR. I receive this error: Cannot open file; it does not appear to be a valid archive. I hesitate to mention something that seems obvious, but 5375.0 MB is WELL over 1GB. Are you getting the whole file? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at pobox dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Posts missing from ibm-main on google groups
On 28 Jan 2010 11:46:49 -0800, in bit.listserv.ibm-main (Message-ID:blu137-w226dc0c084578fb0fd248fa3...@phx.gbl) jayare...@hotmail.com (J R) wrote: Ron, I'm perplexed. I use google groups to monitor ibm-main, using the email interface only when posting. In general, this works well for me. However, just recently, posts from your good self are not showing up unless someone quotes them. Any idea why? The problem is not with Google Groups. It appears that some posts are not making it to Usenet. What's odd is that recently this happened in at least one other newsgroup (comp.risks). Some posts are not making it through the mirrors to Usenet. I doubt that there is anything odd in Ron's post; he's a victim, too. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at pobox dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: user-written MVS subsystems
On 16 Nov 2009 11:37:23 -0800, in bit.listserv.ibm-main (Message-ID:listserv%200911161336217871.0...@bama.ua.edu) martin.kl...@yrcw.com (Martin Kline) wrote: If it were my code and I still supported it, then I'd rewrite it to use the 'preferred' macro interfaces. On 16 Nov 2009 12:24:03 -0800, in bit.listserv.ibm-main (Message-ID:c648d10634943c4891f7085d0dad806b579d6...@usmbx06.aafes.com) elli...@aafes.com (Elliot, David) wrote: If I was made responsible for this something like this I would start by examining exactly what services are provided by the subsystem and then see how they could be replaced. And this research and coding would be done in your copious spare time? There's also this: If the original code fails, you have to fix it. If it fails after you change *anything*, you'll also get blamed for the failure. I'm not saying that changing the code is wrong. I am saying there are valid reasons to leave running code alone. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JES2 Parmlib inconsistent with active definitions
On 14 Oct 2009 03:11:45 -0700, in bit.listserv.ibm-main (Message-ID:listserv%200910140509363799.0...@bama.ua.edu) luc.mart...@kbc.be (Luc Martens , KBC) wrote: we recently had some incidents which caused us a lot of debugging before we noticed what was going one. Some JES2 parmlib definitions did not correspond with the actual state of the definitions in JES2. This doesn't exactly address your issue, but is it time (and is it feasible) to open a requirement to IBM? The requirement would be for a JES2 command which would create a valid parmlib that matched the current settings. Business reasons: 1. As stated, it's easy for the existing parmlib to get out of sync with actual, used settings. It would be good to know that for a cold start the settings would match what had been in use before. Cold start could be for some planned reason, at one's normal site or at a DR site. (Time is precious at a DR test; you don't want to waste it in problem determination only to find that the root cause was reverted parmlib changes.) 2. A shop could use two of these taken at different times to compare and verify that all and only the authorized changes had been made. Since the output parms would be expected to be in some fixed, defined order, the compare would be easy. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: your session 2817: Bit Bucket x '25' pitch
On 12 Sep 2009 19:59:20 -0700, in bit.listserv.ibm-main (Message-ID:listserv%200909122156538739.0...@bama.ua.edu) michaeljosephcle...@yahoo.com (Michael Cleary) wrote: I noticed last week and didn't get a chance to report it yet, that the link to the EVERY Bit Bucket from EVERY SHARE on the SHARE MVS Core Technologies Project page is not working. When I click on it, it opens a new window and I end up on the www.share.org home page. I suspect you clicked on the link which got split onto two lines. Try his tinyurl or this one (in which I attempt to unsplit his): http://www.share.org/Volunteers/ProgramsandProjects/MVSProgram/MVSArchives/tabid/309/Default.aspx -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z10 and overlapping/destructive moves
On 7 Aug 2009 15:28:17 -0700, in bit.listserv.ibm-main (Message-ID:053f2631ec9c584883847c8b4970a22804998...@josqems1.jsq.bsg.ad.adp.com) peter.far...@broadridge.com (Farley, Peter x23353) wrote: The vendor would be IBM, the compiler is Enterprise COBOL V3.4. I can try the ALLSPACE suggestion just to see if it makes a difference, If you can prove that this change makes a performance difference, the compiler people might take an APAR. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Bulletproof (was Re: Mainframe hacking (getting back on topic))
On 21 Jul 2009 15:31:59 -0700, in bit.listserv.ibm-main (Message-ID:4a6641a0.80...@ync.net) rfocht...@ync.net (Rick Fochtman) wrote: Shane, you're at a point where you must depend on the vendor's integrity. See my previous post in this thread. We had a security audit, years ago, that showed us a hole in IDMS that could be used to bypass security. When we brought it to the attention of the vendor, we had a fix, in source form, in 3 days flat. When we found a *major* security hole in another product (it was leaking our passwords to outside organizations), their team fought us with obtuseness and then delay. I left my company less than a year after the vendor said they might, eventually, fix it, so I don't know if it has yet been fixed. CERT and well-respected security experts tell us that many vendors (not necessarily for mainframe) will *not* fix a hole until someone at least threatens to go public with it. My company would not allow me to do that. I'm heartened to see that not all 3rd-party vendors are so clueless. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: INFOZIP 2Gb
On 2 Jun 2009 07:59:48 -0700, in bit.listserv.ibm-main (Message-ID:e9b711ddd327e345bd0e8d20960bc9880ac51...@ptabrmsg02.sars.gov.za) vbho...@sars.gov.za (Vikesh Bhoola) wrote: I've searched the archives of previous posts on the subject in the hope someone has experienced the same problem. However I only managed few statements that perhaps indicate that INFOZIP has a 2Gb limit. The file we need to zip actually has: 15,694,524,498 Bytes GIYF. http://www.info-zip.org/FAQ.html#limits says (slightly edited by me): uncompressed size of a single file - 4 GB - This is also not a hard limit, in that the deflate algorithm used in all recent releases has its own end of stream marker. Some file systems and/or C libraries may not support files this big, however... Also, to report bugs: http://www.info-zip.org/board/board.pl -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: A foolish consistancy or 3390 cyl/track architecture
On 26 Mar 2009 11:54:41 -0700, in bit.listserv.ibm-main (Message-ID:listserv%200903261353191123.0...@bama.ua.edu) joa...@swbell.net (John McKown) wrote: Now, why is 14 tracks per cylinder so sacrosanct? Why didn't IBM create a new DASD with 2^16-1 (x'') cylinders where each cylinder has 2^16-1 (x'') tracks? And, when someone runs old JCL which requests two cylinders for a new dataset? I expect that your solution would have been easier for IBM, but many of their customers would have issues as above. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Do and don't in programing (Security wise)
On 3 Mar 2009 14:14:45 -0800, in bit.listserv.ibm-main (Message-ID:listserv%200903031608076036.0...@bama.ua.edu) joa...@swbell.net (John McKown) wrote: Well, that defeats one of my forced abend techniques: BRC cond,*+2 This branches into the middle of the BRC (Jump) instruction, which in this case is always x'0001', resulting in an S0C1 abend. SOC1s are too common to stand out. I prefer EX R15,*(Of course, it doesn't matter which register.) -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM mainframe migration boosts OLTP, batch processing
On 7 Jan 2009 11:37:05 -0800, in bit.listserv.ibm-main (Message-ID:listserv%200901071336050361.0...@bama.ua.edu) m42tom-ibmm...@yahoo.com (Tom Marchant) wrote: From SearchDataCenter today Mark Fontecchio, News Writer For some companies, making the decision to migrate off the mainframe is tough, ... http://searchdatacenter.techtarget.com/news/article/0,289142,sid80_gci13 43627,00.html?track=NL-576ad=682564asrc=EM_NLN_5496982amp;uid=279318 Here's a tiny URL. http://preview.tinyurl.com/86wp54 Doesn't make much sense to me. Says they add 50% to their processing power every two years Even stranger: the company added 50% more processing power every two years. Even so, at the end of the month, Meritz reached 100% CPU utilization during peak times. Most mainframes run at 100% CPU; the OS is designed for that. Maybe CPU wasn't the bottleneck? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
OCO, documentation, support from IBM-Main, etc. (was Re: Health Checker questions)
On 11 Dec 2008 07:08:48 -0800, in bit.listserv.ibm-main (Message-ID:listserv%200812110906199610.1...@bama.ua.edu) wfarr...@us.ibm.com (Walt Farrell) wrote: On Thu, 11 Dec 2008 15:38:15 +0100, R.S. r.skoru...@bremultibank.com.pl wrote: There is absoluetely no explanation why should I use HZSAIEOF program despite IEFBR14 performs the same work. We often do not document -why- you need to do things a certain way, but simply tell you what you need to do. HZSAIEOF does processing that IEFBR14 does not perform. You might or might not notice the difference in all cases, but there is one, and so you should do as the documentation directs in order to avoid potential problems. It's been a long time since IBM went OCO. When they did, didn't they promise better documentation to make up for the inability to see what the programs are actually doing? Meanwhile, to Walt: Radoslaw has been a useful contributor to IBM-Main. He's done the RTFM step. He deserves better than being talked down to. If you're not allowed to give the answers he wants, you would sound less condescending to come right out and say so. How can he better his understanding if you're telling him he shouldn't even be asking the questions? Your answers to other questions have certainly been much more open and useful. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dynamic JES2 exits, was I dreaming
On 8 Sep 2008 17:51:45 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Gibney, Dave) wrote: I swear I understood from somewhere, I thought here on IBM-MAIN that z/OS 1.9 JES2 came with the ability to dynamically load and/or define Jes2 exits. I'm either dreaming, or my RTFM skills are shot. Regardless of the FMs, a quick search of IBM-Main for a Subject with dynamic suggests you should... Look at apar OA21346 - NEW FUNCTION- DYNAMIC EXIT SUPPORT. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
CBT tape web site
For many years, I've been using the CBT web site. I haven't heard of any complaints as to its design or usability. I can not use it now. I get a screen that's totally blank except for a complaint that I don't have Jave Script enabled. It doesn't even have the decency to display an e-mail address for the webmaster. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CBT tape web site
Thank you. I'll change my bookmark. On 3 Sep 2008 09:02:37 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Cebell, David) wrote: http://www.cbttape.org/index.html -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Arthur T. Sent: Wednesday, September 03, 2008 10:41 AM To: IBM-MAIN@BAMA.UA.EDU Subject: CBT tape web site For many years, I've been using the CBT web site. I haven't heard of any complaints as to its design or usability. I can not use it now. I get a screen that's totally blank except for a complaint that I don't have Jave Script enabled. It doesn't even have the decency to display an e-mail address for the webmaster. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CBT tape web site
On 3 Sep 2008 08:41:15 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Arthur T.) wrote: For many years, I've been using the CBT web site. I haven't heard of any complaints as to its design or usability. I can not use it now. I get a screen that's totally blank except for a complaint that I don't have Jave Script enabled. It doesn't even have the decency to display an e-mail address for the webmaster. Once Sam Knutson replied suggesting that he had some power over the site, I continued this with him, off-list. He has fixed it, and the bare URL (without index.html) again works fine without active scripting. Thank you, Sam. Fast work! -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: signing off my corporate email account
On 28 Aug 2008 11:38:29 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (John McKown) wrote: They are now not only demanding that stupid disclaimer, but demanding that all email be posted in HTML so that the disclaimer is sent with the corporate approved font and color scheme. It's a losing battle, but you might try some combination of: 1. Find sites which explain that the disclaimers aren't legally binding, anyway. Explain that the company may get bad publicity if its disclaimer ends up on (e.g.) http://www.goldmark.org/jeff/stupid-disclaimers/list.html. 2. Show them a screen print of their HTML disclaimer from a non-HTML email client. Suggest that any legally binding effect of the disclaimer may be nullified if it is thus hidden within unreadable HTML text. 3 Search for various sites which explain why HTML email is bad, in general. Show them to your boss. (E.g. http://www.expita.com/nomime.html.) 4. Research past work-related questions you've asked on Listservs (this and others), and the amount of time it took to get back good answers. Explain that this source of answers is not available if you're required to post in HTML. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: signing off my corporate email account
On 28 Aug 2008 11:38:29 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (John McKown) wrote: They are now not only demanding that stupid disclaimer, but demanding that all email be posted in HTML so that the disclaimer is sent with the corporate approved font and color scheme. FUP to my recent reply: I forgot to mention the ASCII Ribbon Campaign. Google it to help buttress your arguments. /\ \ / ASCII RIBBON CAMPAIGN XAGAINST HTML MAIL / \ -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: NOMAIL Option in TSO/E
On 5 Aug 2008 05:50:54 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Varun Manocha) wrote: Actually, the problem I am trying to address here is that users on this particular system do net get messages about the jobs that have completed while they were logged off. For this I need to set the option to MAIL (instead of NOMAIL). Since, the users here don't get a full screen logon panel, I can't have them enable/disable the NOMAIL option. I have further found out that this client uses a TSO logon pre-prompt exit and it looks like the MAIL option is not being set (the default is OFF) in the exit. Hence, I believe my only option would be to either modify the exit or to include a TSO LISTBC command in the logon proc such that it would be executed automatically when the user logs on. The first step is to have a user issue the LISTB MAIL command. If he sees the missing messages, then the problem is the NOMAIL logon option. If the user doesn't see the missing messages, they're being lost, and MAIL or NOMAIL at logon won't make a difference. In that latter case, you have to search for how the messages are disappearing. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/OS 1.9 System Commands Memory Reconfiguration Issue
On 21 Jul 2008 09:51:17 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Jim Mulder) wrote: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 07/21/2008 10:26:58 AM: We had an issue last week where we needed to add memory to one of our LPARs on the fly. We keep some memory marked reconfigurable but we've never had to use it before. We found out that we had to configure all our reconfigurable storage that the LPAR in question knew about online in order to get any of it online because you can only configure elements apparently. That's not the issue. My issue with IBM is that when I went into the System Commands book to try and research why we had to do it this way and what our alternatives were I discovered that the section on Central Storage reconfiguration has not been updated since ES9000 days. Since the book talks about how up to 64M of memory is broken up and since I was complaining because my machine wanted to vary memory on or off in 128M chunks (awfully small when you're talking about 50G) this isn't very helpful. Storage reconfiguration is not limited to elements. You should be able to configure amounts and ranges of storage, but the amount or range must be a multiple of the increment size. Unfortunately, there is no MVS operator command to display the increment size. However, if you use SYS1.MACLIB(IHASCCB) to map the area pointed to by CVTSCPIN (CVT+340), then SCCBSAI (or if it is zero, use SCCBSAIX) allows you to compute the increment size. I guess the obvious reaction is to submit a Readers' Comment Form for that above procedure to be added to the System Commands manual. I'm sorry, Jim, I couldn't resist that. The real obvious reaction is that we need a command to tell us what the increment size is, or for the error message to display the legal increments. We shouldn't each have to write programs based on Jim's hints. At a time when you need this command, you DON'T want to be searching through the many possible manuals and red books looking for the information, nor, upon finding Jim's post, writing and debugging a program to compute the increment size. I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Going unsupported - time to fold?
On 7 Jul 2008 15:23:20 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Thompson, Steve) wrote: Running without support should not be that big of a problem, if you have no outstanding problems today. And if you are a stable shop, with minor applications being changed, you should be fine. However, if there is some hardware issue that needs/requires micro-code changes (Ecs), and then certain changes to IBM's I/O code and then an ISV's code, you will be behind the curve. Not to mention interfacing new software (such as software to let other platforms comminicate with the mainframe). -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL/PARM puzzle
On 24 Jun 2008 10:20:54 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (John Norgauer) wrote: I have two sets of JCL that are executing BPXBATCH. The first set follows and it did not work. 10 //PS082 EXEC PGM=BPXBATCH, // // PARM='SH echo sftp -vvv -b /u/bpxbatch/mccheckftp 11 // fis-depot.ucdavis.edu |su -s bpxbtch' This set of JCL's worked: //PS082 EXEC PGM=BPXBATCH, // // PARM='SH echo sftp -b /u/bpxbatch/mccheckftp fis-depot.ucdavis.edu // |su -s bpxbtch' The parm is in quotes. Continuing a parm within quotes requires that the continuation line (except for the //) begin in column 16. Check the JCL manual. P.S. Likely my e-mail program will have split the quoted lines making them difficult to understand. I apologize in advance. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Outsourcing dilemma or debacle, you decide...
On 12 Jun 2008 10:10:27 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Pinnacle) wrote: The OP clearly shows that people overseas are not as skilled (even more skilled? That's a joke). The OP clearly shows that the person replacing him is not as skilled as he should be. But even that person might be smart enough not to generalize from one data point. I can find nothing in the original post that denigrates an entire country's people. At one time when we sysprogs were overworked, a consultant was brought in to update an SMF exit. He made numerous elementary mistakes. After about 2 weeks, I finally got time and updated the program in about 6 hours. During those two weeks, the consultant was working on it constantly and had had at least 5 IPLs to test his changes. We ended up not paying him for his time. He was American. Should we now generalize about the skill levels of Americans? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: crazy thoughts - keeping product installation infomation
On 15 May 2008 00:13:05 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Andrew Armstrong) wrote: If the Wiki is located at your DR site then you automatically have the information you need when you need it. My feeling is that the only times you should have to back up data from the DR site is after a test or after a disaster. Putting live data there could really confuse things. How do you get the data if the DR site is down? Much better to follow SOP and put the data in some normal place, take normal backups of it, and have procedures to restore it at the DR site when needed. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe programming vs the Web
On 14 May 2008 08:38:36 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Martin Packer) wrote: What it means is that - with suitable protections (such as NoScript), suitably deployed - javascript is perfectly safe. So I don't think we're disagreeing at all. Now, if one's browser has no NoScript equivalent that's another matter. I just assume sensible people go into battle with a whole clutch of extensions to their browser of choice. I was going to reply to this with a different viewpoint. However, if I do, I can't ethically suggest this, instead: Isn't it time to kill this thread? I can't see any connection between the last half dozen posts (at least) and mainframes. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: how do I pause a set of commands
On Wed, 14 May 2008 11:36:34 -0700 (PDT), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: I have a shutdown routine that submits a bunch of MVS commands ie(/* $VS,'STOP RMF.RMF). The problem I have is I have a child/parent relationship and the child MUST shutdown 1st or the parent won't. I have the child shutting down in my 1st line and the parent last, but the time isn't enough. I thought there was a way to place a delay of some type in th elist of commands to give me the time I need. For the life of me I can't find the info anywhere, so any help is greatly appreciated Thanks in advance mace 1. Join the Listserv so your posts can be seen by everyone, not just those of us who read via Usenet. Instructions are at the end of this message (and every message sent via the Listserv). 2. How are you submitting the commands? Homegrown program? SDSF in batch? REXX or CLIST? JCL? Something else? 3. There are a lot of programs to automate commands. Some are free (e.g. from http://www.cbttape.org/). 4. I find I've been saying this an awful lot lately, but you ought to read How to ask questions the smart way http://www.catb.org/~esr/faqs/smart-questions.html. Actually, everyone should. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CLIST and REXX list locations
On 14 May 2008 12:25:27 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Jack Kelly) wrote: Does anyone know the location to access the CLIST and/or REXX lists archives? REXX group seems to be bit.listserv.tsorexx but I can't get to the archives. You're right about REXX, but there is also comp.lang.rexx on Usenet (for all REXX topics rather than being restricted to REXX on the mainframe). As for the archives, I have two answers: 1. At the bottom of each post is: For TSO-REXX subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: INFO TSO-REXX (But, I think you must subscribe to be able to get access to the archives.) 2. Since the Listserv is mirrored to Usenet, you can use Google to search group bit.listserv.tsorexx. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe programming vs the Web
On 12 May 2008 01:55:00 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Martin Packer) wrote: I hope you're not suggesting javascript is evil and to be avoided at all costs. And I do hope you'll trust IBMLink in that regard. Remember, you're not just trusting that IBM doesn't want to do something malicious. You're also trusting that they haven't made a mistake in their code that does something accidentally nasty. More importantly, you're also trusting that their site hasn't been hacked. Since even the sites of security gurus have been hacked, that's an awful lot of trust. Java is safe, at least theoretically, because it runs in its own virtual machine. Javascript, by design, can do damn near anything to your machine. What part of letting a site have nearly full control of your own machine do you think is not evil? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe programming vs the Web
On 12 May 2008 14:14:14 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Robert A. Rosenberg) wrote: At 16:38 +0100 on 05/12/2008, Martin Packer wrote about Re: Mainframe programming vs the Web: Javascript, by design, can do damn near anything to your machine. What EXACTLY do you claim that JavaScript can do that is dangerous? It has no ability to access the Hard Drive (so it can not look at your files) or things like that. One old standby was to open dozens or hundreds of browser windows with ads in them. It could lead to a reboot just to get back control of your computer. I'm not an expert, so I let Google do the work. Some of the exploits are old, but they do or did exist. Here's just a sample: From http://www.pantos.org/atw/35547.html Basically, any Web page that wants to can monitor and record every move made by any user who hasn't disabled JavaScript. The information that can be obtained includes virtually every bit of data passed between the user and every remote Web site they visit (including encrypted data, complete with decryption keys). http://www2006.org/programme/files/xhtml/17/xhtml/fp17-atterer.html We present an implementation for detailed tracking of user actions on web pages. An HTTP proxy modifies HTML pages by adding JavaScript code before delivering them to the client. This JavaScript tracking code collects data about mouse movements, keyboard input and more. We demonstrate the usefulness of our approach in a case study. http://www.nist.org/news.php?extend.175 Two Hackers at the ToorCon hacker conference demonstrated a flaw in Firefox that could lead to arbitrary code execution. The problem is with how Firefox implements JavaScript. ... When this is done it appears that whatever the Javascript did in the browser actually came from the website. So when you think you are entering your pin number on the banks site you may actually be entering it on the phishing / hackers site http://www.tcmagazine.com/forums/index.php?showtopic=2662 For example - if you follow security related news, you will see that JavaScript is the key avenue being used against you in today's attacks (even thru adbanners!) http://www.blackhat.com/html/bh-usa-06/bh-usa-06-speakers.html Imagine you're visiting a popular website and invisible JavaScript exploit code steals your cookies, captures your keystrokes, and monitors every web page that you visit. Then, without your knowledge or consent, your web browser is silently hijacked to transfer out bank funds, hack other websites, or post derogatory comments in a public forum. No traces, no tracks, no warning sirens. In 2005's Phishing with Superbait presentation we demonstrated that all these things were in fact possible using nothing more than some clever JavaScript. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: absurd programs that used to be everywhere ...
On 9 May 2008 06:21:05 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (F. J. Kelley) wrote: Anyway, I've been asked if I can provide banners ... sheesh ... The kind printed on fanfold (ie greenbar) paper. Have you considered the CBT tape? File 88 contains program poster. I found a few other possible programs mentioned in CBT file 1. File88: http://www.cbttape.org/ftp/cbt/CBT088.zip -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: APAR acronym
On 5 May 2008 13:38:29 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (, IBM Mainframe Discussion List) wrote: IBM may want us to think an APAR is an Authorized Program Analysis Report, but I'm not going to let them fool me. In answer to the OP: I heard it as authorized at least back to the 80s if not the 70s. Until your post, I had never heard applied. I know it is really a three-banded South American armadillo (Tolypeutes tricinctus). I was a bit surprised the first time I saw it in a crossword puzzle many years back. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Huh?
On Wed, 16 Apr 2008 10:25:07 -0700 (PDT), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: What could account for the following IDCAMS output? DELETE ('RACFID') ALIAS CATALOG('USER.CATALOG') IDC3012I ENTRY RACFID NOT FOUND IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEG-42 IDC0551I ** ENTRY RACFID NOT DELETED IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8 The above statement is attempting to remove an alias entry *from* (not *of*) USER.CATALOG. Since the alias entry is in the mastercat, it's not found. DEFINE ALIAS (NAME('RACFID') REL('USER.CATALOG') ) IDC3013I DUPLICATE DATA SET NAME IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLEH-38 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 Because the alias entry was not deleted from the mastercat, it's still there. Solution: Remove the CATALOG() parm from the first command. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS allocation in Cylinders using AMS
On 16 Apr 2008 10:28:21 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Gilbert Cardenas) wrote: Hello everyone, I have an unknown that I have not been able to figure out or at least I don't know where to look. I have a user who is trying to define a vsam file using IDCAMS as follows: DEFINE CLUSTER - ( NAME(BLAH.BLAH.BLAH) - LINEAR - REUSE - CYL(30) - SHAREOPTIONS(3 3) ) - DATA - ( NAME(BLAH.BLAH.BLAH.DATA) - ) - CATALOG(BLAH) The problem is, when I look at the dataset (which is SMS managed) it usually ends up being around 3 times larger than what the user requested. snip Looking at the Access Method Services documentation, it states that you should not use the TRACKS or CYLINDERS parameters. If you use them for an SMS-managed data set, space is allocated on the volumes selected by SMS in units equivalent to the device default geometry. You don't mention the CI size. This is pure guesswork, but it could work like this: CYL(30) is converted to about 25,500,000 bytes. If CI size is 512, you get only 25,088 bytes per track, so that number of bytes requires about 1017 tracks or 68 cylinders. That's not a factor of 3, but it is more than a factor of two. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Email blacklist
On 28 Mar 2008 12:44:12 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Morris, Carey) wrote: A few nights ago we started getting this message when we tried to send emails from the mainframe to our Outlook email server: EZA5198I 03/25/08 23:25:23 2 550 Denied by policy: Sender is listed on DNS-based RBL. The Outlook admin explained that we use several outside services to identify email from SPAM sites and, for whatever reason, one of those sites had identified the mainframe's IP as a SPAM'er. He said we should also be getting a message or email identifying the IP address of the service that had blacklisted us. The problem cleared by itself, presumably when the service corrected the problem, but I have not been able to find anything in the Communications Server manuals that talks about this. Has anyone else had the honor of being blacklisted and, if so, did they receive anything to tell them who had blacklisted them? Try putting your IP address(es) and/or domain name(s) into http://moensted.dk/spam/ -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: More SDSF security questions
On 25 Mar 2008 06:37:16 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Rich Smrcina) wrote: I tried PREFIX and I get COMMAND NOT AUTHORIZED. You had given us the output of the WHO command in batch, but you never showed us the output from what you hope is the same userid in TSO. I suspect they're different. As I mentioned in a related thread some time ago: Many years back I found out that the userid used to search the SDSF tables is *not* the RACF userid when done from batch. Instead, it's the jobname-minus-last-character. I had opened a PMR; I forget details of the response, but they basically said WAD. So, give us the WHO from batch *and* TSO. If they're different, that explains a lot. Then try using a jobname of your userid plus one character and try again and let us know. I never did find out if IBM finally fixed this security problem. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Convert EBCDIC to ASCII in batch?
On 20 Mar 2008 11:49:31 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Ed Finnell) wrote: In a message dated 3/20/2008 1:43:25 P.M. Central Daylight Time, [EMAIL PROTECTED] writes: (ISO8859-1). I can think of a way to do it using UNIX services, but I'm hoping for a simplier method. The ASCII file is to be transferred to a Windows system, so each line must end in CRLF. What about the free INFO-ZIP? Think it's one of the samples. ZIP the EBCDIC(and compress) transfer to WINDOZE binary and UNZIP to CODEPAGE of choice? An excellent suggestion! With the proper compression level, it should also improve total time. I seem to have the latest (non-beta) Info zip and unzip, but I don't see a codepage option. However, the zip side has a -a option to convert from EBCDIC to ASCII (if run on EBCDIC machines). -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Can I know programmatically if a load module has been zapped?
On 19 Mar 2008 09:44:25 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Rick Fochtman) wrote: As far as I know, AMASPZAP will ALWAYS try to make an IDR entry, unless the appropriate IDR's are full and the IGNIDRFULL option is specified. I have used AMASPZAP to modify a load module, without leaving an IDR entry. Since there are few good reasons to do such, I will not post the technique in a public forum. However, it's important for us to know it can be done. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Can I know programmatically if a load module has been zapped?
On 18 Mar 2008 07:45:19 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (David Eisenberg) wrote: Might there be a way, from within an assembler module, to know whether or not a given load module has been modified via SPZAP? I'm perfectly happy to LOAD the load module, if that's any help. I know that AMBLIST can tell me if something has been zapped, but that didn't seem like an easy interface to use from within an assembler module. If there's information about the zap, it'll be in the directory entry. If I wanted to do this, I'd look at the code in the PDS command from CBT. (Or, maybe I'd look into calling the PDS command and reading its output.) However, it's possible to zap a module and not leave footprints, though it's not the default. You haven't said why you want the info, so we can't tell how important stealth zapping is to you. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Execution job class restriction
On 14 Mar 2008 06:28:28 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Tom Russell) wrote: Is there a way to restrict jobs from running it a particular job class? Is there more than one way and if so, what is the easiest? TIA I did this with IEFUJI, as it prevents users from changing the jobclass after it has been submitted. So, a user submits a job in a 3rd-shift class and goes home. 3rd shift starts, and the job abends because he's not authorized for that class. I prefer an immediate check and notification. An exit in SDSF takes care of most user attempts at changing jobclass. I'd rather let any other attempts go through than have the above scenario which punishes an honest mistake. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Easy way to covert IEFBR14 and IDCAMS deletes to HDELETE
On 12 Mar 2008 17:52:58 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Paul Gilmartin) wrote: Ages ago, before TSO/IDCAMS was so nearly smart, I coded in Rexx (IIRC): address 'TSO' 'HDELETE ''DATA.SET.NAME'' WAIT' if RC0 then 'DELETE ''DATA.SET.NAME''' Crude, but effective. Mine was more complex, but I don't know if it was more effective. There will probably be line-wrap problems. sysreasn is an external REXX routine that returns the text of LISTDSI reason codes. The first section is my standard entry code to allow me to specify variables on the command line. /* REXX exec to delete datasets without hrecall */ arg dsn temp1 do while temp1 \= '' parse var temp1 temp2 temp1 if right(temp2,1) = ')' then temp2 = translate(temp2,'= ','()') if pos('=',temp2) = 0 then temp2 = temp2 || '= ' interpret temp2 end drop temp1 drop temp2 if debug = 'TRACE' then trace ?i else if debug \= DEBUG then trace i if wait= 'WAIT' then dowait = '' /* wait for hsm to delete? */ else dowait = 'WAIT' temp = listdsi(dsn NORECALL) select when temp = 0 then DELETE dsn when temp = 16 then if sysreason = 9 then HDELETE dsn dowait else if quiet = QUIET then do call sysreasn sysreason say dsn cannot be deleted this way because result if sysreason \= 5 then LISTC ALL ENT(dsn end otherwise if quiet = QUIET then do say dsn cannot be deleted this way LISTC ALL ENT(dsn end end exit 0 -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RACF Tool PWDCOPY (ichwpin/ichpwout)
On 9 Mar 2008 14:39:28 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Wolfgang Schäfer) wrote: I tried to run the ´sample´ IBM password copy utility (PWDCOPY on the IBM RACF website) on z/OS 1.7 and z/OS 1.8. The tool runs without errors, but the copied password could not be used. snip In my case, userids are going to be renamed. Since this will be done using ´big bang´ it´s not a good idea to give everyone a new password, transporting the old password would be a great help. I´ld really like to use something ´proven´ before I start to twiddle around with RACROUTE EXTRACT requests :-) 1. Are both databases set to use the same encryption technique? 2. My reading of the documentation of the DES encryption is that the password is used as a key to encrypt the userid, and that is the value stored. Obviously, the same password will not encrypt a different userid to the same stored value. If my reading and memory are right, you can't take the password field from one userid and successfully use it for a different userid. 3. RACROUTE EXTRACT to read and write encrypted passwords isn't that difficult. I had written programs to do just that before PWDCOPY was available. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Tapeless backup
On 7 Mar 2008 12:41:47 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (McKown, John) wrote: How many places have implemented tapeless backup environments? I don't mean virtual tape that has tape on the back-end but no tape at all. We are exploring different options and the wintel side of the house is heading down the totally tapeless path. That makes me nervous but I'm getting old. Thanks for any and all input. Tim Leitner What are they going to? direct offsite replication? dismountable disk? hope and pray? I don't know Tim's actual plans, but one brand of terabyte HD retails for $400. If there's a 10TB datacenter, it could be backed up to HD for $12,000 (father, son, grandfather). Add a few for incrementals, and it's still likely cheaper than a single tape drive. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Peformance question
On 7 Mar 2008 14:00:27 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Lizette Koehler) wrote: We have a job that has a posting step that runs 6-7 minutes last year. We noticed that the job more than doubled starting with the first processing day of 2008. The application owners swear that no changes were made on there side and the systems guys swear that no changes were made on their side neither. The only think that I noticed by looking at the jobs sysout is that the SERVice Units went from 5335K to 13549K. Any ideas. Regardless of what anyone says, have you looked at the linkedit dates of the programs and the ISPF dates of the JCL members? Too often, I've been on the wrong end of, Well, yes, I recompiled and re-linked it, but I didn't CHANGE anything. P.S. I know it wasn't Lizette who started this, but I don't have the original message. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx - TRAP errors / Exception handling ?
On 4 Mar 2008 03:17:13 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Zaromil Tisler) wrote: Executing your REXX in z/OS 01.08.00: 31/02/08 is not valid 31/04/08 is not valid 31/06/08 is not valid 31/09/08 is not valid 31/11/08 is not valid 31/13/08 is not valid 31/14/08 is not valid 31/15/08 is not valid Thank you. Regina is a free product, so I can't complain, per se. However, I think I'll point out the problem. I just wanted to make sure it wasn't WAD. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx - TRAP errors / Exception handling ?
On Mon, 3 Mar 2008 06:50:22 -0800 (PST), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: Hi, I'm fairly new to Rexx, so please give helpful advice and not Aren't you stupid responses. 1. REXX questions will likely get a better response on the REXX list. For TSO-REXX subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: INFO TSO-REXX 2. Whether using this list or the REXX list, you'll get a better response if you subscribe to and send via the Listserv (see details at the bottom of this post). MANY people read via the listserv, and won't see your post. I've had a couple of instances now where I want to be able to use a command/function which I know may fail, but prevent the Rexx from failing. I've scoured documentation and can only find the SIGNAL statement OUTTRAP function, neither of which seem to work, unless I've missed the point. Surprisingly (especially to newcomers) you may have to use SIGNAL ON SYNTAX rather than ON ERROR for many errors. I have not checked whether that is so for the below; I strongly expect it is for your latter example. You haven't said what SIGNAL statements you tried. OUTTRAP is *not* what you want for this. Here's the rest of your original post for those who read the Listserv: Here are two examples:- 1.ISPEXEC BROWSE DSN This fails when you try browsing an empty dataset (even though the documentation I've read says it responds with RC 12). I've ended up doing a LISTDSI and checking SYSUSED 0 to prevent this problem - but I would still like to TRAP an error rather than pre-empting one. 2.valDate = DATE('E',StartDate,'E') I want to validate a user-supplied date is in the correct format without the rexx failing if it's invalid. In this latter case there are a few suggestions in the thread http://groups.google.co.uk/group/bit.listserv.ibm-main/browse_thread/thread/8882f674b0380a99/ecbae95979efa2c7?hl=enlnk=gstq=rexx+DATE+trap+OR+SIGNAL+OR+OUTTRAP#ecbae95979efa2c7 but they mainly involve reinventing the wheel instead of using the standard, flexible powerful DATE builtin. Any suggestions appreciated, Regards, Clark. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx - TRAP errors / Exception handling ?
On Mon, 3 Mar 2008 06:50:22 -0800 (PST), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: 2.valDate = DATE('E',StartDate,'E') I want to validate a user-supplied date is in the correct format without the rexx failing if it's invalid. Here's an example. It's overly-complex and not written the way I would in a real program, but it shows that a solution exists. signal on syntax j = 1 ChkDate: do i = j to 15 tstDate = '01/' || right(i,2,0) || '/08' valDate = DATE('E',tstDate,'E') say valdate 'is valid' end exit 0 syntax: say tstDate 'is not valid' j = i + 1 signal on syntax signal ChkDate -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx - TRAP errors / Exception handling ?
On 3 Mar 2008 11:53:37 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Ted MacNEIL) wrote: This sounds like an ISPF question rather than a Rexx question. Why are you separating the two? (I'm not the person that separated the two, but I have some comments.) Perhaps because people with different areas of expertise can answer different parts of the question? I rarely write REXX execs that do not interface with ISPF. For me, it's the opposite. I've had this discussion with the REXX list owner. There DOES need to be a place to say, I'm working with this, that, and t'other. Something ain't right. Is it one of these, or the interface between them? For questions within REXX programs that aren't obviously specific to ISPF, I'd agree that TSO-REXX is the correct place, but I haven't seen the owner's comments and rebuttals. Under TSO, REXX without ISPF functionality is like COBOL without packed decimal. Not for all of us. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx - TRAP errors / Exception handling ?
On 3 Mar 2008 12:02:32 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Arthur T.) wrote: On Mon, 3 Mar 2008 06:50:22 -0800 (PST), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: 2.valDate = DATE('E',StartDate,'E') I want to validate a user-supplied date is in the correct format without the rexx failing if it's invalid. This may not be the best way to validate. Check out the results of the following, which is a very slightly modified version of my previous example. At least on my PC with Regina REXX, it gives unexpected results. signal on syntax j = 1 ChkDate: do i = j to 15 tstDate = '31/' || right(i,2,0) || '/08' valDate = DATE('E',tstDate,'E') say valdate 'is valid' end exit 0 syntax: say tstDate 'is not valid' j = i + 1 signal on syntax signal ChkDate Would someone please verify if z/OS (or any other) REXX yields not valid for any month numbers other than 2, 13, 14, or 15? Those are the only ones invalid in my test. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z10 LSPR
On 27 Feb 2008 13:34:35 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Tom Schmidt) wrote: The z10 LSPR data is now available too. http://www-03.ibm.com/servers/eserver/zseries/lspr/ Yes, and it looks like they are using a new femtofont on the z10 page. (Could they make it smaller still? Is that why IBM is experimenting with the physical manipulation of single atoms - to be able to fit oodles of atomic-sized lines onto a single sheet of paper for the 2013 version of LSPR?? We'll see.) I don't see what your complaint is. The font is a full 4.5 points; Word supports down to 1 point. Isn't it obviously more important to get the whole table on one page than to be able to read it without a microscope? (I loved the phrasing of your complaint. I've copied it to my own file of quotes to keep.) -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Newbie RACROUTE question: how to *test* authorization?
On 23 Feb 2008 08:07:34 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Walt Farrell) wrote: I wouldn't have thought that there would be a security issue with merely interrogating an authorization level, but perhaps I'm wrong... One could argue that letting you determine your access to resources without actually trying to use them (and thus without causing audit records) is a form of hacking. You're looking around trying to figure out what you can do, rather than simply doing your job. For your own userid, you can use LISTDSD or RLIST to check resource authorization without cutting audit records. But, unless you have sufficient RACF or APF authorization, you can't check the access *someone else* has to resources. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: VSAM Surprise
On 5 Feb 2008 12:16:35 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Chase, John) wrote: -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ed Rohr Hi List - How about an AMS Repro that gets a zero completion code, an a good output record count, AND Creates an unusable output dataset. //STEP1 EXEC PGM=IDCAMS,REGION=8M //SYSPRINT DD SYSOUT=* //DD1 DD DISP=SHR,DSN=MY.VSAM.CLUSTER //DD2 DD DSN=MY.UNUSABLE,UNIT=SYSDA,DISP=(,CATLG,DELETE), // DCB=(LRECL=32756,BLKSIZE=32760,RECFM=VB), // SPACE=(CYL,(7,1,43),RLSE) //SYSIN DD * REPRO IFILE(DD1) OFILE(DD2) Notice that there are directory blocks - coded in error. Yep, an unusable PDS, with no warning or error messages. Looks APAR-able to me. I don't think its APARable. Probably the same as specifying output to an existing PDS with a DSN with no member specified. It can probably be read with DCB=DSORG=PS (as John mentioned) or by tweaking the VTOC's information for the dataset (e.g. via PDSxx or StarTools). -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CPU time differences for the same job
On 5 Feb 2008 13:52:49 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Tom Harper) wrote: About 10% of the CPU was consumed by IEBGENER It's amazing how inefficient IEBGENER is. If you were to change all[1] use of IEBGENER jobs to use ICEGENER (or SYNCGENR) or to an in-house-written copy program, you could reduce the CPU consumed in copies by a factor of 5 to 10. It reduces both CPU and wall-clock time. [1] The alternate programs generally work only for the case where there's no SYSIN control statements for IEBGENER. In my experience, there is only a very small percentage of IEBGENER jobs with SYSIN. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Cuts Employee Salaries
On 28 Jan 2008 09:42:25 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Scrood Blued) wrote: Fortunately, I do not work for IBM. However the 7600 folks who are being punished for a subset of them exercising their *rights* under US labor law Many companies abuse their salaried workers by increasing workload until many extra (unpaid) hours are needed. Those 7600 folk are being punished by *not* making family-killing demands on their time? Forcing a company to pay for the amount of time required can help them decide that they're understaffed and need more people. It definitely tends to keep them from overworking their existing employees. (Tends to, not does.) Some of those 7600 undoubtedly would rather be overworked rather than underpaid. Some would not. Many years ago, my father considered changing jobs. At his interview, he was told that they couldn't match his current base rate, but he could have all the overtime he wanted. Recognizing that money isn't everything, he opted to stay where he was. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Topic denotation suggestion (a Virtual Darren)
On 14 Jan 2008 05:30:50 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Van Dalsen, Herbie) wrote: Also if a topic veers off the original path... Add the OT: somewhere in it so that the conscientious that does not want the noise can kill it with a spam-killer. I *started* one of those off-topic threads with OT: in the Subject. Someone replying removed the OT:. The mutated Subject then got over twice the FUPs the original did. BTW, I am sorry about that thread. If I had thought it would generate even half of those FUPs, I wouldn't have posted it. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
OT: loose vs. lose
X-No-Archive: yes I'm sorry about this rant, but one annoying spelling problem seems to have reached epidemic proportions. I'm afraid people are forgetting what they know and are just repeating the mistakes they see here. Loose: v. Free from restraint Loose: adj. Not tight Loose: adv. Without restraint Lose: v. Fail to keep or to maintain; fail to win They both have many other meanings, but they are *not* synonyms. I would never complain about the spelling and grammar mistakes of those to whom English is a second language, but many of these are coming from native speakers. I considered a private e-mail to just those making the mistake, but I lost count. This rant was brought you you as a public service message. (Make sure you're using the right words on resumes, cover letters, and any communication where you don't want to negatively impress the recipient.) I now return you to the normally scheduled topics of how-to, tuning, and Intellectual Property law. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: help with IEBCOPY: selective load module copies
On 8 Jan 2008 09:06:03 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Chris Hoelscher) wrote: is there any way to tell IEBCOPY (or any other utility) to update all associated aliases in the to dataset when the root load module is copied? I believe the PDS command (is it now up to PDS86?) has that capability. See the CBT tape. Or, if you're more comfortable using IEBCOPY directly, I think the PDS command will generate the correct control cards you can stick into your IEBCOPY SYSIN. When in doubt, and you're dealing with a PDS, check out the PDS command. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/OS and VM Control Blocks
On 6 Jan 2008 10:57:47 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Ed Gould) wrote: I would like to jump in here and offer some assistance (of a different kind). snip very thorough and informative post on how to find and access the information and/or control blocks needed I will do a lot of what you suggest, but I always perform one previous step: I check the CBT tape so as not to reinvent the wheel. Even if I find a close match, I will still do a thorough bench-check of the code to make sure I understand it, and that I agree it'll work correctly. But that generally takes a lot less time than coding from scratch, *and* it exposes me to useful coding techniques I might never have come up with on my own. (Plus, sometimes other people will update it for a new release before I have to.) And if I can't use much of the code, I can still look at how the author found information. It's often easier to verify a control block chain leading to the desired information, than it is to discover the chain from scratch. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: how to cut down RACF auth run rexx under diff auth
On 5 Jan 2008 14:44:21 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Aman Naqvi) wrote: We have two security operations teams who are defined in RACF with the group-Special attribute and hold CLAUTH on a class to define profiles. The issue is that we need to cut down their access. The task is to only provide these teams access through Panels/REXX and to cut off their group-Special attribute and Class authority. My problem is that if the REXX executes online it is executing under the authority of the user (who's access im trying to cut down) Any ideas how I can achieve this without going to batch? Whatever the solution is, batch isn't going to make things any better. Either the batch job executes with the userid of the submitter (same problem as online), or it executes with a userid which it's harder to audit because it's more difficult to determine on whose behalf the RACF updates were done. Plus, if they'll be able (via batch) to issue the same commands, what difference does it make if they keep their current attributes? I think the crux is we need to cut down their access. That sounds like an auditor's requirement. If so, ask the auditor how to get the company's work done while adhering to their cookie-cutter requirements. My general feeling is to give people all of the access they need, but to audit everything done. And make sure they know in advance that everything will be audited. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to migrate z/OS to new h/w when no common disk or tape between systems
On Mon, 24 Dec 2007 08:15:38 -0800 (PST), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) StuartR [EMAIL PROTECTED] wrote: I hope you can give some ideas as if or how to solve the following issue. You may guess that it relates to migrating from an old server with no external tape and no external disk to a new z9 + external DS6000 disk - There are no tape units installed. There is no z/VM system in the old environment. We wish to migrate the z/OS systems and data currently in use to the new envrionment. For simplicity sake imagine it is a one pack z/OS system we need to move - once we can ipl this we are in business to do more. How might you do this, our options thinking went like 1. Use new z/OS starter system - as above not possible since no external tape to restore it from 2. Connect new server to the existing disk or old server to the new disk systems - not possible, the old system has only internal disk and the new disk is FICON and cannot be connected to the old processor. So this leaves us with 3. Somehow dump an old system and FTP it across to the new system having loaded z/VM via the z9 HMC using DVD's to the new systems disk and thus having a z/VM and CMS environment - z/VM is available on DVD's. This is where the questions arise and looking for some help or ideas as to how to make this work or if not possible. We see the steps as GET A RESTORE PGM We believe we can build a SA DFDSS pgm in card image form (BUILDSA) on the old system and FTP this across to a CMS user. This user should be able to receive this card image as a CMS file and punch it to the virtual reader. We could then IPL from the reader on this z/VM virtual machine - this then creates a SA DFDSS environment GET THE DUMPED DFDSS one pack system data the trick now, and where we are struggling it how to send across the DSFSS dump of the one pack environment. Clearly on the old system we can create a sequential DFDSS dump image but held on disk. We then need to FTP this sequential image and use it as input to the SA DFDSS system Ipl'ed. SO ... ANY CLUES ON - HOW TO SPECIFY THE FTP OPTIONS at each end to make sure both ends correctly see this sequential stream in a format DFDSS can subsequently use. (we assume it will be held as in interim CMS file) - HOW WE specify the input to the SA DFDSS environment we have just ipl'ed so it can process this data We feel we need some views as to whether this is a non starter as a process OR if posible please details of the process and commands that should be used to achieve this Hopefully someone has done this who could assist or knows if this is just not possible. TIA. I quoted the whole of your message because it hasn't been seen by the majority of IBM-Main readers. You should join the Listserv so you can post to it, even if you continue to read it via Usenet. See the instructions at the end of this (or almost any other) post. As to solutions, have you considered copying the disk volume (or the DF/DSS dump of it) to DVD and snearkernetting it to the new machine? Also, you mention that the old server has only internal disk. If you can accept the downtime, you can probably open the old server and either temporarily install a new disk to copy to, or take the old disk out and temporarily install it in the new server. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Max. number of physical blocks on 3390 track
On 20 Dec 2007 05:43:03 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (R.S.) wrote: AFAIK it is 86, for equal blocks up to 22 bytes. Q: What is the reason for the limitation ? Surely, it's not track capacity. Where can I find further information (some RTFM) ? Yes, as others have noted, it *is* track capacity. I don't have the exact name or number of the FM, but you can find the exact formula on the 3390 reference card. It gives the size of the interblock gaps and of the minimum chunk (as Bill called it). I have a REXX program to give 3380 and 3390 utilizations based on LRECL and the available blocksizes for that LRECL. (For BLKSIZE=1 it gives 86 on 3390 and 93 on 3380.) It was written *long* ago and was based on an even older CLIST for 3330 3350. FWIW, here it is. I disavow any bad coding, as it belongs to a much younger version of myself. (Beware that at least two lines are probably broken by line-wrap. Hint: Nothing starts in column 1 except roundup.) code /* rexx exec to show track utilization on 3380's and 3390's */ ARG TEMP1 if datatype(word(temp1,1),n) then temp1= 'LRECL='temp1 do while temp1 \= '' parse var temp1 temp2 temp1 if right(temp2,1) = ')' then temp2 = translate(temp2,'= ','()') if pos('=',temp2) = 0 then temp2 = temp2 || '= ' interpret temp2 end drop temp1 drop temp2 if debug = 'TRACE' then trace ?i else if debug \= DEBUG then trace i if lrecl = 'LRECL' then do say 'LRECL must be specified' exit 4 end if stop = 'STOP' then do if dasd = '80' | dasd = '3380' then stop = 23476 else stop = 27998 end stop = min(stop,32760) 'clr' say 'lrecl blksize blk/trk blk/trk used used% %blk' say '3380 3390 3380 3390 3380 3390 fctr' say '' size0 = lrecl if start = 'START' then start=1 if size0 start then size0 = trunc(start/size0)*size0 slrecl = center(lrecl,6) do size = size0 by lrecl to stop blkfctr = size/lrecl D80 = (SIZE + 12) / 32 d80 = roundup(d80) NBLK80 = trunc(1499 / (15 + D80) ) USED80 = NBLK80 * SIZE PERC80 = USED80/47476*100 dn90 = (size+6)/232 dn90 = roundup(dn90) d90 = 9 + (size + 6*dn90 +6)/34 d90 = roundup(d90) NBLK90 = trunc(1729 / (10 + D90) ) USED90 = NBLK90 * SIZE PERC90 = USED90/56664*100 blkfctr = size/lrecl sblk = center(blkfctr,4) sblks = center(size,6) sblk80 = center(nblk80,6) sused80 = left(used80,6) sperc80 = format(perc80,3,1) sblk90 = center(nblk90,6) sused90 = left(used90,6) sperc90 = format(perc90,3,1) star = '' select when dasd = '80' | dasd = '3380' then do if perc80 = 90 then star = '*' if perc80 = 95 then star = '**' end when dasd = '90' | dasd = '3390' then do if perc90 = 90 then star = '*' if perc90 = 95 then star = '**' end otherwise do if perc80 = 85 perc90 = 83.8 then star = '*' if perc80 = 90 perc90 = 88.8 then star = '**' if perc80 = 90 perc90 = 93.8 then star = '***' end end if ostar \= 'OSTAR' then if star = '' then iterate say slrecl sblks || ' ' || sblk80 || ' ' || sblk90 , sused80 sused90 || ' ' || sperc80 || ' ' || , sperc90 || ' ' || sblk star end exit 0 roundup: PROCEDURE ARG curr temp = trunc(curr) if temp \= curr then temp = temp + 1 return temp /code -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Use of TinyURLs (Was: 2007 Year in Review on Mainframes)
On 20 Dec 2007 12:13:51 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Edward Jaffe) wrote: J R wrote: I've used it extensively and never had anything bad happen, either tiny urls expiring or surreptitious. Although, I guess that's the nature of things surreptitious. ;-) I believe the only problem occurs when the TinyURL site is down. In that case, having the original URL would have been advantageous assuming that site is up. How about including *both* the original long url *and* the tiny url? Then the individual can decide between quick, potentially risky, access and the joy of unwrapping a long one. Easy enough to do. Here's what I wrote to RISKS digest in 2005 http://catless.ncl.ac.uk/Risks/23.80.html#subj5: We all know the Risks of long URLs. They include line-wrap problems and trying to find an @ about 100 characters in. To combat the line-wrap problem, some sites are providing short URLs for any arbitrary page. One such is http://tinyurl.com . The problem here, though, is that you can't know where you're going until you get there. This hampers the anti-phishing advice to type in a URL sent in e-mail. It could be used for a range of nefarious or hoax uses. I looked at the tinuyrl site and didn't find any way to expand a compressed URL. Since they specifically suggest using their service to hide affiliate URLs, this is probably on purpose. Some time since then, tinyurl has given people a chance to see the actual URL before visiting it. A tinyurl link from a trusted person is not likely to be a problem, so the use on IBM-Main is likely fine. However, DO be careful out in the wilds of the rest of the Internet. As suggested, a tinyurl *plus* the URL of the actual site is best. Among other things, it gives the recipient an idea of where this link is going to go to, before clicking on it. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: disp=old and allocation override
On 19 Dec 2007 07:44:18 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (J Ellis) wrote: //DD1 DD DSN=app.data, // DCB=(LRECL=567,BLKSIZE=27783,RECFM=FB), // SPACE=(CYL,(1,10)),DISP=(,catlg) later on, they use this data set as output to a syncgener step as: //COPY1.SYSUT2 DD DSN=app.data, // DCB=(LRECL=567,BLKSIZE=27783,RECFM=FB), // SPACE=(CYL,(300,50)),DISP=OLD,UNIT=(SYSDA,59) aside from the obvious things you may comment on, when this data set is accessed in the second step, allocation wise, isn't the only thing that gets a temporary bump the secondary allocation from 10 to 50 ? The primary will still be 1, yes ? They had an SB37-04 last night on a volume that only had 280 free cylinders, I think they had already hit 16 extents on the data set not that the primary couldn't be filled. No way to check since they deleted it and reallocated it at (400,100) I've also seen problems when a UNIT name was specified for an already-catalogued dataset, as is the case here. Note also that the 2nd step specifies up to 59 units. I know that VSAM allocates a primary amount on each new volume; I can't recall, offhand, if PS does the same. (Is it PS? No DSORG was specified.) Final note from me: Since no UNIT was specified in the original allocation, I wouldn't be surprised if either SMS or an allocation exit got involved at some point. In either case, they might be involved at the time of grabbing another extent. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CMS PEEK command - how to delete all SHADOW lines
On 16 Dec 2007 14:17:37 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Paul Gilmartin) wrote: On Sun, 16 Dec 2007 14:37:24 -0500, rich wrote: But ISPF is easier than XEDIT at adding lines to the viewable set; in XEDIT you need to write a macro to do that. Not necessarily. If you xedited a file which is still out on disk, you can get the complete file back by: ALL :0 DELETE * get = = = optional: TOP or :0 or other positioning as desired. Or: just QQ and xedit fn ft fm again. If the file you are looking at is a reader file that you PEEK'd, just QQ and PEEK the same file again. What I meant is that XEDIT has no sequence as simple as: EXCLUDE ALL FIND wombat ALL ... looking at the display, I decide I want to see additional lines, so I: FIND xyzzy ALL ... now I see the lines containing wombat and/or xyzzy for a single additional command with a single target. I once wrote an XEDIT macro to do this, but I believe the supplied ALL XEDIT doesn't do anything close. Most of what I know of XEDIT is from my use of KEDIT. Doesn't XEDIT have the MORE command? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe Assembler Coding Contest
On 12 Dec 2007 04:50:17 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Don Higgins) wrote: There is a new Mainframe Assembler Coding Contest underway here: http://z390.sourceforge.net/z390_Mainframe_Assemble_Coding_Contest.htm snip Check out problem #6 submitted by John Erhman for which no solutions have been posted yet. I don't have a working assembler or emulator at the moment, so I can't test this. Also, I'm not joining a Yahoo group just for this contest. But I think this is a solution to #6: Given a byte, create 8 EBCDIC zero and one characters displaying the individual bits in the byte. I'd appreciate if someone would test it for me. (Of course, if run on an ASCII machine, it'll likely give ASCII zeros and ones.) BINPRT SUBENTRY MVC BIT1,BYTEPRIME OUTPUT AREA MVC BIT2(7),BIT1 DITTO TRBIT1,EIGHTS TRBIT2,FOURS TRBIT3,TWOS TRBIT4,ONES TRBIT5,EIGHTS TRBIT6,FOURS TRBIT7,TWOS TRBIT8,ONES SUBEXIT * BYTE DCB'0001' INPUT VALUE * EIGHTS DC16C'' FOURSDC32C'' TWOS DC32C'00110011' ONES DC32C'01010101' * PRTBYTE DS0CL8 BIT1 DSC BIT2 DSC BIT3 DSC BIT4 DSC BIT5 DSC BIT6 DSC BIT7 DSC BIT8 DSC END -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe Assembler Coding Contest
On 12 Dec 2007 11:52:42 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Binyamin Dissen) wrote: Constraints are not well defined. If one can use an 8*256 byte table 3 silicon instructions (4, if LB is in silicon) - not tested If you went to the page where the contest was described, you'd have seen that it's limited to 100 statements or less. If you can create your table within those constraints Also, someone ran my program and reported that it failed. It should have been obvious that I needed either 8 tables or to do some nibble twiddling. I'm not going to try to debug it using the old-fashioned methods (i.e. give your deck to the operator and wait). BTW, thanks for letting me know. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: T3 Sues IBM To Break its Mainframe Monopoly
On 5 Dec 2007 05:32:10 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Clement Clarke) wrote: I've written something fairly quickly, and stood on the shoulders of others by incorporating their comments. I'll send it to Sam first thing tomorrow (it is sleep time in Oz) after you have commented. It is here: http://members.ozemail.com.au/~oscarptyltd/Letter%20to%20Sam%20Palmisano.html A good effort. Here's my slight input: 1. Please them by writing the name as they do. It's z/OS, not Z/OS. 2. In the section started by, And the creator of the Hercules system that allows Z/OS to run on PC's says, in part, start off the quoted section with his, [A]pplications tied to MVS and VSE are now firmly embedded into the infrastructure of the various information systems (banks, utilities, government, airlines) that allow our society to function the way it does. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OK - where is the FM to R? System REXX?
On 5 Dec 2007 14:06:00 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Shane) wrote: On Wed, 2007-12-05 at 15:58 -0600, McKown, John wrote: That's all I ask. I've read how really neat and fantastic this is. Where the elided is the documentation so that I can mess with it? I just installed the Web deliverable on my z/OS 1.8 test LPAR. Hit the archives John - this has been discussed. You may feel like swearing some more when you get the answer. And one of those threads that might make you swear (but might have the answer you want) is the thread starting with: Message-ID: [EMAIL PROTECTED] Subject: SYSREXX (was Re: z/OS 1.9 Announcement Letter) Snippet from the above thread: Oh now I understand...SYSREXX is documented in Authorized Assembler.Why didn't I think of that? Disclaimer: I've marked those posts keep, but I haven't yet checked out the books they point to. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Archives for IBM-MAIN
On 23 Nov 2007 11:22:45 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Darren Evans-Young) wrote: I currently have the IBM-MAIN-ARCHIVES list containing archives from 1986-2000. Current archives for IBM-MAIN are from 2001 forward. What this means is searches take longer unless you restrict your searches to a specific time frame. I would like to move more archives from IBM-MAIN to IBM-MAIN-ARCHIVES. What years do you guys want to remain on IBM-MAIN? I don't search the archives that way. I'd normally search via Google Groups. So you can take this as totally immaterial or as valid commentary from a disinterested party. If it's possible to program the default Since date to current date minus n years, that could obviate the whole question, except what 'n' should be. The comments I'm seeing seem to show that 'n' should be either 2 or 3. If that programming is not possible, maybe the cut-off should be GA date of 1.6? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: PKZIP Z/OS - How to check if zip-archive is empty in a batch-job
On Wed, 21 Nov 2007 05:40:51 -0800 (PST), in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: Hello all, This question is about z/os and pkzip. Used versions; z/os 1.7.1 and PKZIP(R) for zSeries, Version 8.2.0 - 02/06/06 15.01 LVL(4) I've been looking around for a way to check if previously created zip- file is empty or contains any entries. So far I've not come up with a solution. What I want to do is basically , in a batch-job , given a datasetname pointing to a zip-archive, check wether the zip-archive is empty or not and based on a return-code or similar be able to control the following processing steps in a job. I have tried to check the manual to see if any of the possible operations to perform upon an archive will do the job but without success. Any ideas? Thanks Miguel Try trapping the output of PKUNZIP -v command and looking for the No file(s) found message. You could also experiment with that same command and see if different return codes are passed for successful vs. unsuccessful. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Scotts new role
On 4 Nov 2007 04:39:54 -0800, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Eric Bielefeld) wrote: When Ed Gould makes like CA is the evil empire, it really reflects badly on Ed. As further evidence that working for CA doesn't suck out one's soul, here is an experience from a Share many years ago: After the speaker gave her name, she said, I used to just say I'm from the Evil Empire. But now there are so many of them that I say I'm from CA. Even if I remembered her name, I wouldn't state it here. Most people have senses of humor. Most corporations don't. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/OS 1.9 Features summary
On 30 Oct 2007 08:47:17 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (GAVIN Darren * OPS EAS) wrote: snip I'll go futher than that. The entire concept of LRECL, BLKSIZE, and RECFM is archaic and should be eliminated. If a program wants to read a dataset, let it specify what it thinks the LRECL and RECFM should be. If the system can accomodate that, then so be it - let the system (access method) read the physical data and present it in the format that the program wants. The only cavaet is if there is a record which cannot be processed properly if reformatted into the LRECL that the program says that it can accept. /snip John, snip As to the BLKSIZE and LRECL parameters being archaic, they really are not obsolete. They are there for efficiency reasons. I think a compromise between current usage and what John suggested would be very useful. Say that a new application requires you to add fields to a file's records. You add them at the end. Why should you have to recompile all of the programs which don't use those fields? Let the access method ignore the rest of the record when used for input. Thus, only programs which use the new fields and those that write to the file would need updating. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Launches Mainframe Gas Gauge in Environmental Push
On 12 Oct 2007 08:49:29 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: I'm curious about something. Does a processor use more power while its executing instructions than it does while idle? If its running at 50% CPU, does it use more power than at 0%, and less than at 100% busy? Or, does it use the same power whether busy or idle. On my home machine, which uses an AMD chip, I have a tray icon which shows CPU temp. I can watch the temperature rise when I run CPU-intensive loads and (more slowly) drop when those loads end. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Industry Standard Time To Analyze A Line Of Code
On 2 Oct 2007 07:14:19 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Chase, John) wrote: -Original Message- From: IBM Mainframe Discussion List On Behalf Of Bob Fake - InfoSec, Inc. Hi All, [ snip ] I'm sure the amount of time varies depending on the type of code (ALC, COBOL, EZtrieve, et al) but any direction would be greatly appreciated. Likely that analysis of a line of code in Assembler would be meaningless. Consider: LA 1,1(,1)* Increment general register 1 What's to analyze there, absent any context provided by other lines of code? Well, when bench-checking, it's important to analyze that it isn't: L 1,1(,1)* Increment general register 1 -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Industry Standard Time To Analyze A Line Of Code
On 2 Oct 2007 07:49:49 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Robert Fake) wrote: More specifically, I'm looking at this from a maintenance perspective. If I give a programmer an existing program to modify, how long on average will it take, per line of code, to analyze the program to then be able to then make necessary changes. I remember a problem from *many* years ago. There was a Cobol program which was misbehaving. I was supposed to fix it. It had been written by a consultant who was not available. The Procedure Division of said program was no longer than three printed pages, maybe only two. I had samples of the input and output. It should have been easy. After spending over an hour trying to figure out why this mess of spaghetti code worked, much less why it didn't, I called over the other programmer in the department. We spent another half hour, together, trying to figure it out. I finally ended up rewriting the program from its specs. I will leave it to your ingenuity to decide how to include this incident into your average. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The future of IBM Mainframes [just thinking]
On 8 Sep 2007 03:40:56 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Lindy Mayfield) wrote: One point I'm making is that it took me years and a lot of difficult study to grow to my current level. Yet there are many people now being handed an MVS job to do and told to get to it. Do others see this as a challenge? That mainframes are beginning to spread faster than people can properly learn them? And how do you learn what you need to know - things that normally take experience and time - so quickly? I believe, as I always have, that the only way towards expertise in mainframes is via mentoring. A junior sysprog needs to apprentice to a senior sysprog. Any shop, regardless of location, which is not willing to pay for the senior sysprog to learn from is doomed to be substandard. There are plenty of mainframe professionals for newbies to learn from, but the companies that hire only newbies don't want to pay for that experience. I have nothing against newbies who want to learn. In fact, I love to teach. However, I am not willing to help a *company* that refuses to hire the expertise they need, again regardless of location. I see those companies as the root of the problem. So, I don't believe that mainframes are beginning to spread faster than people can properly learn them. I believe that they are spreading faster than people are being *allowed* to learn them, and that it is an economic problem rather than a physical one. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The future of IBM Mainframes [just thinking]
On 8 Sep 2007 11:50:26 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Gerhard Adam) wrote: As for being allowed to learn ... There has NEVER been more information available, nor more readily available than today. There is absolutely no excuse for anyone that wants to learn to suggest that they are being denied access to information. Implicit in this statement is the assumption that education is the company's responsiblity. If we are professionals then education is OUR responsibility. While it is a tremendous benefit when a company elects to pay for such education, it is by no means our right to have it at someone else's expense. A company is not responsible for enhancing our careers. If it is cheaper to educate staff rather than bring in outside expertise, then it is likely that course of action may be taken. While a classroom might be easier, and a mentor can certainly be beneficial, the suggestion of not being allowed is simply over the top. Your reply to my last two paragraphs significantly skews my position. Please reread my first paragraph: I believe, as I always have, that the only way towards expertise in mainframes is via mentoring. A junior sysprog needs to apprentice to a senior sysprog. I am not talking about reading, lurking or questioning online, or even classes. There are many things that can be learned from people, but that can't be taught. Constant exposure to a good senior sysprog will leave a good junior sysprog with ideas, attitudes, and competences that are not likely to arise any other way within a reasonable number of years. That is the kind of education that is the responsibility of the companies; it's almost impossible for an individual to obtain. Online, telephone, classes, and two Shares a year cannot replace it. It's the knowledge of when stay calm and when to go into a frenzy of problem determination or amelioration. It's having available that large memory of things that went wrong, without having to find them all the hard way. It's learning by example what knowledge it's important to memorize versus that which should be looked up. It's many other things, most of which I'll never be able to explain verbally, which is part of my point. A company that doesn't want to pay for expertise will either learn the hard way, or discover that it doesn't need the expertise. Any mainframe company without sufficient expertise is bad for all of us. Mainframes already get bad press. Any business failure directly relating to the mainframe will be even worse. I don't want companies to die because they did things wrong; I want them to live because they do things right. The elementary level of some of the questions showing up here and elsewhere show that they do need that expertise. A well-run company can't pause for Usenet responses *every time* something new comes up, even if it can, sometimes. I will continue to lurk, and to answer questions that both intrigue me and that I may know the answers to. And, obviously, to occasionally spout on-topic opinions. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CA-1 TMC Reblock - recommended size?
On 20 Aug 2007 16:41:25 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Russell Witt) wrote: The main reason to block the TMC is space utilization Actually, there's at least one more good reason to block the TMC. Reading an unblocked TMC (for custom reports or whatever) takes forever. When I used an unblocked TMC, I always copied it to a blocked file via sort, and ran my program against the copy. Despite the extra step, it took *a lot* less time because of sort's super-optimized I/O. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SHARE Sn*bbery Report
On 17 Aug 2007 05:07:06 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (John P Kalinich) wrote: Dave Kopischke of the IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 08/16/2007 06:26:19 PM: On Thu, 16 Aug 2007 12:43:17 -0500, Weidt, James wrote: Well I just setup a rule to auto delete snubbery reports... So take that!!! Snubbing the Snubbery reports I sense a paradox coming on. Yeah, too bad he can't see your reply. Yeah, and it's too bad we have people in the group deliberately trying to get trivial, unwanted messages past other members' killfiles. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Usage of KB and KiB
On 31 Jul 2007 03:33:03 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (R.S.) wrote: Only memory (not disk) was specified in binary (1024) convention. Again no. And again, you miss other (non-disk, non-memory) aspects like tapes, networks, disk channels etc. etc. A long time ago IBM (or some IBMers) stated that our new 370/115 was going to have 131K of memory. (See Kenneth Tomiak's quote upstream, Fairly easy to know which value for K is being used, the sneakiest.) And then other groups mixed 1000 and 1024 together when they reported usage. I have never met 1000 and 1024 mix, like 1*1000*1024=1MB. Neither in M$ nor elsewhere. Do you know such case ? 3.5 floppies. As noted in many places on the net, their formatted capacity is: 80 tracks × 18 sectors × 512 bytes/sector × 2 sides = 1474560 bytes = 1440 KiB. So a 1.44MB floppy is 1.44 * 1000 * 1024 bytes. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Question about the listserv
On 30 Jul 2007 18:11:54 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Chris Mason) wrote: Scrolling to the end of a quoted post in order to remove the list trailer is a handy reminder also to remove any older quoted posts[1] which are not really needed and any excess address lines or - probably an unavoidable irritation since I guess they are imposed by corporate rules - those lines explaining that one should ignore e-mails which - who knows how? - have become misdirected Of course, many E-mail programs would cut that off automatically if people would just use the defined standard sig separator: A line of dash dash space, as I use below. (No, I can't name the RFC that defines it, but I have seen it and it really is a defined standard.) -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX concatenation of strings
On Wed, 18 Jul 2007 11:54:46 -0400, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) pdc [EMAIL PROTECTED] wrote: just a quick question. (double posted to TSOREXX) Is there a difference, performance or otherwise, between the following two commands? On the more general REXX newsgroup, we've seen that the answer to any performance question depends on what REXX you're running. (You've posted to IBM-Main, but we still don't know MVS, VSE, or VM, and compiled, semi-compiled or interpreted.) The general answer to performance questions is: Create a huge loop, and find out. Just out of curiosity, I ran tests on my home PC (Win2k w/ Regina REXX). I was going to post my results, but when I switched the order of the loops, the results swapped, too. To my mind, that means they're equal in machine efficiency, and (to me) the concat form is much easier to read and less likely to cause a problem. (Also, someone noted the problem of concatenating variable named 'x' with a quoted string by abutting them.) -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JES2 $ADDEXIT/$REPEXIT RACF Security
On 13 Jul 2007 11:52:43 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Dennis Schaffer) wrote: We're planning to implement the JES2 $ADDEXIT/$REPEXIT commands provided by CBTTAPE file 198. For anyone unfamiliar with this, $ADDEXIT/$REPEXIT are provided by a JES2 Exit 5 (Command) routine, CBTEX05, which is available on the CBTAPE site. We'd like to secure these command via RACF snip Has anyone done this? Will OPERCMDS.JES2.UNKOWN secure $ADDEXIT/ $REPEXIT? Or is Exit36 required? I don't know the answer to your question, but I may have an answer to your problem. Since you have source for the exits, can you do your own RACCHECK? (Remember, if the exits are main-task, you may have to start a subtask in order to WAIT.) -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Deleted PDS
On 9 Jul 2007 06:43:19 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Sarel Swanepoel) wrote: One of our guys has mistakenly deleted a PDS for which we have no backups at all (naming standards point to a dev PDS but it is a production PDS). We know on what volume the dataset was cataloged and the storage administrator has 'DISNEW' the SMS volume in order to prevent any new allocations in order to recover it. Could anyone with tips on the recovery process please let us know of it as the storage administrator will try and recover the PDS tomorrow? Jon L. Veilleux's solution is close to what I did, but I think mine is easier. With multiple techniques, you can choose. Instead of listing open areas and trying to figure which was the dataset, I just ran IEFBR14s with MXIG DD allocations until I got all free space on the volume. Rather than DFDSS dumps, I used full-screen zap from the CBT tape until I found the data. Then I deleted the MXIG allocations. When allocating the dataset, use ABSTRK, but don't specify dsorg or number of directory blocks. Then use CDSCB (CBT tape, again) to make it PO with the correct number of directory blocks. Use PDS command (or Startools) to set the last used track (DLISTAR?) to the end. This should allow you to keep the directory as it was. Upon successful read of the dataset, immediately copy it and use the copy instead of the original from now on (in case there's something strange left from all of this diddling). There are possible gotchas, though, regardless of technique: 1. You may have to make the disk (or a copy of it) non-SMS in order to MXIG and/or ABSTRK. 2. New allocations on SMS volumes automatically write an EOF for some datasets. Try it out on another volume, first. 3. Worst: Some RAIDs do not necessarily allocate the same physical location for new allocations as for the old allocations of the same tracks. Some automatically clear data on new allocations. If yours is one of these, you may either be out of luck or forced to call the RAID manufacturer for help. Some things are easier with SLEDs. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 1401 The Musical
On 29 Jun 2007 18:00:41 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Ed Gould) wrote: http://www.wired.com/culture/art/news/2007/07/IBM1401_Musical And don't forget the song of the 360/40: http://www.cbttape.org/funny/S36040.mp3 -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Testing System Programmer Capabilities
On 25 Jun 2007 07:23:21 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Charokee Sun) wrote: Our company recently had been given a task by our client to test the responsiveness and capabilities of their systems programmer in their test environment. Our tasks assigned include to hack their system to cause/simulate system and application outage, of course not to the extent of hanging/re-IPLing the whole system. I've been enjoying the responses to this. I'm in general agreement that we shouldn't give that kind of information on a public forum, and that the OP shouldn't have asked. However, in terms of testing a sysprog: A much better test than being able to hack a system is being able to undo the results of such a hack. I've seen users accidentally bring a system to its knees, and a sysprog's job is to get the system going again without an IPL, and with minimal impact on schedules and people. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SVC vs APF and other 'privileged' code
On 21 Jun 2007 14:03:20 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (R.S.) wrote: From time to time I read on the list about companies which demand ISVs to provide source code for SVC routines to analyze it from security point of view. While I don't know to much about z/OS 'guts', I'm wondering what is the reason for that? Or rather, why the SVC code is so important, while APF-authorized libraries are not subject to analyze. The same apply to propgrams in SCHEDxx members. AFAIK (I could be wrong) APF-authorized program can bypass security rules, so it can be dangeours. Is SVC more dangerous ? What follows is a mixture of facts, opinion, and experience. I am not pointing a finger at any particular companies or software packages. SVCs are useful, in part, in that they can perform authorized functions when called from non-authorized programs. Therefore, they need to be extra-careful that they do not perform functions when they oughtn't. An authorized program to, for instance, issue an MVS command is relatively safe because it can be called only from another authorized program. An SVC to do the same needs to do extensive checking to be sure the caller is authorized to issue the command. Many companies, and some software packages, even have get yourself authorized SVCs. If you know the secret software handshake, you can make your non-authorized program authorized. Some of these SVCs do better jobs than others of assuring that they came from programs which are to be trusted. Regardless, they're frowned on by auditors. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: how to list LE options
On 20 Jun 2007 09:39:22 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Schramm, Rob) wrote: I keep looking thru the manuals, but all I see is the use of RPTOPTS(ON) on some current LE using program. I am sure (ok.. hoping) that there is a way list out all LE run-time options? It's been a long time since I did this, but you might try assembling, linking, and running: CEEUOPT CSECT CEEUOPT AMODE ANY CEEUOPT RMODE ANY CEEXOPT RPTOPTS=(ON) END -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Simple (???) VSAM ESDS question
On 19 Jun 2007 06:11:21 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Bill Klein) wrote: (I sent this to the Assembler list, but meant to ask IBM-MAIN - Sorry if some see it twice) A question came up in the COBOL newsgroup about records (not blocks, i.e. LBI) 32K. I know that QSAM doesn't support this. The current Enterprise COBOL LRM at: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR31/APPENDIX 1.2 RECORD CONTAINS integer - 1,048,575( (Note 5)) ... 5. Compiler limit shown, but QSAM limits it to 32,767 bytes. I believe the QSAM limit is 32,760. I never heard a good explanation of why we can't use those other 7 bytes. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBMLINK-SEV1 32141089--now 10:15 maybe
On 11 Jun 2007 06:40:54 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: In a message dated 6/11/2007 8:25:48 A.M. Central Daylight Time, [EMAIL PROTECTED] writes: rip IBM apart at Share and at the z/OS expo for this web IBMLINK nonsense. I don't see what SHARE/Expo has to do with it. This is bread and butter 'bidness'. Services offered, services not rendered...unfortunately it's tied in to the support contract. So non-payment could lead to termination of 'all support'. To win in a bureaucracy, make your problem their problem. Rather than just opening sev 1s whenever IBMLINK is down, perhaps you should call the hotline and ask the people there to do whatever you were trying to do. Maybe when IBM sees the costs involved in staffing the hotline, they'll improve IBMLINK service (and/or bring back the 3270 interface). Of course, we have to face the possibility that they'll instead drop the hotline. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DASD Compression Question
On 25 May 2007 07:15:18 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] wrote: In a message dated 5/25/2007 8:23:00 A.M. Central Daylight Time, [EMAIL PROTECTED] writes: Depending on your actual spinning DASD, compression may be counter productive for actual disk utilization. It can save logical space and cache space but if the controller is compressing the data in cache to store it on disk, this may foul up the compression algorithm. snip How can compressing the data in cache foul up the algorithm? On my PC, I have a DAT drive for backup which does hardware compression. It holds 2GB, native capacity on a tape. If I back up a file which doesn't compress, it holds only about 1.8GB unless I turn off compression. (At first I thought I had short media; now I turn off hardware compression for 2GB already-compressed files.) If you zip a zipped file, you will usually end up with a somewhat larger file. In almost all cases that I know of, attempting to compress a compressed file will take extra time and space. I think that Clark Morris's statement that compressing may foul up the compression algorithm did not mean that the algorithm wouldn't work, but that it might yield non-optimal results. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: [META] Is !#$%^* spamming entire IBM-MAIN readership?
On 24 May 2007 09:38:57 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Doc Farmer) wrote: On Thu, 24 May 2007 12:07:31 -0400, William Donzelli [EMAIL PROTECTED] wrote: There ain't no such thing as bad publicity. I don't know 'bout that. I certainly won't be doing any business with that company. Similarly, I was very interested in the Science Fiction Museum which opened a couple of years back. Just before it opened, it spammed the SF community (but missed me). By publicizing that, the SF community warned me and many others who will never pay to enter the museum. While *almost* no publicity (positive or negative) is bad, there *is* such a thing as bad publicity. I'd like to thank this list for warning me about the current spamming company. N.B. When I get a chance to look at the e-mail for my IBM-Link edress, I'll see if I got anything. This is the *only* think I use this edress for. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: PDS caused JCL error - WHY
On Wed, 23 May 2007 14:55:53 GMT, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) Ken Leidner [EMAIL PROTECTED] wrote: I was wondering if any body can shed some light on why I get a JCL error, dataset not found in STEP009 for the MODEL DD card. The strange thing is that if I do a global change of PDS to say T.PDS the JCL error does not occur. Also if the MODEL DD and the SYSEXEC DD in STEP009 are reversed, then the SYSEXEC gets the JCL error, dataset not found. //STEP008 EXEC PGM=IEBUPDTE,PARM=NEW,REGION=6M //SYSPRINT DD SYSOUT=* //SYSUT2 DD DSN=PDS,DISP=(NEW,PASS), // LRECL=80,BLKSIZE=0,RECFM=FB, // SPACE=(TRK,(15,1,4)),UNIT=SYSDA //SYSINDD * ./ ADD NAME=HTML ./ ADD NAME=GENHTML /* //STEP009 EXEC PGM=IKJEFT01,REGION=6M //SYSTSPRT DD SYSOUT=* //SYSEXEC DD DSN=PDS,DISP=(SHR,PASS) //SYSPROC DD DSN=SYS1..ISPCLIB,DISP=SHR //INDD DSN=AC,DISP=(OLD,DELETE) //MODEL DD DSN=PDS(HTML),DISP=(SHR,PASS) //SYSTSIN DD * GENHTML /* There was a thread (or subthread) regarding this, recently. I can't remember the Subject. Basically, you can only receive a temp DSN as many times as it's been sent. This is documented in the JCL manuals and is a very old restriction. For the 2nd DD, try using a DSN of the *.ddanme variety. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Delete invalid dataset name
On 21 May 2007 13:18:10 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (John P Donnelly) wrote: How might we delete this little bugger? SYS1.DFDSS.DEFRAG..PRD9LF.DUMMY In the past, I've had luck deleting datasets with invalid characters and/or format in two ways: 1. DD statement DISP=(OLD,DELETE) with the DSN within quotes. Remember to code UNIT VOL. If there are lower case letters, you have to be careful how it's submitted because some techniques will upper-case it for you. (Of course, stick it in a jobstep, probably IEFBR14.) 2. D command from ISPF dataset list of a volume. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Another 'migration' from the mainframe
On 15 May 2007 11:06:55 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Thompson, Steve) wrote: -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Behalf Of Dave Kopischke Sent: Tuesday, May 15, 2007 12:53 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Another 'migration' from the mainframe On Tue, 15 May 2007 13:34:12 -0400, Gary Green wrote: Do you really think we will get the real story/facts about the savings? No, but if you don't ask, you can't complain about the FUD they're generating with a story like this, can you I've already sent follow up requests on 3 or 4 of these kinds of stories and got nothing. But I'm not giving up. All it takes is 5 minutes and an E-Mail account. SNIP If you get no answer, perhaps it would be good to have a plan B, wherein you provide the LACK of results to some analyst group so they can report on the apparent failure of the initiative. It would be very interesting to get a bit more light on these things so that publicly held companies have to disclose results. I recently tried twice to get information about a government agency's privacy provisions and was ignored. On my third try, I suggested that local newspapers might be able to get the information for me, but would also likely be interested in why it's so hard to get. I got an answer within a week. With publicly held companies, you might suggest there would be interest in the follow-up both from their shareholders and from the news organs which printed the original press releases. -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CLIST question (the ampersands are killing me)
On 10 May 2007 13:32:24 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Gerhard Postpischil) wrote: BAL stands for Basic Assembler Language, and at most installations it didn't survive into the seventies. Current assemblers are about three generations removed. You state that you came here for help, but the quality of the help you receive is proportional to the amount and reliability of information you provide. I can just see a professional chemist complete a job application saying he practices Alchemy. G And yet, someone told me recently about missing a job opening because he claimed ALP and HLASM, but their HR person searched for BAL. Make sure you have *all* of the synonyms (or near-synonyms) in your resumes. Meanwhile, in normal conversation, I'll talk about the OS as MVS; I'll look things up on my green card; and I'll use the term ALP, BAL, HLASM, or Assembler, whichever is convenient at the time. And, apparently unlike some people here, I consider IBM-Main to be normal conversation. Exact phrasing is needed in stating a problem or a solution, but anything else in a post should not be held to the same level of precision. Some hairs should be split; some shouldn't. I hope that none of you who objected to BAL ever use the word brontosaurus (which I still do without apologies). -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html