Storage Philosophy Question
As a State agency, it's the time we ask for money for the upgrades/replacements for the next year or two. Our z800-0B1 lease runs out and so we'll be looking at z9BC. We also have EMC 8230(?) dasd and 3590-A tape drives. A couple terabytes active data, and more in migration/backup, etc. We're pretty small. We have no mirroring at this time, we move tapes back at forth from a vault on the other side of campus. The administration seems willing to allocate funds for a more robust Business Continuation infrastructure. It's been suggested by the Operations Manager and also my boss(es) that we move to a tapeless model. That is that we acquire sufficient dasd and establish a mirror offsite. We would cease DFHSM migration and do FDR or DFHSM version backups to dasd. It appears the tape might be more expensive than disk. And you don't need people to mount disks. We don't have a silo. The questions I've been asked to ask are: Is anyone else doing something like this idea? Does it seem feasible? Or is it a really bad idea? I'm asking here because this seems a place to get some good thoughts on this fast. My Director needs to talk with her VP next week, or maybe the week after. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
Well, you don't ever load R5 or R8 which you have in the USINGs. I found I couldn't trust R10 to point to $JCT either. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Kopischke, David G. Sent: Thursday, October 12, 2006 7:25 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Jes2 Exit52 Again Greetings again, I'm having a hard time getting this exit to work. My assembler skills are pretty much non-existent. I'm trying convert an old JES2 EXIT2 to work as as an EXIT52. Following the manuals, IBM's sample exit and the old exit, I put this together. I yanked all the doc so it would post without being too terribly long. It abends S0C4 whenever it is executed. I don't see where it's wandering off, but that's no surprise. If anyone can spare some time to help, I'd appreciate it again. I originally had the load of register 5 wrong, so it errored off. It was working up until the point where it formatted and inserted a jobcard though. I'm guessing there's something wrong with the address in R5. More likely the way I'm using it. The manuals say X052JXWR is supposed to point to an area to be used to format an inserted card. I also backed it off to look like the old exit and set R5 to the address starting at byte 8 of R1, but that S0C4's too. Thanks again, -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: *$HASP050 JES2 RESOURCE SHORTAGE OF JOES - 100% UTILIZATION R EACHED
Lizette Koehler wrote: Joes can be dynamically increased with a $TOUTDEF command. I would also investigate what was generating all the SYSOUT. JES2 creates one JOE for every SYSOUT in a job. So if you have a SYSOUT=A and a SYSOUT=B that is 2 JOES for that job. Please, enlight me - does it matter whether one DD contains SYSOUT=A, and the second SYSOUT=different_letter? I thought both DDs will give two JOEs despite of same-or-different letters. BTW: How to find out haw many JOEs are consumed by given JOB ? Regards -- Radoslaw Skorupka Lodz, Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
Sorry, typo, make that R7 not R5 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Gibney, Dave Sent: Thursday, October 12, 2006 11:58 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Jes2 Exit52 Again Well, you don't ever load R5 or R8 which you have in the USINGs. I found I couldn't trust R10 to point to $JCT either. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Storage Philosophy Question
Dave, I can think of 2 things, that you might want to look further into: The DS8000 was introduced with the capability to be equipped with both fast (expensive) and cheap (slower) storage. The latest DS8000 announcements mentioned more interesting morroring/DR features. Have a look at the new TS7700 Virtual Tape Engine: http://www-03.ibm.com/servers/storage/support/tape/ts7700/planning.html It is the next generation of VTS: emulated tapes and tapedrives with diskcache and taperobot. Its grid options allow you to mirror tape datasets over two sites. It has a huge 20 TB disk-cache, which allows you to almost run all your tape i/o from the disc cache. Backing storage will be real tape so relatively cheap. Maybe it is too large (and therefor too expensive) for you, but you could move data from disk to this tape device with almost no performance penalty. Kees. Gibney, Dave [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED].. . As a State agency, it's the time we ask for money for the upgrades/replacements for the next year or two. Our z800-0B1 lease runs out and so we'll be looking at z9BC. We also have EMC 8230(?) dasd and 3590-A tape drives. A couple terabytes active data, and more in migration/backup, etc. We're pretty small. We have no mirroring at this time, we move tapes back at forth from a vault on the other side of campus. The administration seems willing to allocate funds for a more robust Business Continuation infrastructure. It's been suggested by the Operations Manager and also my boss(es) that we move to a tapeless model. That is that we acquire sufficient dasd and establish a mirror offsite. We would cease DFHSM migration and do FDR or DFHSM version backups to dasd. It appears the tape might be more expensive than disk. And you don't need people to mount disks. We don't have a silo. The questions I've been asked to ask are: Is anyone else doing something like this idea? Does it seem feasible? Or is it a really bad idea? ** 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JES2 Exit 6 - access JOBCLASS data
Hello Rob, Thank you very much for the hint...it has been exactly what was required. The enhanced exit is working very well. $DSERV and $DOGCAT macro calls were needed. Thanks Bruce Hewson On Tue, 3 Oct 2006 06:21:14 -0400, Rob Scott [EMAIL PROTECTED] wrote: Bruce, JES2 jobclasses are described by the $CAT macro. Although I haven't done this myself, I believe you can retrieve a specific $CAT for a jobclass by using the $DOGCAT macro. snip Rob Scott Rocket Software, Inc 275 Grove Street Newton, MA 02466 617-614-2305 [EMAIL PROTECTED] http://www.rs.com/portfolio/mxi/ -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Bruce Hewson Sent: 03 October 2006 05:00 To: IBM-MAIN@BAMA.UA.EDU Subject: JES2 Exit 6 - access JOBCLASS data Hi folks, I am looking for a way to retrieve the TIME data for each JOBCLASS entry from within the JES2 Exit #6. snip Thanks Bruce Hewson -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Preserving the interface (was: What's a programming language)
In [EMAIL PROTECTED], on 10/11/2006 at 08:07 AM, Dave Reinken [EMAIL PROTECTED] said: In the meantime, we still had EXEC2 that was twenty years old running on VM without issue that we hadn't gotten around to (or had a reason to) convert to REXX. This was code brought forward from VM/SP to VM/ESA all the way to z/VSE without change. Wow! z/VSE supports EXEC2! Whoda thunk it. I might believe z/VM. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REPLYTO problems
In [EMAIL PROTECTED], on 10/11/2006 at 04:50 PM, Darren Evans-Young [EMAIL PROTECTED] said: I guess I need to read the newsgroup more often. I wasn't aware there was a problem with the munging. There may not be. A lot of posters confuse google groups with Usenet. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REPLYTO problems (was RE: Another BIG Mainframe Bites the Dust)
In [EMAIL PROTECTED], on 10/11/2006 at 07:56 AM, Chase, John [EMAIL PROTECTED] said: It's possible, but I would vote against it. There are times when somebody might want to receive replies to a post off-list, and setting REPLYTO is the easiest way to accomplish that. That depends on the mail client. Some display both the From and the Reply-to address and let you select which to use. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Send In The Clones
In [EMAIL PROTECTED], on 10/12/2006 at 08:15 AM, Daniel A. McLaughlin [EMAIL PROTECTED] said: Would anyone care to share some hints/tips/clues on your methods? Adopt a consistent naming convention for target and dlib volumes. Use indirect and extended indirect cataloging for all data sets on the target volumes. Each DDDEF not for a Unix file system should include a volser. Adopt a consistent naming convention for *FS files, tied to the volser of the IPL volume. Retain the dlib and target zones for all dlib and target volume sets. Don't apply service to a system that you are running from. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What's a programming language (was: Google ... )
In [EMAIL PROTECTED], on 10/11/2006 at 05:50 PM, Paul Gilmartin [EMAIL PROTECTED] said: CDC Kronos used 10 because 8 just wasn't enough. I doubt it. I'm quite sure that the reason was the 60 bit word size. The 701 allowed no choice but 8. Untrue. The design of the 701 had nothing to do with sorting on offline sorters. You could just as easily sort on 71-80 as on 73-80. What you had no choice about was reading only columns 1-72. The size of the sequence number was picked to avoid taking away card columns. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Preserving the interface (was: What's a programming language)
From: Shmuel Metz (Seymour J.) [EMAIL PROTECTED] at 08:07 AM, Dave Reinken [EMAIL PROTECTED] said: In the meantime, we still had EXEC2 that was twenty years old running on VM without issue that we hadn't gotten around to (or had a reason to) convert to REXX. This was code brought forward from VM/SP to VM/ESA all the way to z/VSE without change. Wow! z/VSE supports EXEC2! Whoda thunk it. I might believe z/VM. Oops, you are correct, progression should be VM/SP - VM/ESA - z/VM, _not_ z/VSE, sorry. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: *$HASP050 JES2 RESOURCE SHORTAGE OF JOES - 100% UTILIZATION R EACHED
On Fri, 13 Oct 2006 09:02:20 +0200, R.S. [EMAIL PROTECTED] wrote: Lizette Koehler wrote: Joes can be dynamically increased with a $TOUTDEF command. I would also investigate what was generating all the SYSOUT. JES2 creates one JOE for every SYSOUT in a job. So if you have a SYSOUT=A and a SYSOUT=B that is 2 JOES for that job. Please, enlight me - does it matter whether one DD contains SYSOUT=A, and the second SYSOUT=different_letter? I thought both DDs will give two JOEs despite of same-or-different letters. BTW: How to find out haw many JOEs are consumed by given JOB ? Unique output groups: $DOJn,ALL I don't know if it is exact you could also look at all the non-held output elements in SDSF with an O command and the held elements for the same job with a H commands. System wide, if you see how many joes are in in use via $D OUTDEF (subtract JOEFREE from JOENUM) and add up totals from a SDSF O command and a SDSF H ALL command, the numbers should be close. The difference would probably be from jobs that are running and output you don't see but is left there until the entire job is purged. Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group mailto: [EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ceebinit question
Mark [mwvconix] wrote, in part: -8snip- With all due respect Tom, I'm not familiar with any IBM documentation that says I cannot or should not establish my own ESTAE recovery routines in and around LE based routines. I do not see this in the ASM manuals, nor have I seen this in the COBOL or LE manuals. If you have, please share the details so that I might read them and be corrected on this point. -8snip- While I certainly don't speak for Tom, I happened to stumble over this in the indeterminate past and still have the reference handy. z/OS V1R6.0 Language Environment Programming Guide 5.2.7 System Services Available to Assembler Routines http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea2150/5.2.7 [...] For example, any ESTAE or ESPIE that you issue interferes with Language Environment condition handling. It goes on to indicate that for (E)STAE/(E)SPIE/SETRP/STAX, Host services should not be used; instances should be changed to use Language Environment condition management callable services. Otherwise, unpredictable results may occur. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
If someone can suugest an introduction book to MVS
Hi If someone can suggest a good introductionary book to MVS and TSO and ISPF etc -- Miklos Szigetvari Development Team ISIS Information Systems Gmbh tel: (+43) 2236 27551 131 Fax: (+43) 2236 21081 E-mail: [EMAIL PROTECTED] Info: [EMAIL PROTECTED] Hotline: +43-2236-27551-111 Visit our Website: http://www.isis-papyrus.com --- This e-mail is only intended for the recipient and not legally binding. Unauthorised use, publication, reproduction or disclosure of the content of this e-mail is not permitted. This email has been checked for known viruses, but ISIS accepts no responsibility for malicious or inappropriate content. --- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: If someone can suugest an introduction book to MVS
Have a look at: http://www-03.ibm.com/servers/eserver/zseries/zos/education.html And especially the z/OS basics redbooks may be interesting: http://publibz.boulder.ibm.com/zoslib/pdf/zosbasic.pdf Regards, Michiel -Oorspronkelijk bericht- Van: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Namens Miklos Szigetvari Verzonden: vrijdag 13 oktober 2006 15:20 Aan: IBM-MAIN@BAMA.UA.EDU Onderwerp: If someone can suugest an introduction book to MVS Hi If someone can suggest a good introductionary book to MVS and TSO and ISPF etc -- Miklos Szigetvari Development Team ISIS Information Systems Gmbh tel: (+43) 2236 27551 131 Fax: (+43) 2236 21081 E-mail: [EMAIL PROTECTED] Info: [EMAIL PROTECTED] Hotline: +43-2236-27551-111 Visit our Website: http://www.isis-papyrus.com --- This e-mail is only intended for the recipient and not legally binding. Unauthorised use, publication, reproduction or disclosure of the content of this e-mail is not permitted. This email has been checked for known viruses, but ISIS accepts no responsibility for malicious or inappropriate content. --- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html De informatie opgenomen in dit bericht kan vertrouwelijk zijn en is uitsluitend bestemd voor de geadresseerde. Indien u dit bericht onterecht ontvangt, wordt u verzocht de inhoud niet te gebruiken en de afzender direct te informeren door het bericht te retourneren. The information contained in this message may be confidential and is intended to be exclusively for the addressee. Should you receive this message unintentionally, please do not use the contents herein and notify the sender immediately by return e-mail. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: If someone can suugest an introduction book to MVS
The ABCs of System programming on the IBM website. Sorry, I do not know the site name off-hand. Also Murachs' Intro to JCL (??) . Miklos Szigetvari [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 10/13/2006 09:20 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject If someone can suugest an introduction book to MVS Hi If someone can suggest a good introductionary book to MVS and TSO and ISPF etc -- Miklos Szigetvari d -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Software Pricing mathematics
In article [EMAIL PROTECTED], [EMAIL PROTECTED] (Phil Payne) wrote: I've seen an IBM internal analysis of a Websphere Application Server implementation that was 37x cheaper on Intel than on zSeries. That's 37 _TIMES_ - not 37%! Statements like this always confuse me. How can something be 37 times (or 3700%) smaller or cheaper than something else? As I understand it, if A is 37% cheaper than B, then it costs 63% (100-37) what B costs. If A is 80% cheaper, then it costs 20% of B's cost? Am I right so far? Then wouldn't that mean that 100% cheaper would make it free? So how can anything be more than 100% cheaper than anything else? If saying 37 times cheaper is intended to mean it costs 1/37 (or approximately 2.7%), then wouldn't it really be about 97.3% cheaper? -- Matt Simpson -- z/OS Support 219 McVey Hall -- (859) 257-2900 x300 University Of Kentucky, Lexington, KY 40506 http://jms.cc.uky.edu/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: If someone can suugest an introduction book to MVS
You can also try: http://publibz.boulder.ibm.com/zoslib/pdf/zosbasic.pdf -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Veracity of SMS Info in LISTCAT Is Backup occurring?
Hi, I'm trying to determine if our outsourcer vendor is backing up our datasets. Here are the facts: A. When I do a LISTC ENT() CL HIST, all 200+ of our Endevor VSAM files have the same MANAGEMENTCLASS---MCLASX, the same LBACKUP 000.000. (which I interpret to mean never backed up. B. ISMF reports MCLASX to have the ADM/COMMAND attribute set to NONE. C. When I attempt HBACK, I get message, ARC1001I RC=0034 rc=8, and ARC1334I says that rc=8 indicates that ADMIN-OR-USER-COMMAND-BACKUP is not set to BOTH (it's set to none). D. Storage Mgt runs Backups from 08:00 to 12:00 (what I consider Prime Time). My questions are these: Does listcat's LBACKUP value really mean that these files have not been backed up? Could they be volume-dumped and LBACKUP still be 000s? If a file is open during 8-12 backup window, does it get backed up? What suggestions might you have to guide me to taking backups on demand, say 02:00 - 6:00? Thanks MJ - Talk is cheap. Use Yahoo! Messenger to make PC-to-Phone calls. Great rates starting at 1ยข/min. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: *$HASP050 JES2 RESOURCE SHORTAGE OF JOES - 100% UTILIZATION R EACHED
On 10/13/06, Mark Zelden [EMAIL PROTECTED] wrote: System wide, if you see how many joes are in in use via $D OUTDEF (subtract JOEFREE from JOENUM) and add up totals from a SDSF O command and a SDSF H ALL command, the numbers should be close. The difference would probably be from jobs that are running and output you don't see but is left there until the entire job is purged. Also, $JDDETAILS give a nice summary JES2 resources including JOES. Gabe -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Fw: ceebinit question
On Thu, 12 Oct 2006 17:15:20 -0500, Mark [EMAIL PROTECTED] wrote: I appreciate the pointers though. If in the unlikely event I eventually find myself writing those LE handlers, I'll definitely be re-reading in detail those aforementioned LE chapters. -Mark In that event you might or might not find this sample LE condition handler (written in Cobol but usable from any LE compliant language) helpful http://home.clara.net/andywrobertson/mvslech.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Discretionary Goal Management (was: Another BIG Mainframe Bites the Dust)
Posted with Don Deese's permission at the request of Mark Zelden with thanks to Dave Thorn for following this topic up with Don as part of a discussion at a recent Philly CMG meeting. Chapter 1.7: Discretionary Goal Management A problem existed when using discretionary goals prior to OS/390 Version 2 Release 6: on systems in which 100% of the CPU was used by service class periods with performance goals, service class periods assigned a discretionary goal might never receive CPU service. This situation existed even though the service class periods with performance goals might be significantly over achieving their goals, since the Workload Manager would never allow discretionary work to have a CPU dispatching priority equal to or higher than work with performance goals. From one perspective, this algorithm is proper; discretionary work is defined as work that has no performance goal. However, most sites want the discretionary work eventually to be processed, even though it has no performance goal. Consequently, many sites removed the discretionary goal from work and assigned a performance goal to the work. However, there are significant advantages to assigning a discretionary goal to work: work with a discretionary goal executes with the Mean-Time-To-Wait (MTTW) algorithm. . Work assigned to a Mean-Time-To-Wait group competes within the Mean-Time-To-Wait group for access to the processor. Address spaces are assigned dispatching priority within the MTTW group, based upon their execution characteristics. Address spaces that execute a significant number of CPU instructions between I/O operations are considered heavy CPU users. These heavy users receive a lower dispatching priority within the MTTW group than do address spaces requiring less CPU processing between I/O operations. . The philosophy behind assigning work to Mean-Time-To-Wait groups is to attempt to use as much of the overall computer system as possible. Dispatching relatively light CPU users ahead of relatively heavy CPU users ensures that the I/O complex will be used simultaneously with the CPU processor. Since both CPU and I/O are active simultaneously, more overall work will be accomplished by the computer system. This philosophy assumes, of course, that overall throughput is a major goal, rather than the turnaround of specific heavy CPU users. This philosophy is explicitly applicable to service class periods assigned a discretionary goal. IBM addressed this problem in OS/390 Version 2 Release 6, by implementing the discretionary goal management algorithms. With discretionary goal management, the Workload Manager identifies service class periods that have been assigned a performance goal and that are candidates for participation in discretionary goal management. Service class periods can participate in discretionary goal management if either of the following conditions applies: . The service class period has a response goal greater than one minute. This condition does not apply to subsystem transaction service classes (e.g., CICS or IMS transaction service classes), since these service class periods do not include address spaces. . The service class period has an execution velocity goal less than or equal to 30%. The Workload Manager identifies candidate service class periods meeting either of the above conditions, that have significantly overachieved their performance goal. If discretionary work exists in the system, the Workload Manager may apply internal resource capping to the service class periods that are over achieving their performance goal. The internal resource capping operates similarly to the normal Resource Group capping described in Chapter 1.6 of this section, in that the Workload Manager will cap the address spaces for one or more cap slices. This capping restricts the amount of CPU service that can be used by address spaces in the capped service class period. The Workload Manager may apply internal resource capping when the Performance Index is less than 0.7, and stops internal resource capping when the Performance Index is greater than or equal to 0.81. If a candidate service class period with a performance goal has multiple periods, later periods are selected for capping before earlier periods (that is, capping would potentially be applied to Period 2 before capping would be considered for Period 1). The effect of the discretionary goal management algorithm is to allow discretionary work to receive CPU cycles when work with a performance goal would otherwise significantly over achieve its performance goal. /SNIP There are two important points in the above snip: (1) internal resource capping also applies to transactions that have greater than one minute response goal, and (2) internal resource capping will be applied only if there is discretionary work ready to run. Regards, Don ** Don Deese, Computer Management Sciences, Inc. Voice: (703) 922-7027
Re: If someone can suugest an introduction book to MVS (ad)
Miklos Szigetvari wrote: Hi If someone can suggest a good introductionary book to MVS and TSO and ISPF etc ad If you're up for a class, I can suggest our course TSO/ISPF in z/OS followed by z/OS JCL and Utilities. Each of these classes is three days long. Together they comprise a thorough, practical introduction to z/OS terms, concepts, and vocabulary, including hands on labs that give you practical experience. If the student is new to computers, a good prerequisite to these is Introduction to Application Programming (z/OS) - 2 days, no labs. If there are enough students for a class (say 10-16), bring us over. If you only have one person, we offer Remote Contact Training (RCT) - self-study mentored by the course author, running labs on your system. For more details, look at: http://www.trainersfriend.com/General_courses/A010Descrpt.htm - for Introduction to Application Programming (z/OS) http://www.trainersfriend.com/TSO_Clist_REXX_Dialog_Mgr/a633descrpt.htm - for TSO/IPSF in z/OS http://www.trainersfriend.com/JCL_courses/B610descrpt.htm - for z/OS JCL and Utilities http://www.trainersfriend.com/Policies/RCT_OverView.htm - for information on Remote Contact Training. Kind regards, -Steve Comstock The Trainer's Friend, Inc. /ad -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Another BIG Mainframe Bites the Dust
What a terrible thing to say about one's wife ! Talk about a CPU hog! Luckily, she doesn't read this list gr -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Moving data from old cartridges (3490) to new ones (3590)
We have had a couple of clients that have verified it made a very big and noticable improvement when they turned off this option with CopyCat. And CopyCat is simply doing OPEN TYPE=J after increasing the file-sequence number for the next volume, and the allocation of course has RETAIN coded on it. We also use OPENJ as you do, but we don't specify RETAIN. We do CLOSE with LEAVE to leave the tape positioned at the end of the last file written, except when we know we are writing the last file when we CLOSE with DISP to rewind. Maybe it is the RETAIN that is biting you. My test was on a 3590B. My last response from IBM indicates that if the volume supports MSNS(?) it will be used to verify the volume mounts; if the drive does not support MSNS then the previous data sets trailer labels are read to compare the label data to data saved in the UCB Tape Class extension (which was saved during CLOSE processing of the previous file). So, if the device you tested on did not support MSNS, it would only re-read the previous tape labels (if my understanding of the email from IBM was correct). MSNS is undoubtedly Medium Sense, which detects the type of tape (medium) mounted and probably returns the file position and maybe volser (I don't have the reference handy). 3590 and above support Medium Sense. But given IBM's comments, under what circumstances would they rewind the tape??? -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Software Pricing mathematics
In a message dated 10/13/2006 8:44:36 A.M. Central Daylight Time, [EMAIL PROTECTED] writes: Statements like this always confuse me. How can something be 37 times (or 3700%) smaller or cheaper than something else? Since the original topic this time is the innumeracy of the masses, my comments are not pedantic off-topic nonsense. As I understand it, if A is 37% cheaper than B, then it costs 63% (100-37) what B costs. Congratulations. You pass 4th- or 5th-grade arithmetic. If A is 80% cheaper, then it costs 20% of B's cost? Am I right so far? Yes. Then wouldn't that mean that 100% cheaper would make it free? Yes. So how can anything be more than 100% cheaper than anything else? 100% less than 10 units of something is 0 units. 200% less than 10 units is -10 units. So 200% less than $10.00 is -$10.00. In my opinion, that which is more than 100% cheaper means that the buyer will be getting money back from the vendor for each one he buys. Since this really is nonsense, then we can only conclude that the majority of Americans have absorbed the general dumbing down of the language, word meaning, arithmetic, logical and critical thinking, and knowledge and education in general. Whenever I hear a media or advertising moron say the word percent I unlatch the safety on my Browning. If saying 37 times cheaper is intended to mean it costs 1/37 (or approximately 2.7%), then wouldn't it really be about 97.3% cheaper? This is almost certainly what the innumerate person really means. But 37 times cheaper sounds more enticing to the average innumerate listener. Someone who can think critically should be revolted by such absurd statements as X is 37 times less than Y. But since the innumerate masses around will continue communicating like this, we few who remember what percentages, less than, and more than mean from grammar school arithmetic will have to suffer silently. Bill Fairchild [War] ... serves to keep up deceitful expectations which prevent people from looking into the defects and abuses of government. It is the lo here! and the lo there! that amuses and cheats the multitude. [1792; Thomas Paine; The Rights of Man] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Discretionary Goal Management (amendment)
Posted with Don Deese's permission. Don Deese has provided the below snip from his CPExpert WLM Component Manual, since the snip provides a more comprehensive explanation. Chapter 1.7: Discretionary Goal Management A problem existed when using discretionary goals prior to OS/390 Version 2 Release 6: on systems in which 100% of the CPU was used by service class periods with performance goals, service class periods assigned a discretionary goal might never receive CPU service. This situation existed even though the service class periods with performance goals might be significantly over achieving their goals, since the Workload Manager would never allow discretionary work to have a CPU dispatching priority equal to or higher than work with performance goals. From one perspective, this algorithm is proper; discretionary work is defined as work that has no performance goal. However, most sites want the discretionary work eventually to be processed, even though it has no performance goal. Consequently, many sites removed the discretionary goal from work and assigned a performance goal to the work. However, there are significant advantages to assigning a discretionary goal to work: work with a discretionary goal executes with the Mean-Time-To-Wait (MTTW) algorithm. . Work assigned to a Mean-Time-To-Wait group competes within the Mean-Time-To-Wait group for access to the processor. Address spaces are assigned dispatching priority within the MTTW group, based upon their execution characteristics. Address spaces that execute a significant number of CPU instructions between I/O operations are considered heavy CPU users. These heavy users receive a lower dispatching priority within the MTTW group than do address spaces requiring less CPU processing between I/O operations. . The philosophy behind assigning work to Mean-Time-To-Wait groups is to attempt to use as much of the overall computer system as possible. Dispatching relatively light CPU users ahead of relatively heavy CPU users ensures that the I/O complex will be used simultaneously with the CPU processor. Since both CPU and I/O are active simultaneously, more overall work will be accomplished by the computer system. This philosophy assumes, of course, that overall throughput is a major goal, rather than the turnaround of specific heavy CPU users. This philosophy is explicitly applicable to service class periods assigned a discretionary goal. IBM addressed this problem in OS/390 Version 2 Release 6, by implementing the discretionary goal management algorithms. With discretionary goal management, the Workload Manager identifies service class periods that have been assigned a performance goal and that are candidates for participation in discretionary goal management. Service class periods can participate in discretionary goal management if either of the following conditions applies: . The service class period has a response goal greater than one minute. This condition does not apply to subsystem transaction service classes (e.g., CICS or IMS transaction service classes), since these service class periods do not include address spaces. . The service class period has an execution velocity goal less than or equal to 30%. The Workload Manager identifies candidate service class periods meeting either of the above conditions, that have significantly overachieved their performance goal. If discretionary work exists in the system, the Workload Manager may apply internal resource capping to the service class periods that are over achieving their performance goal. The internal resource capping operates similarly to the normal Resource Group capping described in Chapter 1.6 of this section, in that the Workload Manager will cap the address spaces for one or more cap slices. This capping restricts the amount of CPU service that can be used by address spaces in the capped service class period. The Workload Manager may apply internal resource capping when the Performance Index is less than 0.7, and stops internal resource capping when the Performance Index is greater than or equal to 0.81. If a candidate service class period with a performance goal has multiple periods, later periods are selected for capping before earlier periods (that is, capping would potentially be applied to Period 2 before capping would be considered for Period 1). The effect of the discretionary goal management algorithm is to allow discretionary work to receive CPU cycles when work with a performance goal would otherwise significantly over achieve its performance goal. /SNIP There are two important points in the above snip: (1) internal resource capping also applies to transactions that have greater than one minute response goal, and (2) internal resource capping will be applied only if there is discretionary work ready to run. Regards, Don ** Don Deese, Computer Management Sciences, Inc. Voice: (703) 922-7027 Fax: (703)
Software Upgrade for ServerPac
This post is most likely directed towards John Eells as he's the master of the ServerPac domain, but ANYONE with prior experience would be appreciated. I am looking into doing a software upgrade using ServerPac. I've been doing SPs since they started coming out and I've never used it nor have I come across anyone who's done it, yet I'm told it's pretty popular. My question specifically is. How does it restore the target and distlibs? Does it OVERLAY the current libraries, which means the target system in question is not running or does it use new DASD and load the datasets down. That being said must the datasets be indirectly catalogued or not. If not then how does it know what the true running datasets are. If it is required then I can fully understand how it works and it can be done on the target system while it's running. I have to say the online help and the printed documentation is poor, to be kind, on this topic and poking around the CPPC screens doesn't give me any inkling how it would works. Thanx all -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What's a programming language (was: Google ... )
In [EMAIL PROTECTED], on 10/12/2006 at 05:54 PM, Chris Mason [EMAIL PROTECTED] said: I seem to remember in those days JCL needed to see column 72 punched where appropriate and continuations starting in column 16 - not just a quoted character string - but memories can play tricks ... The original syntax required continuation in column 16; that was subsequently relaxed. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What's a programming language (was: Google ... )
In [EMAIL PROTECTED], on 10/12/2006 at 06:05 PM, Chris Mason [EMAIL PROTECTED] said: Thanks - but read my post again, by the RPG range from S/360 Model 20 to iSeries, I refer to the whole nave and the trancepts too. Except that RPG is older[1] than any of those systems, so it isn't the RPG range. [1] It was available for 14xx, 7010 and 707x; probaly others as well. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What's a programming language
In [EMAIL PROTECTED], on 10/10/2006 at 06:47 PM, Tom Marchant [EMAIL PROTECTED] said: Why single out COBOL to mention storage constraints? I didn't; I answered the question that was posed, which related to COBOL. Had Paul asked about FORTRAN or JOVIAL then I would have answered about FORTRAN or JOVIAL. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What's a programming language
In [EMAIL PROTECTED], on 10/12/2006 at 01:35 AM, Chris Mason [EMAIL PROTECTED] said: QTAM, the access method that expected incoming messages to be tagged with the date and time on being received by the QTAM layer and to be tagged with the time when sent by the QTAM layer. Are you sure that wasn't just a shop standard? I know of no such restriction. Since TCAM was basically a rewrite of QTAM, I'm quite confident that there was no such restriction. It certainly doesn't jibe with my recollection. -- 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
On Fri, 13 Oct 2006 00:10:41 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: Sorry, typo, make that R7 not R5 Thanks for your help, I caught the typo. In my cutting pasting, I missed a couple lines from the IBM sample exit: LRR8,R0 Copy XPL address L R7,X052AREA Get JRW address I added these back in right after $ENTRY, but it still S0C4's. The R10 USING for the JCT is copied from the previous EXIT2. The doc in the sample exit says R10 should point to the JCT as in the old EXIT2 ??? Is that not true ??? Or more probably I'm not using it correctly ??? Thanks again -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Allocating STEPLIB in TSO
On Thu, 12 Oct 2006 08:57:37 -0700, Charles Mills [EMAIL PROTECTED] wrote: I am (was, actually, having solved the problem differently for now) trying to run a compiled Rexx program under TSO and force it to use the Alternate Library rather than the Rexx Library (which was link-listed) for test purposes, to duplicate a customer problem. That's different. TSO loads the interface to the Rexx Library at TSO logon time, not when you issue the Call command. Anything you do after logon will not change the library used. (Specifically, all modules listed in IRXCMPTM are loaded at logon.) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
I changed to use the $JCT address in the XPL, I don't know if this will help you. I didn't look al that close at your code after I noticed the unloaded USINGS. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Dave Kopischke Sent: Friday, October 13, 2006 9:15 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Jes2 Exit52 Again On Fri, 13 Oct 2006 00:10:41 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: Sorry, typo, make that R7 not R5 Thanks for your help, I caught the typo. In my cutting pasting, I missed a couple lines from the IBM sample exit: LRR8,R0 Copy XPL address L R7,X052AREA Get JRW address I added these back in right after $ENTRY, but it still S0C4's. The R10 USING for the JCT is copied from the previous EXIT2. The doc in the sample exit says R10 should point to the JCT as in the old EXIT2 ??? Is that not true ??? Or more probably I'm not using it correctly ??? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: If someone can suugest an introduction book to MVS
Thynk you very much -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Behalf Of David Waldman Sent: Freitag, 13. Oktober 2006 15:40 To: IBM-MAIN@BAMA.UA.EDU Subject: Re: If someone can suugest an introduction book to MVS You can also try: http://publibz.boulder.ibm.com/zoslib/pdf/zosbasic.pdf -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
On Fri, 13 Oct 2006 09:21:57 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: I changed to use the $JCT address in the XPL, I don't know if this will help you. I didn't look al that close at your code after I noticed the unloaded USINGS. OK, I'll give that a shot too. I didn't even notice that pointer. I was looking for it too. Thanks again for your help. I'm trying to implement z/OS 1.7 this week-end and this is that last piece that doesn't work. I'd hate to postpone for this exit and nobody even knows if it's required. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Allocating STEPLIB in TSO
AH! THERE is a clue! I did find that changes to the dynamic LPA were not effective until I logged off and logged on again. What you are saying means that ANYTHING I do in the session -- with TSOLIB or the STEPLIB utility or CALL -- will have no effect. Thanks, Charles -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Greg Wendling Sent: Friday, October 13, 2006 9:12 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Allocating STEPLIB in TSO On Thu, 12 Oct 2006 08:57:37 -0700, Charles Mills [EMAIL PROTECTED] wrote: I am (was, actually, having solved the problem differently for now) trying to run a compiled Rexx program under TSO and force it to use the Alternate Library rather than the Rexx Library (which was link-listed) for test purposes, to duplicate a customer problem. That's different. TSO loads the interface to the Rexx Library at TSO logon time, not when you issue the Call command. Anything you do after logon will not change the library used. (Specifically, all modules listed in IRXCMPTM are loaded at logon.) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
Check out SHARE Presentations from Skip Robinson and Tom Wasik -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Dave Kopischke Sent: Friday, October 13, 2006 9:47 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Jes2 Exit52 Again On Fri, 13 Oct 2006 09:21:57 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: I changed to use the $JCT address in the XPL, I don't know if this will help you. I didn't look al that close at your code after I noticed the unloaded USINGS. OK, I'll give that a shot too. I didn't even notice that pointer. I was looking for it too. Thanks again for your help. I'm trying to implement z/OS 1.7 this week-end and this is that last piece that doesn't work. I'd hate to postpone for this exit and nobody even knows if it's required. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Moving data from old cartridges (3490) to new ones (3
Please remember that the performance of 3590's with multiple datasets per cartridge had a problem. IBM fixed the problem but customers had to replace old 3590-A01 and A50 control units and upgrade existing 3590-A60's to get the new ucode. The fix was to add a deferred conditional tape mark ccw and other magic. Before the fix, stacking many small files to a 3590 was slower than using 3480's or 3490's. See IBM's annoucement letter 101-291 from Oct. 2001 for details from the wayback machine. Ben Alford Enterprise Systems Programming University of Tennessee -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
On Fri, 13 Oct 2006 10:00:14 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: Check out SHARE Presentations from Skip Robinson and Tom Wasik I've looked at everything findable via the web. I'll check out SHARE right now, but it seems we do something very different than everyone else in this regard. Thanks again -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Curiousity: CPU % for COBOL program
You shouldn't be looking at high CPU utilization but at total CPU usage and EXCP counts for the job step (freely available from the usual IEFACTRT exits). High CPU utilization could be a sign of a very efficient and well tuned program, or a sign of gross choice of internal algorithms. Bottom line though, if total consumption is not enough to be significant in your shop, or to adversely affect other important work, or to cost more than the user end-user is willing to pay, it may not be worth pursuing. If the job is causing problems either from excessive CPU usage or excessive I/O, the cheapest thing to check and fix is I/O tuning since in many cases this is just a JCL change. If EXCPs on any DD is high (say 10K EXCPs and up), check that this is reasonable based on the number of records and blocks in the file. For sequential DASD files check for the obvious - poorly blocked or unblocked records. If a sequential file is humongous, requesting enough buffers for full cylinder or at least multi-track I/O may reduce overhead. For VSAM, BUFNI and BUFND should always be specified, as the defaults are inadequate for either sequential or random processing. In extreme cases you may want to trying using BLSR. I have seen cases where a factor of 10-100 reduction in EXCP's and CPU has been achieved simply by adding appropriate buffering to a VSAM file. IDCAMS LISTCAT before and after a run is your friend for detecting VSAM abuse. If you have to go down to the level of program code, then look for the obvious again: Arrays being repeatedly searched, especially serial search (it's incredible how much CPU can be used by a serial search of even a relatively small array of 10-20 elements if you do it 100,000 times). I have seen extreme cases where a corporate want-a-be programmer had actually written COBOL code using a serial search of a 100,000 element table! Even a binary search (SEARCH ALL) of a large array of several 1000 elements is radically less efficient than a hash table lookup if you are going to do it 1,000,000 times. Another big problem (which will also show up in your EXCP data) is repeated look up of the same data using a VSAM file as a table when an internal table is more appropriate. A strong clue to this kind of behavior is a VSAM file with an EXCP count orders of magnitude larger than the total number of records in the file! Frequently the biggest savings are made by taking a totally different approach to the problem, but when dealing with applications that are not your responsibility one would rather not get down to that level. McKown, John wrote: -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Staller, Allan Sent: Thursday, October 12, 2006 9:06 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Curiousity: CPU % for COBOL program Without the souce code I can't make any intelligent suggestions. However, if you can find a copy of The Elements of Programming Style it will give several examples of bad vs good code and how to get from here to there. IIRC, at one time there were (at least) three versions. One each for COBOL, FORTRAN, and ? HTH, Thanks. I guess I was asking because I don't have an automated way to check for bad coding. And I was wondering if it was even worth my time. If a high CPU utilization is normal, then it would likely be a waste of time to desk check the code. But if high CPU utilization is sufficiently abnormal, then it might be worth my time (and salary) to do some spot checks of code and write a report to management. One that would likely cause the programmers to hate me even more. They already don't like me becase I now almost always require a service desk ticket to do any work. But I can charge time to those tickets, which proves my salary is worth paying. Why it is easier to walk to my desk and ask me to do something than to write a email to the help desk to open a ticket is beyond me. Perhaps because they don't want it known how often they ask for our services? Speculation. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology ... -- Joel C. Ewing, Fort Smith, AR[EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
On Fri, 13 Oct 2006 10:00:14 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: Check out SHARE Presentations from Skip Robinson and Tom Wasik I went through Skips SHARE presentation and made some changes to ignore what comes in R1 and base all addresses off of XPL fields. Still S0C4's. How does everyone go about debugging these exits ??? I finally got a trace to work, but for EXIT52 all I get is register contents before and after. No clues as to what might be causing the S0C4. Not much to go on for a JES2/Assembler newbie. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
I put $trace statements carefully in my ASM source. It took me about 4 days to do the 7 exits we use. It went much faster after I installed the CBT exit loader (exit 5) Dave Gibney [EMAIL PROTECTED] System Programmer(509) 335-7359 Information Technology Washington State University Pullman, WA 99164-1222 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Dave Kopischke Sent: Friday, October 13, 2006 11:17 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Jes2 Exit52 Again On Fri, 13 Oct 2006 10:00:14 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: Check out SHARE Presentations from Skip Robinson and Tom Wasik I went through Skips SHARE presentation and made some changes to ignore what comes in R1 and base all addresses off of XPL fields. Still S0C4's. How does everyone go about debugging these exits ??? I finally got a trace to work, but for EXIT52 all I get is register contents before and after. No clues as to what might be causing the S0C4. Not much to go on for a JES2/Assembler newbie. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
On Fri, 13 Oct 2006 11:29:06 -0700, Gibney, Dave [EMAIL PROTECTED] wrote: I put $trace statements carefully in my ASM source. It took me about 4 days to do the 7 exits we use. It went much faster after I installed the CBT exit loader (exit 5) One of my colleagues is looking at installing the CBT exit 5 now. I'll check into $TRACE statements. Learning is a good thing. Deadlines are bad. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Is it possible to prevent a structure into a particular CF (Coupling Facility)?
The CF Hint functionality is for duplexed structures and is designed to ensure that the instance at SITE2 is used in the case of a SITE1 disaster. This functionality is available in GDPS/HM V3.3. Just to clear some confusion I may have caused. My statement that the CF Hint functionality is available in GDPS/HM is wrong. It is only available in full function GDPS/PPRC. The GDPS/HM documentation will be updated to reflect this. Regards, George Kozakos -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMTP MVS Exit Question
I have been out to the cbttape.org looking for a version of the MVS SMTP exit that just forces the user ID of the address space as the from. Just to ensure that no one running a batch job can send an e-mail with someone else's address. Does anyone already have one written? -Rob Schramm This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Storage Philosophy Question
Do you have a need to recover in case of a disaster? Having a vault on the other side of campus may or may not be sufficient. Do you have a contract with a DR support site? If so, how will you get the data to the DR site if your mainframe is down and you have nothing on tape? I have heard of companies mirroring to a DASD device at the DR recovery site (although we don't do that) - we are state government also. David Mueller | Systems Programmer | DMS/EITS Phone: 850-414-9134 (Rm 107 SRC) | Fax: 850-921-8343 E-mail: [EMAIL PROTECTED] -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Gibney, Dave Sent: Friday, October 13, 2006 2:46 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Storage Philosophy Question As a State agency, it's the time we ask for money for the upgrades/replacements for the next year or two. Our z800-0B1 lease runs out and so we'll be looking at z9BC. We also have EMC 8230(?) dasd and 3590-A tape drives. A couple terabytes active data, and more in migration/backup, etc. We're pretty small. We have no mirroring at this time, we move tapes back at forth from a vault on the other side of campus. The administration seems willing to allocate funds for a more robust Business Continuation infrastructure. It's been suggested by the Operations Manager and also my boss(es) that we move to a tapeless model. That is that we acquire sufficient dasd and establish a mirror offsite. We would cease DFHSM migration and do FDR or DFHSM version backups to dasd. It appears the tape might be more expensive than disk. And you don't need people to mount disks. We don't have a silo. The questions I've been asked to ask are: Is anyone else doing something like this idea? Does it seem feasible? Or is it a really bad idea? I'm asking here because this seems a place to get some good thoughts on this fast. My Director needs to talk with her VP next week, or maybe the week after. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What's a programming language (was: Google ... )
On Thu, 12 Oct 2006 17:40:12 +0200, Chris Mason [EMAIL PROTECTED] wrote: ... [1] Some funny system with ancestry between the S/360 Model 20 and the iSeries of today (that is, the RPG range) used diddy 96 column cards I seem to remember. Is something a programming language just because people used it for programming? :-) An RPG program was sort of an accounting machine simulator. The program source was a punch board specification. (I suppose plugging a punch board on an accounting machine was programming.) The 96 column card used on the S/3 was really 3 tiers of rows, 32 col wide. The card handling equipment was very good. (The rare card jams of the MFCU were trivial to clear. Card jams on a Mod 20's MFCM were common and horrible to clear.) The human engineering that went into the cards was not so good. Picking up a 4-inch deck could result in your holding the first and last card of the deck with the rest of the cards sprayed across the room. BTDT. Pat O'Keefe -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
Idiots are not born they are created. Please share! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMTP MVS Exit Question
In a recent note, Schramm, Rob said: Date: Fri, 13 Oct 2006 15:42:32 -0400 Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU Sender: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU From: Schramm, Rob [EMAIL PROTECTED] Note the three headers above for an example. I have been out to the cbttape.org looking for a version of the MVS SMTP exit that just forces the user ID of the address space as the from. Just to ensure that no one running a batch job can send an e-mail with someone else's address. I hope you'll respect Internet tradition enough that: o If a Sender: header appears, that is the one that must match the user ID o If Sender: appears and matches the user ID, you enforce no constraint on From: This is the protocol when, for example, an administrative assistant composes a message on behalf of his manager, or, as above, by mailing list servers. You should do your forcing on Sender:, not on From:. See RFC 822 (or is it 2822?) -- gil -- StorageTek INFORMATION made POWERFUL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Jes2 Exit52 Again
In a message dated 10/13/2006 2:58:12 P.M. Central Standard Time, [EMAIL PROTECTED] writes: need to know how big of an idiot I am, do you ?? Forget to pay the RENT? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMTP MVS Exit Question
My apologies at not accurately requesting help. You are correct in the adjustment... and the force on Sender: is what I am looking for.. -Rob. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin Sent: Friday, October 13, 2006 4:11 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMTP MVS Exit Question In a recent note, Schramm, Rob said: Date: Fri, 13 Oct 2006 15:42:32 -0400 Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU Sender: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU From: Schramm, Rob [EMAIL PROTECTED] Note the three headers above for an example. I have been out to the cbttape.org looking for a version of the MVS SMTP exit that just forces the user ID of the address space as the from. Just to ensure that no one running a batch job can send an e-mail with someone else's address. I hope you'll respect Internet tradition enough that: o If a Sender: header appears, that is the one that must match the user ID o If Sender: appears and matches the user ID, you enforce no constraint on From: This is the protocol when, for example, an administrative assistant composes a message on behalf of his manager, or, as above, by mailing list servers. You should do your forcing on Sender:, not on From:. See RFC 822 (or is it 2822?) -- gil -- StorageTek INFORMATION made POWERFUL This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Ralph Griswold
I was very saddened to hear that Dr. Griswold had passed away. I had him for a course at the University of Arizona in his Icon programming language. He was a great teacher. I was always impressed at his down-to-earth style especially in light of his lifetime of accomplishments. Thanks, Andrew Wilt IBM DFSMSdss Architecture/Development Tucson, Arizona Patrick O'Keefe [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 10/13/2006 01:26 PM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU A while ago somebody (Shmuel, maybe?) mentioned in passing that Ralph Griswold had died. Nobody seemed to pick up on that. It was worth noting. He was a big name in non-numeric computing. Creator of SNOBOL among other things. Pat O'Keefe -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html [image removed] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Software Upgrade for ServerPac
On Fri, 2006-10-13 at 10:45 -0500, Mike Wojtukiewicz wrote: How does it restore the target and distlibs? Does it OVERLAY the current libraries, which means the target system in question is not running or does it use new DASD and load the datasets down. That being said must the datasets be indirectly catalogued or not. If not then how does it know what the true running datasets are. If it is required then I can fully understand how it works and it can be done on the target system while it's running. I'll take the lack of response as confusion as to what is being asked, rather than evidence that I am the only person ever to do one. A target is a target - they just get restored. I point it at a INIT'd volume and forget about it. Uses SSAs to resolve the conflicting dsname issue - although that has a few kinks in it. Nothing major, but it's not all hands off. For the DLIBs I put the z/OS release level in the DSNAME so I can catalog them, and not have to tool around with the DDDEF entries. Due to (IBMs) inconsistent dsnaming standards this is a lot more manual than it should be. Basically pretty straight-forward, but like all vendor installers, what they think you should do, and what you need to do rarely gel. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
undelete a dataset
Hi all, Is there a way to undelete a deleted Partition Data set? Best regards, Ali -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undelete a dataset
From: jalili [EMAIL PROTECTED] Is there a way to undelete a deleted Partition Data set? If the data set is backed up by HSM, you can recover it. If SimpList is installed at your site, select the data set using function 'H' (HSM). This will display a list of all the back-ups, including the time and date each backup was taken. Just select whichever backup you want to recover. If you don't have SimpList, take a look at the HSM HLIST and HRECOVER commands. Hope that helps, Dave Salt SimpList(tm) - The easiest, most powerful way to surf a mainframe! http://www.mackinney.com/products/SIM/simplist.htm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: undelete a dataset
jalili wrote: Hi all, Is there a way to undelete a deleted Partition Data set? http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2u350/2.10 -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 [EMAIL PROTECTED] http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
