Re: Detect the loop for batch job
Joel C. Ewing jcew...@acm.org wrote in message news:4b1a9636.4060...@acm.org... On 12/04/2009 10:14 AM, bjbxd wrote: Hello List, We are looking for a tool to detect the loop for batch application, any suggestion are appreciated. My shop is runing z/OS, application is C/C++. Bob. Considering the speed of today's processors, all batch programs that run for more than a few seconds must of necessity contain one or more logic loops; so I assume the intended question is how do you determine if the program is in a non-productive loop. In general making this determination automatically by any tool without knowing something about the expected or historic behaviour of the program is an impossible task. And in the practical world it's not just applications that will never terminate that are a problem, but also those which cost more in resources than the end user can afford. You want to catch a batch job step that is badly designed or poorly tuned that consumes an order of magnitude more CPU than required, as this is also a problem even if it may not be in an infinite loop. If the general issue is one of jobs wasting resources (which with sub-capacity licensing may cost real money), then the simplest first step is to impose and enforce standards requiring reasonable CPU TIME limits on jobs and job steps in JCL, and possibly also require OUTLIM to restrict SYSOUT loops in testing (needless to say NOLIMIT for CPU time should not be allowed for any batch job). Different default limits can be set for testing vs production via JES2 definitions based on job classes, and it is possible to use an IEFUTL exit to provide for unanticipated application growth by allowing Operators the option of granting CPU time extensions or cancelling production jobs that reach the limit based on job class. JCL overrides for higher limits could be allowed for specific job steps that have known higher requirements where the cost is acceptable to the end user. Rate of CPU consumption by itself is an unreliable indicator of problems. A single-threaded program would be limited to 100% of one CP, but even a solid, infinite CPU loop could show up as a much lower value on a loaded system, and some very efficiently-designed, computationally-intense programs might be able to approach 100% of a CP on a lightly loaded system and still be doing productive work. Some very simple tools, like SDSF DA display, that show both CPU and EXCP resources used, are sometime sufficient to provide clues. If the program is known to require periodic I/O to do anything useful and it is consuming an unusually amount of CPU time with no EXCPs, that would be strongly suggestive of a problem; or if the program is generating much more SYSOUT than usual or repetitive SYSOUT lines, again a likely problem. If the program is using both CPU and EXCPs, but a lot more than expected and no other obvious perverse behaviour, it is more difficult to make a determination. Other tools, like Omegamon, that show EXCPs on specific DDs in the job step may allow one to see if the program is continuing to progress through sequential data and if the total number of blocks is known may allow you to estimate if it will complete in an acceptable time and at what total cost. Or EXCPs on a file way in excess of the total number of blocks in the file may point to a poorly tuned or poorly designed application. In our experience, there is no substitute for having human intelligence in the monitoring loop when resources get tight. -- Joel C. Ewing, Fort Smith, AR I agree. We have been trying for decades to build a good general loop detector for operations but found it impossible. Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to
Missing RACF exit
* Cross posted to RACF-L * Hello I upgraded one of our systems from 1.7 to 1.9 at the weekend, and in so doing omitted one of the RACF exits, ICHRIX01. The manual confirms my suspicion that exits can only be added with an IPL, which isn't possible until the weekend. Does anyone have any code that can dynamically add an exit ? I spotted a program in an old Xephon mag called RACFXITS, does anyone have experience of using that? ( and can I download it instead of cutting/pasting of it ). Thanks in advance Paul Beesley ___ Atos Origin and Atos Consulting are trading names used by the Atos Origin group. The following trading entities are registered in England and Wales: Atos Origin IT Services UK Limited (registered number 01245534) and Atos Consulting Limited (registered number 04312380). The registered office for each is at 4 Triton Square, Regents Place, London, NW1 3HG.The VAT No. for each is: GB232327983 This e-mail and the documents attached are confidential and intended solely for the addressee, and may contain confidential or privileged information. If you receive this e-mail in error, you are not authorised to copy, disclose, use or retain it. Please notify the sender immediately and delete this email from your systems. As emails may be intercepted, amended or lost, they are not secure. Atos Origin therefore can accept no liability for any errors or their content. Although Atos Origin endeavours to maintain a virus-free network, we do not warrant that this transmission is virus-free and can accept no liability for any damages resulting from any virus transmitted. The risks are deemed to be accepted by everyone who communicates with Atos Origin by email. ___ -- 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: HYPERPAV
- DS8000: Architecture and Implementation redbook states that If many LSSs are involved, then pick a quiet time to perform the SETIOS HYPERPAV=YES command ...Because it can take some time to initialize all needed LSSs ... Is there a way to get an estimation on time needed per LCU ? something else? I haven't heard of anything like this. - Is there a way to activate HyperPAV on SYSA only, with no influence on SYSB? Or he has to separate them to be in one SYSPLEX? (SYSA and SYSB are in the same SYSPLEX) Enter on SYSA only: SETIOS HYPERPAV=YES - After we activate HyperPAV, is fallback is only to change in IECIOSxx member? SETIOS HYPERPAV=NO -- Zaromil -- 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
AW: Missing RACF exit
Hi Paul I can remember (re)loading the exit and then zapping the RCVT with the new address using Omegamon or a similar tool. But I did it only in our test environment, so be VERY carefull. And the exit was already active, so I'm not sure, if this really works in your case. Regards, Walter -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] Im Auftrag von Beesley, Paul Gesendet: Montag, 7. Dezember 2009 10:47 An: IBM-MAIN@bama.ua.edu Betreff: Missing RACF exit * Cross posted to RACF-L * Hello I upgraded one of our systems from 1.7 to 1.9 at the weekend, and in so doing omitted one of the RACF exits, ICHRIX01. The manual confirms my suspicion that exits can only be added with an IPL, which isn't possible until the weekend. Does anyone have any code that can dynamically add an exit ? I spotted a program in an old Xephon mag called RACFXITS, does anyone have experience of using that? ( and can I download it instead of cutting/pasting of it ). Thanks in advance Paul Beesley ___ Atos Origin and Atos Consulting are trading names used by the Atos Origin group. The following trading entities are registered in England and Wales: Atos Origin IT Services UK Limited (registered number 01245534) and Atos Consulting Limited (registered number 04312380). The registered office for each is at 4 Triton Square, Regents Place, London, NW1 3HG.The VAT No. for each is: GB232327983 This e-mail and the documents attached are confidential and intended solely for the addressee, and may contain confidential or privileged information. If you receive this e-mail in error, you are not authorised to copy, disclose, use or retain it. Please notify the sender immediately and delete this email from your systems. As emails may be intercepted, amended or lost, they are not secure. Atos Origin therefore can accept no liability for any errors or their content. Although Atos Origin endeavours to maintain a virus-free network, we do not warrant that this transmission is virus-free and can accept no liability for any damages resulting from any virus transmitted. The risks are deemed to be accepted by everyone who communicates with Atos Origin by email. ___ -- 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 -- 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: Missing RACF exit
Paul, As far as I am aware, if the exit pointer in the RCVT is non-zero then RACF will invoke the exit. About 15 years ago I knocked up a quick+dirty program to dynamically add a RACF exit and it seemed to work OK. I have not seen RACFXITS - however the logic I used was something along the lines of : (o) Determine length of RACF exit (o) Grab that amount of E-CSA and assign ownership to the system (ie I want it to persist) (o) Directed load of the exit module into the E-CSA chunk (o) Store the E-CSA address into the RCVT (remembering to indicate AMODE in bit0) These days you have things like dynamic LPA - so you might be able to avoid most of the heavy lifting and just zap in the new exit address. Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Beesley, Paul Sent: 07 December 2009 09:47 To: IBM-MAIN@bama.ua.edu Subject: Missing RACF exit * Cross posted to RACF-L * Hello I upgraded one of our systems from 1.7 to 1.9 at the weekend, and in so doing omitted one of the RACF exits, ICHRIX01. The manual confirms my suspicion that exits can only be added with an IPL, which isn't possible until the weekend. Does anyone have any code that can dynamically add an exit ? I spotted a program in an old Xephon mag called RACFXITS, does anyone have experience of using that? ( and can I download it instead of cutting/pasting of it ). Thanks in advance Paul Beesley ___ Atos Origin and Atos Consulting are trading names used by the Atos Origin group. The following trading entities are registered in England and Wales: Atos Origin IT Services UK Limited (registered number 01245534) and Atos Consulting Limited (registered number 04312380). The registered office for each is at 4 Triton Square, Regents Place, London, NW1 3HG.The VAT No. for each is: GB232327983 This e-mail and the documents attached are confidential and intended solely for the addressee, and may contain confidential or privileged information. If you receive this e-mail in error, you are not authorised to copy, disclose, use or retain it. Please notify the sender immediately and delete this email from your systems. As emails may be intercepted, amended or lost, they are not secure. Atos Origin therefore can accept no liability for any errors or their content. Although Atos Origin endeavours to maintain a virus-free network, we do not warrant that this transmission is virus-free and can accept no liability for any damages resulting from any virus transmitted. The risks are deemed to be accepted by everyone who communicates with Atos Origin by email. ___ -- 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 -- 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: TCP/IP NETSTAT problem
First, the message EZZ2499I tells that your netmsg.cat file is out of sync with the netstat code. See this techdoc article about msgcat files: http://www-01.ibm.com/support/docview.wss?uid=swg21247361 Problem(Abstract) During messaging processing of a TCPIP command (TSO NETSTAT, Display or Vary command, FTP server or client), any of the following can occur: 1) Receive message EZZ2506I -- reserved for future use -- or another reserved for future use message 2) Receive message EZZ0154I CONFIGURATION: UNABLE TO OPEN MESSAGE CATALOG 3) Any message indicating message catalog open/access failure. 4) ABEND0C4 5) Garbled or corrupted message text Mike Stayton z/OS Communications Server m...@us.ibm.com Client success extends to the way we anticipate what our clients want, need and dream of ... Sam J Palmisano IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 12/07/2009 01:45:31 AM: [image removed] Re: TCP/IP NETSTAT problem SUBSCRIBE IBM-MAIN gaa a. gamal to: IBM-MAIN 12/07/2009 01:46 AM Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Please respond to IBM Mainframe Discussion List ANY SUGGESTION ? Hi everybody, I have a problem with tcpip netstat command. when i issue the command D TCPIP,,N,DEV I get the follwing error: _ D TCPIP,TCP,N,DEV EZZ0157I CONFIGURATION: THE CONFIGURATION COMPONENT HAS TERMINATED EZZ0157I CONFIGURATION: STATE OF THE CONFIGURATION COMPONENT WHEN EZZ0157I CONFIGURATION: THE TERMINATION OCCURRED: EZZ0157I CONFIGURATION: - THE FOLLOWING COMMAND WAS IN PROGRESS: EZZ0157I CONFIGURATION: DISPLAY TCPIP,TCP,N,DEV EZZ0157I CONFIGURATION: CONFIGURATION COMPONENT ABLE TO RECOVER FROM EZZ0157I CONFIGURATION: THE TERMINATION EZZ2499I -- RESERVED FOR FUTURE USE 051 DYNAMICXCF: LOO IPADDR: READYSUBNET: EZZ2766I DEVST METRIC: 1638179481 TCPSTACKSRCVIPA: LOOPBACK SMF PARAMETERS: GLOBAL CONFIGURATION INFORMATION: NETNUM: 453 QUESIZE: 633657262 NETNUM: 637296916 QUESIZE: 0 SPEED: 0633648100 BYTESIN: 2737170512210584104 BYTESOUT: 2721497870493800256 -- RESERVED FOR FUTURE USE -- MULTICAST SPECIFIC: -- RESERVED FOR FUTURE USE -- MESSAGE TIMED OUT - MESSAGE COMPLETION FORCED * BOTTOM OF DATA *** BUT, when i issue the command from OMVS shell it SUCCESSFUL _ # netstat -d MVS TCP/IP NETSTAT CS V1R9 TCPIP Name: TCP 10:47:01 DevName: LOOPBACK DevType: LOOPBACK DevStatus: Ready LnkName: LOOPBACK LnkType: LOOPBACKLnkStatus: Ready NetNum: n/a QueSize: n/a ActMtu: 65535 BSD Routing Parameters: MTU Size: n/a Metric: 00 DestAddr: 0.0.0.0 SubnetMask: 0.0.0.0 Multicast Specific: Multicast Capability: No Link Statistics: BytesIn = 506177 Inbound Packets = 8171 Inbound Packets In Error = 0 Inbound Packets Discarded = 0 Inbound Packets With No Protocol = 0 BytesOut = 506177 Outbound Packets = 8171 Outbound Packets In Error = 0 _ my tcpip jobname is TCP any help ? thanks Gaa ali pio -- 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 -- 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 -- 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: Missing RACF exit
Thanks Rob. Turned out to be fairly easy. Dynamically loaded the module into MLPA, wrote a quick program to zap the address into the correct slot in the RCVT Thanks for your help Regards Paul -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Rob Scott Sent: 07 December 2009 10:12 To: IBM-MAIN@bama.ua.edu Subject: Re: Missing RACF exit Paul, As far as I am aware, if the exit pointer in the RCVT is non-zero then RACF will invoke the exit. About 15 years ago I knocked up a quick+dirty program to dynamically add a RACF exit and it seemed to work OK. I have not seen RACFXITS - however the logic I used was something along the lines of : (o) Determine length of RACF exit (o) Grab that amount of E-CSA and assign ownership to the system (ie I want it to persist) (o) Directed load of the exit module into the E-CSA chunk (o) Store the E-CSA address into the RCVT (remembering to indicate AMODE in bit0) These days you have things like dynamic LPA - so you might be able to avoid most of the heavy lifting and just zap in the new exit address. Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com - ___ Atos Origin and Atos Consulting are trading names used by the Atos Origin group. The following trading entities are registered in England and Wales: Atos Origin IT Services UK Limited (registered number 01245534) and Atos Consulting Limited (registered number 04312380). The registered office for each is at 4 Triton Square, Regents Place, London, NW1 3HG.The VAT No. for each is: GB232327983 This e-mail and the documents attached are confidential and intended solely for the addressee, and may contain confidential or privileged information. If you receive this e-mail in error, you are not authorised to copy, disclose, use or retain it. Please notify the sender immediately and delete this email from your systems. As emails may be intercepted, amended or lost, they are not secure. Atos Origin therefore can accept no liability for any errors or their content. Although Atos Origin endeavours to maintain a virus-free network, we do not warrant that this transmission is virus-free and can accept no liability for any damages resulting from any virus transmitted. The risks are deemed to be accepted by everyone who communicates with Atos Origin by email. ___ -- 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: file definition
Frank Swarbrick wrote: This may or may not be a weird question, but... No. Actually a good question. Is there a utility where I can give it a list of dataset names and it can give back some JCL that could have been used to define that file? Simply an IEFBR14 with a DD for each file where the DD has the DISP=(NEW,CATLG), the DSN, the full DCB, the SPACE parm and whatever else could be used to recreate the dataset if it were deleted. See this free REXX program. (You can add the full DCB etc, by inserting lines to trap the LISTDS output. Or you can parse out the result of a Catalog Search Interface run.) /* REXX */ ALLOC DA('...in..') F(INVOER) SHR REUSE EXECIO * DISKR INVOER (STEM LYS. FINIS FREE F(INVOER) ALLOC DA('..out..') F(AFVOER) OLD REUSE AF.1 = //JOB12345 JOB ( ...),CLASS=A AF.2 = //STEP EXEC PGM=IEFBR14 AANTALLYNE = 2 /* SAME # AS ABOVE */ FIRSTIME = 'YES' DO J = 1 TO LYS.0 DSN = SUBSTR(LYS.J,1,44) IF FIRSTIME = 'YES' THEN DO JCL = //DATA DD DISP=(NEW,CATLG),DSN=DSN FIRSTIME = 'NO' END ELSE JCL = // DD DISP=(NEW,CATLG),DSN=DSN AANTALLYNE = AANTALLYNE + 1 AF.AANTALLYNE = JCL END AF.0 = AANTALLYNE EXECIO * DISKW AFVOER (STEM AF. FINIS FREE F(AFVOER) RETURN Input for REXX: X.X SYS1.PEST.RODENT SYS1.PEST.MICE SYS1.PEST.HUNGRY SYS1.PEST.EAT Output from it: //JOB12345 JOB ( ...),CLASS=A // EXEC PGM=IEFBR14 //DATA DD DISP=(NEW,CATLG),DSN=X.X // DD DISP=(NEW,CATLG),DSN=SYS1.PEST.RODENT // DD DISP=(NEW,CATLG),DSN=SYS1.PEST.MICE // DD DISP=(NEW,CATLG),DSN=SYS1.PEST.HUNGRY // DD DISP=(NEW,CATLG),DSN=SYS1.PEST.EAT HTH! Groete / Greetings Elardus Engelbrecht -- 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: IDCAMS Delete via DD
Edward Jaffe wrote: snip Such assumptive, non-canonical, lazy programming seems to work in most cases, but can lead to failure and confusion in others. I eliminate it whenever I can. I regard such code as inelegant, yet convenient, short-cuts that work most of the time. Kludge. I fear we're losing the forest for the trees. Here's the problem. Say I'm in a large production shop. We have production JCL that runs to hundreds of thousands or perhaps millions of lines spread across myriad batch jobs. Jobs often stall due to recalls before data sets are deleted; once in a while I blow a batch window because of this. I know how to change the jobs to eliminate the problem, and I do it when I must. But every change to every production job is moderately labor-intensive: - A change control record must be opened, and the change justified and approved. - The change has to be made, tested, and documented. - The documentation has to be reviewed and accepted by production control. - The job has to be changed in the production control system. The probability of error rises with the complexity of the change. While I think prior posts have shown how I think about the use of IEFBR14 as a data set allocation and deletion 'utility', the fact is that many hundreds or perhaps thousands of jobs that use it that way might exist in a large installation. For each of them, the process above--designed, to be fair, to assure production batch quality--must be followed. If I wanted to change them all, programmer and administrator months (or years!) would be consumed. In an ideal world with infinite resource, I'd bravely bear the cost and defenestrate every single use of IEFBR14 for this purpose, replacing it with a real utility (and appropriate control statements) that will, among other things, provide a return code to indicate success or failure and isolate failures to the actual failing step to simplify diagnosis and restart. In the real world, this ain't gonna happen. Large-scale production JCL changes are an anathema. I want a magic wand to make the problem go away (and I want it *NOW*). Hence the customer requests for this function. So, naturally without any guarantee that we'll ever do anything...how would those of you who dislike our solution solve the problem while meeting the implied requirement for avoiding JCL changes? -- John Eells z/OS Technical Marketing IBM Poughkeepsie ee...@us.ibm.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: CF LPAR MIPS Utilisation
I also don't see which LPAR's are part of the Sysplex, and which are not. Dynamic Dispatch with a CF LPAR is not so much a matter of utilization, but as Scott suggests, getting the CPU when the CF needs it. We have found that DynDisp dramatically increases ISGLOCK response times (at least one order of magnitude) - and we have characterized CF engines. I cannot imagine how much worse this would be if we had to share with MVS images, too. IMHO, if A and B are the only ones in the Sysplex, the parallel sysplex does not give you significant advantage in and of itself in this configuration, unless of course, you have it for pricing considerations. Yes, GRS Star (parallel sysplex required) does perform better than Ring, even in a two-system complex, but without dedicated CF engines, my gut tells me you are losing whatever ground Star gives you. If A, B, C and D are all in it together, then IMHO, seriously consider funding and characterizing an ICF CP. Also, if they are, and since you are on a single footprint, I do not see the advantage of two CF LPARs for a single complex. If an internal CF goes down, it's either because your Operators need to be more astute, or there is a serious hardware problem, which probably means the whole machine is down. When our European counterparts tried to implement Star a few years back, they found this out empirically, also notwithstanding the added CPU demand buried their already-taxed z990. FWIW, Art Gutowski Ford Motor Company On Fri, 4 Dec 2009 14:33:18 -0500, Scott Rowe scott.r...@joann.com wrote: Certainly, SYSA can take unused cycles, they are distributed according to weights. What you haven't said is what mode your CFs are running in, so I will assume the are dynamically dispatched. The thing you need to be very careful about here is that the CF partitions can get the cycles they need when they need them. According to your calculations, your CF partitions are promised 100 and 36 MIPS respectively - but is that enough? I prefer to over- weight CFs that run on shared CPs, since it helps ensure that the CF has access to the CPU when it needs it. If there are many CF requests and not enough available cycles to service them you could get in trouble quickly. John Mitchelle john.mitche...@googlemail.com 12/4/2009 11:57 AM Hi, I have 936 MIPS processor Z02-2096 z9BC I have 4 LPARS and 2 CF LPARs SYSA (Prod) SYSB (Dev) SYSC (Test) SYSD (Maint) SYCF1 SYCF2 Both CPU Engines are online across all LPAR's. Wts are in such a way that MIPS Allocation are 650 for SYSA 50 for SYSB 50 for SYSC 50 for SYSD 100 MIPS for SYCF1 and 36 MIPS for SYCF2 , SYSA is UNCAPPED and SYSB, SYSC and SYSD are CAPPED. Recently we are having issues related to MIPS capacity. I am aware that in case SYSA needs more capacity then it can take from SYSB,SYSC,SYSD if available. However, was wondering whether system will allow to take MIPS from Coupling Facility LPAR's as well or not if available ? These are the structures in use for CF ISGLOCK IXCXCF1 IXCXCF2 Is there any advantage in getting rid of these coupling facility ? Will that give us comfort ofhaving these additional MIPS ? -- 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: file definition
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Friday, December 04, 2009 5:46 PM To: IBM-MAIN@bama.ua.edu Subject: file definition This may or may not be a weird question, but... Is there a utility where I can give it a list of dataset names and it can give back some JCL that could have been used to define that file? Simply an IEFBR14 with a DD for each file where the DD has the DISP=(NEW,CATLG), the DSN, the full DCB, the SPACE parm and whatever else could be used to recreate the dataset if it were deleted. Thanks, Frank SNIPPAGE No such utility for z/OS that I know of per se. However, you may be able to convince IDCAMS to provide you with some of the information. Regards, Steve Thompson -- 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: IEC143I 213-30
This is not true Ted, as we have discussed before. In fact, the symptom in the title of this thread is the result of IBM closing that exposure. Ted MacNEIL eamacn...@yahoo.ca 12/6/2009 9:46 PM Oh? Even with GRS in place? Because we are doing this. There are potential corruption issues when two people are editing members on different swystems. Both read the same offsets. Whoever saves wins! - Too busy driving to stop for gas! -- 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 CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- 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
RES: Missing RACF exit
You can try another approach by specifying CSVDYNEX interface to call a dynamic ICHRIX01 exit. Of course you will need an IPL, but after that the dynamic exit could be activated/deactivated/changed in flight. You have to create a static ICHRIX01 exit, loaded at IPL time, which can have a logic like this : Query DYN.ICHRIX01 IF NOT Defined OR Only Defined IMPLICIT Then DO Define DYN.ICHRIX01 END CALL DYN.ICHRIX01 IF Exit Module is ACTIVE Then DO EXIT MODULE executes and Returns END Additionally you have to define it in SYS1.PARMLIB : EXIT ADD EXITNAME(DYN.ICHRIX01) MODNAME(DYNRIX01) The DYNRIX01 will have the logic that normally would be coded in ICHRIX01, and can be located in linklist. Atenciosamente / Regards / Saludos Ituriel do Nascimento Neto Banco Bradesco S/A 4254 - DPCD Engenharia de Software Sistemas Operacionais Mainframes Tel: +55 11 4197-2021 R: 22021 Fax: +55 11 4197-2814 |-Mensagem original- |De: IBM Mainframe Discussion List |[mailto:ibm-m...@bama.ua.edu] Em nome de Beesley, Paul |Enviada em: segunda-feira, 7 de dezembro de 2009 11:06 |Para: IBM-MAIN@bama.ua.edu |Assunto: Re: Missing RACF exit | |Thanks Rob. |Turned out to be fairly easy. Dynamically loaded the module |into MLPA, wrote a quick program to zap the address into the |correct slot in the RCVT | |Thanks for your help | | |Regards |Paul | |-Original Message- |From: IBM Mainframe Discussion List |[mailto:ibm-m...@bama.ua.edu] On Behalf Of Rob Scott |Sent: 07 December 2009 10:12 |To: IBM-MAIN@bama.ua.edu |Subject: Re: Missing RACF exit | |Paul, | |As far as I am aware, if the exit pointer in the RCVT is |non-zero then RACF will invoke the exit. About 15 years ago I |knocked up a quick+dirty program to dynamically add a RACF |exit and it seemed to work OK. | |I have not seen RACFXITS - however the logic I used was |something along the lines of : | |(o) Determine length of RACF exit |(o) Grab that amount of E-CSA and assign ownership to the |system (ie I want it to persist) |(o) Directed load of the exit module into the E-CSA chunk |(o) Store the E-CSA address into the RCVT (remembering to |indicate AMODE |in bit0) | |These days you have things like dynamic LPA - so you might be |able to avoid most of the heavy lifting and just zap in the |new exit address. | |Rob Scott |Developer |Rocket Software |275 Grove Street * Newton, MA 02466-2272 * USA |Tel: +1.617.614.2305 |Email: rsc...@rs.com |Web: www.rocketsoftware.com | |- | |___ | |Atos Origin and Atos Consulting are trading names used by the |Atos Origin group. The following trading entities are |registered in England and Wales: Atos Origin IT Services UK |Limited (registered number 01245534) and Atos Consulting |Limited (registered number 04312380). The registered office |for each is at 4 Triton Square, Regents Place, London, NW1 |3HG.The VAT No. for each is: GB232327983 | |This e-mail and the documents attached are confidential and |intended solely for the addressee, and may contain |confidential or privileged information. If you receive this |e-mail in error, you are not authorised to copy, disclose, use |or retain it. Please notify the sender immediately and delete |this email from your systems. As emails may be intercepted, |amended or lost, they are not secure. Atos Origin therefore |can accept no liability for any errors or their content. |Although Atos Origin endeavours to maintain a virus-free |network, we do not warrant that this transmission is |virus-free and can accept no liability for any damages |resulting from any virus transmitted. The risks are deemed |to be accepted by everyone who communicates with Atos Origin by email. |___ | |-- |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 | HTMLfont face=Tahoma size=1HRAVISO LEGAL brEsta mensagem é destinada exclusivamente para a(s) pessoa(s) a quem é dirigida, podendo conter informação confidencial e/ou legalmente privilegiada. Se você não for destinatário desta mensagem, desde já fica notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de dados, registros ou sistema de controle.
Re: IDCAMS Delete via DD
On Mon, 7 Dec 2009 09:08:28 -0500, John Eells wrote: - A change control record must be opened, and the change justified and approved. - The change has to be made, tested, and documented. - The documentation has to be reviewed and accepted by production control. - The job has to be changed in the production control system. Of course, changing the behavior of a pervasive cliche such as //STEP EXEC PGM=IEFBR14 behind the customers' backs induces similar requirements for review and testing. But if I understand correctly, this is controlled by a PARMLIB option, so customers can elect not to endure the change. In an analogous situation, many years ago a code generation bug in Assembler was (belatedly, IMO) repaired. I remarked to a developement manager that we were relieved of the burden of maintaining the circumvention we had developed. But he was unexpectedly dismayed: We must now revalidate all our products in GA, since a code gen change may impact an unknown number of dependencies on the current (incorrect) behavior. So, naturally without any guarantee that we'll ever do anything...how would those of you who dislike our solution solve the problem while meeting the implied requirement for avoiding JCL changes? Can't. Let the rants continue. -- gil -- 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: IEC143I 213-30
You can't share them for update, as you have discovered. I would suggest you take this to your sysprogs and tell them you have a requirement they need them to satisfy, and you could even suggest that Sysplex is one solution. If they don't listen, take it to management. Frank Swarbrick frank.swarbr...@efirstbank.com 12/4/2009 7:51 PM On 12/4/2009 at 2:17 PM, in message 2121472874-1259961467-cardhu_decombobulator_blackberry.rim.net-17612826...@bda4 8.bisx.prod.on.blackberry, Ted MacNEIL eamacn...@yahoo.ca wrote: Exactly my point. Someone asked me why I said we didn't want to use PDSE to solve my issue and I said because we can't share them well, because we're not in a Sysplex. You can't share regular PDS datasets either. Oh? Even with GRS in place? Because we are doing this. Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- 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 CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- 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: IEC143I 213-30
On Mon, 7 Dec 2009 09:31:47 -0500, Scott Rowe wrote: This is not true Ted, as we have discussed before. In fact, the symptom in the title of this thread is the result of IBM closing that exposure. Depends. Ted MacNEIL 12/6/2009 9:46 PM Oh? Even with GRS in place? Because we are doing this. There are potential corruption issues when two people are editing members on different swystems. Both read the same offsets. Whoever saves wins! In more detail, last guy to save wins; first guy's changes are lost. Some might consider this corruption. But directory integrity is maintained. -- gil -- 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: Detect the loop for batch job
All programs 'loop'. It is what they do. About the only automated solution I can think of would be to set a CPU time limit. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Joel C. Ewing Sent: Saturday, December 05, 2009 11:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Detect the loop for batch job On 12/04/2009 10:14 AM, bjbxd wrote: Hello List, We are looking for a tool to detect the loop for batch application, any suggestion are appreciated. My shop is runing z/OS, application is C/C++. Bob. NOTICE: This electronic mail message and any files transmitted with it are intended exclusively for the individual or entity to which it is addressed. The message, together with any attachment, may contain confidential and/or privileged information. Any unauthorized review, use, printing, saving, copying, disclosure or distribution is strictly prohibited. If you have received this message in error, please immediately advise the sender by reply email and delete all copies. -- 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: file definition
PDS command (from CBT tape) with subcommand DSNAME JCL may provide what you are looking for - at least for non-VSAM data sets. Don Imbriale -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Friday, December 04, 2009 6:46 PM To: IBM-MAIN@bama.ua.edu Subject: file definition This may or may not be a weird question, but... Is there a utility where I can give it a list of dataset names and it can give back some JCL that could have been used to define that file? Simply an IEFBR14 with a DD for each file where the DD has the DISP=(NEW,CATLG), the DSN, the full DCB, the SPACE parm and whatever else could be used to recreate the dataset if it were deleted. Thanks, Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 This email is confidential and subject to important disclaimers and conditions including on offers for the purchase or sale of securities, accuracy and completeness of information, viruses, confidentiality, legal privilege, and legal entity disclaimers, available at http://www.jpmorgan.com/pages/disclosures/email. -- 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: CF LPAR MIPS Utilisation
Art, In my experience, GRS-Star with shared CP CFs is still significantly faster (at least one order of magnitude) than GRS Ring using XCF. Also, the purpose for the extra CF can be used to upgrade CF code without a Sysplex outage. I guess it's also remotely possible that a CF code fault could cause a CF failure, though I have yet to see this. I keep a second CF running for this purpose, though I don't currently have any active structures in it. Scott Arthur Gutowski aguto...@ford.com 12/7/2009 9:25 AM I also don't see which LPAR's are part of the Sysplex, and which are not. Dynamic Dispatch with a CF LPAR is not so much a matter of utilization, but as Scott suggests, getting the CPU when the CF needs it. We have found that DynDisp dramatically increases ISGLOCK response times (at least one order of magnitude) - and we have characterized CF engines. I cannot imagine how much worse this would be if we had to share with MVS images, too. IMHO, if A and B are the only ones in the Sysplex, the parallel sysplex does not give you significant advantage in and of itself in this configuration, unless of course, you have it for pricing considerations. Yes, GRS Star (parallel sysplex required) does perform better than Ring, even in a two-system complex, but without dedicated CF engines, my gut tells me you are losing whatever ground Star gives you. If A, B, C and D are all in it together, then IMHO, seriously consider funding and characterizing an ICF CP. Also, if they are, and since you are on a single footprint, I do not see the advantage of two CF LPARs for a single complex. If an internal CF goes down, it's either because your Operators need to be more astute, or there is a serious hardware problem, which probably means the whole machine is down. When our European counterparts tried to implement Star a few years back, they found this out empirically, also notwithstanding the added CPU demand buried their already-taxed z990. FWIW, Art Gutowski Ford Motor Company On Fri, 4 Dec 2009 14:33:18 -0500, Scott Rowe scott.r...@joann.com wrote: Certainly, SYSA can take unused cycles, they are distributed according to weights. What you haven't said is what mode your CFs are running in, so I will assume the are dynamically dispatched. The thing you need to be very careful about here is that the CF partitions can get the cycles they need when they need them. According to your calculations, your CF partitions are promised 100 and 36 MIPS respectively - but is that enough? I prefer to over- weight CFs that run on shared CPs, since it helps ensure that the CF has access to the CPU when it needs it. If there are many CF requests and not enough available cycles to service them you could get in trouble quickly. John Mitchelle john.mitche...@googlemail.com 12/4/2009 11:57 AM Hi, I have 936 MIPS processor Z02-2096 z9BC I have 4 LPARS and 2 CF LPARs SYSA (Prod) SYSB (Dev) SYSC (Test) SYSD (Maint) SYCF1 SYCF2 Both CPU Engines are online across all LPAR's. Wts are in such a way that MIPS Allocation are 650 for SYSA 50 for SYSB 50 for SYSC 50 for SYSD 100 MIPS for SYCF1 and 36 MIPS for SYCF2 , SYSA is UNCAPPED and SYSB, SYSC and SYSD are CAPPED. Recently we are having issues related to MIPS capacity. I am aware that in case SYSA needs more capacity then it can take from SYSB,SYSC,SYSD if available. However, was wondering whether system will allow to take MIPS from Coupling Facility LPAR's as well or not if available ? These are the structures in use for CF ISGLOCK IXCXCF1 IXCXCF2 Is there any advantage in getting rid of these coupling facility ? Will that give us comfort ofhaving these additional MIPS ? -- 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 CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- 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
Re: IEC143I 213-30
I don't believe that's true, Gil. It doesn't make sense given the changes that were made to the logic, and I can't create it here. Do you have a test case that shows this? Paul Gilmartin paulgboul...@aim.com 12/7/2009 9:39 AM On Mon, 7 Dec 2009 09:31:47 -0500, Scott Rowe wrote: This is not true Ted, as we have discussed before. In fact, the symptom in the title of this thread is the result of IBM closing that exposure. Depends. Ted MacNEIL 12/6/2009 9:46 PM Oh? Even with GRS in place? Because we are doing this. There are potential corruption issues when two people are editing members on different swystems. Both read the same offsets. Whoever saves wins! In more detail, last guy to save wins; first guy's changes are lost. Some might consider this corruption. But directory integrity is maintained. -- gil -- 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 CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- 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: IEC143I 213-30
On Mon, 7 Dec 2009 09:53:26 -0500, Scott Rowe wrote: I don't believe that's true, Gil. It doesn't make sense given the changes that were made to the logic, and I can't create it here. Do you have a test case that shows this? I believe SPFEDIT mostly protects you. To show the problem you'd need to have: o DSNTYPE=PDS o DISP=SHR o Update by a process other than ISPF EDIT, and which doesn't respect the SPFEDIT ENQ. I'll grant this is unlikely; I'd prefer not to try to create it. Perhaps Ted is thinking of something in addition. Paul Gilmartin 9:39 AM On Mon, 7 Dec 2009 09:31:47 -0500, Scott Rowe wrote: This is not true Ted, as we have discussed before. In fact, the symptom in the title of this thread is the result of IBM closing that exposure. Depends. Ted MacNEIL 12/6/2009 9:46 PM Oh? Even with GRS in place? Because we are doing this. There are potential corruption issues when two people are editing members on different swystems. Both read the same offsets. Whoever saves wins! In more detail, last guy to save wins; first guy's changes are lost. Some might consider this corruption. But directory integrity is maintained. -- gil -- 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 CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- 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 -- 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: Missing RACF exit
On Mon, 7 Dec 2009 13:05:43 + Beesley, Paul paul.bees...@atosorigin.com wrote: :Thanks Rob. :Turned out to be fairly easy. Dynamically loaded the module into MLPA, :wrote a quick program to zap the address into the correct slot in the :RCVT I will bet that there will be folk who would put you down for being a cowboy, but this is a quite simple way of fixing the problem. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEC143I 213-30
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Monday, December 07, 2009 9:40 AM To: IBM-MAIN@bama.ua.edu Subject: Re: IEC143I 213-30 On Mon, 7 Dec 2009 09:53:26 -0500, Scott Rowe wrote: I don't believe that's true, Gil. It doesn't make sense given the changes that were made to the logic, and I can't create it here. Do you have a test case that shows this? I believe SPFEDIT mostly protects you. To show the problem you'd need to have: o DSNTYPE=PDS o DISP=SHR o Update by a process other than ISPF EDIT, and which doesn't respect the SPFEDIT ENQ. I'll grant this is unlikely; I'd prefer not to try to create it. Perhaps Ted is thinking of something in addition. SNIP I've not been following this thread closely. But it seems that about this time last year I started dealing with a related issue. So if this is not germane to your discussions, just ignore it. Meanwhile, I had found an ABEND that happens when two tasks are trying to do STOW at the same time. In my situation, this was a race (or timing dependant) condition and it could be done within a single LPAR between two address spaces (and I think I was even able to get it within the same address space). I did this under z/OS V1R9. Since we did things to prevent it, I would have to break the code to recreate under z/OS V1R10/11. During design, we concluded that we had to use the ISPF EDIT ENQUEUE. But during testing we found that if you are doing a STOW for member X while another task is attempting member Y at the same time, the ISPF EDIT ENQUEUE does not protect the directory from a simultaneous update situation, only from two tasks using the same member. In order to prevent this ABEND situation, we decided to use an ENQUEUE for the directory updates. The ENQUEUE actually protects from the problem within one address space or across two -- and only between uses of the product (which is still underdevelopment) since the ENQUEUE we came up with is private. The STOW situation I ran into did not require a member write, only that you wish to update the directory entry. In my case, attempting to add the ISPF stats caused the ABEND. And because of race (or timing as you prefer) conditions I was getting two STOWs being done at the same time to the same directory. The system detected this and the arbitrary second updater got the ABEND. Regards, Steve Thompson -- Opinions expressed by this poster may not reflect those of poster's employer -- -- 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: Small Server Mob Advantage
The following message is a courtesy copy of an article that has been posted to bit.listserv.ibm-main,alt.folklore.computers as well. Anne Lynn Wheeler l...@garlic.com writes: At the time, some internal locations were bursting at the seams in terms of raised floor and 4341s were solution to installing additional computing power ... out in department areas (at some locations, conference rooms became a very scarce resource ... because so many were being taken over for 4341s). re: http://www.garlic.com/~lynn/2009q.html#82 Small Server Mob Advantage http://www.garlic.com/~lynn/2009q.html#83 Small Server Mob Advantage http://www.garlic.com/~lynn/2009r.html#0 Small Server Mob Advantage http://www.garlic.com/~lynn/2009r.html#1 Small Server Mob Advantage alternative to taking over all the conference rooms (something that happened with big spike in 4341 installs a couple decades ago) IBM thinks outside the box with containerized data centres http://www.theregister.co.uk/2009/12/07/ibm_data_center_containers/ from above: The idea of putting servers, storage, and networking gear into metal shipping containers and linking them together into a data centre cluster is not a new idea - Sun Microsystems was the first to propose the idea back in October 2006 - but it is catching on enough that IBM is endorsing the concept and shipping a product. ... snip ... -- 40+yrs virtualization experience (since Jan68), online at home since Mar1970 -- 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: IDCAMS Delete via DD
John Eells wrote: Edward Jaffe wrote: snip Such assumptive, non-canonical, lazy programming seems to work in most cases, but can lead to failure and confusion in others. I eliminate it whenever I can. I regard such code as inelegant, yet convenient, short-cuts that work most of the time. Kludge. So, naturally without any guarantee that we'll ever do anything...how would those of you who dislike our solution solve the problem while meeting the implied requirement for avoiding JCL changes? Just thinking out loud here... I wonder if a mechanism could be developed to allow allocation to predict with certainty from where PGM=program will be loaded? For those predicted to be system provided utilities, there could be new attributes added to some table, perhaps even the PPT, for allocation use. The first or only of these new properties could control whether to HDELETE migrated data sets for DDs with DISP=(MOD,DELETE). This approach, or some more workable variant, is intended to generalize the system to avoid hard-coded checking for IEFBR14 and the potentially erroneous behavioral assumptions that are possible. It would also allow this new allocation attribute to be defined for other IBM-, vendor-, or user-written utilities. -- Edward E Jaffe Chief Technology Officer Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.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: Filezilla, was Ipswitch WS_FTP Pro 12 not displaying OMVS directories correctly
Gibney, Dave wrote: I must have something wrong. I just installed the latest. 3.3.0.1 and I still get: Trace: CTransferSocket::OnReceive(), m_transferMode=0 Trace: GnuTLS error -9: A TLS packet with unexpected length was received. Status: Server did not properly shut down TLS connection Error: Could not read from transfer socket: ECONNABORTED - Connection aborted Trace: CTransferSocket::TransferEnd(3) This past weekend, I applied APAR PK77240 (UK43295 on z/OS 1.9) to my test system and set TLSRFCLEVEL RFC4217 in FTP.DATA. This does seem to have fixed the problem. -- Richard -- 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: IEC143I 213-30
Yes, the 213-13 abend is the solution, if you try to open a DCB for output when there is already an output DCB open for a PDS, it will cause the abend. I cannot see how corruption can occur if you can't have two DCBs open for output at the same time. The ENQ is only to avoid getting the abend. Thompson, Steve steve_thomp...@stercomm.com 12/7/2009 11:30 AM -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Monday, December 07, 2009 9:40 AM To: IBM-MAIN@bama.ua.edu Subject: Re: IEC143I 213-30 On Mon, 7 Dec 2009 09:53:26 -0500, Scott Rowe wrote: I don't believe that's true, Gil. It doesn't make sense given the changes that were made to the logic, and I can't create it here. Do you have a test case that shows this? I believe SPFEDIT mostly protects you. To show the problem you'd need to have: o DSNTYPE=PDS o DISP=SHR o Update by a process other than ISPF EDIT, and which doesn't respect the SPFEDIT ENQ. I'll grant this is unlikely; I'd prefer not to try to create it. Perhaps Ted is thinking of something in addition. SNIP I've not been following this thread closely. But it seems that about this time last year I started dealing with a related issue. So if this is not germane to your discussions, just ignore it. Meanwhile, I had found an ABEND that happens when two tasks are trying to do STOW at the same time. In my situation, this was a race (or timing dependant) condition and it could be done within a single LPAR between two address spaces (and I think I was even able to get it within the same address space). I did this under z/OS V1R9. Since we did things to prevent it, I would have to break the code to recreate under z/OS V1R10/11. During design, we concluded that we had to use the ISPF EDIT ENQUEUE. But during testing we found that if you are doing a STOW for member X while another task is attempting member Y at the same time, the ISPF EDIT ENQUEUE does not protect the directory from a simultaneous update situation, only from two tasks using the same member. In order to prevent this ABEND situation, we decided to use an ENQUEUE for the directory updates. The ENQUEUE actually protects from the problem within one address space or across two -- and only between uses of the product (which is still underdevelopment) since the ENQUEUE we came up with is private. The STOW situation I ran into did not require a member write, only that you wish to update the directory entry. In my case, attempting to add the ISPF stats caused the ABEND. And because of race (or timing as you prefer) conditions I was getting two STOWs being done at the same time to the same directory. The system detected this and the arbitrary second updater got the ABEND. Regards, Steve Thompson -- Opinions expressed by this poster may not reflect those of poster's employer -- -- 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 CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- 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: IEC143I 213-30
This is not true Ted, as we have discussed before. In fact, the symptom in the title of this thread is the result of IBM closing that exposure. I thought it was only fixed in a SYSPLEX environment. I have not worked in a non-SYSPLEX world for over 15 years, so I have not shared either kind of partitioned dataset outside that boundary in that same period of time. - Too busy driving to stop for gas! -- 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: IEC143I 213-30
In more detail, last guy to save wins; first guy's changes are lost. That's what I meant. Some might consider this corruption. But directory integrity is maintained. Data integrity is what I meant. - Too busy driving to stop for gas! -- 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: IEC143I 213-30
I'll grant this is unlikely; I'd prefer not to try to create it. Perhaps Ted is thinking of something in addition. The last time I saw it was in a hmegrown source management system -- not using ISPF services. - Too busy driving to stop for gas! -- 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: file definition
snip Is there a utility where I can give it a list of dataset names and it can give back some JCL that could have been used to define that file? /snip The REXX suggested is probably the easiest way, especially if you put in a LISTDSI. That will give you most of the parameters that you need to allocate a nonVSAM, catalogued DSN. If the DSN isn't around any more you could do something similar if you have DCOLLECT output. HTH Jack Kelly 202-502-2390 (Office) -- 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: Detect the loop for batch job
Well we in OMEGAMON have been working on the cpu looping issue lately: Detecting an address space in an infinite loop is not an easy job. Our modern z/OS LPARs often have multiple CPUs and specialty processors like zIIP and zAAP where instructions can be dispatched. In addition Workload Manager will try to distribute processor resources equitably based on the current workload mix and priorities defined in the installation?s policy. Lower priority batch workloads that happen to be looping can easily run under the radar for long periods of time squandering resources. OMEGAMON XE on z/OS 4.2.0 with the addition of Interim feature 1 has a strategy to help surface these problems. OMEGAMON has had a feature called Bottleneck Analysis for many years. Bottleneck Analysis builds a profile over time through periodic sampling of what execution states are being used by address spaces. These execution states include things like Using CPU, Using zIIP, Using zAAP, Waiting for CPU, Waiting for zIIP, Waiting for zAAP, Using I/O, Waiting for I/O, Waiting for Enqueue, Waiting for HSM, Swapped, etc. A cpu looping address space will reveal itself by populating only the using and waiting states for CPU resources (including zIIP and zAAP). OMEGAMON XE on z/OS 4.2.0 has a new attribute called CPU Loop Index that uses this bottleneck information as its basis. High priority workloads can be reliably detected fairly quickly. The real trick is discriminating between well behaved low priority work that is just starved for attention from low priority work that is looping. OMEGAMON XE on z/OS 4.2.0 Interim Feature 1 provides this discrimination by dynamically extending the observation period required before indicating a likely loop when the ratio of waiting for CPU to Using CPU is high. For more information on OMEGAMON XE on z/OS approach to CPU Loop detection please see the article titled ?Detecting CPU looping address spaces using IBM Tivoli OMEGAMON XE on z/OS version 4.2.0? in the August issue of the z System Advisor at http://www-01.ibm.com/software/tivoli/systemz-advisor/2009-08/. Joe Winterton Release Mgr - OMEGAMON - Development Team 919-224-1328 Cell -914-954-0483 - jose...@us.ibm.com From: Hal Merritt hmerr...@jackhenry.com To: IBM-MAIN@bama.ua.edu Date: 12/07/2009 09:48 AM Subject: Re: Detect the loop for batch job Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu All programs 'loop'. It is what they do. About the only automated solution I can think of would be to set a CPU time limit. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Joel C. Ewing Sent: Saturday, December 05, 2009 11:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Detect the loop for batch job On 12/04/2009 10:14 AM, bjbxd wrote: Hello List, We are looking for a tool to detect the loop for batch application, any suggestion are appreciated. My shop is runing z/OS, application is C/C++. Bob. NOTICE: This electronic mail message and any files transmitted with it are intended exclusively for the individual or entity to which it is addressed. The message, together with any attachment, may contain confidential and/or privileged information. Any unauthorized review, use, printing, saving, copying, disclosure or distribution is strictly prohibited. If you have received this message in error, please immediately advise the sender by reply email and delete all copies. -- 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 -- 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: IEFUSI and LSQA
On Fri, 4 Dec 2009 15:43:07 -0200, ITURIEL DO NASCIMENTO NETO 4254.itur...@bradesco.com.br wrote: Hi all, I would like your advice when reserving 512Kb below 16Mb line. During years i've coded : L R7,LDASIZA Size of A.S. Region Below L R8,LDAESIZA Size of A.S. Region Above ASSIGN0 DS0H Region=0M STR8,REGLIMA REGLIMA = EPRIVATE S R8,LSQAA R8 = REGLIMA = Max - 15M STR8,REGSIZA Save EXTENDED REGION-SIZE STR7,REGLIMB REGLIMB = PRIVATE S R7,LSQAB R7 = REGLIMB = Max - 512K STR7,REGSIZB Save OCREGFLAGS,Highbit TELL VSM BRAFUSI SUPPLY INFO LSQABDCA(512*1024) LSQA Below (512Kb) LSQAADCA(15*1024*1024) LSQA Above (15Mb) I was told that this code was not actually saving LSQA, then i was instructed to code : L R7,LDASIZA Size of A.S. Region Below L R8,LDAESIZA Size of A.S. Region Above S R7,LSQAB R7 = REGLIMB = Max - 512K S R8,LSQAA R8 = REGLIMA = Max - 15M ASSIGN0 DS0H Region=0M STR8,REGLIMA REGLIMA = EPRIVATE-15M S R8,@500K REGSIZA = REGLIMA-500K STR8,REGSIZA Save EXTENDED REGION-SIZE STR7,REGLIMB REGLIMB = PRIVATE-512K S R7,@100K REGSIZB = REGLIMB-100K STR7,REGSIZB Save OCREGFLAGS,Highbit TELL VSM BRAFUSI SUPPLY INFO @100KDCA(100*1024) 100K @500KDCA(500*1024) 500K LSQABDCA(512*1024) LSQA Below (512Kb) LSQAADCA(15*1024*1024) LSQA Above (15Mb) Is There a better option ? Thanks in advance Atenciosamente / Regards / Saludos Ituriel do Nascimento Neto Banco Bradesco S/A 4254 - DPCD Engenharia de Software Sistemas Operacionais Mainframes Tel: +55 11 4197-2021 R: 22021 Fax: +55 11 4197-2814 The LDA contains what the sizes are, but I've never updated those control blocks directly via IEFUSI. FWIW, I look at the GDA and for below 16M set region limit to ALL-512K and region size to ALL-64K.There is no real reason to reserve LSQA above. Whatever isn't in use for extended private can be used for LSQA. When those 2 boundaries hit each other is when your address space will die. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- 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: Small Server Mob Advantage
The following message is a courtesy copy of an article that has been posted to bit.listserv.ibm-main,alt.folklore.computers as well. Anne Lynn Wheeler l...@garlic.com writes: the major internal networking technology was able to have native drivers ... but also install jes2 drivers for communicating with jes2 systems (and allow jes2/mvs systems to participate in the internal network). this feature evolved into these (non-native) jes2 drives adding features to try and rewrite jes2 headers to that they were always compatible with the direclty connected jes2/mvs systems (as countermeasure to have high frequency of jes2/mvs crashing all over the world). the internal technology got blaimed for not preventing the hursley mvs systems from crashing (since the internet network technology hadn't been upgraded to filter some of the new san jose jes2 fields ... from reaching the hursley jes2 systems). misc. past posts mentioning hasp, jes2, and/or jes2 networking http://www.garlic.com/~lynn/submain.html#hasp dislcaimer: my wife did a stint in the jes group (among other things acted as one of the catchers for asp-jes3 ... and did a design document for merged jes2/jes3 product) ... before getting con'ed into going to pok to be in charge of loosely-coupled architecture. re: http://www.garlic.com/~lynn/2009q.html#83 Small Server Mob Advantage I recently reminded my wife about the problem with adverse interaction between jes2 networking at different release levels (resulting in mvs system crashes) ... and (infamous) incident with hursley systems crashing ... and being blamed on vnet. she quoted some chinese proberb if you ever save somebody ... you are responsible for them for life. she also mentioned somebody in the jes2 group that may have been primarily responsible. I reminded her that a lot of the characteristics of jes2 networking was inherited from the HASP implementation ... which carried the characters TUCC on the (networking) source code changes. -- 40+yrs virtualization experience (since Jan68), online at home since Mar1970 -- 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: file definition
On Mon, 7 Dec 2009 12:38:55 -0500, John Kelly wrote: snip Is there a utility where I can give it a list of dataset names and it can give back some JCL that could have been used to define that file? /snip The REXX suggested is probably the easiest way, especially if you put in a LISTDSI. That will give you most of the parameters that you need to allocate a nonVSAM, catalogued DSN. If the DSN isn't around any more you could do something similar if you have DCOLLECT output. There's one fly in this ointment. Our DASD are all (mostly?) 3390. But when I request a particular number of cylinders, some busybody component (sometimes?) adjusts the requested number downward by the ratio of 3380 cylinder size to 3390 cylinder size. But reporting functions report the actual number of 3390 cylinders. So, if I use ISPF Data Set utility to get info for a data set, then Allocate another with the values on the screen, it's smaller. Every time. The functions to create a data set and to report its characteristics should obey the same conventions. I'm progressively converting all my SPACE requests to bytes. Beware. -- gil -- 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: CF LPAR MIPS Utilisation
On Mon, 7 Dec 2009 09:48:30 -0500, Scott Rowe scott.r...@joann.com wrote: In my experience, GRS-Star with shared CP CFs is still significantly faster (at least one order of magnitude) than GRS Ring using XCF. For the group's sake, I should have made the YMMV disclaimer. Our N.A. systems fared much better with Star than our European systems, but the configurations, workloads and constraints are quite different. Also, the purpose for the extra CF can be used to upgrade CF code without a Sysplex outage. OK, ya got me. We are spoiled with a second CEC... I guess it's also remotely possible that a CF code fault could cause a CF failure, though I have yet to see this. I keep a second CF running for this purpose, though I don't currently have any active structures in it. Maybe so in the midst of a CF code upgrade (planned outage), else a code fault on CF1 seems very likely to recur on CF2 in very short order. Any sort of unrecoverable physical failure would most likely throw machine casters up, rendering the second CF moot. Regards, Art Gutowski Ford Motor Company -- 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: file definition
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Monday, December 07, 2009 11:52 AM To: IBM-MAIN@bama.ua.edu Subject: Re: file definition snip There's one fly in this ointment. Our DASD are all (mostly?) 3390. But when I request a particular number of cylinders, some busybody component (sometimes?) adjusts the requested number downward by the ratio of 3380 cylinder size to 3390 cylinder size. But reporting functions report the actual number of 3390 cylinders. So, if I use ISPF Data Set utility to get info for a data set, then Allocate another with the values on the screen, it's smaller. Every time. The functions to create a data set and to report its characteristics should obey the same conventions. I'm progressively converting all my SPACE requests to bytes. Beware. -- gil Your DFSMS is messed up. There is a parameter in the Base Configuration where the number of bytes per track is set. For a 3390, it should be set to 56664. Sounds like yours is set to a 3380 value of 47476. Time to wack the sysprog/storage admin. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- 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: file definition
snip But when I request a particular number of cylinders, some busybody component (sometimes?) adjusts the requested number downward by the ratio of 3380 cylinder size to 3390 cylinder size. /snip That certainly sounds like the Default Device Geometry in the SMS Base Configuration. Jack Kelly 202-502-2390 (Office) -- 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: Missing RACF exit
2009/12/7 Beesley, Paul paul.bees...@atosorigin.com: Thanks Rob. Turned out to be fairly easy. Dynamically loaded the module into MLPA, wrote a quick program to zap the address into the correct slot in the RCVT. For a one-off [semi-]emergency situation, this should be fine. For anything longer term, two things to watch out for are: RACF's DSMON, and several third party tools will object when they find your dynamically banged-in address. If you have auditors who monitor this kind of thing, then you may have some 'splainin to do. For our products the doc explains this in what we hope is a transparent manor, and provides the information needed to be sure that a rogue exit has not been installed. If you have any other products that also dynamically add these static exits, you need to be sure they all play nicely. In particular, each needs to be able to add and remove itself in a safe way that does not depend on starting the products in a particular order.Compare and Swap is merely the beginning. In our travels we have only once encountered a truly difficult third (fourth?) party vendor, and in that case the customer did have to start and stop things in a fixed order. Tony H. -- 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: file definition
There's one fly in this ointment. Our DASD are all (mostly?) 3390. But when I request a particular number of cylinders, some busybody component (sometimes?) adjusts the requested number downward by the ratio of 3380 cylinder size to 3390 cylinder size. But reporting functions report the actual number of 3390 cylinders. That busybody is SMS. There is a panel withing the ISPF application where you specify the 'logical' track size. This is an artifact leftover when SMS was first introduced and 3380's still existed with 3390's. It was intended to 'save space'. I have had the parameter changed to 56664 in every shop I've worked at since SMS came out. It seems everybody started with 47476. - Too busy driving to stop for gas! -- 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
IWM4ECRE Reason Code 83A
We are running Z/OS 1.9. After issuing WLM macro IWM4ECRE Create Enclave the Return Code is 8 and the Reason Code is '083A'. My macro for IWM4ECRE in sys1.maclib does NOT have an 083A Reason Code listed. Checking the publication Programming Work Load Management Services also did not have a description of Reason Code of 083A. Does anyone have a z/OS 1.10 System that can tell me what Reason Code 083A means after IWM4ECRE (Create Enclave) is issued ? Paul D'Angelo Diet Help Cheap Diet Help Tips. Click here. http://thirdpartyoffers.juno.com/TGL2141/c?cp=0a8NEzawCl8Xsi1Wdq8T-AAAJ1DMCvI8C_EKS4yGKHO7DleMAAYAAADNAAAYQAA= -- 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: IWM4ECRE Reason Code 83A
I looked in the 1.10 and 1.11 manuals. 083A is not documented there either. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of esst...@juno.com Sent: Monday, December 07, 2009 12:32 PM To: IBM-MAIN@bama.ua.edu Subject: IWM4ECRE Reason Code 83A We are running Z/OS 1.9. After issuing WLM macro IWM4ECRE Create Enclave the Return Code is 8 and the Reason Code is '083A'. My macro for IWM4ECRE in sys1.maclib does NOT have an 083A Reason Code listed. Checking the publication Programming Work Load Management Services also did not have a description of Reason Code of 083A. Does anyone have a z/OS 1.10 System that can tell me what Reason Code 083A means after IWM4ECRE (Create Enclave) is issued ? Paul D'Angelo Diet Help Cheap Diet Help Tips. Click here. http://thirdpartyoffers.juno.com/TGL2141/c?cp=0a8NEzawCl8Xsi1W dq8T-AAAJ1DMCvI8C_EKS4yGKHO7DleMAAYAAADNAA AYQAA= -- 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 -- 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
Portable data centers (was RE: Small Server Mob Advantage)
-Original Message- From: IBM Mainframe Discussion List [On Behalf Of Anne Lynn Wheeler [ snip ] IBM thinks outside the box with containerized data centres http://www.theregister.co.uk/2009/12/07/ibm_data_center_containers/ from above: The idea of putting servers, storage, and networking gear into metal shipping containers and linking them together into a data centre cluster is not a new idea - Sun Microsystems was the first to propose the idea back in October 2006 - but it is catching on enough that IBM is endorsing the concept and shipping a product. Yawn The USMC has had portable air traffic control facilities of this nature since at least 1965. Still cheaper than IBM's portable data centers: http://www.governmentcontractswon.com/department/defense/an-tsq-18-landi ng-cntrl-cntr.asp?yr=00 -jc- -- 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
Display contents of an offload tape
I've searched the JES2 manual can not find a way to display the contents of a OFFLOAD tape or disk file. Is there away to do this? -- Mark Pace Mainline Information Systems 1700 Summit Lake Drive Tallahassee, FL. 32317 -- 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: IEC143I 213-30
In 2121472874-1259961467-cardhu_decombobulator_blackberry.rim.net-17612826...@bda488.bisx.prod.on.blackberry, on 12/04/2009 at 09:17 PM, Ted MacNEIL eamacn...@yahoo.ca said: You can't share regular PDS datasets either. Of course you can. Whether or not you know how to do it safely, others do. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEC143I 213-30
In 45d79eacefba9b428e3d400e924d36b902d16...@iwdubcormsg007.sci.local, on 12/07/2009 at 11:30 AM, Thompson, Steve steve_thomp...@stercomm.com said: Meanwhile, I had found an ABEND that happens when two tasks are trying to do STOW at the same time. That's because you didn't have proper serialization. You need to do the ENQ (RESERVE) before the OPEN and the DEQ after the CLOSE. BPAM does not support multiple concurrent opens of the same PDS for output. During design, we concluded that we had to use the ISPF EDIT ENQUEUE. Which ENQ? ISPF uses one to serialize the member and one to serialize the data set; you need to use both. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IWM4ECRE Reason Code 83A
I searched my MACLIB/MODGEN and the following popped up in a lot of macros : 083A IwmRsnCodeBadEnclave Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of McKown, John Sent: 07 December 2009 18:51 To: IBM-MAIN@bama.ua.edu Subject: Re: IWM4ECRE Reason Code 83A I looked in the 1.10 and 1.11 manuals. 083A is not documented there either. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of esst...@juno.com Sent: Monday, December 07, 2009 12:32 PM To: IBM-MAIN@bama.ua.edu Subject: IWM4ECRE Reason Code 83A We are running Z/OS 1.9. After issuing WLM macro IWM4ECRE Create Enclave the Return Code is 8 and the Reason Code is '083A'. My macro for IWM4ECRE in sys1.maclib does NOT have an 083A Reason Code listed. Checking the publication Programming Work Load Management Services also did not have a description of Reason Code of 083A. Does anyone have a z/OS 1.10 System that can tell me what Reason Code 083A means after IWM4ECRE (Create Enclave) is issued ? Paul D'Angelo Diet Help Cheap Diet Help Tips. Click here. http://thirdpartyoffers.juno.com/TGL2141/c?cp=0a8NEzawCl8Xsi1W dq8T-AAAJ1DMCvI8C_EKS4yGKHO7DleMAAYAAADNAA AYQAA= -- 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 -- 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 -- 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: Need some FDR help please
On 2009-12-04 18:54 concerning Re: Need some FDR help please, Linda Mooney lin...ls...@com...net wrote to IBM-Main : Now I need to restore PS and PO [snip], excluding VSAM, no catalogue updates allowed, non-SMS DASD volume and new high level qualifier. [snip] nature of the 'treasure hunt'. I am looking for some source code [snip] Linda : On the Select statement for DSF, you can use NewIndex=NewHLQ to swap hlq's, NULLSTORCLAS to indicate, well, that, plus NVol=(xxx*,xxx*,xxx*) and NOCAT but I can't find a method to select by dataset type ie. Vsam. Unless you can identify a naming convention (from the FdrAbrP listing) that can be used to EXCLUDE DSN=**.VSAM.** or **.DATA, **.INDEX, **.CSI before SELECT Dsn=SYSPROG**. (Remember, you can multi-Exclude hundreds of times before the Select.) However, if you have FDReport, you could try DATA=TVTOC with DSORG.EQ.(PO,PS,...) and PUNCH the necessary SELECT statements for the (subsequent) DSF step. -- signature = 6 lines follows -- Neil Duffee, Joe SysProg, U d'Ottawa, Ottawa, Ont, Canada telephone:1 613 562 5800 x4585 fax:1 613 562 5161 mailto:NDuffee of uOttawa.ca http:/ /aix1.uottawa.ca/ ~nduffee How *do* you plan for something like that? Guardian Bob, Reboot For every action, there is an equal and opposite criticism. Systems Programming: Guilty, until proven innocent John Norgauer 2004 -- 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
A WebSphere Virtual Enterprise (z/OS) consultant
I am looking for a consultant that has WebSphere Virtual Enterprise (z/OS) experience to support a customer in NYC. Qualified applicants should respond to heiml...@streamfoundry.com. Thanks, Marc Marc Heimlich StreamFoundry, Inc. VP, Sales Marketing SFI, Inc. 781.272.4307 url: http://www.streamfoundry.com http://www.streamfoundry.com Ask about SFI's Mainframe Software Savings Series - Part I: z/Linux http://archive.constantcontact.com/fs005/1100852680296/archive/110273753319 0.html z/VM Part II: Parallel http://archive.constantcontact.com/fs005/1100852680296/archive/110277881886 3.html Sysplex Part III: CICS http://archive.constantcontact.com/fs005/1100852680296/archive/110282954412 3.htmlC:/Documents%20and%20Settings/Marc%20Heimlich/My%20Documents/Access%20 Connections Performance Tuning -- 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: IWM4ECRE Reason Code 83A
Its not a bad enclave per say. The enclave hasnt been created. Either the connect token is damaged or as others have stated the PSW/PKM is incorrect. -- Original Message -- From: Rob Scott rsc...@rocketsoftware.com To: IBM-MAIN@bama.ua.edu Subject: Re: IWM4ECRE Reason Code 83A Date: Mon, 7 Dec 2009 15:16:41 -0500 I searched my MACLIB/MODGEN and the following popped up in a lot of macros : 083A IwmRsnCodeBadEnclave Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of McKown, John Sent: 07 December 2009 18:51 To: IBM-MAIN@bama.ua.edu Subject: Re: IWM4ECRE Reason Code 83A I looked in the 1.10 and 1.11 manuals. 083A is not documented there either. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of esst...@juno.com Sent: Monday, December 07, 2009 12:32 PM To: IBM-MAIN@bama.ua.edu Subject: IWM4ECRE Reason Code 83A We are running Z/OS 1.9. After issuing WLM macro IWM4ECRE Create Enclave the Return Code is 8 and the Reason Code is '083A'. My macro for IWM4ECRE in sys1.maclib does NOT have an 083A Reason Code listed. Checking the publication Programming Work Load Management Services also did not have a description of Reason Code of 083A. Does anyone have a z/OS 1.10 System that can tell me what Reason Code 083A means after IWM4ECRE (Create Enclave) is issued ? Paul D'Angelo Diet Help Cheap Diet Help Tips. Click here. http://thirdpartyoffers.juno.com/TGL2141/c?cp=0a8NEzawCl8Xsi1W dq8T-AAAJ1DMCvI8C_EKS4yGKHO7DleMAAYAAADNAA AYQAA= -- 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 -- 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 -- 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 Diet Help Cheap Diet Help Tips. Click here. http://thirdpartyoffers.juno.com/TGL2141/c?cp=ILHLecn2NSSCsPuVsZxHtQAAJ1DMCvI8C_EKS4yGKHO7DleMAAYAAADNAAAYQAA= -- 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: Portable data centers (was RE: Small Server Mob Advantage)
What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. Lloyd --- On Mon, 12/7/09, Chase, John jch...@ussco.com wrote: From: Chase, John jch...@ussco.com Subject: Portable data centers (was RE: Small Server Mob Advantage) To: IBM-MAIN@bama.ua.edu Date: Monday, December 7, 2009, 1:56 PM -Original Message- From: IBM Mainframe Discussion List [On Behalf Of Anne Lynn Wheeler [ snip ] IBM thinks outside the box with containerized data centres http://www.theregister.co.uk/2009/12/07/ibm_data_center_containers/ from above: The idea of putting servers, storage, and networking gear into metal shipping containers and linking them together into a data centre cluster is not a new idea - Sun Microsystems was the first to propose the idea back in October 2006 - but it is catching on enough that IBM is endorsing the concept and shipping a product. Yawn The USMC has had portable air traffic control facilities of this nature since at least 1965. Still cheaper than IBM's portable data centers: http://www.governmentcontractswon.com/department/defense/an-tsq-18-landi ng-cntrl-cntr.asp?yr=00 -jc- -- 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 -- 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: Portable data centers (was RE: Small Server Mob Advantage)
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Lloyd Fuller Sent: Monday, December 07, 2009 2:57 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Portable data centers (was RE: Small Server Mob Advantage) What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. Lloyd snip Yeah, and they had 600' of channel cables attached to a jeep to use as a mouse. Sorry, I just couldn't get this cartoon out of my mind of the original mouse... Regards, Steve Thompson -- Standard disclaimer applies -- -- 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: Portable data centers (was RE: Small Server Mob Advantage)
Mouse? the only stinking mouse was the one eating the punch cards! These were batch machines running DOS/VS. They did have lots of cable and the installations that I saw were REAL careful about what kind of traffic even came close to the trailers. In fact even foot traffic was discouraged! Lloyd --- On Mon, 12/7/09, Thompson, Steve steve_thomp...@stercomm.com wrote: From: Thompson, Steve steve_thomp...@stercomm.com Subject: Re: Portable data centers (was RE: Small Server Mob Advantage) To: IBM-MAIN@bama.ua.edu Date: Monday, December 7, 2009, 4:00 PM -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Lloyd Fuller Sent: Monday, December 07, 2009 2:57 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Portable data centers (was RE: Small Server Mob Advantage) What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. Lloyd snip Yeah, and they had 600' of channel cables attached to a jeep to use as a mouse. Sorry, I just couldn't get this cartoon out of my mind of the original mouse... Regards, Steve Thompson -- Standard disclaimer applies -- -- 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 -- 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: Safe C++ char array functions (Was Is there a good mailing list or forum for mainframe C/C++ specifically?)
Strlcpy is certainly an equal opportunity solution -- it's not available on EITHER of the platforms I am working with. My impression is that strcpy_s does *not* copy anything if the target buffer is too short. Hey, anybody want my implementations of a safe strcpy and sprintf? Here you go: // sprintf_ss is a local one-for-one replacement for Microsoft sprintf_s // replace all references to sprintf_ss when/if IBM implements on z/OS int sprintf_ss(char *string, size_t sizeInBytes, const char *format, ...) { va_list args; assert(format != NULL); //assert(string != NULL); // not necessary; hardware will detect va_start(args, format); int ret = vsprintf(string, format, args); va_end(args); assert(strlen(string) sizeInBytes); // note that the damage is already done! return ret; } // strcpy_ss is a local one-for-one replacement for Microsoft strcpy_ss // replace all references to strcpy_ss when/if IBM implements on z/OS // note not quite one-to-one as uses assert() rather than error returns errno_t strcpy_ss(char *strDestination, size_t numberOfElements, const char *strSource) { assert(strlen(strSource) numberOfElements); //assert(strDestination != NULL); // not necessary; hardware will catch assert(strSource != NULL); strcpy(strDestination, strSource); return 0; } Charles -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Gainsford, Allen Sent: Sunday, December 06, 2009 11:56 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Safe C++ char array functions (Was Is there a good mailing list or forum for mainframe C/C++ specifically?) Correct on strcpy_s versus strncpy. Strncpy has the possibility of making a new bad situation while preventing another. You can easily end up with a string that is guaranteed to run wild if you strcpy it. I personally have always preferred strlcpy to strncpy or strcpy_s, since strlcpy is basically an always-safe copy function that doesn't have the defects of strcpy_s (does nothing if the dest is too small, instead of copying as much as it safely can) or strncpy (doesn't always null-terminate the result; and always touches every byte of the dest area, which can be a massive time-waster for large dest buffers). The only problem with strlcpy is that it's not supported on many platforms, any more than strcpy_s is... -- 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: Need some FDR help please
Hi Neil, FDREPORT can XSELECT/XEXCLUDE VSAM with the DSORG=EF field. Other DSORG types can also be selected or excluded using the DSORG field. Joseph Butz jb...@fdrinnovation.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Neil Duffee Sent: Monday, December 07, 2009 3:26 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Need some FDR help please On 2009-12-04 18:54 concerning Re: Need some FDR help please, Linda Mooney lin...ls...@com...net wrote to IBM-Main : Now I need to restore PS and PO [snip], excluding VSAM, no catalogue updates allowed, non-SMS DASD volume and new high level qualifier. [snip] nature of the 'treasure hunt'. I am looking for some source code [snip] Linda : On the Select statement for DSF, you can use NewIndex=NewHLQ to swap hlq's, NULLSTORCLAS to indicate, well, that, plus NVol=(xxx*,xxx*,xxx*) and NOCAT but I can't find a method to select by dataset type ie. Vsam. Unless you can identify a naming convention (from the FdrAbrP listing) that can be used to EXCLUDE DSN=**.VSAM.** or **.DATA, **.INDEX, **.CSI before SELECT Dsn=SYSPROG**. (Remember, you can multi-Exclude hundreds of times before the Select.) However, if you have FDReport, you could try DATA=TVTOC with DSORG.EQ.(PO,PS,...) and PUNCH the necessary SELECT statements for the (subsequent) DSF step. -- signature = 6 lines follows -- Neil Duffee, Joe SysProg, U d'Ottawa, Ottawa, Ont, Canada telephone:1 613 562 5800 x4585 fax:1 613 562 5161 mailto:NDuffee of uOttawa.ca http:/ /aix1.uottawa.ca/ ~nduffee How *do* you plan for something like that? Guardian Bob, Reboot For every action, there is an equal and opposite criticism. Systems Programming: Guilty, until proven innocent John Norgauer 2004 -- 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 -- 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: Portable data centers (was RE: Small Server Mob Advantage)
On 7 Dec 2009 13:01:33 -0800, steve_thomp...@stercomm.com (Thompson, Steve) wrote: What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. How big were those, compared to an iPod? -- 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: Portable data centers
The following message is a courtesy copy of an article that has been posted to bit.listserv.ibm-main,alt.folklore.computers as well. leful...@sbcglobal.net (Lloyd Fuller) writes: What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. re: http://www.garlic.com/~lynn/2009r.html#12 Small Server Mob Advantage maybe mid-60s?? 360 announce 7apr64. http://en.wikipedia.org/wiki/IBM_System/360 360/30 FCS jun65, 360/40 FCS apr65 http://www-03.ibm.com/ibm/history/exhibits/mainframe/mainframe_FS360.html ... maybe a 1401? http://www-03.ibm.com/ibm/history/exhibits/mainframe/mainframe_PP1401.html or 1620? http://www-03.ibm.com/ibm/history/exhibits/mainframe/mainframe_PP1620.html there was recent celebration of 50th anniv. of 1401 at computer history museum ... there is also this article ... which includes comment from somebody mentioning working on a 1401 located in marine truck in vietnam (1967) http://spectrum.ieee.org/computing/hardware/rebuilding-the-ibm-1401 I had sponsored Boyd's briefings at IBM in the 80s. Boyd's biographies has him in 1970 doing a year stint in charge of spook base ... a $2.5B(!) windfall for IBM ... although even that was probably not enuf to offset the cost of the failed future system effort http://www.garlic.com/~lynn/submain.html#futuresys and/or the resulting impact that the failure had on the corporate culture. misc. past posts mentioning Boyd: http://www.garlic.com/~lynn/subboyd.html#boyd1 misc. URLs from around the web mentioning Boyd: http://www.garlic.com/~lynn/subboyd.html#boyd2 -- 40+yrs virtualization experience (since Jan68), online at home since Mar1970 -- 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: Display contents of an offload tape
On Mon, 2009-12-07 at 13:59 -0500, Mark Pace wrote: I've searched the JES2 manual can not find a way to display the contents of a OFFLOAD tape or disk file. Is there away to do this? Theoretically (he says, not having done the homework) spool offload tapes are in NJE format. See the NJE Formats and Protocols book: http://www.elink.ibmlink.ibm.com/publications/servlet/pbi.wss?CTY=USFNC=SRXPBL=SA22-7539-02 -- David Andrews A. Duda and Sons, Inc. david.andr...@duda.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
Anybody compared: Java vs. intepreted REXX?
That's the entire question. Assume a programmer is good at both languages. Also assume that the work to be done can be done in both languages without a bunch of funny stuff. I wonder which would take less CPU, on average. If I had a zAAP, I'd likely go with Java. If I needed to to ISPF macros, then REXX. Or, even weirder comparison: intepreted REXX vs. compiled NetREXX (REXX variant which compiles to Java .class file). John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- 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: file definition
On Mon, 7 Dec 2009 18:26:56 +, Ted MacNEIL wrote: There's one fly in this ointment. Our DASD are all (mostly?) 3390. But when I request a particular number of cylinders, some busybody component (sometimes?) adjusts the requested number downward by the ratio of 3380 cylinder size to 3390 cylinder size. But reporting functions report the actual number of 3390 cylinders. That busybody is SMS. There is a panel withing the ISPF application where you specify the 'logical' track size. This is an artifact leftover when SMS was first introduced and 3380's still existed with 3390's. It was intended to 'save space'. I have had the parameter changed to 56664 in every shop I've worked at since SMS came out. It seems everybody started with 47476. I was reporting from memory. The problem appears to have vanished, perhaps with a recent upgrade from 1.7 to 1.10. Would IBM have changed a default? -- gil -- 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
Clues on using C++ prelink * lked for first time
I've got my first mainframe C++ application. It runs under Windows. (Obviously, that's not the same as running under z/OS, but the point is it's a complete program. My concern at this point is getting it to link, not run.) It compiles cleanly under z/OS C++. I have long names and want the load module in a PDS, so I'm running the compile/pre-link/link proc. There are eight object modules from eight source files in an HFS path. I'm good up to that point. Questions: 1. How do I specify the input to the prelinker? I tried LIBRARY with a DD name pointing to my object path and all of the object files listed in parentheses. If I do that, the prelinker runs to completion with a zero return code and nothing in SYSPRINT, but the link fails on a SYSLIN that is apparently empty (wrong length record, that sort of thing). SYSLIN is the same dataset as the prelink SYSMOD. How do I know if the prelinker actually did anything? My guess is that it did not. (SYSMOD specfies FB/80/3200 and SYSLIN lets it default.) 2. If I specify INCLUDE with a DD pointing to the main() object module and LIBRARY with a DD for everything else, I get a warning of unresolved extrns, but it still runs to a zero completion, and I still get the same error out of the link editor. Any clues? Is the prelinker documented anywhere other than the C++ User's Guide? Thanks, Charles Mills -- 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: Portable data centers
Anne Lynn Wheeler wrote: The following message is a courtesy copy of an article that has been posted to bit.listserv.ibm-main,alt.folklore.computers as well. leful...@sbcglobal.net (Lloyd Fuller) writes: What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. re: http://www.garlic.com/~lynn/2009r.html#12 Small Server Mob Advantage maybe mid-60s?? 360 announce 7apr64. http://en.wikipedia.org/wiki/IBM_System/360 360/30 FCS jun65, 360/40 FCS apr65 http://www-03.ibm.com/ibm/history/exhibits/mainframe/mainframe_FS360.html The ones that I saw were 360/30s. I understand there were a few 360/40s. The first one that I saw was in Vietnam in 1966. I later worked for a Sergeant that had worked on the prototypes some place in New England. The CPU and memory along with the 2540(?) and console were in one trailer. The disk (2314s) in a second and maybe third, and the tape drives in another trailer. There was also a generator trailer. Lloyd ... maybe a 1401? http://www-03.ibm.com/ibm/history/exhibits/mainframe/mainframe_PP1401.html or 1620? http://www-03.ibm.com/ibm/history/exhibits/mainframe/mainframe_PP1620.html there was recent celebration of 50th anniv. of 1401 at computer history museum ... there is also this article ... which includes comment from somebody mentioning working on a 1401 located in marine truck in vietnam (1967) http://spectrum.ieee.org/computing/hardware/rebuilding-the-ibm-1401 I had sponsored Boyd's briefings at IBM in the 80s. Boyd's biographies has him in 1970 doing a year stint in charge of spook base ... a $2.5B(!) windfall for IBM ... although even that was probably not enuf to offset the cost of the failed future system effort http://www.garlic.com/~lynn/submain.html#futuresys and/or the resulting impact that the failure had on the corporate culture. misc. past posts mentioning Boyd: http://www.garlic.com/~lynn/subboyd.html#boyd1 misc. URLs from around the web mentioning Boyd: http://www.garlic.com/~lynn/subboyd.html#boyd2 -- 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: Portable data centers (was RE: Small Server Mob Advantage)
Howard Brazee wrote: On 7 Dec 2009 13:01:33 -0800, steve_thomp...@stercomm.com (Thompson, Steve) wrote: What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. How big were those, compared to an iPod? Let's put it this way: even Shrek could not have put it into a shirt pocket like I can mine. These were full 18wheeler trailers - 30 foot or maybe more? Lloyd -- 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: Safe C++ char array functions (Was Is there a good mailing list or forum for mainframe C/C++ specifically?)
Charles Mills wrote: Strlcpy is certainly an equal opportunity solution -- it's not available on EITHER of the platforms I am working with. strlcpy() (and the other BSD string functions) are available in the Dignus runtime for z/OS. - Dave Rivers - -- riv...@dignus.comWork: (919) 676-0847 Get your mainframe programming tools at http://www.dignus.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: Clues on using C++ prelink * lked for first time
Charles Mills wrote: I've got my first mainframe C++ application. It runs under Windows. (Obviously, that's not the same as running under z/OS, but the point is it's a complete program. My concern at this point is getting it to link, not run.) It compiles cleanly under z/OS C++. I have long names and want the load module in a PDS, so I'm running the compile/pre-link/link proc. There are eight object modules from eight source files in an HFS path. I'm good up to that point. Questions: 1. How do I specify the input to the prelinker? I tried LIBRARY with a DD name pointing to my object path and all of the object files listed in parentheses. If I do that, the prelinker runs to completion with a zero return code and nothing in SYSPRINT, but the link fails on a SYSLIN that is apparently empty (wrong length record, that sort of thing). SYSLIN is the same dataset as the prelink SYSMOD. How do I know if the prelinker actually did anything? My guess is that it did not. (SYSMOD specfies FB/80/3200 and SYSLIN lets it default.) 2. If I specify INCLUDE with a DD pointing to the main() object module and LIBRARY with a DD for everything else, I get a warning of unresolved extrns, but it still runs to a zero completion, and I still get the same error out of the link editor. Any clues? Is the prelinker documented anywhere other than the C++ User's Guide? Thanks, Charles Mills It is probably easiest to do this from a Unix Service shell using the c++ command. See the description of the c89 command in Unix System Services Command Reference, and in particular the prefix_STEPS environment variable. It has been a long time, but I believe if the target of the link is a PDS, the prelinker is invoked automatically even without the prefix_STEPS environment variable. Regards. Henry -- 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: Anybody compared: Java vs. intepreted REXX?
On 7 Dec 2009 14:12:46 -0800, in bit.listserv.ibm-main you wrote: That's the entire question. Assume a programmer is good at both languages. Also assume that the work to be done can be done in both languages without a bunch of funny stuff. I wonder which would take less CPU, on average. If I had a zAAP, I'd likely go with Java. If I needed to to ISPF macros, then REXX. Or, even weirder comparison: intepreted REXX vs. compiled NetREXX (REXX variant which compiles to Java .class file). If NetREXX were to be used, could the resultant code legally (according to IBM terms and conditions) be run on a zIP or zAAP? would there be any benefit to doing so? John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- 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 -- 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: Portable data centers (was RE: Small Server Mob Advantage)
No kidding! Was Sun even born yet? I started with my current employer in 1984. Couple of months later, we were putting in a new mainframe. A full sized 18 wheeler (probably a 65 footer) pulled up along side the building, along with another one with generators to run the mainframe in the first. Our data center was pretty small and in order to swap out the mainframe the workload was moved on to the machine in the truck while we did a push/pull in the data center. We ran the better part of a week like that, then we cut over to the new machine in the data c enter. Changed out the mainframe with only 2 IPLs worth of outage. Pretty fine. Not SUN , IBM. Linda Mooney - Original Message - From: Lloyd Fuller leful...@sbcglobal.net To: IBM-MAIN@bama.ua.edu Sent: Monday, December 7, 2009 5:42:57 PM GMT -08:00 US/Canada Pacific Subject: Re: Portable data centers (was RE: Small Server Mob Advantage) Howard Brazee wrote: On 7 Dec 2009 13:01:33 -0800, steve_thomp...@stercomm.com (Thompson, Steve) wrote: What do you mean Sun was the first? The US Army used 360/30 and 360/40s in 18-wheel trailers back in the early 1960s - 40 years before Sun thought of the idea. The Army even had those in Vietnam for the division data centers. How big were those, compared to an iPod? Let's put it this way: even Shrek could not have put it into a shirt pocket like I can mine. These were full 18wheeler trailers - 30 foot or maybe more? Lloyd -- 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 -- 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: Need some FDR help please
Thanks, but have only FDR/FDRDSF Linda - Original Message - From: Joseph Butz jb...@fdrinnovation.com To: IBM-MAIN@bama.ua.edu Sent: Monday, December 7, 2009 1:27:42 PM GMT -08:00 US/Canada Pacific Subject: Re: Need some FDR help please Hi Neil, FDREPORT can XSELECT/XEXCLUDE VSAM with the DSORG=EF field. Other DSORG types can also be selected or excluded using the DSORG field. Joseph Butz jb...@fdrinnovation.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Neil Duffee Sent: Monday, December 07, 2009 3:26 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Need some FDR help please On 2009-12-04 18:54 concerning Re: Need some FDR help please, Linda Mooney lin...ls...@com...net wrote to IBM-Main : Now I need to restore PS and PO [snip], excluding VSAM, no catalogue updates allowed, non-SMS DASD volume and new high level qualifier. [snip] nature of the 'treasure hunt'. I am looking for some source code [snip] Linda : On the Select statement for DSF, you can use NewIndex=NewHLQ to swap hlq's, NULLSTORCLAS to indicate, well, that, plus NVol=(xxx*,xxx*,xxx*) and NOCAT but I can't find a method to select by dataset type ie. Vsam. Unless you can identify a naming convention (from the FdrAbrP listing) that can be used to EXCLUDE DSN=**.VSAM.** or **.DATA, **.INDEX, **.CSI before SELECT Dsn=SYSPROG**. (Remember, you can multi-Exclude hundreds of times before the Select.) However, if you have FDReport, you could try DATA=TVTOC with DSORG.EQ.(PO,PS,...) and PUNCH the necessary SELECT statements for the (subsequent) DSF step. -- signature = 6 lines follows -- Neil Duffee, Joe SysProg, U d'Ottawa, Ottawa, Ont, Canada telephone:1 613 562 5800 x4585 fax:1 613 562 5161 mailto:NDuffee of uOttawa.ca http:/ /aix1.uottawa.ca/ ~nduffee How *do* you plan for something like that? Guardian Bob, Reboot For every action, there is an equal and opposite criticism. Systems Programming: Guilty, until proven innocent John Norgauer 2004 -- 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 -- 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 -- 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: Need some FDR help please
Hey Neil, We did get the dataset list from FDRABRP and we are working with that. I would have liked to restore all dsn except VSAM, but we are finally making some progress . From your note, it looks like we had some of our control syntax twisted, so will work with your updates in the AM. We only have FDR/FDRDSF, no FDReport. Thanks, Linda - Original Message - From: Neil Duffee nduf...@uottawa.ca To: IBM-MAIN@bama.ua.edu Sent: Monday, December 7, 2009 12:26:01 PM GMT -08:00 US/Canada Pacific Subject: Re: Need some FDR help please On 2009-12-04 18:54 concerning Re: Need some FDR help please, Linda Mooney lin...ls...@com...net wrote to IBM-Main : Now I need to restore PS and PO [snip], excluding VSAM, no catalogue updates allowed, non-SMS DASD volume and new high level qualifier. [snip] nature of the 'treasure hunt'. I am looking for some source code [snip] Linda : On the Select statement for DSF, you can use NewIndex=NewHLQ to swap hlq's, NULLSTORCLAS to indicate, well, that, plus NVol=(xxx*,xxx*,xxx*) and NOCAT but I can't find a method to select by dataset type ie. Vsam. Unless you can identify a naming convention (from the FdrAbrP listing) that can be used to EXCLUDE DSN=**.VSAM.** or **.DATA, **.INDEX, **.CSI before SELECT Dsn=SYSPROG**. (Remember, you can multi-Exclude hundreds of times before the Select.) However, if you have FDReport, you could try DATA=TVTOC with DSORG.EQ.(PO,PS,...) and PUNCH the necessary SELECT statements for the (subsequent) DSF step. -- signature = 6 lines follows -- Neil Duffee, Joe SysProg, U d'Ottawa, Ottawa, Ont, Canada telephone:1 613 562 5800 x4585 fax:1 613 562 5161 mailto:NDuffee of uOttawa.ca http:/ /aix1.uottawa.ca/ ~nduffee How *do* you plan for something like that? Guardian Bob, Reboot For every action, there is an equal and opposite criticism. Systems Programming: Guilty, until proven innocent John Norgauer 2004 -- 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 -- 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 WebSphere Virtual Enterprise (z/OS) consultant
Marc, Just to clarify (and as a public service): the skills required for WebSphere VE for z/OS are a relatively small increment over WebSphere Application Server for z/OS, generally speaking. (The VE features simply build on the WAS foundation.) Would you (and your client) also be interested in responses from consultants who know WAS for z/OS? If so, that would increase the number of people who could respond favorably yet still likely meet or exceed your client's requirements. Alternatively, if your client is focused on the unique/additional VE functionalities, then experience with those functionalities on any WAS platform should be sufficient if your client already has what they need for WAS z/OS skills. So you could cast a wider net in that direction. Finally, you may also want to add ...or the Operations Optimization features in WebSphere Extended Deployment (WebSphere XD). WebSphere Virtual Enterprise was known as Operations Optimization until it got a proper (or at least different) name, so anyone with Operations Optimization background should also be eligible. Hope that helps. - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Based in Tokyo, Serving IBM Japan / Asia-Pacific E-Mail: timothy.sipp...@us.ibm.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: Detect the loop for batch job
Hi Joe, Interesting development in Omegamon. I am still new to Omegamon, but I am going to install V4.2 next month, how do I check if I have Interim Feature 1, how do I install it? Kees. Joseph H Winterton jose...@us.ibm.com wrote in message news:of614ad680.d9513ffb-on86257685.0060f861-85257685.00614...@us.ibm.c om... Well we in OMEGAMON have been working on the cpu looping issue lately: Detecting an address space in an infinite loop is not an easy job. Our modern z/OS LPARs often have multiple CPUs and specialty processors like zIIP and zAAP where instructions can be dispatched. In addition Workload Manager will try to distribute processor resources equitably based on the current workload mix and priorities defined in the installation?s policy. Lower priority batch workloads that happen to be looping can easily run under the radar for long periods of time squandering resources. OMEGAMON XE on z/OS 4.2.0 with the addition of Interim feature 1 has a strategy to help surface these problems. OMEGAMON has had a feature called Bottleneck Analysis for many years. Bottleneck Analysis builds a profile over time through periodic sampling of what execution states are being used by address spaces. These execution states include things like Using CPU, Using zIIP, Using zAAP, Waiting for CPU, Waiting for zIIP, Waiting for zAAP, Using I/O, Waiting for I/O, Waiting for Enqueue, Waiting for HSM, Swapped, etc. A cpu looping address space will reveal itself by populating only the using and waiting states for CPU resources (including zIIP and zAAP). OMEGAMON XE on z/OS 4.2.0 has a new attribute called CPU Loop Index that uses this bottleneck information as its basis. High priority workloads can be reliably detected fairly quickly. The real trick is discriminating between well behaved low priority work that is just starved for attention from low priority work that is looping. OMEGAMON XE on z/OS 4.2.0 Interim Feature 1 provides this discrimination by dynamically extending the observation period required before indicating a likely loop when the ratio of waiting for CPU to Using CPU is high. For more information on OMEGAMON XE on z/OS approach to CPU Loop detection please see the article titled ?Detecting CPU looping address spaces using IBM Tivoli OMEGAMON XE on z/OS version 4.2.0? in the August issue of the z System Advisor at http://www-01.ibm.com/software/tivoli/systemz-advisor/2009-08/. Joe Winterton Release Mgr - OMEGAMON - Development Team 919-224-1328 Cell -914-954-0483 - jose...@us.ibm.com From: Hal Merritt hmerr...@jackhenry.com To: IBM-MAIN@bama.ua.edu Date: 12/07/2009 09:48 AM Subject: Re: Detect the loop for batch job Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu All programs 'loop'. It is what they do. About the only automated solution I can think of would be to set a CPU time limit. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Joel C. Ewing Sent: Saturday, December 05, 2009 11:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Detect the loop for batch job On 12/04/2009 10:14 AM, bjbxd wrote: Hello List, We are looking for a tool to detect the loop for batch application, any suggestion are appreciated. My shop is runing z/OS, application is C/C++. Bob. NOTICE: This electronic mail message and any files transmitted with it are intended exclusively for the individual or entity to which it is addressed. The message, together with any attachment, may contain confidential and/or privileged information. Any unauthorized review, use, printing, saving, copying, disclosure or distribution is strictly prohibited. If you have received this message in error, please immediately advise the sender by reply email and delete all copies. -- 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 -- 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 ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have