Re: embarresing request
We do have the inits set. However, on rare occassion, they get messed up when Production Control changes one on the wrong system. And so can WLM scheduling environments get messed up. The WLM scheduling environment idea looks nice. Prevents only jobs having SCHENV= on the job statement from running on the wrong system. Is the single MAS a requirement? -- Peter Hunkeler Credit Suisse -- 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: Migrate with undefined DSORG
Hi I tried with this DATACLASS solution, but a job with a dataset creation and with DCB=*.REF for my surprise took, this dataclass and not the DCB paramters from the REF DD. Ambat Ravi Nair wrote: do something like: WHEN ((DSTYPE NE 'TEMP') AND ((DSORG NE 'PO') OR (DSORG NE 'VS') OR (DSORG NE 'DA'))AND (DSORG EQ '')) DO SET DATACLAS = 'DCPS' EXIT END and DCPS just contains DSORG=PS. - ravi. Jack Kelly wrote: snip Already checked the archives, but didn't find a way to migrate dataset's with DSORG=NONE (In my case this datasets's are not SMS managed ) unsnip Just create a minimal Dclass for all DSN and HSM will be happy. But if they're not opened, HSM will migrate them BUT not back them up, so no expire unless the bit is on! Non SMS has Dclass too 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 -- 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: zOS REXX Problem
There is a great exec called XDELETE from Gilbert Saint-Flour on CBT file 183. It allows you to delete whole groups of files using filters (like ABC*.D%.** and so on). -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Howard Rifkind Sent: 7. elokuuta 2008 0:34 To: IBM-MAIN@BAMA.UA.EDU Subject: Re: zOS REXX Problem Thanks...worked like a charm...couldn't find the dataset...don't know why but the second time around everything worked as it should. -- 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: embarresing request
- Original Message From: McKown, John [EMAIL PROTECTED] So now, we need some way to prevent a job from running on the wrong system. John, we have the same need here, my basic sysplex has three LPARs sharing the JES2 spool. I added the following line in the (shared) JES2PARM: $T INTRDR,S=*/* Jobs run where submitted/converted */ The command is executed at every IPL and remains valid until the next IPL. This way jobs runs on the right system. It works for me. HTH Walter Marguccio z/OS Systems Programmer Munich - Germany __ Not happy with your email address?. Get the one you really want - millions of new email addresses available now at Yahoo! http://uk.docs.yahoo.com/ymail/new.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: embarresing request
I added the following line in the (shared) JES2PARM: $T INTRDR,S=* /* Jobs run where submitted/converted */ The command is executed at every IPL and remains valid until the next IPL. This way jobs runs on the right system. It works for me. Well, several times we had the problem that the job was NOT converted on the system it was submitted (resulting in system symbols wrongly resolved), so we also added $TINTRDR,SYSAFF=(system where the conversion is supposed to take place) Regards, Barbara Nitz -- Pt! Schon das coole Video vom GMX MultiMessenger gesehen? Der Eine für Alle: http://www.gmx.net/de/go/messenger03 -- 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
Compiled Rexx portabilty
Does compiled Rexx need a run-time library to operate? If so, will static bind solve this requirement? | Itschak Mugzach | Director | SecuriTeam Software | | Email: [EMAIL PROTECTED] | Mob: +972 522 986404 | Skype: Itschak Mugzach | Web: www.Securiteam.co.il | -- 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: embarresing request
Barbara Nitz [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... I added the following line in the (shared) JES2PARM: $T INTRDR,S=* /* Jobs run where submitted/converted */ The command is executed at every IPL and remains valid until the next IPL. This way jobs runs on the right system. It works for me. Well, several times we had the problem that the job was NOT converted on the system it was submitted (resulting in system symbols wrongly resolved), so we also added $TINTRDR,SYSAFF=(system where the conversion is supposed to take place) Regards, Barbara Nitz $TINTRDR,SYSAFF=(SYSNAME) to be flexible with parmlib members across systems. Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Compiled Rexx portabilty
On Thu, 7 Aug 2008 12:47:35 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Does compiled Rexx need a run-time library to operate? Yes, but you can use the free Alternate Run Time Library http://www-306.ibm.com/software/awdtools/rexx/rexxzseries/altlibrary.html If so, will static bind solve this requirement? Don't know. Dave -- 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
Converting / Copying a dataset from RECFM=UA to RECFM=FB
Hi I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. Please help me. Thanks Regards Rahul Karsija -- 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: z10 BC announcement
On Wed, 2008-08-06 at 22:24 -0700, Schwarz, Barry A wrote: Has there been any word on when the z10 BC will be announced as the smaller brother of the z10 EC announced a few months ago? Mm ... *what* z10 BC ???. If one was being proposed, half this list (o.k., slight exaggeration) know about it, and can't say diddly-squat. Now, logically you'd reckon one would be on the way, but will it even be called a BC ???. Probably, but only those in the know can say - and they're precluded. Shane ... -- 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: z10 BC announcement
Has there been any word on when the z10 BC will be announced as the smaller brother of the z10 EC announced a few months ago? No. There will be no baby brother. The CPs in the first book can be set to the speed (and price) that is needed. It provides the same functionality as a baby brother, but as an option on the z10, not as a separate offering. Bob Shannon Rocket Software -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 12:47:35 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Does compiled Rexx need a run-time library to operate? Yes. If so, will static bind solve this requirement? No, however you could (as another member noted) ship the free alternate library with your compiled REXX exec. As far as I know, however, the alternate library basically runs the exec in an interpreted mode, as though you had not compiled it. See http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/h1981605/1.4.4?SHELF=EZ2ZO10KDT=20030825101721 or http://preview.tinyurl.com/55eefh for more information. -- Walt -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
Rahul Karsija wrote: I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. If the input blocks are all multiples of some record size, you could just use one of the CBT utilities (CDSCB, ZAPDSCB, etc.) to change the DSCB attributes on DASD. You could also use IEBGENER, with an explicit override for RECFM=FB, LRECL and BLKSIZE on the SYSUT1 DD. If the blocks are not regular, you need to write your own conversion and padding routine. Easiest would be a program using BSAM input (gets one block at a time) that allows you to do anything you want with the input data; then write records with QSAM or BSAM. Gerhard Postpischil Bradford, VT -- 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: Compiled Rexx portabilty
Thanks. But does the interpeter mode still protect the code from beeing watched? ITschak | Itschak Mugzach | Director | SecuriTeam Software | | Email: [EMAIL PROTECTED] | Mob: +972 522 986404 | Skype: Itschak Mugzach | Web: www.Securiteam.co.il | -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Dave Cartwright Sent: Thursday, August 07, 2008 12:12 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Compiled Rexx portabilty On Thu, 7 Aug 2008 12:47:35 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Does compiled Rexx need a run-time library to operate? Yes, but you can use the free Alternate Run Time Library http://www-306.ibm.com/software/awdtools/rexx/rexxzseries/altlibrary.html If so, will static bind solve this requirement? Don't know. Dave -- 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 __ NOD32 3280 (20080718) Information __ This message was checked by NOD32 antivirus system. http://www.eset.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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
On Thu, 7 Aug 2008 15:36:53 +0530, Rahul Karsija wrote: I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it Convert is pretty vague. Is this problem well-posed? What do you envision as the LRECL and BLKSIZE of the output data set? I've never encountered RECFM=UA; what created the data set? What expects to use the converted data set? using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work What language? Be more specific about did not work. either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. I've done similar with Rexx under ISPF, processing individual records with LMGET and LMPUT (IIRC). -- 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: Compiled Rexx portabilty
Itschak Mugzach wrote: Thanks. But does the interpeter mode still protect the code from beeing watched? No; the originals source, with extraneous blanks deleted, remains in the file. Writing a program to extract it automatically would be pretty simple. Gerhard Postpischil Bradford, VT -- 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: Compiled Rexx portabilty
- Original Message - From: Gerhard Postpischil [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main Sent: Thursday, August 07, 2008 8:17 AM Subject: Re: Compiled Rexx portabilty Itschak Mugzach wrote: Thanks. But does the interpeter mode still protect the code from beeing watched? No; the originals source, with extraneous blanks deleted, remains in the file. Writing a program to extract it automatically would be pretty simple. Incorrectamundo. The CONDENSE compiler option scrambles the code and is unreadable. This is a popular misconception with the Alternate Library. Regards, Tom Conley -- 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: Compiled Rexx portabilty
Hmm. So I would you protect your Intellectual Properties? Itschak | Itschak Mugzach | Director | SecuriTeam Software | | Email: [EMAIL PROTECTED] | Mob: +972 522 986404 | Skype: Itschak Mugzach | Web: www.Securiteam.co.il | -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Gerhard Postpischil Sent: Thursday, August 07, 2008 2:17 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Compiled Rexx portabilty Itschak Mugzach wrote: Thanks. But does the interpeter mode still protect the code from beeing watched? No; the originals source, with extraneous blanks deleted, remains in the file. Writing a program to extract it automatically would be pretty simple. Gerhard Postpischil Bradford, VT -- 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 __ NOD32 3280 (20080718) Information __ This message was checked by NOD32 antivirus system. http://www.eset.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: embarresing request
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Hunkeler Peter (KIUK 3) Sent: Thursday, August 07, 2008 1:33 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: embarresing request We do have the inits set. However, on rare occassion, they get messed up when Production Control changes one on the wrong system. And so can WLM scheduling environments get messed up. The WLM scheduling environment idea looks nice. Prevents only jobs having SCHENV= on the job statement from running on the wrong system. Is the single MAS a requirement? -- Peter Hunkeler Yes, a single MAS is a requirement. -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 08:17:16 -0400, Gerhard Postpischil wrote: No; the originals source, with extraneous blanks deleted, remains in the file. Writing a program to extract it automatically would be pretty simple. Ugh? Do comments remain? I've occasionally simulated instream data sets (a conspicuous deficiency in Rexx) by using SIGL and SOURCELINE() to extract data from a comment following a CALL. I have no access to compiled Rexx; would compilation break this technique? Is SOURCELINE() supported in compiled Rexx? -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
Rahul I'm a bit rusty on theses matters since I don't have systems to play with these days. However, if I wanted to set up an existing data set with DCB parameters other than those currently assigned, I'd try the following: First of all I'd be using IEBGENER as the program. Then I'd define the input data set with DCB parameters which overrode the stored DCB parameters with the DCB parameters I wanted the program to adopt and hence to try to use. Naturally I'd define the output data set with the same DCB parameters so that those became the stored DCB parameters for the new data set. I could guess that the records in the data set are 133 bytes long, that there is one record per block and that the records are print lines which have an ASA - if I remember correctly what A means - character as the first character, the carriage control character. I'm ignoring the defined stored block size of 101 which looks spurious. //... JOB ... //GENER EXEC PGM=IEBGENER //SYSUT1 DD DSN=input,DCB= (BLKSIZE=133,LRECL=133,RECFM=FBA),DISP=OLD //SYSUT2 DD DSN=output,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA),DISP= (NEW,KEEP) //SYSIN DD DUMMY Chris Mason ably assisted by John Austin On Thu, 7 Aug 2008 15:36:53 +0530, Rahul Karsija [EMAIL PROTECTED] wrote: Hi I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. Please help me. Thanks Regards Rahul Karsija -- 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: z10 BC announcement
Way back when (last Feb) when the z10 Roadshow was in town, the said that there *WOULD BE* a z/10 BC machine. Since they missed the 3rd quarter window, if there is going to be z/10 BC announcement, I would expect it in 4Q08. snip Has there been any word on when the z10 BC will be announced as the smaller brother of the z10 EC announced a few months ago? No. There will be no baby brother. The CPs in the first book can be set to the speed (and price) that is needed. It provides the same functionality as a baby brother, but as an option on the z10, not as a separate offering. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Compiled Rexx portabilty
On Thu, 7 Aug 2008 07:47:47 -0500, Paul Gilmartin wrote: I've occasionally simulated instream data sets (a conspicuous deficiency in Rexx) by using SIGL and SOURCELINE() to extract data from a comment following a CALL. I have no access to compiled Rexx; would compilation break this technique? Is SOURCELINE() supported in compiled Rexx? It depends... http://publibz.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/H1981605/1.8.1.8?DT=20030825101721 Norbert Friemel -- 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 1.10 migration path
On Wed, 6 Aug 2008 23:16:18 -0500, Brian Westerman [EMAIL PROTECTED] wrote: I feel like a broken record on this topic every few months. Try to remember that just because IBM doesn't consider it supported does not have the same meaning as won't work, because it will work fine. There are several beta sites including a vendor site which I am intimate with which have no problems with that update in both coexistence and conversion. It's not really going to be a big issue for you, sysplex or not, so long as you are careful, things will work out just fine. Coexistence? Are they running a z/OS 1.7 and z/OS 1.10 JES2 in the same MAS (I thought IBM hard coded release checks these days for JES2)? Are they running a parallel sysplex? How blue are their software portfolios? Vendor / small shop is one thing. I wouldn't want to do it in a large(r) shop using sysplex running critical apps even if I could. I'd rather run unsupported releases within the documented supported coexistence levels. When I consulted full time, I also did migrations outside of the coexistence / fallback levels for monoplex environments, but have never recommended to do it for any environments that were in a basic or parallel sysplex. If there was a problem after doing so, I wouldn't want that liability. Mark -- 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
Re: z10 BC announcement
On Wed, 6 Aug 2008 22:24:07 -0700, Schwarz, Barry A [EMAIL PROTECTED] wrote: Has there been any word on when the z10 BC will be announced as the smaller brother of the z10 EC announced a few months ago? Usually it has been the year following the big box, but in this case I don't know that there will be a baby brother for the z10 based on the scalability of the design. Mark -- 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
Re: Compiled Rexx portabilty
On Thu, 7 Aug 2008 06:48:38 -0500, Walt Farrell [EMAIL PROTECTED] wrote: On Thu, 7 Aug 2008 12:47:35 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Does compiled Rexx need a run-time library to operate? Yes. If so, will static bind solve this requirement? No, however you could (as another member noted) ship the free alternate library with your compiled REXX exec. Which every shop I have been at in the last 10 years has had anyway due to their product mix. Also, remember it always ships with z/OS 1.9 and above, so most shops will have it soon even if they don't have it today. Mark -- 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
Re: z/OS 1.10 migration path
When I consulted full time, I also did migrations outside of the coexistence / fallback levels for monoplex environments, but have never recommended to do it for any environments that were in a basic or parallel sysplex. If there was a problem after doing so, I wouldn't want that liability. As a consultant, you couldn't afford the liability if something did go wrong. Up here, we can incorporate to (in theory) limit liability to corporate assest, and protect personal ones. But, customers require us to personally guarantee our work, making the protection moot. So, I would never recommend non-supported in any complex environment. - Too busy driving to stop for gas! -- 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: embarresing request
On Wed, 6 Aug 2008 14:36:44 -0700, George Fogg [EMAIL PROTECTED] wrote: We have a two system basic sysplex. Basically, SY1 is for production only and SY2 is from not production only. Don't ask - politics. I do have a JES2 MAS. So now, we need some way to prevent a job from running on the wrong system. I currently have an IEFUJI exit which run on the non production only system which JCLs a job which has a bad jobname or job class. I don't really like this. Does anybody have any idea for a free-as-in-beer solution. Or do I just extend the IEFUJI exit to be bigger and hairier? John If I remember correctly, you have a RACF shop so use the NODES class to stop inbound jobs and sysout from SY2 on the SY1 node. For example: RDEF SY2.USERJ.* UACC(NONE) This will stop jobs from entering SY1 from SY2 RDEF SY2.USERS.* UACC(NONE) This will stop sysout from SY2 to SY1 or use RDEF SY2.USER*.* UACC(NONE) for jobs and sysout George Fogg John says he has a JES2 MAS. How will NODES help him - it's all one node? Mark -- 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
Re: z10 BC announcement
On Thu, 7 Aug 2008 07:19:28 -0400, Bob Shannon wrote: Has there been any word on when the z10 BC will be announced as the smaller brother of the z10 EC announced a few months ago? No. There will be no baby brother. The CPs in the first book can be set to the speed (and price) that is needed. Not as currently announced. The smallest z10 EC is just a bit faster than the smallest z9 EC. -- Tom Marchant -- 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
CICS Explorer
Tuesday's IBM announcements provided much rhetoric and some information about the new CICS Explorer facility, e.g., CICS is a leader in transaction processing and, in conjunction with z/OS and DB2®, delivers levels of performance, availability, and security that are hard to match. To prepare for the future, IBM intends to make significant contributions to the CICS offerings that will help to reduce the skills barriers to the development of CICS applications and the management of CICS systems.However one judges the merits of this proposal one can only admire the felicity of the euphemism skills barriers. There are two polar ways to cope with these skills barriers. The obvious, traditional one is to provide apprenticeships and/or intensive training that convert qualified unskilled people into skilled ones. The other is to attempt to embody the necessary skills in a program, a wizard or the like, that notionally makes it possible to dispense with imparting these skills to people who will do a particular job, thus---this is apparently judged highly desirable---dumbing down the requirements of that job.This is not the first such IBM initiative, and I know of none that has been successful. Devoting resources to making traditional professional-training opportunities available would be much more effective, and it would bode better for the future of CICS. The appeal of schemes for permitting unskilled (and thus perhaps but not usually cheaper in the aggregate) people to do what only the skilled can do now is obvious, but this appeal is not enough: all sorts of appealing notions are and will remain infeasible. John GilmoreAshland, MA 01721-1817USA _ Reveal your inner athlete and share it with friends on Windows Live. http://revealyourinnerathlete.windowslive.com?locale=en-usocid=TXT_TAGLM_WLYIA_whichathlete_us -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 08:11:33 -0500, Norbert Friemel wrote: SOURCELINE() supported in compiled Rexx? It depends... http://publibz.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/H1981605/1.8.1.8?DT=20030825101721 Thanks. There, I read: #1.8.1.8 IBM Compiler and Library for REXX on zSeries V1 R4 User's Guide and Refer.. __ 1.8.1.8 SOURCELINE Built-In Function The full functions of the SOURCELINE function are available only if the program is compiled with the SLINE compiler option. 2. The string returned by SOURCELINE(n) from a compiled program contains only the text within the specified margins. The string returned from a program interpreted with the system product interpreter, however, contains the complete line. Sigh. What a stupid restriction! If they go to the considerable effort to provide an option to support SOURCELINE(), why not the small additional effort to provide compatibility by storing the source line before it's munged by the input filter? If the user specifies MARGINS(1-*) (whatever syntax), is the behavior identical to that of interpreted Rexx? Are line lengths preserved, not padded to the right margin value? If it was worth doing, it should have been worth doing right. -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
Hi My original program sends out data to the spool and then the report is printed. My task is to send the data to a dataset, and then email this dataset. The email program (IKJEFT1A) doesn't support such datasets and requires FB or VB as input I had also created the dataset using IEFBR14 - //STEP01 EXEC PGM=IEFBR14 //DD1 DD DSN=MY.DATASET, //DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(125,50),RLSE), //DCB=(RECFM=FB,LRECL=133,BLKSIZE=0) //SYSPRINT DD SYSOUT=* //SYSINDD DUMMY //SYSUDUMP DD SYSOUT=* Then, I used this dataset in my original program, with DISP=OLD. The program converts it to RECFM=UA (undefined length record) while writing out data to it. Regards Rahul Karsija On Thu, Aug 7, 2008 at 6:38 PM, Chris Mason [EMAIL PROTECTED] wrote: Rahul I'm a bit rusty on theses matters since I don't have systems to play with these days. However, if I wanted to set up an existing data set with DCB parameters other than those currently assigned, I'd try the following: First of all I'd be using IEBGENER as the program. Then I'd define the input data set with DCB parameters which overrode the stored DCB parameters with the DCB parameters I wanted the program to adopt and hence to try to use. Naturally I'd define the output data set with the same DCB parameters so that those became the stored DCB parameters for the new data set. I could guess that the records in the data set are 133 bytes long, that there is one record per block and that the records are print lines which have an ASA - if I remember correctly what A means - character as the first character, the carriage control character. I'm ignoring the defined stored block size of 101 which looks spurious. //... JOB ... //GENER EXEC PGM=IEBGENER //SYSUT1 DD DSN=input,DCB= (BLKSIZE=133,LRECL=133,RECFM=FBA),DISP=OLD //SYSUT2 DD DSN=output,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA),DISP= (NEW,KEEP) //SYSIN DD DUMMY Chris Mason ably assisted by John Austin On Thu, 7 Aug 2008 15:36:53 +0530, Rahul Karsija [EMAIL PROTECTED] wrote: Hi I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. Please help me. Thanks Regards Rahul Karsija -- 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: Compiled Rexx portabilty
What a stupid restriction! If they go to the considerable effort to provide an option to support SOURCELINE(), why not the small additional effort to provide compatibility by storing the source line before it's munged by the input filter? To protect Intellectual Property? Aside from performance, that's the only reason I can think of for compiled REXX. - Too busy driving to stop for gas! -- 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: z10 BC announcement
Based on past history, IF there is a BC version, I would expect that, based on past timelines, it would be announced in the February or March timeframe. Wayne Driscoll Product Developer NOTE: All opinions are strictly my own. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Staller, Allan Sent: Thursday, August 07, 2008 8:09 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: z10 BC announcement Way back when (last Feb) when the z10 Roadshow was in town, the said that there *WOULD BE* a z/10 BC machine. Since they missed the 3rd quarter window, if there is going to be z/10 BC announcement, I would expect it in 4Q08. snip Has there been any word on when the z10 BC will be announced as the smaller brother of the z10 EC announced a few months ago? No. There will be no baby brother. The CPs in the first book can be set to the speed (and price) that is needed. It provides the same functionality as a baby brother, but as an option on the z10, not as a separate offering. /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 -- 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: Compiled Rexx portabilty
IP is my case when thinking on compiled REXX. If SLINE in not specified, will IP kept? What happens if running compiled REXX in interpeter mode? Can't it go into trace mode? ITschak | Itschak Mugzach | Director | SecuriTeam Software | | Email: [EMAIL PROTECTED] | Mob: +972 522 986404 | Skype: Itschak Mugzach | Web: www.Securiteam.co.il | -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Ted MacNEIL Sent: Thursday, August 07, 2008 4:34 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Compiled Rexx portabilty What a stupid restriction! If they go to the considerable effort to provide an option to support SOURCELINE(), why not the small additional effort to provide compatibility by storing the source line before it's munged by the input filter? To protect Intellectual Property? Aside from performance, that's the only reason I can think of for compiled REXX. - Too busy driving to stop for gas! -- 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 __ NOD32 3280 (20080718) Information __ This message was checked by NOD32 antivirus system. http://www.eset.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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
How about taking advantage of the thing which has gotten so many installations in trouble over the years and opening the dataset for output (DISP=MOD) specifying on the output DD stmt the DCB parameters you want the dataset to have? Since IEBGENER won't allow you to change RECFM or LRECL, you'll have to have a small program that does nothing more than: OPEN (dcbname,OUTPUT) CLOSE dcbname Ralph Kaden z/OS (MVS) Level 2 Support - Allocation and Scheduler (Converter/Interpreter, Initiator/Terminator, ENF, SJF, SMF, SSI, SWA Mgr) T/ L: 8/295-4096 External: 845-435-4096 VM: S390VM.v$i01029MVS: PLPSC.v$i316 External email: [EMAIL PROTECTED] Internal email: Ralph Kaden/Poughkeepsie/Contr/[EMAIL PROTECTED] Rahul Karsija [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 08/07/2008 10:29 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject Re: Converting / Copying a dataset from RECFM=UA to RECFM=FB Hi My original program sends out data to the spool and then the report is printed. My task is to send the data to a dataset, and then email this dataset. The email program (IKJEFT1A) doesn't support such datasets and requires FB or VB as input I had also created the dataset using IEFBR14 - //STEP01 EXEC PGM=IEFBR14 //DD1 DD DSN=MY.DATASET, //DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(125,50),RLSE), //DCB=(RECFM=FB,LRECL=133,BLKSIZE=0) //SYSPRINT DD SYSOUT=* //SYSINDD DUMMY //SYSUDUMP DD SYSOUT=* Then, I used this dataset in my original program, with DISP=OLD. The program converts it to RECFM=UA (undefined length record) while writing out data to it. Regards Rahul Karsija On Thu, Aug 7, 2008 at 6:38 PM, Chris Mason [EMAIL PROTECTED] wrote: Rahul I'm a bit rusty on theses matters since I don't have systems to play with these days. However, if I wanted to set up an existing data set with DCB parameters other than those currently assigned, I'd try the following: First of all I'd be using IEBGENER as the program. Then I'd define the input data set with DCB parameters which overrode the stored DCB parameters with the DCB parameters I wanted the program to adopt and hence to try to use. Naturally I'd define the output data set with the same DCB parameters so that those became the stored DCB parameters for the new data set. I could guess that the records in the data set are 133 bytes long, that there is one record per block and that the records are print lines which have an ASA - if I remember correctly what A means - character as the first character, the carriage control character. I'm ignoring the defined stored block size of 101 which looks spurious. //... JOB ... //GENER EXEC PGM=IEBGENER //SYSUT1 DD DSN=input,DCB= (BLKSIZE=133,LRECL=133,RECFM=FBA),DISP=OLD //SYSUT2 DD DSN=output,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA),DISP= (NEW,KEEP) //SYSIN DD DUMMY Chris Mason ably assisted by John Austin On Thu, 7 Aug 2008 15:36:53 +0530, Rahul Karsija [EMAIL PROTECTED] wrote: Hi I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. Please help me. Thanks Regards Rahul Karsija -- 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: Compiled Rexx portabilty
IP is my case when thinking on compiled REXX. If SLINE in not specified, will IP kept? What happens if running compiled REXX in interpeter mode? Can't it go into trace mode? Somebody posted earlier that clear text in any compiled REXX is a myth. You'll have to take his word for it. I have never used compiled REXX. - Too busy driving to stop for gas! -- 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: Next Baybunch at IBM San Francisco-Friday Aug 6
Actually Friday is August 8 :-) Lionel B. Dyck, Consultant/Specialist Enterprise Platform Services, Mainframe Engineering KP-IT Enterprise Engineering 925-926-5332 (8-473-5332) | E-Mail: [EMAIL PROTECTED] AIM: lbdyck | Yahoo IM: lbdyck Kaiser Service Credo: Our cause is health. Our passion is service. We're here to make lives better. I never guess. It is a capital mistake to theorize before one has data. Insensibly one begins to twist facts to suit theories, instead of theories to suit facts. - Sir Arthur Conan Doyle NOTICE TO RECIPIENT: If you are not the intended recipient of this e-mail, you are prohibited from sharing, copying, or otherwise using or disclosing its contents. If you have received this e-mail in error, please notify the sender immediately by reply e-mail and permanently delete this e-mail and any attachments without reading, forwarding or saving them. Thank you. From: Pamela Christina - warm and sunny Endicott NY [EMAIL PROTECTED] To: IBM-MAIN@BAMA.UA.EDU Date: 08/06/2008 03:35 PM Subject: Next Baybunch at IBM San Francisco-Friday Aug 6 Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU For those of you who near San Francisco Bay area this Friday and who are interested in hearing z/VM and Linux presentations. The next Baybunch meeting is on Friday August 6 at IBM San Francisco - 425 Market St. Send an RSVP email to Karen Reed at [EMAIL PROTECTED] Meet with the Baybunch user group on Friday, August 8 Alan Altmark presents: - z/VM Platform Update - Hear about z/VM V5.4 (just announced!) - Securing Linux with RACF Jim Elliott presents: - Linux on System z: A strategic Details in the PDF: http://www.vm.ibm.com/events/bayb0806.pdf Regards, Pam C -- 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
SMS and DFDSS
Hi Folks, I'm trying to assign a DATACLAS to some existing SMS datasets that don't have one, so they can extend to multiple volumes. I've done a logical DFDSS dump of the datasets (all PS). I've deleted the datasets that were dumped. I've Updated my DATACLAS ACS routines to assign the DATACLAS based on dsname. I've validated and activated the new SMS configuration. I run the restore, but the DATACLAS remains blank? What am I missing? Is this not possible? Is there a better way? Thanks! Bob Lester Technical Services Systems and Storage OppenheimerFunds -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
Rahul Do remember I'm a bit rusty on these matters. It's possible that your BLKSIZE=0 caused JES2 - was it? - to come up with a rubbish BLKSIZE. I seem to remember that, if a parameter is missing - and 0 would be considered missing for BLKSIZE - the value set by the program opening and closing the data set for the equivalent parameter is going to set it. In addition the program can reset already specified parameters as shown by the change from FB to UA. This may also be a consequence of your having specified BLKSIZE=0. There are a lot of guess here. If JES2 - as I suppose - has specified A as one of the RECFM characters - mapped from bits internally if my memory is to be trusted - it probably did so for a reason and the printout is probably prepared with the ASA carriage control characters. Note also that your program which insists on FB or VB is very probably capable - although it's not guaranteed! - of dealing with FBA and VBA. In other words it is interested only in dealing with fixed or variable organisation and probably even doesn't care whether or not the records are blocked. My first idea was to suggest you try again using the following in your IEFBR14 job step: //STEP01 EXEC PGM=IEFBR14 //DD1 DD DSN=MY.DATASET, //DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(125,50),RLSE), //DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133) But now I appreciate where the LRECL=133 came from in what you showed as the data set characteristics in your original post. This inclines me to think that the BLKSIZE=101 may be trusted as the largest block created and that other blocks are created which are equal to or smaller than 101 - and that when RECFM=U was specified it was meant to be just that: undefined. Since you have written a little read a record/write the record program, perhaps you can adjust that to read the undefined blocks one at a time, note the length - someone who knows precisely how by heart please jump in - and write it out as a record with variable organisation, that is, with the correct length half-word and null half-word at the beginning. Note that you can specify any BLKSIZE value you like - greater than 105 for reasons I hope you understand - and the system will take care of when to write out your blocks with your variable length records. You do not even need to specify the DCB parameters in your JCL but rather you can specify them all in the DCB macros within your program. I'm pretty sure you need bother only with BLKSIZE and RECFM and that LRECL will be needed neither with undefined organisation nor with variable organisation. With any luck there remains now only the question of whether or not the recipient of the email can do anything with the carriage control character. If he/she complains about the useless extra character at the beginning of each line - printable at least since it's ASA, you can use your little program just to throw it away - or - if you want to be really helpful, you could look up what the ASA control characters mean in terms of manoeuvering a printer carriage and adjust your output accordingly, even, for instance, going as far as simulating a new page using a full line of hyphens. Chris Mason On Thu, 7 Aug 2008 19:59:28 +0530, Rahul Karsija [EMAIL PROTECTED] wrote: Hi My original program sends out data to the spool and then the report is printed. My task is to send the data to a dataset, and then email this dataset. The email program (IKJEFT1A) doesn't support such datasets and requires FB or VB as input I had also created the dataset using IEFBR14 - //STEP01 EXEC PGM=IEFBR14 //DD1 DD DSN=MY.DATASET, //DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(125,50),RLSE), //DCB=(RECFM=FB,LRECL=133,BLKSIZE=0) //SYSPRINT DD SYSOUT=* //SYSINDD DUMMY //SYSUDUMP DD SYSOUT=* Then, I used this dataset in my original program, with DISP=OLD. The program converts it to RECFM=UA (undefined length record) while writing out data to it. Regards Rahul Karsija On Thu, Aug 7, 2008 at 6:38 PM, Chris Mason [EMAIL PROTECTED] wrote: Rahul I'm a bit rusty on theses matters since I don't have systems to play with these days. However, if I wanted to set up an existing data set with DCB parameters other than those currently assigned, I'd try the following: First of all I'd be using IEBGENER as the program. Then I'd define the input data set with DCB parameters which overrode the stored DCB parameters with the DCB parameters I wanted the program to adopt and hence to try to use. Naturally I'd define the output data set with the same DCB parameters so that those became the stored DCB parameters for the new data set. I could guess that the records in the data set are 133 bytes long, that there is one record per block and that the records are print lines which have an ASA - if I remember correctly what A means - character as the first character, the carriage control character. I'm ignoring the
Re: Converting / Copying a dataset from RECFM=UA to RECFM=FB
I think reading recfm u returns the length in register 1. If he writes variable he will be responsible for the block and record prefixes. It should be simpler to write fixed with a little blank padding. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Chris Mason Sent: Thursday, August 07, 2008 10:28 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Converting / Copying a dataset from RECFM=UA to RECFM=FB Rahul Do remember I'm a bit rusty on these matters. It's possible that your BLKSIZE=0 caused JES2 - was it? - to come up with a rubbish BLKSIZE. I seem to remember that, if a parameter is missing - and 0 would be considered missing for BLKSIZE - the value set by the program opening and closing the data set for the equivalent parameter is going to set it. In addition the program can reset already specified parameters as shown by the change from FB to UA. This may also be a consequence of your having specified BLKSIZE=0. There are a lot of guess here. If JES2 - as I suppose - has specified A as one of the RECFM characters - mapped from bits internally if my memory is to be trusted - it probably did so for a reason and the printout is probably prepared with the ASA carriage control characters. Note also that your program which insists on FB or VB is very probably capable - although it's not guaranteed! - of dealing with FBA and VBA. In other words it is interested only in dealing with fixed or variable organisation and probably even doesn't care whether or not the records are blocked. My first idea was to suggest you try again using the following in your IEFBR14 job step: //STEP01 EXEC PGM=IEFBR14 //DD1 DD DSN=MY.DATASET, //DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(125,50),RLSE), //DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133) But now I appreciate where the LRECL=133 came from in what you showed as the data set characteristics in your original post. This inclines me to think that the BLKSIZE=101 may be trusted as the largest block created and that other blocks are created which are equal to or smaller than 101 - and that when RECFM=U was specified it was meant to be just that: undefined. Since you have written a little read a record/write the record program, perhaps you can adjust that to read the undefined blocks one at a time, note the length - someone who knows precisely how by heart please jump in - and write it out as a record with variable organisation, that is, with the correct length half-word and null half-word at the beginning. Note that you can specify any BLKSIZE value you like - greater than 105 for reasons I hope you understand - and the system will take care of when to write out your blocks with your variable length records. You do not even need to specify the DCB parameters in your JCL but rather you can specify them all in the DCB macros within your program. I'm pretty sure you need bother only with BLKSIZE and RECFM and that LRECL will be needed neither with undefined organisation nor with variable organisation. With any luck there remains now only the question of whether or not the recipient of the email can do anything with the carriage control character. If he/she complains about the useless extra character at the beginning of each line - printable at least since it's ASA, you can use your little program just to throw it away - or - if you want to be really helpful, you could look up what the ASA control characters mean in terms of manoeuvering a printer carriage and adjust your output accordingly, even, for instance, going as far as simulating a new page using a full line of hyphens. Chris Mason On Thu, 7 Aug 2008 19:59:28 +0530, Rahul Karsija [EMAIL PROTECTED] wrote: Hi My original program sends out data to the spool and then the report is printed. My task is to send the data to a dataset, and then email this dataset. The email program (IKJEFT1A) doesn't support such datasets and requires FB or VB as input I had also created the dataset using IEFBR14 - //STEP01 EXEC PGM=IEFBR14 //DD1 DD DSN=MY.DATASET, //DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(125,50),RLSE), //DCB=(RECFM=FB,LRECL=133,BLKSIZE=0) //SYSPRINT DD SYSOUT=* //SYSINDD DUMMY //SYSUDUMP DD SYSOUT=* Then, I used this dataset in my original program, with DISP=OLD. The program converts it to RECFM=UA (undefined length record) while writing out data to it. Regards Rahul Karsija On Thu, Aug 7, 2008 at 6:38 PM, Chris Mason [EMAIL PROTECTED] wrote: Rahul I'm a bit rusty on theses matters since I don't have systems to play with these days. However, if I wanted to set up an existing data set with DCB parameters other than those currently assigned, I'd try the following: First of all I'd be using IEBGENER as the program. Then I'd define the input data set with DCB parameters which overrode the stored DCB parameters with the DCB parameters I wanted the program to adopt and
Re: SMS and DFDSS
Bob, Hi Folks, I'm trying to assign a DATACLAS to some existing SMS datasets that don't have one, so they can extend to multiple volumes. I've done a logical DFDSS dump of the datasets (all PS). I've deleted the datasets that were dumped. I've Updated my DATACLAS ACS routines to assign the DATACLAS based on dsname. I've validated and activated the new SMS configuration. I run the restore, but the DATACLAS remains blank? What am I missing? Is this not possible? Is there a better way? DSS comes in the recover environment and bypasses the data class acs routine. That is why I put most of my decision logic in the storage class acs routine. Regards, John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Converting / Copying a dataset from RECFM=UA to RECFM=FB
snip My original program sends out data to the spool and then the report is printed. unsnip I must have missed something. What application is taking the data off spool? External writer, EJES and even SDSF will output to FBA or VBA just fine. The batch TMP doesn't sound like the problem. 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: Compiled Rexx portabilty
I've replied to Itschak off-list and explained in detail what needs to be done to preserve intellectual property using compiled REXX. Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/SIM/simplist.htm Date: Thu, 7 Aug 2008 15:05:19 + From: [EMAIL PROTECTED] Subject: Re: Compiled Rexx portabilty To: IBM-MAIN@BAMA.UA.EDU IP is my case when thinking on compiled REXX. If SLINE in not specified, will IP kept? What happens if running compiled REXX in interpeter mode? Can't it go into trace mode? _ Find hidden words, unscramble celebrity names, or try the ultimate crossword puzzle with Live Search Games. Play now! http://g.msn.ca/ca55/212 -- 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: SMS and DFDSS
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of John Kington Sent: Thursday, August 07, 2008 9:40 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS DSS comes in the recover environment and bypasses the data class acs routine. That is why I put most of my decision logic in the storage class acs routine. Regards, John Hi John, Thanks for the info, I was afraid of that. Oh well, DMS to the rescue! Bob Lester -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: Politics - California state computers can't handle pay cut, controller says - sacbee.com
Arggg, even InfoWorld seems to be publishing the idea of COBOL being archaic as technically accurate. http://weblog.infoworld.com/fatalexception/archives/2008/08/californias_ leg.html http://weblog.infoworld.com/daily/archives/2008/08/the_mildly_iron.html Tom Kelman Enterprise Capacity Planner Commerce Bank of Kansas City (816) 760-7632 * If you wish to communicate securely with Commerce Bank and its affiliates, you must log into your account under Online Services at http://www.commercebank.com or use the Commerce Bank Secure Email Message Center at https://securemail.commercebank.com NOTICE: This electronic mail message and any attached files are confidential. The information is exclusively for the use of the individual or entity intended as the recipient. If you are not the intended recipient, any use, copying, printing, reviewing, retention, disclosure, distribution or forwarding of the message or any attached file is not authorized and is strictly prohibited. If you have received this electronic mail message in error, please advise the sender by reply electronic mail immediately and permanently delete the original transmission, any attachments and any copies of this message from your computer system. * -- 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: Compiled Rexx portabilty
Dave Salt wrote: I've replied to Itschak off-list and explained in detail what needs to be done to preserve intellectual property using compiled REXX. Why not post the procedure publicly? Is the protection of IP also some sort of IP? -- 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: Compiled Rexx portabilty
I didn't think most people would be interested, but this is what I sent to Itschak: If you want compiled REXX to be portable (in other words, you want the REXX to be executable at sites that don't have the REXX 'library' installed), then you *must* use the SLINE option (as well as the ALT option). This means the REXX source will be included in the executable, and will be executed at interpreted speed on systems where the REXX library isn't installed. However, as someone else pointed out, you can make the source unreadable by using the CONDENSE option. As far as execution goes, you can prevent the code from being traced by specifying CALL TRACE OFF throughout the program. To be safe, you need to specify CALL TRACE OFF as the very first line in the program, and at every point where the program 'pauses' to do something else. For example, if you have a REXX program that displays an ISPF panel and/or calls another program (etc) then you'll need to do something like this: /* REXX */ call trace OFF address ispexec do forever DISPLAY PANEL(MYPANEL) call trace OFF if rc 0 then exit SELECT CMD(MYPROG) call trace OFF end You'll notice that the above uses CALL TRACE OFF three times; at the very start of the program, immediately after it displays a panel, and immediately after it calls another program. I hope that helps, Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/SIM/simplist.htm _ If you like crossword puzzles, then you'll love Flexicon, a game which combines four overlapping crossword puzzles into one! http://g.msn.ca/ca55/208 -- 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: SMS and DFDSS
I think that when you dump datasets with DFDSS it includes that information in the dump. So the datasets will restore with those same values. Don't you have to nullify the ACS during the DFDSS restore so the new code will be picked up? Something like: BYPASSACS--(dsn)- Though I could be wrong. Lizette I'm trying to assign a DATACLAS to some existing SMS datasets that don't have one, so they can extend to multiple volumes. I've done a logical DFDSS dump of the datasets (all PS). I've deleted the datasets that were dumped. I've Updated my DATACLAS ACS routines to assign the DATACLAS based on dsname. I've validated and activated the new SMS configuration. I run the restore, but the DATACLAS remains blank? What am I missing? Is this not possible? Is there a better way? -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 12:34:46 -0400, Dave Salt [EMAIL PROTECTED] wrote: If you want compiled REXX to be portable (in other words, you want the REXX to be executable at sites that don't have the REXX 'library' installed), then you *must* use the SLINE option (as well as the ALT option). This means the REXX source will be included in the executable, and will be executed at interpreted speed on systems where the REXX library isn't installed. However, as someone else pointed out, you can make the source unreadable by using the CONDENSE option. Unreadable? Or simply less obviously readable? After all, if the interpreter can handle it, it must be reversible to source REXX statements in some way. As far as execution goes, you can prevent the code from being traced by specifying CALL TRACE OFF throughout the program. To be safe, you need to specify CALL TRACE OFF as the very first line in the program, and at every point where the program 'pauses' to do something else. For example, if you have a REXX program that displays an ISPF panel and/or calls another program (etc) then you'll need to do something like this: /* REXX */ call trace OFF address ispexec do forever DISPLAY PANEL(MYPANEL) call trace OFF if rc 0 then exit SELECT CMD(MYPROG) call trace OFF end You'll notice that the above uses CALL TRACE OFF three times; at the very start of the program, immediately after it displays a panel, and immediately after it calls another program. I'm not certin, but I think you'd want to capture the rc after the DISPLAY, before calling trace OFF. Good example, though. You'd probably also want to deal with attention processing, as otherwise someone could interrupt the exec and start an interactive trace at a time other than when you paused for input. -- Walt -- 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
Formula for the size of page datasets
Is there a formula for the size of page datasets based on the size of the LPAR ? I don't mind RTFM. Thanks. ** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 12:34:46 -0400, Dave Salt wrote: If you want compiled REXX to be portable (in other words, you want the REXX to be executable at sites that don't have the REXX 'library' installed), then you *must* use the SLINE option (as well as the ALT option). This means the REXX source will be included in the executable, and will be executed at interpreted speed on systems where the REXX library isn't installed. However, as someone else pointed out, you can make the source unreadable by using the CONDENSE option. Does CONDENSE provide industrial strength encryption, or merely make the code slightly harder to read at a casual glance? -- 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: SMS and DFDSS
Why not add MY.DATASET.NEW to your ACS routines. Allocate MY.DATASET.NEW Copy MY.DATASET to MY.DATASET.NEW Delete MY.DATASET, rename MY.DATASET.NEW Lester, Bob [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 08/07/2008 11:18 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject SMS and DFDSS Hi Folks, I'm trying to assign a DATACLAS to some existing SMS datasets that don't have one, so they can extend to multiple volumes. I've done a logical DFDSS dump of the datasets (all PS). I've deleted the datasets that were dumped. I've Updated my DATACLAS ACS routines to assign the DATACLAS based on dsname. I've validated and activated the new SMS configuration. I run the restore, but the DATACLAS remains blank? What am I missing? Is this not possible? Is there a better way? Thanks! Bob Lester Technical Services Systems and Storage OppenheimerFunds -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: Formula for the size of page datasets
This link should take you to the section in z/OS V1.9 Init and Tune on Page Data sets http://tinyurl.com/6bjm39 Lizette Is there a formula for the size of page datasets based on the size of the LPAR ? I don't mind RTFM. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Compiled Rexx portabilty
Another option might be to compile with OBJECT DLINK NOCEXEC options, and create a load module out of your rexx source. Pedro Vera phone (408) 463-4812 internet [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: SMS and DFDSS
Lizette, I think that when you dump datasets with DFDSS it includes that information in the dump. So the datasets will restore with those same values. Don't you have to nullify the ACS during the DFDSS restore so the new code will be picked up? Something like: BYPASSACS--(dsn)- DSS does retain the data class, storage class and management class and will pass it in during the restore unless you specify nullstorageclass and/or nullmanagementclass. Your storage class and management class acs routines will see the allocation and can accept the passed in values or override them unless you specify BYPASSACS. The OP real problem is that DSS restore does not go through the data class ACS routine and he can not change the data class to a different value. He mentioned in a follow up note that he has CA-Disk (DMS). That will work for his needs. Regards, John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Compiled Rexx portabilty
On Thu, 7 Aug 2008 11:48:30 -0500, Walt Farrell wrote: Unreadable? Or simply less obviously readable? After all, if the interpreter can handle it, it must be reversible to source REXX statements in some way. And if it _is_ encrypted, how is the key transmitted? DISPLAY PANEL(MYPANEL) call trace OFF if rc 0 then exit I'm not certin, but I think you'd want to capture the rc after the DISPLAY, before calling trace OFF. I believe that only instructions that ADDRESS a subcommand environment set the RC. That would be DISPLAY, but not CALL (barring a CALL to a local procedure that sets RC). -- 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: Formula for the size of page datasets
Thanks, Lizette. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Lizette Koehler Sent: Thursday, August 07, 2008 9:57 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Formula for the size of page datasets This link should take you to the section in z/OS V1.9 Init and Tune on Page Data sets http://tinyurl.com/6bjm39 Lizette Is there a formula for the size of page datasets based on the size of the LPAR ? I don't mind RTFM. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. 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
Tracing from a Terminal/Netname
Dear All, We had a user trying to logon using somebody's elses user-id, and he accidently (or on purpose) enter a wrong password for more than 3 times, that caused that id to actually revoked by RACF. Is there a way to trace that back to the computer names/IP? So we can know for sure who or at least from whose terminal that does that? We saw the syslog and sees something like this M 008 ESAT 08218 16:31:53.52 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 855 E 855 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:54.25 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 856 E 856 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:54.99 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 857 E 857 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:55.69 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 858 E 858 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:56.52 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 859 E 859 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:57.35 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 860 E 860 0294LOGON/JOB INITIATION - EXCESSIVE PASSWORDS OR INACTIVE USER The terminal GI15126 is IP POOLed Terminal, dynamic depending on the request. It stays on somebodys's emulator until he/she closes it. So if I want to know, during this time terminal GI15126 is being opened by whose PC's name/IP how? Any help and suggestion is highly appreciated. Thank you Regards, Frans -- 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: Tracing from a Terminal/Netname
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of FRANSISCUS KAURRANY Sent: Thursday, August 07, 2008 12:07 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Tracing from a Terminal/Netname Dear All, We had a user trying to logon using somebody's elses user-id, and he accidently (or on purpose) enter a wrong password for more than 3 times, that caused that id to actually revoked by RACF. Is there a way to trace that back to the computer names/IP? So we can know for sure who or at least from whose terminal that does that? We saw the syslog and sees something like this [snip] The terminal GI15126 is IP POOLed Terminal, dynamic depending on the request. It stays on somebodys's emulator until he/she closes it. So if I want to know, during this time terminal GI15126 is being opened by whose PC's name/IP how? Any help and suggestion is highly appreciated. Thank you Regards, Frans If you have the SMF type 119 records turned on, then you could try to find the connect record for that LU name in the given time period. I.e. start at the time the error occurred and go back in time until you find the first connection record for that LU. One problem: if the IP address is assigned via DHCP (as most are anymore), then the IP address may be insufficient to track down the perp. Most DHCP servers don't bother to log an IP address vs. MAC address association. No, I don't have such a routine. -- 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: Tracing from a Terminal/Netname
D net,id=GI15126,e might give the ip unless you are using a security server; be quick. From the ip you might identify a pac. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of McKown, John Sent: Thursday, August 07, 2008 12:22 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Tracing from a Terminal/Netname -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of FRANSISCUS KAURRANY Sent: Thursday, August 07, 2008 12:07 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Tracing from a Terminal/Netname Dear All, We had a user trying to logon using somebody's elses user-id, and he accidently (or on purpose) enter a wrong password for more than 3 times, that caused that id to actually revoked by RACF. Is there a way to trace that back to the computer names/IP? So we can know for sure who or at least from whose terminal that does that? We saw the syslog and sees something like this [snip] The terminal GI15126 is IP POOLed Terminal, dynamic depending on the request. It stays on somebodys's emulator until he/she closes it. So if I want to know, during this time terminal GI15126 is being opened by whose PC's name/IP how? Any help and suggestion is highly appreciated. Thank you Regards, Frans If you have the SMF type 119 records turned on, then you could try to find the connect record for that LU name in the given time period. I.e. start at the time the error occurred and go back in time until you find the first connection record for that LU. One problem: if the IP address is assigned via DHCP (as most are anymore), then the IP address may be insufficient to track down the perp. Most DHCP servers don't bother to log an IP address vs. MAC address association. No, I don't have such a routine. -- 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 -- NOTICE: This electronic mail message and any attached files are confidential. The information is exclusively for the use of the individual or entity intended as the recipient. If you are not the intended recipient, any use, copying, printing, reviewing, retention, disclosure, distribution or forwarding of the message or any attached file is not authorized and is strictly prohibited. If you have received this electronic mail message in error, please advise the sender by reply electronic mail immediately and permanently delete the original transmission, any attachments and any copies of this message from your computer system. 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
Dynamic SYSLOG LOGCLS change
Is there a way to dynamically (without an IPL) change the SYSLOG LOGCLS? We set ours in IEASYSxx. I know you can specify the class in the WRITELOG command, but I don't want to have to issue that periodically. Thank you, Luke -- 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: Tracing from a Terminal/Netname
Here's a connection without a security server, likely the terminal name will be reassigned before dhcp is an issue. ENTER VTAM COMMAND d net,id=TC4P0007,e IST097I DISPLAY ACCEPTED IST075I NAME = UMBINET.TC4P0007 , TYPE = DYNAMIC APPL IST486I STATUS= ACT/S , DESIRED STATE= ACTIV IST1447I REGISTRATION TYPE = CDSERVR IST1629I MODSRCH = NEVER IST977I MDLTAB=***NA*** ASLTAB=***NA*** IST861I MODETAB=ISTINCLM USSTAB=***NA*** LOGTAB=***NA*** IST934I DLOGMOD=D4C32XX3 USS LANGTAB=***NA*** IST1632I VPACING = 7 IST1938I APPC = NO IST597I CAPABILITY-PLU ENABLED ,SLU ENABLED ,SESSION LIMIT 0001 IST231I APPL MAJOR NODE = AKCTCP40 IST1425I DEFINED USING MODEL TC4? IST654I I/O TRACE = OFF, BUFFER TRACE = OFF IST1500I STATE TRACE = OFF IST271I JOBNAME = TN3270D , STEPNAME = TN3270D , DSPNAME = IST25275 IST1050I MAXIMUM COMPRESSION LEVEL - INPUT = 0 , OUTPUT = 0 IST1633I ASRCVLM = 100 IST1634I DATA SPACE USAGE: CURRENT = 0 MAXIMUM = 0 IST1669I IPADDR..PORT 172.19.32.46..3987 *** 816.860.1149 desk 816.686.1536 cell Dear All, We had a user trying to logon using somebody's elses user-id, and he accidently (or on purpose) enter a wrong password for more than 3 times, that caused that id to actually revoked by RACF. Is there a way to trace that back to the computer names/IP? So we can know for sure who or at least from whose terminal that does that? We saw the syslog and sees something like this M 008 ESAT 08218 16:31:53.52 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 855 E 855 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:54.25 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 856 E 856 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:54.99 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 857 E 857 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:55.69 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 858 E 858 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:56.52 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 859 E 859 0294LOGON/JOB INITIATION - INVALID PASSWORD ENTERED AT TERMINAL GI15126 M 008 ESAT 08218 16:31:57.35 0294 ICH408I USER(USERID1 ) GROUP(APLIDS1 ) NAME(USER ID ONE NAME) 860 E 860 0294LOGON/JOB INITIATION - EXCESSIVE PASSWORDS OR INACTIVE USER The terminal GI15126 is IP POOLed Terminal, dynamic depending on the request. It stays on somebodys's emulator until he/she closes it. So if I want to know, during this time terminal GI15126 is being opened by whose PC's name/IP how? Any help and suggestion is highly appreciated. Thank you Regards, Frans -- 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 -- NOTICE: This electronic mail message and any attached files are confidential. The information is exclusively for the use of the individual or entity intended as the recipient. If you are not the intended recipient, any use, copying, printing, reviewing, retention, disclosure, distribution or forwarding of the message or any attached file is not authorized and is strictly prohibited. If you have received this electronic mail message in error, please advise the sender by reply electronic mail immediately and permanently delete the original transmission, any attachments and any copies of this message from your computer system. 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: Politics - California state computers can't handle pay cut, controller says - sacbee.com
And Computerworld has a slightly different take http://cwflyris.computerworld.com/t/3409405/121975425/131431/0 -Original Message- Kelman, Tom Arggg, even InfoWorld seems to be publishing the idea of COBOL being archaic as technically accurate. -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 09:20:16 -0500, Paul Gilmartin wrote: If the user specifies MARGINS(1-*) (whatever syntax), is the behavior identical to that of interpreted Rexx? Are line lengths preserved, not padded to the right margin value? The default is MARGINS(1 *), unless there are sequence numbers in the first record: http://publibz.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/h1981605/1.3.1.14?DT=20030825101721 Norbert Friemel -- 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: Dynamic SYSLOG LOGCLS change
On Thu, 7 Aug 2008 13:41:12 -0500, Rabbe, Luke [EMAIL PROTECTED] wrote: Is there a way to dynamically (without an IPL) change the SYSLOG LOGCLS? We set ours in IEASYSxx. I know you can specify the class in the WRITELOG command, but I don't want to have to issue that periodically. I think someone (Sam Knuston?) may have posted a storage zap to do this if you really want to (obviously you need a tool like Omegamon / TMON to alter storage). Or maybe he was the one trying to do it. Check the archives. Mark -- 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
Re: SMS and DFDSS
Bob, I believe you cannot add or change a dataclass to an existing dataset. The dataset must be reallocated new. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Lester, Bob Sent: Thursday, August 07, 2008 8:17 AM To: IBM-MAIN@BAMA.UA.EDU Subject: SMS and DFDSS Hi Folks, I'm trying to assign a DATACLAS to some existing SMS datasets that don't have one, so they can extend to multiple volumes. I've done a logical DFDSS dump of the datasets (all PS). I've deleted the datasets that were dumped. I've Updated my DATACLAS ACS routines to assign the DATACLAS based on dsname. I've validated and activated the new SMS configuration. I run the restore, but the DATACLAS remains blank? What am I missing? Is this not possible? Is there a better way? Thanks! Bob Lester Technical Services Systems and Storage OppenheimerFunds -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 11:52:44 -0500, Paul Gilmartin wrote: Does CONDENSE provide industrial strength encryption, or merely make the code slightly harder to read at a casual glance? The condensed program is uncondensed in storage prior to execution. While a condensed compiled REXX program is running, both the condensed and the uncondensed copy exist in storage. http://publibz.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/h1981605/1.3.1.5?DT=20030825101721 Norbert Friemel -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
Syncsort should be able to copy your file into a FB using CONCERT on the OUTREC. BR14 does need a block size when generating an empty file. //CONV040 EXEC PGM=SYNCSORT,PARM='DYNALLOC' //SORTIN DD DISP=SHR,DSN=input //SORTOF1 DD DSN=output, // DISP=(,CATLG,DELETE), // UNIT=DISK, // SPACE=(CYL,(75,10),RLSE), // DCB=(RECFM=FB,LRECL=0259,BLKSIZE=0) //SYSOUT DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSUDUMP DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSABOUT DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSDBOUT DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSINDD * SORT FIELDS=COPY OUTFIL FILES=1, OUTREC=(1,259),CONVERT -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Rahul Karsija Sent: Thursday, August 07, 2008 3:07 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Converting / Copying a dataset from RECFM=UA to RECFM=FB Hi I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. Please help me. Thanks Regards Rahul Karsija -- 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: SMS and DFDSS
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Traylor, Terry Sent: Thursday, August 07, 2008 2:03 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS Bob, I believe you cannot add or change a dataclass to an existing dataset. The dataset must be reallocated new. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 Hi Terry, Yes, it appears that DFDSS won't allow it. DMS (CA-Disk) does support this, but the test I did resulted in dataset that SAS/ITRM didn't like. I'm getting a bit cranky with SAS at this point. They've told us they support EF datasets, but when we called today we got a different answer. Grrr. There, I feel better now. Thanks! Bob Lester -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
On second thought I don't believe this will work with a UA format. You might try IEBDG. //IEBDGEXEC PGM=IEBDG //SYSPRINT DD SYSOUT=(,),OUTPUT=(*.JCL) //INDD DD DSN=input //OUTDDDD DSN=FB, //DISP=(NEW,PASS), //UNIT=WORK, //SPACE=(CYL,(75,10),RLSE), //DCB=(RECFM=FB,LRECL=???,BLKSIZE=0) //SYSINDD * DSD INPUT=(INDD),OUTPUT=(OUTDD) FDNAME=F1,LENGTH=???,STARTLOC=001,FROMLOC=001,INPUT=INDD CREATEINPUT=INDD,NAME=(F1) END /* -Original Message- From: HUTCHISON Gregory Sent: Thursday, August 07, 2008 1:29 PM To: 'IBM Mainframe Discussion List' Subject: RE: Converting / Copying a dataset from RECFM=UA to RECFM=FB Syncsort should be able to copy your file into a FB using CONCERT on the OUTREC. BR14 does need a block size when generating an empty file. //CONV040 EXEC PGM=SYNCSORT,PARM='DYNALLOC' //SORTIN DD DISP=SHR,DSN=input //SORTOF1 DD DSN=output, // DISP=(,CATLG,DELETE), // UNIT=DISK, // SPACE=(CYL,(75,10),RLSE), // DCB=(RECFM=FB,LRECL=0259,BLKSIZE=0) //SYSOUT DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSUDUMP DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSABOUT DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSDBOUT DD SYSOUT=(,),OUTPUT=(*.JCL) //SYSINDD * SORT FIELDS=COPY OUTFIL FILES=1, OUTREC=(1,259),CONVERT -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Rahul Karsija Sent: Thursday, August 07, 2008 3:07 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Converting / Copying a dataset from RECFM=UA to RECFM=FB Hi I need to convert a dataset from RECFM=UA to RECFM=FB. I tried to copy it using IDCAMS but was unsuccessful. I also wrote a small program to read the input records and then write them to output file but that did not work either. Using SORT with OPTION COPY was also not helpful, got message - ICE043A 3 INVALID DATA SET ATTRIBUTES SPECIFIED SORTIN RECFM Given below are the parameters of the input file - Organization . . . : PS Record format . . . : UA Record length . . . : 133 Block size . . . . : 101 1st extent cylinders: 1 Secondary cylinders : 50 Have also tried using IBM TRSMAIN (first PACK and then UNPACK) but that also creates the final output file as UA. Please help me. Thanks Regards Rahul Karsija -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
--snip-- I think reading recfm u returns the length in register 1. If he writes variable he will be responsible for the block and record prefixes. It should be simpler to write fixed with a little blank padding. --unsnip- IIRC, the actual record length is returned in the LRECL field of the DCB, at least under QSAM. Specify a BLKSIZE of about !%), just in case there's a long record, then move the returned record (using DCBLRECL as the length) into a field of blanks, then do a PUT to another QSAM DCB and you should be all set. Re-blank the area before moving the next logical record into it, to prevent overlap from previous lines. Contact me offline and I'll give you a really simple-minded program to do just that. -- 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: SMS and DFDSS
Right. I believe SAS files still have the 65k track limitation per volume. And I don't think they support large format either. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Lester, Bob Sent: Thursday, August 07, 2008 2:24 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Traylor, Terry Sent: Thursday, August 07, 2008 2:03 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS Bob, I believe you cannot add or change a dataclass to an existing dataset. The dataset must be reallocated new. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 Hi Terry, Yes, it appears that DFDSS won't allow it. DMS (CA-Disk) does support this, but the test I did resulted in dataset that SAS/ITRM didn't like. I'm getting a bit cranky with SAS at this point. They've told us they support EF datasets, but when we called today we got a different answer. Grrr. There, I feel better now. Thanks! Bob Lester -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: Formula for the size of page datasets
-snip- Is there a formula for the size of page datasets based on the size of the LPAR ? unsnip-- I dson't know of any hard-and-fast formula, but there are some guidelines in the Init Tuning manuals. I typically give 1/3 of a 3390-3 volume for a single paging dataset, populating the remainder of the volume with low-use datasets. I also plan on being ready to add at least two more page datasets of similar size, in case of an emergency that might arise due to shortages. Running roughly 300 address spaces, I found that four of these page datasets was about right, with no more than 50% utilization of any one of them. -- 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: SMS and DFDSS
SAS supports DSNTYPE=LARGE for both libnames and filenames starting in 9.2. According to a user group paper, A single SAS Library can now be up to 54GB on a single volume, and up to 2.9TB in a multivolume library. There is some DSNTYPE=LARGE support in 9.1.3 with a hotfix. -- Jack Hamilton Management Information Analysis - Analytic Information Services Kaiser Foundation Health Plan, Inc. 1950 Franklin Street, Oakland, California 94612 +1 510 987-1556 (KP tieline 8-427-1556) NOTE: This email document and attachments are covered by CA Evidence Code §1157 and CA Health and Safety Code §1370. NOTICE TO RECIPIENT: If you are not the intended recipient of this e-mail, you are prohibited from sharing, copying, or otherwise using or disclosing its contents. If you have received this e-mail in error, please notify the sender immediately by reply e-mail and permanently delete this e-mail and any attachments without reading, forwarding or saving them. Thank you. Traylor, Terry [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 08/07/2008 02:53 PM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject Re: [IBM-MAIN] SMS and DFDSS Right. I believe SAS files still have the 65k track limitation per volume. And I don't think they support large format either. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Lester, Bob Sent: Thursday, August 07, 2008 2:24 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Traylor, Terry Sent: Thursday, August 07, 2008 2:03 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS Bob, I believe you cannot add or change a dataclass to an existing dataset. The dataset must be reallocated new. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 Hi Terry, Yes, it appears that DFDSS won't allow it. DMS (CA-Disk) does support this, but the test I did resulted in dataset that SAS/ITRM didn't like. I'm getting a bit cranky with SAS at this point. They've told us they support EF datasets, but when we called today we got a different answer. Grrr. There, I feel better now. Thanks! Bob Lester -- This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately by return e-mail and delete all copies. OppenheimerFunds may, at its sole discretion, monitor, review, retain and/or disclose the content of all email communications. == -- 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: SMS and DFDSS
On Thu, 7 Aug 2008 14:53:43 -0700, Traylor, Terry [EMAIL PROTECTED] wrote: Right. I believe SAS files still have the 65k track limitation per volume. And I don't think they support large format either. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Lester, Bob Sent: Thursday, August 07, 2008 2:24 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Traylor, Terry Sent: Thursday, August 07, 2008 2:03 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: SMS and DFDSS Bob, I believe you cannot add or change a dataclass to an existing dataset. The dataset must be reallocated new. Terry Traylor charlesSCHWAB TIS Mainframe Storage Management Remedy Queue: tis-hs-mstg (602) 977-5154 Hi Terry, Yes, it appears that DFDSS won't allow it. DMS (CA-Disk) does support this, but the test I did resulted in dataset that SAS/ITRM didn't like. I'm getting a bit cranky with SAS at this point. They've told us they support EF datasets, but when we called today we got a different answer. Grrr. There, I feel better now. Thanks! Bob Lester SAS 9.1.3 SP4 with additional maintenance provides DSNTYPE=LARGE support. Simple search of SAS support website revealed this gem: Problem Note 17038: Limited support in SAS® 9.1.3 SP4 for DSNTYPE=LARGE data sets when running under z/OS Releases V1R7 and later http://support.sas.com/kb/17/038.html Scott Barry SBBWorks, Inc. -- 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: Compiled Rexx portabilty
Does CONDENSE provide industrial strength encryption, or merely make the code slightly harder to read at a casual glance? CONDENSE makes REXX source impossible to read with the naked eye. This is true for both CEXEC and load module formats, as otherwise the source would be visible regardless of which format was used. If someone wanted to go to the trouble of extracting source from a compiled/condensed REXX executable, I guess it would be possible. However, source can be extracted from regular load modules even more easily than extracting it from REXX, so I think compiled/condensed REXX still offers a very good way to protect intellectual property. Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/SIM/simplist.htm _ Find hidden words, unscramble celebrity names, or try the ultimate crossword puzzle with Live Search Games. Play now! http://g.msn.ca/ca55/212 -- 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: Compiled Rexx portabilty
On Thu, 7 Aug 2008 15:20:11 -0500, Norbert Friemel wrote: Does CONDENSE provide industrial strength encryption, or merely make the code slightly harder to read at a casual glance? The condensed program is uncondensed in storage prior to execution. While a condensed compiled REXX program is running, both the condensed and the uncondensed copy exist in storage. Thanks. I see that. And I see two paragraphs below: Note: The CONDENSE option can also be used to make a program unreadable if the source lines were included in the compiled program using the SLINE option. These seem slightly contradictory, unless one assumes the weak meaning of unreadable, i.e. to the naked eye. If the uncondensed copy with the source lines exists in storage, it would seem easy enough to cause an interruption, take a dump, and decipher it; little IP protection to a determined pirate. http://publibz.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/h1981605/1.3.1.5?DT=20030825101721 Thanks; How'd you find this link? I can follow it easily enough, but it doesn't turn up in any shelf indexes on publibz that I tried. -- 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
SMP/E v3r5
On Tue, 5 Aug 2008 11:59:26 -0400, Pamela Christina in warm sunny Endicott NY wrote: You can find the ann-let text on your favorite geo announcement site, or you can also look on the z/VM site info/changes page. http://www.vm.ibm.com/siteinfo/change.html ... where I read: If you are using z/OS V1.6 or z/OS V1.7 (SMP/E V3.3 or SMP/E V3.4), you will need to install the following SMP/E coexistence PTFs to continue to RECEIVE HOLDDATA, ... And publibz tells me that SMP/E v3r5 is associated with z/OS 1.10. So, I wonder: o Will SMP/E v3r5 be available at no additional charge to customers of supported releases of z/OS, as was the case with a few earlier releases of SMP/E? o Or, are there upward compatibility issues for earlier z/OS releases? o Would instructing customers requiring coexistence to upgrade rather than providing coexistence PTFs relieve IBM of the burden of triply parallel support and allow IBM to provide better customer support by concentrating on a single release? -- 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: Converting / Copying a dataset from RECFM=UA to RECFM=FB
On Thu, 7 Aug 2008 13:28:47 -0700, HUTCHISON Gregory wrote: BR14 does need a block size when generating an empty file. ??? o First, IEFBR14 (I assume that's what you meant) doesn't generate any file. It does no I/O. It issues no SVC. This has been much discussed on this list. o Then, whatever creates the file (I assume it's allocation) does _not_ need a block size, as in the following job step: //STEP EXEC PGM=IEFBR14 //DDDDISP=(,CATLG),UNIT=SYSALLDA,SPACE=(CYL,1), // RECFM=FB,LRECL=80, // DSN=SYSUID..TEMP.EMPTY ... which leaves visible in Data Set Info: Data Set Information Data Set Name . . . . : user.TEMP.EMPTY General Data Current Allocation Management class . . : **None**Allocated cylinders : 1 Storage class . . . : **None**Allocated extents . : 1 Volume serial . . . : TSO017 Device type . . . . : 3390 Data class . . . . . : **None** Current Utilization Organization . . . : NONEUsed cylinders . . : 0 Record format . . . : FB Used extents . . . : 0 Record length . . . : 80 Block size . . . . : 0 1st extent cylinders: 1 Secondary cylinders : 0 Data set name type : Creation date . . . : 2008/08/07 Referenced date . . : ***None*** Expiration date . . : ***None*** worked fine with no block size given. -- 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: SMP/E v3r5
Gil, See Announcement letter 208-269: http://www-01.ibm.com/common/ssi/index.wss?DocURL=http://www-01.ibm.com/ common/ssi/rep_ca/4/897/ENUSC08-034/index.htmlInfoType=ANInfoSubType=C AInfoDesc=Announcement+Letterspanelurl=index.wss%3Fbuttonpressed%3DDET 003PT011%26hfdd%3D%26hfud%3D%26timestamp%3D1218157029861%26user%3DEXT%26 page%3D1%26DET003PGL001%3DUS.en.en_US.MM-dd-%26us_hc_index%3Ddefault %26homecountry%3DAMR.US%26us_dl_index%3DALANG%26documentlanguage%3Den%26 display_index%3DNAV002PEF005%26NAV002PGL001%3DNAV002PEF005%26det003pef00 3%3DEXTERNAL%26coincidence_index%3D0%26submit.x%3D41%26submit.y%3D10pan eltext=Announcement%20letter%20search#208-269 Wow, that's onw of the longer URLS. Alan Pamela Christina in warm sunny Endicott NY wrote: You can find the ann-let text on your favorite geo announcement site, or you can also look on the z/VM site info/changes page. http://www.vm.ibm.com/siteinfo/change.html ... where I read: If you are using z/OS V1.6 or z/OS V1.7 (SMP/E V3.3 or SMP/E V3.4), you will need to install the following SMP/E coexistence PTFs to continue to RECEIVE HOLDDATA, ... And publibz tells me that SMP/E v3r5 is associated with z/OS 1.10. So, I wonder: o Will SMP/E v3r5 be available at no additional charge to customers of supported releases of z/OS, as was the case with a few earlier releases of SMP/E? o Or, are there upward compatibility issues for earlier z/OS releases? o Would instructing customers requiring coexistence to upgrade rather than providing coexistence PTFs relieve IBM of the burden of triply parallel support and allow IBM to provide better customer support by concentrating on a single release? -- 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: Formula for the size of page datasets
I typically give 1/3 of a 3390-3 volume for a single paging dataset, populating the remainder of the volume with low-use datasets. I always use a full 3390-3 (times three minimum) page pack. I never populate the volume with so-called 'low-use' I also plan on being ready to add at least two more page datasets of similar size, in case of an emergency that might arise due to shortages If I have to add one, I update IEASYSxx after the pageadd, and never delete one. Of course, I then create another spare for that system. I also pull the old stunt of a 1-cyl PLPA overflowing to Common on the same pack. Ideally, I don't page. - Too busy driving to stop for gas! -- 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
C.D. Keltie is away.
I will be out of the office starting 08/08/2008 and will not return until 18/08/2008. -- 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: Invalid dataset name in catalog, how to remove
Ken Leidner wrote: I have a tape dataset cataloged over 10 years ago with a very strange - invalid name. I am not sure how it was created, but I would like to remove it from the catalog. The tape has scratched years ago and I found this odd dataset name and would like to remove it from the catalog without having to zap the catalog to change its name first. Any suggestions? I have tried; In TSO a DELETE 'P.FSPOL.SBHF38AA(0)' noscratch IKJ56709I INVALID DATA SET NAME, 'P.FSPOL.SBHF38AA(0)' ISMF doesn't even find the dataset, even when looking for a prefix of the dataset name (like 'P.FSPOL.SB*.**’) Running IEFBR14 in batch gives //STEP0EXEC PGM=IEFBR14 //DD1 DD DSN='P.FSPOL.SBHF38AA(0)',DISP=(OLD,UNCATLG) IEF212I CJ4130BT STEP0 DD1 - DATA SET NOT FOUND How did you find the catalog entry in the first place? Is it in the Master Catalog or some User Catalog? I think when you use a quoted DSN in JCL, that tells the system it shouldn't parse the internals of the name at all, so there's probably no way it could associate a catalog alias to find the entry if it's not in the Master Catalog. If the entry is in some User Catalog, back in the old days before STEPCAT was disallowed, a STEPCAT DD could have been used to point to the correct catalog. But, with STEPCAT unavailable, try a batch IDCAMS step to uncatalog the dataset with DELETE P.FSPOL.SBHF38AA(0) NOSCRATCH CAT(usercatname) (that assumes that IDCAMS doesn't get in the way and attempt to resolve this dsn as a relative GDG reference). TSO fails because it always attempts to interpret DSN parentheses as a PDS member reference and the member name is invalid. The ISMF failure to find anything suggests that either P or P.FSPOL is either not set up as a catalog alias (and the dsn is not in the master catalog), or it is set up as an alias that points to a different USERCAT than the one with the bogus entry, or perhaps ISMF does find the entry and just can't deal with the non-standard name. The IEFBR14 failure suggests that the entry is not in the Master Catalog. -- Joel C. Ewing, Fort Smith, AR[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: embarresing request
My embarresing response is that the NODES class won't help him. I seem not to see those characters MAS in his post. Mark said: John says he has a JES2 MAS. How will NODES help him - it's all one node? -- 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 v3r5
In a message dated 8/7/2008 8:00:02 P.M. Central Daylight Time, [EMAIL PROTECTED] writes: Wow, that's onw of the longer URLS. I thought it looked bogus with maybe a misinterpreted MIMEarithm. Anyway guess it's just all the indexing. It works! It 'tinys' too... http://tinyurl.com/6g6rjs **Looking for a car that's sporty, fun and fits in your budget? Read reviews on AOL Autos. (http://autos.aol.com/cars-BMW-128-2008/expert-review?ncid=aolaut000517 ) -- 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