CICS 2.2 Hang
We are facing the following CICS Abend frequently. 12.00.47 STC04122 +DFHSR0622 CICSPPT An attempt to overwrite the ECDSA has caused the abend which follows 12.00.56 STC04122 +DFHSR0001 CICSPPT An abend (code 0C4/AKEA) has occurred at offset X'' in program PTPPT00. 12.00.56 STC04122 OPS4200I MESSAGE: '0' 12.00.56 STC04122 +DFHME0116 CICSPPT (Module:DFHMEME) CICS symptom string for message DFHSR0001 is PIDS/565514700 LVLS/530 MS/DFHSR0001 RIDS/DFHSRP PTFS/ESA530 AB/S00C4 AB/UAKEA RIDS/PTPPT00 ADRS/ 12.01.56 STC04122 +DFHDU0201 CICSPPT ABOUT TO TAKE SDUMP. DUMPCODE: SR0001 , DUMPID: 1/0001 Can anyone tell me the reasons for this OC/4 ? We are using C/C++ programs for development. Is there any reference material for this OC/4 ? Sachin S. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
STK Tapereqs how to convert from SMS.
We are in the process of converting from IBM VTS's to STK VSM's. STK has recommended that we use tapereqs to accomplish this task. I am not quite clear on what we code in the ACS routines to get it into STK or do we code everything to go to STK and based on criteria we set in Tapereq we go back into SMS??? My thinking was that we would could something like this If unit=(tape90 cart 3490) exit I am however not sure if that's how easy it is. Anybody have experience with switching from SMS to using tapereqs and want to share the experience with me? Thanks John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: -911 fetching from a declared GTT.
Steve, You might want to take a look RESMIL value in the GRS config. If you went with the default config parm, that value would be RESMIL(10). Although we don't run DB2 here, we did see a performance improvement when we lowered this value to RESMIL(1). If you're able, take a look at GRS STAR. From what has been said, on this forum, and in SHARE presentations, STAR mode performs much better than RING mode, especially when the number of systems in the GRS config gets higher. Peter I. Vander Woude Sr. Mainframe Engineer -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Which service is invoked via
L R15,CVTPTR L R15,CVTCSRT-CVTMAP(,R15) x'220' L R15,24(,R15) CSR slot for 31 bit callers (X'18') L R15,X'160'(,R15) which service ??? -- Binyamin Dissen [EMAIL PROTECTED] http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CICS 2.2 Hang
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Jeevan ibm We are facing the following CICS Abend frequently. 12.00.47 STC04122 +DFHSR0622 CICSPPT An attempt to overwrite the ECDSA has caused the abend which follows 12.00.56 STC04122 +DFHSR0001 CICSPPT An abend (code 0C4/AKEA) has occurred at offset X'' in program PTPPT00. 12.00.56 STC04122 OPS4200I MESSAGE: '0' 12.00.56 STC04122 +DFHME0116 CICSPPT (Module:DFHMEME) CICS symptom string for message DFHSR0001 is PIDS/565514700 LVLS/530 MS/DFHSR0001 RIDS/DFHSRP PTFS/ESA530 AB/S00C4 AB/UAKEA RIDS/PTPPT00 ADRS/ 12.01.56 STC04122 +DFHDU0201 CICSPPT ABOUT TO TAKE SDUMP. DUMPCODE: SR0001 , DUMPID: 1/0001 Can anyone tell me the reasons for this OC/4 ? Most frequent cause is a program attempting to write to storage to which it is not allowed to write. In your context, I'm guessing that you run CICS with STGPROT(YES), the transaction that is running your program is defined with TASKDATAKEY(USER) and/or the program is defined with EXECKEY(USER), and the program (or one of the library routines it calls) is attempting to store (write) something into CICS-key storage (ECDSA). We are using C/C++ programs for development. Is there any reference material for this OC/4 ? The z/Architecture Principles of Operation manual has this: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DZ9ZR003/6.5.2.37 ?SHELF=DZ9ZBK03DT=20040504121320 or http://makeashorterlink.com/?K57D12F1C -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Which service is invoked via
The service is : BPX1SPM See : SA22-7803 USS Assembler Callable Services Reference Rob Scott Rocket Software www.rs.com -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Binyamin Dissen Sent: 08 November 2005 08:35 To: IBM-MAIN@BAMA.UA.EDU Subject: Which service is invoked via L R15,CVTPTR L R15,CVTCSRT-CVTMAP(,R15) x'220' L R15,24(,R15) CSR slot for 31 bit callers (X'18') L R15,X'160'(,R15) which service ??? -- Binyamin Dissen [EMAIL PROTECTED] http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CICS 2.2 Hang
In a message dated 11/8/2005 7:40:02 A.M. Central Standard Time, [EMAIL PROTECTED] writes: Most frequent cause is a program attempting to write to storage to which it is not allowed to write. In your context, I'm guessing that you run CICS with STGPROT(YES), the transaction that is running your program is defined with TASKDATAKEY(USER) and/or the program is defined with EXECKEY(USER), and the program (or one of the library routines it calls) is attempting to store (write) something into CICS-key storage (ECDSA). CICS debugging guide is good too. After you've seen a couple thousand of these, what we're looking for is patterns or changes to the application code. Address x'' is suspect of a counter overflow(or underflow-take 1 from zero). We had one system that was driven by Federal Regs and usually had a big update in Feb for the winter regs. Had a couple that splatterd CICS with x'' cause the main Copy member had been changed and all affected modules had not been recompiled. So Finaid would work but nothing else would.(Hotel California Change management-you can check in but you can never leave) Other cause would be bad values in uninitialized variables due to LE parm values. The apps people got pretty good at running down the bad stuff and reproducing it TEST. affect -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: STK Tapereqs how to convert from SMS.
On Tue, 8 Nov 2005 04:39:19 -0600, John Benik [EMAIL PROTECTED] wrote: We are in the process of converting from IBM VTS's to STK VSM's. STK has recommended that we use tapereqs to accomplish this task. I am not quite clear on what we code in the ACS routines to get it into STK or do we code everything to go to STK and based on criteria we set in Tapereq we go back into SMS??? My thinking was that we would could something like this If unit=(tape90 cart 3490) exit I am however not sure if that's how easy it is. Anybody have experience with switching from SMS to using tapereqs and want to share the experience with me? STK does support SMS ACS routines now, so I don't think you have to convert them. But we prefer TAPEREQs since they are more flexible and it has typically been a different group that maintains them than the DASD storage admins (although our goal is to move that function back into the DASD group). We did our conversion under HSC/VTCS V4 which didn't support SMS. I assume you are running 6.0 or 6.1. I think the SMS support came in 5.0 when SMC was added into the picture. We did this conversion manually since only a subset of data went to VTS when we had it. When we migrated to VSM we added enough capacity and it was decided that everything would go virtual except very large files (weekly SMF data, DB2 image copies, ExHPDM full volume dumps that are stacked on native 9840). So basically out TAPEREQ member looked something like this example: TAPEREQ JOBNAME(*) - MED(VIRTUAL) - REC(VIRTUAL) - SUBPOOL(VIRTUAL) With exceptions like this being listed before the JOBNAME(*) entry: TAPEREQ DSN(hlq.SMF.WEEKLY.**) - MED(STK1R) - REC(STK1RAB) - SUBPOOL(984020GB) Later on, once we understood the software better, we added MGMTCLAS (STK, not SMS) definitions that made some data sets delete from the VSM buffer as soon as they were written to the back end tapes (MVCs). These would be backups to virtual or anything else you knew was write once, read never. I'm a little fuzzy now, but I'm pretty sure since HSC (SMC now) gets involved in allocation that you don't need to remove the SMS rules for VTS at the same time you activate VTCS and TAPEREQs. HSC/SMC will modify the EDL and control where the allocations can go to. HTH. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America and Farmers Insurance Group mailto: [EMAIL PROTECTED] Systems Programming expert at http://Search390.com/ateExperts/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Problem with DEDB
Hi all, Under IMS V6R1 and CICS V4R1,I've recentley converted one of Databases to DEDB.But this Database related Transactions have very long response time and IMS status code = FW. How can i solve this problem? (I'ver set the NBA and OBA in procedures IMSFP and IMSBATCH to 1024,but the problem still exists) Thanks in advance, Mehrdad Rastegar. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
IBMLINK et al.
Ever since the shop was opened in 1999, we have had a web based service from IBM that allowed only basic APAR searches and electronic problem reporting of 'software defects'. We could download PTF's. There was no charge. Now the web navigation has changed such that I can no longer access the service. IBM is insisting that this is correct, and, oh by the way, I should have not had any such service at all; all are fee based. Perhaps I am not using the right words. It is really difficult to keep up with the name change game. Does anyone know what the name of that free service would be in todayspeak? Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBMLINK et al.
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Hal Merritt Sent: Tuesday, November 08, 2005 9:23 AM To: IBM-MAIN@BAMA.UA.EDU Subject: IBMLINK et al. Ever since the shop was opened in 1999, we have had a web based service from IBM that allowed only basic APAR searches and electronic problem reporting of 'software defects'. We could download PTF's. There was no charge. Now the web navigation has changed such that I can no longer access the service. IBM is insisting that this is correct, and, oh by the way, I should have not had any such service at all; all are fee based. Perhaps I am not using the right words. It is really difficult to keep up with the name change game. Does anyone know what the name of that free service would be in todayspeak? Thanks. Hum, I think that it may be possible to get PTFs via ShopzSeries. I know that I have ordered FMIDs and products from it for Internet Delivery. IIRC, that is free to all IBM customers. -- John McKown Senior Systems Programmer UICI Insurance Center Information Technology This message (including any attachments) contains confidential information intended for a specific individual and purpose, and its' content is protected by law. If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this transmission, or taking any action based on it, is strictly prohibited. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBMLINK et al.
Do you have an IBM ID? One of those that uses your e-mail address. If so, then try this link: http://www-03.ibm.com/servers/eserver/support/zseries/zos/downloading.html -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Hal Merritt Sent: Tuesday, November 08, 2005 9:23 AM To: IBM-MAIN@BAMA.UA.EDU Subject: IBMLINK et al. Ever since the shop was opened in 1999, we have had a web based service from IBM that allowed only basic APAR searches and electronic problem reporting of 'software defects'. We could download PTF's. There was no charge. Now the web navigation has changed such that I can no longer access the service. IBM is insisting that this is correct, and, oh by the way, I should have not had any such service at all; all are fee based. Perhaps I am not using the right words. It is really difficult to keep up with the name change game. Does anyone know what the name of that free service would be in todayspeak? Thanks. Hum, I think that it may be possible to get PTFs via ShopzSeries. I know that I have ordered FMIDs and products from it for Internet Delivery. IIRC, that is free to all IBM customers. -- John McKown Senior Systems Programmer UICI Insurance Center Information Technology This message (including any attachments) contains confidential information intended for a specific individual and purpose, and its' content is protected by law. If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this transmission, or taking any action based on it, is strictly prohibited. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
VTAM INCREASED CPU
Hi list, Last few days we have a strange problem VTAM CPU usage is increased by 50% and we can't determine the cause ... When we analyzed the VTAM CPU utilization using Omegamon we saw that a module: ISTLUCRT is the main module causing the high CPU usage. We couldn't find almost any information regarding this module and it's functions... Thanks for any information or any other ideas... (ZOS 1.4) Dana. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Error SQL in package
Friends It would like a help of you, when I enter in the panel of DB2TOOL option 1(DB2 System Catalog), later option K, and in front of a packages I inform the command SQ, I am receiving the following error message, IBM0534S ONCODE=8094 Protection exception From compile unit ADBUNI at entry point ASSEMBLE_STMT at statement 56 at compile unit offset +01CE at entry offset +0076 at address 0FF29146. IRX0250E System abend code 0C4, reason code 0004. IRX0255E Abend in host command SELECT or address environment routine ISPEXEC. *** somebody knows how to tell me how to solve this problem. thank you very much. Atts. Helio Jose da Silva Banco Rural S/A BH - MG - Brasil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: VTAM INCREASED CPU
Go to http://www-1.ibm.com/support/docview.wss?uid=isg1VM63203 This will solve your problem Dan Ponta System Engineer Host Access Solutions -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Tuesday, November 08, 2005 11:12 AM To: IBM-MAIN@BAMA.UA.EDU Subject: VTAM INCREASED CPU Hi list, Last few days we have a strange problem VTAM CPU usage is increased by 50% and we can't determine the cause ... When we analyzed the VTAM CPU utilization using Omegamon we saw that a module: ISTLUCRT is the main module causing the high CPU usage. We couldn't find almost any information regarding this module and it's functions... Thanks for any information or any other ideas... (ZOS 1.4) Dana. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: VTAM INCREASED CPU
Thanks for your help. I already checked IBM site, and the link is relevant for Z/VM and not for Z/OS, also problem description states S0C4 abend, that we don't have. Any other ideas? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBMLINK et al.
Interesting. That link worked. Not only worked, but allowed me access to ETR. I could look at my PMR's. Tends to support my suspicions that it is a web navigation issue. Could someone navigate to this page and tell me what the service is called in IBMeze? (Sorry about the wrap). https://www-304.ibm.com/jct03004c/support/electronic/portal/!ut/p/_s.7_0 _A/7_0_CK?category=2locale=en_US https://www-304.ibm.com/jct03004c/support/electronic/portal/!ut/p/_s.7_ 0_A/7_0_CK?category=2locale=en_US -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Matthew Stitt Sent: Tuesday, November 08, 2005 10:11 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: IBMLINK et al. Do you have an IBM ID? One of those that uses your e-mail address. If so, then try this link: http://www-03.ibm.com/servers/eserver/support/zseries/zos/downloading.ht ml -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OT- IBM slows the speed of light
I guess this makes the term light year for distance meaningless, doesn't it? Or if not meaningless, at least, relative...h Ed Gould wrote: http://www.eet.com/news/latest/showArticle.jhtml?articleID=173403017 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OT- IBM slows the speed of light
It just means that the writing on the bottom of the rear-view mirror makes more sense! Objects in mirror may be closer than they appear. On Tue, 8 Nov 2005 12:53:43 -0600, Steve Arnett wrote: I guess this makes the term light year for distance meaningless, doesn't it? Or if not meaningless, at least, relative...h Ed Gould wrote: http://www.eet.com/news/latest/showArticle.jhtml?articleID=173403017 -- Tom Schmidt Madison, WI -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Geoplex performance considerations
Ted, Sorry for a very late reply - I've been swamped with follow-ups to my GDPS question. My team would be very interested in talking to you about your experience, and the project you now have underway. Could you spare some time for that? Also ,if you know of anyone with skills in this arena that is on the market, let me know 0 I would like to fill a position to take over this entire effort. Thanks Clark -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBMLINK et al.
- Original Message - From: Hal Merritt [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main Sent: Tuesday, November 08, 2005 10:24 AM Subject: IBMLINK et al. Ever since the shop was opened in 1999, we have had a web based service from IBM that allowed only basic APAR searches and electronic problem reporting of 'software defects'. We could download PTF's. There was no charge. Now the web navigation has changed such that I can no longer access the service. IBM is insisting that this is correct, and, oh by the way, I should have not had any such service at all; all are fee based. Perhaps I am not using the right words. It is really difficult to keep up with the name change game. Does anyone know what the name of that free service would be in todayspeak? Hal, IBM got rid of ServiceLink Basic years ago. Now you gotta pay to play. They have a free site that's not IBMLink. You should order service through Shopz or the new SMP/E release. Tom -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBMLINK et al.
I think you might be referring to the techsupport site. The web pages have changed, but the apar searches are at http://www14.software.ibm.com/webapp/set2/srchBroker/views/srchBroker.jsp?rs =112 I think most of it has been moved to something called download and support but it's a chore to get there. Just work around from either the apar search, or from https://techsupport.services.ibm.com -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Hal Merritt Sent: Tuesday, November 08, 2005 10:23 AM To: IBM-MAIN@BAMA.UA.EDU Subject: IBMLINK et al. Ever since the shop was opened in 1999, we have had a web based service from IBM that allowed only basic APAR searches and electronic problem reporting of 'software defects'. We could download PTF's. There was no charge. Now the web navigation has changed such that I can no longer access the service. IBM is insisting that this is correct, and, oh by the way, I should have not had any such service at all; all are fee based. Perhaps I am not using the right words. It is really difficult to keep up with the name change game. Does anyone know what the name of that free service would be in todayspeak? Thanks. SNIP -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OT- IBM slows the speed of light
On Tue, 8 Nov 2005 12:53:43 -0600, Steve Arnett [EMAIL PROTECTED] wrote: I guess this makes the term light year for distance meaningless, doesn't it? Or if not meaningless, at least, relative...h ... Nope. Still meaningful. A light year has always been based on the spead of light in a vacuum. Everything with an index of refraction greater than a vacuum's slows light. A piece of glass does that. IBM figured out how to control and modify the effect, not just achieve it. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Finding Aliases? Symbolic Aliases?
Nobody answered so I'll jump in: Gil wrote: I'm considering, as an alternative to compress, a tactic of copy/rename/ DEFINE ALIAS. ... Experiment shows that when I do the rename; create new version; DEFINE ALIAS; their aliases continue to refer to the obsolete content by its new name rather than the new content with the classic name. And when I ultimately delete the obsolete version after all jobs free it, the aliases simply vanish. Create new, Copy old to new, DELETE/DEFINE ALIAS is the right sequence. No RENAME !!! I introduced this to many customers and it works very well as long there is no considerable time gap between DELETE/DEFINE ALIAS. There is a small risk of loosing member updates during the COPY operation (User updates member in old dataset after it already has been copied). So you need some organisational coordination. Can I create an alias of an alias? Unfortunately not. I asked for this some years ago in IBMMAIN, but Mark Thomen rejected this request. Is there any way to stabilize the alias Sort of if you use DEFINE ALIAS SYMBOLICRELATE because these aliases are not directly tied to a basic dataset, just to a name. Define system symbols for each dataset (hopefully not to much because the number of system symbols is limited). Change all existing aliases to use the corresponding system symbol. Done. Is there any way to enumerate all aliases of a given data set? AFAIK for non-symbolic aliases use LISTCAT real.dataset.name ALL Or write some REXX to use the Catalog Search Interface. Sorry for the short answer, but I'm very busy at the moment. HTH Peter -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OT- IBM slows the speed of light
In a message dated 11/8/2005 2:57:46 P.M. Central Standard Time, [EMAIL PROTECTED] writes: of light in a vacuum. Everything with an index of refraction greater than a vacuum's slows light. A piece of glass does that. IBM figured out how to control and modify the effect, not just achieve it. Slightly tangential...SKA project underway. Lots of supercomputer processing. _http://www.skatelescope.org/_ (http://www.skatelescope.org/) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Passing PARM to COBOL.
Hi, I've done this before but can't get it to work now. I'm trying to pass an EXEC PARM field to a batch COBOL program. I have the following: LINKAGE SECTION. 01 LS-PARM. 05 LS-PARM-DATA-LENGTH PIC 9(04) BINARY. 05 LS-PARM-DATA PIC X(100). PROCEDURE DIVISION USING LS-PARM. DISPLAY ' ParmLen: ' LS-PARM-DATA-LENGTH. //STEP1EXEC PGM=JDC,REGION=4M,PARM='JFIPJFIA' The parm length always displays as 1036 ( x'040C') and ls-parm-data is also garbage. Guess I'm too tired to see what I'm missing. Thanks, Craig -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Passing PARM to Cobol
Craig, The hex 40C makes me think you have the length field incorrectly coded. Should it be a COMP-3 field instead of a BINARY field? Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to COBOL.
On Tue, 8 Nov 2005 17:35:40 -0500, Craig Kittendorf [EMAIL PROTECTED] wrote: Hi, I've done this before but can't get it to work now. I'm trying to pass an EXEC PARM field to a batch COBOL program. I have the following: LINKAGE SECTION. 01 LS-PARM. 05 LS-PARM-DATA-LENGTH PIC 9(04) BINARY. 05 LS-PARM-DATA PIC X(100). PROCEDURE DIVISION USING LS-PARM. DISPLAY ' ParmLen: ' LS-PARM-DATA-LENGTH. //STEP1EXEC PGM=JDC,REGION=4M,PARM='JFIPJFIA' The parm length always displays as 1036 ( x'040C') and ls-parm-data is also garbage. Guess I'm too tired to see what I'm missing. Try PARM='/DATAHERE'. This has to do with COBOL runtime options. But I can never remember if user parm data follows or proceeds the slash. OTOH, 040C looks eerily like the contents of address 0 (one of the PSW fields). Shouldn't LE setup, if there's no parm, point R1 - A(DUMMY) where DUMMY DC H'0'? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to COBOL.
If your LE run-time option CBLOPTS is OFF, then the format of the parm should be 'run-time/user-data'. Try PARM='/JFIPJFIA'. Don Imbriale -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Craig Kittendorf Sent: Tuesday, November 08, 2005 5:36 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Passing PARM to COBOL. Hi, I've done this before but can't get it to work now. I'm trying to pass an EXEC PARM field to a batch COBOL program. I have the following: LINKAGE SECTION. 01 LS-PARM. 05 LS-PARM-DATA-LENGTH PIC 9(04) BINARY. 05 LS-PARM-DATA PIC X(100). PROCEDURE DIVISION USING LS-PARM. DISPLAY ' ParmLen: ' LS-PARM-DATA-LENGTH. //STEP1EXEC PGM=JDC,REGION=4M,PARM='JFIPJFIA' The parm length always displays as 1036 ( x'040C') and ls-parm-data is also garbage. Guess I'm too tired to see what I'm missing. *** Bear Stearns is not responsible for any recommendation, solicitation, offer or agreement or any information about any transaction, customer account or account activity contained in this communication. *** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to COBOL.
I always used s9(4) comp not binary. don't remember what binary does right now Mike On 11/8/05, Craig Kittendorf [EMAIL PROTECTED] wrote: Hi, I've done this before but can't get it to work now. I'm trying to pass an EXEC PARM field to a batch COBOL program. I have the following: LINKAGE SECTION. 01 LS-PARM. 05 LS-PARM-DATA-LENGTH PIC 9(04) BINARY. 05 LS-PARM-DATA PIC X(100). PROCEDURE DIVISION USING LS-PARM. DISPLAY ' ParmLen: ' LS-PARM-DATA-LENGTH. //STEP1 EXEC PGM=JDC,REGION=4M,PARM='JFIPJFIA' The parm length always displays as 1036 ( x'040C') and ls-parm-data is also garbage. Guess I'm too tired to see what I'm missing. Thanks, Craig -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Mike -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to Cobol
BINARY is equivalent to COMP. COMP-3 would be packed decimal. The parm length is half word binary. Thanks Craig -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Lizette Koehler Sent: Tuesday, November 08, 2005 5:47 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Passing PARM to Cobol Craig, The hex 40C makes me think you have the length field incorrectly coded. Should it be a COMP-3 field instead of a BINARY field? Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to COBOL.
PARM='/DATAHERE' will attempt to pass DATAHERE to the LE runtime. Thanks, Craig -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Ray Mullins Sent: Tuesday, November 08, 2005 5:47 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Passing PARM to COBOL. On Tue, 8 Nov 2005 17:35:40 -0500, Craig Kittendorf [EMAIL PROTECTED] wrote: Hi, I've done this before but can't get it to work now. I'm trying to pass an EXEC PARM field to a batch COBOL program. I have the following: LINKAGE SECTION. 01 LS-PARM. 05 LS-PARM-DATA-LENGTH PIC 9(04) BINARY. 05 LS-PARM-DATA PIC X(100). PROCEDURE DIVISION USING LS-PARM. DISPLAY ' ParmLen: ' LS-PARM-DATA-LENGTH. //STEP1EXEC PGM=JDC,REGION=4M,PARM='JFIPJFIA' The parm length always displays as 1036 ( x'040C') and ls-parm-data is also garbage. Guess I'm too tired to see what I'm missing. Try PARM='/DATAHERE'. This has to do with COBOL runtime options. But I can never remember if user parm data follows or proceeds the slash. OTOH, 040C looks eerily like the contents of address 0 (one of the PSW fields). Shouldn't LE setup, if there's no parm, point R1 - A(DUMMY) where DUMMY DC H'0'? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to COBOL.
PARM='/JFIPJFIA' would pass JFIPJFIA to the LE runtime. Thanks, -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Imbriale, Donald (Exchange) Sent: Tuesday, November 08, 2005 5:49 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Passing PARM to COBOL. If your LE run-time option CBLOPTS is OFF, then the format of the parm should be 'run-time/user-data'. Try PARM='/JFIPJFIA'. Don Imbriale -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Passing PARM to COBOL.
Binary is equivalent to COMP. Thanks, Craig -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Mike Bell Sent: Tuesday, November 08, 2005 5:51 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Passing PARM to COBOL. I always used s9(4) comp not binary. don't remember what binary does right now Mike -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Fw: Passing PARM to COBOL.
I *strongly* recommend using COMP-5 - just in case IBM ever allows for LARGE parms (and this would work with any setting of the TRUNC compiler option). However, COMP, BINARY, and COMP-5 should all work exactly the same as long as MVS only allows for a 100 character maximum (and as long as you are porting your source code to a little-endian environment). P.S. If you know that you will have 80 bytes or less, then you can also use the CEE3PRM callable service. See: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea3160/2.2.5.12 P.S. The PARM-LENGTH, followed by PARM-DATA method is currently UNDOCUMENTED in both the LE and COBOL documentation. I have done several RCF's on this and never heard exactly how IBM will fix this. As far as I know, they have no (current) intention of breaking this feature, but as it is no longer a documented user interface - you might want to switch to the CEE3PRM solution - at least until it returns to the COBOL or LE documentation. Mike Bell [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... I always used s9(4) comp not binary. don't remember what binary does right now Mike On 11/8/05, Craig Kittendorf [EMAIL PROTECTED] wrote: Hi, I've done this before but can't get it to work now. I'm trying to pass an EXEC PARM field to a batch COBOL program. I have the following: LINKAGE SECTION. 01 LS-PARM. 05 LS-PARM-DATA-LENGTH PIC 9(04) BINARY. 05 LS-PARM-DATA PIC X(100). PROCEDURE DIVISION USING LS-PARM. DISPLAY ' ParmLen: ' LS-PARM-DATA-LENGTH. //STEP1 EXEC PGM=JDC,REGION=4M,PARM='JFIPJFIA' The parm length always displays as 1036 ( x'040C') and ls-parm-data is also garbage. Guess I'm too tired to see what I'm missing. Thanks, Craig -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Mike -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Fw: Passing PARM to COBOL.
The last post mentioned CBLOPTS which does determine whether or not the user data should come before or after the /. However, there is another interesting (and new to me) comment at: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea5160/2.2.2.8. 1 In the case of PARM='/JFIPJFIA' according to that reference, it would ALWAYS (regardless of CBLOPTS setting) be treated as program data - as JFIPJFIA is not valid as LE run-time informaiton. [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... PARM='/JFIPJFIA' would pass JFIPJFIA to the LE runtime. Thanks, -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Of Imbriale, Donald (Exchange) Sent: Tuesday, November 08, 2005 5:49 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Passing PARM to COBOL. If your LE run-time option CBLOPTS is OFF, then the format of the parm should be 'run-time/user-data'. Try PARM='/JFIPJFIA'. Don Imbriale -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMTP inserting extra @ in front of domain Name
Check out the REWRITE822HEADER option. Henning Terkelsen wrote: Hi All My mails generated by SMTP MVS are getting rejected by groupwise 7 mailserver with the following reason code : 10:49:28 3A6 DMN: MSG 890 Refused sender: @NODENAME.IDATA:[EMAIL PROTECTED] (1) Groupwise guru's says that is because of the extra @ in front of the domain name. Problem is that i do not know where this @ comes from ? From my SMTP log I get the domain name: EZA5128I TCP Network Domain Name: NODENAME.IDATA I have a limited number of parameters that I can use to control the TO / FROM /ERROR address ect, but I cant find how to remove this extra @ best regards Henning Terkelsen MPI Tech a/s. phone +45 4436 6295 / Cell +45 4091 4436 e-mail: mailto:[EMAIL PROTECTED] web: http://www.mpitech.com skype_me_on: henning_terkelsen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Tivoli NPM replacement
Charles Macniven wrote: Hi, Is anyone aware of a Free Network Performance monitor to replace a small subset of the functions available with Tivoli NPM. I'm only interested in NCP line usage (%Busy, Total Bytes xferred), NCP CPU %Busy and %Buffers used. Cheers, Charles MacNiven. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html I not sure how easy it would be to use but NTuneMON, which I beleive is now free, can give you most of this information if not all of it. Of course NTuneMon runs in NetView, so you must have netview. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMTP inserting extra @ in front of domain Name
I just had this problem yesterday and had a workaround implemented on the mainframe SMTP. Your novell/grpwise administrator is wrong. This problem probably happenned to you after they applied some maintenance to GWIA 6.5x or higher. We also use the grpwise internet agent as our relay server. The problem started to happen after the maintenance applied on grpwise over the weekend. Since grpwise sees, server address as invalid e-mail address. SMTP maintains source routing address as documented in RFC821. The new patches on GWIA interprets BSMTP mail headers as invalid e-mail addresses. It has nothing to do with REWRITE822HEADER. You could temporarily overcome this problem (until novell sends another patch for GWIA) by adding this statement on mainframe SMTP Config with NOSOURCEROUTE ENABLED. If you are only sending mails from mainframe, NOSOURCEROUTE MAILCMD is sufficient. Hope this helps Thanks Nat [EMAIL PROTECTED] 11/08/05 7:19 PM Check out the REWRITE822HEADER option. Henning Terkelsen wrote: Hi All My mails generated by SMTP MVS are getting rejected by groupwise 7 mailserver with the following reason code : 10:49:28 3A6 DMN: MSG 890 Refused sender: @NODENAME.IDATA:[EMAIL PROTECTED] (1) Groupwise guru's says that is because of the extra @ in front of the domain name. Problem is that i do not know where this @ comes from ? From my SMTP log I get the domain name: EZA5128I TCP Network Domain Name: NODENAME.IDATA I have a limited number of parameters that I can use to control the TO / FROM /ERROR address ect, but I cant find how to remove this extra @ best regards Henning Terkelsen MPI Tech a/s. phone +45 4436 6295 / Cell +45 4091 4436 e-mail: mailto:[EMAIL PROTECTED] web: http://www.mpitech.com skype_me_on: henning_terkelsen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
