Re: Installing HSM or rather: DFHSM woes
Alan, You can issue F DFHSM,RELEASE MIGRATION, but it will most likely be held again immediately when the first migration is attempted. I got up the nerve to issue the command this morning (after all, the cycle is still defined to not start by itself). HSM said: ARC0100I RELEASE COMMAND COMPLETED Now I manually migrated one data set. It works! Recall also worked. (I'm happy.) Now I need to get up the nerve to have everything start automatically... Can anybody tell me why SETSYS TAPEMIGRATION(NONE) gets ARC0103I INVALID SETSYS PARAMETER TAPEMIGRATION ? Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
On 7/3/2013 12:11 PM, Kirk Talman wrote: As a certified alte kacker, I would like to comment on what this tells us about the state of mainframe IT. Somewhat off topic, but if that was supposed to be German, it's wrong. I only have a rudimentary knowledge of Yiddish, but I believe it's wrong there, too. (Die) alte Kacker is the valid masculine plural. (Der) alter Kacker is the masculine singular. (Die) alte Kackerin is the feminine singular. I assume you meant the second form, unless you are suffering from multiple personality disorder g Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
Mark IV had a ruler too... On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas tonybabo...@icloud.com wrote: Rising to the defense of RPG, what other language had its own ruler? Talk about ease of coding! Ah the nostalgia.sigh. Sent from Tony's iPhone. On Jul 3, 2013, at 9:50 PM, John McKown john.archie.mck...@gmail.com wrote: I've not run across many languages that I considered ugly. RPG II was one. EasyTrieve Plus is not ugly, but I don't much like it. The newest IBM COBOL is rather nice, albeit still wordy. The first COBOL that I learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of the same era. The main thing that I hate is a manager saying use xyz, but refrain from using the new omega facilities. The reason being that everybody in the shop knows the basic xyz language, but is not familiar with the omega features. So I am chained down to the least common denominator for ease of understanding by those who simply won't learn new stuff. Case in point in my current shop, at least in the past, was not using any z/OS UNIX facilities because they were just too esoteric and complicated. On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In CAAJSdjg1jRs6DrNV7xzAftEoGcojyeGf=fvwkbdh_idvozp...@mail.gmail.com, on 07/03/2013 at 07:10 AM, John McKown john.archie.mck...@gmail.com said: http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things I say yes to most. #4 is being forced to learn or use some specific technology What if you consider a language to be ugly but also consider it to be the best tool for the job? I don't care for Perl syntax, but between the expressive power of the language and the modules available in CPAN, I find myself using it regardless. That's not a boss telling me that I have to - it's my own decision. -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN -- This is a test of the Emergency Broadcast System. If this had been an actual emergency, do you really think we'd stick around to tell you? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Wayne V. Bickerdike -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: I am getting a wait state during IPL
Nor is there is any 65-bit support 'in' z/OS. I suspect that what we have here is not a dubious, heterodox hardware notion but something much more benign, a typo. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Installing HSM or rather: DFHSM woes
Barbara, Is this in the ARCCMDxx member? Or is it being issued as a command? If in the ARCCMDxx can you try doing a F dfhsmtaskname,SETSYS TAPEMIGRATION(NONE) and let us know what happens? If in the ARCCMDxx can you post a few lines above and below the Tapemigration line? DFHSM was not meant to be intuitive. So it takes some digging and reviewing the DFHSM Storage Admin Guide to try and figure out why things are not working. Also, do you have an OCDS present? Or is it dummy? Note: From the STG Admin Guide: If you do not intent to use Tape, do not specify TAPEMIGRATION. If you do, an Offline control dataset is required. Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of nitz-...@gmx.net Sent: Wednesday, July 03, 2013 11:13 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Installing HSM or rather: DFHSM woes Alan, You can issue F DFHSM,RELEASE MIGRATION, but it will most likely be held again immediately when the first migration is attempted. I got up the nerve to issue the command this morning (after all, the cycle is still defined to not start by itself). HSM said: ARC0100I RELEASE COMMAND COMPLETED Now I manually migrated one data set. It works! Recall also worked. (I'm happy.) Now I need to get up the nerve to have everything start automatically... Can anybody tell me why SETSYS TAPEMIGRATION(NONE) gets ARC0103I INVALID SETSYS PARAMETER TAPEMIGRATION ? Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Installing HSM or rather: DFHSM woes
Is this in the ARCCMDxx member? Or is it being issued as a command? Doesn't matter. Doesn't work either way, gets the same error message. If in the ARCCMDxx can you post a few lines above and below the Tapemigration line? SETSYS - OBJECTNAMES(OBJ,OBJECT,LOAD,LOADLIB,LOADMODS,LINKLIB) - SOURCENAMES(ASM,COBOL,FORT,PLI,SOURCE,SRC,SRCLIB,SRCE,CNTL,JCL) SETSYS TAPEMIGRATION(NONE) SETSYS PRIMARYSPMGMTSTART ( ) Also, do you have an OCDS present? Or is it dummy? Dummy, or rather it gets a message that it isn't specified. Note: From the STG Admin Guide: If you do not intent to use Tape, do not specify TAPEMIGRATION. If you do, an Offline control dataset is required. That might be the (non-intuitive) reason. There are no tapes in our environment, and specifying TAPEMIGRATION(NONE) should be valid, since we don't intend to use tapes. In other words, I'd better remove the line (although I am unhappy with the default) since it will not be set to NONE, anyway. And I must have overlooked that line, although I have been over all the HSM books for more than two weeks now... Thanks, Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
On 7/3/2013 10:26 PM, Farley, Peter x23353 wrote: Assuming that IPCS is available to the application staff. In some shops it is not generally available, but reserved for the systems staff. And there is the issue of training in the product, which isn't always available either (outside of reading the FM's). Personally I have no problem using SYSUDUMP, but these days I most frequently use an interactive debugger to solve application errors. Not all production application dump analyzers are created equal. I haven't had the privilege of using recent versions of ABEND-AID, but I can personally vouch for the effectiveness of Macro4's Dumpmaster product. I have found that LE dumps are somewhat less than useful when interrupted or circumvented by the locally installed dump analyzer and/or poorly chosen installation defaults. In my experience, lack of training and training updates is the most frequent root cause of loss of knowledge of how to debug this simple issue. Thanks, Peter. Ahem. For example http://www.trainersfriend.com/Assembler_courses/C414descrpt.htm http://www.trainersfriend.com/COBOL_Courses/D732descr.htm http://www.trainersfriend.com/COBOL_Courses/D735descr.htm http://www.trainersfriend.com/PL_I_courses/E732descr.htm http://www.trainersfriend.com/PL_I_courses/E735descr.htm http://www.trainersfriend.com/Language_Environment_courses/M735descr.htm -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Wednesday, July 03, 2013 9:46 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question on how to debug S0C7 (data exception) abend In caajsdjjn4zk-csejvp4exf4ctxc5dnv6cfr5a19pnovvvgq...@mail.gmail.com, on 07/03/2013 at 07:16 AM, John McKown john.archie.mck...@gmail.com said: Being old, I have occasionally turned off LE's abend handling and just gone for the throat using a recent compile (with generated assembler shown) and a SYSUDUMP. SYSMDUMP, TYVM. The programmers have forgotten how to do this entirely. Some things are best forgotten. IPCS isn't perfect, but it's better than highlighters and paper clips, or the electronic equivalent. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Installing HSM or rather: DFHSM woes
There are a couple of Share presentations on DFHSM Best Practises Setting Up DFHSM And so forth. If you like some of them, email me offlist Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of nitz-...@gmx.net Sent: Thursday, July 04, 2013 5:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Installing HSM or rather: DFHSM woes Is this in the ARCCMDxx member? Or is it being issued as a command? Doesn't matter. Doesn't work either way, gets the same error message. If in the ARCCMDxx can you post a few lines above and below the Tapemigration line? SETSYS - OBJECTNAMES(OBJ,OBJECT,LOAD,LOADLIB,LOADMODS,LINKLIB) - SOURCENAMES(ASM,COBOL,FORT,PLI,SOURCE,SRC,SRCLIB,SRCE,CNTL,JCL) SETSYS TAPEMIGRATION(NONE) SETSYS PRIMARYSPMGMTSTART ( ) Also, do you have an OCDS present? Or is it dummy? Dummy, or rather it gets a message that it isn't specified. Note: From the STG Admin Guide: If you do not intent to use Tape, do not specify TAPEMIGRATION. If you do, an Offline control dataset is required. That might be the (non-intuitive) reason. There are no tapes in our environment, and specifying TAPEMIGRATION(NONE) should be valid, since we don't intend to use tapes. In other words, I'd better remove the line (although I am unhappy with the default) since it will not be set to NONE, anyway. And I must have overlooked that line, although I have been over all the HSM books for more than two weeks now... Thanks, Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
If things haven't been locked down too much, you might try ISPF command DDLIST, then subcommand LI to display linklist. Other tools such as PDSMAN also provide similar functions to display system components such as linklist. - Don Imbriale On Thu, Jul 4, 2013 at 12:09 AM, Farley, Peter x23353 peter.far...@broadridge.com wrote: Sorry, application programmers here are not allowed ANY operator functions (including /D). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
David Crayford wrote: Perl is definately ugly. It has a very large and cryptic grammar which makes it difficult to learn. I find it unpleasant to program in but I also dislike most shell scripting languages. The best thing about perl is the command line hacks. This is why I always say I have angry Perl skillz - because every time I have to use the language it pes me off! In an alternate universe, Rexx had the equivalent of CPAN created by the community, and we all use it instead...and are much happier. ...phsiii -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
S0C7 is the most simple cause of abend I can imagine. The only problem is to find the position in the program (that is: the source line) where the error occured. If you have this, you know the name of the variable causing the error, and the rest is a piece of cake. To get this, you need no tool. Simply look at reg 13 at the time of abend. This is the address of the current save area. The word 2 after the word at which reg 13 points to contains the address of the higher save area. There at position 16 (word 5) you find the address of the entry of the current procedure or function (which should be a little lower than the content of the current PSW at the time of error). Subtracting this from the PSW, you get the error offset - related to the beginning of the procedure or function. And, by looking at the PPA1 control block (which you can find by adding the content of EPA + 12 to the EPA address), you will get the name of the procedure (at PPA1 + X'38'), at least this is true for the current PL/1 and C compilers (maybe COBOL, too). Then you have the function name and the offset; now it's time to look at the compile listing. Of course you have it at hand, because it's production run, so the compile listing must have been archived during the deployment of the program. If you need classes for your mainframe developers to do dump analysis in Germany, Austria or Switzerland (or other countries), please contact me offline. Kind regards Bernd Am 03.07.2013 20:11, schrieb Kirk Talman: There have been several various good answers to this problem. As a certified alte kacker, I would like to comment on what this tells us about the state of mainframe IT. - Apparently one can be in Operating Systems Support w/o having been an application programmer. One of the advantages many of us older persons on this list and in the industry have is that we have seen it before. The idea that a person working in any technical job on a mainframe would not know what a S0C7 is and how to go after it is amazing to me. At one time there were machines w/o packed arithmetic, but now, apparently, training in system administration functions is considered adequate. Who on this list learned the majority of what they know via instruction? Most people learned most things by doing. The work we do is a craft, part art, part science. - The idea in this day and age of not having a tool to give diagnostic information when an abend occurs may indicate a lack of understanding by management, but is still amazing. IBMs Fault Analuzer is not, I think, expensive but is quite adequate to the task even in complex CICS/DB2/IMS/MQ environments. If I were told there were less expensive products available, I would not be surprised. - On the other hand, I recently had to modify a program older than the company. In code and macros I saw names of persons now high level managers. The code had a S0C7 recovery section that was miscoded because invalid assumptions were made about the effect of ignoring records causing the abend. And the people who own' the code were reluctant to fix the root cause even when the fix was spelled out for them. They finally did so only when embarrassed publicly. - The best education comes while acquiring scars and observing same in ones peers. IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 07/03/2013 07:10:18 AM: From: Mowry, Norma E CIV DISA ESB (US) norma.e.mowry@mail.mil To: IBM-MAIN@LISTSERV.UA.EDU, Date: 07/03/2013 07:11 AM Subject: Question on how to debug S0C7 (data exception) abend Sent by: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU We have a production job that is abending with S0C7 reason 0007. I set a slip to capture a dump but I can't seem to find the input record that is causing the S0C7 in this dump. I also have a CEEDUMP but that's not real helpful in diagnosing the issue. I looked a setting a slip with a trace but don't think that will do any good to get to the problem record. Norma Mowry -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
B37s. --- bernd.oppol...@t-online.de wrote: From: Bernd Oppolzer bernd.oppol...@t-online.de To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question on how to debug S0C7 (data exception) abend Date: Thu, 4 Jul 2013 17:01:29 +0200 S0C7 is the most simple cause of abend I can imagine. The only problem is to find the position in the program (that is: the source line) where the error occured. If you have this, you know the name of the variable causing the error, and the rest is a piece of cake. To get this, you need no tool. Simply look at reg 13 at the time of abend. This is the address of the current save area. The word 2 after the word at which reg 13 points to contains the address of the higher save area. There at position 16 (word 5) you find the address of the entry of the current procedure or function (which should be a little lower than the content of the current PSW at the time of error). Subtracting this from the PSW, you get the error offset - related to the beginning of the procedure or function. And, by looking at the PPA1 control block (which you can find by adding the content of EPA + 12 to the EPA address), you will get the name of the procedure (at PPA1 + X'38'), at least this is true for the current PL/1 and C compilers (maybe COBOL, too). Then you have the function name and the offset; now it's time to look at the compile listing. Of course you have it at hand, because it's production run, so the compile listing must have been archived during the deployment of the program. If you need classes for your mainframe developers to do dump analysis in Germany, Austria or Switzerland (or other countries), please contact me offline. Kind regards Bernd Am 03.07.2013 20:11, schrieb Kirk Talman: There have been several various good answers to this problem. As a certified alte kacker, I would like to comment on what this tells us about the state of mainframe IT. - Apparently one can be in Operating Systems Support w/o having been an application programmer. One of the advantages many of us older persons on this list and in the industry have is that we have seen it before. The idea that a person working in any technical job on a mainframe would not know what a S0C7 is and how to go after it is amazing to me. At one time there were machines w/o packed arithmetic, but now, apparently, training in system administration functions is considered adequate. Who on this list learned the majority of what they know via instruction? Most people learned most things by doing. The work we do is a craft, part art, part science. - The idea in this day and age of not having a tool to give diagnostic information when an abend occurs may indicate a lack of understanding by management, but is still amazing. IBMs Fault Analuzer is not, I think, expensive but is quite adequate to the task even in complex CICS/DB2/IMS/MQ environments. If I were told there were less expensive products available, I would not be surprised. - On the other hand, I recently had to modify a program older than the company. In code and macros I saw names of persons now high level managers. The code had a S0C7 recovery section that was miscoded because invalid assumptions were made about the effect of ignoring records causing the abend. And the people who own' the code were reluctant to fix the root cause even when the fix was spelled out for them. They finally did so only when embarrassed publicly. - The best education comes while acquiring scars and observing same in ones peers. IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 07/03/2013 07:10:18 AM: From: Mowry, Norma E CIV DISA ESB (US) norma.e.mowry@mail.mil To: IBM-MAIN@LISTSERV.UA.EDU, Date: 07/03/2013 07:11 AM Subject: Question on how to debug S0C7 (data exception) abend Sent by: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU We have a production job that is abending with S0C7 reason 0007. I set a slip to capture a dump but I can't seem to find the input record that is causing the S0C7 in this dump. I also have a CEEDUMP but that's not real helpful in diagnosing the issue. I looked a setting a slip with a trace but don't think that will do any good to get to the problem record. Norma Mowry -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN _ Netscape. Just the Net You Need. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
Ok. In this case you need no dump analysis; the error message is sufficient (as is the case with many system errors, for example S806 - system cannot find module XYZ ...). One of the first statements in my dump analysis handout: we normally only cover S0Cx errors - for most other errors we don't need no dump analysis. Simply look into MVS System Codes. Kind regards Bernd Am 04.07.2013 17:03, schrieb Richard Pinion: B37s. --- bernd.oppol...@t-online.de wrote: From: Bernd Oppolzer bernd.oppol...@t-online.de To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question on how to debug S0C7 (data exception) abend Date: Thu, 4 Jul 2013 17:01:29 +0200 S0C7 is the most simple cause of abend I can imagine. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
Bernd has summarized this situation more than adequately. Norma Mowry did not provide us with full information about the COBOL compiler that produced the offending program, but if it is a fairly recent Enterprise COBOL compiler it would, given the right compiler options, almost certainly be possible to shoot this 0c7 at the source-program level. That said, it is clear that the applications staff here lacks some skills it should have. If COBOL is itsr development language, there must be someone who can read LE dumps available. Not all system ABENDs are so easy to deal with as 0c7's. Let me also note that another implicit assumption has figured in these discussions. If the ABEND occurred in SYNCHSORT code, it would almost certainly have provided diagnostic information that was identifiable as such. It is still possible, albeit very unlikely, that the error is in the record/sort-field description provided to SYNCHSORT; and that description should be checked. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
On 7/4/2013 9:21 AM, Bernd Oppolzer wrote: Ok. In this case you need no dump analysis; the error message is sufficient (as is the case with many system errors, for example S806 - system cannot find module XYZ ...). One of the first statements in my dump analysis handout: we normally only cover S0Cx errors - for most other errors we don't need no dump analysis. Simply look into MVS System Codes. Kind regards Bernd Right. In our courses we take a similar approach: 1. Debug at the highest level possible (messages, codes, application outputs, source code, dump) 2. Always assume the error is in software (not hardware) unless definite proof to the contrary exists 3. Always assume the error is in your software (you are not likely to debug system errors), unless proof to the contrary exists 4. Use only the relevant information (keep it simple. Watch out for 'rapture of the dump'.) Still, for 1) above, one mustn't be afraid of diving into a dump if it's called for. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html Am 04.07.2013 17:03, schrieb Richard Pinion: B37s. --- bernd.oppol...@t-online.de wrote: From: Bernd Oppolzer bernd.oppol...@t-online.de To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question on how to debug S0C7 (data exception) abend Date: Thu, 4 Jul 2013 17:01:29 +0200 S0C7 is the most simple cause of abend I can imagine. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Orphaned ICF catalog in the VVDS
I have run an IDCAMS diagnose on a volume to find non-existent catalog entries . I tried DELETE VVR/NVR/TRUENAME to no avail. How can I get rid of the stranded catalog references in the VVDS? Respectfully, Willie C. Rouse Senior Mainframe Consultant Prince George's County, Maryland Office of Information Technology 9201 Basil Court/ Room B8 Largo, MD 20774 Voice: 301-883-7189 Fax: 301-883-3790 This E-mail and any of its attachments may contain Prince George’s County Government or Prince George's County 7th Judicial Circuit Court proprietary information or Protected Health Information, which is privileged and confidential. This E-mail is intended solely for the use of the individual or entity to which it is addressed. If you are not the intended recipient of this E-mail, you are hereby notified that any dissemination, distribution, copying, or action taken in relation to the contents of and attachments to this E-mail is strictly prohibited by federal law and may expose you to civil and/or criminal penalties. If you have received this E-mail in error, please notify the sender immediately and permanently delete the original and any copy of this E-mail and any printout. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
Richard Pinion wrote: B37s. 222 is easier to handle ;-D Ok, perhaps 322, 722, 822 or 878 are also easy. 622 is somewhat difficult to explain to an angry TSO user, but manageable. My users don't like 722 for obvious reasons. I wonder why, oh, why? ;-D Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
If you have an LE Dump (CEEDUMP, CEESNAP), it's still easier, because LE gives you the traceback of the function or procedure calls, where you find all the information including the offsets I mentioned in my previous post, and you don't even need to do any calculations. If you compiled your programs using the GONUMBER options (which makes them larger, but not - much - slower), the LE Dump will even tell you the source line numbers at every call level. Again: ask for classes in German (or English) covering all those subjects; I do classes customized esspecially to the needs of your installation. Kind regards Bernd Am 04.07.2013 17:28, schrieb John Gilmore: Bernd has summarized this situation more than adequately. Norma Mowry did not provide us with full information about the COBOL compiler that produced the offending program, but if it is a fairly recent Enterprise COBOL compiler it would, given the right compiler options, almost certainly be possible to shoot this 0c7 at the source-program level. That said, it is clear that the applications staff here lacks some skills it should have. If COBOL is itsr development language, there must be someone who can read LE dumps available. Not all system ABENDs are so easy to deal with as 0c7's. Let me also note that another implicit assumption has figured in these discussions. If the ABEND occurred in SYNCHSORT code, it would almost certainly have provided diagnostic information that was identifiable as such. It is still possible, albeit very unlikely, that the error is in the record/sort-field description provided to SYNCHSORT; and that description should be checked. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
Wow! Never heard of the language but I'm envious. On 7/4/2013 5:59 AM, Wayne Bickerdike wrote: Mark IV had a ruler too... On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas tonybabo...@icloud.com wrote: Rising to the defense of RPG, what other language had its own ruler? Talk about ease of coding! Ah the nostalgia.sigh. Sent from Tony's iPhone. On Jul 3, 2013, at 9:50 PM, John McKown john.archie.mck...@gmail.com wrote: I've not run across many languages that I considered ugly. RPG II was one. EasyTrieve Plus is not ugly, but I don't much like it. The newest IBM COBOL is rather nice, albeit still wordy. The first COBOL that I learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of the same era. The main thing that I hate is a manager saying use xyz, but refrain from using the new omega facilities. The reason being that everybody in the shop knows the basic xyz language, but is not familiar with the omega features. So I am chained down to the least common denominator for ease of understanding by those who simply won't learn new stuff. Case in point in my current shop, at least in the past, was not using any z/OS UNIX facilities because they were just too esoteric and complicated. On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In CAAJSdjg1jRs6DrNV7xzAftEoGcojyeGf=fvwkbdh_idvozp...@mail.gmail.com, on 07/03/2013 at 07:10 AM, John McKown john.archie.mck...@gmail.com said: http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things I say yes to most. #4 is being forced to learn or use some specific technology What if you consider a language to be ugly but also consider it to be the best tool for the job? I don't care for Perl syntax, but between the expressive power of the language and the modules available in CPAN, I find myself using it regardless. That's not a boss telling me that I have to - it's my own decision. -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN -- This is a test of the Emergency Broadcast System. If this had been an actual emergency, do you really think we'd stick around to tell you? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
It's a bona fide US holiday, which trumps even Friday. I should not take on someone with a bona fide Germanic name, but German happens to be the closest thing I have to a (distant) second language. (Der) alter Kacker is the masculine singular. Definite article 'der' changes adjective from marked masculine 'alter' to 'alte'. As opposed to indefinite article as in 'ein alter Mann'. If you're old enough to remember the venerable statesman Konrad Adenauer, he was referred to 'Der Alte', . . JO.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Gerhard Postpischil gerh...@valley.net To: IBM-MAIN@LISTSERV.UA.EDU, Date: 07/03/2013 11:44 PM Subject:Re: Question on how to debug S0C7 (data exception) abend Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU On 7/3/2013 12:11 PM, Kirk Talman wrote: As a certified alte kacker, I would like to comment on what this tells us about the state of mainframe IT. Somewhat off topic, but if that was supposed to be German, it's wrong. I only have a rudimentary knowledge of Yiddish, but I believe it's wrong there, too. (Die) alte Kacker is the valid masculine plural. (Der) alter Kacker is the masculine singular. (Die) alte Kackerin is the feminine singular. I assume you meant the second form, unless you are suffering from multiple personality disorder g Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
On 7/4/2013 1:43 PM, Skip Robinson wrote: Definite article 'der' changes adjective from marked masculine 'alter' to 'alte'. As opposed to indefinite article as in 'ein alter Mann'. That's why I put the definite articles in parenthesis. In Kirk's original post, he used the indefinite article, which would have translated as Ein alter Kacker. Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
Working most of these..RPG was a bit of challenge ..easytrieve wasn't too , but I have In SAS..now MarkIV, haven't heard of that one. I also learned Assembler, Cobol and the PL/1 ...like several of the guys I liked PL/1 ... Scott ford www.identityforge.com from my IPAD 'Infinite wisdom through infinite means' On Jul 4, 2013, at 1:28 PM, Tony Babonas tonybabo...@icloud.com wrote: Wow! Never heard of the language but I'm envious. On 7/4/2013 5:59 AM, Wayne Bickerdike wrote: Mark IV had a ruler too... On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas tonybabo...@icloud.com wrote: Rising to the defense of RPG, what other language had its own ruler? Talk about ease of coding! Ah the nostalgia.sigh. Sent from Tony's iPhone. On Jul 3, 2013, at 9:50 PM, John McKown john.archie.mck...@gmail.com wrote: I've not run across many languages that I considered ugly. RPG II was one. EasyTrieve Plus is not ugly, but I don't much like it. The newest IBM COBOL is rather nice, albeit still wordy. The first COBOL that I learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of the same era. The main thing that I hate is a manager saying use xyz, but refrain from using the new omega facilities. The reason being that everybody in the shop knows the basic xyz language, but is not familiar with the omega features. So I am chained down to the least common denominator for ease of understanding by those who simply won't learn new stuff. Case in point in my current shop, at least in the past, was not using any z/OS UNIX facilities because they were just too esoteric and complicated. On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In CAAJSdjg1jRs6DrNV7xzAftEoGcojyeGf=fvwkbdh_idvozp...@mail.gmail.com, on 07/03/2013 at 07:10 AM, John McKown john.archie.mck...@gmail.com said: http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things I say yes to most. #4 is being forced to learn or use some specific technology What if you consider a language to be ugly but also consider it to be the best tool for the job? I don't care for Perl syntax, but between the expressive power of the language and the modules available in CPAN, I find myself using it regardless. That's not a boss telling me that I have to - it's my own decision. -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN -- This is a test of the Emergency Broadcast System. If this had been an actual emergency, do you really think we'd stick around to tell you? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers
On 21 Jun 2013 11:26:53 -0700, in bit.listserv.ibm-main you wrote: On Fri, 2013-06-21 at 15:18 -0300, Clark Morris wrote: And IBM thinks COBOL is the language of the future. Right and I sell bridges. Well... that's what Tom Ross says anyway. You'd dispute Tom? I realize that this is belated but yes I would vigorously dispute him. Mike Cowlishaw of Rexx renown worked diligently on defining decimal floating point and the standard for it. The z series has had decimal floating point for a number of years. It has been supported in PL1, C/C++ and Java. To date it has NOT been implemented in COBOL despite the claim for Java interoperability and the fact that decimal floating point natively supports 6 types of rounding. Java uses IEEE floating point and instead of adding the IEEE floating point types to COBOL as DEFINED in the 2002 standard and leaving the COMP-1 and COMP-2 type for hex floating point thus keeping upward compatibility, there is a conversion to or from hex floating point when dealing with Java. USAGE BIT and logical operations which are in the 2002 standard have not been implemented. There are OO classes for CICS in C/C++ and PL1. Are there any for COBOL? COBOL as defined in the 2002 standard can handle the SMF 14 and 30 records without going through contortions to handle the bit switches. COBOL 2002 finally has EXIT PERFORM and EXIT PARAGRAPH. Granted that a sales job would be needed to explain why management should care about the improvements made available in that standard but if it were the language of the future, it would be worth the expenditure. On the other hand, given many of the tales told here and probably the stories told about all of the features in the 1985 standard that have remained unused in many or most shops, IBM could well question whether it would be worth the effort. If the long term is movement to packages that are implemented in other languages anyway, improvement is money wasted. I believe that a lot less work is being done by COBOL programs than was done ten or fifteen years ago. Every SAP installation reduces the workload on COBOL by that much more. On other platforms the native COBOL file systems (there is no equivalent of VSAM for example) don't exist and the run-time costs can be high. From my following of comp.lang.cobol and what I see in the market place, COBOL is in its final years. Clark Morris -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
In article b870629719727b4ba82a6c06a31c291239e0fad...@hqmailsvr01.voltage.com you write: In an alternate universe, Rexx had the equivalent of CPAN created by the community, and we all use it instead...and are much happier. Hi Phil, I have been following this thread wondering if someone would mention Rexx. My favorite language. Thanks. -- Rich Greenberg Sarasota, FL, USA richgr atsign panix.com + 1 941 378 2097 Eastern time. N6LRT I speak for myself my dogs only.VM'er since CP-67 Canines: Val,Red,Shasta,Zero,Casey Cinnar (At the bridge) Owner:Chinook-L Canines: Red Max (Siberians) Retired at the beach Asst Owner:Sibernet-L -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
In article 20130704194045.f3e3824...@panix5.panix.com you write: In article b870629719727b4ba82a6c06a31c291239e0fad...@hqmailsvr01.voltage.com you write: In an alternate universe, Rexx had the equivalent of CPAN created by the community, and we all use it instead...and are much happier. Hi Phil, I have been following this thread wondering if someone would mention Rexx. My favorite language. Thanks. My apologies to the group. The above was intended to be a private email to phil, but I sed it up. -- Rich Greenberg Sarasota, FL, USA richgr atsign panix.com + 1 941 378 2097 Eastern time. N6LRT I speak for myself my dogs only.VM'er since CP-67 Canines: Val,Red,Shasta,Zero,Casey Cinnar (At the bridge) Owner:Chinook-L Canines: Red Max (Siberians) Retired at the beach Asst Owner:Sibernet-L -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
It's a bona fide US holiday, which trumps even Friday. I disagree. Many on the list are not Americans. You didn't hear any of we Canadians trumpeting our holiday on July 1st. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
Frank and Peter Would you be so kind to share the JCL needed to compile it in any flavor please. I do not mind whether somebody use PCRE or opting to use the Posix compliant IBM supplied modules, both are fine for any simple (or even semi-complex) regex (if you know what to expect from Posix vs. Perl compliance.) I'd like people to familirize ith the concept and use it. ZA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
Ted, that would be locality of reference. I suppose you'd complain if someone in Australia said It's Friday, because many on the list aren't Australian? Sheesh. Over-sensitive Canadians... On Thu, Jul 4, 2013 at 3:57 PM, Ted MacNEIL eamacn...@yahoo.ca wrote: It's a bona fide US holiday, which trumps even Friday. I disagree. Many on the list are not Americans. You didn't hear any of we Canadians trumpeting our holiday on July 1st. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PDSE Issue
There is a share presentation out there for PDSE best practices https://www.google.co.in/url?sa=trct=jq=esrc=ssource=webcd=5cad=rjaved=0CD8QFjAEurl=https%3A%2F%2Fshare.confex.com%2Fshare%2F120%2Fwebprogram%2FHandout%2FSession12981%2FSHARE%2520PDSE%2520Best%2520Practices.pdfei=YtzVUc2_N4jGrAfU6IDYBwusg=AFQjCNGf3snjN_m-Xaa9kgTeyhwp048rxwbvm=bv.48705608,d.bmk Regards, Bob Date: Wed, 3 Jul 2013 07:18:59 +0200 From: nitz-...@gmx.net Subject: Re: PDSE Issue To: IBM-MAIN@LISTSERV.UA.EDU Matt, V SMS,PDSE,ANALYSIS IGW031I PDSE ANALYSIS Start of Report(SMSPDSE ) 879 ++ Unable to latch ASRBULCH:7FF94DC0 Latch:7FF94DD8 Holder(006A:00AFF208) Holding Started Task:TECHCICS -data set name-- -vsgt--- SYSVIEW.R137.CNM4BLOD.SYS1 01-SYS002-000614 ++ Unable to latch HL1b:7FF67600 Latch:7FF67610 Holder(006A:00AFF208) IGWLHPRG Holding Started Task:TECHCICS Good old ASRBULCH latch. First of all, make sure you have all the required maintenance for PDSE on (there are several apars involving ASRBULCH out there, and this appears to be an ongoing bug that IBM seems unable to fix). VARY SMS,PDSE1,FREELATCH(7FF67610,006A,00AFF208),RETRIES(5) IGW032I PDSE FREELATCH Start of Report 889 ++ Free latch failed latch:7FF94DD8 is either broken or not a latch PDSE FREELATCH End of Report In my case (we had it twice) it was not obvious which latch to free (there were tons of ASRBULCH ones). So I went through all of them and eventually found the one that was left and had caused everyone else to back up. In that process, I also generated some PDSE abends complaining about freed latches. By the way, even forcing the address spaces will not clear the contention! Admittedly, I have never seen the response of 'either broken or not a latch'. That sounds like something went ahead and freed the storage where the latch is situated. I have heard from our customers (who were also affected for a library that is NOT in linklist) that restarting SMSPDSE1 did not free the latches. The customers affected by it were also able (with trial and error) to use freelatch. If that library SYSVIEW.R137.CNM4BLOD.SYS1 is not a load library (or anthing else that *requires* it to be a PDSE) then I suggest to make it a PDS to avoid hitting PDSE code. If you have the appropriate contract with IBM, when this hits next, then take a dump of the address spaces involved in the latch contention and SMSPDSE/1 and report the bug to IBM. Regards, Barbara Nitz -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
[Replying again from my work account since my Google Groups reply did not make it to the list - I forgot that is a one-way gateway] Based on a brief review, this text of the pcre man pages says yes to all of those: http://www.pcre.org/pcre.txt Though not, of course, the Perl-only pattern features that interpret Perl code dynamically. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Wednesday, July 03, 2013 10:37 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Announcing PCRE 8.33 for native z/OS In 7859492443392344.wa.zatlas1yahoo@listserv.ua.edu, on 07/03/2013 at 05:58 PM, Ze'ev Atlas zatl...@yahoo.com said: In any case, PCRE is mature and working library with most all (even esoteric) options. Branch reset? Conditional patterns? Named backreferences? Recursive patterns? -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
Ze'ev, I would if I could. I used our shop-standard SCLM system to store and compile the test program, and most of that translate process is driven by a complex series of Rexx exec's, not JCL. I do have some compile-and-link-outside-the-SCLM JCL though, so when I get a chance I will retest the program with just plain JCL and share my results. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Ze'ev Atlas Sent: Thursday, July 04, 2013 4:09 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Announcing PCRE 8.33 for native z/OS Frank and Peter Would you be so kind to share the JCL needed to compile it in any flavor please. I do not mind whether somebody use PCRE or opting to use the Posix compliant IBM supplied modules, both are fine for any simple (or even semi-complex) regex (if you know what to expect from Posix vs. Perl compliance.) I'd like people to familirize ith the concept and use it. ZA -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
I don't like the Friday digressions! Sheesh. Insensitive Americans... - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -Original Message- From: zMan zedgarhoo...@gmail.com Sender: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Date: Thu, 4 Jul 2013 16:30:43 To: IBM-MAIN@LISTSERV.UA.EDU Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question on how to debug S0C7 (data exception) abend Ted, that would be locality of reference. I suppose you'd complain if someone in Australia said It's Friday, because many on the list aren't Australian? Sheesh. Over-sensitive Canadians... On Thu, Jul 4, 2013 at 3:57 PM, Ted MacNEIL eamacn...@yahoo.ca wrote: It's a bona fide US holiday, which trumps even Friday. I disagree. Many on the list are not Americans. You didn't hear any of we Canadians trumpeting our holiday on July 1st. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
I was talking about SCEELKED at run time, no compile time. It's (or SCEELKEX for lower-case entry points) definitely required at compile time for static calls, and that works. But when I tried dynamic calls, even with SCEERUN in the linklist, it said it couldn't find the REG* modules. From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, July 3, 2013 10:09 PM Subject: Re: Announcing PCRE 8.33 for native z/OS Sorry, application programmers here are not allowed ANY operator functions (including /D). And I realized after I wrote my prior reply that SCEELKED was required in your case because you used NODYNAM, thus needing static bind-time merging of the modules from SCEELKED. I didn't need it because apparently DYNAM generates the correct call to the SCEERUN* library(ies) at runtime or to the in-core C runtime modules under the LE covers. Or maybe our automated compile scripts already included SCEELKED. I have to check on that, just in case I am wrong. If they do automatically include SCEEKLED I'll report back. In any case, thanks once again for the terrific POC (proof of concept) code. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Wednesday, July 03, 2013 6:41 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Announcing PCRE 8.33 for native z/OS Hmm, perhaps underscores did come with COBOL 4.2. I don't recall. Can you do /D PROG,LNKLST in SDSF? That will get you the active linklist. The only CEE libraries we have there are CEE.SCEERUN and CEE.SCEERUN2. I though that CEE.SCEELKED was a link/bind-time library only, but I could be wrong! (What possible harm could it be for an applications programmer to look at the system PARMLIBs...) Not sure why my use of CP1140 didn't work. Maybe I'll fool around with it later. Frank From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, July 3, 2013 4:20 PM Subject: Re: Announcing PCRE 8.33 for native z/OS Yes, it did execute just fine in batch from JCL with DYNAM, and our default COBOL code page is 1140 as well, and it still worked fine. However, I did not need to add SCEELKED to the STEPLIB so our systems folk probably have it in the linklist. No way for me to confirm that though, PARMLIB here is security protected against reads by ordinary people. Thanks for the note about using value for the length parameter to regerror, I'll change that in my test program. We are running Enterprise COBOL 4.1 here, and I cannot seem to get it to accept underscores. Maybe that was added via PTF or APAR and we don't have it applied? Or maybe that was only introduced in 4.2? I'll have to go look that up in the FM's later. Have a happy and safe Independence Day. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Frank Swarbrick Sent: Wednesday, July 03, 2013 4:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Announcing PCRE 8.33 for native z/OS 1) Did you actually get it to work (execute) with DYNAM? That is our shop standard as well, but when I try it I get a program not found error (S806), or if I add CEE.SCEELKED to the JOBLIB I get an S0C1(?!?!). Also, do you use codepage 1047 by default? I didn't expect it to work with codepage 1140 (our default) and it in fact did not work. (No errors given, but no matches either. 2) Underscores are allowed in COBOL data names as of COBOL 4, I believe. 3) Oops! Forgot to code that. You need to pass the length by value, though. I used ...value length of msgbuf, but you can use your ...value lmsgbuf' if you want. 4) I won't ask. :-) Frank From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Wednesday, July 3, 2013 1:20 PM Subject: Re: Announcing PCRE 8.33 for native z/OS Frank, First let me say: Very cool, man! I was inspired by your 30 minutes to take a few of my own to see if I could duplicate your experiment in our somewhat more staid (i.e., no PDSE's for application COBOL load modules) environment, and sure enough I can. I had to make a couple of small changes to your code to accomplish my test: 1. Remove PROCESS cards and default to shop-standard PGMNAME(COMPAT) and DYNAM 2. Change underscores to hyphens in the data names 3. Add using and returning parameters to the regerror call, which I guess never caused you a problem due to no errors happening at execution time 4. Use double-quotes instead of apostrophes around the called program names due to an internal application standard requirement (don't ask, long story) So below is my revised copy of your code, which works when compiled to a load module in a PDS and produces the same output as you got.
Re: Announcing PCRE 8.33 for native z/OS
In 2097080765646466.wa.zatlas1yahoo@listserv.ua.edu, on 07/03/2013 at 08:36 PM, Ze'ev Atlas zatl...@yahoo.com said: compatible with Perl Which Perl? 7. I contemplated interfacing with Rexx, but I cannot come with specific well defined API that would agree with that language. The obvious way is to return, e.g., capture buffers, %+ and %- in REXX variables. And, in the end of the day, while I could read IBM manuals, I do not have the expertise to interface with that language. If anybody wants to help, this is where help is needed. I've written REXX-callable functions for CMS and TSO; I don't have a system to test on. written in, you guessed, Perl Will they work in 5.8.7? That's currently the last Perl for z/OS. -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: I am getting a wait state during IPL
In cae1xxdfdyi9taobsej9fwe-vmosgjvm9xjbnzvhpkj5fxrx...@mail.gmail.com, on 07/04/2013 at 07:20 AM, John Gilmore jwgli...@gmail.com said: Nor is there is any 65-bit support 'in' z/OS. I suspect that what we have here is not a dubious, heterodox hardware notion but something much more benign, a typo. When did you start considering typos to be benign? -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
In b870629719727b4ba82a6c06a31c291239e0fad...@hqmailsvr01.voltage.com, on 07/04/2013 at 05:54 AM, Phil Smith p...@voltage.com said: In an alternate universe, Rexx had the equivalent of CPAN created by the community, and we all use it instead...and are much happier. In an alternate universe the standard REXX for CMS and TSO is OREXX with full block structuring, ranges, regexen and some control structures stolen from Icon and Perl. -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: I am getting a wait state during IPL
On 7/4/2013 2:07 PM, Shmuel Metz (Seymour J.) wrote: When did you start considering typos to be benign? Probably when it is obviously a typo. Now on the other hand, if someone mentions 32-bit addressing in relation to MVS/XA, the statement is ambiguous. Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on how to debug S0C7 (data exception) abend
Ah. So it was really a comment on topic drift--I'm with ya there! On Thu, Jul 4, 2013 at 5:54 PM, Ted MacNEIL eamacn...@yahoo.ca wrote: I don't like the Friday digressions! Sheesh. Insensitive Americans... - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -Original Message- From: zMan zedgarhoo...@gmail.com Sender: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Date: Thu, 4 Jul 2013 16:30:43 To: IBM-MAIN@LISTSERV.UA.EDU Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question on how to debug S0C7 (data exception) abend Ted, that would be locality of reference. I suppose you'd complain if someone in Australia said It's Friday, because many on the list aren't Australian? Sheesh. Over-sensitive Canadians... On Thu, Jul 4, 2013 at 3:57 PM, Ted MacNEIL eamacn...@yahoo.ca wrote: It's a bona fide US holiday, which trumps even Friday. I disagree. Many on the list are not Americans. You didn't hear any of we Canadians trumpeting our holiday on July 1st. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
Which Perl? I am using v5.14.2 7. I contemplated interfacing with Rexx, but I cannot come with specific well defined API that would agree with that language. The obvious way is to return, e.g., capture buffers, %+ and %- in REXX variables. I will look into that when I get to it. Thank you. I've written REXX-callable functions for CMS and TSO; I don't have a system to test on. If and when you could, your help would be welcome written in, you guessed, Perl Will they work in 5.8.7? That's currently the last Perl for z/OS. Sorry for that situation. I heard that some people are working on bringing a later version and I think IBM should have done better, bt that's not in my hands. I use Windows 7 machine with ActiveState Perl. ZA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN