Re: How to get the CPC name on which the current system is running
-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Gerhard Postpischil Sent: Thursday, March 17, 2011 8:02 PM To: IBM-MAIN@bama.ua.edu Subject: Re: How to get the CPC name on which the current system is running On 3/17/2011 10:33 AM, Martin Packer wrote: When I speak to customers using their RMF data I use the serial number to denote the machine but THEY often go oh, that's 'Flossie' but there's nowhere I know of to tell the machine what it's called. :-) Martin (not anthropomorphising computers as I gather they don't like it) :-) When IBM first issued the 360 line, each device and controller had a three position tag, and the C.E.s had peel and stick sheets with hexadecimal numbers, used to indicate the UCB name of the equipment. We liberated some of these and personalized the CPUs as 0AF, BAD, and similar. Some were compromises, such as A55. g None of our machines ever objected G Gerhard Postpischil Bradford, VT And I like the z's 64 bit instruction counter! Why? Because it is now possible to have a wait state code of 0xDEADBEEF. Please be kind to me. The meds are strong! -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: AT-TLS and CICS Sockets performance
On Thu, Mar 17, 2011 at 6:06 PM, Rob Schramm rob.schr...@gmail.com wrote: Jim, IBM is continuing to enhance the performance... the 1.11 indicates that the short-lived AT-TLS may have been worse prior to 1.11. I suspect that the pseudo-conversational is falling into the short-lived camp... and conversational is keeping the conversation going so to speak. You might ask for clarification on the CICS-L about psuedo v.s. conversational. I am guessing that you are prior to 1.11 of z/OS. http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?topic=/com.ibm.iea.commserv_v1/commserv/1.12z/perf/PerformanceOther/player.html http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?topic=/com.ibm.iea.commserv_v1/commserv/1.12z/perf/PerformanceOther/player.html http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?topic=/com.ibm.iea.commserv_v1/commserv/1.11z/security/security/player.html http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?topic=/com.ibm.iea.commserv_v1/commserv/1.11z/security/security/player.html Cheers, Rob Rob, we are at z/OS 1.11. Are you saying the performance was worse prior to that. Heaven forbid :-( Jim -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
EMC/RSA SecurID products hacked
EMC's RSA product SecurID, which some of your networks almost certainly use, has been hacked. An APT has, that is, been directed at RSA. What exactly has been compromised is unclear. RSA may not know; and even if it does it is, understandably, reluctant to say much. It has said that it is “confident that the information extracted does not enable a successful direct attack on any of our RSA SecurID customers.” In the two situations in which I have been asked for my opinion I have, however, suggested that much less confidence would be prudent, at least in the short term. RSA is not stupid about these things; and any breach of its own security was therefore the work of talented, dangerous people. RSA will be able to repair the damage done, but it is not clear just how soon it will be able to put any necessary countermeasures in place. John Gilmore Ashland, MA 01721-1817 USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ASSIST assembler language
John At the request of NIU, I added the ASSIST extended instructions to the z390 portable mainframe assembler and emulator which runs on Windows and Linux. There is online documentation summary of the ASSIST instructions added here: http://www.z390.org/z390_ASSIST_Support.htm The z390 package is open source written in J2SE Java for portability. The mainframe assembler support is designed to be HLASM compatible. z390 can be downloaded and installed using InstallShield for Windows 7, Vista, or XP. There is also flat file zip download for installation on Linux systems. I am planning to present another update on z390, zCOBOL, and zCICS support at the SHARE conference in Orlando, August 7-12, 2011. Don Higgins d...@higgins.net -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
zIIPs and zAAPs
Is there any downside to running zAAP on zIIPs versus all zAAPs *if* there is no current appreciable zIIP workload present? Planning for a z196 and the thought is why not get zIIPs now and if zIIP activity starts to affect zAAP workloads, pay IBM and convert some of the zIIPs to zAAPS. Bob -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zIIPs and zAAPs
I would buy zIIPs instead of zAAPs, however, AFAIK zAAP on zIIP doesn't work if any zAAPs are available. Bob Shannon Rocket Software -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Richards, Robert B. Sent: Friday, March 18, 2011 10:31 AM To: IBM-MAIN@bama.ua.edu Subject: zIIPs and zAAPs Is there any downside to running zAAP on zIIPs versus all zAAPs *if* there is no current appreciable zIIP workload present? Planning for a z196 and the thought is why not get zIIPs now and if zIIP activity starts to affect zAAP workloads, pay IBM and convert some of the zIIPs to zAAPS. Bob -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zIIPs and zAAPs
All the work will look like ziip work. You will not be able to tell if it was primally zaap work. If you run z/OS under z/vm the no zaap req is a little different. Sent via BlackBerry by ATT -Original Message- From: Bob Shannon bshan...@rocketsoftware.com Sender: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Date: Fri, 18 Mar 2011 14:36:02 To: IBM-MAIN@bama.ua.edu Reply-To: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Subject: Re: zIIPs and zAAPs I would buy zIIPs instead of zAAPs, however, AFAIK zAAP on zIIP doesn't work if any zAAPs are available. Bob Shannon Rocket Software -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Richards, Robert B. Sent: Friday, March 18, 2011 10:31 AM To: IBM-MAIN@bama.ua.edu Subject: zIIPs and zAAPs Is there any downside to running zAAP on zIIPs versus all zAAPs *if* there is no current appreciable zIIP workload present? Planning for a z196 and the thought is why not get zIIPs now and if zIIP activity starts to affect zAAP workloads, pay IBM and convert some of the zIIPs to zAAPS. Bob -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
zOS 1.8 and z196s
Is any one running zOS1.8 on a z196? It's on z9s now. Will it even run on a z196? I know it's unsupported. We've got some neglected LPARs that suddenly a z196 looks attractive. Thanks, Alan -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zOS 1.8 and z196s
Yes. There are PTFs available for 1.8 and 1.9. Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why is WTO so much easier to use than better methods? (Was RE: Trouble Reading a Spanned File with an Assembler Pro
In 4d81f10a.8050...@gmail.com, on 03/17/2011 at 07:31 PM, David Crayford dcrayf...@gmail.com said: In a non-zUnix environment stdout is SYSPRINT. So in TSO it writes to the terminal and in batch to a SYSPRINT DD. There is no so. If it write to the terminal regardless of how SYSPRINT is allocated then it isn't writing to SYSPRINT. There's no requirement in TSO that SYSPRINT be DD TERM. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why is WTO so much easier to use than better methods? (Was RE: Trouble Reading a Spanned File with an Assembler Pro
In listserv%201103170724173426.0...@bama.ua.edu, on 03/17/2011 at 07:24 AM, Paul Gilmartin paulgboul...@aim.com said: Not really. It's application dependent and wretchedly inconsistent. What is it? If you mean Unix System Services, then the details you give don't make much sense. I see: Could you give the key to your chart? UNIX stdout stderr Well, it uses stdin, stdout and stderr, none of which are ddnames. AssemblerSYSPRINTSYSTERM Do you mean HLA or programs written in HLA? The latter use whatever ddnames the programmer wants? IEBGENER SYSUT1 SYSPRINT SYSUT1 is an input, not an output. Batch TMP SYSTSPRT For the output of PUTLINE and PUTGET. Programs that use, e.g., SYSPRINT, SYSTERM, in foreground TSO continue to use them in background TSO. TSO Terminal Only for TPUT. Other output goes wherever the allocation points, which might be the terminal or might be something else. It's a real shame that: o TSO didn't originally read from/write to DDNAMES rather than inventing the idiosyncratic TGET/TPUT Only if they could do that without losing functionality. From what I've seen it was the right decision. o DDNAME redirection wasn't made a basic capability of data management rather than implemented sporadically by various applications, often by positional entries in a second PARM. Agreed, and not just for TSO. o Rexx, which internally has separate interfaces for data output and message output, has no provision for externally directing them to different DDNAMEs/descriptors. Do you mean that you would like the output of the say statement to go to a different location from where REXX messages go? That could make debugging more difficult. What I consider a shame is that they haven't added the features from ANSI REXX. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zIIPs and zAAPs
Bob -- I think the main point is acquiring the zIIPs with the machine avoids that potential future zAAP to zIIP conversion charge in the future. As Norman wrote with zAAP on zIIP all the work on that runs on the zIIP appears as zIIP work. The Java work is not reported in the SMF as zAAP any more. I'm not sure about the various zAAP eligible time fields (maybe someone else can clear this detail up). I think the odds are that overtime there will be more zIIP work in z/OS as IBM may create additional eligible workloads for the zIIP. Other vendors also may move some work to zIIP. Little additional work will go to the zAAPs. (though IBM has made some other work eligible for zAAP in addition to Java like XML processing). Al Sherkow, I/S Management Strategies, Ltd. Consulting Expertise on Capacity Planning, Performance Tuning, WLC, LPARs, IRD and LCS Software Seminars on IBM SW Pricing, LPARs, and IRD Voice: +1 414 332-3062 Web: www.sherkow.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
It's possible I misunderstood the original question, but why would you want to??? We use library server and view the documents via a web browser. IMO it's a case of using the best tool for the job and viewing manuals via a 3270 interface just doesn't make sense to me. If 3270 is all you have, then I don't have any suggestion for you. -- Donald Grinsell State of Montana 406-444-2983 dgrins...@mt.gov The only rational patriotism is loyalty to the nation all the time, and loyalty to the government when it deserves it. -- Mark Twain -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jan MOEYERSONS Sent: Thursday, 17 March 2011 05:22 To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? On Wed, 16 Mar 2011 21:34:56 +, Grinsell, Don dgrins...@mt.gov wrote: Chris, I don't know if this is of interest, but it is possible to create an extended bookshelf and load your pdf files to make them accessible via book manager. You can also index and search the pdf files if desired. I've taken that approach with several vendors manuals. And how do you go about displaying PDF on a 3270? Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why is WTO so much e asier to u se than b e tter met ho ds?â
In listserv%201103171911566708.0...@bama.ua.edu, on 03/17/2011 at 07:11 PM, Paul Gilmartin paulgboul...@aim.com said: It appears that in the race to match the competion in features IBM has sacrificed its tradition of surpassing the competition in quality of documentation. IBM had some of the best documentation in the industry, but it also had some clunkers. Take the early editions ot the Utilities manual - please! -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
pdftohtml did a decent job of creating a Web page from a PDF file. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why is WTO so much easier to use than better methods? (Was RE: Trouble Reading a Spanned File with an Assembler Pro
On Thu, 17 Mar 2011 19:03:43 -0400, Shmuel Metz (Seymour J.) wrote: In listserv%201103170724173426.0...@bama.ua.edu, on 03/17/2011 at 07:24 AM, Paul Gilmartin said: Not really. It's application dependent and wretchedly inconsistent. What is it? If you mean Unix System Services, then the details you give don't make much sense. My intent was to contrast UNIX (generally, not just z/OS Unix), which has a clear separation of primary output stream from message output stream with MVS, where things are less regular. I see: Could you give the key to your chart? System orprimary message program output output stream stream UNIX stdout stderr Well, it uses stdin, stdout and stderr, none of which are ddnames. DDNAME, descriptor, stream, whatever. What's in a name? The concept is similar. AssemblerSYSPRINTSYSTERM Do you mean HLA or programs written in HLA? The latter use whatever ddnames the programmer wants? The former, as you pretty much guessed. IEBGENER SYSUT1 SYSPRINT SYSUT1 is an input, not an output. Lapsus mentis. SYSUT2. I stand corrected. Batch TMP SYSTSPRT For the output of PUTLINE and PUTGET. Programs that use, e.g., SYSPRINT, SYSTERM, in foreground TSO continue to use them in background TSO. TSO Terminal Only for TPUT. Other output goes wherever the allocation points, which might be the terminal or might be something else. The dichotomy is more harmful than useful. It's a real shame that: o TSO didn't originally read from/write to DDNAMES rather than inventing the idiosyncratic TGET/TPUT Only if they could do that without losing functionality. From what I've seen it was the right decision. I have preferred to see the needed functionality (handling of 3270 data streams, and of ATTN interrupts) added to QSAM, rather than QSAM discarded an a competing facility invented. But, Conway's Law ... o DDNAME redirection wasn't made a basic capability of data management rather than implemented sporadically by various applications, often by positional entries in a second PARM. Agreed, and not just for TSO. Especially in TSO. The dichotomy between TPUT and PUTLINE should never have been allowed to happen. There should have been a consistent I/O technique which could be redirected or trapped with OUTTRAP. o Rexx, which internally has separate interfaces for data output and message output, has no provision for externally directing them to different DDNAMEs/descriptors. Do you mean that you would like the output of the say statement to go to a different location from where REXX messages go? That could make debugging more difficult. ... Suppose that if both SYSTSPRT and SYSTSMSG were allocated, say goes to the former; messages to the latter. If only SYSTSPRT were allocated, both streams go there. In UNIX, these should be stdout and stderr respectively. Conventionally, both are directed to the terminal, so debugging needn't be more difficult. My frustration is that if I have a Rexx EXEC that writes data to stdout with say, I can redirect that to a file. But if I enable tracing, I'd much prefer to see the trace output (and messages) go to stderr (the terminal), as sh directs it, not to my file. That's why IEBGENER separates SYSUT2 from SYSPRINT. ... What I consider a shame is that they haven't added the features from ANSI REXX. CHARIN, CHAROUT, ...? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zOS 1.8 and z196s
Thanks, Bob. SMP MISSING FIX report - why didn't I remember that :) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bob Shannon Sent: Friday, March 18, 2011 10:26 To: IBM-MAIN@bama.ua.edu Subject: Re: zOS 1.8 and z196s Yes. There are PTFs available for 1.8 and 1.9. Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
Bookmanager's ability to search across shelves was the main feature I used when in Bookmanager otherwise I spent more time in the PDF version. It would be nice if Abobe would search across a group of PDF files as well as Bookmanager does. Stan -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Grinsell, Don Sent: Friday, March 18, 2011 12:16 PM To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? It's possible I misunderstood the original question, but why would you want to??? We use library server and view the documents via a web browser. IMO it's a case of using the best tool for the job and viewing manuals via a 3270 interface just doesn't make sense to me. If 3270 is all you have, then I don't have any suggestion for you. -- Donald Grinsell State of Montana 406-444-2983 dgrins...@mt.gov The only rational patriotism is loyalty to the nation all the time, and loyalty to the government when it deserves it. -- Mark Twain -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jan MOEYERSONS Sent: Thursday, 17 March 2011 05:22 To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? On Wed, 16 Mar 2011 21:34:56 +, Grinsell, Don dgrins...@mt.gov wrote: Chris, I don't know if this is of interest, but it is possible to create an extended bookshelf and load your pdf files to make them accessible via book manager. You can also index and search the pdf files if desired. I've taken that approach with several vendors manuals. And how do you go about displaying PDF on a 3270? Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zIIPs and zAAPs
Thank you to all that responded. To summarize, several of you think it is a good idea, with the only downside being the loss of the separate reporting capability of zAAP work and zAAP eligible time. Bob -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Al Sherkow Sent: Friday, March 18, 2011 11:41 AM To: IBM-MAIN@bama.ua.edu Subject: Re: zIIPs and zAAPs Bob -- I think the main point is acquiring the zIIPs with the machine avoids that potential future zAAP to zIIP conversion charge in the future. As Norman wrote with zAAP on zIIP all the work on that runs on the zIIP appears as zIIP work. The Java work is not reported in the SMF as zAAP any more. I'm not sure about the various zAAP eligible time fields (maybe someone else can clear this detail up). I think the odds are that overtime there will be more zIIP work in z/OS as IBM may create additional eligible workloads for the zIIP. Other vendors also may move some work to zIIP. Little additional work will go to the zAAPs. (though IBM has made some other work eligible for zAAP in addition to Java like XML processing). Al Sherkow, I/S Management Strategies, Ltd. Consulting Expertise on Capacity Planning, Performance Tuning, WLC, LPARs, IRD and LCS Software Seminars on IBM SW Pricing, LPARs, and IRD Voice: +1 414 332-3062 Web: www.sherkow.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
From: dgrins...@mt.gov It's possible I misunderstood the original question, but why would you want to??? I have to agree with the OP as I love using BookManager on the mainframe. Let's say I'm in the middle of writing a COBOL program and I need to know the syntax for the INSPECT statement. Rather than switching over to my desktop and perhaps launching a browser and then finding the right web page and then typing in a search statement, I simply type BR .COB INSPECT on the command line (where 'BR' means browse, .COB is a label I gave to the COBOL syntax manual, and INSPECT is what I want to search for). I can generally be looking at the answer in a fraction of the time it takes using the web interface. For people who fix production problems in the middle of the night, every second counts. If (for example) a program just ended with SQL error -181, nothing could be much faster than typing BR .SQL -181 on a command line. Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/program-development/simplist.html Date: Fri, 18 Mar 2011 16:16:28 + From: dgrins...@mt.gov Subject: Re: creating mainframe bookmanager from pdf documents??? To: IBM-MAIN@bama.ua.edu It's possible I misunderstood the original question, but why would you want to??? We use library server and view the documents via a web browser. IMO it's a case of using the best tool for the job and viewing manuals via a 3270 interface just doesn't make sense to me. If 3270 is all you have, then I don't have any suggestion for you. -- Donald Grinsell State of Montana 406-444-2983 dgrins...@mt.gov The only rational patriotism is loyalty to the nation all the time, and loyalty to the government when it deserves it. -- Mark Twain -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jan MOEYERSONS Sent: Thursday, 17 March 2011 05:22 To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? On Wed, 16 Mar 2011 21:34:56 +, Grinsell, Don dgrins...@mt.gov wrote: Chris, I don't know if this is of interest, but it is possible to create an extended bookshelf and load your pdf files to make them accessible via book manager. You can also index and search the pdf files if desired. I've taken that approach with several vendors manuals. And how do you go about displaying PDF on a 3270? Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
On Fri, Mar 18, 2011 at 9:27 AM, Stan Weyman stan.wey...@emc.com wrote: Bookmanager's ability to search across shelves was the main feature I used when in Bookmanager otherwise I spent more time in the PDF version. It would be nice if Abobe would search across a group of PDF files as well as Bookmanager does. Adobe Reader can search across multiple pdf files via an index. It is up to the person/organization which creates the pdf to build and distribute the related index. Stan -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Grinsell, Don Sent: Friday, March 18, 2011 12:16 PM To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? It's possible I misunderstood the original question, but why would you want to??? We use library server and view the documents via a web browser. IMO it's a case of using the best tool for the job and viewing manuals via a 3270 interface just doesn't make sense to me. If 3270 is all you have, then I don't have any suggestion for you. -- Donald Grinsell State of Montana 406-444-2983 dgrins...@mt.gov The only rational patriotism is loyalty to the nation all the time, and loyalty to the government when it deserves it. -- Mark Twain -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jan MOEYERSONS Sent: Thursday, 17 March 2011 05:22 To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? On Wed, 16 Mar 2011 21:34:56 +, Grinsell, Don dgrins...@mt.gov wrote: Chris, I don't know if this is of interest, but it is possible to create an extended bookshelf and load your pdf files to make them accessible via book manager. You can also index and search the pdf files if desired. I've taken that approach with several vendors manuals. And how do you go about displaying PDF on a 3270? Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: AT-TLS and CICS Sockets performance
Jim, According to the document.. I can only infer it. Did you get any help from the CICS-List? Regarding the connection behavior for pseudo v.s. conversational and how it will affect the AT-TLS connection? There are additional performance gains in 1.12. Rob -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jim McAlpine Sent: Friday, March 18, 2011 6:10 AM To: IBM-MAIN@bama.ua.edu Subject: Re: AT-TLS and CICS Sockets performance On Thu, Mar 17, 2011 at 6:06 PM, Rob Schramm rob.schr...@gmail.com wrote: Jim, IBM is continuing to enhance the performance... the 1.11 indicates that the short-lived AT-TLS may have been worse prior to 1.11. I suspect that the pseudo-conversational is falling into the short-lived camp... and conversational is keeping the conversation going so to speak. You might ask for clarification on the CICS-L about psuedo v.s. conversational. I am guessing that you are prior to 1.11 of z/OS. http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?to pic=/com.ibm.iea.commserv_v1/commserv/1.12z/perf/PerformanceOther/play er.html http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?to pic=/com.ibm.iea.commserv_v1/commserv/1.12z/perf/PerformanceOther/play er.html http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?to pic=/com.ibm.iea.commserv_v1/commserv/1.11z/security/security/player.h tml http://publib.boulder.ibm.com/infocenter/ieduasst/stgv1r0/index.jsp?to pic=/com.ibm.iea.commserv_v1/commserv/1.11z/security/security/player.h tml Cheers, Rob Rob, we are at z/OS 1.11. Are you saying the performance was worse prior to that. Heaven forbid :-( Jim -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
There is also the SDSF BOOK command. Simply point your cursor at the message id that you are interested in and press a PFK to look it up on Bookie. The TSO version of LOOKAT works much the same way. Fault Analyzer has a message lookup facility that is very similar to LOOKAT. IMO, switching to your Windows desktop to look up an error message is very inefficient. On Fri, Mar 18, 2011 at 12:55, Dave Salt ds...@hotmail.com wrote: From: dgrins...@mt.gov It's possible I misunderstood the original question, but why would you want to??? I have to agree with the OP as I love using BookManager on the mainframe. Let's say I'm in the middle of writing a COBOL program and I need to know the syntax for the INSPECT statement. Rather than switching over to my desktop and perhaps launching a browser and then finding the right web page and then typing in a search statement, I simply type BR .COB INSPECT on the command line (where 'BR' means browse, .COB is a label I gave to the COBOL syntax manual, and INSPECT is what I want to search for). I can generally be looking at the answer in a fraction of the time it takes using the web interface. For people who fix production problems in the middle of the night, every second counts. If (for example) a program just ended with SQL error -181, nothing could be much faster than typing BR .SQL -181 on a command line. Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/program-development/simplist.html Date: Fri, 18 Mar 2011 16:16:28 + From: dgrins...@mt.gov Subject: Re: creating mainframe bookmanager from pdf documents??? To: IBM-MAIN@bama.ua.edu It's possible I misunderstood the original question, but why would you want to??? We use library server and view the documents via a web browser. IMO it's a case of using the best tool for the job and viewing manuals via a 3270 interface just doesn't make sense to me. If 3270 is all you have, then I don't have any suggestion for you. -- Donald Grinsell State of Montana 406-444-2983 dgrins...@mt.gov The only rational patriotism is loyalty to the nation all the time, and loyalty to the government when it deserves it. -- Mark Twain -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jan MOEYERSONS Sent: Thursday, 17 March 2011 05:22 To: IBM-MAIN@bama.ua.edu Subject: Re: creating mainframe bookmanager from pdf documents??? On Wed, 16 Mar 2011 21:34:56 +, Grinsell, Don dgrins...@mt.gov wrote: Chris, I don't know if this is of interest, but it is possible to create an extended bookshelf and load your pdf files to make them accessible via book manager. You can also index and search the pdf files if desired. I've taken that approach with several vendors manuals. And how do you go about displaying PDF on a 3270? Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zPrime
http://www.watsonwalker.com/clist148.html From what I see that Cheryl quoted, IBM is saying you have to obey the CONTRACT restrictions on what you can run on zIIPs and zAAPs. Neon (and the court) is saying that if they can run on zIIPs and zAAPs without bypassing the PROGRAM restrictions, the zPrime software is legal. If zPrime modifies the programming restrictions, then it is illegal. I don't think IBM would release hardware with restrictions that zPrime (or anyone else) could change the restrictions on. On Fri, Mar 11, 2011 at 3:20 PM, Cheryl Walker che...@watsonwalker.com wrote: This product from Neon was the topic of several discussions two years ago. I just sent out a Cheryl's List email about the current status - it's still in the courts, but a summary judgment was just filed. If you're interested, look at Cheryl's List #148 at http://www.watsonwalker.com/archives.html. Best regards, Cheryl == Cheryl Watson Watson Walker, Inc. www.watsonwalker.com 941-266-6609 == -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
FUZZY ABOUT SPILL VOLUMES
Good Day To All, I am fuzzy about SPILL volumes. I checked the PRIMER doc and it is very not clear about what SPILL actually does, it says something to the effect that HSM moves older backup versions to other volumes or SPILL volumes. If I understand it correctly, HSM moves the DAY backup to SPILL and this is done via RECYCLE. My question is 2 fold. If I am running low on SPILL tapes should I need to add tapes to the SPILL Backup or to DAILY BACKUP i.e ADDVOL BKP002 UNIT(3590-1) BACKUP(SPILL) THRESHOLD(85) or ADDVOL BKP006 UNIT(3590-1) BACKUP(DAILY(1)) Also, I ran a report to check what BACKUP tapes are eligible for recycle - HSENDCMD RECYCLE DISPLAY BACKUP I noticed in the report it has both the BACKUP and SPILL VOLS. Is there a way of just getting the BACKUP volsers? I executed the report again for SPILL - HSENDCMD RECYCLE DISPLAY SPILL and the report only listed the SPIL vols. Thanks for your advice in advance. Cheers -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Distinguishing Duplicate VTAM Minor Nodes
I have the same minor nodes OM22VTAM under 2 different MAJORNODES, A22OMMVS and A22KOOM1. The first MAJORNODE that is varied active activates the minor node and the other minor node gets a STATUS of RESET. If I then want to flip them so that the ACTIVE one becomes RESET and the RESET one becomes ACTIVE can I do it individually or do I need to VARY the whole MAJORNODEs INACT and ACT. IOW is there a way of qualifying the VARY command with the MAJORNODE name. -- George Henke (C) 845 401 5614 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zIIPs and zAAPs
100% correct. Not only must you not have any zAAPs you must not even have any RESERVED zAAPS on the image profile in order for zAAP on zIIP to work.It was not obvious when we initially set ZZ=YES why it was not working. I would agree for many sites all zIIPs makes sense today and use ZZ=YES.You don't have to offload a lot of MSU's out of your peak 4HRA if you are using sub-capacity pricing to justify a zIIP so if you have not looked at one in a while you might want to look again. Best Regards, Sam Knutson -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bob Shannon Sent: Friday, March 18, 2011 10:36 AM To: IBM-MAIN@bama.ua.edu Subject: Re: zIIPs and zAAPs I would buy zIIPs instead of zAAPs, however, AFAIK zAAP on zIIP doesn't work if any zAAPs are available. Bob Shannon Rocket Software -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Richards, Robert B. Sent: Friday, March 18, 2011 10:31 AM To: IBM-MAIN@bama.ua.edu Subject: zIIPs and zAAPs Is there any downside to running zAAP on zIIPs versus all zAAPs *if* there is no current appreciable zIIP workload present? Planning for a z196 and the thought is why not get zIIPs now and if zIIP activity starts to affect zAAP workloads, pay IBM and convert some of the zIIPs to zAAPS. Bob -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This email/fax message is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution of this email/fax is prohibited. If you are not the intended recipient, please destroy all paper and electronic copies of the original message. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to get the CPC name on which the current system is running
0xE2C8C9E3 (EBCDIC) Tom Puddicombe Mainframe Performance Capacity Planning CSC 71 Deerfield Rd, Meriden, CT 06450 ITIS | (860) 428-3252 | tpudd...@csc.com | www.csc.com This is a PRIVATE message. If you are not the intended recipient, please delete without copying and kindly advise us by e-mail of the mistake in delivery. NOTE: Regardless of content, this e-mail shall not operate to bind CSC to any order or other contract unless pursuant to explicit written agreement or government initiative expressly permitting the use of e-mail for such purpose. From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN@bama.ua.edu Date: 03/18/2011 10:16 AM Subject: Re: How to get the CPC name on which the current system is running -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Gerhard Postpischil Sent: Thursday, March 17, 2011 8:02 PM To: IBM-MAIN@bama.ua.edu Subject: Re: How to get the CPC name on which the current system is running On 3/17/2011 10:33 AM, Martin Packer wrote: When I speak to customers using their RMF data I use the serial number to denote the machine but THEY often go oh, that's 'Flossie' but there's nowhere I know of to tell the machine what it's called. :-) Martin (not anthropomorphising computers as I gather they don't like it) :-) When IBM first issued the 360 line, each device and controller had a three position tag, and the C.E.s had peel and stick sheets with hexadecimal numbers, used to indicate the UCB name of the equipment. We liberated some of these and personalized the CPUs as 0AF, BAD, and similar. Some were compromises, such as A55. g None of our machines ever objected G Gerhard Postpischil Bradford, VT And I like the z's 64 bit instruction counter! Why? Because it is now possible to have a wait state code of 0xDEADBEEF. Please be kind to me. The meds are strong! -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Dynamic calls from COBOL
Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. The callee, with entry points DCALLEE and CALL (yeah, stupid names, but I've been tinkering): --- Identification Division. Program-ID. DCALLEE. Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. --- JCL to compile/linkedit the callee: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLEE) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLEE) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLEE),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLEE) NAMEDCALLEE(R) /* --- The caller: --- PROCESS DYNAM NODLL Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. --- JCL to compile/linkedit/run the caller: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLER) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLER) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLER),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLER) NAMEDCALLER(R) /* //RUN EXEC PGM=DCALLER,REGION=0K //* //STEPLIB DD DISP=SHR,DSN=PHS.PDS.LOAD //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //* --- Any and all ideas greatly appreciated! -- ...phsiii Phil Smith III p...@voltage.com Voltage Security, Inc. www.voltage.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
You can search all pdf documents in a directory; open any pdf document and then use CTRL-SHIFT-F to open the SEARCH WINDOW that lets you select the directory and search all pdf's in that directory. Barry Merrill Herbert W. Barry Merrill, PhD President-Programmer ba...@mxg.com Merrill Consultants MXG Software 10717 Cromwell Drive Dallas TX 75229 214 351 1966 tel 214 350 3694 fax www.mxg.com technical: supp...@mxg.com admin: ad...@mxg.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: creating mainframe bookmanager from pdf documents???
On Fri, 18 Mar 2011 15:05:43 -0500, Barry Merrill ba...@mxg.com wrote: You can search all pdf documents in a directory; open any pdf document and then use CTRL-SHIFT-F to open the SEARCH WINDOW that lets you select the directory and search all pdf's in that directory. And then go get a cup of coffee. :-) -- 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/ *** Please note the new URL for Mark's MVS Utilities *** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dynamic calls from COBOL
Phil, If memory serves me correctly, you need an ALIAS for the second entry point. Or, you need to link it under the second entry name, naming the secondary entry point as the entry. I don't recall which, but this might help you get further. Chuck Charles Hardee CA technologies Sr Sustaining Engineer Tel: +1-952-838-1039 charles.har...@ca.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Phil Smith Sent: Friday, March 18, 2011 3:03 PM To: IBM-MAIN@bama.ua.edu Subject: Dynamic calls from COBOL Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. The callee, with entry points DCALLEE and CALL (yeah, stupid names, but I've been tinkering): --- Identification Division. Program-ID. DCALLEE. Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. --- JCL to compile/linkedit the callee: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLEE) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLEE) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLEE),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLEE) NAMEDCALLEE(R) /* --- The caller: --- PROCESS DYNAM NODLL Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. --- JCL to compile/linkedit/run the caller: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLER) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLER) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLER),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLER) NAMEDCALLER(R) /* //RUN EXEC PGM=DCALLER,REGION=0K //* //STEPLIB DD DISP=SHR,DSN=PHS.PDS.LOAD //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //* --- Any and all ideas greatly appreciated! -- ...phsiii Phil Smith III p...@voltage.com Voltage Security, Inc. www.voltage.com --
Re: Dynamic calls from COBOL
Phil, In order for MVS program management to find load module CALL, I think you need to add an ALIAS statement in the Binder Control cards: INCLUDE TESTPGMS(DCALLEE) ALIAS CALL NAMEDCALLEE(R) === Wayne Driscoll OMEGAMON DB2 L3 Support/Development wdrisco(AT)us.ibm.com === From: Phil Smith p...@voltage.com To: IBM-MAIN@bama.ua.edu Date: 03/18/2011 03:05 PM Subject: Dynamic calls from COBOL Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. The callee, with entry points DCALLEE and CALL (yeah, stupid names, but I've been tinkering): --- Identification Division. Program-ID. DCALLEE. Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. --- JCL to compile/linkedit the callee: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLEE) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLEE) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLEE),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLEE) NAMEDCALLEE(R) /* --- The caller: --- PROCESS DYNAM NODLL Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. --- JCL to compile/linkedit/run the caller: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLER) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLER) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLER),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLER) NAMEDCALLER(R) /* //RUN EXEC PGM=DCALLER,REGION=0K //* //STEPLIB DD DISP=SHR,DSN=PHS.PDS.LOAD //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //* --- Any and all ideas greatly appreciated! -- ...phsiii Phil Smith III p...@voltage.com Voltage Security, Inc. www.voltage.com --
Re: zPrime
Hm. I read it as the court saying that the latter is unclear, and a matter for a jury. Now, finding a jury who gets it will be interesting...unless they troll here! raises hand On Fri, Mar 18, 2011 at 1:37 PM, Mike Schwab mike.a.sch...@gmail.com wrote: http://www.watsonwalker.com/clist148.html From what I see that Cheryl quoted, IBM is saying you have to obey the CONTRACT restrictions on what you can run on zIIPs and zAAPs. Neon (and the court) is saying that if they can run on zIIPs and zAAPs without bypassing the PROGRAM restrictions, the zPrime software is legal. If zPrime modifies the programming restrictions, then it is illegal. I don't think IBM would release hardware with restrictions that zPrime (or anyone else) could change the restrictions on. -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Distinguishing Duplicate VTAM Minor Nodes
George It might be helpful - for you particularly - if you explain what your reason is for this peculiar procedure. From your language, you may be suffering some misunderstandings. In no way does a major node *qualify* a minor node. A major node is merely a separate member of the VTAMLST partitioned data set, library, within which is collected freely a number of minor node definition statements - with some exceptions. The exceptions are NCP and XCA - and they don't concern us here. In the case of APPL statements or LOCAL statements or PU statements in a switched major node, for example, you can split them up in any way that takes your fancy. Once inside VTAM, as it were, they may as well all have been contained in one of the corresponding major nodes or in a corresponding major node each or any relationship in between. SNA requires that network accessible units (NAUs)[1] have an unique name. The NAUs are SSCP, PU and LU. The SSCP and PU are found only in subarea SNA and, although the CP is supposedly also unique, it is really just a required LU which uses particular mode names when playing the role of a CP.[2] Thus in pure APPN, there are only LUs and any PU *statements* seen in an APPN context are actually used to set up control blocks which represent adjacent link stations with nary an SNA PU entity in sight. In order to perform this peculiar conjuring trick of having one version of an APPL statement active at one time and another version with an identical name active at anther time, you need to remove the first from the VTAM name space and that means deactivating the major node. In the days when NCP was king, there was a trick which could be played with an SSCP-dependent LU in one NCP having the same name as an SSCP- dependent LU in another simultaneously active NCP. You could release and acquire the hierarchically superior SSCP-dependent PU using the OWNER and BACKUP NCP operands and the VARY ACQ and VARY REL commands. I *think* some of my students *may* have understood how this worked when I presented the topic! The reason I mention this is that this is the only environment I know where the clash of names is formally allowed and facilities exist to tolerate it - for a reason. Actually I guess I need to acknowledge the session setup implications of the DUPDEFS and DIALRTRY start options. In the case of DUPDEFS, this is all about having LUs with the same name but under different - SNA architectural - nodes, loosely boxes. In the case of DIALRTRY, this is all about having the same resource accessible under different - SNA architectural - nodes accessed using switched facilities. - I've thought of a reason why you might want two flavours of an APPL statement definition. You need to keep the same name but - possibly you think - you need to have two different definitions for two different applications performing the same function in a migration scenario. Perhaps the documentation of one application specifies that APPC=YES is needed and the documentation of the other application specifies that APPC=NO is needed. If something like this is what you are facing, it may be that the more demanding application definition is not fatal to the other application. I'm pretty sure you can run an application that may specify APPC=NO with APPC=YES, for example. If the difference is some change to pacing values, are you sure you couldn't achieve the same objective with mode table entry definitions? In other words, what do you really need to do? - [1] In the days of subarea networking this was network addressable units but APPN required a subtle change of name. [2] SNA APPN architecture expresses it differently and in a more complicated manner. This is a consequence of VTAM being unable to allow the SSCP, masquerading as a CP, actually to support business sessions. All other APPN implementations, the CP LU can also act as business LU - or should be able to! - Chris Mason On Fri, 18 Mar 2011 14:25:32 -0400, George Henke gahe...@gmail.com wrote: I have the same minor nodes OM22VTAM under 2 different MAJORNODES, A22OMMVS and A22KOOM1. The first MAJORNODE that is varied active activates the minor node and the other minor node gets a STATUS of RESET. If I then want to flip them so that the ACTIVE one becomes RESET and the RESET one becomes ACTIVE can I do it individually or do I need to VARY the whole MAJORNODEs INACT and ACT. IOW is there a way of qualifying the VARY command with the MAJORNODE name. -- George Henke (C) 845 401 5614 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dynamic calls from COBOL
On Fri, 18 Mar 2011 13:03:00 -0700, Phil Smith p...@voltage.com wrote: Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp? topic=/com.ibm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. Hi PHSIII! :-) From the COBOL Programming Guide: Static calls to alternate entry points work without restriction. Dynamic calls to alternate entry points require the following elements: . Either explicitly specified NAME or ALIAS linkage-editor or binder control statements, or use of the NAME compiler option which generates them automatically. . An intervening CANCEL for any dynamic call to the same module at a different entry point. CANCEL causes the program to be invoked in initial state when it is called at a new entry point. -- Dale R. Smith -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dynamic calls from COBOL
Instead of messing with the binder control cards you can specify the COBOL compile option NAME(ALIAS) (which, in fact, adds the relevant binder control cards). If you specify NAME(ALIAS), and your program contains ENTRY statements, a link-edit ALIAS card is generated for each ENTRY statement. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 On 3/18/2011 at 2:17 PM, in message of27de444e.0baf690d-on86257857.006f2f1d-86257857.006f6...@us.ibm.com, Wayne Driscoll wdri...@us.ibm.com wrote: Phil, In order for MVS program management to find load module CALL, I think you need to add an ALIAS statement in the Binder Control cards: INCLUDE TESTPGMS(DCALLEE) ALIAS CALL NAMEDCALLEE(R) === Wayne Driscoll OMEGAMON DB2 L3 Support/Development wdrisco(AT)us.ibm.com === From: Phil Smith p...@voltage.com To: IBM-MAIN@bama.ua.edu Date: 03/18/2011 03:05 PM Subject: Dynamic calls from COBOL Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.i bm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. The callee, with entry points DCALLEE and CALL (yeah, stupid names, but I've been tinkering): --- Identification Division. Program-ID. DCALLEE. Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. --- JCL to compile/linkedit the callee: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLEE) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLEE) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLEE),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLEE) NAMEDCALLEE(R) /* --- The caller: --- PROCESS DYNAM NODLL Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. --- JCL to compile/linkedit/run the caller: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLER) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLER) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLER),DISP=SHR //* //LKED EXEC
Re: Dynamic calls from COBOL
CALL needs to be an ALIAS to DCALLEE when you do the binding (LKED step). Do you use the NAME(ALIAS) compiler option? You either need that or put in an ALIAS CALL command in your link step. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Phil Smith Sent: Friday, March 18, 2011 3:03 PM To: IBM-MAIN@bama.ua.edu Subject: Dynamic calls from COBOL Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.js p?topic=/com.ibm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. The callee, with entry points DCALLEE and CALL (yeah, stupid names, but I've been tinkering): --- Identification Division. Program-ID. DCALLEE. Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. --- JCL to compile/linkedit the callee: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLEE) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLEE) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLEE),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLEE) NAMEDCALLEE(R) /* --- The caller: --- PROCESS DYNAM NODLL Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. --- JCL to compile/linkedit/run the caller: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLER) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLER) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLER),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), //
Re: Distinguishing Duplicate VTAM Minor Nodes
tyvm, Chris, you really know this stuff. This is for a migration to a new OMEGAMON CICS. We have completely reconfigured OMEGAMON CICS with a new version that has all different MAJOR and minor node names which are more coherent. However, we needed to retain the APPL name so end users can still log into OMEGAMON CICS without changing their VTAM APPLIDs in their CLSS SuperSession profiles. So we duplicated several APPL minor node names, not acbnames, in the new OMEGAMON Major node and now that we need to migrate from the old OMEGAMON to the new we are trying to figure out the VTAM commands needed so that there is no conflict or confusion between the two duplicate names when we vary them inact and act. We just tried a test this afternoon and everything worked fine. But the new major node was not already active and so the minor was not in a RESET status. So we don't know what would have happened in a fallback scenario where the duplicate minor is in a RESET state. I am wondering if a simple vary act will activate it after the active minor has been inact'd. This is probably as clear as mud, but it is what we are trying to do. On Fri, Mar 18, 2011 at 4:26 PM, Chris Mason chrisma...@belgacom.netwrote: George It might be helpful - for you particularly - if you explain what your reason is for this peculiar procedure. From your language, you may be suffering some misunderstandings. In no way does a major node *qualify* a minor node. A major node is merely a separate member of the VTAMLST partitioned data set, library, within which is collected freely a number of minor node definition statements - with some exceptions. The exceptions are NCP and XCA - and they don't concern us here. In the case of APPL statements or LOCAL statements or PU statements in a switched major node, for example, you can split them up in any way that takes your fancy. Once inside VTAM, as it were, they may as well all have been contained in one of the corresponding major nodes or in a corresponding major node each or any relationship in between. SNA requires that network accessible units (NAUs)[1] have an unique name. The NAUs are SSCP, PU and LU. The SSCP and PU are found only in subarea SNA and, although the CP is supposedly also unique, it is really just a required LU which uses particular mode names when playing the role of a CP.[2] Thus in pure APPN, there are only LUs and any PU *statements* seen in an APPN context are actually used to set up control blocks which represent adjacent link stations with nary an SNA PU entity in sight. In order to perform this peculiar conjuring trick of having one version of an APPL statement active at one time and another version with an identical name active at anther time, you need to remove the first from the VTAM name space and that means deactivating the major node. In the days when NCP was king, there was a trick which could be played with an SSCP-dependent LU in one NCP having the same name as an SSCP- dependent LU in another simultaneously active NCP. You could release and acquire the hierarchically superior SSCP-dependent PU using the OWNER and BACKUP NCP operands and the VARY ACQ and VARY REL commands. I *think* some of my students *may* have understood how this worked when I presented the topic! The reason I mention this is that this is the only environment I know where the clash of names is formally allowed and facilities exist to tolerate it - for a reason. Actually I guess I need to acknowledge the session setup implications of the DUPDEFS and DIALRTRY start options. In the case of DUPDEFS, this is all about having LUs with the same name but under different - SNA architectural - nodes, loosely boxes. In the case of DIALRTRY, this is all about having the same resource accessible under different - SNA architectural - nodes accessed using switched facilities. - I've thought of a reason why you might want two flavours of an APPL statement definition. You need to keep the same name but - possibly you think - you need to have two different definitions for two different applications performing the same function in a migration scenario. Perhaps the documentation of one application specifies that APPC=YES is needed and the documentation of the other application specifies that APPC=NO is needed. If something like this is what you are facing, it may be that the more demanding application definition is not fatal to the other application. I'm pretty sure you can run an application that may specify APPC=NO with APPC=YES, for example. If the difference is some change to pacing values, are you sure you couldn't achieve the same objective with mode table entry definitions? In other words, what do you really need to do? - [1] In the days of subarea networking this was network addressable units but APPN required a subtle change of name. [2] SNA APPN architecture expresses it differently and in a more
Re: Dynamic calls from COBOL
If you have StarTool--or its ancestor PDS(E)--you can assign an alias to a load module with a simple command. You do need to have a matching entry point in the load module. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN@bama.ua.edu Date: 03/18/2011 01:35 PM Subject:Re: Dynamic calls from COBOL Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu CALL needs to be an ALIAS to DCALLEE when you do the binding (LKED step). Do you use the NAME(ALIAS) compiler option? You either need that or put in an ALIAS CALL command in your link step. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Phil Smith Sent: Friday, March 18, 2011 3:03 PM To: IBM-MAIN@bama.ua.edu Subject: Dynamic calls from COBOL Hoping someone here has more experience with dynamic linking than I do. I'm trying to get something to be dynamically callable from COBOL on z/OS. This is old-style dynamic calling, not DLL stuff. So I've found http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.js p?topic=/com.ibm.entcobol.doc_4.1/PGandLR/ref/rpsub08.htm and have followed that (I believe), but get S806 ABENDs when calling the *second* entry point in the target module. So either I've missed something, the example is wrong, I'm using some wrong option on the linkedit, or it's gremlins. The callee, with entry points DCALLEE and CALL (yeah, stupid names, but I've been tinkering): --- Identification Division. Program-ID. DCALLEE. Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. --- JCL to compile/linkedit the callee: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=PHS.PDS.SOURCE(DCALLEE) // DDDISP=SHR,DSN=VSH.BASE230.SAMPLIB //SYSLIN DDDISP=SHR,DSN=PHS.PDS.OBJ(DCALLEE) //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT4 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT5 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT6 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT7 DDUNIT=SYSDA,SPACE=(CYL,(1,1)) // PEND // EXEC IGYWC //* //COBOL.SYSIN DD DSN=PHS.PDS.SOURCE(DCALLEE),DISP=SHR //* //LKED EXEC PGM=IEWBLINK,COND=(8,LT), // PARM='LIST,AMODE=31,MAP,LET,RENT,DYNAM(NO)' //SYSPRINT DDSYSOUT=* //SYSLIB DDDISP=SHR,DSN=CEE.SCEELKED //TESTPGMS DDDISP=SHR,DSN=PHS.PDS.OBJ //SYSLMOD DDDISP=SHR,DSN=PHS.PDS.LOAD //SYSUT1 DDUNIT=SYSDA,SPACE=(CYL,(3,1)) //SYSLIN DD* INCLUDE TESTPGMS(DCALLEE) NAMEDCALLEE(R) /* --- The caller: --- PROCESS DYNAM NODLL Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. --- JCL to compile/linkedit/run the caller: --- //IGYWC PROC //COBOL EXEC PGM=IGYCRCTL,REGION=2048K, // PARM='LIB,DYNAM,NODLL' //STEPLIB DDDISP=SHR,DSNAME=IGY340.SIGYCOMP //SYSPRINT DDSYSOUT=* //SYSLIB DD
Re: creating mainframe bookmanager from pdf documents???
On Fri, 18 Mar 2011 15:09:57 -0500, Mark Zelden wrote: On Fri, 18 Mar 2011 15:05:43 -0500, Barry Merrill wrote: You can search all pdf documents in a directory; open any pdf document and then use CTRL-SHIFT-F to open the SEARCH WINDOW that lets you select the directory and search all pdf's in that directory. And then go get a cup of coffee. :-) Spotlight is your friend. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dynamic calls from COBOL
Well, adding ALIASES(ALL) seems to be the answer. Now to solve the original problem, which is much nastier (involving long, mixed-case names...) Thanks. -- ...phsiii Phil Smith III p...@voltage.com Voltage Security, Inc. www.voltage.com (703) 476-4511 (home office) (703) 568-6662 (cell) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Initial Capping
We have a Z9 BC with one CPU and recently went back to hard capping from Group Capacity because our production system started to suffer when WLM started to enforce the MSU limit after 4 hours on a peak day. Before Group Capacity, the production system had no problem handling the peak load and was able to use a few MSUs above its defined capacity with no slowdown after 4 hours. Here are our prior settings: Group Capacity=11 PRODLPAR initial-capping=No CPU-weight=800 Defined-Capacity=0 WLM=No TestLPAR initial-capping=No CPU-weight=200 Defined-Capacity=4 WLM=No Here are our current settings: PRODLPAR initial-capping=Yes CPU-weight=800 Defined-Capacity=10 WLM=No TestLPAR initial-capping=Yes CPU-weight=200 Defined-Capacity=2 WLM=No The Test LPAR normally uses 1 MSU but needs more when there is testing being performed. The reason I'd like to uncheck 'Initial Capping' is to allow the LPARs to go beyond their 'Initial Weight' if the other LPARs are not busy. We got the impression from SHARE that 'Initial Capping' had to be checked to allow the LPAR to use the 'free' MSUs beyond the Defined Capacity. But we don't want to do this if it means being unable to take advantage of the 'free' MSUs or if it means WLM will start enforcing the 4 hour rolling average MSU limit. Will unchecking 'Initial Capping' still allow the LPARs to go a little bit beyond their Defined Capacity without WLM stepping in and trying to enforce the 4 hour rolling average MSU limit? Thanks. Vince -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
ISPF Point and Shoot
I can't seem to get Point and shoot right The attribute field that is defined needs to have PAS(ON) So for example @ TYPE(INPUT) PAS(ON) COLOR(WHITE) The )PNTS section defines the value to be placed in the point and shoot field )BODT Point and shoot field == @field )PNTS FIELD(ZPS1) VAR(VAR1) VAL(1) So if the user cursor selects the area where field is located a value of 1 will be placed variable var1 Excepts when I do a say ' var1 = ' var1 var1 value is not 1 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Distinguishing Duplicate VTAM Minor Nodes
George I think the key point you need is that, when you deactivate the major node, you remove the major nodes from VTAM - use D NET,MAJNODES to observe this - and you remove the contained APPL statement minor nodes from the VTAM name space and that VTAM will have forgotten that they ever existed. Other VTAMs will still have representations of that minor node as CDRSCs but, if the original VTAM reintroduces the APPL statement minor node names again, it doesn't matter since the CDRSC, in a subarea context and mainly in an APPN context, just names, the name itself and names of potentially owning CDRMs or CPs, in effect, VTAMs. So, you activate the major node(s) which go along with the old application setup at one time. Run the old application. Shut down the old application. Deactivate the major node(s). Activate the major node(s) which go along with the new application setup. Run the new application. And so on. Of course, you can check on the status of the APPL statements with D NET,ID=major-node-name,E. Does that cover what you need? If you post representative versions of the APPL statements in their major nodes, I might be able to spot a simplification. Chris Mason On Fri, 18 Mar 2011 16:45:25 -0400, George Henke gahe...@gmail.com wrote: tyvm, Chris, you really know this stuff. This is for a migration to a new OMEGAMON CICS. We have completely reconfigured OMEGAMON CICS with a new version that has all different MAJOR and minor node names which are more coherent. However, we needed to retain the APPL name so end users can still log into OMEGAMON CICS without changing their VTAM APPLIDs in their CLSS SuperSession profiles. So we duplicated several APPL minor node names, not acbnames, in the new OMEGAMON Major node and now that we need to migrate from the old OMEGAMON to the new we are trying to figure out the VTAM commands needed so that there is no conflict or confusion between the two duplicate names when we vary them inact and act. We just tried a test this afternoon and everything worked fine. But the new major node was not already active and so the minor was not in a RESET status. So we don't know what would have happened in a fallback scenario where the duplicate minor is in a RESET state. I am wondering if a simple vary act will activate it after the active minor has been inact'd. This is probably as clear as mud, but it is what we are trying to do. On Fri, Mar 18, 2011 at 4:26 PM, Chris Mason chrisma...@belgacom.netwrote: George It might be helpful - for you particularly - if you explain what your reason is for this peculiar procedure. From your language, you may be suffering some misunderstandings. In no way does a major node *qualify* a minor node. A major node is merely a separate member of the VTAMLST partitioned data set, library, within which is collected freely a number of minor node definition statements - with some exceptions. The exceptions are NCP and XCA - and they don't concern us here. In the case of APPL statements or LOCAL statements or PU statements in a switched major node, for example, you can split them up in any way that takes your fancy. Once inside VTAM, as it were, they may as well all have been contained in one of the corresponding major nodes or in a corresponding major node each or any relationship in between. SNA requires that network accessible units (NAUs)[1] have an unique name. The NAUs are SSCP, PU and LU. The SSCP and PU are found only in subarea SNA and, although the CP is supposedly also unique, it is really just a required LU which uses particular mode names when playing the role of a CP.[2] Thus in pure APPN, there are only LUs and any PU *statements* seen in an APPN context are actually used to set up control blocks which represent adjacent link stations with nary an SNA PU entity in sight. In order to perform this peculiar conjuring trick of having one version of an APPL statement active at one time and another version with an identical name active at anther time, you need to remove the first from the VTAM name space and that means deactivating the major node. In the days when NCP was king, there was a trick which could be played with an SSCP-dependent LU in one NCP having the same name as an SSCP- dependent LU in another simultaneously active NCP. You could release and acquire the hierarchically superior SSCP-dependent PU using the OWNER and BACKUP NCP operands and the VARY ACQ and VARY REL commands. I *think* some of my students *may* have understood how this worked when I presented the topic! The reason I mention this is that this is the only environment I know where the clash of names is formally allowed and facilities exist to tolerate it - for a reason. Actually I guess I need to acknowledge the session setup implications of the DUPDEFS and DIALRTRY start options. In the case of DUPDEFS, this is all about having LUs with the same name but under different - SNA
Re: Distinguishing Duplicate VTAM Minor Nodes
*This was the original VTAM APPL definition for generated by OMEGAMON ICAT for the new config:* ** * CUA LOGON APPLID *KSYSCLONE.M2?P APPL* AUTH=(ACQ,NVPACE,PASS,SPO), X PARSESS=YES,SRBEXIT=YES * * CLASSIC LOGON APPLID *KSYSCLONE.M2RC APPL* AUTH=(ACQ,NVPACE,PASS),SRBEXIT=NO * * But we wanted our end-users to use their current APPLIDs so they did not need to redefine their CLSS SuperSession profiles to log in: * ** *CURRENT APPLS:* *A19OMMVS VBUILD TYPE=APPL * *** *** *** *** THIS IS AN EXAMPLE OF OM/2 APPL DEFINITIONS *** *** *** *** *OM19MVS APPL* AUTH=(ACQ,NVPACE,PASS), X PARSESS=YES,SRBEXIT=YES OM19OPR APPL AUTH=(ACQ,NVPACE,PASS), X PARSESS=YES,SRBEXIT=YES OM19VPO APPL AUTH=(ACQ,NVPACE,PASS,SPO), X PARSESS=YES,SRBEXIT=YES *OM19VTAM APPL* AUTH=(ACQ,NVPACE,PASS),SRBEXIT=NO EP19ZOOM APPL AUTH=(ACQ,NVPACE,PASS),SRBEXIT=NO *Since the ACBNAME was not coded in any of these APPLs, the ACBNAME and the APPL were the same.* ** *So I made the APPL name for the new config the same as the old APPL names, but related it to the new ACBNAME as follows thereby making the new APPLs synonymous with the old APPLs. Do you see any problem with this?* *NEW APPLS:* *A19KOOM1VBUILD TYPE=APPL * * CUA LOGON APPLID KSYSCLONE.M2?P APPL AUTH=(ACQ,NVPACE,PASS,SPO), X PARSESS=YES,SRBEXIT=YES * *OM19MVS APPL* AUTH=(ACQ,NVPACE,PASS,SPO), X PARSESS=YES,SRBEXIT=YES,*ACBNAME=KSYSCLONE.M2AP* * * CLASSIC LOGON APPLID *OM19VTAM APPL* AUTH=(ACQ,NVPACE,PASS),SRBEXIT=NO, X *ACBNAME=KSYSCLONE.M2RC* * * ZOOM-TO-EPILOG HISTORICAL APPLID KSYSCLONE.M2EZ APPL AUTH=(ACQ,NVPACE,PASS),SRBEXIT=NO * * VIRTUAL TERMINAL POOL KSYSCLONE.M2* APPL AUTH=(ACQ,NVPACE),SRBEXIT=YES * tyvm On Fri, Mar 18, 2011 at 6:51 PM, Chris Mason chrisma...@belgacom.netwrote: George I think the key point you need is that, when you deactivate the major node, you remove the major nodes from VTAM - use D NET,MAJNODES to observe this - and you remove the contained APPL statement minor nodes from the VTAM name space and that VTAM will have forgotten that they ever existed. Other VTAMs will still have representations of that minor node as CDRSCs but, if the original VTAM reintroduces the APPL statement minor node names again, it doesn't matter since the CDRSC, in a subarea context and mainly in an APPN context, just names, the name itself and names of potentially owning CDRMs or CPs, in effect, VTAMs. So, you activate the major node(s) which go along with the old application setup at one time. Run the old application. Shut down the old application. Deactivate the major node(s). Activate the major node(s) which go along with the new application setup. Run the new application. And so on. Of course, you can check on the status of the APPL statements with D NET,ID=major-node-name,E. Does that cover what you need? If you post representative versions of the APPL statements in their major nodes, I might be able to spot a simplification. Chris Mason On Fri, 18 Mar 2011 16:45:25 -0400, George Henke gahe...@gmail.com wrote: tyvm, Chris, you really know this stuff. This is for a migration to a new OMEGAMON CICS. We have completely reconfigured OMEGAMON CICS with a new version that has all different MAJOR and minor node names which are more coherent. However, we needed to retain the APPL name so end users can still log into OMEGAMON CICS without changing their VTAM APPLIDs in their CLSS SuperSession profiles. So we duplicated several APPL minor node names, not acbnames, in the new OMEGAMON Major node and now that we need to migrate from the old OMEGAMON to the new we are trying to figure out the VTAM commands needed so that there is no conflict or confusion between the two duplicate names when we vary them inact and act. We just tried a test this afternoon and everything worked fine. But the new major node was not already active and so the minor was not in a RESET status. So we don't know what would have happened in a fallback scenario where the duplicate minor is in a RESET state. I am wondering if a simple vary act will activate it after the active minor has been inact'd. This is probably as clear as mud, but it is what we are trying to do. On Fri, Mar 18, 2011 at 4:26 PM, Chris Mason chrisma...@belgacom.netwrote: George It might be
zIIPs and TCP/IP usage
Right now I am looking at zIIPs and zAAPs planning for some new z196s. One area of interest is I read zIIPs can offload some of my TCP/IP work. What are people seeing as what is being offloaded within TCP/IP and how much. Just from a high level is this any load of significance I could expect or is it relatively low. Say for instance I did not have any DB2 or XML, then has anyone just got the zIIP because of TCP/IP. I am discounting JAVA workload out of the picture to keep away from the discussion of doing zIIPzAAPs and combining the two. So just for the sake of this discussion say I have no JAVA workload either. Be interested in others actual experiences. jim -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dynamic calls from COBOL
On 3/18/2011 3:46 PM, Phil Smith wrote: Well, adding ALIASES(ALL) seems to be the answer. Now to solve the original problem, which is much nastier (involving long, mixed-case names...) Thanks. -- ...phsiii Phil Smith III p...@voltage.com Voltage Security, Inc. www.voltage.com (703) 476-4511 (home office) (703) 568-6662 (cell) Well, of course you've got to compile with PGMNAME(LONGMIXED); this requires all program name references to be quoted. To take your original example: process pgmname(longmixed) == Identification Division. Program-ID. DCALLEE.=== Environment Division. Configuration Section. Data Division. Working-Storage Section. Procedure Division. Display DCALLEE got called. goback. Entry CALL. Display CALL got called. GOBACK. End Program DCALLEE. PROCESS DYNAM NODLL pgmname(longmixed) == Identification Division. Program-ID. DCALLER. Environment Division. Configuration Section. Data Division. Working-Storage Section. 77 pgm Pic X(8). Procedure Division. move DCALLEE to pgm. call pgm. move CALL to pgm. call pgm. Stop Run . End Program DCALLER. Next, for names longer than 8 characters, you really need to bind into a PDSE not a PDS (you may be able to futz around with the pre-linker and a PDS, but don't do it). And even so, I don't believe you can be successful with working with long or case sensitive subroutine names or entry points unless you use DLL support. (Well, if you run under the shell and the module is stored in the HFS/zFS, you could use a call to bpx1lod to load the program, then do a call to the loaded program; that would probably work.) Good luck. ad Several of our courses might be of help to you here: Cross Program Communication in z/OS - 3 days Discusses writing calling and called programs in any of Assembler, COBOL, PL/I, or C; how data elements and structures are defined; how data is passed and recieved, including passing by reference, by content, and by data; handling variable numbers of parameters; shared external data; the program binder; alternate entry points; and more. Check out: http://www.trainersfriend.com/Language_Environment_courses/m520descr.htm Creating and Using DLLs in z/OS - 1 day Discusses DLL linkages in Assembler, COBOL, PL/I, and C and both implicit and explicit DLL linkages. Details: http://www.trainersfriend.com/Language_Environment_courses/m525descr.htm Developing Applications for z/OS UNIX - 3 days Discusses working with files and consoles from Assembler, COBOL, PL/I, and C using native language features (as available) as well as calling C functions and z/OS UNIX kernel functions; assembling or compiling and binding under the shell; make and makefiles; more. See: http://www.trainersfriend.com/UNIX_and_Web_courses/u520descr.htm /ad -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Social Security Confronts IT Obsolescence
From: R.S. r.skoru...@bremultibank.com.pl To: IBM-MAIN@bama.ua.edu Sent: Thu, March 17, 2011 2:46:01 AM Subject: Re: Social Security Confronts IT Obsolescence Ed Gould pisze: John: Do not forget the current system at ssa is horredously out of date. I heard some numbers but won't repeat them as I can't prove it. Add in as usual the government cheaped out on their equipment and went channel extender route. I have heard some horror stories but again can't prove it. I do not want to get into a political hassle here, but i can personally attest that Bush Company cut back on funding at SSA so bad that it was taking 6 years to get a hearing for a SS appeal. SSA? It's obsoleted by FC and SAS. Even IBM don't use SSA anymore. (sorry couldn't resist) ;-) -- Radoslaw Skorupka Lodz, Poland P.S. Hint: SSA - Serial Storage Architecture ANSI X3710.1 (used in ESS Sharks), or System Specific Alias. Or 150+ other acronyms, most unrelated to IT or mainframes. Radislaw: And USS stands for I know these acronyms are used in the US and may not be known over in Europe. Sorry about using them. Frankly I was tired forgot that the listserv covers various nationalities. I will try and do better in the future (but can't promise). Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Social Security Confronts IT Obsolescence
Sigh... Indeed this is the case. This off topic (way off) but I can assure you that he cut back on funding in several areas at the SSA. The one that hit me . Bush did not allow the judges at SSA to be replaced so as the demand came up (due to other polices) there was no people to have hearings so it was standard to deny the claim and then it took 6 years for the judges to hear the claim. Ed From: Martinez, Frank J fjm...@miami.edu To: IBM-MAIN@bama.ua.edu Sent: Thu, March 17, 2011 6:52:31 AM Subject: Re: Social Security Confronts IT Obsolescence I knew this was coming. Blaming Bush for something that was already bad by 1970. I heard some horror stories that He is causing the new Super Moon, but I can't prove it. Frank J. Martinez Technical Support Supervisor IT System z Tel.: 305-284-3919 Cell: 305-987-8281 Fax : 305-284-3872 e-Mail: fjm...@miami.edu -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ed Gould Sent: Thursday, March 17, 2011 12:21 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Social Security Confronts IT Obsolescence John: Do not forget the current system at ssa is horredously out of date. I heard some numbers but won't repeat them as I can't prove it. Add in as usual the government cheaped out on their equipment and went channel extender route. I have heard some horror stories but again can't prove it. I do not want to get into a political hassle here, but i can personally attest that Bush Company cut back on funding at SSA so bad that it was taking 6 years to get a hearing for a SS appeal. Ed From: Chase, John jch...@ussco.com To: IBM-MAIN@bama.ua.edu Sent: Wed, March 16, 2011 8:07:34 AM Subject: Re: Social Security Confronts IT Obsolescence -Original Message- From: IBM Mainframe Discussion List [On Behalf Of Elardus Engelbrecht Gabe Goldberg wrote: Quite a deep hole SSA's dug itself into. They are having a 'catch 22' situation: 'About 42% of the agency's IT specialists are expected to retire between 2010 and 2016.' and '...the agency is in the middle of a hiring freeze. ' That's called government logic. :-| -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Initial Capping
Are these the only two LPARs on the z9 BC and if so, are you capping due to software cost? If they are the only LPARs on the machine and you don't have software requirements, I would not do either hard cap or soft cap. Just put the largest percentage to your production system and let it go from there. Then both will get as much as they can when the box is not 100% and when 100%, your production will be protected. The initially capping is a hardcap as you stated which means that it will NOT go above the 80% (based on these being the only two LPARs) but also have a defined capacity of 10. If you want defined capacity (4 hour rolling limit/softcap), then remove the initial-capping and use defined capacityHowever DON'T code zero. If you want production to have everything it can get and hold the test to 2 MSUs 4 hour rolling, define PRODLPAR with the 800 weight only and the TESTLPAR with 200 weight and defined capacity of 2. zSeries Sysprog On Fri, Mar 18, 2011 at 5:24 PM, Vinson Lee v...@sdccd.edu wrote: We have a Z9 BC with one CPU and recently went back to hard capping from Group Capacity because our production system started to suffer when WLM started to enforce the MSU limit after 4 hours on a peak day. Before Group Capacity, the production system had no problem handling the peak load and was able to use a few MSUs above its defined capacity with no slowdown after 4 hours. Here are our prior settings: Group Capacity=11 PRODLPAR initial-capping=No CPU-weight=800 Defined-Capacity=0 WLM=No TestLPAR initial-capping=No CPU-weight=200 Defined-Capacity=4 WLM=No Here are our current settings: PRODLPAR initial-capping=Yes CPU-weight=800 Defined-Capacity=10 WLM=No TestLPAR initial-capping=Yes CPU-weight=200 Defined-Capacity=2 WLM=No The Test LPAR normally uses 1 MSU but needs more when there is testing being performed. The reason I'd like to uncheck 'Initial Capping' is to allow the LPARs to go beyond their 'Initial Weight' if the other LPARs are not busy. We got the impression from SHARE that 'Initial Capping' had to be checked to allow the LPAR to use the 'free' MSUs beyond the Defined Capacity. But we don't want to do this if it means being unable to take advantage of the 'free' MSUs or if it means WLM will start enforcing the 4 hour rolling average MSU limit. Will unchecking 'Initial Capping' still allow the LPARs to go a little bit beyond their Defined Capacity without WLM stepping in and trying to enforce the 4 hour rolling average MSU limit? Thanks. Vince -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
AUTO: John Ehrman/Santa Teresa/IBM is out of the office. (returning 03/22/2011)
I am out of the office until 03/22/2011. I will be out of the office Friday 3/18 and possibly Monday 3/21. I will try to reply to e-mail if possible. Note: This is an automated response to your message IBM-MAIN Digest - 17 Mar 2011 to 18 Mar 2011 (#2011-77) sent on 3/18/11 22:00:03. This is the only notification you will receive while this person is away. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: AT-TLS and CICS Sockets performance
You should run a SSL trace to tell your problem. At the start of each connection, SSL takes a lot of CPU to start up the connection (such as checking credentials) and pseudo conversational mode starts a new connection each time it runs Steve Finch -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jim McAlpine Sent: Thursday, March 17, 2011 12:09 PM To: IBM-MAIN@bama.ua.edu Subject: AT-TLS and CICS Sockets performance Cross posted to the CICS list. I've set up the AT-TLS for CICS Sockets but the performance is very poor (+10 secs per transaction) when running in pseudo conversational mode. If I run the same appplication in conversational mode the performance is fine and on par with running without SSL. Does anyone have any idea what is happening for every pseudo transaction that could be causing this. Jim McAlpine -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zIIPs and TCP/IP usage
The books say All SRB-based processing in stack can be done on a zIIP, depending on what level of zOS If you are doing IPSEC (SSL encryption), you will be using a lot of CPU time in stack. It could justify zIIP or two to offload the IPSEC work Steve Finch -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jim Marshall Sent: Friday, March 18, 2011 8:07 PM To: IBM-MAIN@bama.ua.edu Subject: zIIPs and TCP/IP usage Right now I am looking at zIIPs and zAAPs planning for some new z196s. One area of interest is I read zIIPs can offload some of my TCP/IP work. What are people seeing as what is being offloaded within TCP/IP and how much. Just from a high level is this any load of significance I could expect or is it relatively low. Say for instance I did not have any DB2 or XML, then has anyone just got the zIIP because of TCP/IP. I am discounting JAVA workload out of the picture to keep away from the discussion of doing zIIPzAAPs and combining the two. So just for the sake of this discussion say I have no JAVA workload either. Be interested in others actual experiences. jim -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html