Re: SMFEWTM
Ed Finnell wrote: Appreciate the update and the education. Seems like the ISVs would trip it pretty quickly in their early testing Formal ISV early test programs are for new z/OS releases. Service is an entirely different process. The only hope is if the IBM change team offers a ++APAR and the customer chooses/agrees to install it for fix-test purposes. -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 [EMAIL PROTECTED] http://www.phoenixsoftware.com/ -- 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: SMFEWTM
Hope you still get many many more 'senior moments', Jim. ;-) cheers, Jan - Oorspronkelijk bericht - Van: Jim Mulder [mailto:[EMAIL PROTECTED] Verzonden: maandag, juni 2, 2008 06:19 AM Aan: IBM-MAIN@BAMA.UA.EDU Onderwerp: Re: SMFEWTM IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote on 05/30/2008 02:12:16 PM: CA mentions APAR OA24573, which corrects a problem in setting AMODE on return from SMFEWTM processing. This is speculation, but I think that CAS9 may establish an intercept in SMF processing, so their code might be sensitive to changes in the AMODE established by IBM's code, Bill On Fri, 30 May 2008 08:54:33 EDT, Ed Finnell [EMAIL PROTECTED] wrote: In a message dated 5/30/2008 6:54:45 A.M. Central Daylight Time, [EMAIL PROTECTED] writes: Mmmm - how long have CA had to re-write (or better yet, inter) CAS9 ???. Should have been disposed of years ago. Out of curiosity's sake what changed in z/OS 1.9 that made it quit working? The PTFs for OA24573 have been marked PE, and APAR OA25292 has been opened. IEEMB838 was moved above 16MB in PLPA in z/OS 1.9, and a glue routine was created. Problems created by that change (for example, SMFEWTM issued in 24-bit addressing mode returns in 31-bit addressing mode) caused the creation of OA24573. Unfortunately, I neglected to consider the effect of ISV intercepts while fixing OA24573, despite having seen that the interface was intercepted in the customer's dump. A senior moment, I suppose (not sure how many of those I am allowed before my coding license gets revoked). Jim Mulder z/OS System Test IBM Corp. Poughkeepsie, NY -- 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: AXRUSER Security Information
Lizette, Here's what I've had coded for AXR SYS1.PARMLIB(AXR00) AXRUSER(AXRPSTRT) /* ?AXREXX SECURITY=AXRUSER RESULTS IN THE exec running in a security environment defined by the userid AXRUSER */ Top Secret STC= AXR ACID = *BYPASS* ---needed since this starts prior to TSS STC= AXRPSTRT ACID = AXRPSTRT ---Restart proc for AXR STC= AXR0* ACID = AXRPSTRT ---UserID of the spawned tasks -- 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
Fuencisla Mateo Cid is out of the office.
I will be out of the office starting 02/06/2008 and will not return until 09/06/2008. I will respond to your message when I return. -- 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: For users of the LOOK command on z/OS 1.9
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Mark Zelden On Sun, 1 Jun 2008 14:10:08 -0400, Sam Golob [EMAIL PROTECTED] wrote: Hi Folks, If you are a user of the LOOK TSO command to browse active storage, from CBT Tape File 264 (www.cbttape.org - see Updates page), you have to be informed of the following development: Important note, for the LOOK command to work: - --- --- --- -- Note from Sam Golob: The LOOK program needs a PARMLIB setting in the active DIAGxx member: VSM ALLOWUSERKEYCSA(YES) This was the default until z/OS 1.8, but in z/OS 1.9, VSM ALLOWUSERKEYCSA(NO) is the default. It now has to be specifically set to VSM ALLOWUSERKEYCSA(YES), or LOOK will abend with a SB0A, reason code 5C. - This is one of the gotchas that get you when you go to a new z/OS release. Better to be informed, than not informed. The solution was discovered, when I looked up the SB0A, reason code 5C abend in the z/OS 1.9 System Codes book. Since a lot of people use the LOOK command (or at least they SHOULD), I figured I'd spread the word around. All the best of everything to y'all Sam IMO, this should be APAR-able or there should be a documented work around. Did you open up a PMR with IBM or search IBMLINK? Does IBM accept PMRs for CBTTAPE programs? :-) -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: SMFEWTM
How big is IEEMB838? And is there any drag along VSCR other than the module move itself. Looking for whether to mention it in my memory presentation - under z/OS VSCR. BTW I don't even know what IEEMB838 is (but would like to). Sounds like something that's used early in the life of an IPL. Thanks, Martin Martin Packer Performance Consultant IBM United Kingdom Ltd +44-20-8832-5167 +44-7802-245-584 [EMAIL PROTECTED] Unless stated otherwise above: IBM United Kingdom Limited - Registered in England and Wales with number 741598. Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU -- 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
Any way to make printer continue after an error?
I have a developer asking if there is any way to cause a printer to continue printing after encountering an error such as a missing page segment or a missing font. He says why should that kind of error be a complete show stopper such that any subsequent documents in the same output stream don't print. Has anyone else been asked this and is there any way to make this happen? We are z/OS 1.7 using IP Printway with laser printers (HP 4200, etc). Any suggestions are appreciated. Thank you. -- 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: Any way to make printer continue after an error?
Sounds like he comes from the pc world. Why would a PRODUCTION job want to product incomplete output but appear to finish normally? What is HIS paycheck was the only one with the missing font? He doesn't get paid, but every other check number might be off. Output in other output groups isn't effected, so if he has output in multiple DD's in the same output group, HE could fix that so it would print. -- 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
Posting on timetable software running z was (fwd) Re: After Yesterday, No One Will Ever Again Wait For SEPTA ( Phila PA )
Note the application and the fact it is running on z series assuming Hans (who normally has a good track record) is correct. I kept the whole posting so that you get a flavor of the type of application and the cpu requirements. Clark Morris On Mon, 2 Jun 2008 02:32:56 + (UTC), in misc.transport.rail.americas Hans-Joachim Zierke [EMAIL PROTECTED] wrote: Merritt Mullen schrieb: Unfortunate name. Probably HaCon Fahrplan System or somesuch. The big companies will run checks for new products, to avoid any kind of unfortunate connotation in any major language, but when Hacon developed the software in the 1980s, it was a company with less than 10 employees. The first timetable CDs were sold for hundreds of DM a piece, to major travel bureaus etc. Then there was a BTX online system in the early 1990s, where you could use it for a fee. Change came, when a student wrote a script, which generated a mail-to-server service on a university host. I think this was at a time, when the www didn't exist yet, or at least Mosaic didn't, and Internet access was available for 5 digits per year. When Internet access became more common, the figures on the university computer went up, which convinced DB to set up a public server, in 1995 or so. You would want to buy a hafas software application? grin In fact, yes. If they can handle 1.6 million connections in one hour, out of 40 stations and bus stops plus 40 million adresses, with response times of very few seconds, then it might be good enough for me as well.;-) But the absurd part is: While the DB server runs on Linux (and an IBM mainframe cluster), the consumer offline PC version is only available for Windows. Hans-Joachim -- Busy in a narrow valley: http://www.railpictures.net/images/d1/6/3/1/8631.1188306000.jpg -- 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: IODF questions
We have two IODF's for our entire shop, and run mulitple sysplexes (unfortunately). While we're looking toward merging systems, we will continue to have a test (sandbox) and PPRC watchdog systems that are logically separate from our production sysplex, but share gadgets (we do not have the funding to physically isolate our sandbox). We are GRS only, no MIM/MII/MIA. For those that were interested, here's how we do it: 1. Separate buildings, one z9 in each, each with it's own DASD. Our watchdog systems have their own control units, accessible from all systems within it's building, and from the watchdog in the other building. 2. IODF's are separate HLQ's, aliased from all master catalogs to one common user catalog per building. 3. User catalogs are isolated on watchdog volumes, and excluded from backup on all systems except the watchdogs. No other data is on the catalog volumes. OS Configs specify OFFLINE everywhere except the owning system. 4. IODF's are are isloated on watchdog volumes, and excluded from backup on all systems except the watchdogs. No other data is on the IODF volumes. OS Configs specify OFFLINE everywhere except the owning system. 5. RNL is set to EXCL TYPE(GENERIC) QNAME(SYSIGGV2) for the IODF user catalogs. All other catalogs are CONverted. We currently EXCL TYPE (GENERIC) QNAME(SYSVTOC) becase we are still in transition from RING to STAR. Once in STAR, we will CON, *except* the IODF volumes (EXCL TYPE (SPECIFIC)). This allows the RESERVE to be issued against the IODF volumes to maintain integrity. 6. We use HCM. We connect to one of the two watchdog systems to perform all configuration updates. When we implement, we build production, write IOCDS, copy the IODF to the other site, write IOCDS, and ACTIVATE TEST on the watchdogs. If all is well, we HW/SW ACTIVATE on the watchdogs, then VARY the IODF volume ONLINE to the other systems in each site in turn, SW ACTIVATE, then VARY the IODF volume OFFLINE. Of course, if there are DELETE's or POR requirements, we handle those as appropriate. As we only have ONE person performing IODF updates, and we isolate the data, RESERVE is not a performance or availability hit. We know this is not sanctioned, but we manage it by single-threading and adhering tightly to documented process. Regards, Arthur Gutowski Ford Motor Company ITInfrastructure [EMAIL PROTECTED] -- 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: z/OS SSL
Hal Merritt wrote: I could never get z/os to accept a self signed cert. I did create my own CA and used that sign certs exported to the client. I think. Been a while. You should be able to create and use self-signed certificates with RACF and System SSL. However, if you use a TN3270 server with SSL, you won't be able to use SSL sessions successfully with a self-signed server certificate if your Emulator client is IBM PComm (and probable HoD, too). PComm simply doesn't accept self-signed server certificates, Attachmate Extra! does. -- Ulrich Boche SVA GmbH, Germany IBM Premier Business Partner -- 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: ICF Catalogs on SMS managed volumes
Whatever you have, make sure that you have documentation in place describing how the catalogs are backed up and how they can be recovered in your production system and DR. Have jobs in place so you are not trying to create them at 3am. THEN TEST IT. We use dedicated small non-sms volumes. We want nothing else on the same volume as the catalog. We back up all our catalogs every 12 hours and also create an alternate mastercat. We also back up all VVDS at the same time. Our backup data sets go to disk instead of tape. There are two sms pools for the backups. A primary and an alternate. Each pool's volumes are on different control units. Each pool's data sets have a different HLQ that are in different UCATS. The print output from each backup goes to the disk pool so we can look at the output if the system is having catalog problems. We don't need the catalog to find the backup data sets or the output describing them. We have complete documentation and recovery procedures including jobs on our group web page so we can get the documentation from anywhere anytime. We may go a bit far with our catalog philosophy, but if anything happens to a catalog and we lose data, our jobs would be in jeopardy. Catalogs do break. Richard J Habres AVP - Merrill Lynch Mainframe Storage Ops - Dasd Administration -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Ted MacNEIL Sent: Friday, May 30, 2008 2:01 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: ICF Catalogs on SMS managed volumes I spent the next week fixing catalog entries and moving all catalogs to non-SMS. I'd advise against SMS managed catalogs volumes Things have changed. I've had both, and I'd recommend SMS management, now. Why manually manage when you don't have to? - Too busy driving to stop for gas! This message w/attachments (message) may be privileged, confidential or proprietary, and if you are not an intended recipient, please notify the sender, do not use or share it and delete it. Unless specifically indicated, this message is not an offer to sell or a solicitation of any investment products or other financial product or service, an official confirmation of any transaction, or an official statement of Merrill Lynch. Subject to applicable law, Merrill Lynch may monitor, review and retain e-communications (EC) traveling through its networks/systems. The laws of the country of each sender/recipient may impact the handling of EC, and EC may be archived, supervised and produced in countries other than the country in which you are located. This message cannot be guaranteed to be secure or error-free. This message is subject to terms available at the following link: http://www.ml.com/e-communications_terms/. By messaging with Merrill Lynch you consent to the foregoing. -- 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: SMFEWTM
In a message dated 6/2/2008 1:09:19 A.M. Central Daylight Time, [EMAIL PROTECTED] writes: The only hope is if the IBM change team offers a ++APAR and the customer chooses/agrees to install it for fix-test purposes. Seems like this is what HOLD ERRORs were designed for? **Get trade secrets for amazing burgers. Watch Cooking with Tyler Florence on AOL Food. (http://food.aol.com/tyler-florence?video=4?NCID=aolfod000302) -- 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
American Airlines
hancock wrote: Question: SABRE took years to develop. Did it take equally long to develop systems for competing airlines? For those using IBM platforms, could they use any code or designs for SABRE or were they propriety to American Airlines? re: http://www.garlic.com/~lynn/2008i.html#19 American Airlines there was airline control program (ACP) that was (vendor) operating system used for many of these online systems wiki page http://en.wikipedia.org/wiki/Airlines_Control_Program there was long period of development of the ACP operating system as well as the customer applications built on the operating system. In some sense SABRE is a brand which is a whole bunch of online applications that were (initially) built on ACP. Some number of the other airline res systems were also whole set of applications built using the ACP operating system. Currently, some number of the applications have been migrated to other platforms. circa 1980 or so ... there were some number of other kinds of institutions using ACP ... which led to renaming ACP to TPF (transaction processing facility) ... wiki page http://en.wikipedia.org/wiki/Z/TPF from above: Current users include Sabre (reservations), Amadeus (reservations), VISA Inc (authorizations), Holiday Inn (central reservations), CBOE (order routing), Singapore Airlines, KLM, Qantas, Amtrak, Marriott International , worldspan and the NYPD (911 system). ... snip ... For some transaction drift ... sat, a tribute was held for Jim Gray http://www.garlic.com/~lynn/2008i.html#32 A Tribute to Jim Gray: Sometimes Nice Guys Do Finish First http://www.garlic.com/~lynn/2008i.html#36 A Tribute to Jim Gray: Sometimes Nice Guys Do Finish First Bruce Lindsey gave a great talk about Jim formalizing transactions and databases management ... to provide sufficient integrity and reliability that they could be trusted in lieu of paper entries ... which was required to make things like online transaction processing possible (i.e. it was necessary to demonstrate high enough integrity and reliability level that it would be trusted in place of paper and human/manual operations). -- 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: American Airlines
Actually, IBM built special hardware for this type of software to run on. Warren -- Original message from Anne Lynn Wheeler [EMAIL PROTECTED]: -- hancock wrote: Question: SABRE took years to develop. Did it take equally long to develop systems for competing airlines? For those using IBM platforms, could they use any code or designs for SABRE or were they propriety to American Airlines? re: http://www.garlic.com/~lynn/2008i.html#19 American Airlines there was airline control program (ACP) that was (vendor) operating system used for many of these online systems wiki page http://en.wikipedia.org/wiki/Airlines_Control_Program there was long period of development of the ACP operating system as well as the customer applications built on the operating system. In some sense SABRE is a brand which is a whole bunch of online applications that were (initially) built on ACP. Some number of the other airline res systems were also whole set of applications built using the ACP operating system. Currently, some number of the applications have been migrated to other platforms. circa 1980 or so ... there were some number of other kinds of institutions using ACP ... which led to renaming ACP to TPF (transaction processing facility) ... wiki page http://en.wikipedia.org/wiki/Z/TPF from above: Current users include Sabre (reservations), Amadeus (reservations), VISA Inc (authorizations), Holiday Inn (central reservations), CBOE (order routing), Singapore Airlines, KLM, Qantas, Amtrak, Marriott International , worldspan and the NYPD (911 system). ... snip ... For some transaction drift ... sat, a tribute was held for Jim Gray http://www.garlic.com/~lynn/2008i.html#32 A Tribute to Jim Gray: Sometimes Nice Guys Do Finish First http://www.garlic.com/~lynn/2008i.html#36 A Tribute to Jim Gray: Sometimes Nice Guys Do Finish First Bruce Lindsey gave a great talk about Jim formalizing transactions and databases management ... to provide sufficient integrity and reliability that they could be trusted in lieu of paper entries ... which was required to make things like online transaction processing possible (i.e. it was necessary to demonstrate high enough integrity and reliability level that it would be trusted in place of paper and human/manual operations). -- 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: American Airlines
On Jun 2, 10:32 am, [EMAIL PROTECTED] (Warren Brown) wrote: Actually, IBM built special hardware for this type of software to run on. re: http://www.garlic.com/~lynn/2008i.html#19 American Airlines http://www.garlic.com/~lynn/2008i.html#34 American Airlines http://www.garlic.com/~lynn/2008i.html#36 American Airlines I was recently reviewing some old email exchanges with Jim Gray from late 70s and there was one discussing the 3830 (disk controller) ACP (lock) RPQ ... which basically provided logical locking function in the controller ... for coordinating multiple loosely-coupled (i,.e. mainframe for cluster) processors. the old research bldg. 28, ... where the original relational/sql work was done http://www.garlic.com/~lynn/subtopic.html#systemr was just across the street from bldg 14 (disk engineering lab) and bldg. 15 (disk product test lab) ... and they let me play disk engineer over there http://www.garlic.com/~lynn/subtopic.html#disk During Jim's tribute, people were asked to come up and tell stories. The story I told was that Jim and I use to have friday evening sessions at some of the local establishments in the area (when eric's deli opened across from the plant site, they let us use the back room and gave us pitchers of anchor steam at half price). One Friday evening we were discussing what kind of silver bullet application could we deploy that would entice more of the corporation (especially executives) to actually use computers (primarily online vm370) and we came up with the online telephone book. However one of the requirements was that Jim would implement his half in 8hrs and I would implement my half in 8hrs. -- 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
Set REXX variables before REXX start
Hi I try to set some REXX variables from as assembler program , before I call the REXX exec: - call IKJTSOEV to init the environment - call IKJCT441 to set the variables I get here a X'28' the caller is not activated via CLIST or REXX Can I set variables before a REXX call ? -- Miklos Szigetvari Development Team ISIS Information Systems Gmbh tel: (+43) 2236 27551 570 Fax: (+43) 2236 21081 E-mail: [EMAIL PROTECTED] Info: [EMAIL PROTECTED] Hotline: +43-2236-27551-111 Visit our Website: http://www.isis-papyrus.com --- This e-mail is only intended for the recipient and not legally binding. Unauthorised use, publication, reproduction or disclosure of the content of this e-mail is not permitted. This email has been checked for known viruses, but ISIS accepts no responsibility for malicious or inappropriate content. --- -- 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
American Airlines
On Jun 2, 10:32 am, [EMAIL PROTECTED] (Warren Brown) wrote: Actually, IBM built special hardware for this type of software to run on. re: http://www.garlic.com/~lynn/2008i.html#19 American Airlines http://www.garlic.com/~lynn/2008i.html#34 American Airlines http://www.garlic.com/~lynn/2008i.html#36 American Airlines I was recently reviewing some old email exchanges with Jim Gray from late 70s and there was one discussing the 3830 (disk controller) ACP (lock) RPQ ... which basically provided logical locking function in the controller ... for coordinating multiple loosely-coupled (i,.e. mainframe for cluster) processors. the old research bldg. 28, ... where the original relational/sql work was done http://www.garlic.com/~lynn/subtopic.html#systemr was just across the street from bldg 14 (disk engineering lab) and bldg. 15 (disk product test lab) ... and they let me play disk engineer over there http://www.garlic.com/~lynn/subtopic.html#disk During Jim's tribute, people were asked to come up and tell stories. The story I told was that Jim and I use to have friday evening sessions at some of the local establishments in the area (when eric's deli opened across from the plant site, they let us use the back room and gave us pitchers of anchor steam at half price). One Friday evening we were discussing what kind of silver bullet application could we deploy that would entice more of the corporation (especially executives) to actually use computers (primarily online vm370) and we came up with the online telephone book. However one of the requirements was that Jim would implement his half in 8hrs and I would implement my half in 8hrs. -- 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: SMFEWTM
Ed Finnell wrote: Seems like this is what HOLD ERRORs were designed for? As Jim said, the PTFs for OA24573 have been marked PE. That means that an ERROR HOLD will be generated. A PTF normally goes into the field without any so-called early testing by ISVs. Unless the APAR is marked HIPER, it will take a while for the PTF to make its way into the field. (Many customers install only recommended service that has gone through IBM's CST.) Eventually, a customer running the affected ISV product will install the PTF and encounter the incompatibility. Then, while the ISV (and possibly IBM) are analyzing the dump(s), trying to understand what happened, dozens of other customers begin coming up on the new code. Then, it's like an avalanche! There is a fairly new process being tried where participating ISVs register for the interfaces -- even undocumented ones -- upon which they depend. In theory, this lets IBM's developers know that there is a dependency on a particular field, module, or intercept point, and they can contact the ISV when changes are being contemplated. I have no idea if this system works or if it's even being used by folks that fix APARs for a living. But, it sounds promising. -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 [EMAIL PROTECTED] http://www.phoenixsoftware.com/ -- 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
Release 6.1 of IBMLink
Let's hope the authentication problems are a thing of the past. From the IBMLink main page: === Announcing Release 6.1 of IBMLink! 30 May 2008 On May 30, 2008, IBMLink Release 6.1 deployed and we are delighted to share with you some of the enhancements: A robust failover between our authentication servers and IBMLink has been added. This enhancement provides better availability and stability for log-on and entitlement checks. IBMLink Release 6.1 adopts new ibm.com standards to be consistent with other sites in IBM. The most obvious indication of this is the movement of the sign-out link to the masthead. The Company Service Administrator (CSA) and backup can now execute Usage Reports. The reports can be exercised with many options to narrow down the details on 'how' and 'when' members have used IBMLink. These new Usage Reports provide management and CSAs with an easy tool for maintenance and administration of IDs authorized to their company's IBMLink account. CSAs now also have the ability to inquire with additional software customer numbers. This is a handy tool to find out if there is more than one software customer number available for use with their account. The ServiceLink applications with a list option, including ASAP, AST, ETR, and PCR, now have the ability to OUTPUT these lists in a printable format. For all the applications which create a list of multiple documents, users can now select and view each document sequentially without leaving and returning to the list again. The SIS application allows the user to customize the search results in a more user friendly and intuitive fashion. These ServiceLink usability enhancements are also coupled with easier navigation as users are able to go directly to the ASAP and AST applications from any other ServiceLink application. Please try all of these new functions and give us your feedback via the Feedback Application. -- 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: Set REXX variables before REXX start
On Mon, 2 Jun 2008 17:06:46 +0200, Miklos Szigetvari wrote: I try to set some REXX variables from as assembler program , before I call the REXX exec: - call IKJTSOEV to init the environment - call IKJCT441 to set the variables I get here a X'28' the caller is not activated via CLIST or REXX Can I set variables before a REXX call ? It must be possible, because when Rexx is activated by z/OS Unix, a large number of Unix-specific variables appear to be preset. -- gil -- 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 Generic VS Cross Domain
Magen We are trying to migrate out CICS TOR from cross domain to VTAM GR. It's difficult to understand what you might mean by this statement so it's no wonder Pat is confused. Cross domain typically means accessing an application in one domain from, according to the evidence, an SNA entity activated within another domain behaving as a secondary LU. VTAM GR typically means accessing one of multiple applications all providing the same service according to direction from a load balancing mechanism from an SNA entity behaving as a secondary LU no matter in which domain the LU was activated. As you can see these two are not the same so saying that you are migrating from one to the other would seem to be leaving a lot to be presumed. But I'll give it a try. In the past you have had one CICS system. You now want to run multiple CICS systems set up as a generic resource group within you sysplex. You want your clients not to have to change the name by which they know the CICS service. Perhaps this name is embedded in some customization in the client workstations. I am going to try to follow the steps you mentioned in the light of these guesses. I'm also going to have to try to remember the details of how VTAM behaves without having a test system to hand to verify my guesses so I hope I get it sufficiently right to help you make progress. 1. You close the VTAM ACB corresponding to the CICS system. This has the effect of making the name by which the CICS service is known go from ACTIV to CONCT. 2. You inactivate the VTAM APPL major node which contains the APPL minor node which corresponds to the CICS system - I hope. You activate VTAM APPL major nodes in each system which will support one of your CICS each one with a name which is *not* the same as the name you used for your single CICS system. You redefine/define your CICS systems so that they all know they are members of a generic resource group and they all share the same generic resource name, this name being the same name used previously for the single CICS system. The effect of this is that, as each CICS system makes itself known to VTAM, VTAM is aware that each CICS system is a member of a generic resource group. 3, 4 and 5. Trying to follow what you did I am now lost. D net to the old TOR appid shows the the cross domain is still there and some terminals are in POLUIO status under it. This appears to be all about a particular SNA name so I'll invent the name MYCICS in order to make discussing it easier. As you clarified to some extent in response to Pat, you display MYCICS and discover it is a dynamic CDRSC in a domain other than the domain or domains where you have defined your CICS systems. When the name is defined as a generic resource name it is treated as an USERVAR. Unfortunately I cannot remember - if I ever knew - whether it makes sense for an USERVAR to appear as a dynamic CDRSC. In case it doesn't it's probably best to make sure that MYCICS disappears as a dynamic CDRSC before testing your generic resources configuration. Some of your description seems to imply that, in one of the domains where the secondary LUs have been activated, VTAM is still assuming an association between MYCICS as a CDRSC and the secondary LUs in the form of a session request which has the status code POLUIO associated with it. This would explain the number of session requests being greater than zero. I would expect it would be easy enough simply to use a command of the form VARY NET,INACT,ID=MYCICS,DELETE=YES in that domain in order to remove all trace of MYCICS prior to performing your tests with MYCICS as a generic resource.[1] Forgive me if I have misinterpreted what I think you have been trying to do. One way of reading what you have said is that you have imagined that you need to manipulate the status of the name MYCICS as it appears in one of the domains where the secondary LUs are defined - where MYCICS is a CDRSC - by opening and closing the VTAM ACB defined with the name MYCICS - associated with your original CICS system. This is just not how it works. As Pat mentioned, static CDRSCs need to be activated and deactivated in one domain quite independently of the resource which they represent in another domain. Also as Pat mentioned, dynamic CDRSCs, although created dynamically during the flexible search process, can be deactivated manually or can be left to be deactivated upon expiry of the CDRSCTI timer for subarea or DIRTIME for APPN. Responding to the question at the end of your second post, in order to remove a session or sessions from the VTAM system, you should consider using VARY TERM rather than VARY INACT. If I have not understood your situation and concerns, please post again. If you do please clarify your configurations, before and after. You may also like to be clear over what the secondary LUs are. For example, I could guess that they are APPL statements used by a TN3270
Re: Vtam Generic VS Cross Domain
Pat I'm reluctant to be dogmatic about there being no connection between generic resources and USS. Generic resources exploits USERVAR, USERVAR used to be associated with the interpret table and USS and the interpret table work in tandem. That said, I can't see how generic resources and USS can interfere with one another given that the USS process needs to be complete, that is, the owning VTAM needs to have created a formatted request from the unformatted request. The formatted request leads to a CDINIT being sent off and arriving at one of the members of the generic resource group before the CDTERM is returned with the selected member name for use in the final and - one hopes - successful CDINIT being sent to the selected member. Chris Mason On Thu, 29 May 2008 15:12:02 -0500, Patrick O'Keefe [EMAIL PROTECTED] wrote: ... I think the POLUIO status relates strictly to the SSCP-LU session - VTAM has sent a USS message and is waiting for a response. I've seen this only with SLUs under real PUs, but maybe VTAM does some special USS handling in GR configurations. I think we need Chris Mason to chime in about now. ... -- 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: JCL Symbol Not Substituted
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Paul [EMAIL PROTECTED] -- -- //* on a z/OS v1r7 JES2 system, the JCL job step: //* // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C //*.+|+|+|+|+|+|.. ..+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|.. ..+|.. //COMMENTS DD* Shows the following in the JESJCL listing: 3 // SET SYMBOL1=A 4 // SET SYMBOL2=B 5 // SET SYMBOL3=C //*.+|+|+|+|+|+|.. ..+|.. 6 //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|.. ..+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AxSYMBOL2.yCz' Apparently the JES2 reader/converter is failing to substitute the value 'B' for the symbol SYMBOL2. Same result on 1.9, even with uppercase X, Y and Z. -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: JCL Symbol Not Substituted
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul [EMAIL PROTECTED] Sent: Monday, June 02, 2008 11:48 AM To: IBM-MAIN@BAMA.UA.EDU Subject: JCL Symbol Not Substituted -- -- //* on a z/OS v1r7 JES2 system, the JCL job step: //* // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C //*.+|+|+|+|+|+|.. ..+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|.. ..+|.. //COMMENTS DD* Shows the following in the JESJCL listing: 3 // SET SYMBOL1=A 4 // SET SYMBOL2=B 5 // SET SYMBOL3=C //*.+|+|+|+|+|+|.. ..+|.. 6 //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|.. ..+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AxSYMBOL2.yCz' Apparently the JES2 reader/converter is failing to substitute the value 'B' for the symbol SYMBOL2. PMR submitted. -- gil Same thing happens on z/OS 1.8. The problem appears to occur when you split the symbol name across card images. When I put in a card like: // SET SYM=Q I get the result // PARM='AXQBOL2.YCZ' -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing 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
Re: JCL Symbol Not Substituted
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul [EMAIL PROTECTED] Sent: Monday, June 02, 2008 11:48 AM To: IBM-MAIN@BAMA.UA.EDU Subject: JCL Symbol Not Substituted -- -- //* on a z/OS v1r7 JES2 system, the JCL job step: //* // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C //*.+|+|+|+|+|+|.. ..+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|.. ..+|.. //COMMENTS DD* Shows the following in the JESJCL listing: 3 // SET SYMBOL1=A 4 // SET SYMBOL2=B 5 // SET SYMBOL3=C //*.+|+|+|+|+|+|.. ..+|.. 6 //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|.. ..+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AxSYMBOL2.yCz' Apparently the JES2 reader/converter is failing to substitute the value 'B' for the symbol SYMBOL2. PMR submitted. -- gil May be a WAD according to: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B670/5.4. 4.1 quote The system substitutes all symbols on an 80-character record. ... It may be that the number and length of symbols form a parameter that does not fit within the limits imposed by an 80-character record. (In reality the limit is 68 characters, because columns 1, 2, and 3 must contain respectively a slash, slash, and blank, and column 72 must be blank.) Two techniques for handling this situation are: (1) defining shorter symbols to substitute for the longer ones, or (2) dividing the series of symbols so as to form two parameters, which would allow you to place a comma after the first and move the second to a continuation record. /quote though not specifically stated, the above would strongly imply that continuing a symbol across multiple cards is not supported. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing 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
Re: Set REXX variables before REXX start
Hi Steve Comstock wrote: Miklos Szigetvari wrote: Hi I try to set some REXX variables from as assembler program , before I call the REXX exec: - call IKJTSOEV to init the environment - call IKJCT441 to set the variables I get here a X'28' the caller is not activated via CLIST or REXX Can I set variables before a REXX call ? My notes say that IKJCT441 can be invoked by programs that have been invoked from CLIST or REXX exec; looks like the avenue you're trying is not open to you. Thinking about it, it looks like you need to have a REXX environment before you call IKJCT441 to work with REXX variables. Can you set up a small REXX exec as an intermediary and then call your program from the exec? I wanted to save this callback somehow. On the other side , I already init an environment via IKJTSOEV Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques == Check out the Trainer's Friend Store to purchase z/OS == == application developer toolkits. Sample code in four== == programming languages, JCL to Assemble or compile, == == bind and test. == == http://www.trainersfriend.com/TTFStore/index.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 -- Miklos Szigetvari Development Team ISIS Information Systems Gmbh tel: (+43) 2236 27551 570 Fax: (+43) 2236 21081 E-mail: [EMAIL PROTECTED] Info: [EMAIL PROTECTED] Hotline: +43-2236-27551-111 Visit our Website: http://www.isis-papyrus.com --- This e-mail is only intended for the recipient and not legally binding. Unauthorised use, publication, reproduction or disclosure of the content of this e-mail is not permitted. This email has been checked for known viruses, but ISIS accepts no responsibility for malicious or inappropriate content. --- -- 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: Set REXX variables before REXX start
Miklos Szigetvari wrote: Hi I try to set some REXX variables from as assembler program , before I call the REXX exec: - call IKJTSOEV to init the environment - call IKJCT441 to set the variables I get here a X'28' the caller is not activated via CLIST or REXX Can I set variables before a REXX call ? My notes say that IKJCT441 can be invoked by programs that have been invoked from CLIST or REXX exec; looks like the avenue you're trying is not open to you. Thinking about it, it looks like you need to have a REXX environment before you call IKJCT441 to work with REXX variables. Can you set up a small REXX exec as an intermediary and then call your program from the exec? Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques == Check out the Trainer's Friend Store to purchase z/OS == == application developer toolkits. Sample code in four== == programming languages, JCL to Assemble or compile, == == bind and test. == == http://www.trainersfriend.com/TTFStore/index.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: Release 6.1 of IBMLink
On Mon, 2 Jun 2008 10:44:28 -0500, Mark Zelden [EMAIL PROTECTED] wrote: Let's hope the authentication problems are a thing of the past. I was just going to post something about this. Since Mark has already started this thread, I will jump on. When I go to SIS and search the different libraries, even though I have Sort by updated date checked, it doesn't seem to sort them like it used to. Anyone else have the same issue? Thanks and regards, Patrick Lyon -- 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
JCL Symbol Not Substituted
//* on a z/OS v1r7 JES2 system, the JCL job step: //* // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C //*.+|+|+|+|+|+|+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|+|.. //COMMENTS DD* Shows the following in the JESJCL listing: 3 // SET SYMBOL1=A 4 // SET SYMBOL2=B 5 // SET SYMBOL3=C //*.+|+|+|+|+|+|+|.. 6 //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AxSYMBOL2.yCz' Apparently the JES2 reader/converter is failing to substitute the value 'B' for the symbol SYMBOL2. PMR submitted. -- gil -- 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: Set REXX variables before REXX start
Could it be that you need to call IRXINIT to initialize a REXX environment first? Bill On Mon, 2 Jun 2008 18:28:09 +0200, Miklos Szigetvari [EMAIL PROTECTED] wrote: Hi Steve Comstock wrote: Miklos Szigetvari wrote: Hi I try to set some REXX variables from as assembler program , before I call the REXX exec: - call IKJTSOEV to init the environment - call IKJCT441 to set the variables I get here a X'28' the caller is not activated via CLIST or REXX Can I set variables before a REXX call ? My notes say that IKJCT441 can be invoked by programs that have been invoked from CLIST or REXX exec; looks like the avenue you're trying is not open to you. Thinking about it, it looks like you need to have a REXX environment before you call IKJCT441 to work with REXX variables. Can you set up a small REXX exec as an intermediary and then call your program from the exec? I wanted to save this callback somehow. On the other side , I already init an environment via IKJTSOEV Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques == Check out the Trainer's Friend Store to purchase z/OS == == application developer toolkits. Sample code in four== == programming languages, JCL to Assemble or compile, == == bind and test. == == http://www.trainersfriend.com/TTFStore/index.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 -- Miklos Szigetvari Development Team ISIS Information Systems Gmbh tel: (+43) 2236 27551 570 Fax: (+43) 2236 21081 E-mail: [EMAIL PROTECTED] Info: [EMAIL PROTECTED] Hotline: +43-2236-27551-111 Visit our Website: http://www.isis-papyrus.com --- This e-mail is only intended for the recipient and not legally binding. Unauthorised use, publication, reproduction or disclosure of the content of this e-mail is not permitted. This email has been checked for known viruses, but ISIS accepts no responsibility for malicious or inappropriate content. --- -- 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: Set REXX variables before REXX start
Try IRXEXCOM. Todd -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Miklos Szigetvari Sent: Monday, June 02, 2008 10:07 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Set REXX variables before REXX start Hi I try to set some REXX variables from as assembler program , before I call the REXX exec: - call IKJTSOEV to init the environment - call IKJCT441 to set the variables I get here a X'28' the caller is not activated via CLIST or REXX Can I set variables before a REXX call ? No virus found in this outgoing message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.24.4/1478 - Release Date: 6/2/2008 7:12 AM -- 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: IODF questions
Thanks all for the info. We're a simple 2 LPAR Monoplex (3rd Linux soon) and I didn't explain myself well on one point - a problem I suffer from :)... I too believe in keeping it simple. It was a mistake/poor choice in creating my initial IODF with a SYS1 HLQ. The SYS0 HLQ we previously used was in a common shared Ucat and it worked well for us. The only problem I have is in getting the PROD LPAR back to a common SYS0.IODFx without an IPL (and maybe a POR). From message CBDA836I it seems only the IODF suffix can be changed so I can't ACTIVATE SYS0.IODFx. CBDA836I IODF data set name SYS0.IODF05 is not comparable to source IODF data set name SYS1.IODF05. Activation is rejected. Explanation: The IODF currently in access by HCD must be comparable to the IODF which was used for IPL and which is the source IODF in the activation process. Comparable means that both IODF names must be equal except the xx suffix of the '.IODFxx' production IODF naming scheme. System Action: None. HCD processing is ready to continue. User Response: Use another IODF in HCD whose name is comparable to the IODF used for IPL. If I IPL Test and ACTIVATE a SYS0 from the Test LPAR I think the token will get messed up for Prod and I would only be able to make software changes afterwards on Prod until an IPL. Is there anything that I'm missing or am I just stuck until I can IPL Prod? Thanks again, Robert Confidentiality Notice: This e-mail message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. -- 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: JCL Symbol Not Substituted
Paul [EMAIL PROTECTED] wrote:
//*.+|+|+|+|+|+|+|..
//STEP1EXEC PGM=IEFBR14,
// PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+
// BOL2.ySYMBOL3.z'
I think you're supposed to code something like:
//*.+|+|+|+|+|+|+|..
//STEP1EXEC PGM=IEFBR14,
// PARM=('SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.x', +
// 'SYMBOL2.ySYMBOL3.z')
--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/
--
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: JCL Symbol Not Substituted
A symbol within apostrophes cannot be continued across a card boundary. See SA22-7597-11 z/OS V1R9.0 MVS JCL Reference, page 5-22, which states A symbol within apostrophes cannot be broken at column 71 and continued to the next line. The code is working as designed. John P. Baker -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul [EMAIL PROTECTED] Sent: Monday, June 02, 2008 12:48 PM To: IBM-MAIN@BAMA.UA.EDU Subject: JCL Symbol Not Substituted //* on a z/OS v1r7 JES2 system, the JCL job step: //* // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C //*.+|+|+|+|+|+|+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|+|.. //COMMENTS DD* Shows the following in the JESJCL listing: 3 // SET SYMBOL1=A 4 // SET SYMBOL2=B 5 // SET SYMBOL3=C //*.+|+|+|+|+|+|+|.. 6 //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+ // BOL2.ySYMBOL3.z' //*.+|+|+|+|+|+|+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AxSYMBOL2.yCz' Apparently the JES2 reader/converter is failing to substitute the value 'B' for the symbol SYMBOL2. PMR submitted. -- gil -- 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: American Airlines
On 2 Jun 2008 07:32:46 -0700, [EMAIL PROTECTED] (Warren Brown) wrote: Actually, IBM built special hardware for this type of software to run on. OK, it's been almost thirty years, so my memory may be a bit hazy... Between mid 1977 and mid 1979 I worked for Continental Airlines. At the time we were running ACP/SHARES[1] on three 360/65 and one 370/155. IIRC, these where standard boxes, with no special hardware features supporting the ACP environment. However, we were using 2314s attached to these boxes, and I believe there _was_ a hardware RPQ on the drives. Called something like Airlines Control Buffer, I _think_ the feature allowed the drive to disconnect from the channel while doing a seek. Whatever the details, it was something that became standard on later mainframe drives from IBM. Eric [1]: SHARES = SHAred RESeveration system. Prior to SHARES, there were airlines that hosted reservation systems for other airlines by dedicating a separate box and ACP system for each of their customers. SHARES was originally developed by a company called Mutual Computer Systems as an attempt to provide an ACP-based system that could host multiple airlines on one box, with database isolation. MCS was later purchased by Continental. At least, this is what I was told while working for CO! -- Eric Chevalier E-mail: [EMAIL PROTECTED] Web: www.tulsagrammer.com Is that call really worth your child's life? HANG UP AND DRIVE! -- 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: JCL Symbol Not Substituted
Paul Gilmartin wrote:
On Mon, 2 Jun 2008 10:17:10 -0700, Edward Jaffe wrote:
I think you're supposed to code something like:
//*.+|+|+|+|+|+|+|..
//STEP1EXEC PGM=IEFBR14,
// PARM=('SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.x', +
// 'SYMBOL2.ySYMBOL3.z')
If I do that, doesn't the comma become part of the PARM string, which
I don't want?
No.
--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/
--
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: JCL Symbol Not Substituted
Yes, it does.
Please refer to SA22-7597-11 z/OS V1R9.0 MVS JCL Reference, page 16-22.
Examples 3 and 4 demonstrate clearly that a comma (,) will be inserted
between the parameters.
John P. Baker
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Paul Gilmartin
Sent: Monday, June 02, 2008 1:23 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: JCL Symbol Not Substituted
On Mon, 2 Jun 2008 10:17:10 -0700, Edward Jaffe wrote:
I think you're supposed to code something like:
//*.+|+|+|+|+|+|+|..
//STEP1EXEC PGM=IEFBR14,
// PARM=('SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.x', +
// 'SYMBOL2.ySYMBOL3.z')
If I do that, doesn't the comma become part of the PARM string, which
I don't want?
Thanks,
gil
--
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: JCL Symbol Not Substituted
On Mon, 2 Jun 2008 10:17:10 -0700, Edward Jaffe wrote:
I think you're supposed to code something like:
//*.+|+|+|+|+|+|+|..
//STEP1EXEC PGM=IEFBR14,
// PARM=('SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.x', +
// 'SYMBOL2.ySYMBOL3.z')
If I do that, doesn't the comma become part of the PARM string, which
I don't want?
Thanks,
gil
--
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: JCL Symbol Not Substituted
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Edward Jaffe
Paul [EMAIL PROTECTED] wrote:
//*.+|+|+|+|+|+|..
..+|..
//STEP1EXEC PGM=IEFBR14,
//
PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYM+
// BOL2.ySYMBOL3.z'
I think you're supposed to code something like:
//*.+|+|+|+|+|+|..
..+|..
//STEP1EXEC PGM=IEFBR14,
//
PARM=('SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.x', +
// 'SYMBOL2.ySYMBOL3.z')
I think Paul's intent was to not have the comma post-substitution:
5 //STEP1EXEC PGM=IEFBR14,
// PARM=('SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.X',
+
// 'SYMBOL2.YSYMBOL3.Z')
IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM=('AX','BYCZ')
-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: Set REXX variables before REXX start
Could it be that you need to call IRXINIT to initialize a REXX environment first? From the REXX book: IKJCT441 can be used in the TSO/E address space only. You can use IKJCT441 to access REXX or CLIST variables depending on whether the program that calls IKJCT441 was called by a REXX exec or a CLIST. Basically you need a REXX environment first before calling IKJCT441. George Fogg -- 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: JCL Symbol Not Substituted
John P. Baker wrote: Yes, it does. Please refer to SA22-7597-11 z/OS V1R9.0 MVS JCL Reference, page 16-22. Examples 3 and 4 demonstrate clearly that a comma (,) will be inserted between the parameters. You're right. For some reason I remembered incorrectly that those extra commas were eaten by the system and not surfaced to the application. But, I guess not. :-( That leaves only something like this as a solution: // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C // SET SYM1X5=SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1. //*.+|+|+|+|+|+|+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYM1X5.xSYMBOL2.ySYMBOL3.z' -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 [EMAIL PROTECTED] http://www.phoenixsoftware.com/ -- 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
Scrolling an ISPF table display
How do I define a panel, and update the correct variables, to give the table display the ability to scroll using the cursor? The ISPF manual states the 2nd variable on a display panel, if it is exactly 4 characters long and is an input variable, is assumed to be the scroll amount field. When the input variable is set to CSR, am I supposed to set either ZSCROLLD or ZSCROLLN? What mechanism do I use to get ISPF to honor the request...move the cursor to a row in the table, hit the down key(defined as PF8), and have the next display positioned with the row at the top of the display? --Dave Day(non-functional ISPF coder/user) -- 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: Set REXX variables before REXX start
I think this is what the OP wants: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4B480/6.2. 6.3 quote Exec initialization exit This exit is called by the IRXEXEC routine or a compiler runtime processor. Use the exit to update and access REXX variables. The exit gets control after the REXX variable pool has been initialized for an exec, but before the first clause in the exec is processed. Specify the exit's name in the EXECINIT field in the module name table. /quote http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ikj4b480/6.2. 4 -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing 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
Re: American Airlines
I seem to recall something called the Limited Lock Facility (LLF), which provided some specialized CCW support in the controller. Was it developed for use in situation such as that described here? John P. Baker -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Anne Lynn Wheeler Sent: Monday, June 02, 2008 2:18 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Ameican Airlines Eric Chevalier wrote: However, we were using 2314s attached to these boxes, and I believe there _was_ a hardware RPQ on the drives. Called something like Airlines Control Buffer, I _think_ the feature allowed the drive to disconnect from the channel while doing a seek. Whatever the details, it was something that became standard on later mainframe drives from IBM. http://www.garlic.com/~lynn/2008i.html#19 American Airlines http://www.garlic.com/~lynn/2008i.html#34 American Airlines http://www.garlic.com/~lynn/2008i.html#36 American Airlines http://www.garlic.com/~lynn/2008i.html#37 American Airlines w/o the ACP RQP, loosely-coupled operation required reserve/release commands ... which reserved the whole device for the duration of the i/o operation. Actually reserve could be issued and possibly multiple operations performed before issuing the release (traditional loosely- coupled opeation ... locking out all other processors/channels in the complex). since it was logical name locks, there was significant latitude it choosing lock names ... could be very low level like record name ... i.e. cchhr or something higher level like PNR. note that while ACP/TPF did a lot of work on loosely-coupled, it took them quite awhile to getting around to doing tightly-coupled multiprocessor support. The result was quite a bit of consternation in the 3081 timeframe ... which originally wasn't going to have a single processor offering. One of the side-effects was that there were a whole bunch of changes that went into vm370 for enhancing TPF thruput in a 3081 environment ... changes that tended to degrade thruput for all the non-TPF customers. Eventually, there was enough pressure, that a 3083 (single processor) was offered ... primarily for ACP/TPF customers. There was another technique for loosely-coupled operation ... originally developed for HONE (avoiding the performance impact of reserce/release but w/o the airlines controller RPQ). HONE was the world-wide, online (vm370-based) sales marketing support system. http://www.garlic.com/~lynn/subtopic.html#hone The technique was basically a special CCW sequence that leveraged CKD search commands to simulate the semantics of the mainframe compareswap instruction (but for DASD i/o operation). The US HONE datacenter provided possibly the largest singie system image at the time (combination of multple loosely-coupled, tightly-coupled processor complex) with load-balancing and fall-over across the complex. Later this was extended to geographic distance with replicated center in Dallas and then a 3rd in Boulder. There was then talks with the JES2 multi-access spool people about them using the same CCW technique in their loosely-coupled operation. -- 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: DSS can't backup to tape drive
When did this start to occur? My guess would be the 0F13 abend code that is documented on the ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 A SF13 might be a missing SVC. Lizette : Re: DSS can't backup to tape drive My system runs 2.10. I use DSS frequently and have never seen this problem. Can you provide JCL and control cards? Have you installed any exits? Was your maintenance up to date before 2.10 went out of support? Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F ---TIMINGS (MINS.)-- PAGING COUNTS--- -JOBNAME STEPNAME PROCSTEPRC EXCP CONNTCBSRB CLOCK SERV PG PAGE SWAP VIO SWAPS -BK1FILE BACKUP 16403357.00.00 .4 292 0 0 0 0 0 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? -- 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: DSS can't backup to tape drive
The abend code indicates an SVC abend. The F indicates a user SVC, the 13 indicates SVC 13, if I remember correctly. That doesn't make sense though because 13 is the ABTERM routine called when a program abends. Eric Bielefeld Sr. z/OS Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Schwarz, Barry A [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Monday, June 02, 2008 1:28 PM Subject: Re: DSS can't backup to tape drive My system runs 2.10. I use DSS frequently and have never seen this problem. Can you provide JCL and control cards? Have you installed any exits? Was your maintenance up to date before 2.10 went out of support? -Original Message- From: Victor Zhang [mailto:snip] Sent: Monday, June 02, 2008 11:13 AM To: IBM-MAIN@BAMA.UA.EDU Subject: DSS can't backup to tape drive Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F ---TIMINGS (MINS.)-- PAGING COUNTS--- -JOBNAME STEPNAME PROCSTEPRC EXCP CONNTCBSRB CLOCK SERV PG PAGE SWAP VIO SWAPS -BK1FILE BACKUP 16403357.00.00 .4 292 0 0 0 0 0 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? -- 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: Release 6.1 of IBMLink
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Mark Zelden Sent: Monday, June 02, 2008 10:44 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Release 6.1 of IBMLink Let's hope the authentication problems are a thing of the past. From the IBMLink main page: SNIP Anyone else updated an ETR and have no acknowledgement timestamp after 30 minutes or so? After this note, which I just read about 5 minutes ago, I thought I'd look at an ETR I had updated first thing this morning (for me in TX). It still did not show that the system had handled it (generally there will be a received time stamp). So I posted a follow up noting this was a test of the system... And FINALLY there is a time stamp. Also, for ETRs, anyone notice that the update/reply page that you get is missing anything (certain things you could select or not)? Regards, Steve Thompson -- All opinions expressed by me are my own and may not necessarily reflect those of my employer. -- -- 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: Ameican Airlines
Eric Chevalier wrote: However, we were using 2314s attached to these boxes, and I believe there _was_ a hardware RPQ on the drives. Called something like Airlines Control Buffer, I _think_ the feature allowed the drive to disconnect from the channel while doing a seek. Whatever the details, it was something that became standard on later mainframe drives from IBM. http://www.garlic.com/~lynn/2008i.html#19 American Airlines http://www.garlic.com/~lynn/2008i.html#34 American Airlines http://www.garlic.com/~lynn/2008i.html#36 American Airlines http://www.garlic.com/~lynn/2008i.html#37 American Airlines w/o the ACP RQP, loosely-coupled operation required reserve/release commands ... which reserved the whole device for the duration of the i/o operation. Actually reserve could be issued and possibly multiple operations performed before issuing the release (traditional loosely- coupled opeation ... locking out all other processors/channels in the complex). since it was logical name locks, there was significant latitude it choosing lock names ... could be very low level like record name ... i.e. cchhr or something higher level like PNR. note that while ACP/TPF did a lot of work on loosely-coupled, it took them quite awhile to getting around to doing tightly-coupled multiprocessor support. The result was quite a bit of consternation in the 3081 timeframe ... which originally wasn't going to have a single processor offering. One of the side-effects was that there were a whole bunch of changes that went into vm370 for enhancing TPF thruput in a 3081 environment ... changes that tended to degrade thruput for all the non-TPF customers. Eventually, there was enough pressure, that a 3083 (single processor) was offered ... primarily for ACP/TPF customers. There was another technique for loosely-coupled operation ... originally developed for HONE (avoiding the performance impact of reserce/release but w/o the airlines controller RPQ). HONE was the world-wide, online (vm370-based) sales marketing support system. http://www.garlic.com/~lynn/subtopic.html#hone The technique was basically a special CCW sequence that leveraged CKD search commands to simulate the semantics of the mainframe compareswap instruction (but for DASD i/o operation). The US HONE datacenter provided possibly the largest singie system image at the time (combination of multple loosely-coupled, tightly-coupled processor complex) with load-balancing and fall-over across the complex. Later this was extended to geographic distance with replicated center in Dallas and then a 3rd in Boulder. There was then talks with the JES2 multi-access spool people about them using the same CCW technique in their loosely-coupled operation. -- 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
DSS can't backup to tape drive
Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F ---TIMINGS (MINS.)-- PAGING COUNTS--- -JOBNAME STEPNAME PROCSTEPRC EXCP CONNTCBSRB CLOCK SERV PG PAGE SWAP VIO SWAPS -BK1FILE BACKUP 16403357.00.00 .4292 0 0 0 0 0 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? Regards Victor -- 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: DSS can't backup to tape drive
My system runs 2.10. I use DSS frequently and have never seen this problem. Can you provide JCL and control cards? Have you installed any exits? Was your maintenance up to date before 2.10 went out of support? -Original Message- From: Victor Zhang [mailto:snip] Sent: Monday, June 02, 2008 11:13 AM To: IBM-MAIN@BAMA.UA.EDU Subject: DSS can't backup to tape drive Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F ---TIMINGS (MINS.)-- PAGING COUNTS--- -JOBNAME STEPNAME PROCSTEPRC EXCP CONNTCBSRB CLOCK SERV PG PAGE SWAP VIO SWAPS -BK1FILE BACKUP 16403357.00.00 .4 292 0 0 0 0 0 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? -- 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: JCL Symbol Not Substituted
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Edward Jaffe John P. Baker wrote: Yes, it does. Please refer to SA22-7597-11 z/OS V1R9.0 MVS JCL Reference, page 16-22. Examples 3 and 4 demonstrate clearly that a comma (,) will be inserted between the parameters. You're right. For some reason I remembered incorrectly that those extra commas were eaten by the system and not surfaced to the application. But, I guess not. :-( That leaves only something like this as a solution: // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C // SET SYM1X5=SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1. //*.+|+|+|+|+|+|.. ..+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYM1X5.xSYMBOL2.ySYMBOL3.z' But recalling that the PARM keyword does not need to start in column 16 (only the continuation line needs to), this works on 1.9: // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.XSYMBOL2+ // YSYMBOL3.Z' IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AXBYCZ' Case doesn't matter, either: //STEP1EXEC PGM=IEFBR14, // PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.xSYMBOL2+ // ySYMBOL3.z' IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AxByCz' -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: DSS can't backup to tape drive
snip IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F snip abend 0F13 is an open error and like the message indicates, it's invalid parm passed. Book says R12 has internal abend code'. With that you could do a database search and see what's the cause. I would image that getting maintenance for 2.10 may be difficult though. Jack Kelly 202-502-2390 (Office) -- 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: Release 6.1 of IBMLink
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Thompson, Steve SNIP Anyone else updated an ETR and have no acknowledgement timestamp after 30 minutes or so? No; it worked as before for me at 11:21 CDT. Submitted my update, selected List ETR Records- Mine - Record No., and my update was present with 11:21 as the timestamp. After this note, which I just read about 5 minutes ago, I thought I'd look at an ETR I had updated first thing this morning (for me in TX). It still did not show that the system had handled it (generally there will be a received time stamp). So I posted a follow up noting this was a test of the system... And FINALLY there is a time stamp. Also, for ETRs, anyone notice that the update/reply page that you get is missing anything (certain things you could select or not)? Didn't notice anything different, but then I didn't look for anything specific. -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: JCL Symbol Not Substituted
Although spacing out the statement as suggested will give the desired results, such an approach is probably not the best resolution. Future changes, particularly if performed by someone other than the individual who discovered the original problem are likely to reintroduce the problem. This approach is a maintenance nightmare. The other suggested solution, consisting of using a separate SET statement and an addition symbolic variable, is a much better approach. John P. Baker -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Jim Phoenix Sent: Monday, June 02, 2008 2:54 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: JCL Symbol Not Substituted Paul, Your example happens to fit perfectly like this: //*.+|+|+|+|+|+|+|.. //STEP1EXEC PGM=IEFBR14,PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.+ // SYMBOL1.XSYMBOL2.YSYMBOL3.Z' //*.+|+|+|+|+|+|+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AXBYCZ' Even if this example is synthetic, you can adjust the number of blanks preceding the PGM= to cause the period to land in column 71. -- | Jim Phoenix | Voice: (310) 338-0400 x316 | | Senior Software Developer| Fax: (310) 338-0801| | Phoenix Software International | Alt fax: (310) 337-2685| | 5200 W. Century Blvd., Suite 800 | [EMAIL PROTECTED] | | Los Angeles, CA 90045| http://www.phoenixsoftware.com | Opinions expressed by this individual are not necessarily those of the Company. -- 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: JCL Symbol Not Substituted
Paul, Your example happens to fit perfectly like this: //*.+|+|+|+|+|+|+|.. //STEP1EXEC PGM=IEFBR14,PARM='SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.+ // SYMBOL1.XSYMBOL2.YSYMBOL3.Z' //*.+|+|+|+|+|+|+|.. IEFC653I SUBSTITUTION JCL - PGM=IEFBR14,PARM='AXBYCZ' Even if this example is synthetic, you can adjust the number of blanks preceding the PGM= to cause the period to land in column 71. -- | Jim Phoenix | Voice: (310) 338-0400 x316 | | Senior Software Developer| Fax: (310) 338-0801| | Phoenix Software International | Alt fax: (310) 337-2685| | 5200 W. Century Blvd., Suite 800 | [EMAIL PROTECTED] | | Los Angeles, CA 90045| http://www.phoenixsoftware.com | Opinions expressed by this individual are not necessarily those of the Company. -- 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 Generic VS Cross Domain
On Mon, 2 Jun 2008 11:57:14 -0500, Chris Mason [EMAIL PROTECTED] wrote: Pat I'm reluctant to be dogmatic about there being no connection between generic resources and USS. ... ...That said, I can't see how generic resources and USS can interfere with one another given that the USS process needs to be complete, that is, the owning VTAM needs to have created a formatted request from the unformatted request. The formatted request leads to a CDINIT being sent off and arriving at one of the members of the generic resource group before the CDTERM is returned with the selected member name for use in the final and - one hopes - successful CDINIT being sent to the selected member. ... And I'm reluctant to trust anything I know about POLUIO. Some time in the distant past (maybe 15-20 years ago) we had some gear that regularly gave us this status, but I can't remember any details. It was brand-x gear (HP, maybe?). The LU's code providing status information (NOTIFY, LUSTAT, or whatever I'm tryig to remember) and the USS support code were not well coordinated. It would send READY before it was able to handle a USS message a/d/or stop being able to handle USS messages before it would send NOT READY.The result was a handful of LUs being in POLUIO. My gut feeling is that in Magen's case this is more a result of the various VARYs rather than anything directly related to GR. But I could be very (vary?) wrong. (Every time I see a VARY FORCE I expect to see an out-of-sync condition, but that rarely happens these days.) Pat O'Keefe -- 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: DSS can't backup to tape drive
Wouldn't a F13 abend indicate that the '13' is HEX, so this is actually SVC 19 (OPEN)? This would make a LOT more sense... C. Todd Burrell Lead z/OS Systems Programmer ITSO (404) 723-2017 (Cell) -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Eric Bielefeld Sent: Monday, June 02, 2008 2:37 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: DSS can't backup to tape drive The abend code indicates an SVC abend. The F indicates a user SVC, the 13 indicates SVC 13, if I remember correctly. That doesn't make sense though because 13 is the ABTERM routine called when a program abends. Eric Bielefeld Sr. z/OS Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Schwarz, Barry A [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Monday, June 02, 2008 1:28 PM Subject: Re: DSS can't backup to tape drive My system runs 2.10. I use DSS frequently and have never seen this problem. Can you provide JCL and control cards? Have you installed any exits? Was your maintenance up to date before 2.10 went out of support? -Original Message- From: Victor Zhang [mailto:snip] Sent: Monday, June 02, 2008 11:13 AM To: IBM-MAIN@BAMA.UA.EDU Subject: DSS can't backup to tape drive Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F ---TIMINGS (MINS.)-- PAGING COUNTS--- -JOBNAME STEPNAME PROCSTEPRC EXCP CONNTCBSRB CLOCK SERV PG PAGE SWAP VIO SWAPS -BK1FILE BACKUP 16403357.00.00 .4 292 0 0 0 0 0 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? -- 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 -- 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: JCL Symbol Not Substituted
On Mon, 2 Jun 2008 11:04:35 -0700, Edward Jaffe [EMAIL PROTECTED] wrote: ... Please refer to SA22-7597-11 z/OS V1R9.0 MVS JCL Reference, page 16-22. Examples 3 and 4 demonstrate clearly that a comma (,) will be inserted between the parameters. ... I've spent little time in the 1.9 manuals since we are still on 1.8, but if clearly applies to anything relating to parm continuation then a miracle has happened in 1.9. You're right. For some reason I remembered incorrectly that those extra commas were eaten by the system and not surfaced to the application. But, I guess not. :-( ... Not correctly remembering these intuitively obvious rules? For shame! (I don't really have to insert an emoticon there, do I?) Pat O'Keefe -- 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: DSS can't backup to tape drive
Yes, in this case, F13 is for OPEN, and SVC x'13' is one of the four exceptions to the incorrect (usually, missing) user SVC rule. System Codes sez: Fnn Explanation: The system detected an error while processing a Supervisor Call (SVC) instruction. The last 2 digits of this completion code, nn, are the operand of the SVC instruction in hexadecimal. For example, completion code X'F0D' means that the error occurred while the system was processing SVC X'0D', that is, SVC 13. One of the following occurred: * When nn is equal to 13, 14, 17, or 37, recovery for OPEN/CLOSE/EOV failed to recognize a passed internal abend code. Register 12 contains the passed internal abend code. This is probably a system error. If the ABEND is accompanied by message IEC900I, the code was issued by DFSMSdfp and the code explanations are provided in this section . If the ABEND is accompanied by error messages starting with message prefix EDG, the code was issued by DFSMSrmm(TM). See z/OS DFSMSrmm Implementation and Customization Guide for explanations of the codes when they are issued by DFSMSrmm. * When nn is not equal to 13, 14, 17, or 37, the system detected an incorrect SVC instruction. System Action: Depending on the value of nn, the system does the following: * When nn is equal to 13, 14, 17, or 37, the system records the unrecognized internal abend code in register 12. It issues message IEC900I. * When nn is not equal to 13, 14, 17, or 37, the system records in register 2 the address of the request block prefix for the program that issued the incorrect SVC. (There's more in the book.) Burrell, C. Todd , CDC/OCOO/ITSO, CTR wrote: Wouldn't a F13 abend indicate that the '13' is HEX, so this is actually SVC 19 (OPEN)? This would make a LOT more sense... C. Todd Burrell Lead z/OS Systems Programmer ITSO (404) 723-2017 (Cell) -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Eric Bielefeld Sent: Monday, June 02, 2008 2:37 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: DSS can't backup to tape drive The abend code indicates an SVC abend. The F indicates a user SVC, the 13 indicates SVC 13, if I remember correctly. That doesn't make sense though because 13 is the ABTERM routine called when a program abends. Eric Bielefeld Sr. z/OS Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Schwarz, Barry A [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Monday, June 02, 2008 1:28 PM Subject: Re: DSS can't backup to tape drive My system runs 2.10. I use DSS frequently and have never seen this problem. Can you provide JCL and control cards? Have you installed any exits? Was your maintenance up to date before 2.10 went out of support? -Original Message- From: Victor Zhang [mailto:snip] Sent: Monday, June 02, 2008 11:13 AM To: IBM-MAIN@BAMA.UA.EDU Subject: DSS can't backup to tape drive Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F snip 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? snip -- John Eells z/OS Technical Marketing IBM Poughkeepsie [EMAIL PROTECTED] -- 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: Scrolling an ISPF table display
David Day wrote: How do I define a panel, and update the correct variables, to give the table display the ability to scroll using the cursor? The ISPF manual states the 2nd variable on a display panel, if it is exactly 4 characters long and is an input variable, is assumed to be the scroll amount field. When the input variable is set to CSR, am I supposed to set either ZSCROLLD or ZSCROLLN? What mechanism do I use to get ISPF to honor the request...move the cursor to a row in the table, hit the down key(defined as PF8), and have the next display positioned with the row at the top of the display? --Dave Day(non-functional ISPF coder/user) If you just want scrolling, it is automatic. The parts you have to have in place: * Your panel definition must have a )MODEL section * You need to have an )ATTR section if you wish to have output (display) fields, which you probably do * Your panel definition must have a )BODY section and you must have a command input field; a scroll amount field is optional * You must display the panel using TBDISPL You can control scrolling somewhat, if you want, by setting .CSRROW in your panel processing logic, but it is more user friendly to allow the user to control the scrolling and positioning. ad We offer a powerful five-day class, Developing Dialog Manager Applications in z/OS, that is a thorough introduction to using dialog manager services, with REXX or CLIST as your driving language. For details, check out: http://www.trainersfriend.com/TSO_Clist_REXX_Dialog_Mgr/a810descrpt.htm /ad Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques == Check out the Trainer's Friend Store to purchase z/OS == == application developer toolkits. Sample code in four== == programming languages, JCL to Assemble or compile, == == bind and test. == == http://www.trainersfriend.com/TTFStore/index.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: JCL Symbol Not Substituted
I said that examples 3 and 4 demonstrate clearly. Finding the rules spelled out in the text is another story. One would think that after more than 40 years we could expect clear and concise documentation, but sadly, that is still not the case. Actually, documentation does not appear to contain anything clearly spelling out the rules insofar as symbolic substitutions and continuations are concerned. :-( John P. Baker -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Patrick O'Keefe Sent: Monday, June 02, 2008 4:12 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: JCL Symbol Not Substituted On Mon, 2 Jun 2008 11:04:35 -0700, Edward Jaffe [EMAIL PROTECTED] wrote: ... Please refer to SA22-7597-11 z/OS V1R9.0 MVS JCL Reference, page 16-22. Examples 3 and 4 demonstrate clearly that a comma (,) will be inserted between the parameters. ... I've spent little time in the 1.9 manuals since we are still on 1.8, but if clearly applies to anything relating to parm continuation then a miracle has happened in 1.9. You're right. For some reason I remembered incorrectly that those extra commas were eaten by the system and not surfaced to the application. But, I guess not. :-( ... Not correctly remembering these intuitively obvious rules? For shame! (I don't really have to insert an emoticon there, do I?) Pat O'Keefe -- 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: DSS can't backup to tape drive
Here is a blurb from the book. INVALID ABEND CODE PASSED TO MODULE mod Explanation: The module is an OPEN/CLOSE/EOV problem determination routine. It did not recognize the passed abnormal end code, so it issued an Fxx abnormal end code where xx is one of the following: 13 for OPEN 14 for CLOSE 17 for CLOSE TYPE=T 37 for EOV. This might be an error in system logic, possibly caused by an incorrect combination of PTFs. I would look for other messages. RACF or Tape Management messages. George Burrell, C. Todd , CDC/OCOO/ITSO, CTR wrote: Wouldn't a F13 abend indicate that the '13' is HEX, so this is actually SVC 19 (OPEN)? This would make a LOT more sense... C. Todd Burrell Lead z/OS Systems Programmer ITSO (404) 723-2017 (Cell) -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Eric Bielefeld Sent: Monday, June 02, 2008 2:37 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: DSS can't backup to tape drive The abend code indicates an SVC abend. The F indicates a user SVC, the 13 indicates SVC 13, if I remember correctly. That doesn't make sense though because 13 is the ABTERM routine called when a program abends. Eric Bielefeld Sr. z/OS Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Schwarz, Barry A [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Monday, June 02, 2008 1:28 PM Subject: Re: DSS can't backup to tape drive My system runs 2.10. I use DSS frequently and have never seen this problem. Can you provide JCL and control cards? Have you installed any exits? Was your maintenance up to date before 2.10 went out of support? -Original Message- From: Victor Zhang [mailto:snip] Sent: Monday, June 02, 2008 11:13 AM To: IBM-MAIN@BAMA.UA.EDU Subject: DSS can't backup to tape drive Hi, This is an old OS/390 2.10, and when DSS runs it will return following error messages: *IEC501A M 7010,PRIVAT,SL,COMP,BK1FILE,BACKUP,STK.TESTBK1.D0806021 IEC502E K 7010,A00703,SL,BK1FILE,BACKUP IEC900I INVALID ABEND CODE PASSED TO IFG0190P FROM IFG0194F snip 0ADR006I (001)-STEND(01), 2008.154 12:01:23 EXECUTION BEGINS 0ADR049E (001)-STEND(01), 2008.154 12:01:48 DFSMSDSS FUNCTION TASK ABEND RECOVERY ROUTINE WAS ENTERED. SYSTEM ABEND CODE=0F13 0ADR415W (001)-DTDSC(04), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY VOLUME 0ADR006I (001)-STEND(02), 2008.154 12:01:48 EXECUTION ENDS Anyone knows if there is any PTFs addressing the problem? snip -- John Eells z/OS Technical Marketing IBM Poughkeepsie [EMAIL PROTECTED] -- 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
SMP/E Error
Anybody seen this before? We're simply trying to do a RECEIVE FROMNETWORK. We've done it successfully numerous times in the last year: GIM69208S ** RECEIVE PROCESSING HAS FAILED BECAUSE THE LEVEL OF PROGRAM GIMJVCLT (34.09) IS NOT COMPATIBLE WITH THE LEVEL OF THE SMP/E CALLING PROGRAM GIMSMP (34.13). GIMVCLT is in the following path: /usr/lpp/smp/classes/com/ibm/smp/ -- 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: SMP/E Error
We got it when steplibing for newer linklib but using older uss mounts (converting from z/os 1.7 to 1.9) SMP wants both at the same level. *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* Mike Wickman Technical Services *-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Miller, Pat Sent: Monday, June 02, 2008 3:39 PM To: IBM-MAIN@BAMA.UA.EDU Subject: [IBM-MAIN] SMP/E Error Anybody seen this before? We're simply trying to do a RECEIVE FROMNETWORK. We've done it successfully numerous times in the last year: GIM69208S ** RECEIVE PROCESSING HAS FAILED BECAUSE THE LEVEL OF PROGRAM GIMJVCLT (34.09) IS NOT COMPATIBLE WITH THE LEVEL OF THE SMP/E CALLING PROGRAM GIMSMP (34.13). GIMVCLT is in the following path: /usr/lpp/smp/classes/com/ibm/smp/ -- 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 font size=1 div style='border:none;border-bottom:double windowtext 2.25pt;padding:0in 0in 1.0pt 0in' /div This email is intended to be reviewed by only the intended recipient and may contain information that is privileged and/or confidential. If you are not the intended recipient, you are hereby notified that any review, use, dissemination, disclosure or copying of this email and its attachments, if any, is strictly prohibited. If you have received this email in error, please immediately notify the sender by return email and delete this email from your system. /font -- 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: SMP/E Error
On Mon, 2 Jun 2008 15:39:04 -0500, Miller, Pat [EMAIL PROTECTED] wrote: Anybody seen this before? We're simply trying to do a RECEIVE FROMNETWORK. We've done it successfully numerous times in the last year: GIM69208S ** RECEIVE PROCESSING HAS FAILED BECAUSE THE LEVEL OF PROGRAM GIMJVCLT (34.09) IS NOT COMPATIBLE WITH THE LEVEL OF THE SMP/E CALLING PROGRAM GIMSMP (34.13). GIMVCLT is in the following path: /usr/lpp/smp/classes/com/ibm/smp/ Are you STEPLIBing to a higher level of SMP/E then the running system? Or did you not clone your UNIX root file the last time you applied maintenance along with your sysres? If you know where the proper level is, you can mount it at /service (or whatever your service directory name is) and specify the path name in the SMPCPATH DD or CLIENT parms: //CLNTINFO DD * CLIENT classpath=/service/usr/lpp/smp/classes/ /CLIENT /* -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:[EMAIL PROTECTED] z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ 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
Replace old BSC 3 connections
This question was cross posted into OS/390, VSE and zVM discussion lists Hello Today we have an IBM MP3000 with 04 WAC cards, 03 of them running BSC3 and on running a back-to-back vtam connection. We have a bid to replace this machine by a new z9 and get some software advantages. Today we have no problems with CPU or memory bottlenecks. Ou problem is limited to substitute access from WAC cards, so we can keep BSC3 lines sending data to application program. Simple solution could be an IBM 3745 model 170 (smalest) to keep same cenario and migrate from adapter cards to a channel independent machine, even connect thru Escon converter. IBM says no more NCP software licenses are available. What we can use as a substitute for WAC cards now how to connect this solution to z9? Thanks in advance for any comment or hint Carlos Bodra -- 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: DSS can't backup to tape drive
In a message dated 6/2/2008 3:35:25 P.M. Central Daylight Time, [EMAIL PROTECTED] writes: This might be an error in system logic, possibly caused by an incorrect combination of PTFs. I would look for other messages. RACF or Tape Management messages. Something that old probably failing hardware. I'd sure look at EREP and see if anything sticks out. Then I'd try something else to copy to tape and see if you get the same results. I had one back on 3490's that drove us crazy for a couple of weeks. The FDR offsite tapes would abend during Highspeed rewind. Anyway we got the Area specialist in and he flagged it in about 15 minutes. Turns out the little rubber rollers had gotten too hard and were causing tensioning problems. You might also look at system abends produced around this time to see if anything is percolating prior to the OPEN. **Get trade secrets for amazing burgers. Watch Cooking with Tyler Florence on AOL Food. (http://food.aol.com/tyler-florence?video=4?NCID=aolfod000302) -- 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: SMP/E Error
No JOBLIB, no STEPLIB. Appears that the module in the HFS is back leveled for whatever reason. I'm fairly certain we went to the 34.13 level with the z/OS ServerPac (or possibly with the toleration/compatibility maintenance), which means a couple years ago. The job has a DD statement (SMPCPATH) that points to the path. I suspect the problem is that the upgraded module lies on a different path, owing to some maintenance bungle. Now, I just have to find it, assuming it still exists. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Mark Zelden Sent: Monday, June 02, 2008 3:49 PM To: IBM-MAIN@BAMA.UA.EDU Subject:Re: SMP/E Error On Mon, 2 Jun 2008 15:39:04 -0500, Miller, Pat [EMAIL PROTECTED] wrote: Anybody seen this before? We're simply trying to do a RECEIVE FROMNETWORK. We've done it successfully numerous times in the last year: GIM69208S ** RECEIVE PROCESSING HAS FAILED BECAUSE THE LEVEL OF PROGRAM GIMJVCLT (34.09) IS NOT COMPATIBLE WITH THE LEVEL OF THE SMP/E CALLING PROGRAM GIMSMP (34.13). GIMVCLT is in the following path: /usr/lpp/smp/classes/com/ibm/smp/ Are you STEPLIBing to a higher level of SMP/E then the running system? Or did you not clone your UNIX root file the last time you applied maintenance along with your sysres? If you know where the proper level is, you can mount it at /service (or whatever your service directory name is) and specify the path name in the SMPCPATH DD or CLIENT parms: //CLNTINFO DD * CLIENT classpath=/service/usr/lpp/smp/classes/ /CLIENT /* -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:[EMAIL PROTECTED] z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ 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 -- 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: SMP/E Error
However, my error was due to teh JOBLIB being the new SMPE maint but my steplib was pointing to the SCEERUN2 data set. There was nothing that hit the SCEERUN2 data set with my GIMUNZIP maint. But once I moved SCEERUN2 from the STEPLIB to my JOBLIB (no steplibs at all) everything ran good. Lizette We got it when steplibing for newer linklib but using older uss mounts (converting from z/os 1.7 to 1.9) SMP wants both at the same level. -- 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: SMP/E Error
I just got this error on my receive. Check to see if you have a JOBLIB and STEPLIB in the JCL. If so, more the STEPLIB to the JOBLIB. The other thing that got me was some maintanence that went in on GIMUNZIP. I had to move some JAVE USS entries to the production JAVA USS Paths. But I forgot (did not have time) to move my maintanence into the production libraries. Also check that your paths you will be using are mounted. Lizette Anybody seen this before? We're simply trying to do a RECEIVE FROMNETWORK. We've done it successfully numerous times in the last year: GIM69208S ** RECEIVE PROCESSING HAS FAILED BECAUSE THE LEVEL OF PROGRAM GIMJVCLT (34.09) IS NOT COMPATIBLE WITH THE LEVEL OF THE SMP/E CALLING PROGRAM GIMSMP (34.13). GIMVCLT is in the following path: /usr/lpp/smp/classes/com/ibm/smp/ -- 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: American Airlines
2008/6/2 Eric Chevalier [EMAIL PROTECTED]: However, we were using 2314s attached to these boxes, and I believe there _was_ a hardware RPQ on the drives. Called something like Airlines Control Buffer, I _think_ the feature allowed the drive to disconnect from the channel while doing a seek. Whatever the details, it was something that became standard on later mainframe drives from IBM. I never saw one, but I do remember coming across the description. I remember it a bit differently; I understood it was a feature (RPQ) on the controller that allowed the search (not seek) to be offloaded to the controller, so as not to tie up the (selector) channel during the Search/TIC loop. I suppose this sounds like a precursor to RPS on the 3330, but RPS doesn't search the actual records; it disconnects from the (BMX) channel until a previously set sector is about to come around under the head, and then attempts to reconnect so the channel can do the Search/TIC loop with minimal delay. But as you said: OK, it's been almost thirty years, so my memory may be a bit hazy... Tony H. -- 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: American Airlines
John P. Baker wrote: I seem to recall something called the Limited Lock Facility (LLF), which provided some specialized CCW support in the controller. Was it developed for use in situation such as that described here? re: http://www.garlic.com/~lynn/2008i.html#19 American Airlines http://www.garlic.com/~lynn/2008i.html#34 American Airlines http://www.garlic.com/~lynn/2008i.html#36 American Airlines http://www.garlic.com/~lynn/2008i.html#37 American Airlines http://www.garlic.com/~lynn/2008i.html#38 American Airlines note by comparison, reserve will be a CCW that locks the whole device ... which typically will be followed by some sort of seek/search/read. That ends and the processor then operates/updates the data read and then writes it back ... finally releasing the device. The other approach mentioned ... developed at HONE was simulation of multiprocessor compareswap instruction ... using search key data equal ... the data is read (w/o lock or reserve), a copy is made and the update is applied. then a channel program with search keydata equal ... using the original read image chained to write of the updated data. the following from long ago and far away ... Subject: DASD sharing in ACP using the RPQ Date: March 25, 1980 On Monday I bumped into . They were both interested in shared DASD for availability and load sharing. I mentioned the ACP RPQ which puts a lock manager in the microcode for the disk controller. They were real interested in that and so I began telephoning. My first contact was x of GPD San Jose who wrote the microcode (nnn-). He explained that the RPQ has a low profile because it is not part of the IBM strategy and is inconsistent with things like string switching. The basic idea is that Lock commands have been added to the controller's repertoire of commands. One issues LOCK READ CCW pair and later issues WRITE UNLOCK CCW pair. If the lock fails the read fails and the CPU will poll for the lock later. xxx has documented all this in the technical report TR 02.859 Limitied Lock Facility in a DASD Control Unit x, x, x (Oct. 1979). xxx pointed me to xxx x at the IBM Tulsa branch office (nnn-). wrote the channel programs in ACP which use the RPQ. He said they lock at the record level, and that it works nicely. We also discussed restart. He said that the code to reconfigure after CPU or controller failure was not hard. For duplexed files they lock the primary if available, if not they lock the secondary. ACP allows only one lock at a time and most writes are not undone or redone at restart (most records are not critical). xxx said that their bigist problem was with on-line utilities. One which moves a volume from pack to pack added 50% to their total effort! xxx in turn pointed me to two of the architects. xx at White Plains DPD (nnn-) knows all about ACP and promised to send me the documentation on the changes to ACP. He said the changes are now being integrated into the standard ACP system. He observed that there is little degradation with the RPQ and prefers it to the MP approach. He mentioned that there are about 65 ACP customers and over 100 ACP systems. x is also at White Plains (nnn-). He told me lots of numbers (I love numbers). He described a 120 transaction/second system. The database is spread over about 100 spindles. Each transaction does 10 I/O. 10% of such I/O involve a lock or unlock command. The average hold time of a lock is 100 ms. 1.7 lock requests wait per second. That implies that 14% of transactions wait for a lock. This is similar to the System R number that 10% of transactions wait. ACP has deadlock avoidance (only hold one lock at a time). There are 60 lock requests per seconds (and 60 unlocks) and so there are about 6 locks set at any instant. This is not a heavy load on the lock managers (a controller is likely to have no locks set.) ... 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
IBM PR: PCI Security Compliance Workshop in Maryland
On June 18 and 19, 2008, IBM will be offering a security-related workshop entitled PCI Security Compliance with z/OS Communications Server and System z. This two day workshop includes both lectures and hands-on lab exercises, and you will receive written course materials to take home for reference and further study. There's been a lot of discussion here about meeting PCI (Payment Card Industry) security standards. (It's a common challenge many of you are facing.) If you play a role in helping your company meet those standards, then this workshop would be an excellent learning opportunity. (The workshop is also open to IBM partners.) There is no tuition fee for this workshop, although you will need to fund your own travel expenses. Day 2 ends at 3:00 p.m. so that many of you will be able to catch late afternoon/early evening flights back home. You should have some working familiarity with Communications Server for z/OS and the z/OS Security Server (RACF) as a prerequisite. The workshop covers a lot of details about how PCI standards map to System z capabilities, implementing and managing X.509 certificates, implementing and managing security policies, etc. The workshop is at the IBM Washington Systems Center in Gaithersburg, Maryland. For more information or to reserve a seat, please e-mail Gwen Dente ([EMAIL PROTECTED]) and use the subject line Security Workshop June. Please include at least your name, title, organization, and contact details (e-mail and telephone). There are a few more seats available as I write this, which is why I'm sending this notice out to the list (and also because it's a hot discussion topic). Please e-mail Gwen no later than June 9. If you are located elsewhere in the world (such as Europe or Asia), and you are interested in such a workshop in your part of the world, please let Gwen know of your interest. - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Specializing in Software Architectures Related to System z Based in Tokyo, Serving IBM Japan and IBM Asia-Pacific E-Mail: [EMAIL PROTECTED] -- 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: IBM PR: PCI Security Compliance Workshop in Maryland
I'm confused. Is this an advertisement on IBM-MAIN? George Fogg -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Timothy Sipples Sent: Monday, June 02, 2008 5:34 PM To: IBM-MAIN@BAMA.UA.EDU Subject: IBM PR: PCI Security Compliance Workshop in Maryland On June 18 and 19, 2008, IBM will be offering a security-related workshop entitled PCI Security Compliance with z/OS Communications Server and System z. This two day workshop includes both lectures and hands-on lab exercises, and you will receive written course materials to take home for reference and further study. There's been a lot of discussion here about meeting PCI (Payment Card Industry) security standards. (It's a common challenge many of you are facing.) If you play a role in helping your company meet those standards, then this workshop would be an excellent learning opportunity. (The workshop is also open to IBM partners.) There is no tuition fee for this workshop, although you will need to fund your own travel expenses. Day 2 ends at 3:00 p.m. so that many of you will be able to catch late afternoon/early evening flights back home. You should have some working familiarity with Communications Server for z/OS and the z/OS Security Server (RACF) as a prerequisite. The workshop covers a lot of details about how PCI standards map to System z capabilities, implementing and managing X.509 certificates, implementing and managing security policies, etc. The workshop is at the IBM Washington Systems Center in Gaithersburg, Maryland. For more information or to reserve a seat, please e-mail Gwen Dente ([EMAIL PROTECTED]) and use the subject line Security Workshop June. Please include at least your name, title, organization, and contact details (e-mail and telephone). There are a few more seats available as I write this, which is why I'm sending this notice out to the list (and also because it's a hot discussion topic). Please e-mail Gwen no later than June 9. If you are located elsewhere in the world (such as Europe or Asia), and you are interested in such a workshop in your part of the world, please let Gwen know of your interest. - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Specializing in Software Architectures Related to System z Based in Tokyo, Serving IBM Japan and IBM Asia-Pacific E-Mail: [EMAIL PROTECTED] -- 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: American Airlines
In the ESS/2105 book I have, there is an entire chapter on the Multi-Path Lock Facility. There are also some options that can be set in the Define Extent operands that are ACP (now called TPF, the Transaction Processing Facility) specific, such as record caching. These facilities were supported in some earlier control unit generations (e.g., 3990). Bill Fairchild Franklin, TN Disinterested intellectual curiosity is the life blood of real civilization. [G. M. Trevelyan; 1942; English Social History] **Get trade secrets for amazing burgers. Watch Cooking with Tyler Florence on AOL Food. (http://food.aol.com/tyler-florence?video=4?NCID=aolfod000302) -- 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: JCL Symbol Not Substituted
On Mon, 2 Jun 2008 15:12:55 -0400, John P. Baker wrote: Although spacing out the statement as suggested will give the desired results, such an approach is probably not the best resolution. Future changes, particularly if performed by someone other than the individual who discovered the original problem are likely to reintroduce the problem. This approach is a maintenance nightmare. Given that I generate a large part of my JCL from programs rather than from the keyboard (that would be the more complicated part), it becomes not only a maintenance nightmare but a coding nightmare. The other suggested solution, consisting of using a separate SET statement and an addition symbolic variable, is a much better approach. That would appear to be from: On Mon, 2 Jun 2008 11:04:35 -0700, Edward Jaffe wrote: That leaves only something like this as a solution: // SET SYMBOL1=A // SET SYMBOL2=B // SET SYMBOL3=C // SET SYM1X5=SYMBOL1.SYMBOL1.SYMBOL1.SYMBOL1.amp;SYMBOL1. //*.+|+|+|+|+|+|+|.. //STEP1EXEC PGM=IEFBR14, // PARM='SYM1X5.xSYMBOL2.ySYMBOL3.z' Alas, that runs afoul of: Title: z/OS V1R9.0 MVS JCL Reference Document Number: SA22-7597-11 #5.4.2.1 z/OS V1R9.0 MVS JCL Reference IBM Library Server ___ 5.4.2.1 Defining and Nullifying JCL Symbols ... * Do not specify JCL symbols within other JCL symbols. The results can be unpredictable, especially if the imbedded JCL symbol is not previously defined. I know, it appears to work, but is it advisable to employ a construct that's explicitly deprecated by the RM? And if the symbols on the right of the SET are defined to contain blanks, the SET doesn't work. and if the right of the SET is enclosed in apostrophes, the symbols are not substituted (I remember seeing that documented somewhere). Why can't symbols _always_ be substituted, even between apostrophes. Simpler Is Better! And if the continued string is broken within a doubled apostrophe or a doubled ampersand, a similar failure occurs. I haven't found those documented yet. I think I'll wait a while and submit a PMR on the problem with the apostrophe, and yet another while and submit an additional PMR on the problem with the ampersand and yet another while and submit another PMR because DD DATA,DLM=SYMBOL doesn't work, even though the JCL messages report the substitution was performed. I hate JCL! -- gil -- 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: JCL Symbol Not Substituted
I am not certain that that is the case. The manual, as is often the case, is unclear. I interpret it is meaning that the following construct is prohibited: // SET N=1 // SET XN=1024 As illustrated, I suspect that what IBM is saying you cannot do is to create a dynamic variable name. On the other hand, I believe that the following is permitted: // SET B=1024 // SET X1=B Likewise, I believe that more complex structures are also permitted: // SET B1=1024 // SET B2=2048 // SET X1=B1.B2 However, as I stated, the manual is unclear, and I suggest that a PMR requesting clarification is in order, as well as a documentation update giving further examples of what is permitted and what is prohibited. John P. Baker -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin Sent: Monday, June 02, 2008 9:30 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: JCL Symbol Not Substituted Alas, that runs afoul of: Title: z/OS V1R9.0 MVS JCL Reference Document Number: SA22-7597-11 #5.4.2.1 z/OS V1R9.0 MVS JCL Reference IBM Library Server ___ 5.4.2.1 Defining and Nullifying JCL Symbols ... * Do not specify JCL symbols within other JCL symbols. The results can be unpredictable, especially if the imbedded JCL symbol is not previously defined. I know, it appears to work, but is it advisable to employ a construct that's explicitly deprecated by the RM? And if the symbols on the right of the SET are defined to contain blanks, the SET doesn't work. and if the right of the SET is enclosed in apostrophes, the symbols are not substituted (I remember seeing that documented somewhere). Why can't symbols _always_ be substituted, even between apostrophes. Simpler Is Better! And if the continued string is broken within a doubled apostrophe or a doubled ampersand, a similar failure occurs. I haven't found those documented yet. I think I'll wait a while and submit a PMR on the problem with the apostrophe, and yet another while and submit an additional PMR on the problem with the ampersand and yet another while and submit another PMR because DD DATA,DLM=SYMBOL doesn't work, even though the JCL messages report the substitution was performed. I hate JCL! -- gil -- 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
