Re: Printing DASD type
The IBM DFSORT website has a set of sample DCOLLECT data scripts (identified as ICESTGEX#8203; - Storage Administrator Examples#8203;) that can likely be useful for volume-capacity identification and post-processing. Scott Barry SBBWorks, Inc. http://sbbworks.com/ On Wed, 13 Jun 2012 10:44:25 +0530, mf db dbajava...@gmail.com wrote: Hello All, We know pretty well that Mod - 3 , Mod - 9 . Mod - 27 has a Cylinder of 3K , 9K and 27k, but in a environment where we have mixture of all these type it becomes hard to know by each Volume serial. Are there any ways to scan only the Volumes corresponding to MOD 3 or MOD 9 ? Any suggestions or advises are much appreciated. Peter -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SMF volume
Yes -- I support a very large client where CA SMF DIRECTOR is implemented quite effectively, with the SMF data being collected throughout the day and maintained as DFHSM-directed data (HISTORY) files. Managed in smaller pieces by individual LPAR, the archived data is accessed, as needed, and is migrated/recalled on-demand, otherwise it is stored on tape as ML2/MIGRAT2. The SMF data is in its native format, however there is a control (SCDS) database which keeps track of where any given date/time a particular 'dumped' SMF record type can be found. SMF DIRECTOR supports either legacy MAN-type or LOGSTREAM-managed environments, with some enhanced feature/function when it comes to accurate post-processing. Scott Barry SBBWorks, Inc. http://sbbworks.com/ On Mon, 11 Jun 2012 22:00:51 +, Campbell Jay james.l.campb...@irs.gov wrote: Is anyone else is required to collect and retain 500,000 cylinders + of SMF data on an LPAR in one day... how do you handle the downstream copies ? Jay Campbell -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Access on ALESERV
Have you read Using Access Registers in MVS Extended Addressability? Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Micheal Butz Sent: 13 June 2012 16:19 To: IBM-MAIN@bama.ua.edu Subject: Access on ALESERV Hi, Can anyone explain to me the significance of the ACCESS parameter on the ALESERV MACRO THANKS -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: ALESEERV AL=PASN
Can I strongly suggest that you review the MVS Extended Addressability manual : SA22-7614 It is a very well written guide on how to do exotic things in z/OS including synchronous cross-memory, AR-mode programming and managing dataspaces and hiperspaces. Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Micheal Butz Sent: 12 June 2012 13:29 To: IBM-MAIN@bama.ua.edu Subject: Re: ALESEERV AL=PASN Thanks -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Dave Day Sent: Tuesday, June 12, 2012 8:26 AM To: IBM-MAIN@bama.ua.edu Subject: Re: ALESEERV AL=PASN Michael, If you re executing an AESERV to add an alet, it means the alet is available to all units of work in the pasn address space. --Dave On 6/12/2012 7:09 AM, Micheal Butz wrote: Hi, Does AL=PASN on the ALESERV macro mean that the ALET is available to all address spaces Which is the same concept LXRES with SYSTEM=YES Correct ?? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SRB mode question
All IBM services, whether branch entry, PC or SVC have their supported modes (TCB and/or SRB) and cross-memory environments documented in the manuals. I would strongly advise that you refer to the manuals than use any sort of generalizations. Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Micheal Butz Sent: 10 June 2012 16:30 To: IBM-MAIN@bama.ua.edu Subject: SRB mode question Hi, It's been a while since I scheduled an SRB If I use any IBM services in a SRB I use the branch entry from but I just looked at some documentation Cross memory for beginners And it seems PC rtns are also okay in SRB mode didn't specify SSWITH (space switch or not) Just wanted to verify this thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: ENF Listener usage
The possibility of consuming extra CSA is much less desirable that a few extra instructions inside a neutered ENF listener routine. I would probably choose option (2) Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Phil Smith Sent: 07 June 2012 22:20 To: IBM-MAIN@bama.ua.edu Subject: ENF Listener usage We have a long-running Started Task that controls the use of an ENF listener for SMF interval record collection with an operator command. The ENF listener requires use of CSA storage. When the Started Task receives an operator command to start SMF interval processing it allocates CSA storage, registers the ENF listener, and WAITs for interval expiration. The question is: what should it do when the operator command says to stop SMF interval processing? The options seem to be: 1) Deregister the ENF listener and free the CSA storage, meaning an operator can switch SMF interval processing on and off, causing CSA storage to be allocated and deallocated, possibly fragmenting CSA storage. But when we aren't collecting SMF interval data, we won't have an ENF listener registered. 2) Leave the ENF listener registered, but stop writing records when the interval expires. Don't stop the ENF listener and free CSA until the Started Task terminates (or possibly a special operator command like /f stcname,SMF STOP). This approach is easier on CSA allocations for the case where the operator is switching SMF interval collection on and off. But it leaves an ENF listener registered when one is not needed. Which approach have you seen? Which is better (and why)? Thanks, -- ...phsiii Phil Smith III p...@voltage.commailto:p...@voltage.com Voltage Security, Inc. www.voltage.comhttp://www.voltage.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SR
The component choice, however, is utterly baffling. How that got into production is a complete mystery. No matter how I try I can not find a valid choice for Comm Server, for example. Agree completely - this very thing had me and a couple of our sysprogs scratching our heads for a while. Eventually found Comms Server under our entitlement for z/OS base product - even though SR was listing things like Communications Server for VSE in the search results screen. Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tom Ambros Sent: 08 June 2012 16:23 To: IBM-MAIN@bama.ua.edu Subject: Re: SR I'm not feeling the hate, except for the one item just mentioned. The second sign on amounts to 9 keystrokes, one click and one enter - first character of userid, accept Chrome's prompt, enter password and hit enter. Once a day? No big deal. Leave the browser window open. Being able to attach files is convenient. The long outage was a head scratcher but with one exception I think SR is no worse than and in some ways better than ETR. The component choice, however, is utterly baffling. How that got into production is a complete mystery. No matter how I try I can not find a valid choice for Comm Server, for example. There's always a delay while they go out and figure out that, yes, we are entitled for the product when I force the choice. I really don't think it is a user issue, either. Something just isn't hooking up right. Thomas Ambros Operating Systems and Connectivity Engineering 518-436-6433 From: mvs1sp mvs...@yahoo.com To: IBM-MAIN@bama.ua.edu Date: 06/08/2012 11:11 Subject:Re: SR Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu I have found it to be very unfriendly. I wish IBM would have incorporated the good features of ETR. I have not gotten emails when the record is updated ( my profile requests such), so I have to logon (twice) just to check - this is a time waster to me. I opened a SR to the SR Help Desk, but I do not think they understood the problem. I have found it incredibly difficult to choose a component. For example, using z/OS as a keyword and selecting the show only entitled check box results in 475 choices. Browsing through that list, I see far more products for which I am NOT licensed. Response time is slower than ETR. In short, ETR much better. --- On Thu, 6/7/12, Dick Bond dickbond...@gmail.com wrote: From: Dick Bond dickbond...@gmail.com Subject: SR To: IBM-MAIN@bama.ua.edu Date: Thursday, June 7, 2012, 5:12 PM Anyone else as disgusted with the SR replacement as I am? Half time, it doesn't updae the record correctly and you have to sign-on twice just to get into the thing. On a positive note, you can download files which is nice but does not make up for the generally poor design. Makes me wonder if anyone at IBM bothered to look at the ETR function and how easy that was to use before designing SR. I can't help but feel IBM is shooting itself in the foot by deploying stuff like SR while making it worse that the prior product. Sorry for rant but I see SR just one component of The Rise and Fall of IBM. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN This communication may contain privileged and/or confidential information. It is intended solely for the use of the addressee. If you are not the intended recipient, you are strictly prohibited from disclosing, copying, distributing or using any of this information. If you received this communication in error, please contact the sender immediately and destroy the material in its entirety, whether electronic or hard copy. This communication may contain nonpublic personal information about consumers subject to the restrictions of the Gramm-Leach-Bliley Act. You may not directly or indirectly reuse or redisclose such information for any purpose other than to provide the services for which you are receiving the information. 127 Public Square, Cleveland, OH 44114 If you prefer not to receive future e-mail offers for products or services from Key send an e-mail to mailto:dnereque...@key.com with 'No Promotional E-mails' in the SUBJECT line. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: LE COBOL odd behavior
Shmuel: Actually we have three apps written in LE Cobol, same issue on 1.12 ...Le Cobol 4.2 , when I inserted a //SYSOUT , everything is a-ok Scott J Ford Software Engineer http://www.identityforge.com From: Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net To: IBM-MAIN@bama.ua.edu Sent: Thursday, June 7, 2012 10:10 AM Subject: Re: LE COBOL odd behavior In 5ffa8470-9de8-4aad-b7a5-1bb653cec...@yahoo.com, on 06/05/2012 at 11:09 PM, Scott Ford scott_j_f...@yahoo.com said: No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Just COBOL, or anything that dynamically allocates SYSOUT? Was the SYSOUT in the same IOT or different? -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Need a PC tape drive to read 3490, 3490E
Shmuel: I worked MVS at that time on a PC390 ...we had a 3800 and tape drives and a 3174 attached to it. Also BAR/RJE supported tape drives and of course various printers that were BUS/TAGGED into it Scott J Ford Software Engineer http://www.identityforge.com From: Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net To: IBM-MAIN@bama.ua.edu Sent: Thursday, June 7, 2012 10:13 AM Subject: Re: Need a PC tape drive to read 3490, 3490E In 4fcf76bf.9040...@cbttape.org, on 06/06/2012 at 11:26 AM, Sam Golob sbgo...@cbttape.org said: Does anybody have a suggestion how I can get a tape drive to attach to a PC so that I can read 3490, 3490E tapes, without my having to spend a couple of thousand dollars? There used to be PC (SCSI?) drives that could handle old tapes, but I have no idea what they cost or whether they are still available. I've seen advertisements for everything from open reel to 3490E formats. -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: LE COBOL odd behavior
Frank: When this first happened, I am testing on our z/PDT Z/OS 1.12 - LE Cobol 4.2 system, I though i missed something , left something out. So i went to our code working on 1.11 and imported over, compiled under 4.2 and still failed. Thats when I got the bright idea of adding the //SYSOUT and all of a sudden like magic i have all the Cobol Displays. Scott J Ford Software Engineer http://www.identityforge.com From: Frank Swarbrick frank.swarbr...@yahoo.com To: IBM-MAIN@bama.ua.edu Sent: Thursday, June 7, 2012 2:17 PM Subject: Re: LE COBOL odd behavior That is certainly interesting. Enterprise COBOL 4.2 (and prior!) usually do a dynamic allocation of SYSOUT if there is no JCL allocation. I have run in to cases where the dynamic allocation fails because the attempt to do it is being done in an I/O error routine. I can't recall offhand the exact error, but it's trying to ENQ a resource that is already enqueued by for the processing of that file, and thus can't do it for SYSPRINT at the same time. Or something like that. Although I've gotten an abend when this occurs, so maybe its not related to your issue at all! :-) Frank From: Scott Ford scott_j_f...@yahoo.com To: IBM-MAIN@bama.ua.edu Sent: Thursday, June 7, 2012 9:25 AM Subject: Re: LE COBOL odd behavior Shmuel: Actually we have three apps written in LE Cobol, same issue on 1.12 ...Le Cobol 4.2 , when I inserted a //SYSOUT , everything is a-ok Scott J Ford Software Engineer http://www.identityforge.com From: Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net To: IBM-MAIN@bama.ua.edu Sent: Thursday, June 7, 2012 10:10 AM Subject: Re: LE COBOL odd behavior In 5ffa8470-9de8-4aad-b7a5-1bb653cec...@yahoo.com, on 06/05/2012 at 11:09 PM, Scott Ford scott_j_f...@yahoo.com said: No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Just COBOL, or anything that dynamically allocates SYSOUT? Was the SYSOUT in the same IOT or different? -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Need a PC tape drive to read 3490, 3490E
Shmuel, We used these when I worked on europe, we were converting a lot of small Philip Morris offices to these.. http://www.barrcentral.com/help/beps/Overview_BARR_RJE.htm Scott ford www.identityforge.com On Jun 7, 2012, at 1:08 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In 1339083804.4053.yahoomail...@web164506.mail.gq1.yahoo.com, on 06/07/2012 at 08:43 AM, Scott Ford scott_j_f...@yahoo.com said: I worked MVS at that time on a PC390 ...we had a 3800 and tape drives and a 3174 attached to it. Also BAR/RJE supported tape drives and of course various printers that were BUS/TAGGED into it Aren't parallel channel adaptors a lot more expensive than SCSI adaptors? Also, the PC tape drives I've seen advertised needed a lot less real estate than the mainframe versions, and for one-time copying I wouldn't expect performance to be an issue. -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: LE COBOL odd behavior
I should have added under z/os1.11 works fine Scott ford www.identityforge.com On Jun 5, 2012, at 11:09 PM, Scott Ford scott_j_f...@yahoo.com wrote: All, We migrated to z/os 1.12 , LE COBOL. I have noticed on a COBOL program running as a STC, No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Is this a bug or a new parm in Maybe z/os , guessing ..? Scott ford www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: LE COBOL odd behavior
John, No, we don't change LE options, I will look at them.. Scott ford www.identityforge.com On Jun 6, 2012, at 9:16 AM, McKown, John john.mck...@healthmarkets.com wrote: Did somebody change the LE options? That's all that I can think of. No, I don't know what the option(s) might be that could cause this difference. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Wednesday, June 06, 2012 8:03 AM To: IBM-MAIN@bama.ua.edu Subject: Re: LE COBOL odd behavior I should have added under z/os1.11 works fine Scott ford www.identityforge.com On Jun 5, 2012, at 11:09 PM, Scott Ford scott_j_f...@yahoo.com wrote: All, We migrated to z/os 1.12 , LE COBOL. I have noticed on a COBOL program running as a STC, No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Is this a bug or a new parm in Maybe z/os , guessing ..? Scott ford www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: LE COBOL odd behavior
John, I fixed it, but the fix was odd, I added a //sysout dd sysout=* It now works Scott ford www.identityforge.com On Jun 6, 2012, at 9:16 AM, McKown, John john.mck...@healthmarkets.com wrote: Did somebody change the LE options? That's all that I can think of. No, I don't know what the option(s) might be that could cause this difference. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Wednesday, June 06, 2012 8:03 AM To: IBM-MAIN@bama.ua.edu Subject: Re: LE COBOL odd behavior I should have added under z/os1.11 works fine Scott ford www.identityforge.com On Jun 5, 2012, at 11:09 PM, Scott Ford scott_j_f...@yahoo.com wrote: All, We migrated to z/os 1.12 , LE COBOL. I have noticed on a COBOL program running as a STC, No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Is this a bug or a new parm in Maybe z/os , guessing ..? Scott ford www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Dumps to vendors with sensitive data
Andy, We work with the DOJ(FBI) and they remove IP addresses etc..since we are a IP server/client dealing with security subsystems. Scott J Ford Software Engineer http://www.identityforge.com From: Andy White awh...@metlife.com To: IBM-MAIN@bama.ua.edu Sent: Wednesday, June 6, 2012 12:57 PM Subject: Dumps to vendors with sensitive data We recently have a DOD (Department of Defense) account on our systems. Question if you are sending a dump to a vendor e.g. IBM and there might be a slight change it has user data stored in common storage. Do you have a DOD approved person within IBM you send the dump to? Or an assigned group to your account that deals with GSA/DOD type of issues? We haven't sent any dumps to a vendor since taking on this new work but wanted to know how other companies handle this? Andy S. White The information contained in this message may be CONFIDENTIAL and is for the intended addressee only. Any unauthorized use, dissemination of the information, or copying of this message is prohibited. If you are not the intended addressee, please notify the sender immediately and delete this message. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: LE COBOL odd behavior
Thanks Clark, I had to look it up, didn't know it existed, much appreciated Scott ford www.identityforge.com On Jun 6, 2012, at 4:03 PM, Clark Morris cfmpub...@ns.sympatico.ca wrote: On 6 Jun 2012 07:04:52 -0700, in bit.listserv.ibm-main you wrote: John, I fixed it, but the fix was odd, I added a //sysout dd sysout=* It now works If the statement //SYSOUT DD some parameters is missing and you have a DISPLAY something in your program and the LE runtime option CBLQDA is (ON), the program will dynamically allocate a temporary file with DISP=(NEW,DELETE) and write to it. This is true for all QSAM files. If the LE option is CBLQDA(OFF), you will get an abend on OPEN (or for DISPLAY, first write). CBLQDA(ON) is purportedly to conform to the COBOL standard although the standard assumed that the file would remain somewhere. Clark Morris Scott ford www.identityforge.com On Jun 6, 2012, at 9:16 AM, McKown, John john.mck...@healthmarkets.com wrote: Did somebody change the LE options? That's all that I can think of. No, I don't know what the option(s) might be that could cause this difference. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Wednesday, June 06, 2012 8:03 AM To: IBM-MAIN@bama.ua.edu Subject: Re: LE COBOL odd behavior I should have added under z/os1.11 works fine Scott ford www.identityforge.com On Jun 5, 2012, at 11:09 PM, Scott Ford scott_j_f...@yahoo.com wrote: All, We migrated to z/os 1.12 , LE COBOL. I have noticed on a COBOL program running as a STC, No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Is this a bug or a new parm in Maybe z/os , guessing ..? Scott ford www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
LE COBOL odd behavior
All, We migrated to z/os 1.12 , LE COBOL. I have noticed on a COBOL program running as a STC, No yucks please, a Display or Write to Sysprint takes a long time , in one case I cancelled a STC and the output was in sysprint, but under ISPs, sdf , not there at all. Is this a bug or a new parm in Maybe z/os , guessing ..? Scott ford www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Is there an Enterprise COBOL API to detect SOURCE-COMPUTER WITH DEBUGGING on or off at runtime?
Peter, We pass a parm debug=y or debug=n , our code there is a 88 level... If debug-on ... ... End-if Plus I had to create a special sysout , allocated dynamically... Scott ford www.identityforge.com On Jun 4, 2012, at 1:11 PM, Farley, Peter x23353 peter.far...@broadridge.com wrote: The subject is the question. Obviously I can insert a WORKING-STORAGE switch that is off by default and a Debugging line in the PROCEDURE division to turn on that switch when WITH DEBUGGING is in effect, but this seems clumsy to me. If there is another way, I'd appreciate any info you can provide. Peter This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Brain drain: Where Cobol systems go from here
Kirk, Yes, I agree also and the ability to read a manualhave a ton of customers who don't even take the time to rtfm..l Scott ford www.identityforge.com On Jun 1, 2012, at 5:33 PM, Kirk Talman rkueb...@tsys.com wrote: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 05/23/2012 05:39:26 PM: From: Roberts, John J jrobe...@dhs.state.ia.us When the last Cobol programmers walk out the door, so may 50 years of business processes within the software they created. Will you be ready? Ed, Interesting article and fairly accurate IMO. This is what I can foresee happening: (1) Many companies will try to offshore their COBOL application support. But this won't work so well because it is hard enough to understand these systems without facing the complications of language and arcane terminology. And the young ones back in Bangalore will want to do Java, not COBOL. Actually the language is not a problem. We have people here from multiple nations, some whose English is lacking. But they can doing the programming work - well. The problem is the lack of application knowledge. We just had a senior person retire to a ranch in FL. He was senior person in his critical application. He ran a series of weekly one hour technical seminars. The problem was that he could answer any question off the top of his head. But an organized overview and drill down into each part of the system and the relationship of that system to multiple other systems was not there. He was used to being a S(ubject)M(atter)E(xpert)/guru. Ask him a question and he could answer it or tell you where to find the answer. Without that kind of person, trying to port the application to anything else is risky as is training newbies. (2) Other companies will want to recruit overseas, either for CS grads that they can train, or for those few that are willing to invest in COBOL learning if that is what it takes to punch that H1B ticket. But even so, once here they are all going to be looking to do something else, not COBOL. So that company that recruits and trains a COBOL resource is going to be looking for a replacement within a couple years. We have had over the years training programs to build new Cobol programmers. They work fine. But again, the application knowledge is not in books. It was transmitted by SMEs. (3) Efforts to train new young COBOL resources are going to flop, as the article mentions. Again, everyone expects COBOL to be a career dead-end once beyond a 5 to 10 year transition period. Since Cobol is now talking to distributed applications in various ways, Cobol people are getting exposure to distributed applications. I recently had a project transferred from me which was going to have me build part of an environment that is both mainframe and distributed. As long as the documentation is there, there is not a huge chasm to cross. (4) In the end, US companies are going to be forced to pay a premium just to hang on to their old-timers long enough to buy time to implement that new ERP package or new custom application. The ones that will be successful doing this are going to be the ones that accommodate their senior developer's desires: lots of time off, telecommuting, job sharing, benefits, etc. Right now at the moment there are enough Cobol programmers leaving other companies that is still a supply of new people, some of which have fine skill sets. But as time goes on, there will be a cliff. I just returned from Germany. There was talk there that there is an engineering shortage in the market there. Never bothered with the details. Maybe the recession there will give them time to kick the can down the road more. After all, it has been working so well for dealing with their financial problems. John - The information contained in this communication (including any attachments hereto) is confidential and is intended solely for the personal and confidential use of the individual or entity to whom it is addressed. If the reader of this message is not the intended recipient or an agent responsible for delivering it to the intended recipient, you are hereby notified that you have received this communication in error and that any review, dissemination, copying, or unauthorized use of this information, or the taking of any action in reliance on the contents of this information is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail, and delete the original message. Thank you -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff
Re: How to suppress Message in REXX App
Lizette,
Are you trapping the messages ?
Scott ford
www.identityforge.com
On Jun 1, 2012, at 12:43 PM, Lizette Koehler stars...@mindspring.com wrote:
Cross Posting to IBM Main and TSO-REXX
I have a Rexx process that issues the HLIST command. I have been successful
in trapping the output from the HLIST but have an issue when the message
ARC0138I is issued.
I have tried turning off all of the TSO PROF functions (MSGID, INTERCOM,
etc)
I have tried turning off message for that section of the code MSG('OFF')
Any yet it keeps getting produced so the user has to keep hitting enter
until they are cleared.
This message can be overwhelming if my user requests 100's of datasets that
do not have an MCDS entry.
Does anyone know if this message can be suppressed from a TSO session? IF
so, suggestions?
Thanks
Lizette Koehler
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: How to suppress Message in REXX App
Lizette,
TPut will go to sysprint or systsprt
Scott ford
www.identityforge.com
On Jun 1, 2012, at 4:16 PM, Lizette Koehler stars...@mindspring.com wrote:
Scott
Yes the output is going to a outdsn
HLIST DSN('dsnvar') MCDS ODS('tmpdsn')
I have set TSO PROF NOINTERCOM NOPAUSE NOMSGID NOMODE NOWTPMSG NORECOVER
I have added the turning off of MSG prior to the HLIST and restore it after
HLIST.
I think the problem as pointed out is a TPUT. Which means I may not be able
to suppress it from the user's session.
Lizette
-Original Message-
From: Scott Ford scott_j_f...@yahoo.com
Sent: Jun 1, 2012 1:03 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: How to suppress Message in REXX App
Lizette,
Are you trapping the messages ?
Scott ford
www.identityforge.com
On Jun 1, 2012, at 12:43 PM, Lizette Koehler stars...@mindspring.com wrote:
Cross Posting to IBM Main and TSO-REXX
I have a Rexx process that issues the HLIST command. I have been successful
in trapping the output from the HLIST but have an issue when the message
ARC0138I is issued.
I have tried turning off all of the TSO PROF functions (MSGID, INTERCOM,
etc)
I have tried turning off message for that section of the code MSG('OFF')
Any yet it keeps getting produced so the user has to keep hitting enter
until they are cleared.
This message can be overwhelming if my user requests 100's of datasets that
do not have an MCDS entry.
Does anyone know if this message can be suppressed from a TSO session? IF
so, suggestions?
Thanks
Lizette Koehler
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: How to suppress Message in REXX App
Yes, system Scott ford www.identityforge.com On Jun 1, 2012, at 5:59 PM, Walt Farrell walt.farr...@gmail.com wrote: On Fri, 1 Jun 2012 16:37:51 -0400, Scott Ford scott_j_f...@yahoo.com wrote: TPut will go to sysprint or systsprt She's concerned about a TSO session, and there it will go to the terminal. -- Walt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Cell pool questions
Charles You could solve this requirement using a code solution - for example : (1) Design a common structure for a cell pool identifier - something that includes the cell pool id and some double-word count fields for GET and FREE operations (2) Build a macro to front-end the CPOOL GET and CPOOL FREE services (eg #CPOOL GET and #CPOOL FREE) that take a pointer to the structure in (1) as a parameter (3) Inside the macro, issue the real CPOOL GETs and FREEs - however you can now maintain the GET and FREE count fields using CSG (4) Write your own service to list/dump the contents of the structures in (1) for diagnostic purposes Obviously the above is simplistic and you could get into a more elegant solution depending on the environment that you are working in. If the program is running in a server, then perhaps you could consider a separate TCB acting as a storage manager (SM) and all other TCBs having some sort of API to GET and FREE cells from within defined pools. If so, the SM TCB could use callable cell pool services to manage the pools and the APIs could just manage your own free cell queue(s). The big advantage of callable cell pool services is the ability to contract the pools if required. Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Charles Mills Sent: 30 May 2012 21:09 To: IBM-MAIN@bama.ua.edu Subject: Re: Cell pool questions Jim, thanks. Wow, I totally did not get that. I saw it as two different APIs to the same core service, like the C and assembler APIs to TCP/IP. Not sure if it is just me, but you might want to make that clearer in the documentation, seeing as both are called Cell Pool Services. I almost did not bother to ask question (1.) as it seemed so obvious that the answer was Yes. Okay, moving right along ... re-formulating the question: Is there any way to determine the number of cells in a CPOOL cell pool? I have a cell pool with a primary and a secondary count. It occurs to me that if, for example, I had a bug in which one time in ten I failed to return a cell to the pool, that I would have no indication of a problem until I got an SC78 abend, which might take quite a while. I am kind of inferring that I could do a LIST and get the number of extents from work area Word 3 (possibly iteratively based on Word 1), from which I guess I could determine the pool size as primary + (secondary * (extents - 1)). Is that correct? Or is there not a one-to-one between pool expansions and extents? Is there a better way? Actually, I now see that that method won't work very well because I have no way of making sure that there would be no intervening GET requests. The GET requests come from asynchronous processes which the main task has no ability to pause. I guess I could just make sure the work area was large enough to get all of the extents in a single call? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jim Mulder Sent: Wednesday, May 30, 2012 12:23 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Cell pool questions 1. Can I mix CPOOL and CSRP calls on the same cell pool? Could one for example use CPOOL GET for performance, and CSRPQPL to obtain statistics that are not available through CPOOL? I already have working CPOOL macro code, but I would like to get the CSRQPL statistics. Can I do so without having to re-write my working CPOOL macro code? 2. Assuming the answer to (1.) is Yes, what CSRPQPL calls anchor_addr -- is that the same datum that CPOOL calls pool id? No, CPOOL and CSRP are completely different services, which have no relation to each other. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
RACF extract
All: I am writing an assembler routine to perform a RACFROUTE REQUEST=EXTRACT ...below: OPEN FILEIN OPEN (SYSPRINT,(OUTPUT)) READM DS 0H GET FILEIN,RECIN MVC RECOUT(11),=C'PROCESSING ' MVC RECOUT+11(10),RECIN PUT SYSPRINT,RECOUT XC UID,UID MVC UID(8),RECIN RAC2 RACROUTE REQUEST=EXTRACT,TYPE=EXTRACT,CLASS='USER',WORKA=RACW,X ENTITY=UID,FIELDS=FLDLST,SEGMENT='TSO',RELEASE=2.2,MF=S LTR R15,R15 BNZ BADEXTR MVI RECOUT,C' ' MVC RECOUT+1(132),RECOUT ** dcs and ds ** RECIN DS CL80 RECOUT DS CL133 SAVEAREA DS 18F UID DS CL8 FLDLST DC A(5) DC CL8'TACCT' DC CL8'TDEST' DC CL8'THCLASS' DC CL8'TJCLASS' DC CL8'TLPROC' RACW DS CL512 WORKAREA DS 128F SAVEREA DC 18F'0' FILEIN DCB DDNAME=INPUT,MACRF=(GM),DSORG=PS,EODAD=EOJ SYSPRINT DCB DDNAME=SYSPRINT,MACRF=(PM),DSORG=PS,LRECL=133 IRRPRXTW I am trying to extract a users TSO segment information, I will need to be doing them all, but my question is this: I know R1 contains the result of the extract..but with SEGMENT= what maps to the segment fields like in the RACF templates that the Extract refers me to.. Sorry all, first serious RACF program...but i need some assistance Scott J Ford Software Engineer http://www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: RACF extract
Walt, Thank you very much on both accounts.. Scott ford www.identityforge.com On May 29, 2012, at 3:02 PM, Walt Farrell walt.farr...@gmail.com wrote: First, I suggest that for RACF-related questions you use RACF-L rather than IBM-MAIN, as there will be more RACF-knowledgeable responders there. But to answer your question, EXTWOFF in the returned extract work area (RXTW, see RACF Data Areas) gives you the offset within the returned data area to the data you asked for. At that offset within the RXTW you'll get one chunk of data for each field you asked for. You can figure out what each chunk of data should look like using the template information and the information provided with the description of the REQUEST=EXTRACT keyword in the RACROUTE REQUEST=EXTRACT documentation. -- Walt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CSVDYNEX ?'s
If your dynamic exit has its own recovery routine and it recovers successfully, the the abend count will not be incremented and CSV430I will be avoided. There is no documented ENF signal for any CSVDYNEX service. You have at least the following choices for notification of possible problems with your exit : (o) Periodically issue the LIST request to check on the exit status (o) Make your dynamic exit update a count field or STCK value somewhere every time it is invoked. (o) If you have a recovery routine for the exit, you could provide your own notification service to your server address space when it is invoked for an abend in the exit. I would probably choose the last option. Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Paul Schuster Sent: 25 May 2012 17:50 To: IBM-MAIN@bama.ua.edu Subject: CSVDYNEX ?'s The CSVDYNEX macro provides keywords ABENDNUM and ABENDCONSEC to control how many times the exit routine can abend before the exit is disabled. 1) At what point does the dynamic exit processing determine that an abend has occurred? If I were to provide an ESTAE or similar recovery routine in my exit, what that be sufficient to prevent the exit from becoming disabled? (Assuming it recovered correctly.) 2) Other than the CSV430I MODULE FOR EXIT IGGPRE00_EXIT HAS BEEN MADE INACTIVE DUE TO ABEND=xx REASON= message appearing, is any notification made available? Specifically an ENF? (I did not see any mention of that in the docs.) 3) If a recovery routine in the exit itself (as in (1) above) is not the answer, then what is the correct way to provide recovery? The CSVDYNEX RECOVER option seems to be only for callers of the exit; I am essentially only doing a CSVDYNEX ADD,STATE=ACTIVE. Thank you for any insight. Paul Schuster -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Snap dump question
John, Your so far from impolite. I appreciate intelligence and frankness. I will post my code a snippet a bit later..I know I made mistakes , so I need a another pair of eyes I don't have within the company I work..the black arts of assembler are only practiced by a few ...good men and women...thanks for the option... Scott ford www.identityforge.com On May 25, 2012, at 8:47 PM, John Gilmore johnwgilmore0...@gmail.com wrote: Charles Mills writes begin extract DBB LECL will almost certainly not assemble (as John G. was pointing out, a bit obtusely). Should be LRECL /end extract Equally, 'DBB' should of course be 'DCB'. My point--serendipitously well illustrated by what you typed--was that, since the OP obviously knows that 'LECL'. should be 'LRECL', there was a strong possibility that his typo was a transcription error, defective in his post but not in his code. In reviewing the language I used to make this point I find no basis for the notion that it is obtuse. (It is at once clear and polite, but perhaps I should add that I am capable of being impolite.) While I am responding, I do not much like your 'definition'/characterization of a DSECT. A DSECT is a portable putative storage template. It describes but neither allocates nor initializes a block of storage. Like other preogramming constructs, a DSECT can be misused. You are of course correct that if pointed in the weeds it will yield gibberish and, with luck, a quick ABEND. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Snap dump question
Peter, I built the plist for a call to irrseq00 , I will post my code a bit later. Thanks for the reply Scott ford www.identityforge.com On May 26, 2012, at 12:31 PM, Peter Relson rel...@us.ibm.com wrote: I am experiencing the dreaded S0C4-11 I didn't see an answer to the question of just where the S0C4-11 occurred. I somewhat doubt that SNAP would end with an S0C4-11 if your data was incorrect. It would catch the program interrupt, and either retry to give you back a return code or change the completion code. That leads me to suspect that you never made it to the SVC 33 that is part of SNAP. Look in your program for whatever bug is indicated by the error location. Peter Relson z/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Snap dump question
All: I have a program that uses a dsect...filling in fields and then calls an external program. I am doing a RACF extract through IRRSEQ00.. OPEN (SNAPOUT,OUTPUT) LA R3,SNAPOUT SNAP DCB=(3),TCB=(5),PDATA=ALL CLOSE SNAPOUT L R15,=V(IRRSEQ00) BALR R14,R15 ** dcb ** SNAPOUT DCB DDNAME=SNAPOT,DSORG=PS,MACRF=(W),RECFM=VBA,LECL=125 I want to see the the contents of the dsect prior to the call, I am experiencing the dreaded S0C4-11 When I execute the above code the SNAPOUT contents shows nada.. can anyone shed some light on my mistake, yes I am admiting I make mistakes :( Regards, Scott J Ford Software Engineer http://www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Snap dump question
John: That was correct in my code, thats what the manual gave..but I also found some of their parameter examples wrong Scott J Ford Software Engineer http://www.identityforge.com From: John Gilmore johnwgilmore0...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Friday, May 25, 2012 4:19 PM Subject: Re: Snap dump question On 5/25/12, John Gilmore johnwgilmore0...@gmail.com wrote: Scott, Is LECL=125 just a typo for LRECL=125 in your post, or is it LECL in your code too? John Gilmore, Ashland, MA 01721 - USA -- John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Subpool 231 usage
All: Thank you so much for the help. We are digging through the problem. I hadnt seen this one before, so I was looking for pointers to point me the right direction to find the cause. All your help was very much appreciated. Scott J Ford Software Engineer http://www.identityforge.com From: Ray Overby rayove...@comcast.net To: IBM-MAIN@bama.ua.edu Sent: Wednesday, May 23, 2012 9:03 AM Subject: Re: Subpool 231 usage Perhaps you could look at the common storage tracking information for your SP 231 storage. With appropriate settings in your DIAGXX parmlib member CSA/SQA storage tracking data should indicate the owner (address space) of the storage. Perform this analysis before the problem occurs. This should validate you had actually allocated the storage and its key. Perform this activity again after the problem occurs and compare the results. I will assume that if you did not correctly allocate the storage in the first place that you know how to fix that. For the case where the storage is freed out from under you you could run a storage trace (see /MVS Diagnosis: Tools and Service Aids Chapter 13 Getmain, Freemain, STORAGE trace (GFS) for details). /This trace should show you all GETMAIN/FREEMAIN and STORAGE OBTAIN/RELEASE requests. Use filtering to limit the output to SP231 for the address space(s) involved. Hopefully you will see who freed the storage (likely one of your programs) and will be able to resolve your problem. On 5/23/2012 02:50 AM, Andy Wood wrote: Another program cannot acquire storage within your sp231 storage. At least, not unless that program, or some other program, first released/freemained all or part of your storage (yes, that could happen accidentally). When you say the abend points to unknown=program, do you mean that you can't see your code in the dump and you don't know exactly where it abended? What address caused the S0C4-11 - the address from your token, or maybe some other address, such as an address where your code is supposed to be? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Subpool 231 usage
All: I have a interesting situation I havent seen before.. 1. Program : Does Storage Obtain in Mode=sup key=zero , subpool 231 2. Same program creates a 16 byte token using IEANTCR..System_Level, persist 3. A system exit will create an entry into the cache created above. This is working fine and has been for a long time in many of our customer environments. The failing environment is z/OS 1.11.. We just got hit on a S0C4-11 , is it possible that another application acquired the storage at our location and token and overlaid us...the abend points to unknown=program ...and we are seeing the abends on the RACF Stc log.. I cant paste the code here, its proprietary ...I apolognize in advance..but I have never seen this happen. This exit is a RACF exit,,IRREVX01 and they are also running a Endeavor ICHRCX01 exit..I was suspect of that exit... Scott J Ford Software Engineer http://www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Screen Scraping TN3270
David: I feel your pain, screen scraping isnt generally a good thing to do, but sometimes your stuck. I am surprised you can call a API of some sort to perform the function you need to do on the screens that are being scraped. We had a customer with that issue, but with a RACF application, we were going to replace it with our application... But unfortunately, the deal fell through.. Scott J Ford Software Engineer http://www.identityforge.com From: David Andrews d...@lists.duda.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, May 22, 2012 4:46 PM Subject: Re: Screen Scraping TN3270 On Tue, 2012-05-22 at 16:10 -0400, George Henke wrote: I had a client in 2010 that used LegaSuite very successfully, but it was not really screen-scraping Well it is really no-fooling screen scraping here, with all the attendant change control issues. 1 click of the mouse button triggered about 10 or 12 CICS transactions, tasks, under the covers. Yes, it can devolve into this if you choose to e.g. present a multipage screen map as a scrollable list. We do some of that (but not a lot). Quite a price to pay just so customer service does not have to touch type. Perhaps. But usability has some value, and some of our green screens are complex. The ability to present some coded fields as pull-downs and integrate with the desktop (SQL-server queries, mail, other stuff) has been well received. Screen-scaping is taboo where I am now. Keeping the green-screen maps in sync with the LegaSuite panel collection is an administrative problem that we haven't solved yet. Error recovery seems to be much less of an issue than it was in days of yore. I once wrote a EHLLAPI library subset for a boutique 3270 emulator board, and dealing with a recalcitrant SPX line that stretched halfway across the country was a painful exercise. -- David Andrews A. Duda Sons, Inc. david.andr...@duda.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Early IPL problems
John, Boy that's a blast from the past, I worked man moons ago a s/370-158..3215 m worked another place on 4381s using a 3287 as a CICS log Scott ford www.identityforge.com On May 20, 2012, at 1:07 PM, McKown, John john.mck...@healthmarkets.com wrote: I agree totally. Personally, I really __liked__ the 3215 keyboard/printer on the s/370 145 that I started on. I wonder if it would be possible to use an OSA-ICC to have a 3284 definition which would be connected to by a Linux box running pr3287 and then generate that as a 3287 non-SNA printer for hardcopy during IPL. I vaguely remember having a 1403 as a console for NIP messages long ago. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets® 9151 Boulevard 26 . N. Richland Hills . TX 76010 (817) 255-3225 phone . 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® is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company®, 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-MAIN@bama.ua.edu] On Behalf Of R.S. Sent: Saturday, May 19, 2012 3:01 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Early IPL problems I prefer to have system solution, which would allow me to view/manage TEXT FILE. It's far more convenient than using video camera. And in fact I miss the facility. BTW: I haven't investigated it: I have some 3270 emulator which allow to view few previous screens - sometimes usable for ISPF activities. However this facility does not work for NIP text stream. -- Radoslaw Skorupka Lodz, Poland W dniu 2012-05-18 21:11, McKown, John pisze: I use the HMC and the Operating System Messages ICON. I don't have any NIPCONS, so I IPL and monitor from the HMC until I can get an SMCS console going. If you do have a 3270 type console, why not record the console on your cell phone camera? It is a bit small. So, get a tablet. Might take two people. One to do the IPL, the other to keep the console in focus. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Edward Jaffe Sent: Friday, May 18, 2012 1:52 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Early IPL problems On 5/18/2012 11:22 AM, Mark Zelden wrote: No, the complaint is that on emulated consoles attached via Tn3270 (2074, OSA-ICC and I assume Visira which I've never worked with) any messages that come out on the console along with the wait disappear immediately due to the RESET that happens along with the wait. Sounds like z/OS sysprogs need to ask their employers to pay for Evelyn Wood speed-reading classes. ;-) Seriously, I remember OS/2 had a similar issue. Before you could write down the information about a catastrophic trap, it would restart and blow away the screen. There was a special CONFIG.SYS parameter you had to code to prevent it from automatically restarting itself. Oh what fun... -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN . -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste
Rexx - calling assembler question
All: I am in the process of writing a Rexx program that will call an Assembler program and pass parameters. The program is simple.. - Rexx: /* TSTGFILE */ trace i say 'Address is: 'address() address TSO CALL 'SFORD.LINKLIB(TESTCALL)' 'CLASS(USER' Assembler: TESTCALL CSECT TESTCALL AMODE 31 TESTCALL RMODE ANY YREGS SPACE 3 SAVE (14,12),,'TESTCALL..SYSDATE..SYSTIME' LR R12,R15 USING TESTCALL,R12 L R4,0(R1) ST R4,8(R13) ST R13,4(R4) LR R13,R4 L R1,4(R1) MVC CLASSN(8),0(R4) MVC SUBMSGA+20(8),CLASSN SUBMSGA WTO 'PARM1: ',ROUTCDE=11 BAILOUT DS 0H L R13,SAVEAREA+4 RETURN (14,12),RC=0 CLASSN DS CL8 PROFN DS CL8 SAVEAREA DS 18F Execution JCL: //REXXGRP JOB ,SYSTEMS,CLASS=A,MSGCLASS=X, // MSGLEVEL=(1,1),REGION=0M,NOTIFY=SYSUID //STEP1 EXEC PGM=IKJEFT01,DYNAMNBR=99 //STEPLIB DD DSN=SFORD.LINKLIB,DISP=SHR //SYSEXEC DD DSN=SFORD.CLIST.LIBRARY,DISP=SHR //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * %TSTGFILE /* - Output: J E S 2 J O B L O G -- S Y S T E M A D C D -- N O 09.17.26 JOB00225 FRIDAY, 18 MAY 2012 09.17.26 JOB00225 IRR010I USERID SFORD IS ASSIGNED TO THIS JOB. 09.17.26 JOB00225 ICH70001I SFORD LAST ACCESS AT 09:17:12 ON FRIDAY, MAY 18, 09.17.26 JOB00225 $HASP373 REXXGRP STARTED - INIT 1 - CLASS A - SYS ADCD 09.17.26 JOB00225 IEF403I REXXGRP - STARTED - TIME=09.17.26 09.17.27 JOB00225 +PARM1: CL 09.17.27 JOB00225 IEF404I REXXGRP - ENDED - TIME=09.17.27 09.17.27 JOB00225 $HASP395 REXXGRP ENDED I assumed I misunderstand how parameters are passed in Rexx to Assembler...I thought that R1 pointed to the Adcon list...can someone be so kind as to point this old fellow .the right way Regards, Scott J Ford Software Engineer http://www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Rexx - calling assembler question
Tom: Let me explain, sorry, I should have been more clear.. The Rexx program or clist will call and Asembler module , the Assembler module in this case will do calls to the R_Radmin to perform extracts..output will go to a ddname once i get their with this code.. My problem is passing for example a Class and Profile to the Assembler routine doing the call to RACF Scott J Ford Software Engineer http://www.identityforge.com From: Tony Harminc t...@harminc.net To: IBM-MAIN@bama.ua.edu Sent: Friday, May 18, 2012 12:05 PM Subject: Re: Rexx - calling assembler question On 18 May 2012 11:36, Scott Ford scott_j_f...@yahoo.com wrote: All: I am in the process of writing a Rexx program that will call an Assembler program and pass parameters. The program is simple.. - Rexx: /* TSTGFILE */ trace i say 'Address is: 'address() address TSO CALL 'SFORD.LINKLIB(TESTCALL)' 'CLASS(USER' What you've got is a TSO call command. It has really nothing to do with REXX. Assembler: TESTCALL CSECT TESTCALL AMODE 31 TESTCALL RMODE ANY YREGS SPACE 3 SAVE (14,12),,'TESTCALL..SYSDATE..SYSTIME' LR R12,R15 USING TESTCALL,R12 L R4,0(R1) ST R4,8(R13) ST R13,4(R4) LR R13,R4 L R1,4(R1) MVC CLASSN(8),0(R4) MVC SUBMSGA+20(8),CLASSN SUBMSGA WTO 'PARM1: ',ROUTCDE=11 BAILOUT DS 0H L R13,SAVEAREA+4 RETURN (14,12),RC=0 CLASSN DS CL8 PROFN DS CL8 SAVEAREA DS 18F Execution JCL: //REXXGRP JOB ,SYSTEMS,CLASS=A,MSGCLASS=X, // MSGLEVEL=(1,1),REGION=0M,NOTIFY=SYSUID //STEP1 EXEC PGM=IKJEFT01,DYNAMNBR=99 //STEPLIB DD DSN=SFORD.LINKLIB,DISP=SHR //SYSEXEC DD DSN=SFORD.CLIST.LIBRARY,DISP=SHR //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * %TSTGFILE /* - Output: J E S 2 J O B L O G -- S Y S T E M A D C D -- N O 09.17.26 JOB00225 FRIDAY, 18 MAY 2012 09.17.26 JOB00225 IRR010I USERID SFORD IS ASSIGNED TO THIS JOB. 09.17.26 JOB00225 ICH70001I SFORD LAST ACCESS AT 09:17:12 ON FRIDAY, MAY 18, 09.17.26 JOB00225 $HASP373 REXXGRP STARTED - INIT 1 - CLASS A - SYS ADCD 09.17.26 JOB00225 IEF403I REXXGRP - STARTED - TIME=09.17.26 09.17.27 JOB00225 +PARM1: CL 09.17.27 JOB00225 IEF404I REXXGRP - ENDED - TIME=09.17.27 09.17.27 JOB00225 $HASP395 REXXGRP ENDED I assumed I misunderstand how parameters are passed in Rexx to Assembler...I thought that R1 pointed to the Adcon list...can someone be so kind as to point this old fellow .the right way It does. R1 points to a list of fullword addresses, and in this case there will be only one. You load that first and only pointer into R4 with L R4,0(R1) Now R4 points to a halfword length field(10), followed by the argument text - in your case CLASS(USER. So far, so good. (At this point, I would just do a WTO with the TEXT= option. TEXT= takes a pointer to a halfword length followed by text, so you are all set.) Then there is some code that appears to confuse chaining save areas with the argument you've been passed... ST R4,8(R13) ST R13,4(R4) LR R13,R4 L R1,4(R1) If you want to include some hardcoded text such as PARM1: , then you might do better to reserve an area, e.g. MSG DS Y(*-*),CL256 move in your local constant text and the argument you received, make sure the length field covers both, and then issue the WTO TEXT=. You could even easily achieve reenterability this way, should that matter to you. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Rexx - calling assembler question
Tony, Sort for the misname ...I am looking at the storage save area chain, John send me, ty, John.. And I will take a look at LINKPGM.. You guys are great as usual Scott J Ford Software Engineer http://www.identityforge.com From: Tony Harminc t...@harminc.net To: IBM-MAIN@bama.ua.edu Sent: Friday, May 18, 2012 12:40 PM Subject: Re: Rexx - calling assembler question On 18 May 2012 12:25, Scott Ford scott_j_f...@yahoo.com wrote: Tom: Tom? Let me explain, sorry, I should have been more clear.. The Rexx program or clist will call and Asembler module , the Assembler module in this case will do calls to the R_Radmin to perform extracts..output will go to a ddname once i get their with this code.. My problem is passing for example a Class and Profile to the Assembler routine doing the call to RACF If you stick to the TSO CALL command, you have only one text argument you can pass. So if you have two variable length items to pass, you will need delimiters of some sort, or you can reserve a fixed space for each. Keep in mind that yuo have only 100 bytes available in such an argument. There are other ways of calling an assembler program from REXX that allow you to pass multiple arguments, and even update them. Have a look at LINKMVS and LINKPGM in the REXX Reference book. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Co-existance of z/OS and z/VM on same DASD farm
Interesting worked vm since sp1 and VSE (1970s) never ever saw that problem... Scott ford www.identityforge.com On May 17, 2012, at 7:24 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In 1696751327392196.wa.ronmacraehotmail.co...@bama.ua.edu, on 05/16/2012 at 03:03 PM, Ron MacRae ronmac...@hotmail.co.uk said: The reason I'm worried is that in a previous life, over 30 years ago, my previous company attempted to do the same between an VM system and a DOS/VSE system. This was a long time ago on a real machine in pre LPAR days. When they brought up VM for the first time it objected to the VSE VTOCs it found and rewrote them as OS VTOCs and we lost the whole DASD farm. Can you provide any details? I've certainly never seen anything like that with VM/SE (SEPP). -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Retiring after 43+ years with IBM
Frank You were one of the first IBMers I ever saw that went *way* beyond the call of duty to help others. You will be missed. Enjoy your retirement! Rob Scott Lead Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Yaeger Sent: 16 May 2012 02:00 To: IBM-MAIN@bama.ua.edu Subject: Retiring after 43+ years with IBM Just a note to let everyone know I'll be retiring at the end of this month (5/31/2012). I've been with IBM for 43+ years (plus a couple of summers in college) and I've enjoyed my career immensely. I've especially enjoyed being able to help people use the DFSORT/ICETOOL functions I developed, over many years, in new and interesting ways. Once I retire, I won't be posting solutions any more since I won't have access to a mainframe to test them, and I don't like posting untested solutions. I may lurk a bit or I may not. I'm looking forward to retirement, but I'll also miss this list. I'm happy to say that others on the DFSORT Team will continue to contribute. Thanks to everyone for giving me the chance to earn a living all these years doing something that was a lot of fun for me. Long live the mainframe, IBM, z/OS, DFSORT and ICETOOL! Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Any way to programmatically detect diagnostic trap IGVCPOOLFREEQ active
See ' SYS1.MODGEN(IGVDGNB)' ECVT---ECVTDGNBDGNB Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Dave Day Sent: 16 May 2012 17:20 To: IBM-MAIN@bama.ua.edu Subject: Any way to programmatically detect diagnostic trap IGVCPOOLFREEQ active Does anyone know of any way to determine which diagnostic traps are active? Is it possible? Since my code makes heavy use of cell pools, IGVCPOOLFREEQ can have an impact on performance. --Dave Day -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Compiled SYSTEM Rexx exec
Ray, Very true, also you may gain speed in computations but not I/O that was very clear in a Share presentation.. Scott ford www.identityforge.com On May 16, 2012, at 2:47 PM, Ray Mullins m...@lerctr.org wrote: On 2012-05-15 12:35, Ed Mackmahon wrote: Hi List. We are zOS 1.12 shop. I compiled and linked a Rexx exec which is supposed to run under AXR (system Rexx), compile and link finished OK. After System Rexx server restated with the load dataset concatenated, I got: AXR0113I DATA SET S00.RCGAURD.SAXRLOAD ACCESSED THROUGH VOLSER(VPMVSE) HAS INCORRECT RECORD FORMAT How can I compile a Rexx exec that will run under the system Rexx server ? Make absolutely sure you are creating a load module, not a CEXEC. The REXX compiler has all sorts of options governing the output of the compiler, and I can vouch that it's sometimes easy to slip up. Cheers, Ray -- M. Ray Mullins Roseville, CA, USA http://www.catherdersoftware.com/ German is essentially a form of assembly language consisting entirely of far calls heavily accented with throaty guttural sounds. ---ilvi French is essentially German with messed-up pronunciation and spelling. --Robert B Wilson English is essentially French converted to 7-bit ASCII. ---Christophe Pierret [for Alain LaBonté] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Co-existance of z/OS and z/VM on same DASD farm
Ron, I also did the same as John has MVS at that time under VM , with no issues. The Sungard people were great, so if you have gaps in understanding or knowledge they help out in a DR situation. Almost all of the DR problems I have seen, done a ton of tests, turned out to be poor planning and execution. I am of the mindset always, 'plan the work and work the plan'... Scott ford www.identityforge.com On May 16, 2012, at 4:03 PM, Ron MacRae ronmac...@hotmail.co.uk wrote: Hi all, We are currently an exclusively z/OS site with multiple LPARs sharing a single IOCDS and DASD farm. We are about to install z/VM in a new LPAR and I'm worried about both OSs sharing the same DASD farm. They will not be sharing at the volume level. I've read through the install doc and it all seems fine, you tell the install process 6 or 9 unit adresses and it goes and loads stuff onto them and then you IPL. There is no mention of modifying other volumes, however there are include and exclude unit address lists that you can specify to define what z/VM will try to look at, which presumably you can't get at until after the basic install and IPL. Also z/VM can issue sense commands to determine what devices are out there. The reason I'm worried is that in a previous life, over 30 years ago, my previous company attempted to do the same between an VM system and a DOS/VSE system. This was a long time ago on a real machine in pre LPAR days. When they brought up VM for the first time it objected to the VSE VTOCs it found and rewrote them as OS VTOCs and we lost the whole DASD farm. Management were not best pleased. I wasn't directly involved at that time so I'm not 100% sure of my facts here and perhaps the guys who did this did something wrong, however my worry still remains. My question is - Do we have to isolate z/VM from the z/OS volumes or will z/VM play nice and leave stuff alone? I just want to double check that VM will only touch the 6 volumes it is given at install time. Regards, Ron MacRae. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Comparison of compiler generated code AD 1980(ish) v 2010(ish)
Guys, A little lost on the point of this thread , not trying be rude or flippant , just I see a lot about performance, is it valid with today's hardware and software, yes there is time sensitive events and software and hardware. Scott ford www.identityforge.com On May 16, 2012, at 4:35 PM, Mike Schwab mike.a.sch...@gmail.com wrote: The Hercules group did some testing comparing MVCL to MVC. If both source and destination had the same alignment to a double word boundary, you could move 8 bytes, then increment the 4 registers to reflect this, before being interuptable. If they aligned differently between boundaries, each 8 bytes would do this twice. Whereas an MVC would do 256 bytes or less without interupting or touching registers, and was much faster. Of course, emulation is much different from hardware, ie, updating all 4 registers at once. On Wed, May 16, 2012 at 2:41 PM, Bernd Oppolzer bernd.oppol...@t-online.de wrote: First, I would like to thank you for starting this thread. I posted it to the performance people of my customer, and they told me, that they just found a similar problem with EP PL/1 3.9, that is: the PLIMOVE calls don't generate MVCLs any more, as in previous releases, but series of MVCs and loops. Even when the length of PLIMOVE is - for example - 8000 bytes. They discovered it, because one of the PLIMOVE locations showed up in a Strobe report. I asked them to test using a ASSEMBLER program, if the MVC loop is faster, but they told me, that even with lengths around 500 or 600, the MVCL solution is faster - this is on a z196. I have still to confirm this. If this turns out to be true, this sounds like a bug, and we will try to convince IBM to go back to the previous solution. If we compile our modules during normal service using EP PL/1 3.9, our system will get slower and slower, because PLIMOVE is widely used. This is not acceptable. Because the PLIMOVEs are generated by a site-specific macro called PLICOPY, I already thought about calling a short ASSEMBLER routine (with minimal linkage conventions) doing the transfer using MVCL instead of CALL PLIMOVE. The applications need not to be changed, because the PLICOPY syntax stays the same. Maybe this could still be faster than doing the MVC loop. Kind regards Bernd -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Comparison of compiler generated code AD 1980(ish) v 2010(ish)
Oh, now i see what Bernd was talking about, sorry guys , old age Scott ford www.identityforge.com On May 16, 2012, at 4:53 PM, Scott Ford scott_j_f...@yahoo.com wrote: Guys, A little lost on the point of this thread , not trying be rude or flippant , just I see a lot about performance, is it valid with today's hardware and software, yes there is time sensitive events and software and hardware. Scott ford www.identityforge.com On May 16, 2012, at 4:35 PM, Mike Schwab mike.a.sch...@gmail.com wrote: The Hercules group did some testing comparing MVCL to MVC. If both source and destination had the same alignment to a double word boundary, you could move 8 bytes, then increment the 4 registers to reflect this, before being interuptable. If they aligned differently between boundaries, each 8 bytes would do this twice. Whereas an MVC would do 256 bytes or less without interupting or touching registers, and was much faster. Of course, emulation is much different from hardware, ie, updating all 4 registers at once. On Wed, May 16, 2012 at 2:41 PM, Bernd Oppolzer bernd.oppol...@t-online.de wrote: First, I would like to thank you for starting this thread. I posted it to the performance people of my customer, and they told me, that they just found a similar problem with EP PL/1 3.9, that is: the PLIMOVE calls don't generate MVCLs any more, as in previous releases, but series of MVCs and loops. Even when the length of PLIMOVE is - for example - 8000 bytes. They discovered it, because one of the PLIMOVE locations showed up in a Strobe report. I asked them to test using a ASSEMBLER program, if the MVC loop is faster, but they told me, that even with lengths around 500 or 600, the MVCL solution is faster - this is on a z196. I have still to confirm this. If this turns out to be true, this sounds like a bug, and we will try to convince IBM to go back to the previous solution. If we compile our modules during normal service using EP PL/1 3.9, our system will get slower and slower, because PLIMOVE is widely used. This is not acceptable. Because the PLIMOVEs are generated by a site-specific macro called PLICOPY, I already thought about calling a short ASSEMBLER routine (with minimal linkage conventions) doing the transfer using MVCL instead of CALL PLIMOVE. The applications need not to be changed, because the PLICOPY syntax stays the same. Maybe this could still be faster than doing the MVC loop. Kind regards Bernd -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Netview Question
Cheryl, Anytime, glad I can help Scott ford www.identityforge.com On May 15, 2012, at 7:28 AM, Meehan, Cheryl cmee...@cswg.com wrote: Hi, Scott- No changes in Sequence, no new products will continue to look for timing. Thanks! Cheryl -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Monday, May 14, 2012 9:35 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Netview Question Cheryl, Your IPL sequence on any of the LPARS havent changed ? New products ? Have seen sequence issues before , usually turned out to be timing... Scott ford www.identityforge.com On May 14, 2012, at 3:16 PM, Meehan, Cheryl cmee...@cswg.com wrote: Scott- The reason the resource is not available is because the system it is attached to is coming down. Which makes sense, because we're IPLing it. We have never had this issue prior to this version of the operating system. We do not believe we have any cross LPAR Tasks running that we have been able to find thus far. We plan to check next IPL for any cross netview sessions, and see if a disconnect is necessary, but it has never been required in the past. Cheryl -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Monday, May 14, 2012 1:36 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Netview Question Cheryl, Did you review the SNA messages and codes, that's your fist step..sense 8002 is a resource not available, maybe a timing issue with the IPL ... Scott ford www.identityforge.com On May 14, 2012, at 12:21 PM, Meehan, Cheryl cmee...@cswg.com wrote: Greetings- We upgraded our operating system to z/os 1.11 last fall. We have IPL'd our Production System twice since then, and each time, we have caused our AUTO1 task to fail on our Test System. Last week, we IPL'd our test system, and the AUTO1 task dropped on our Production system. Once recovered, we IPL'd our Test system several more times, and never lost AUTO1. The messages that we are seeing are for our EE link between the two system to go down, ( as we are IPLing. . . . ) and then these Messages: MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD RECEIVE FAILED, LUNAME = MVS01, QUALIFY = X'11', FEEDBACK = (X'4C',X'00',X'8002') MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD SEND FAILED, LUNAME = MVS01, QUALIFY = X'07', FEEDBACK = (X'4C',X'00',X'8002') MVS2 12134 01:17:32.40 STC35551 0281 DWO575I RMTCMD TERMINATED ON CSNET.MVS01 WITH SENSE: X'08A80012' MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD ALLOC FAILED, LUNAME = MVS01, QUALIFY = X'1F', FEEDBACK = (X'04',X'00',X'087D0001') MVS2 12134 01:17:32.44 STC35551 0290 IEA631I OPERATOR AUTO12 NOW INACTIVE, SYSTEM=MVS2, LU=AUTO1 If anyone else has had this issue, I would appreciate your insight. Cheryl Meehan - - For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: EXCP count like SDSF
Look at ASCBIOSX and ASCBIOSC in the ASCB (IHAASCB) Rob Scott Lead Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Miklos Szigetvari Sent: 15 May 2012 19:24 To: IBM-MAIN@bama.ua.edu Subject: EXCP count like SDSF Hi Is it possible to find the actual EXCP count value in the address spac ? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Retiring after 43+ years with IBM
Frank, Congrats on your retirement. Wishing you all the happiest and best wishes Best regards, Scott ford www.identityforge.com On May 15, 2012, at 9:00 PM, Frank Yaeger yae...@us.ibm.com wrote: Just a note to let everyone know I'll be retiring at the end of this month (5/31/2012). I've been with IBM for 43+ years (plus a couple of summers in college) and I've enjoyed my career immensely. I've especially enjoyed being able to help people use the DFSORT/ICETOOL functions I developed, over many years, in new and interesting ways. Once I retire, I won't be posting solutions any more since I won't have access to a mainframe to test them, and I don't like posting untested solutions. I may lurk a bit or I may not. I'm looking forward to retirement, but I'll also miss this list. I'm happy to say that others on the DFSORT Team will continue to contribute. Thanks to everyone for giving me the chance to earn a living all these years doing something that was a lot of fun for me. Long live the mainframe, IBM, z/OS, DFSORT and ICETOOL! Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Compiled SYSTEM Rexx exec
Ed, What's the load library lrecl, blksize ? Just curious Scott ford www.identityforge.com On May 15, 2012, at 4:21 PM, Ed Mackmahon dropip...@gmail.com wrote: yes -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Netview Question
Cheryl, Did you review the SNA messages and codes, that's your fist step..sense 8002 is a resource not available, maybe a timing issue with the IPL ... Scott ford www.identityforge.com On May 14, 2012, at 12:21 PM, Meehan, Cheryl cmee...@cswg.com wrote: Greetings- We upgraded our operating system to z/os 1.11 last fall. We have IPL'd our Production System twice since then, and each time, we have caused our AUTO1 task to fail on our Test System. Last week, we IPL'd our test system, and the AUTO1 task dropped on our Production system. Once recovered, we IPL'd our Test system several more times, and never lost AUTO1. The messages that we are seeing are for our EE link between the two system to go down, ( as we are IPLing. . . . ) and then these Messages: MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD RECEIVE FAILED, LUNAME = MVS01, QUALIFY = X'11', FEEDBACK = (X'4C',X'00',X'8002') MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD SEND FAILED, LUNAME = MVS01, QUALIFY = X'07', FEEDBACK = (X'4C',X'00',X'8002') MVS2 12134 01:17:32.40 STC35551 0281 DWO575I RMTCMD TERMINATED ON CSNET.MVS01 WITH SENSE: X'08A80012' MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD ALLOC FAILED, LUNAME = MVS01, QUALIFY = X'1F', FEEDBACK = (X'04',X'00',X'087D0001') MVS2 12134 01:17:32.44 STC35551 0290 IEA631I OPERATOR AUTO12 NOW INACTIVE, SYSTEM=MVS2, LU=AUTO1 If anyone else has had this issue, I would appreciate your insight. Cheryl Meehan -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CSVEDIT using COBOL
Mansi, Please try to explain what your trying to do..it is not clear from you post Scott ford www.identityforge.com On May 14, 2012, at 12:15 AM, Mansi Kulkarni mansi.e...@gmail.com wrote: Hi, Sir can u tell me program of IEBEDIT utility in JCL.. Plz give all details of steps please... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Netview Question
Cheryl, Your IPL sequence on any of the LPARS havent changed ? New products ? Have seen sequence issues before , usually turned out to be timing... Scott ford www.identityforge.com On May 14, 2012, at 3:16 PM, Meehan, Cheryl cmee...@cswg.com wrote: Scott- The reason the resource is not available is because the system it is attached to is coming down. Which makes sense, because we're IPLing it. We have never had this issue prior to this version of the operating system. We do not believe we have any cross LPAR Tasks running that we have been able to find thus far. We plan to check next IPL for any cross netview sessions, and see if a disconnect is necessary, but it has never been required in the past. Cheryl -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Monday, May 14, 2012 1:36 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Netview Question Cheryl, Did you review the SNA messages and codes, that's your fist step..sense 8002 is a resource not available, maybe a timing issue with the IPL ... Scott ford www.identityforge.com On May 14, 2012, at 12:21 PM, Meehan, Cheryl cmee...@cswg.com wrote: Greetings- We upgraded our operating system to z/os 1.11 last fall. We have IPL'd our Production System twice since then, and each time, we have caused our AUTO1 task to fail on our Test System. Last week, we IPL'd our test system, and the AUTO1 task dropped on our Production system. Once recovered, we IPL'd our Test system several more times, and never lost AUTO1. The messages that we are seeing are for our EE link between the two system to go down, ( as we are IPLing. . . . ) and then these Messages: MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD RECEIVE FAILED, LUNAME = MVS01, QUALIFY = X'11', FEEDBACK = (X'4C',X'00',X'8002') MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD SEND FAILED, LUNAME = MVS01, QUALIFY = X'07', FEEDBACK = (X'4C',X'00',X'8002') MVS2 12134 01:17:32.40 STC35551 0281 DWO575I RMTCMD TERMINATED ON CSNET.MVS01 WITH SENSE: X'08A80012' MVS2 12134 01:17:32.40 STC35551 0281 DSI769I MVS02 RPL_EXIT APPCCMD ALLOC FAILED, LUNAME = MVS01, QUALIFY = X'1F', FEEDBACK = (X'04',X'00',X'087D0001') MVS2 12134 01:17:32.44 STC35551 0290 IEA631I OPERATOR AUTO12 NOW INACTIVE, SYSTEM=MVS2, LU=AUTO1 If anyone else has had this issue, I would appreciate your insight. Cheryl Meehan -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Confused on DFSORT SORTWK
Why would I be forced to code DSNTYPE=LARGE, rather than using the WRKSEC=Y parameter in SORTCNTL along with //SORTWKnn DDs with secondary allocation specified? I am also curious about the SEC=nn parameter, as well. For my interests, I have chosen DSNTYPE=LARGE, however one still must remember the 16 extent per volume limitation, so it's oh so important to code a sufficiently large enough secondary amount (and/or primary as well) so that a one-volume allocation can even exceed the 65K track limitation and still be within 16 extents. Scott Barry SBBWorks, Inc. On Tue, 1 May 2012 15:52:41 -0400, David Betten bet...@us.ibm.com wrote: Just to clarify, DFSORT can cetrainly use more than the 1st extent, it just can't use multiple volumes. As long as DSNTYPE=LARGE is coded on the DD statement, each of the SORTWK DDs should be able to use multiple extents. Since a 3390-9 has a capacity of 10,017 cylinders, you should be able to get 3 extents of 3335 cylinders on each work data set if the volumes are empty. From: Neil Duffee nduf...@uottawa.ca To: IBM-MAIN@bama.ua.edu, Date: 05/01/2012 03:14 PM Subject: Re: Confused on DFSORT SORTWK Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu In addition to all the other responses you got regarding DynAlloc, I wanted to add the nudge that DFSORT only uses the **1st** extent in SortWk DD statements. Thus, SPACE=(CYL,(3335,3335)) is the same as SPACE=(CYL,3335) which, in your example, only got you 10*'3335 cylinders or the equivalent to 10 mod-3s. So you'd need to have 27 DD statements to use your entire pool. signature = 6 lines follows Neil Duffee, Joe Sysprog, uOttawa, 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 -Original Message- From: Mark Pace [mailto:pacemainl...@gmail.com] Sent: April 27, 2012 08:43 Subject: Confused on DFSORT SORTWK Trying to sort a fairly large RMF data file. 20,000 + cylinders. I keep running out of SORTWK space. I have 9 3390-9 volumes in my SMS temporary storage pool. But I just noticed that no matter how many SORTWKxx DDs I add it only allocates file on the first 5 temp storage volumes. Anyone have an idea how I make DFSORT use more volumes? //SORTWK01 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(3335,3335)) [snip] ICE046A E SORT CAPACITY EXCEEDED - RECORD COUNT 2459859 [snip] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN Have a nice day, Dave Betten DFSORT Development, Performance Lead IBM Corporation email: bet...@us.ibm.com 1-301-240-3809 DFSORT/MVSontheweb at http://www.ibm.com/storage/dfsort/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modern users of old tech
Sure is, but think about a lot of banking, in fact almost all of, we have a ton of bank customers, Rely on IBM Mainframes..I am multi platform , I enjoy all of them Scott ford www.identityforge.com On May 11, 2012, at 9:57 AM, John Gilmore johnwgilmore0...@gmail.com wrote: Masochism? A latent death wish? I think not. These examples are variants of the If it ain't broke, don't fix it refrain that we often hear here. Heavy, inappropriate use of obsolete or at best obsolescent technology is one of the identifying characteristics of mainframe shops. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IEW4005I FETCH FOR MODULE Failed
Lim, A couple of questions, who's module ? IBM ? Other ? Has this program ever worked before ? If so, what changed ? Scott ford www.identityforge.com On May 11, 2012, at 11:31 PM, Lim Ming Liang limm...@unifi.my wrote: Hi, I had quite a few similar error messages on load modules fetching problem on a same volume; DSINIT FROM DDNAME STEPLIB FAILED BECAUSE IEWFETCH ISSUED RC 0D AND REASON 00 On the System Messages manual; IEW4005I FETCH FOR MODULE program-name FROM DDNAME ddname FAILED BECAUSE IEWFETCH ISSUED RC return-code AND REASON reason code. Explanation: Fetch for the load module failed. The possible hexadecimal return codes and hexadecimal reason codes are as follows: Return Code Error Description 00 Processing completed normally. 0B Program check. 0C Not enough storage available. Reason Code Error Description 04 No storage for DATD 08 No storage for DEB 0C No storage for IOSB 10 No storage for EXTLIST 14 No storage for module *0D ** Bad record area. *What does this Bad record area means ? Does it mean the affected volume has an hardware issue ? What utility I can used to check the volume integrity ? The load modules library is corrupted ? But I can browse the Load dataset and members without any problem. Please advise. -- Regards Lim ML -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Comments on DFSMS verbose messages?
Ed, We do it with a debug=y or n, n= no messages unless a failure occurs, y= yes gives you verbose Scott ford www.identityforge.com On May 12, 2012, at 12:18 AM, Ed Finnell efinnel...@aol.com wrote: . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modern users of old tech
An 083 for the living room, great conversation piece Scott ford www.identityforge.com On May 10, 2012, at 6:21 PM, William Donzelli wdonze...@gmail.com wrote: And the owner of the last blank punch card supplied died and the company closed up. So of course, I bought 100,000 cards, just in case. Actually, I have been helping the widow a little to close up shop for good. Anyone need an 083, cheap? She has two. Great for the family room or office. -- Will -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: It's feeding time in Jurassic Park . . .
Excellent explanation, John Scott ford www.identityforge.com On May 9, 2012, at 8:05 AM, McKown, John john.mck...@healthmarkets.com wrote: Not all .NET runs on Mono. Mono is reverse engineered and so may not implement everything 100% like Microsoft does. Also, it tends to lag .NET because it cannot implement the .NET functionality until after Microsoft has documented it. And, like IBM and z/OS, there may be some parts of .NET which are not publically documented but are used by those who can afford to license the information for a competitive advantage. Well written (is there such?) C/C++ code could likely be ported to z/Linux. Of course, z/Linux and Solaris are different, so they speak a similar but different language. Like a drunken Cockney talking to a drunken Texan, they both thing they're speaking English, but the meaning is likely to be quite different. Eh? -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of George Henke Sent: Tuesday, May 08, 2012 6:02 PM To: IBM-MAIN@bama.ua.edu Subject: Re: It's feeding time in Jurassic Park . . . John, Thank you for the tip about MONO. It appears that with MONO, .NET applications can be run under zLinux, zVM. This would be preferable to x86 zBx, because the CHPID, not the IFL, does the I/O, more bang for the buck. Why would I NOT port all .NET to zLinux instead of x86 zBx? If so, what does that leave to run on zBx x86, other than some C/C++ code? On Fri, May 4, 2012 at 2:39 PM, McKown, John john.mck...@healthmarkets.comwrote: -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of George Henke Sent: Friday, May 04, 2012 1:02 PM To: IBM-MAIN@bama.ua.edu Subject: It's feeding time in Jurassic Park . . . and the dinosaurs are very hungry. I need to migrate 50 Solaris servers to zLinux under z/VM on a z114 and about the same number of Windows servers to zBx. Congrats! Does anyone have experience with this, some ideas? Experience, no. Ideas, sure! Why not? grin Need a migration path. Some questions: Can z114 be upgraded to include zBx or must I upgrade to a z196 for that? I am not sure. Can zBx be SYSPLEXed between 2 CECs? No. a zBx can be attached to at most 1 CEC. If not, how do I eliminate the SPF, how do I do failover for the blade servers? SPF? Single point of failure? You need to have multiple z114s with and associated zBX. I think you'd do failover just like you would with any other racked mounted servers. If the rack fails, all the servers fail. So you need the same techniques with a zBX rack. I'm not a PC person, but I think this involves TCP connections between a server and it's failover twin. How do I convert Solaris to zLInux under z/VM? Solaris is not supported by zBx. Must I recompile the applications running under Solaris to run them under zLinux? Yes, you must recompile. z/Linux runs on the z/Architecture instruction set. Solaris runs on Intel or SPARC(?). You can't run Intel or SPARC instructions on a z. However there are two exceptions that I can think of which __may__ not need recompilation. The first is Java code. The .jar and .class files should run on any compatible JVM, regardless of the underlying hardware architecture. Another possibility is .NET applications. They __might__ run on a z/Linux using Mono. Again, because they don't run native, but on an instruction emulator. Shell scripts may need some changing. Perl, Python, Ruby and other intepreted language may need some changing, depending on the levels of the intepreter on z/Linux versus the one on Solaris. -- George Henke (C) 845 401 5614 I wish we were doing something like this. But we're z/OS only and IT management would like to go MS-Windows only. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary
Re: IDC21809I FAILURE ATTEMPTING TO WRITE D-TYPE RECORD
Willie: I would suggest if you havent all ready looking at this IEC message IEC331I 050-096(,M2BRS1),IF00DCOL,DATASET,VMMC,IGG0CLE2 --- IEC331I rc-crs[sfierror],jjj, sss,proc[func],mmm VOL,ser,NAME,dsname Explanation: An error condition was detected while processing a catalog management request directed to either a VSAM or an ICF catalog. See message IDC3009I for an explanation of the return and reason codes. Note: If rc-crs is 004-33 or 04-34, a VSAM catalog was OPENed. IBM support for VSAM catalogs will end January 1, 2000. This message is intended to help identify VSAM catalogs that are still in use. If you need to use a VSAM catalog after December 31, 1999, you must convert it to an ICF catalog. To do this, use facilities such as the IDCAMS CNVTCAT command. For more details on 004-33 and 004-34, see message IDC3009I. In the message text: rc The return code. crs The catalog reason code. sfierror Hexadecimal fullword of information that further describes the error; this information appears only if an invoked subfunction (SFI) detected the error. The meaning depends on the possible combinations of the return code and the reason code. jjj The job name. sss The step name. proc The name of the VSAM catalog management procedure that caused the message to be issued. (The name omits the IGGP prefix.) func Indicates that an error occurred during the VSAM catalog/ACB open process. mmm The name of the VSAM catalog management control section (CSECT) that detected the error condition. ser The volume serial number. dsname The data set name or component name. System action: The command is ended. Application Programmer Response: See programmer response for the specific return code and reason code in message IDC3009I. System programmer response: If the error recurs and the program is not in error, look at the messages in the job log for more information. Search problem reporting data bases for a fix for the problem. If no fix exists, contact the IBM Support Center. Provide the SYSOUT output for the job. Source: DFSMSdfp Routing Code: 2,11 Descriptor Code: 6 Regards, Scott J Ford Software Engineer http://www.identityforge.com From: willie bunter williebun...@yahoo.com To: IBM-MAIN@bama.ua.edu Sent: Monday, May 7, 2012 10:06 AM Subject: Re: IDC21809I FAILURE ATTEMPTING TO WRITE D-TYPE RECORD Richard, Here it is: Organization . . . : PS Record format . . . : VB Record length . . . : 340 Block size . . . . : 27998 1st extent cylinders: 5 Secondary cylinders : 5 Data set name type : SMS Compressible. . : NO Current Allocation Allocated cylinders : 45 Allocated extents . : 9 Current Utilization Used cylinders . . : 5 Used extents . . . : 1 The VVDS is okay for the 2 volumes mentiond. Could it be that the dsn has been corrupted? From: Richard Marchant richard.march...@shoden.co.za To: IBM-MAIN@bama.ua.edu Sent: Monday, May 7, 2012 9:52:02 AM Subject: Re: IDC21809I FAILURE ATTEMPTING TO WRITE D-TYPE RECORD Willie, What DCB info do you have for SMVS1.DCOLLECT.DATASETS.JOUR ?? I would suggest it be RECFM=VB LRECL=644 List the VTOCS on volumes PFX007 and PROD36 just check they are good, if not may be a rebuild of the INDEX VTOCs might help. Richard Marchant -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of willie bunter Sent: 07 May 2012 02:39 PM To: IBM-MAIN@bama.ua.edu Subject: Re: IDC21809I FAILURE ATTEMPTING TO WRITE D-TYPE RECORD Richard, Here is the JCL: //* //DATASET EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //OUTPUT DD DSN=SMVS1.DCOLLECT.DATASETS.JOUR,DISP=OLD //SYSIN DD * DCOLLECT OUTFILE(OUTPUT) VOLUMES(*) /* //* //VOLUME EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //OUTPUT DD DSN=TEMP,DISP=(NEW,PASS,DELETE), // UNIT=SYSDA,SPACE=(TRK,(1,1)), // DSORG=PS,RECFM=VB,LRECL=264 //SYSIN DD * DCOLLECT OUTFILE(OUTPUT) VOLUMES(*) NODATAINFO /* //* //INF0DCOL EXEC PGM=INF0DCOL,COND=(0,LT,VOLUME) //RECIN DD DSN=TEMP,DISP=(OLD,DELETE) //RECOUT DD DSN=SMVS1
Re: Kerneels ( was RE: It's feeding time in Jurassic Park . . .)
Rex, Amen brothers and sisters of the Mainframe Church .hes sounds like quack quack to me Scott J Ford Software Engineer http://www.identityforge.com From: Pommier, Rex R. rex.pomm...@cnasurety.com To: IBM-MAIN@bama.ua.edu Sent: Monday, May 7, 2012 10:50 AM Subject: Kerneels ( was RE: It's feeding time in Jurassic Park . . .) David, I think you hit the nail squarely on the head here. Kerneels De Wet sure looks like, sounds like, smells like, and walks like the duck that used to go by the name Anton Britz. And they both hated Fox channel with a passion, and both bring their hatred into completely unrelated topics (like IBM-main discussions on zBX). Looks like another outlook rule to send e-mails directly to the trash... Rex -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jousma, David Sent: Monday, May 07, 2012 8:30 AM To: IBM-MAIN@bama.ua.edu Subject: Re: It's feeding time in Jurassic Park . . . Anton Britt software consultants perhaps? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tom Marchant Sent: Monday, May 07, 2012 9:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: It's feeding time in Jurassic Park . . . On Fri, 4 May 2012 14:12:48 -0500, Kerneels de Wet wrote: No disrespect but this looks a little like I disagree. This post and your later one are quite disrespectful. This is a technical forum with which you may be unfamiliar. AFAICT, you have posted exactly twice to IBM-MAIN, both of them in this thread with no apparent purpose than to attack George. George is a familiar name here. While I do not recall any of the previous threads with which he was involved or the level of his involvement, he has started an interesting and worthwhile discussion. You, on the other hand have contributed nothing. Rather, you have detracted from this forum. b) You use a nameless email account PKB. You use a nameless email account with no identifying information. Of course, to do so is your right, but why do you make an issue of it? ABSOFTWARECONSULTANTS.COM is an empty web site, apparently registered with ICANN anonymously four years ago. c) The SHARE grease monkeys immediately respond More insults. Apparently you don't have a clue what SHARE is. I would suggest that you refrain from posting until you learn some basic netiquette. -- Tom Marchant The information contained in this e-mail may contain confidential and/or privileged information and is intended for the sole use of the intended recipient. If you are not the intended recipient, you are hereby notified that any unauthorized use, disclosure, distribution or copying of this communication is strictly prohibited and that you will be held responsible for any such unauthorized activity, including liability for any resulting damages. As appropriate, such incident(s) may also be reported to law enforcement. If you received this e-mail in error, please reply to sender and destroy or delete the message and any attachments. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Kerneels ( was RE: It's feeding time in Jurassic Park . . .)
Ty Ron, sorry dont get this guy Scott ford www.identityforge.com On May 7, 2012, at 10:16 PM, Ron Hawkins ronjhawk...@sbcglobal.net wrote: Yeah, he confirmed he is Anton in an off-list response to me. He signed off Kerneels/Anton/GrandMa/Helpdesk but he has also used Mohammed. Seems some people take offense at his posts and pass them on to people he would prefer never see them. Ipso facto the name changes. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mitch Sent: Monday, May 07, 2012 1:23 PM To: IBM-MAIN@bama.ua.edu Subject: Re: [IBM-MAIN] Kerneels ( was RE: It's feeding time in Jurassic Park . . .) Everyone: It is one and the same. He also goes by Helpdesk. Just ignore him. I have him (and all his email addresses) as SPAM, so I no longer have to listen to his drivel. Mitch -Original Message- From: Scott Ford scott_j_f...@yahoo.com To: IBM-MAIN IBM-MAIN@bama.ua.edu Sent: Mon, May 7, 2012 1:10 pm Subject: Re: Kerneels ( was RE: It's feeding time in Jurassic Park . . .) Rex, Amen brothers and sisters of the Mainframe Church .hes sounds like quack quack to me Scott J Ford Software Engineer http://www.identityforge.com From: Pommier, Rex R. rex.pomm...@cnasurety.com To: IBM-MAIN@bama.ua.edu Sent: Monday, May 7, 2012 10:50 AM Subject: Kerneels ( was RE: It's feeding time in Jurassic Park . . .) David, I think you hit the nail squarely on the head here. Kerneels De Wet sure looks like, sounds like, smells like, and walks like the duck that used to go by the name Anton Britz. And they both hated Fox channel with a passion, and both bring their hatred into completely unrelated topics (like IBM-main discussions on zBX). Looks like another outlook rule to send e-mails directly to the trash... Rex -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jousma, David Sent: Monday, May 07, 2012 8:30 AM To: IBM-MAIN@bama.ua.edu Subject: Re: It's feeding time in Jurassic Park . . . Anton Britt software consultants perhaps? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tom Marchant Sent: Monday, May 07, 2012 9:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: It's feeding time in Jurassic Park . . . On Fri, 4 May 2012 14:12:48 -0500, Kerneels de Wet wrote: No disrespect but this looks a little like I disagree. This post and your later one are quite disrespectful. This is a technical forum with which you may be unfamiliar. AFAICT, you have posted exactly twice to IBM-MAIN, both of them in this thread with no apparent purpose than to attack George. George is a familiar name here. While I do not recall any of the previous threads with which he was involved or the level of his involvement, he has started an interesting and worthwhile discussion. You, on the other hand have contributed nothing. Rather, you have detracted from this forum. b) You use a nameless email account PKB. You use a nameless email account with no identifying information. Of course, to do so is your right, but why do you make an issue of it? ABSOFTWARECONSULTANTS.COM is an empty web site, apparently registered with ICANN anonymously four years ago. c) The SHARE grease monkeys immediately respond More insults. Apparently you don't have a clue what SHARE is. I would suggest that you refrain from posting until you learn some basic netiquette. -- Tom Marchant The information contained in this e-mail may contain confidential and/or privileged information and is intended for the sole use of the intended recipient. If you are not the intended recipient, you are hereby notified that any unauthorized use, disclosure, distribution or copying of this communication is strictly prohibited and that you will be held responsible for any such unauthorized activity, including liability for any resulting damages. As appropriate, such incident(s) may also be reported to law enforcement. If you received this e-mail in error, please reply to sender and destroy or delete the message and any attachments. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Any simple tool to monitor the storage uasge ?
The MXI 4.3 freeware product comes with a REXX interface - it returns the information that would have been presented on the screen as a set of REXX stem variables for each logical line. The commercial version of MXI has an enhanced REXX API where you can directly access each column variable without having to parse the screen line. Rob Scott Lead Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Miklos Szigetvari Sent: 04 May 2012 11:35 To: IBM-MAIN@bama.ua.edu Subject: Any simple tool to monitor the storage uasge ? Hi Any simple tool, to monitor the storage usage of an address space ? I'm using now the MXI from Rob Scott, and it is very good, but I would need something like a function call to get this in a program or in REXX -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Any simple tool to monitor the storage uasge ?
The VSMLIST service presents this information in a slightly more digestible form and it will also get the appropriate locks for the caller if you use LINKAGE=SYSTEM It is what MXI uses under the covers for reporting on private or common subpool usage. Rob Scott Lead Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bernd Oppolzer Sent: 04 May 2012 13:00 To: IBM-MAIN@bama.ua.edu Subject: Re: Any simple tool to monitor the storage uasge ? Maybe you could write a function that reads the control blocks of the z/OS storage management queues and computes the overall size of the used storage blocks, per subpool? If you call this function somewhere in a loop in your main program, you could discover if one of your subroutines allocates memory and doesn't free it. See SPQE, DQE and FQE control blocks. Kind regards Bernd Am 04.05.2012 13:25, schrieb Miklos Szigetvari: Hi Thank you, I will try out with REXX and stem. I would need something , shows the running address space memory usage in some time intervals. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: It's feeding time in Jurassic Park . . .
George, Done a lot of migrations never Solaris to Z/vm and z/Linux...amen..we Dino's are now smiling, victory...one thought, anyone done disk or cycle benchmarks ? Or is this a slam dunk, been there too, but one needs to plan..not sure what the total picture of your situation is... But congrats on the victory Scott Ford Senior Systems Engineer www.identityforge.com On May 4, 2012, at 3:46 PM, George Henke gahe...@gmail.com wrote: I do not suppose there is any way of sharing a zBx between 2 CECs. On Fri, May 4, 2012 at 3:14 PM, Mark Post mp...@suse.com wrote: On 5/4/2012 at 02:55 PM, George Henke gahe...@gmail.com wrote: Do I need an Enterprise Class z114 box or will a Business Class one suffice? There are no such things. IBM marketing confusing things again. A z114 could be considered the equivalent of a BC model and the z196 and EC model. Mark Post -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- George Henke (C) 845 401 5614 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: It's feeding time in Jurassic Park . . .
Aren't we here to help colleagues who need the help and assistance ? I understand there's a fine line between eloping and be used bad abused ..been there done that haver numerous tshirts Scott Ford Senior Systems Engineer www.identityforge.com On May 4, 2012, at 3:12 PM, Kerneels de Wet kerne...@absoftwareconsultants.com wrote: No disrespect but this looks a little like what the Fox channel dishes up for us on a daily basis: a) You post a message on IBMMAIN stating that you are starting a project but have no idea how to do it b) You use a nameless email account with a cellphone number listed as Poughkeepsie , NY c) The SHARE grease monkeys immediately respond with YOU are doing what ? You need to come talk to us d) The Health Care BIG spender responds with My management wants to go the other way Note: If it smells like a duck, quacks like a duck, looks like a duck, and walks like a duck...it should be on the FOX channel Kerneels -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: It's feeding time in Jurassic Park . . .
Yeah Dave, I also think a lot of managers , who lack technical expertise get sold ideas, like someone else said. Been there also...about 100 Advil headache ...I was told by a very wise Irish woman, my mom, don't use your head for a hat rack... Scott Ford Senior Systems Engineer www.identityforge.com On May 4, 2012, at 4:39 PM, Gibney, Dave gib...@wsu.edu wrote: The wisdom of Anton (Kerneels here) is generally well mixed in with much that is superfluous to the actual conversation. Dave Gibney Information Technology Services Washington State University -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Friday, May 04, 2012 1:35 PM To: IBM-MAIN@bama.ua.edu Subject: Re: It's feeding time in Jurassic Park . . . Aren't we here to help colleagues who need the help and assistance ? I understand there's a fine line between eloping and be used bad abused ..been there done that haver numerous tshirts Scott Ford Senior Systems Engineer www.identityforge.com On May 4, 2012, at 3:12 PM, Kerneels de Wet kerne...@absoftwareconsultants.com wrote: No disrespect but this looks a little like what the Fox channel dishes up for us on a daily basis: a) You post a message on IBMMAIN stating that you are starting a project but have no idea how to do it b) You use a nameless email account with a cellphone number listed as Poughkeepsie , NY c) The SHARE grease monkeys immediately respond with YOU are doing what ? You need to come talk to us d) The Health Care BIG spender responds with My management wants to go the other way Note: If it smells like a duck, quacks like a duck, looks like a duck, and walks like a duck...it should be on the FOX channel Kerneels -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Programming languages can't have copyright protection, EU court rules
Charles, Yeh I know, had uncles in construction business, had patents on tools...we all can't be Nathan Myhrvold and be worth $650 million..man be interesting Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 9:47 AM, Charles Mills charl...@mcn.org wrote: If you think patents are easy to get you should try applying for one. I have. Seriously, whatever one's criticisms of the USPTO, it is indisputable that patents are a lot harder to get than copyright. Copyright is trivial. You write something, you fix it in a tangible medium (which includes, by statute, keying it into a text editor) and voila! you own the copyright on it. That's it! Patents involve applications, years, at least a plausible claim of novelty and usefulness, and non-trivial fees. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Shmuel Metz (Seymour J.) Sent: Thursday, May 03, 2012 6:18 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules In 14d901cd2887$312cfba0$9386f2e0$@mcn.org, on 05/02/2012 at 10:15 AM, Charles Mills charl...@mcn.org said: Patents are very hard to get Would that that were true. USPTO fails to exclude patents that should be invalid due to, e.g., prior art. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Programming languages can't have copyright protection, EU court rules
Correct me if I am wrong, but isn't this about Google imbedding java in their operating system on phones ? Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 11:56 AM, Charles Mills charl...@mcn.org wrote: I always bristle at the use of the word copyright as a verb (all of the dictionaries do support the verb form) and try never to use it that way myself, although it is easy to slip. Historically, perhaps you could copyright something, as John's Shakespeare perhaps did. Now, in the US and most nations (Berne convention) copyright is a noun that inures automatically to authors upon fixing the work in a tangible form. You can't copyright (verb) something. You either own the copyright (noun) or you do not. The work is copyright (adjective) or it is not. You can (optionally) REGISTER the copyright with the Library of Congress, but that's a different matter. Not to argue in the least with the substance of John's post ... Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Gilmore Sent: Thursday, May 03, 2012 7:17 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules Charles Mills has made the operative distinction very clear, but let me try another analogy. Think of yourself, briefly, as Shakespeare. You have written Sonnet XXX, When to the sessions of sweet silent thought I sigh the lack of many a thing I sought. Then can I . . . . . . You, Shakespeare, may copyright this sonnet, its specific content. You may not copyright the fourteen-line sonnet form and its rhyming scheme. Instances of a schema are copyrightable and protectable. The schema itself is not. You may, that is, protect yourself against the misappropriation of a sonnet that you write. You may not interdict the writing of [non-duplicative] sonnets by others. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Programming languages can't have copyright protection, EU court rules
John, Thanks for the explanation, we deal our product also through Oracle, strictly between you and me, we are taking a serious screwing financially, plus the manuals done in India ...man Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 1:48 PM, McKown, John john.mck...@healthmarkets.com wrote: Basically, yes. Except that the Android system is not an OS. It is like a JVM (only not really) in that the OS running on the phone is actually Linux. Android does not use Java byte code. Java compiles to a universal byte code (instruction set) sequence. The JVM (Java Virtual Machine) interprets the byte code and executes it (ignoring the JIT compiler in most JVMs and the weird way that the i does it). JVM is stack based, not register based. Development for Android (which is not in the new native mode) is done in Java. This produces a normal Java .class output file. But this cannot be run directly on Android. There is another program which takes the Java byte code and converts it to Dalvik byte code. The Dalvik byte code is then loaded onto the Android system (usually a phone or a tablet at present) and is interpreted by the Dalvik interpreter on the phone/tablet. So what Google has done is implement a system (Android) which has a subroutine library for use by the Dalvik virtual machine. And this subroutine library presents the same API as the Java API. Oracle says this is copying. But, to me, it would be like writing C++ code to create a C++ callable native library which has functions in it which implement the Java API. It's not Java. It's not copied source code. It is simply a library with functions in it that echo the functions in the Java system. That is, you could tell the C++ programmer to just read the Java library documentation (freely viewable via the Web on an Oracle maintained site) to use you library for C++. And Oracle says that is a violation of their copyright. Or, if you prefer, it would be like having a Java source code to C++ source code converter and an Java-compatible C++ library which was not licensed by Oracle. Again, this would, according to Oracle, violate their copyright to Java. I used to be indifferent towards Oracle. I now have yet another vendor that I despise. And we are in the process of eliminating them due to costs. Or course the fact that we are converting to MS-SQL Server is not exactly pleasing to me. Many in the FOSS arena are joking that Google's motto may be Never do evil, but Oracle's is Only do evil. But this was over Sun's OpenOffice which Oracle acquired with Sun and tried to make proprietary. OpenOffice has been forked, which is legal because it was GPL licensed by Sun, and most Linux users have converted to LibreOffice. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Thursday, May 03, 2012 11:59 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules Correct me if I am wrong, but isn't this about Google imbedding java in their operating system on phones ? Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 11:56 AM, Charles Mills charl...@mcn.org wrote: I always bristle at the use of the word copyright as a verb (all of the dictionaries do support the verb form) and try never to use it that way myself, although it is easy to slip. Historically, perhaps you could copyright something, as John's Shakespeare perhaps did. Now, in the US and most nations (Berne convention) copyright is a noun that inures automatically to authors upon fixing the work in a tangible form. You can't copyright (verb) something. You either own the copyright (noun) or you do not. The work is copyright (adjective) or it is not. You can (optionally) REGISTER the copyright with the Library of Congress, but that's a different matter. Not to argue in the least with the substance of John's post ... Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Gilmore Sent: Thursday
Re: Programming languages can't have copyright protection, EU court rules
Guys, I don't hate Oracle, far from it, most of our customers about 99% are great and helpful.. I don't understand some business nowadays Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 1:48 PM, McKown, John john.mck...@healthmarkets.com wrote: Basically, yes. Except that the Android system is not an OS. It is like a JVM (only not really) in that the OS running on the phone is actually Linux. Android does not use Java byte code. Java compiles to a universal byte code (instruction set) sequence. The JVM (Java Virtual Machine) interprets the byte code and executes it (ignoring the JIT compiler in most JVMs and the weird way that the i does it). JVM is stack based, not register based. Development for Android (which is not in the new native mode) is done in Java. This produces a normal Java .class output file. But this cannot be run directly on Android. There is another program which takes the Java byte code and converts it to Dalvik byte code. The Dalvik byte code is then loaded onto the Android system (usually a phone or a tablet at present) and is interpreted by the Dalvik interpreter on the phone/tablet. So what Google has done is implement a system (Android) which has a subroutine library for use by the Dalvik virtual machine. And this subroutine library presents the same API as the Java API. Oracle says this is copying. But, to me, it would be like writing C++ code to create a C++ callable native library which has functions in it which implement the Java API. It's not Java. It's not copied source code. It is simply a library with functions in it that echo the functions in the Java system. That is, you could tell the C++ programmer to just read the Java library documentation (freely viewable via the Web on an Oracle maintained site) to use you library for C++. And Oracle says that is a violation of their copyright. Or, if you prefer, it would be like having a Java source code to C++ source code converter and an Java-compatible C++ library which was not licensed by Oracle. Again, this would, according to Oracle, violate their copyright to Java. I used to be indifferent towards Oracle. I now have yet another vendor that I despise. And we are in the process of eliminating them due to costs. Or course the fact that we are converting to MS-SQL Server is not exactly pleasing to me. Many in the FOSS arena are joking that Google's motto may be Never do evil, but Oracle's is Only do evil. But this was over Sun's OpenOffice which Oracle acquired with Sun and tried to make proprietary. OpenOffice has been forked, which is legal because it was GPL licensed by Sun, and most Linux users have converted to LibreOffice. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Scott Ford Sent: Thursday, May 03, 2012 11:59 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules Correct me if I am wrong, but isn't this about Google imbedding java in their operating system on phones ? Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 11:56 AM, Charles Mills charl...@mcn.org wrote: I always bristle at the use of the word copyright as a verb (all of the dictionaries do support the verb form) and try never to use it that way myself, although it is easy to slip. Historically, perhaps you could copyright something, as John's Shakespeare perhaps did. Now, in the US and most nations (Berne convention) copyright is a noun that inures automatically to authors upon fixing the work in a tangible form. You can't copyright (verb) something. You either own the copyright (noun) or you do not. The work is copyright (adjective) or it is not. You can (optionally) REGISTER the copyright with the Library of Congress, but that's a different matter. Not to argue in the least with the substance of John's post ... Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Gilmore Sent: Thursday, May 03, 2012 7:17 AM To: IBM-MAIN@bama.ua.edu
Re: zOS under zVM
Mark, Are you going to a hosting DR recovery site , I.e.; Sungard .. If so, they also usually are pretty good to help out.. Scott Ford Senior Systems Engineer www.identityforge.com On May 2, 2012, at 9:46 AM, Mark Jacobs mark.jac...@custserv.com wrote: We don't, yet. It's only used for XCF sysplex partitioning activities. I'll keep it in mind, but I'm not going to worry about it for a DR test. Mark Jacobs From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] on behalf of Gary DiPillo [gdipi...@axiosproducts.com] Sent: Wednesday, May 02, 2012 9:34 AM To: IBM-MAIN@bama.ua.edu Subject: Re: zOS under zVM I did not see this mentioned, but, if you use BCPII, it will not be available in your Guest: HWI010I BCPII DOES NOT OPERATE ON A VM GUEST. BCPII INITIALIZATION IS HALTED. If you use BCPII for critical processes you may need a rethink. Thanks for confirming my own research on the subject. Regards, Mark Jacobs From: IBM Mainframe Discussion List [IBM-MAIN@bama.ua.edu] on behalf of Mary Anne Matyaz [maryanne4...@gmail.com] Sent: Wednesday, May 02, 2012 9:07 AM To: IBM-MAIN@bama.ua.edu Subject: Re: zOS under zVM Mark, Here's my doc on the subject... Mary Anne Differences b/w running native LPAR and running as a z/VM guest In a single system: The only issue I’m aware of is some strangeness with your performance monitors. In a SYSPLEX: --A new CFRM policy is required, specifying SIMDEV for the coupling facility: CF NAME(CFCC1 TYPE(SIMDEV) MFG(IBM) PLANT(EN) SEQUENCE(000CFCC1) PARTITION(0) CPCID(00) DUMPSPACE(2000) Type Number (TYPE) - SIMDEV specifies that this is a z/VM simulated message device type. Manufacturer (MFG) - IBM® indicates IBM as the manufacturer. Plant (PLANT) - EN indicates Endicott as the manufacturing plant. Sequence # (SEQUENCE) - The 12-byte field will contain the CF Service Machine user IDright justified. Pad all leading unused characters with EBCDIC zeros. For example, if a CF Service Machine of CFCC1 is specified, SEQUENCE is 000CFCC1. Your DR provider may have a different CF name. --A different CLOCKxx member may be needed specifying SIMETRID: TIMEZONE W.04.00.00 ETRMODE YES ETRDELTA 10 ETRZONE YES SIMETRID 00 --Possible CFSizing needed: If you are on a processor that has a lower level of CF Code, you may need to resize your structures. For example, if your DR provider has a z10 (CFLEVEL 16) and you are running on a z9 (CFLEVEL 15), you may need to increase the storage size of the CF. It's been many, many years since we've run our sysplex under zVM. Our next DR exercise will be hosted in a VM environment and I'm looking for any environmental setup concerns that I need to consider. I know that we'll have to change LOADxx, but I'm unsure about anything else. Any advice on what I have to do would be greatly appreciated. Mark Jacobs Time Customer Service -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Programming languages can't have copyright protection, EU court rules
All, So how do you protect code, whatever language you have written in , in business ? Without copyright, doesn't it imply , people can take you source and change it and resell it ...if the gave your source , right ? Scott Ford Senior Systems Engineer www.identityforge.com On May 2, 2012, at 1:49 PM, Charles Mills charl...@mcn.org wrote: Can one replicate the 'look and feel' without copyright issues in the EU now? I might add that look and feel might be subject to copyright protection. Copyright, again, protects *expression.* If I wrote a z/OS system monitor that cleverly displayed the status of started tasks as bouncing balls of various sizes and colors, that expression might be subject to copyright, but the function of displaying the status of started tasks graphically would not. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Charles Mills Sent: Wednesday, May 02, 2012 10:16 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules Lots of confusion here. 1. US and EU are of course different. Laws and precedents don't matter much from one to the other. 2. Copyright in the US has never protected programming language specifications, etc. Google Lotus v. Borland, the seminal case, which went all the way to SCOTUS. 3. Copyright and Patent are way different. Copyright is trivially easy to get and protects expression: think of poetry. Copyright protects a particular COBOL manual and compiler source code but not the concepts and functions of COBOL. Patents are very hard to get and protect function. This decision has no relationship to patents (except that it reaffirms that copyright does not protect the things that only a patent would protect). 4. Intellectual Property is the name of the kind of stuff copyrights and patents protect. It is not a form of protection of its own. Personal property is not a form of protection, but personal property is protected by theft laws. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Hal Merritt Sent: Wednesday, May 02, 2012 10:01 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules I'm not a lawyer and don't pretend to understand the ramifications, but this sounds huge. The result is that the court finds that ideas and principles which underlie any element of a computer program are not protected by copyright under that directive, only the expression of those ideas and principles. What does the above really mean? Can one replicate the 'look and feel' without copyright issues in the EU now? In the US, there is the concept of 'intellectual property' that seems to protect ideas from theft. Does that now mean open season in the EU? Or am I confusing copyright with patents? Granted, I currently think that the US patent system is broken, but this seems a bit of an over kill. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Programming languages can't have copyright protection, EU court rules
Charles, Functionality of the language ? Not being dense, but you functionally what the programming language does in the app or functionally what it does, I.e.; read files ,write files, etc.. Scott Ford Senior Systems Engineer www.identityforge.com On May 3, 2012, at 12:15 AM, Charles Mills charl...@mcn.org wrote: Right. If you wrote a COBOL compiler, you could protect your compiler code under copyright, you could protect your manual, you could protect the layout of your interactive debugger screens. But you can't protect the functionality of the language. I can write my own COBOL compiler, manual, and interactive debugger. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mike Schwab Sent: Wednesday, May 02, 2012 8:19 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Programming languages can't have copyright protection, EU court rules This is not the code. This is the language specification. Someone could write their own version of your product. Then users could buy their application instead of yours and run their programs. On Wed, May 2, 2012 at 9:33 PM, Scott Ford scott_j_f...@yahoo.com wrote: All, So how do you protect code, whatever language you have written in , in business ? Without copyright, doesn't it imply , people can take you source and change it and resell it ...if the gave your source , right ? Scott Ford Senior Systems Engineer www.identityforge.com On May 2, 2012, at 1:49 PM, Charles Mills charl...@mcn.org wrote: Can one replicate the 'look and feel' without copyright issues in the EU now? I might add that look and feel might be subject to copyright protection. Copyright, again, protects *expression.* If I wrote a z/OS system monitor that cleverly displayed the status of started tasks as bouncing balls of various sizes and colors, that expression might be subject to copyright, but the function of displaying the status of started tasks graphically would not. Charles -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Strip column 1 from reports
Elardus, It's probably all ready been mentioned, a small rexx clist can do this also... Maybe 10 lines or so...also depends on what else you doing with the data, any formatting, etc... Hth Regards, Scott Ford Senior Systems Engineer www.identityforge.com On Apr 30, 2012, at 12:59 PM, Scott Ford scott_j_f...@yahoo.com wrote: Elardus, Wow, 3800 printers, I remember they forms and then you could over or insert you text data , e to into the form for printing..worked the awhile ago..10+ yrs my friend Scott Ford Senior Systems Engineer www.identityforge.com On Apr 30, 2012, at 12:27 PM, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote: Paul Gilmartin wrote: In the wider perspective, ASA carriage control was originally a form of presentational markup targeted at a class of output devices, impact printers, then preponderant, now dwindling. Markup, yes, this is the correct word in these times of markup languages. The ASA cc was indeed a type of markup where you say, put text here, start new page there, overwrite a line there and there. It reminds me of the type of first column (AFAIK) where you tell the 3800 laser printer to use this or that font on this or that line. Any greybeards remembering this 3800 toy? ;-D It would be chaotic to produce an instance of each report for each class of output device (printer, 3278, GUI display, etc.) Semantic markup is the necessary answer. It would likewise be chaotic to undertake conversion of each report generator to generate reports with semantic markup. A likely better place to do this is in a SYSOUT writer that filters ASA carriage control to a semantic markup language such as HTML, or perhaps XML. Agreed 100%. Is there such software [1] ? I'm aware of XML on /zOS, but can you use it on a SYSOUT? And it might be unreasonable to expect such a filter to generate proper markup for intended tabular material in reports. (Does XMITIP, for example, to this?) Interesting question! Thanks, I wonder what answer you will get? Thanks Paul for your kind comments. It is much appreciated! Groete / Greetings Elardus Engelbrecht [1] - It seemed to me that LRS/DRS can do this, but then, there is no actual printing in this case. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Strip column 1 from reports
Elardus, Wow, 3800 printers, I remember they forms and then you could over or insert you text data , e to into the form for printing..worked the awhile ago..10+ yrs my friend Scott Ford Senior Systems Engineer www.identityforge.com On Apr 30, 2012, at 12:27 PM, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote: Paul Gilmartin wrote: In the wider perspective, ASA carriage control was originally a form of presentational markup targeted at a class of output devices, impact printers, then preponderant, now dwindling. Markup, yes, this is the correct word in these times of markup languages. The ASA cc was indeed a type of markup where you say, put text here, start new page there, overwrite a line there and there. It reminds me of the type of first column (AFAIK) where you tell the 3800 laser printer to use this or that font on this or that line. Any greybeards remembering this 3800 toy? ;-D It would be chaotic to produce an instance of each report for each class of output device (printer, 3278, GUI display, etc.) Semantic markup is the necessary answer. It would likewise be chaotic to undertake conversion of each report generator to generate reports with semantic markup. A likely better place to do this is in a SYSOUT writer that filters ASA carriage control to a semantic markup language such as HTML, or perhaps XML. Agreed 100%. Is there such software [1] ? I'm aware of XML on /zOS, but can you use it on a SYSOUT? And it might be unreasonable to expect such a filter to generate proper markup for intended tabular material in reports. (Does XMITIP, for example, to this?) Interesting question! Thanks, I wonder what answer you will get? Thanks Paul for your kind comments. It is much appreciated! Groete / Greetings Elardus Engelbrecht [1] - It seemed to me that LRS/DRS can do this, but then, there is no actual printing in this case. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: SV: SV: Mainframe Skills Scarce? (z/OS Mainframe CA Product training ...)
Yep, I agree , trying to explain to manglers , aka managers , what a sysprog does and has to know...my old age is showing, 62 in August , some ppl just don't get what we do.. Scott Ford Senior Systems Engineer www.identityforge.com On Apr 27, 2012, at 5:14 AM, Thomas Berg thomas.b...@swedbank.se wrote: -Ursprungligt meddelande- Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] För R.S. Skickat: den 27 april 2012 11:04 Till: IBM-MAIN@bama.ua.edu Ämne: Re: SV: Mainframe Skills Scarce? (z/OS Mainframe CA Product training ...) W dniu 2012-04-27 10:35, Thomas Berg pisze: [...] If true, why are so many skilled mainframe professionals -- particularly sysprogs -- looking for work? IJS... - More skilled ones are to expensive They aren't. It's just that the hiring bosses think so because they are fixated at the view that non-management personals should be payed much less than management personals. In a rational world there wouldn't at the same time have people saying that it's hard to get skilled mainframe personal and have many skilled mainframe sysprogs looking for work (and not getting any). If you really need, e g, a skilled sysprog it's no problem to get one: just put some more money on the pay - and do a decent research to get the right person. But CIOs today isn't interested as they are constantly looking at the next step in their careers. Let me rephrase it: It is TYPICAL IN OUR WORLD. Is our world reasonable? Well... I think it's completely unreasonable that poor soccer player earns much more than prime minister or university professor. It's unreasonable to pay fortune for Madonna's brassiere. It's unreasonable that, for example some celebrity's divorce is a news of the day, and blue laser is completely ignored. However it's typical, so it's NORMAL. And it's (unfortunately) normal, that managers prefer young candidates. It's bad, stupid, illegal, but normal. We have met the enemy and he is us ? :) Regards, Thomas Berg __ Thomas Berg Specialist AM/DQS SWEDBANK AB (publ) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Check out Photos: April 27, 2011 Superoutbreak - weather.com
Hope your all right , man Scott Ford Senior Systems Engineer www.identityforge.com On Apr 27, 2012, at 3:21 PM, Ed Finnell efinnel...@aol.com wrote: _Photos: April 27, 2011 Superoutbreak - weather.com_ (http://www.weather.com/outlook/weather-news/news/articles/alabama-tornado-042711_2011-04-27) There's a ceremony at Coleman Coliseum at 5pm. Lots of dignitaries. It was a scary day with three waves coming thru. One to the north and one thru the middle and one to the south. When I first saw it I thought this is gonna hurt. But it made an eastward turn and missed UofA and my neighborhood. Guess the stats are pretty impressive raised the national average from 161 to 241 strikes per year. One of forecasters observing the damage said Imagine a half mile wide lawnmower on the ground for 160 miles. and it was just one of over 760 that stretch. People who've come thru after being away are just floored at how much and how extensive the damage was. Coming back but it's going to be long pull. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Check out Photos: April 27, 2011 Superoutbreak - weather.com
Ed, I grew up in Indiana seen a few tornados...they are definitely scary Scott Ford Senior Systems Engineer www.identityforge.com On Apr 27, 2012, at 5:17 PM, Ed Finnell efinnel...@aol.com wrote: This was last year. I just got sore from moving boxes and people around, one lady moved three times in two weeks. Anyway, elementary school where I started and surrounding neighborhoods were pancaked. Guess the emotional scares will be us long after the physical. In a message dated 4/27/2012 3:20:29 P.M. Central Daylight Time, scott_j_f...@yahoo.com writes: Hope your all right , man -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Have you ever done this using FTP?
Lot of ways to crack this one, FTP like everyone stated. Jes2 to jes2 using TCPIP, using NJE, TSO Xmit works great Scott Ford Senior Systems Engineer www.identityforge.com On Apr 26, 2012, at 7:44 PM, John McKown john.archie.mck...@gmail.com wrote: The SENDSITE command will help if the PDS needs to be created. On Apr 26, 2012 6:41 PM, retired mainframer retired-mainfra...@q.com wrote: If you specify EBCDIC and BLOCK and if the receiving PDS is already allocated, it will even transfer load modules and preserve the directory information. I think it will also preserve ISPF statistics. lcd local_pds cd remote_pds ebcdic block mget * (or mput if you are on the transmit system) :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of John Norgauer :: Sent: Thursday, April 26, 2012 3:02 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Have you ever done this using FTP? :: :: FTP a PDS from one Mainframe to another mainframe connected through :: TCPIP? :: :: If so how is it done? :: :: :: :: John Norgauer :: Senior Systems Programmer :: Mainframe Technical Support Services :: University of California Davis Medical Center :: 2315 Stockton Blvd :: ASB 1300 :: Sacramento, Ca 95817 :: 916-734-0536 :: :: SYSTEMS PROGRAMMING.. Guilty, until proven innocent !! JN :: 2004 :: :: Hardware eventually breaks - Software eventually works anon :: :: :: -- :: For IBM-MAIN subscribe / signoff / archive access instructions, :: send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
z/OS Mainframe CA Product training workshops coming up!
MAINFRAME SKILLS ARE BECOMING SCARCE!particularly Systems Programmers. We just wanted to let you know the following mainframe CA automation product classes are coming up both in our live Virtual Classroom, Pittsburgh and Toronto training centers. Attend either in-person (Pittsburgh/Toronto) or online from anywhere in the world and experience our expert Sr. Instructors and real-world mainframe lab environment. Cross-train your distributed systems staff and be prepared for the future! For more information on any of the courses dates below, please contact Harriette Matthews at 800-373-9188x131 or hmatth...@protechtraining.com. MVS JCL Workshop - 5/15-1 Advanced MVS JCL and Utilities - 3/29-30 Introduction to VSAM - 4/2-5 SMP/E Fundamentals - 4/10-13 z/OS UNIX Systems Services Implementation - 4/16-19 Understanding Workload Manager - 4/16-18 HCD and IODF Fundamentals - 4/23-24 Understanding Using CA-OPS/MVS - 4/25-26 VTAM Facilities and Operations - 4/30-05/4 8/20-24 CICS Concepts and Commands for Operations - 5/7-8 Intro to ISPF Dialog Management - 5/14-18 6/25-27 z/OS Technical Bootcamp - 5/14-25 (Intensive Two-Week Program!) CICS v4 for System Programmers - 5/21-25 Installing Unleashing Unicenter AutomationPoint - 5/21-25 z/OS Performance Tuning and Control w/WLM - 5/28-6/1 z/OS Internals Fundamentals - 6/11-22 (Intensive Two-Weeks!) Easytrieve Plus for Programmers - 6/11-13 COBOL Programming 06/18-22 9/24-28 z/OS Unix Systems Services Implementation - 6/18-6/21 COBOL Debugging Dump Reading - 6/25-27 REXX Programming - 7/09-11 10/15-17 Adv REXX - 7/12-13 10/18-19 z/OS Diagnostics Debugging 7/23-27 VSAM Application Performance Tuning - 7/23-26 SMP/E Fundamentals - 7/30-8/2 Intro to Assembler - 8/27-31 Understanding Workload Manager - 8/6-8 WebsphereMQ Bootcamp for Systems Administrators - 9/10-14 Intermediate Assembler - 9/10-14 CICS Command Level Programming - 7/9-15 9/17-21 Understanding CA-OPS/MVS RDF SSM - 10/1-2 IMS Basic Programming Techniques - 11/5-7 If you would like more information on any of these dates, please contact our Mainframe Marketing Specialist, Harriette Matthews at hmatth...@protechtraining.com Yours in learning, Scott Scott Redmond McFall http://www.linkedin.com/in/scottrmcfall http://www.linkedin.com/in/scottrmcfall 800-373-9188x113 cell 412-445-8070 VP/GenMgr-ProTechTraining.com a div of ProTech Professional Technical Services, Inc. Enterprise IT Specialists - Consulting/Training/Staffing GSA #GS-35F-0486W LinkedIn open-networker, or follow me at http://www.twitter.com/srmcfall www.twitter.com/srmcfall Over 250,000 Successfully Trained IT Professionals Since 1990! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Progress Toward z/OS Personal Use License
Ed, We run z/Pdt also, but on a bigger system, Opensuse and 16 m , Amd box, but we are pure development. Scott Ford Senior Systems Engineer www.identityforge.com On Apr 25, 2012, at 10:43 AM, Edward Jaffe edja...@phoenixsoftware.com wrote: On 4/25/2012 7:24 AM, Joel C. Ewing wrote: The big problem with something like zPDF was that it still had a minimum $20K - $30K per year cost. What was zPDF and why was it so expensive? -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Progress Toward z/OS Personal Use License
Yep dongles are not fool proof, then can break...it's hardware..I don't get the reason for dongles.. Scott Ford Senior Systems Engineer www.identityforge.com On Apr 25, 2012, at 11:56 AM, Mike Schwab mike.a.sch...@gmail.com wrote: On Wed, Apr 25, 2012 at 10:43 AM, Joel C. Ewing jcew...@acm.org wrote: A dongle definitely could be an issue for some. Might be less of an issue on Linux, but my experiences on Windoze has been less than ideal and makes me regard any application that requires a dongle as more of a gamble. While the dongle may be regarded as nice license insurance from the software vendors standpoint, it is essentially just another point of failure for the user and lowers the value of the product. My wife has some very expensive Embroidery software that requires a dongle. The license does entitle her to run the software on multiple platforms, both her laptop and desktop, since the dongle prevents concurrent use. After a year or so the dongle case became too loose to remove the dongle from the USB port - the only way now is grasp and pull the dongle base with a pair of needle-nose pliers, which works, but is certainly not the advertised convenience. The only support provided by the application vendor to remedy this situation is to re-purchase the software at full price to get a new dongle. Other than using standard Windows GUI interfaces, this software does nothing that special at the Operating System level, except for the dongle support that requires a hardware driver written by yet a different vendor. Logic would suggest that this application should be able to migrate from Win XP to Win 7 without a problem, provided one can find support for the dongle on Win 7. My initial attempts to migrate have so far failed because the dongle vendor's current drivers for Win 7 are not compatible with the older version dongle that came with the application. I haven't given up, but unless I can locate a compatible driver that is also compatible with Win 7 this expensive application is toast on Win 7. A nice result for the application vendor if I'm forced to do an otherwise unnecessary upgrade at great cost, but from the user's standpoint this is a very poor outcome, apparently forced by the decision to require a dongle. -- Joel C. Ewing,Bentonville, AR jcew...@acm.org I had a USB Verizon celluar modem case fail and got it replaced under insurance. Now I put it on a USB Male A - Female A cord. -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Tcpip sockets and dns
Found our issue, Ty Scott Ford Senior Systems Engineer www.identityforge.com On Apr 20, 2012, at 6:54 PM, Scott Ford scott_j_f...@yahoo.com wrote: All, I have a question, we have a COBOL Tcpip client, server hybrid. We drive with the destination ip address or dns host name and port. The issue is this 1. Destination is a host 'abcdef' for example pointing to ip address 192.168.1.222 2. Host 'abcdef' goes down, tcpip client goes into recovery by gethostbyname and Ezacic08 ... 3. Now host 'abcdef' points to 192.168.1.221 A. Dig abcdef confirms its 221 4. Gethostbyname returns rc=0 5. Ezacic08 fails the returning address is blank. I should after after the ip changes to 221 , I can recycle client and it finds 221 Is my logic wrong, that all you have to do is re drive gethostbyname and then ezacic08 ? This is written in CICS sockets. Any help is much appreciated. Scott Ford Senior Systems Engineer www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: A z/OS Redbook Corrected - just about!
Ron, There are all the Navy ships to USS ..United States Ship Scott Ford Senior Systems Engineer www.identityforge.com On Apr 21, 2012, at 4:39 PM, Ron Hawkins ronjhawk...@sbcglobal.net wrote: Well, shouldn't that be USST? But yes cobber, it could be a contraction of Unix System Services Table. It could even be Universal Studios Singapore Table. Geez, why is it that VTAM should have a mortgage over these three letters. I'm going to write to the United States Senate (USS) about this. If one has difficulty understanding the context it's their problem, not mine. You know when someone is talking about a ship, shell scripts or a modify table which USS they are referring to, so get smart and adapt. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Dick Bond Sent: Thursday, April 12, 2012 2:47 PM To: IBM-MAIN@bama.ua.edu Subject: Re: [IBM-MAIN] A z/OS Redbook Corrected - just about! Oh, so USSTAB means Unix Systems Services table. Wonder what that's used for, mate? On Fri, Apr 6, 2012 at 10:20 PM, Ron Hawkins ronjhawk...@sbcglobal.netwrote: Chris, I took your advice and read this post, but then I took it to a higher authority for validation. Yes, I googled acronym USS.' Mate, I'm sure I don't have to tell you that the internet holds the keys that unlock all mysteries, and for this one I was horrified to find that for all your hard work, the first hit in Google just simply did not support your position. There was the site with all the answers staring me in the face, waiting for the USS conundrum to be unraveled at a hit labeled USS - Definition by AcronymFinder. I mean, this has to be place to find the correct meaning of an acronym - forget all these red books and stuff. And so I curtailed my googling activities, sallied forth, clicked my mouse button, and infiltrated this place of purveyance to negotiate the reading of some contracted comestibles. And there it was, on the fifth line of the list: Unix System Services (IBM). I'm afraid there was no mention of that other meaning you are always talking about. I mean, based on this unassailable reference it is hard to believe that Unformatted System Services was ever abbreviated to USS, and probably should not have been because all the math's majors working in mainframes back then would have immediately been misled into thinking one was talking about the Uncorrected Sum of Squares (did you know that SAS has a USS function - you should write to them and get them to change it). So I'm afraid we have Internet 1, Chris nil, and we should all start using USS the way God and Google intended us to. Ron -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Chris Mason Sent: Wednesday, March 21, 2012 5:35 AM To: IBM-MAIN@bama.ua.edu Subject: [IBM-MAIN] A z/OS Redbook Corrected - just about! Back in early February, I sent off this comment to the redbooks site: comment To whom it may concern, - This feedback concerns redbook z/OS Version 1 Release 13 Implementation, SG24-7946-00, which is described still to be in Draft status. - Recently I wanted to check on what z/OSMF was all about. Expecting to be more quickly enlightened by finding a suitable redbook, I tried z/OSMF as a search word on the redbooks site. There were 3 hits, the first, gratifyingly, was entitled z/OS Management Facility. The other two were z/OS Version 1 Release xx Implementation, where xx was 12 and 13. I happened to notice the following at the beginning of the z/OS UNIX System Services chapter in the release 13 redbook: quote z/OS UNIX System Services, is an element of z/OS, is a UNIX operating environment, and is implemented within the z/OS operating system. It is also known as z/OS UNIX. In addition, there is a short abbreviation called USS. /quote How very curious, I thought. How did this mistake creep in? I then checked the beginning of the z/OS UNIX System Services chapter in the release 12 redbook and found that the curious addition had been slipped in only in the later V1R13 edition: quote The UNIX System Services element of z/OS is a UNIX operating environment, implemented within the z/OS operating system. It is also known as z/OS UNIX. /quote Since the V1R13 redbook is still in draft status, the inappropriate text can be removed. - First, in order to confirm that the abbreviation sanctioned by the authors of the manuals when UNIX System Services was introduced, we can pick any of the front-line manuals, the OS/390 MVS Initialization and Tuning Reference being one: quote CHANGES Summary of Changes ... As part of the name change of OS/390 OpenEdition to OS/390 UNIX System Services, occurrences of OS/390 OpenEdition have been changed to OS/390 UNIX System Services or its abbreviated name, OS/390 UNIX
Re: USS File Integrity
I know CA-MIM , if memory serves me correctly works across Plexes and Lpars. I am not sure if it works across Unix file systems in a similar manner Scott Ford Senior Systems Engineer www.identityforge.com On Apr 20, 2012, at 9:43 AM, David Crayford dcrayf...@gmail.com wrote: Synchronizing file access between threads in a single program in java is trivial. Java has a built-in synchronized methods to implement critical sections. I'm not sure how well it would scale though as I guess there implemented by calling the pthread API. On 20/04/2012, at 9:01 PM, Farley, Peter x23353 peter.far...@broadridge.com wrote: The OP originally stated that he had two STC processes that updated the same z/Unix file at the same time and wanted to prevent this. Are two STC's both considered z/Unix processes under the same kernel when they are running on the same LPAR? If so, ISTM that locking and unlocking the file around the write code will work as a mechanism to prevent simultaneous writes. But what about two STC's running on different LPAR's in the same sysplex? Does z/Unix file locking work across LPAR's, or only within the same LPAR? Just curious. ISTR that simultaneous writes to a common file are classically solved in most unix systems by implementing a daemon process that is the only process allowed to write to the file, and other processes send messages to the daemon to accomplish the write function, like the syslog daemon for system messages. The new question is whether Java on z/Unix provides access to any file locking mechanism at all, as the OP also just said it was a Java application and he wants to share the file among tasks of the *same* program. That would argue that using whatever the Java equivalent of the C flockfile function is would be the solution to use. But can z/Unix Java do that? Or does he have to write a JNI function to be called from his z/Unix Java code to implement a file lock? Or should he just implement a third process/task under the same program for the file writes and have both of the other tasks just send messages to the write process? Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Walt Farrell Sent: Friday, April 20, 2012 8:27 AM To: IBM-MAIN@bama.ua.edu Subject: Re: USS File Integrity On Fri, 20 Apr 2012 11:18:45 +0800, David Crayford dcrayf...@gmail.com wrote: Of course, fcntl() can be used to implement byte-range-locking. So in theory you could use it to implement row-level locking in a dictionary library. ENQ is not that granular. ENQ is as granular as the application wants to make it, depending on how clever the application programmer is at encoding information into the RNAME the application will use. The key point about UNIX files, though, is that all the locking is advisory, and controlled by the applications that use the file. If they all implement the same locking mechanism (whatever that may be), the locking will work. If they don't, it won't work. -- This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Tcpip sockets and dns
All, I have a question, we have a COBOL Tcpip client, server hybrid. We drive with the destination ip address or dns host name and port. The issue is this 1. Destination is a host 'abcdef' for example pointing to ip address 192.168.1.222 2. Host 'abcdef' goes down, tcpip client goes into recovery by gethostbyname and Ezacic08 ... 3. Now host 'abcdef' points to 192.168.1.221 A. Dig abcdef confirms its 221 4. Gethostbyname returns rc=0 5. Ezacic08 fails the returning address is blank. I should after after the ip changes to 221 , I can recycle client and it finds 221 Is my logic wrong, that all you have to do is re drive gethostbyname and then ezacic08 ? This is written in CICS sockets. Any help is much appreciated. Scott Ford Senior Systems Engineer www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Execute certian steps based on input parm
Z... Here is another approach i use this: //BULDREL JOB SYSTEMS,MSGLEVEL=(1,1),MSGCLASS=X,CLASS=A,PRTY=8, // NOTIFY=SYSUID,REGION=0M //*--* //* BUILD FOR IDF RACF RELEASES * //* . PRODEXP = EXPRESS PIONEER ONLY * //* . PRODENT = ENTERPRISE EDITION * //* . PROD = ORACLE RELEASE * //*--* //SETP1 SET ITYPE=PROD //SETP2 SET OTYPE=PROD //SETO SET ORG=IDF //SETH1 SET IHLQ=ORA9418 //SETH2 SET OHLQ=ORA9419 //SET1I SET IDSN=ORG..ITYPE..IHLQ..JCLLIB //SET1O SET ODSN=ORG..OTYPE..OHLQ..JCLLIB //SETM1 SET ORECFM=FB //SETM2 SET OLRECL=80 //SETM3 SET OBLOCK=3120 //SETM4 SET OVOLSER=JASYS3 //SET2I SET IDSN1=ORG..ITYPE..IHLQ..PROCLIB //SET2O SET ODSN1=ORG..OTYPE..OHLQ..PROCLIB //SET3I SET IDSN2=ORG..ITYPE..IHLQ..PARMLIB //SET3O SET ODSN2=ORG..OTYPE..OHLQ..PARMLIB //SET4I SET IDSN3=ORG..ITYPE..IHLQ..LINKLIB //SET4O SET ODSN3=ORG..OTYPE..OHLQ..LINKLIB //SET5I SET IDSN4=ORG..ITYPE..IHLQ..CLISTLIB //SET5O SET ODSN4=ORG..OTYPE..OHLQ..CLISTLIB //STEP1 EXEC PGM=IEFBR14 //*---* //* IEFBR14 ALLOC OUTPUT LIBRARIES //*---* //INDD1 DD DSN=ODSN, // DCB=(DSORG=PO,RECFM=ORECFM,LRECL=OLRECL, // BLKSIZE=OBLOCK),UNIT=SYSDA,SPACE=(TRK,(300,100,60)), // DISP=(NEW,CATLG),VOL=SER=OVOLSER //INDD2 DD DSN=ODSN1, // DCB=(DSORG=PO,RECFM=ORECFM,LRECL=OLRECL, // BLKSIZE=OBLOCK),UNIT=SYSDA,SPACE=(TRK,(300,100,60)), // DISP=(NEW,CATLG),VOL=SER=OVOLSER //INDD3 DD DSN=ODSN2, // DCB=(DSORG=PO,RECFM=ORECFM,LRECL=OLRECL, // BLKSIZE=OBLOCK),UNIT=SYSDA,SPACE=(TRK,(300,100,60)), // DISP=(NEW,CATLG),VOL=SER=OVOLSER //INDD4 DD DSN=ODSN4, // DCB=(DSORG=PO,RECFM=ORECFM,LRECL=OLRECL, // BLKSIZE=OBLOCK),UNIT=SYSDA,SPACE=(TRK,(300,100,60)), // DISP=(NEW,CATLG),VOL=SER=OVOLSER //INDD5 DD DSN=ODSN3, // DCB=(DSORG=PO,RECFM=U,LRECL=0, // BLKSIZE=6144),UNIT=SYSDA,SPACE=(TRK,(2000,100,60)), // DISP=(NEW,CATLG),VOL=SER=OVOLSER //IFGOD1 IF (STEP1.RC = 0) THEN ..so on so forth. Depends on what you are doing ... Scott J Ford Software Engineer http://www.identityforge.com From: Bill Ashton bill00ash...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Wednesday, April 18, 2012 9:51 AM Subject: Re: Execute certian steps based on input parm Why not pass the the version in as a symbolic: //ABC PROC VER=620 //PGMNAME EXEC PGM=PGM //STEPLIB DD DNS=LOADMOD.Vver Then you can call it from your JCL: //STEP1 EXEC PROC=ABC,VER=620 or //STEP1 EXEC PROC=ABC (This will default to 620) and then if you have a new version, you can change some JCL: //STEP2 EXEC PROC=ABC,VER=710 Another option, if you want to change the version all at once, is to use dataset alias definitions. To do this, you set your proc up like this: //ABC PROC //PGMNAME EXEC PGM=PGM //STEPLIB DD DNS=LOADMOD.PROD.VERSION Then, your JCL would have only this: //STEP1 EXEC PROC=ABC To set this up, you would use IDCAMS like this: //STEP0 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEL LOADMOD.PROD.VERSION ALIAS DEF ALIAS(NAME(LOADMOD.PROD.VERSION) - REL(LOADMOD.V620)) That way, everyone who uses LOADMOD.PROD.VERSION, in JCL or ISPF browse, etc, will automatically get LOADMOD.V620. Then, when you want to upgrade, you just run the IDCAMS for the new version: //STEP0 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEL LOADMOD.PROD.VERSION ALIAS DEF ALIAS(NAME(LOADMOD.PROD.VERSION) - REL(LOADMOD.V710)) Your proc doesn't need to change, your JCL doesn't change, any CLIST or REXX programs don't change, and everything processes the same way, just on a different version. Of course before you upgrade, you can perform testing by either using a JCL STEPLIB override to the absolute version, or you can define an alias of LOADMOD.TEST.VERSION... This will give you a lot of options, if this is what you are looking for. I hope this is some help to you. Billy On Wed, Apr 18, 2012 at 9:02 AM, Victor Zhang victor_wor...@yahoo.com.cnwrote: Ok, the proc is like: //ABC PROC VER='620' //PGMNAME EXEC PGM=PGM //STEPLIB DD DNS=LOADMOD.V620 IF VER NOT = '620' i want proc be: //PGMNAME EXEC PGM=PGM //STEPLIB DD DNS=LOADMOD.V710 So I code: //ABC PROC VER='620' //IF620 IF (VER=620) THEN //PGMNAME EXEC PGM=PGM //STEPLIB DD DNS=LOADMOD.V620 // ELSE //PGMNAME EXEC PGM=PGM //STEPLIB DD DNS=LOADMOD.V710 // ENDIF But it does not work. Please help
Re: GO TO cobol
Whatever happened to everyone talking about structured COBOL code. I usually perform paragraph- name thru paragraph- name exit. I but agree flow logic in COBOL need revision. Especially, when you in the middle of the perform. Using 'continue' to good, but sometimes deadlines force you to write not the way you want too Scott Ford Senior Systems Engineer www.identityforge.com On Apr 17, 2012, at 9:12 AM, Jeff Holst jeff.ho...@fiserv.com wrote: Without the GO TO, Grace Hopper might have been forever stuck in Japan. Many years ago, I was at an ACM meeting where Grace Hopper was a speaker. One of the stories she told was of a visit to a data center in Japan. Somehow, she was left there without an interpretter. The folks at the data center spoke no English and she spoke no Japanese. Fortunately, the programmers knew COBOL. And while COBOL was designed so that the english commands could be easily translated into other languages (in most languages, the verb in a command is the first thing in the sentence), this is almost never done. Her solution was simple. She poiinted at herself, then said GO TO and the name of the hotel. This was enoungh so that the programmers were able to get her to the hotel. Jeff Holst -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: GO TO cobol
Lloyd, My father was a Unisys CE at the Fort for many years... Scott Ford Senior Systems Engineer www.identityforge.com On Apr 17, 2012, at 8:17 AM, Lloyd Fuller leful...@sbcglobal.net wrote: In 1969, and until sometime in the 1970s or later, the Army programming school was at Fort Benjamin Harrison in Indiana. Graduated in March 1969 as a Staff Sergeant converted to a SP6. Programming since then. lLOYD - Original Message From: Ed Gould edgould1...@comcast.net To: IBM-MAIN@bama.ua.edu Sent: Tue, April 17, 2012 12:16:33 AM Subject: Re: GO TO cobol On Apr 16, 2012, at 8:34 AM, McKown, John wrote: SNIP- Also remember that COBOL, at least originally, was supposed to be very English-like and so usable by people at the Army PFC level of training. --John McKown Systems Engineer IV IT Hmmm... I was in the Army and we got PFC's from the programming school (AZ? its been 40 years so forgive me). We had two groups, one COBOL (batch processing) and one ASM group (essentially sysprogs). The ASM group was by far the best IMO. I was on call quite often and had to fix the cobol programs that went boom in the middle of the night. The COBOL people were semi useless in debugging and when I looked at the code they had produced (except for a few people) it was hopeless to understand. I spent more time trying to figure out the logic and compare what I was seeing in the dump. 1/3 the time I helped the programmer figure out where his problem was and supplying answers to his questions on what was in this field or that field. What was interesting was that as the guys (no female programmers so don't call me sexist blame the Army not me) as they became more experienced the code became easier to follow. As they became became better programmers there were less logic problems. Now having said that most of the programs were smallish and only a few were considered large so the smallish programs there was no excuse for logic issues or mangled code. My memory is foggy here as to goto's but I think the rule no standards if memory serves me that goto's were to be minimized as a result flow was easier to follow and frankly debugging was easier. Ed ps: We had one person who at the time he was drafted was working for IBM and he privately told me about some OS enhancements that when I first heard I couldn't wrap my head around as virtual (at least that I had never heard of) was a nightmare that I couldn't wrap my head around. After I got out of the Army (2 years) IBM announced Virtual and I was able to ask some semi intelligent questions as my preview and the questions helped jump start by job. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: GO TO cobol
Yes sir, for many years, large systems CE ... Scott Ford Senior Systems Engineer www.identityforge.com On Apr 17, 2012, at 10:07 AM, Lloyd Fuller leful...@sbcglobal.net wrote: Probably at the Army Finance Center there. I think that they used Unisys. Lloyd - Original Message From: Scott Ford scott_j_f...@yahoo.com To: IBM-MAIN@bama.ua.edu Sent: Tue, April 17, 2012 9:36:59 AM Subject: Re: GO TO cobol Lloyd, My father was a Unisys CE at the Fort for many years... Scott Ford Senior Systems Engineer www.identityforge.com On Apr 17, 2012, at 8:17 AM, Lloyd Fuller leful...@sbcglobal.net wrote: In 1969, and until sometime in the 1970s or later, the Army programming school was at Fort Benjamin Harrison in Indiana. Graduated in March 1969 as a Staff Sergeant converted to a SP6. Programming since then. lLOYD - Original Message From: Ed Gould edgould1...@comcast.net To: IBM-MAIN@bama.ua.edu Sent: Tue, April 17, 2012 12:16:33 AM Subject: Re: GO TO cobol On Apr 16, 2012, at 8:34 AM, McKown, John wrote: SNIP- Also remember that COBOL, at least originally, was supposed to be very English-like and so usable by people at the Army PFC level of training. --John McKown Systems Engineer IV IT Hmmm... I was in the Army and we got PFC's from the programming school (AZ? its been 40 years so forgive me). We had two groups, one COBOL (batch processing) and one ASM group (essentially sysprogs). The ASM group was by far the best IMO. I was on call quite often and had to fix the cobol programs that went boom in the middle of the night. The COBOL people were semi useless in debugging and when I looked at the code they had produced (except for a few people) it was hopeless to understand. I spent more time trying to figure out the logic and compare what I was seeing in the dump. 1/3 the time I helped the programmer figure out where his problem was and supplying answers to his questions on what was in this field or that field. What was interesting was that as the guys (no female programmers so don't call me sexist blame the Army not me) as they became more experienced the code became easier to follow. As they became became better programmers there were less logic problems. Now having said that most of the programs were smallish and only a few were considered large so the smallish programs there was no excuse for logic issues or mangled code. My memory is foggy here as to goto's but I think the rule no standards if memory serves me that goto's were to be minimized as a result flow was easier to follow and frankly debugging was easier. Ed ps: We had one person who at the time he was drafted was working for IBM and he privately told me about some OS enhancements that when I first heard I couldn't wrap my head around as virtual (at least that I had never heard of) was a nightmare that I couldn't wrap my head around. After I got out of the Army (2 years) IBM announced Virtual and I was able to ask some semi intelligent questions as my preview and the questions helped jump start by job. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
Walt, That's great that you indicate they can be in Metal C, but I haven't seen any examples from IBM in there manuals. Also, it would be desirable to say 'yes' you can or 'no' you can't, it would help customers and us developers, IMHO. Examples are a great source for learning and helpful pointers. Regards Scott Ford Senior Systems Engineer www.identityforge.com On Apr 13, 2012, at 11:11 PM, Walt Farrell walt.farr...@gmail.com wrote: On Fri, 13 Apr 2012 15:05:57 -0400, Scott Ford scott_j_f...@yahoo.com wrote: Reading through this thread, quickly, it very obvious that certain exits must be in Assembler. So your kind of a captive audience. I am speaking of security type products. I have beem experimenting in C , not being a C heavy, it would be nice and desirable to do them in C . But sure if IBM supports ICHPWX01 in C ... Are there really system exits that -must be- in Assembler? Wouldn't Metal C work instead? (Yes, you might need to provide some control block mappings yourself, of course, but that really doesn't mean the language can't be used; just that it may be a bit inconvenient, depending on what you want to look at.) (And by the way, I'm pretty sure that Metal C would work for ICHPWX01 (RACF new password exit). You can even use System REXX if you want.) -- Walt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
R.S. I have customers also asking for help , sample exits, we do security product work. So I know what IBM goes through also. But IBM being big Blue , how does one get someone to listen or pay attention to customer needs ? We are small and always listen to our customers. Fwiw Regards, Scott Ford Senior Systems Engineer www.identityforge.com On Apr 14, 2012, at 11:37 AM, R.S. r.skoru...@bremultibank.com.pl wrote: Good idea, wrong address. Walt is retired. However the idea is really good. There many cases where IBM should prepare some sample exits (*). Even (as usually) in as is mode of responsibility. (*) I didn't say there are no sample exits from IBM. I said we lack some other exits. -- Radoslaw Skorupka Lodz, Poland W dniu 2012-04-14 17:26, Scott Ford pisze: Walt, That's great that you indicate they can be in Metal C, but I haven't seen any examples from IBM in there manuals. Also, it would be desirable to say 'yes' you can or 'no' you can't, it would help customers and us developers, IMHO. Examples are a great source for learning and helpful pointers. Regards Scott Ford Senior Systems Engineer www.identityforge.com On Apr 13, 2012, at 11:11 PM, Walt Farrellwalt.farr...@gmail.com wrote: On Fri, 13 Apr 2012 15:05:57 -0400, Scott Fordscott_j_f...@yahoo.com wrote: Reading through this thread, quickly, it very obvious that certain exits must be in Assembler. So your kind of a captive audience. I am speaking of security type products. I have beem experimenting in C , not being a C heavy, it would be nice and desirable to do them in C . But sure if IBM supports ICHPWX01 in C ... Are there really system exits that -must be- in Assembler? Wouldn't Metal C work instead? (Yes, you might need to provide some control block mappings yourself, of course, but that really doesn't mean the language can't be used; just that it may be a bit inconvenient, depending on what you want to look at.) (And by the way, I'm pretty sure that Metal C would work for ICHPWX01 (RACF new password exit). You can even use System REXX if you want.) -- Walt -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, www.brebank.pl, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2012 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.410.984 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
Hey Bob, What us users of z/Pdt ? Sent from my iPad Scott Ford Senior Systems Engineer www.identityforge.com On Apr 12, 2012, at 12:41 PM, Bob Shannon bshan...@rocketsoftware.com wrote: What about folks not running Z9 for z/os 2.1 ? 2.1 requires an architectural level set. If you are running a z9 or higher (i.e., z10, z196 or z114), then you will be fine. If you are running a processor prior to a z9 (i.e., z800/z900, z890/z990) then you need a new processor if you want to run 2.1. Of course, with the extended support periods there is certainly need to rush into this. Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
Bob, Will do and thank you Sent from my iPad Scott Ford Senior Systems Engineer www.identityforge.com On Apr 13, 2012, at 9:16 AM, Bob Shannon bshan...@rocketsoftware.com wrote: What us users of z/Pdt ? Well, everything I know came from the SOD. I have no inside information. Having said that I can't imagine IBM not supporting 2.1 on a zPDT. Send a note to Bill Ogden for a definitive answer. Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: z/OS every two years (Official announcment)
John, I can tell you where the kool-aid was made too... Sent from my iPad Scott Ford Senior Systems Engineer www.identityforge.com On Apr 12, 2012, at 1:23 PM, McKown, John john.mck...@healthmarkets.com wrote: IBM has drunk the Kool-Aid. It is Windows only. Curiously, it is mainly Java, with some part of it being Windows. I had been working on a Java only work-alike, but just quit one day due to getting busy. And I've never gotten back to it. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Thursday, April 12, 2012 12:04 PM To: IBM-MAIN@bama.ua.edu Subject: Re: z/OS every two years (Official announcment) On Thu, 12 Apr 2012 10:01:57 -0500, Mark Zelden wrote: I use SoftCopy librarian to download / manage PDF bookshelves (per my last post - for example, Tivoli since bookmanager format is not available). Is it ecumenical, or does it require a particular OS? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
Guys, Reading through this thread, quickly, it very obvious that certain exits must be in Assembler. So your kind of a captive audience. I am speaking of security type products. I have beem experimenting in C , not being a C heavy, it would be nice and desirable to do them in C . But sure if IBM supports ICHPWX01 in C ... Scott Ford Senior Systems Engineer www.identityforge.com On Apr 13, 2012, at 2:53 PM, McKown, John john.mck...@healthmarkets.com wrote: Sounds like what is done by the GNU compiler people. From what I've read, all the GNU compilers utilize the same back end code generator. IIRC, at one time the non-C compilers really did a language to C conversion, followed by a C compile. I don't know if I have the terminology correct, but now all the compilers in the GCC collection emit a parse tree(?) and pass that to the common back end for actual optimization and code generation. Now if they would just create a COBOL and PL/I compiler front end, I would be in 7th heaven. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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-MAIN@bama.ua.edu] On Behalf Of Edward Jaffe Sent: Friday, April 13, 2012 1:10 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Modernizing the BCP code ? On 4/13/2012 10:46 AM, David Crayford wrote: On 14/04/2012 1:38 AM, Edward Jaffe wrote: On 4/12/2012 9:03 AM, David Crayford wrote: AFAIK, the PL/X compiler shares a back-end with the other code optimizers, so should produce excellent code. Not yet. So does that mean that the PL/X compiler produces inferior code to the Metal/C compiler? That would be disappointing considering the majority of the operating system is writen in PL/X! Yes. This has been one of the justifications for not having a new z/OS Architectural Level Set i.e., the existing PL/X compiler cannot generate code that takes advantage of the newer hardware features, so why force customers to upgrade unnecessarily? The compiler was given to the folks in Toronto a couple/few years ago with the intent of having it enhanced with the smart back end used for other IBM compilers. Given that z/OS V2.1 will require z9 processors there is even more pressure on Toronto to deliver this much needed plumbing enhancement. -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
So very true, but since I can remember companies just wouldn't buy neat software/ hardware, they had to cost justify, especially when money was tight, like nowadays. I understand that, but there are better approaches and mouse traps to aid in productivity.. Scott Ford Senior Systems Engineer www.identityforge.com On Apr 13, 2012, at 3:10 PM, McKown, John john.mck...@healthmarkets.com wrote: -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of David Crayford Sent: Friday, April 13, 2012 1:51 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Modernizing the BCP code ? snip Thanks for the info! Seems like IBM are more interested in the middleware (Websphere!) then the OS! How does that make sense? That's where the money is. Now days, the hardware and the OS are mainly there to support the applications. Which makes sense. To business people (the ones who pay), all that is important are the results. They don't care how they get them as long at they are correct, timely, and cost-effective. That's also why IBM's first requirement for an enhancement request is: Present a business case. I.e. how will implementing this make us more money. That can be done in basicall two ways: (1) reduces cost; (2) increases revenue. I think that's a big reason why IBM created PL/X. It is more time-efficient to code in it than in HLASM, and likely more likely to be correct. Which reduces cost to produce the software. It also makes it faster and more reliable to make changes. More reliabe software is cost effective because it reduces the amount of money needed to maintain it. How much money would be saved if every program in existance ran according to spec, so that the only time it was every modified is when it had to be improved. I know that Java is interpreted (byte code) with a JIT. I wish that I could somehow use the JIT to produce a native program object. Why? Because then every language which produces JVM byte code could be used to produce z/OS executables. And the compilation to a class file could be done on any system, not just z/OS. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
I learned PL/1 on OS/VS2/HASP ( duck ) I really liked it but didn't catch, then worked a VM VSE shop running Plancode in a ICCF, horrible slow on a 4381... OpenCobol haven't seen or worked with, love Open Object Rexx Scott Ford Senior Systems Engineer www.identityforge.com On Apr 13, 2012, at 4:42 PM, Frank Swarbrick frank.swarbr...@yahoo.com wrote: OpenCOBOL is not part of the GCC. OpenCOBOL converts COBOL to C; then it invokes the C compiler to compile the result. From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@bama.ua.edu Sent: Friday, April 13, 2012 2:13 PM Subject: Re: Modernizing the BCP code ? http://www.opencobol.org/ HTH Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Friday, April 13, 2012 4:07 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Modernizing the BCP code ? Haha, I think there were GCC projects for both COBOL and PL/I, but both are stagnate (and probably incomplete). One can still dream, though! Frank From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN@bama.ua.edu Sent: Friday, April 13, 2012 12:53 PM Subject: Re: Modernizing the BCP code ? Sounds like what is done by the GNU compiler people. From what I've read, all the GNU compilers utilize the same back end code generator. IIRC, at one time the non-C compilers really did a language to C conversion, followed by a C compile. I don't know if I have the terminology correct, but now all the compilers in the GCC collection emit a parse tree(?) and pass that to the common back end for actual optimization and code generation. Now if they would just create a COBOL and PL/I compiler front end, I would be in 7th heaven. -- This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
__console2()
All:
I am to use the __console2() function call in C to build an operator Modify
interface.
Reading the manual , I can issue messages, no problem , retrieval of the modify
information
is good, but I cant figure out how to compare..He's my C code:
/* CCONS
* Company: Identityforge,LLC
* Date: 04-12-2012
* Author: Scott Ford
*
*/
#include stdio.h
#include string.h
#include time.h
#include errno.h
#include sys/__messag.h
int main(int argc, char** argv) {
struct __cons_msg2 cmsg;
char buf[256] = Test C console interface;
char reply[128];
int rc;
int x;
int res;
int cmsg_cmd;
unsigned int cmsg_rout[2] = {1,0};
unsigned int cmsg_desc[2] = {12,0};
cmsg.__cm2_format = __CONSOLE_FORMAT_2;
cmsg.__cm2_msg = buf;
cmsg.__cm2_msglength = strlen(buf);
cmsg.__cm2_routcde = cmsg_desc;
cmsg.__cm2_token = 0;
cmsg.__cm2_msgid = NULL;
cmsg.__cm2_dom_token = 0;
rc = __console2(cmsg,reply,cmsg_cmd);
x = 0;
printf(Success display of console message\n);
do {
printf(%s\n);
if ( strcmp(reply,SHUTDOWN) == 0 );
x = 1;
} while (x = 0)
}
If i issue : F TESTCONS,APPL=HI
I see the variable REPLY is HI ...so is my assumption when I compare i have to
somehow use a length ??
I am a newbie at this, so any help is super appreciated..
Scott J Ford
Software Engineer
http://www.identityforge.com
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: __console2()
Thanks Kirk much appreciated, I will give a try a little later
Scott J Ford
Software Engineer
http://www.identityforge.com
From: Kirk Wolf k...@dovetail.com
To: IBM-MAIN@bama.ua.edu
Sent: Friday, April 13, 2012 5:50 PM
Subject: Re: __console2()
Scott,
The second argument is a pointer. If successful, it will point to a
null-terminated string, so strcmp() or strcasecmp() should work fine.
Your code should also check the return code and check that the value
returned in the third argument is _CC_modify before assuming that your
pointer points to a modify appl= string.
Kirk Wolf
Dovetailed Technologies
http://dovetail.com
On Fri, Apr 13, 2012 at 4:12 PM, Scott Ford scott_j_f...@yahoo.com wrote:
All:
I am to use the __console2() function call in C to build an operator
Modify interface.
Reading the manual , I can issue messages, no problem , retrieval of the
modify information
is good, but I cant figure out how to compare..He's my C code:
/*
CCONS
* Company:
Identityforge,LLC
* Date:
04-12-2012
* Author: Scott
Ford
*
*/
#include
stdio.h
#include
string.h
#include
time.h
#include
errno.h
#include
sys/__messag.h
int main(int argc, char** argv)
{
struct __cons_msg2
cmsg;
char buf[256] = Test C console
interface;
char
reply[128];
int
rc;
int
x;
int
res;
int
cmsg_cmd;
unsigned int cmsg_rout[2] =
{1,0};
unsigned int cmsg_desc[2] =
{12,0};
cmsg.__cm2_format =
__CONSOLE_FORMAT_2;
cmsg.__cm2_msg =
buf;
cmsg.__cm2_msglength =
strlen(buf);
cmsg.__cm2_routcde =
cmsg_desc;
cmsg.__cm2_token =
0;
cmsg.__cm2_msgid =
NULL;
cmsg.__cm2_dom_token =
0;
rc =
__console2(cmsg,reply,cmsg_cmd);
x =
0;
printf(Success display of console
message\n);
do
{
printf(%s\n);
if ( strcmp(reply,SHUTDOWN) == 0
);
x =
1;
} while (x =
0)
}
If i issue : F TESTCONS,APPL=HI
I see the variable REPLY is HI ...so is my assumption when I compare i
have to somehow use a length ??
I am a newbie at this, so any help is super appreciated..
Scott J Ford
Software Engineer
http://www.identityforge.com
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
Bob, What about folks not running Z9 for z/os 2.1 ? Sent from my iPad Scott Ford Senior Systems Engineer www.identityforge.com On Apr 12, 2012, at 10:26 AM, Bob Shannon bshan...@rocketsoftware.com wrote: and seems to me the code is not very modern First, there are structures in the BCP code that are 40 years old. They haven't changed and are extremely difficult to change. Second, z/OS 1.13 will IPL on a z900/z800. This means the BCP can only use instructions supported by those processors. Third, according to yesterday's SOD, z/OS 2.1 requires at least a z9 processor. This implies the BCP in 2.1 can use instructions introduced on those processors. Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
