Re: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers
On 10/07/2013 1:04 PM, Farley, Peter x23353 wrote: Based on the announced capability to use new (to COBOL) TUNE and ARCH compiler options, I suspect the answer to that question is that it is the same shared backend. I heard a rumour that COBOL was going to use the same back-end that the Java JIT uses. It was also suggested PL/1 and C/C++ would also be using the same universal back-end in the future. Having seen the output of that backend during a recent research project in MetalC, I am quite impressed by its capabilities to *really* optimize the instruction stream, unlike the sadly lacking current COBOL backend. I think we're going to like it. A *lot*. At least, I have some real hope that we will, though this *is* IBM we are talking about. Do they really want to significantly optimize the existing COBOL executable base as it is recompiled for maintenance and enhancements, reducing MSU usage all over the place? They have, time and again, shown themselves quite capable of deliberately reducing the effectiveness of new technology to preserve their revenue stream for a few more quarters. We will see. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of David Crayford Sent: Tuesday, July 09, 2013 9:06 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers Snipped It has taken us a while, but we now have a modern backend (code generator and optimizer) for COBOL that can exploit the latest hardware, and will support DFP, AMODE 64 and many of the other z/OS system features that we have not be able to exploit in the past. Is that new backend bespoke for COBOL or is it shared with PL/1, C/C++, Java? Cheers, TomR COBOL is the Language of the Future! -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DB2 image backup and DFSMSdss dataset backup
We put DB2 databases in their own storage group, and don't take DSS backups. Same with IMS. Application needs to be shut down and use DB2 / IMS / Database backup methods. The ADRDSSU backup with the transaction going would probably not be in a consistent state, I.E. some parts include a specific transaction and some parts don't. On Wed, Jul 10, 2013 at 12:42 AM, Victor Zhang victor_wor...@yahoo.com.cn wrote: Hello experts, Occasionally in my shop, DSS dataset backup will run concurrently with DB2 image backup, the targe devices are Oracle virtual tape storage, however, it is noticed that DSS backup will be slowed down by DB2 backup. For example, if DSS backup run indepently, it may run about 10 minutes, however if run concurrently with DB2 image backup, it may take about one hour to finish. Is there a method to allow DSS backup run more smoothly even if it is running concurrently with DB2 image copy? Regards Victor -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Question on WRITE statements in ACS and Automation
Darth Keller wrote: Well, this gets more interesting as it appears that there must be some automation in place as I'm only seeing the IGD010*I (* = 07, 08, 09, 10) on 2 of my 4 production LPAR's. More reasons for a SHARE requirement! Are you sure your messages are not being suppressed? I am sure they are not suppressed after looking in all my MPFLSTxx and my automation suppression lists. I still think the SHARE requirement would be valid as I want to see ALL the messages in the log - batch, TSO, etc. Agreed! But take in account that different macros are using to place a message on batch (WTO), TSO (TPUT), etc. 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: Method to measure usage of a physical tape
Mike Schwab wrote: http://www.dvdrewinder.com/ Hmmm, cute and entertaining devices, I need 2 of them! One for Local usage and another at my DRP site! ;-D I believe in recycling my old DVDs. Use them as placeholders for my cup of hot coffee. ;-) 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: regex that never matches?
In 9391203323671928.wa.paulgboulderaim@listserv.ua.edu, on 07/09/2013 at 09:56 AM, Paul Gilmartin paulgboul...@aim.com said: Thanks! I never woulda thoughta that. Seems to work for sed and grep; nearly an exhaustive sample. Now I need to try to understand it: The sequence (? starts an extended pattern; in this case, a look-around assertion (?!pattern) with a null pattern. 'A zero-width negative look-ahead assertion. For example /foo(?!bar)/ matches any occurrence of foo that isn't followed by bar.' -- 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: regex that never matches?
This reminds me of an experiment of a colleague of mine, several years ago. He tried to transform a Rexx program of about one screen of statements into one Rexx statement, using nesting, recursive programming and other fancy stuff. It took him about a week, but he succeeded. Of course it was completely incomprehensible what the statement did, but it worked. Kees. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Wednesday, July 10, 2013 03:17 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: regex that never matches? In 9391203323671928.wa.paulgboulderaim@listserv.ua.edu, on 07/09/2013 at 09:56 AM, Paul Gilmartin paulgboul...@aim.com said: Thanks! I never woulda thoughta that. Seems to work for sed and grep; nearly an exhaustive sample. Now I need to try to understand it: The sequence (? starts an extended pattern; in this case, a look-around assertion (?!pattern) with a null pattern. 'A zero-width negative look-ahead assertion. For example /foo(?!bar)/ matches any occurrence of foo that isn't followed by bar.' -- 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 For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
GIYF... principles of operation in the address bar of Chrome and the first link is the right one... Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Buffering: stdout vs. stderr?
On Tue, 9 Jul 2013 18:12:38 -0500, Paul Gilmartin paulgboul...@aim.com wrote: My test program, isbuffer.c: ... in which they were executed. However, when I compile in Enhanced ASCII mode and link with xplink, I get: Could that be due to optimisation of the code? I know that the code optimiser sometimes does strange things and there are remarks to that end in the compiler documentation. (And let it be clear: I can live with that, as it drives down CPU usage by 25% or more, easily!) I have taken the habit of always use fflush if I need to be sure the buffer has to be flushed at any given point in the program. It makes things explicit. Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Advice about extending the PCREGREP
In 7172652089479824.wa.zatlas1yahoo@listserv.ua.edu, on 07/09/2013 at 10:27 PM, Ze'ev Atlas zatl...@yahoo.com said: I asked, but I am asking again, with regard to the fact that we are talking about C, The answer doesn't depend on the language. how would I pass quoted file names (i.e. with HLQ) in the PARM= field of the JCL The rule for EXEC PARM= is the same as for other contexts; double the apostrophe. The same applies to any ampersands that you need to escaped. //FOOEXEC PGM=BAR, PARM=('single ','DSN=''BAZ.PLI''') -- 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: Benchmark of Relative instructions vers Base+displacement ones
In 8D261BD3BE29432A8E80B90B218DA523@RichardPC, on 07/09/2013 at 04:51 PM, Richard Verville r.vervi...@videotron.ca said: that link has the same manual I have already z/Architecture Principles of Operation, SA22-7832-09? and the LGFI instruction is not in it P. 7-219 -- 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: Reading PDS/PDSE members from within COBOL in a loop
In 1193627443508296.wa.paulgboulderaim@listserv.ua.edu, on 07/09/2013 at 03:39 PM, Paul Gilmartin paulgboul...@aim.com said: It's a pity that QPAM isn't invented, Actually, it[1] was, in TSS/360. See FIND, GET, PUT and STOW in IBM Time Sharing System Assembler User Macro Instructions, GC28-2004-6. [1] Under the names VPAM and VIPAM -- 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: regex that never matches?
In 2304481172006741.wa.paulgboulderaim@listserv.ua.edu, on 07/09/2013 at 02:31 AM, Paul Gilmartin paulgboul...@aim.com said: But is there a general case: a regex that will never match any string whatever? Well, (*FAIL) is experimental, but what about (?!)? -- 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: DB2 image backup and DFSMSdss dataset backup
The db2 image backup is backing db2 data file online, while dss backups different datasets that are not part of db2 managed. But when they both write to same vritual tape devices, dss backup job slowed down by db2 image backup. Is there a method to prevent this while allow both jobs ran concurrently? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
Right, but when you get there you have to sign in to download the book. (A process that sometimes works, sometimes not.) Wouldn't it be better for the Elements and Features page to include the latest version? Yes, I know that Elements and Features is a z/OS-relevant page and Principles of Operation is zArchitecture related, but the vast majority of those developing assembler code for z are doing so for z/OS. You shouldn't have to google to find this book. === Date: Wed, 10 Jul 2013 05:33:45 -0500 From: jan.moeyers...@gfi.be Subject: Re: Benchmark of Relative instructions vers Base+displacement ones To: IBM-MAIN@LISTSERV.UA.EDU GIYF... principles of operation in the address bar of Chrome and the first link is the right one... Cheers, Jantje. -- 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: DB2 image backup and DFSMSdss dataset backup
Victor, Do you have OPT(4) coded for your DSS Dumps? -Original Message- From: Victor Zhang [mailto:victor_wor...@yahoo.com.cn] Sent: Wednesday, July 10, 2013 7:53 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: DB2 image backup and DFSMSdss dataset backup The db2 image backup is backing db2 data file online, while dss backups different datasets that are not part of db2 managed. But when they both write to same vritual tape devices, dss backup job slowed down by db2 image backup. Is there a method to prevent this while allow both jobs ran concurrently? -- 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: regex that never matches?
Ex APL programmer? snip This reminds me of an experiment of a colleague of mine, several years ago. He tried to transform a Rexx program of about one screen of statements into one Rexx statement, using nesting, recursive programming and other fancy stuff. It took him about a week, but he succeeded. Of course it was completely incomprehensible what the statement did, but it worked. Kees. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: regex that never matches?
No idea, he is not working here anymore. Kees. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Staller, Allan Sent: Wednesday, July 10, 2013 14:56 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: regex that never matches? Ex APL programmer? snip This reminds me of an experiment of a colleague of mine, several years ago. He tried to transform a Rexx program of about one screen of statements into one Rexx statement, using nesting, recursive programming and other fancy stuff. It took him about a week, but he succeeded. Of course it was completely incomprehensible what the statement did, but it worked. Kees. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
J R wrote | You shouldn't have to google to find this book. about the PrOp, and you need not do so. The IBM Publications Center website http://www-05.ibm.com/e-business/linkweb/publications/servlet/pbi.wss will give you a list of all of the available, downloadable and/or orderable-as-hardcopy versions; and all you need then do is choose the latest one. Currently, all of SA22-7832-00, . . . , SA22-7832-09 can be downloaded. 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: DB2 image backup and DFSMSdss dataset backup
Could you post your DFDSS control cards? Lizette -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Victor Zhang Sent: Tuesday, July 09, 2013 10:43 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: DB2 image backup and DFSMSdss dataset backup Hello experts, Occasionally in my shop, DSS dataset backup will run concurrently with DB2 image backup, the targe devices are Oracle virtual tape storage, however, it is noticed that DSS backup will be slowed down by DB2 backup. For example, if DSS backup run indepently, it may run about 10 minutes, however if run concurrently with DB2 image backup, it may take about one hour to finish. Is there a method to allow DSS backup run more smoothly even if it is running concurrently with DB2 image copy? Regards Victor -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
REXX and CEEPIPI questions.
I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. Also, I am not totally sold on having an LE environment hang around. I do know that it saves on start up and shut down time. But I don't know if it is worth the effort because I don't really have a handle on how many PCRE invocations are going to be done in a single execution of a REXX program. -- 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
Re: regex that never matches?
Gil, I believe that /.^./ or /.$./ both satisfy your requirement. Cheers, Peter Stockdill. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Tuesday, 9 July 2013 3:32 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: regex that never matches? Kind of a programming challenge, in view of all the PCRE chatter hereabouts lately: A vendor once supplied an interface where one of the required arguments was a regex to exclude from processing any matching line. But I wanted every line in my data processed. So, how? For my particular data, I could use: /Pattern that I know does not occur in my data/ or: / \000 \012 / ... unlikely to occur in lines processed by sed or awk. But is there a general case: a regex that will never match any string whatever? -- gil -- 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: Missing HSM backups
Hello, just a thought but are the datasets being backed up via an hbackds command? they might have an explicit retaindays coded (new in Z/os 1.11 i think) which would negate the mgmtclas settings. Also, have another look through the hsm backup logs when expirebv is running for the datasets in question. The datasetname would have the dfhsm.back.t** prefix so all you could recognise would be the 1st 2nd qualifiers rather than the full datasetname but there should still be an entry, which would give you the deletion criteria. If your system runs daily dcollects with the hsm migd bacd parms you could strip out (sas or rexx) pertinent data (See AMS for Catalogs, Appendix F, record type B) about your missing datasets to help narrow things down. Good hunting! Dave *** EXPIREBV is run daily. FWIW, this same problem plagues certain GDG datasets as well. However, this is not a system-wide problem. David G. Schlecht | Information Technology Professional State of Nevada | Department of Administration | Enterprise IT Services T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DB2 image backup and DFSMSdss dataset backup
yes, opt(4) is used. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: REXX and CEEPIPI questions.
On Wed, Jul 10, 2013 at 6:30 AM, John McKown john.archie.mck...@gmail.comwrote: I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. CEEPIPI init sub creates an LE environment and returns a token to the same. The token is passed to the ceepipi call sub function along with other parms. The LE environment represented by the token is usable on that tcb until destroyed by using ceepipi term function. init sub dp allows you to create multiple LE independent environments under the same tcb. verify your need before using this. best performance in calling the subroutine is to use is to use call sub addr. This called the subroutine by address instead of name. if you are going rexx-pipi-subroutine in high volume, call sub addr is worthwhile. If you are going rexx-pipi-subroutine just once or twice then call sub is fine. init sub dp has other characteristics that are useful in a multi-tcb environment. Also, I am not totally sold on having an LE environment hang around. I do know that it saves on start up and shut down time. But I don't know if it is worth the effort because I don't really have a handle on how many PCRE invocations are going to be done in a single execution of a REXX program. -- 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
Re: Buffering: stdout vs. stderr?
Disclaimer - I'm not now programming in C or C++ these days, so take my comments with a pich of salt. Jantje wrote: Could that be due to optimisation of the code? I know that the code optimiser sometimes does strange things and there are remarks to that end in the compiler documentation. Indeed. I remember that Clarion has builtin runtime (not Compile-optimisation) optimisation to do cleanup, re-orgs, buffer managents, etc, in the background when your PC is idle. Frustrating when you look away to check papers and then continue working with the program just when the background processes kick in. I have taken the habit of always use fflush if I need to be sure the buffer has to be flushed at any given point in the program. It makes things explicit. It should work for Paul Gilmartin. But I find it still *strange* that output from ONE loop is arranged by type of output medium, not by execution sequence. But I believe from my fading memory that stderr are shown usually before stdout due to priority, but I could be wrong. 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: DB2 image backup and DFSMSdss dataset backup
Is the ADMIN parameter coded as well? -Original Message- From: Victor Zhang [mailto:victor_wor...@yahoo.com.cn] Sent: Wednesday, July 10, 2013 9:57 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: DB2 image backup and DFSMSdss dataset backup yes, opt(4) is used. -- 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: Buffering: stdout vs. stderr?
On 7/10/2013 10:03 AM, Elardus Engelbrecht wrote: Disclaimer - I'm not now programming in C or C++ these days, so take my comments with a pich of salt. Jantje wrote: Could that be due to optimisation of the code? I know that the code optimiser sometimes does strange things and there are remarks to that end in the compiler documentation. Indeed. I remember that Clarion has builtin runtime (not Compile-optimisation) optimisation to do cleanup, re-orgs, buffer managents, etc, in the background when your PC is idle. Frustrating when you look away to check papers and then continue working with the program just when the background processes kick in. I have taken the habit of always use fflush if I need to be sure the buffer has to be flushed at any given point in the program. It makes things explicit. It should work for Paul Gilmartin. But I find it still *strange* that output from ONE loop is arranged by type of output medium, not by execution sequence. But I believe from my fading memory that stderr are shown usually before stdout due to priority, but I could be wrong. 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 -- 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: Buffering: stdout vs. stderr?
On 7/10/2013 10:03 AM, Elardus Engelbrecht wrote: Oops - hit wrong button before. It should work for Paul Gilmartin. But I find it still *strange* that output from ONE loop is arranged by type of output medium, not by execution sequence. But I believe from my fading memory that stderr are shown usually before stdout due to priority, but I could be wrong. It appears that each file gets its own buffer(s), and those are written when full or closed. PG's output is too short and small to show the interleaving. 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: DB2 image backup and DFSMSdss dataset backup
Maybe your tape subsystem slows down due to more parallel tasks? R.S. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
This drifted into a discussion of manual links. Did anyone address Has anyone done benchmarks on different scenarios with instructions with immediate relative instructions versus the old instructions My personal opinion are 1. I doubt that the differences are significant unless you are calculating pi to 1000 digits or implementing your own 8192-bit encryption. 2. The relative instructions are SO convenient relative (sorry) to the old base/displacement instructions that I wonder how we ever lived without them. 3. Even if they are a little slower, it would not take very many eliminated save and load another base register scenarios to make up for it. 4. Because of pipelining, caching and so forth it is difficult to construct benchmarks that are going to accurately reflect your real-world situation. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Richard Verville Sent: Tuesday, July 09, 2013 12:30 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Benchmark of Relative instructions vers Base+displacement ones Has anyone done benchmarks on different scenarios with instructions with immediate relative instructions versus the old instructions. I have to rewrite some code for CICS on zOS VSE and I wonder if it's worth it. Also I can't find a Load Fullword Immediate instruction (like LHI) where the intent is to -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Buffering: stdout vs. stderr?
On Wed, 10 Jul 2013 10:31:38 -0400, Gerhard Postpischil wrote: On 7/10/2013 10:03 AM, Elardus Engelbrecht wrote: It should work for Paul Gilmartin. But I find it still *strange* that output from ONE loop is arranged by type of output medium, not by execution sequence. I have dealt with some implementations of awk which output unbuffered when stdout is a terminal; buffered when not a terminal. Almost well-motivated, but frustrating when awk is a producer in a pipeline and I want to see the output in real time. Apparently awk deems a pipe not-a-terminal and buffers. Better the distinction should be made between regular files and character special files. But I believe from my fading memory that stderr are shown usually before stdout due to priority, but I could be wrong. And a motivation not to delay error messages nor to require an fflush() for each. It appears that each file gets its own buffer(s), and those are written I should hope it wouldn't be otherwise. when full or closed. PG's output is too short and small to show the interleaving. My ten-line example sufficed to show a difference in interleaving between EBCDIC and Enhanced ASCII output, but certainly not to demonstrate steady-state behavior. Hmmm... I wonder if stderr is buffered in ASCII mode? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: REXX and CEEPIPI questions.
Sam, what do you mean by call sub addr vs call sub from the Rexx point of view? AFAIK there is no capability in z/OS Rexx to call a subroutine by address. John, I strongly suspect that the efficiency of a CEEPIPI setup will more than pay you back for the complexity of the setup for all but a very few calls to the PCRE subroutines, i.e. in all but the very simplest of use cases. I would set up the CEEPIPI environment and store the returned token in a suitably obscure named Rexx variable (like ___C_E_E_P_I_P_I___) and retrieve that variable on each call to the PCRE functions. Use the token value if it is there and set up CEEPIPI if it is not yet there. Or you could require a Rexx variable to be passed as the first argument to all functions in which you store the CEEPIPI token value, putting the burden on the programmer to keep it intact and pass you the right value every time. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Sam Siegel Sent: Wednesday, July 10, 2013 10:00 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CEEPIPI questions. On Wed, Jul 10, 2013 at 6:30 AM, John McKown john.archie.mck...@gmail.comwrote: I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. CEEPIPI init sub creates an LE environment and returns a token to the same. The token is passed to the ceepipi call sub function along with other parms. The LE environment represented by the token is usable on that tcb until destroyed by using ceepipi term function. init sub dp allows you to create multiple LE independent environments under the same tcb. verify your need before using this. best performance in calling the subroutine is to use is to use call sub addr. This called the subroutine by address instead of name. if you are going rexx-pipi-subroutine in high volume, call sub addr is worthwhile. If you are going rexx-pipi-subroutine just once or twice then call sub is fine. init sub dp has other characteristics that are useful in a multi-tcb environment. Also, I am not totally sold on having an LE environment hang around. I do know that it saves on start up and shut down time. But I don't know if it is worth the effort because I don't really have a handle on how many PCRE invocations are going to be done in a single execution of a REXX program. -- 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: regex that never matches?
On Wed, 10 Jul 2013 21:33:20 +0800, Peter Stockdill wrote: I believe that /.^./ or /.$./ both satisfy your requirement. On Wed, 10 Jul 2013 08:45:17 -0400, John Gilmore wrote: and he has the right idea. What is needed is a substantive contradiction, one, say, of the logical form ¬(a | ¬a) a ¬a (Redundantly. De Morgan.) that is not so obvious that simple consistency checks catch it. I have tried something similar to Peter's suggestion with mixed results on processors which, as you suspect, variously: o Fail the construct as invalid syntax. o Regard ^ occurring other than at the beginning of a pattern or $ occurring other than at the end of a pattern as unmeta characters. The merely improbable---Something akin to an SQL query of a personnel data base that seeks bilingual Icelandic and Urdu speakers---is not good enough because parochial. Exxon chose its name in part because the roman-alphabet sequence 'xx' is very rare in most natural languages and transliterations, but it turned out to be common in Maltese. And in latter days, some firewalls block anything containing xx (or specialist). For myopia in the other direction, try a DB search for C. I was taught in grammar school that q occurs only followed by u. Before the ascendancy of Middle Eastern politics. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
From: Charles Mills charl...@mcn.org Date: 07/10/2013 11:15 AM This drifted into a discussion of manual links. Did anyone address Has anyone done benchmarks on different scenarios with instructions with immediate relative instructions versus the old instructions My personal opinion are 1. I doubt that the differences are significant unless you are calculating pi to 1000 digits or implementing your own 8192-bit encryption. 2. The relative instructions are SO convenient relative (sorry) to the old base/displacement instructions that I wonder how we ever lived without them. 3. Even if they are a little slower, it would not take very many eliminated save and load another base register scenarios to make up for it. 4. Because of pipelining, caching and so forth it is difficult to construct benchmarks that are going to accurately reflect your real-world situation. Charles -- Amen to 1, 2, and 4. Especially 4. In a past life, working at AMDAHL, we had to use standalone time to run specific loads to do timing determinations. Most companies can't afford to put a machine in basic mode (assuming it were even possible with PR/SM today) for a few hours to do such testing. Until one programs at the level of the machine's Hypervisor (what else would you call a Domain/LPAR controller?), one probably does not have an appreciation for all the interrupts that take place (including some that are not in the PoOP manual). This makes it very difficult to get into a deterministic environment to do such timings. And again, with pipelining, cache, out-of-order execution, etc., getting such timings is nearly impossible. Also, in a life prior to AMDAHL, I worked for a S/3 competitor whose machines were ASCII based. We used relative addressing instructions. Once I got use to it, I often wondered why this was not implemented by IBM in the S/3x0 architecture. Regards, Steve Thompson -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: REXX and CEEPIPI questions.
I was going to keep the CEEPIPI token in a z/OS task level name/token pair. I don't like (really, I enjoy) being tacky, but the less I depend on the user/programmer, the better I like it. Messing up a name/token pair is much more difficult for a REXX programmer than messing up the contents of a REXX variable. On Wed, Jul 10, 2013 at 10:32 AM, Farley, Peter x23353 peter.far...@broadridge.com wrote: Sam, what do you mean by call sub addr vs call sub from the Rexx point of view? AFAIK there is no capability in z/OS Rexx to call a subroutine by address. John, I strongly suspect that the efficiency of a CEEPIPI setup will more than pay you back for the complexity of the setup for all but a very few calls to the PCRE subroutines, i.e. in all but the very simplest of use cases. I would set up the CEEPIPI environment and store the returned token in a suitably obscure named Rexx variable (like ___C_E_E_P_I_P_I___) and retrieve that variable on each call to the PCRE functions. Use the token value if it is there and set up CEEPIPI if it is not yet there. Or you could require a Rexx variable to be passed as the first argument to all functions in which you store the CEEPIPI token value, putting the burden on the programmer to keep it intact and pass you the right value every time. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Sam Siegel Sent: Wednesday, July 10, 2013 10:00 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CEEPIPI questions. On Wed, Jul 10, 2013 at 6:30 AM, John McKown john.archie.mck...@gmail.comwrote: I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. CEEPIPI init sub creates an LE environment and returns a token to the same. The token is passed to the ceepipi call sub function along with other parms. The LE environment represented by the token is usable on that tcb until destroyed by using ceepipi term function. init sub dp allows you to create multiple LE independent environments under the same tcb. verify your need before using this. best performance in calling the subroutine is to use is to use call sub addr. This called the subroutine by address instead of name. if you are going rexx-pipi-subroutine in high volume, call sub addr is worthwhile. If you are going rexx-pipi-subroutine just once or twice then call sub is fine. init sub dp has other characteristics that are useful in a multi-tcb environment. Also, I am not totally sold on having an LE environment hang around. I do know that it saves on start up and shut down time. But I don't know if it is worth the effort because I don't really have a handle on how many PCRE invocations are going to be done in a single execution of a REXX program. -- 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
Re: REXX and CEEPIPI questions.
On Wed, Jul 10, 2013 at 8:32 AM, Farley, Peter x23353 peter.far...@broadridge.com wrote: Sam, what do you mean by call sub addr vs call sub from the Rexx point of view? AFAIK there is no capability in z/OS Rexx to call a subroutine by address. I'm clearly showing off my deep and extensive REXX knowledge. ;-) John, I strongly suspect that the efficiency of a CEEPIPI setup will more than pay you back for the complexity of the setup for all but a very few calls to the PCRE subroutines, i.e. in all but the very simplest of use cases. I would set up the CEEPIPI environment and store the returned token in a suitably obscure named Rexx variable (like ___C_E_E_P_I_P_I___) and retrieve that variable on each call to the PCRE functions. Use the token value if it is there and set up CEEPIPI if it is not yet there. Or you could require a Rexx variable to be passed as the first argument to all functions in which you store the CEEPIPI token value, putting the burden on the programmer to keep it intact and pass you the right value every time. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Sam Siegel Sent: Wednesday, July 10, 2013 10:00 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CEEPIPI questions. On Wed, Jul 10, 2013 at 6:30 AM, John McKown john.archie.mck...@gmail.comwrote: I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. CEEPIPI init sub creates an LE environment and returns a token to the same. The token is passed to the ceepipi call sub function along with other parms. The LE environment represented by the token is usable on that tcb until destroyed by using ceepipi term function. init sub dp allows you to create multiple LE independent environments under the same tcb. verify your need before using this. best performance in calling the subroutine is to use is to use call sub addr. This called the subroutine by address instead of name. if you are going rexx-pipi-subroutine in high volume, call sub addr is worthwhile. If you are going rexx-pipi-subroutine just once or twice then call sub is fine. init sub dp has other characteristics that are useful in a multi-tcb environment. Also, I am not totally sold on having an LE environment hang around. I do know that it saves on start up and shut down time. But I don't know if it is worth the effort because I don't really have a handle on how many PCRE invocations are going to be done in a single execution of a REXX program. -- 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Missing HSM backups
Great ideas, Dave. You're right, without knowing the HSM names for the backups, I wasn't able to see the datasets in HSM's job logs. I'm now archiving the BCDS list daily so I can see when the backups disappear. Nothing yet. The backups are being done by HSM only; no HBACKDS commands run. David G. Schlecht | Information Technology Professional State of Nevada | Department of Administration | Enterprise IT Services T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of David Devine Sent: Wednesday, July 10, 2013 6:47 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Missing HSM backups Hello, just a thought but are the datasets being backed up via an hbackds command? they might have an explicit retaindays coded (new in Z/os 1.11 i think) which would negate the mgmtclas settings. Also, have another look through the hsm backup logs when expirebv is running for the datasets in question. The datasetname would have the dfhsm.back.t** prefix so all you could recognise would be the 1st 2nd qualifiers rather than the full datasetname but there should still be an entry, which would give you the deletion criteria. If your system runs daily dcollects with the hsm migd bacd parms you could strip out (sas or rexx) pertinent data (See AMS for Catalogs, Appendix F, record type B) about your missing datasets to help narrow things down. Good hunting! Dave *** EXPIREBV is run daily. FWIW, this same problem plagues certain GDG datasets as well. However, this is not a system-wide problem. David G. Schlecht | Information Technology Professional State of Nevada | Department of Administration | Enterprise IT Services T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov -- 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
Benchmark of Relative instructions vers Base+displacement ones
On Tue, 9 Jul 2013 15:30:12 -0400, Richard Verville r.vervi...@videotron.ca asked: Has anyone done benchmarks on different scenarios with instructions with immediate relative instructions versus the old instructions. snip The more important issue is memory access: CPU speeds have increased much faster than memory speeds. There is no memory pentaly for immediate operands, while memory references can be quite costly: an item taken from memory can displace other items in the data cache, or they might cross a cache-line or memory-page boundary, or require paging. A memory reference can take anywhere from a few cycles to many thousands, so if your processor supports useful immediate operands, take advantage. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: REXX and CEEPIPI questions.
I think you were referring to the CEEPIPI functions named call_sub and call_sub_addr. call_sub is the CEEPIPI subfunction which calls a LE enabled routine by symbolic name (like LINK does). Where call_sub_addr is the CEEPIPI subfunction which calls an LE enabled routine by its load point address (like SYNC does). In either case, REXX itself will somehow (LINKPGM or otherwise) give control over to my routine which will set up things, then invoke the PCRE appropriate subroutine(s) as needed, and finally somehow pass back the results (likely via REXX variables the way ISPF does) back to the REXX program. On Wed, Jul 10, 2013 at 12:00 PM, Sam Siegel s...@pscsi.net wrote: On Wed, Jul 10, 2013 at 8:32 AM, Farley, Peter x23353 peter.far...@broadridge.com wrote: Sam, what do you mean by call sub addr vs call sub from the Rexx point of view? AFAIK there is no capability in z/OS Rexx to call a subroutine by address. I'm clearly showing off my deep and extensive REXX knowledge. ;-) John, I strongly suspect that the efficiency of a CEEPIPI setup will more than pay you back for the complexity of the setup for all but a very few calls to the PCRE subroutines, i.e. in all but the very simplest of use cases. I would set up the CEEPIPI environment and store the returned token in a suitably obscure named Rexx variable (like ___C_E_E_P_I_P_I___) and retrieve that variable on each call to the PCRE functions. Use the token value if it is there and set up CEEPIPI if it is not yet there. Or you could require a Rexx variable to be passed as the first argument to all functions in which you store the CEEPIPI token value, putting the burden on the programmer to keep it intact and pass you the right value every time. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Sam Siegel Sent: Wednesday, July 10, 2013 10:00 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CEEPIPI questions. On Wed, Jul 10, 2013 at 6:30 AM, John McKown john.archie.mck...@gmail.comwrote: I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. CEEPIPI init sub creates an LE environment and returns a token to the same. The token is passed to the ceepipi call sub function along with other parms. The LE environment represented by the token is usable on that tcb until destroyed by using ceepipi term function. init sub dp allows you to create multiple LE independent environments under the same tcb. verify your need before using this. best performance in calling the subroutine is to use is to use call sub addr. This called the subroutine by address instead of name. if you are going rexx-pipi-subroutine in high volume, call sub addr is worthwhile. If you are going rexx-pipi-subroutine just once or twice then call sub is fine. init sub dp has other characteristics that are useful in a multi-tcb environment. Also, I am not totally sold on having an LE environment hang around. I do know that it saves on start up and shut down time. But I don't know if it is worth the effort because I don't really have a handle on how many PCRE invocations are going to be done in a single execution of a REXX program. -- 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
Re: regex that never matches?
IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 07/10/2013 05:40:22 AM: From: Vernooij, CP - SPLXM kees.verno...@klm.com This reminds me of an experiment of a colleague of mine, several years ago. He tried to transform a Rexx program of about one screen of statements into one Rexx statement, using nesting, recursive programming and other fancy stuff. It took him about a week, but he succeeded. Of course it was completely incomprehensible what the statement did, but it worked. he would have loved APL - 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...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
In other words, if one had to venture a *guess* it would be that the immediate instructions were in practice a heck of a lot faster. (Don't know that this sort of issue is relevant to the relative versus branch/displacement comparison.) Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Ehrman Sent: Wednesday, July 10, 2013 10:22 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Benchmark of Relative instructions vers Base+displacement ones On Tue, 9 Jul 2013 15:30:12 -0400, Richard Verville r.vervi...@videotron.ca asked: Has anyone done benchmarks on different scenarios with instructions with immediate relative instructions versus the old instructions. snip The more important issue is memory access: CPU speeds have increased much faster than memory speeds. There is no memory pentaly for immediate operands, while memory references can be quite costly: an item taken from memory can displace other items in the data cache, or they might cross a cache-line or memory-page boundary, or require paging. A memory reference can take anywhere from a few cycles to many thousands, so if your processor supports useful immediate operands, take advantage. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
John Ehrman knows much more about what kinds of older mainframes are still in use than I do, and I imagine that he had good reason to use the qualifying language . . . so if your processor supports useful immediate operands, take advantage. Still, the extended-immediate facility dates back ten years now, to June 2003; and I have found the 'new' instructions it makes available very helpful. The FLOGR instruction alone has, for example, revolutionized the way in which I do bit-map processing. I would urge any HLASM programmer who is not already using these instruction to familiarize himself with them, for reasons of convenience and code compactness as well as the performance reasons John mentions. Let me also take this opportunity to add my personal view that base-register-displacement schemes are at best obsolescent in new code. There is no excuse for using them ab initio. Equally, of course, there is no compelling case for their doctrinaire elimination from old code. 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
DST (Daylight Saving Time) date automatically updated
Hello, I have been asked if there is a option to get current DST date automatically. To make my question a bit clearer: Since in our zone the DST is not on fixed date (recently has been moved again) customers asking for an option to get current DST from some internal or external sources. Something like NTP Server. Thank you for any suggestion or pointing to doumentation on the subject. Arye Shemer. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PS-E not releasing with HSM Migrate/Recall
Dave: I get the daily digest so this might already have been pointed out... We don't HSM here (we're an Innovation shop) but is the HSM migration/recall process you talk about the same as Space Management cycle from the manual? I would suspect that HSM preserves the actual dataset size(s) during migration/recall unless you specify otherwise ie. via parms. For FDRABR, it's DATA={ALL | USED}. z/OS V1R12.0 DFSMSdfp Storage Administration: Conditional. If a nonzero secondary space allocation has been specified for the data set, release unused space at Space Management cycle time. This option only applies to physical sequential and partitioned data sets. If specified for an extended format VSAM data set, this option is processed as if Yes were specified. 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: Gibney, Dave [mailto:gib...@wsu...edu] Sent: July 8, 2013 15:29 Subject: PS-E not releasing with HSM Migrate/Recall Hi everyone, I may be all wet, but this is my best resource for help on this issue until I get back on support with z/OS 1.13. I am running z/OS 1.11 (unsupported). Back in January, I applied all maintenance to bring it up to RSU1301. For years, I have had a MGMTCLAS of ATMBKUPS with conditional partial release and a DATACLAS of TMBKUPLG: [snip] I know that the multi-volume striping will not do the partial release at close, but I thought that HSM migration/recall was resulting in the release of unused space in these datasets. Last week, I had several failures to allocate these datasets and noticed that even after recall, these datasets remain at 65616 tracks usually about 5% used. Have I been fooling myself that this large (never run out while actually writing the SMF data) and release at migration ever worked? I suspect IBM will not be real helpful until I can reproduce on z/OS 1.13 which will be later this year. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DST (Daylight Saving Time) date automatically updated
On Wed, 10 Jul 2013 22:12:51 +0300, Arye Shemer wrote: Since in our zone the DST is not on fixed date (recently has been moved again) customers asking for an option to get current DST from some internal or external sources. Something like NTP Server. Thank you for any suggestion or pointing to doumentation on the subject. http://www.twinsun.com/tz/tz-link.htm Sources for Time Zone and Daylight Saving Time Data The public-domain time zone database contains code and data that represent the history of local time for many representative locations around the globe. It is updated periodically to reflect changes made by political bodies to time zone boundaries, UTC offsets, and daylight-saving rules. This database (often called tz or zoneinfo) is used by several implementations, including the GNU C Library used in GNU/Linux, FreeBSD, NetBSD, OpenBSD, Cygwin, DJGPP, AIX, Mac OS X, OpenVMS, Oracle Database, Solaris, Tru64, and UnixWare. (Conspicuous in its absence is any mention of IBM OSes.) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DST (Daylight Saving Time) date automatically updated
Afaik, there is no such facility for z/OS(z/OS). For (z/OS(OMVS) the TZ environment variable will handle DST offsets automatically. However, this variable needs to be set in several places. HTH, -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PS-E not releasing with HSM Migrate/Recall
Copying IBM-MAIN this time -Original Message- From: Neil Duffee [mailto:nduf...@uottawa.ca] Sent: Wednesday, July 10, 2013 12:46 PM To: Gibney, Dave Subject: RE: PS-E not releasing with HSM Migrate/Recall Ah, well. It was a flash in the pan suggestion since we don't HSM here. The only other twinge I can think of is whether secondaries exist since it's Conditional vs. Yes. Are there more than one extent on each of the volumes? hmmm... just looked at what you cut/pasted and I think that answer is there are no secondaries. Allocated extents: 2 c/w VolSer: + indicates to me there are probably two volumes with each having one primary extent. That would mean they don't qualify for Conditional Space Management. I'll bet you get equivalent results with Conditional Immediate. You might try YES to see if you have better luck. If I remember correctly, Extended causes a primary extent to be allocated on each of 'Unit count' volumes and, as you fill the file, secondaries *might* be allocated followed by additional volumes if you have DynVolCount set. We also don't do Extended yet; we're not a big enough shop for it to benefit. x37 abends are almost a non-existent with stripped/extended as a default vis DATACLAS Yes, it is stripped on 2 volumes, and it did not require allocation of any secondary extents. a nonzero secondary space allocation has been specified for the data set But, it is still desirable (since secondary is defined) to reduce the actual disk usage to the current utilization on recall. I haven't looked, but I am pretty certain that all those empty blocks aren't taking up space on my virtual tape. a nonzero secondary space allocation has been specified for the data set Aside: is migrate/recall how Space Management is achieved by HSM? Just curious. Yes 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: Gibney, Dave [mailto:gib...@wsu.edu] Sent: July 10, 2013 15:27 To: Neil Duffee Subject: RE: PS-E not releasing with HSM Migrate/Recall I run Primary (and Secondary) Space management daily. The datasets have secondary specified: General Data Current Allocation Management class . . : ATMBKUPSAllocated megabytes : 3,500 Storage class . . . : SCDSKTAPAllocated extents . : 2 Volume serial . . . : PTAP08 + Device type . . . . : 3390 Data class . . . . . : TMBKUPLG Organization . . . : PS Current Utilization Record format . . . : VB Used megabytes . . : 78 Record length . . . : 2100Used extents . . . : 1 Block size . . . . : 32760 1st extent megabytes: 1750 Secondary megabytes : 2500 Dates Data set name type : EXTENDEDCreation date . . . : 2013/07/10 SMS Compressible. . : YES Referenced date . . : 2013/07/10 Expiration date . . : ***None*** The Current utilization remains the same after any flavor of migrate/recall -Original Message- From: Neil Duffee [mailto:nduf...@uottawa.ca] Sent: Wednesday, July 10, 2013 12:16 PM To: Gibney, Dave Cc: IBM-Main Subject: RE: PS-E not releasing with HSM Migrate/Recall Dave: I get the daily digest so this might already have been pointed out... We don't HSM here (we're an Innovation shop) but is the HSM migration/recall process you talk about the same as Space Management cycle from the manual? I would suspect that HSM preserves the actual dataset size(s) during migration/recall unless you specify otherwise ie. via parms. For FDRABR, it's DATA={ALL | USED}. z/OS V1R12.0 DFSMSdfp Storage Administration: Conditional. If a nonzero secondary space allocation has been specified for the data set, release unused space at Space Management cycle time. This option only applies to physical sequential and partitioned data sets. If specified for an extended format VSAM data set, this option is processed as if Yes were specified. 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: Gibney, Dave [mailto:gib...@wsu...edu]
Re: VTOC Location
LISTVTOC FORMAT,VOL=SYSDA=MVS001 CIT | Ken Porowski | VP Mainframe Engineering | Information Technology | +1 973 740 5459 (tel) | ken.porow...@cit.com This email message and any accompanying materials may contain proprietary, privileged and confidential information of CIT Group Inc. or its subsidiaries or affiliates (collectively, “CIT”), and are intended solely for the recipient(s) named above. If you are not the intended recipient of this communication, any use, disclosure, printing, copying or distribution, or reliance on the contents, of this communication is strictly prohibited. CIT disclaims any liability for the review, retransmission, dissemination or other use of, or the taking of any action in reliance upon, this communication by persons other than the intended recipient(s). If you have received this communication in error, please reply to the sender advising of the error in transmission, and immediately delete and destroy the communication and any accompanying materials. To the extent permitted by applicable law, CIT and others may inspect, review, monitor, analyze, copy, record and retain any communications sent from or received at this email address. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Herring, Bobby Sent: Wednesday, July 10, 2013 4:45 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [IBM-MAIN] VTOC Location We are working with IBM on a flash copy problem with a drive. The box is the ESE 800, the old Shark. She is asking about the physical location of the VTOC. We used to have Ditto but got rid of it years ago. I’ve tried the IEHLIST commands but it only shows the contents of the VTOC, not the location. Is there a way to show the exact CCHHRR location of the VTOC now? Thanks, Bob Herring System Programmer Texas Farm Bureau Insurance Waco, Texas [http://infonet.txfb-ins.com//images//email-signature-image.jpg] WWW.TXFB-INS.COMhttp://www.txfb-ins.com CONFIDENTIALITY STATEMENT: The foregoing message (including attachments) is covered by the Electronic Communication Privacy Act, 18 U.S.C. sections 2510-2521, and is CONFIDENTIAL. If you believe that it has been sent to you in error, do not read it. If you are not the intended recipient, you are hereby notified that any retention, dissemination, distribution, or copying of this communication is strictly prohibited. Please reply to the sender that you have received the message in error, then delete it. Thank you. Texas Farm Bureau Insurance Companies received the highest numerical score among auto insurance providers in Texas in the proprietary J.D. Power 2013 U.S. Auto Insurance Study(SM). Study based on 45,521 total responses measuring 8 providers in Texas and measures opinions of consumers with their auto insurance provider. Proprietary study results are based on experiences and perceptions of consumers surveyed March –April 2013. Your experiences may vary. Visit jdpower.com. -- 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: DST (Daylight Saving Time) date automatically updated
On Wed, 10 Jul 2013 20:29:53 +, Staller, Allan wrote: Afaik, there is no such facility for z/OS(z/OS). For (z/OS(OMVS) the TZ environment variable will handle DST offsets automatically. However, this variable needs to be set in several places. I'll disagree with the automatically part. You must tell it what to do. And, in general, you can't. For example, on a Solaris system, I created two files with the commands: user@Solaris:470$ history 461 touch -t 200603221200 Touched-in-2006 462 touch -t 200703221200 Touched-in-2007 where: user@Solaris::474$ echo $TZ US/Mountain Now an extended directory shows me: user@Solaris:469$ ls -alE total 38 Date Timezone drwxr-sr-x 2 user 5134 2013-07-10 15:02:59.226383291 -0600 . drwxr-sr-x 57 user 513 355 2013-07-10 14:51:00.523492633 -0600 .. -rw-r--r-- 1 user 5130 2006-03-22 12:00:00.0 -0700 Touched-in-2006 -rw-r--r-- 1 user 5130 2007-03-22 12:00:00.0 -0600 Touched-in-2007 Solaris knows that the US/Mountain offset was 7 hours on March 22, 2006, and 6 hours on March 22, 2007. z/OS doesn't know, and there's no way to tell it; there's no value that gives correct results for both 2006 and 2007. (z/OS has no similar option for an extended directory listing. I think they're too embarassed to publicize such flaws.) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
LLA refreshed automatically with SETPROG ACTIVATE command
Hi all , We have an issue with LLA after activating new linklist set . There are 2 different scenarios given below Scenario 1 : The current linklist set is LNKLST00 . We added a new dataset by copying to LNKLST01 and activated LNKLST01 . With SETPROG LNKLST,ACTIVATE ,NAME=LNKLST01 command , LLA was automatically refreshed . I didnt have to issue F LLA,REFRESH ,instead it got refreshed automatically with SETPROG ACTIVATE command .Is this normal ? Scenario 2: I removed a dataset from LNKLST00 , moved it to a different volume and added the same dataset back using LNKLST01 and activated LNKLST01 with the command SETPROG LNKLST,ACTIVATE,NAME=LNKLST01 .But this time , LLA didn't pick it up automatically . I don't understand why LLA didn't pick up the dataset automatically in Scenario # 2 . Any thoughts on this ? Regards, baby -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DST (Daylight Saving Time) date automatically updated
On Wed, 10 Jul 2013 16:22:34 -0500, Paul Gilmartin paulgboul...@aim.com wrote: Now an extended directory shows me: user@Solaris:469$ ls -alE total 38 Date Timezone drwxr-sr-x 2 user 5134 2013-07-10 15:02:59.226383291 -0600 . drwxr-sr-x 57 user 513 355 2013-07-10 14:51:00.523492633 -0600 .. -rw-r--r-- 1 user 5130 2006-03-22 12:00:00.0 -0700 Touched-in-2006 -rw-r--r-- 1 user 5130 2007-03-22 12:00:00.0 -0600 Touched-in-2007 Solaris knows that the US/Mountain offset was 7 hours on March 22, 2006, and 6 hours on March 22, 2007. z/OS doesn't know, and there's no way to tell it; there's no value that gives correct results for both 2006 and 2007. (z/OS has no similar option for an extended directory listing. I think they're too embarassed to publicize such flaws.) Complain, complain, complain. :-) You use the term flaw loosely. It may be a shortcoming compared to other unix environments that you work on or prefer, but I wouldn't call it a flaw. Remember that z/OS unix is based on the posix standard. Does that standard have the extended directory list? There are so many other examples like this compared to other *nix systems (or even MVS in general), that you may as well call all of z/OS flawed going by your logic. Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: LLA refreshed automatically with SETPROG ACTIVATE command
Yes . When you activate a new LNKLST , LLA gets refreshed automatically . https://www.google.co.in/url?sa=trct=jq=esrc=ssource=webcd=8cad=rjaved=0CF8QFjAHurl=http%3A%2F%2Fschunk-it.com%2FPresentations%2FShare095%2Fs2855ssa.pdfei=ntXdUcDvK8r5rAenkoHwBwusg=AFQjCNGmcl7LdMqRb9Y5_671PSn2_9IE4wsig2=wCDiXpE743dHZ-gBbCP4nw Thanks !Bob Date: Thu, 11 Jul 2013 02:58:25 +0530 From: baby.ekla...@gmail.com Subject: LLA refreshed automatically with SETPROG ACTIVATE command To: IBM-MAIN@LISTSERV.UA.EDU Hi all , We have an issue with LLA after activating new linklist set . There are 2 different scenarios given below Scenario 1 : The current linklist set is LNKLST00 . We added a new dataset by copying to LNKLST01 and activated LNKLST01 . With SETPROG LNKLST,ACTIVATE ,NAME=LNKLST01 command , LLA was automatically refreshed . I didnt have to issue F LLA,REFRESH ,instead it got refreshed automatically with SETPROG ACTIVATE command .Is this normal ? Scenario 2: I removed a dataset from LNKLST00 , moved it to a different volume and added the same dataset back using LNKLST01 and activated LNKLST01 with the command SETPROG LNKLST,ACTIVATE,NAME=LNKLST01 .But this time , LLA didn't pick it up automatically . I don't understand why LLA didn't pick up the dataset automatically in Scenario # 2 . Any thoughts on this ? Regards, baby -- 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: VTOC Location
Probably about the virtual location. We are getting a S213-04 when trying to flash this one volume. The VTOC on that volume is at a different location than the target flash output volume. She is trying to say that will cause a problem. It's an older volume and we have since changed the standard for where and how big we create the VTOC and VTOCIX. It contains the RMM CDS and as such is not easily moved. If it was just regular datasets, we would just DFDSS move them to another volume and then re-init it to look like our other volumes. We may move it anyway this weekend to get around the problem. Bob -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Wednesday, July 10, 2013 4:42 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: [IBM-MAIN] VTOC Location On 2013-07-10 14:56, Ken Porowski wrote: LISTVTOC FORMAT,VOL=SYSDA=MVS001 On a Shark, wouldn't that at best give a virtual location, not a physical location? -Original Message- From: Herring, Bobby Sent: Wednesday, July 10, 2013 4:45 PM We are working with IBM on a flash copy problem with a drive. The box is the ESE 800, the old Shark. She is asking about the physical location of the VTOC. ... Why? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN [http://infonet.txfb-ins.com//images//email-signature-image.jpg] WWW.TXFB-INS.COMhttp://www.txfb-ins.com CONFIDENTIALITY STATEMENT: The foregoing message (including attachments) is covered by the Electronic Communication Privacy Act, 18 U.S.C. sections 2510-2521, and is CONFIDENTIAL. If you believe that it has been sent to you in error, do not read it. If you are not the intended recipient, you are hereby notified that any retention, dissemination, distribution, or copying of this communication is strictly prohibited. Please reply to the sender that you have received the message in error, then delete it. Thank you. Texas Farm Bureau Insurance Companies received the highest numerical score among auto insurance providers in Texas in the proprietary J.D. Power 2013 U.S. Auto Insurance Study(SM). Study based on 45,521 total responses measuring 8 providers in Texas and measures opinions of consumers with their auto insurance provider. Proprietary study results are based on experiences and perceptions of consumers surveyed March –April 2013. Your experiences may vary. Visit jdpower.com. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Standards and extensions (was: DST ...)
On Wed, 10 Jul 2013 16:34:21 -0500, Mark Zelden wrote: Complain, complain, complain. :-) You use the term flaw loosely. It may be a shortcoming compared to other unix environments that you work on or prefer, but I wouldn't call it a flaw. Remember that z/OS unix is based on the posix standard. Does that standard have the extended directory list? There are so many other examples like this compared to other *nix systems (or even MVS in general), that you may as well call all of z/OS flawed going by your logic. My complaint was directed more at the inadequate timezone offset implementation rather than the absence of extended directory listing, though both transcend POSIX. ... z/OS unix is based on the posix standard. And a now outdated version of POSIX. Why does z/OS lack the -P and the -L options on the cd and pwd commands? And why is the default behavior of those commands -P-like where POSIX specifies -L. (In fact, I personally prefer the non-POSIX behavior, but I'd gladly accede to the POSIX behavior there in return to a broader upgrade to a more recent POSIX. I place a high value on portability.) And I can easily name a couple other contributors to these lists who would welcome conformance to the industry mode where it goes beyond POSIX. (Well, perhaps not the one who makes his living by backfilling shortcoming[s].) I suspect there are many others. Why the intense recent interest in PCREs other than that users have got accustomed them on other systems and suffer their lack on z/OS? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Benchmark of Relative instructions vers Base+displacement ones
In bay169-w821ca84a522665f781f230a3...@phx.gbl, on 07/10/2013 at 07:54 AM, J R jayare...@hotmail.com said: You shouldn't have to google to find this book. That's better than google not being able to find it. Where is Systems Network Architecture Format and Protocol Reference Manual: Architectural Logic (SC30-3112)? -- 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: LLA refreshed automatically with SETPROG ACTIVATE command
Same dataset name, different volume makes (in my past experience) LLA and LNKLST unhappy. Been a long time, but I try not to do that one. Dave Gibney Information Technology Services Washington State University -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of baby eklavya Sent: Wednesday, July 10, 2013 2:28 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: LLA refreshed automatically with SETPROG ACTIVATE command Hi all , We have an issue with LLA after activating new linklist set . There are 2 different scenarios given below Scenario 1 : The current linklist set is LNKLST00 . We added a new dataset by copying to LNKLST01 and activated LNKLST01 . With SETPROG LNKLST,ACTIVATE ,NAME=LNKLST01 command , LLA was automatically refreshed . I didnt have to issue F LLA,REFRESH ,instead it got refreshed automatically with SETPROG ACTIVATE command .Is this normal ? Scenario 2: I removed a dataset from LNKLST00 , moved it to a different volume and added the same dataset back using LNKLST01 and activated LNKLST01 with the command SETPROG LNKLST,ACTIVATE,NAME=LNKLST01 .But this time , LLA didn't pick it up automatically . I don't understand why LLA didn't pick up the dataset automatically in Scenario # 2 . Any thoughts on this ? Regards, baby -- 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
It has taken us a while, but we now have a modern backend (code generator and optimizer) for COBOL that can exploit the latest hardware, and will support DFP, AMODE 64 and many of the other z/OS system features that we have not be able to exploit in the past. Is that new backend bespoke for COBOL or is it shared with PL/1, C/C++, =20 Java? Java used it first, now COBOL will be using it. Next up, PL/I, I think, and then C/C++. Eventually all of the active compilers will use the same backend so that when new hardware comes out we can exploit it with all langs quickly! Cheers, TomR COBOL is the Language of the Future! -- 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
So should we ZAAP,ZIIP or z??P? In a message dated 07/10/13 19:21:45 Central Daylight Time, tmr...@stlvm20.vnet.ibm.com writes: Eventually all of the active compilers will use the same backend so that when new hardware comes out we can exploit it with all langs quickly! -- 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
Forget zAAP for sure on current hardware. For now, zIIP. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of efinnell15 Sent: Wednesday, July 10, 2013 8:27 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers So should we ZAAP,ZIIP or z??P? In a message dated 07/10/13 19:21:45 Central Daylight Time, tmr...@stlvm20.vnet.ibm.com writes: Eventually all of the active compilers will use the same backend so that when new hardware comes out we can exploit it with all langs quickly! -- 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: VTOC Location
In b02591487f7840458e83497368f872e613343...@txfb-exch-db-01.txfb-ins.com, on 07/10/2013 at 08:45 PM, Herring, Bobby bherr...@txfb-ins.com said: Is there a way to show the exact CCHHRR location of the VTOC now? It's in the volume label, which IEHLIST doesn't print, but I thought that it was also in the DSCB4. -- 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: regex that never matches?
In 0382727397514044.wa.paulgboulderaim@listserv.ua.edu, on 07/10/2013 at 10:47 AM, Paul Gilmartin paulgboul...@aim.com said: I was taught in grammar school that q occurs only followed by u. Before the ascendancy of Middle Eastern politics. Welsh? -- 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: Benchmark of Relative instructions vers Base+displacement ones
In CAE1XxDH57SkYrr7F-TKpjxdxcs_vOefqaFPm6RD=lnzlm5z...@mail.gmail.com, on 07/10/2013 at 02:44 PM, John Gilmore jwgli...@gmail.com said: Let me also take this opportunity to add my personal view that base-register-displacement schemes are at best obsolescent in new code. Nonsense; they're still needed for referring to data in dynamic storage. My general rule on such matters is that you have to cut the bird at the joints. -- 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: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers
Peter Farley opines: They [IBM] have, time and again, shown themselves quite capable of deliberately reducing the effectiveness of new technology to preserve their revenue stream for a few more quarters. Examples? I'll offer a counterexample: the System/360. IBM led the electromechanical tabulating and accounting equipment market, and the System/360 utterly destroyed the very market IBM dominated. The System/360 was either going to be history's stupidest act of corporate suicide or one of history's most brilliant business successes, depending on how it turned out. More recent examples are obviously more relevant than older ones. No points awarded if the examples have other plausible motives available. By the way, this question has just been answered for COBOL. Enterprise COBOL Version 5.1 is available, now. Turn on the new compiler optimizations and measure the results. They be good. In my opinion it's delusional to think IBM would invest huge sums and many years developing (and shipping!) an entirely new backend for a product it didn't believe in and that it didn't expect to sell. Utterly, completely delusional, with absolutely no sense of reality -- business or technical. In my personal view. Sometimes people post conspiratorial stuff here and then I think, That individual is not rational in thought. Maybe others' experiences are different, but I haven't persuaded many people to act when I present an irrational argument. They just look at me funny and say something like, OK, that's very interesting. Thank you for sharing. I've learned to be a little more thoughtful in trying to understand the world, rationally. I applaud IBM for Enterprise COBOL V5 and recommend others do the same. Well done, and more, please. Timothy Sipples GMU VCT Architect Executive (Based in Singapore) E-Mail: sipp...@sg.ibm.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: REXX and CEEPIPI questions.
I find it much easier to use subcommand enviromments http://users.tpg.com.au/crayford/rexxre.txt. I setup the CEEPIPI environment in RTKSUBCM, allocate all the memory I need for the command processor routines (saveareas etc) and store a control block in the SUBCOMTB_TOKEN field. When the command handler gets called I grab the control block from R1 (no need to GETMAIN storage areas) and forward the call to the LE routines via PIPI. Those cost of parsing the command string is significantly less than the overhead of GETMAIN and name/token services calls. On 11/07/2013 1:38 AM, John McKown wrote: I think you were referring to the CEEPIPI functions named call_sub and call_sub_addr. call_sub is the CEEPIPI subfunction which calls a LE enabled routine by symbolic name (like LINK does). Where call_sub_addr is the CEEPIPI subfunction which calls an LE enabled routine by its load point address (like SYNC does). In either case, REXX itself will somehow (LINKPGM or otherwise) give control over to my routine which will set up things, then invoke the PCRE appropriate subroutine(s) as needed, and finally somehow pass back the results (likely via REXX variables the way ISPF does) back to the REXX program. On Wed, Jul 10, 2013 at 12:00 PM, Sam Siegel s...@pscsi.net wrote: On Wed, Jul 10, 2013 at 8:32 AM, Farley, Peter x23353 peter.far...@broadridge.com wrote: Sam, what do you mean by call sub addr vs call sub from the Rexx point of view? AFAIK there is no capability in z/OS Rexx to call a subroutine by address. I'm clearly showing off my deep and extensive REXX knowledge. ;-) John, I strongly suspect that the efficiency of a CEEPIPI setup will more than pay you back for the complexity of the setup for all but a very few calls to the PCRE subroutines, i.e. in all but the very simplest of use cases. I would set up the CEEPIPI environment and store the returned token in a suitably obscure named Rexx variable (like ___C_E_E_P_I_P_I___) and retrieve that variable on each call to the PCRE functions. Use the token value if it is there and set up CEEPIPI if it is not yet there. Or you could require a Rexx variable to be passed as the first argument to all functions in which you store the CEEPIPI token value, putting the burden on the programmer to keep it intact and pass you the right value every time. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Sam Siegel Sent: Wednesday, July 10, 2013 10:00 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: REXX and CEEPIPI questions. On Wed, Jul 10, 2013 at 6:30 AM, John McKown john.archie.mck...@gmail.comwrote: I am trying to look at how to use the PCRE from Ze'ev Atlas in a REXX program in a REXXish way. PCRE is written in C and is basically implemented as a bunch of subroutines. Being in C means this requires LE. I could just write my code to be LE compliant and then invoke it from REXX via a LINKPGM, or similar, method. I could pass the results back by having my routine use IRXEXCOM to create specific REXX variables which could then be used in the rest of the script. Yes, there are better ways, but I'm just thinking out loud right now. I was also looking at using CEEPIPI somehow to establish an LE environment which would last across calls to my PCRE functions. I have been reading the books. But I can't find the answer to my first question. Which is: If I call an HLASM routine which: (1) is not LE compliant; (2) uses CEEPIPI function init_sub to set up LE environment for calling subroutines; (3) returns to REXX. Will the LE environment stay around? If it does, could it cause problems with REXX or even TSO itself? Could it cause problems if the user were to invoke an LE enabled main routine (written in C, COBOL, ...) via a TSO CALL or ADDRESS LINK type invocation? If the user does invoke an LE program, will that affect the CEEPIPI set up environment (as in terminate it)? Instead of init_sub, should I use init_sub_dp? It seems to have some advantages, but is more restrictive. Mainly it seems to be a way to avoid the possible problems of leaving an LE environment active. CEEPIPI init sub creates an LE environment and returns a token to the same. The token is passed to the ceepipi call sub function along with other parms. The LE environment represented by the token is usable on that tcb until destroyed by using ceepipi term function. init sub dp allows you to create multiple LE independent environments under the same tcb. verify your need before using this. best performance in calling the subroutine is to use is to use call sub addr. This called the subroutine by address instead of name. if you are going rexx-pipi-subroutine in high volume, call sub addr is worthwhile. If you are going rexx-pipi-subroutine just once or twice then call sub is fine. init sub dp has other characteristics that are useful in a multi-tcb environment. Also, I am not
Re: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers
Timothy: It depends... lets see some results before congratulating them. *IF* Java is any indications I suspect there isn't a big enough machine around to run one program. Face it JAVA is a PIG when it comes to burning up cpu resources. Ed On Jul 11, 2013, at 12:06 AM, Timothy Sipples wrote: Peter Farley opines: They [IBM] have, time and again, shown themselves quite capable of deliberately reducing the effectiveness of new technology to preserve their revenue stream for a few more quarters. Examples? I'll offer a counterexample: the System/360. IBM led the electromechanical tabulating and accounting equipment market, and the System/360 utterly destroyed the very market IBM dominated. The System/360 was either going to be history's stupidest act of corporate suicide or one of history's most brilliant business successes, depending on how it turned out. More recent examples are obviously more relevant than older ones. No points awarded if the examples have other plausible motives available. By the way, this question has just been answered for COBOL. Enterprise COBOL Version 5.1 is available, now. Turn on the new compiler optimizations and measure the results. They be good. In my opinion it's delusional to think IBM would invest huge sums and many years developing (and shipping!) an entirely new backend for a product it didn't believe in and that it didn't expect to sell. Utterly, completely delusional, with absolutely no sense of reality -- business or technical. In my personal view. Sometimes people post conspiratorial stuff here and then I think, That individual is not rational in thought. Maybe others' experiences are different, but I haven't persuaded many people to act when I present an irrational argument. They just look at me funny and say something like, OK, that's very interesting. Thank you for sharing. I've learned to be a little more thoughtful in trying to understand the world, rationally. I applaud IBM for Enterprise COBOL V5 and recommend others do the same. Well done, and more, please. -- -- Timothy Sipples GMU VCT Architect Executive (Based in Singapore) E-Mail: sipp...@sg.ibm.com -- 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: Benchmark of Relative instructions vers Base+displacement ones
On 7/10/2013 11:54 AM, John Eells wrote: And, finally, that the branch instruction itself does not stand alone. One must load a register to use it as a base in order to establish addressability, and load another to use it as a displacement register, and Load instructions can cause real memory (vs. cache) accesses. So, it seems to me there can be some applicability to relative branch as well. Branch prediction is a wonderful thing for optimizing loops and other repetitive branch paths, but it makes it difficult to get meaningful branch benchmarks. Relative branch, in addition to providing relief from the oppressive 4K base register domain, should help a program perform better because: 1. Branch prediction occurs early in the pipeline when there is no access to register contents. With relative branch there is no need for the processor to waste time double-checking the branch target address once the contents of the base register are actually known. 2. AGI (address generation interlock) can cause an instruction using a base register to run *brutally* slowly (i.e., stop for a while) if it executes shortly after the base register is loaded. This applies to based branches as well as other types of instructions. Base registers get loaded more often than people think e.g., LM when returning from a subroutine. With relative branch there is ZERO possibility of AGI. 3. Freeing up code base registers for other uses allows program code to be better interleaved by compilers, HLASM programmers that know what they're doing, and OOO execution pipelines on the latest machines. -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN