Re: Z Toolkit for z/OS Install
Peter, https://www-304.ibm.com/support/docview.wss?uid=isg1OA15228 Do you have any specific references for how you are indicating that the region inheritance works? Sorry for the late reply to your question, Rob I had done some tests some years ago but unfortunately I can't find the results anymmore, so all I know and wrote is what my memory is remembering. The TSO/OMVS case I described below is not completely correct. (In the darly days, I seem to remember, it was.) When starting a *non-local* shell using TSO/OMVS, then the ASSIZEMAX and MAXASSIZE are used to set the region size for the shell address space. (If the shell is started locally, i.e. in the TSO AS, then the region size is not changed.) I searched the archives of IBM-MAIN and MVS-OE and found a post from Don Ault. In December 1998 he explained: MAXASSIZE is used whenever you have a setuid/exec or spawn with userid which the kernel interprets as a daemon creating a user process. (At that time ASSIZEMAX did not yet exist in the OMVS segment.) This is what I meant with the following statement I posted earlier, I just could not remember exactly when it happens. The ASSIZEMAX and MAXASSIZE values will only apply when it is not reasonable to inherit from the parent such as when logging in. E.g. it is not reasonable to inherit from indetd, so ASSIZEMAX/MAXASSIZE will be used. (I don't have the details handy to tell here.) -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME) 479 /TEST/COMPRESS9 CL(FSOBJ ) FID(38130041) INSUFFICIENT AUTHORITY TO OPEN ACCESS INTENT(RW-) ACCESS ALLOWED(OWNER ---) EFFECTIVE UID(000999) EFFECTIVE GID(01) Someone mentioned that the RACF message say it all. While this is true, nobody cared to explan what the message says in detail. John was suggesting to change access rights for the /TEST directory. But the message says CL(FSOBJ) which means the access is failing on the actual last part of the pathname shown, i.e. COMPRESS9. The message would show CL(DIRSRCH) when the access was failing due to missing permission on a directory in the path. Next the message says you wanted to get rw access (ACCESS INTENT(rw)) but do not have any access as owner of the entry (ACCESS ALLOWED(OWNER ---)). The keyword OWNER in the last part is telling you that you indeed are the owner of the entry, so you can change permission on you own. No need to ask the, obviously somewhat UNIX ignorant (no offence intended), RACF admin. -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
Have your RACF person to provide : CHMOD 777 /TEST/COMPRESS9 to execute this command in OMVS. Also ask them to change the owner by CHOWN command.. Why are you suggesting to change the mode to 777. First, the file seems to receive the content of a pax archive, so it is not an executable file. Therefore, *do not* set the executable bit. Second, why do you think anybody should get full read and write access to this file? It is difficult so tell what the desired permission would be, since the OP did not tell about the intended use of the file. If you still want to chown, I'd suggest to set the mode to 644 at most. This was the owner can read and write and all other can read it. If you care a bit about security, then: - only ever set the executable bit it the file is intended to be an executable: either a script file or a binary (aka load module). - only ever allow read when read is requires, only ever allow write access when write is required. Recommendation: UNIXes are case sensitve, you should adhere to this when writing down commands. Someone might copy and paste and wonder about an FSUM7351 not found error. Also, it is not good habit to use all uppercase directory and filenames. It is more usual to have them all lower case, and sometimes mixed case (especially when developping java code). -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
COPY commands under JCL vs. under Unix System Services
Hi Henrique, Why don´t you try with the IEBGENER? I use this one to copy files from OMVS to Z/os. //JOB1 JOB 999,'ME',NOTIFY=SYSUID,CLASS=A,MSGCLASS=H, //MSGLEVEL=(1,1) //CREAFICH EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSINDD DUMMY //SYSUT1 DD PATHOPTS=(ORDONLY),RECFM=FB,LRECL=80,BLKSIZE=800, //PATH='/u/userid/testcopydataset' //SYSUT2 DD DSN=USERID.TEMP.TESTCOPY.DATASET, //DISP=(,CATLG,DELETE), //UNIT=3390, //SPACE=(CYL,(1,1)), //RECFM=FB,LRECL=80 Remember the OMVS datasets are case sensitive. Enrique Montero -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
//SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHDISP=(KEEP,DELETE) //SYSIN DD DUMMY You also need // PATHMODE=() otherwise the system creates the file with mode 000 (see JCL manual), which is what you see in the RACF message. -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Dashboard type software for monitoring z/OS - Thank You
To all, Many many THANKS to all who replied to me on this list and also offline. All and every answer were very useful and will be reviewed. Whew! This lists is terrific! Many thanks! :-) Again many thanks to all who kindly replied on this thread! All of you are 100% excellent! ;-D Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ICEGENER and VSAM
W dniu 2011-08-26 05:41, Stewart, David James pisze: Hi Can anyone confirm for me if ICEGENER when used to copy to a VSAM cluster (SYSUT2) will preserve the CI/CA freespace parameters if they are 0. I haven't checked it, but I guess it depends. It could depend on VSAM file status (is it new or not, is it defined with REUSE, etc.) -- Radoslaw Skorupka Lodz, Poland -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMPE ZONEINDEX definition for DLIB and TARGET zones
Hi listers, In the distribution of z/OS V1R11 SMPE is defined to the global zone the DLIB and TARGET zones of MQSeries V6 and V7. Well, my problem is that MQ V6 SMP files doesn't exist, so, I cannot update the rest of the SMP files. I tried to ZONEDELETE them but then issues messages telling about the inexistence of the VSAM files, I have defined and initiated them and tried again but then issues message GIM50801S tellig about the inexistence of ZONEINDEX of the zones. Well, I have seen about the definition of ZONEINDEX but I see this is done at the GLOBAL zone, the GLOBAL zone exists and is correct so I understand that I don't need to define it, or yes¿? :-S When you do ZONEDELETE the set must be done to the ZONE that you want to delete so the ZONEINDEX, where is¿? Some help will be appreciated. Thanks and have a nice day guys. Álvaro. -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMPE ZONEINDEX definition for DLIB and TARGET zones
Hi again, I have solved my problem, I was convinced that the CSI must be the one that contains the data, I put the global CSI and reprocess my ZONEDELETEs succesfully. Now I cannot know if was really necessary to define the VSAM files... Thanks anyway. ByE! 2011/8/26 Alvaro Guirao Lopez alvarogui...@gmail.com Hi listers, In the distribution of z/OS V1R11 SMPE is defined to the global zone the DLIB and TARGET zones of MQSeries V6 and V7. Well, my problem is that MQ V6 SMP files doesn't exist, so, I cannot update the rest of the SMP files. I tried to ZONEDELETE them but then issues messages telling about the inexistence of the VSAM files, I have defined and initiated them and tried again but then issues message GIM50801S tellig about the inexistence of ZONEINDEX of the zones. Well, I have seen about the definition of ZONEINDEX but I see this is done at the GLOBAL zone, the GLOBAL zone exists and is correct so I understand that I don't need to define it, or yes¿? :-S When you do ZONEDELETE the set must be done to the ZONE that you want to delete so the ZONEINDEX, where is¿? Some help will be appreciated. Thanks and have a nice day guys. Álvaro. -- Un saludo. Álvaro Guirao -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
Second, why do you think anybody should get full read and write access to this file? They were being sarcastic. Somebody else pointed out, due to cultural and language differences, that not everybody would catch on to that. Appears he was right. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
Is not the original abend a S322(CPU timeout)? -Original Message- From: Skip Robinson [mailto:jo.skip.robin...@sce.com] Sent: Thursday, August 25, 2011 6:01 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Help with an LE problem I've had good luck with COBOL problems by setting a NONPER SLIP trap with no abend code specified. Just job name. SLIP is supposed to catch the first abend--before any ESTAE gets control--and produce an SVC dump for that abend. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Binyamin Dissen bdis...@dissensoftware.com To: IBM-MAIN@bama.ua.edu Date: 08/25/2011 02:31 PM Subject:Help with an LE problem Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu I have a CEEDUMP with CEE3250C The system or user abend U 802 R=NULL was issued. ABEND code: 0322 Reason code: CIB: +00 000F37F8 C3C9C240 010C0004 00040CB2 61C3C5C5 |CIB /CEE| +20 000F3818 000B 000F3908 00040CB2 61C3C5C5 000B 000EF1C8 C0D68988 |/CEE..1H.Oih| +40 000F3838 000F1BF8 43D7CADC 000EC478 0005 000EF2B8 |...8.PD...2.| +60 000F3858 || +80 000F3878 - +9F 000F3897 same as above +A0 000F3898 80015000 0322 |...| +C0 000F38B8 43D78DFC 000F1BF8 000F1BF8 43D7CADC 0001 |.P.8...8.P..| +E0 000F38D8 000EF1C8 0005 0064 FFFC 0001 000E98D0 |..1H..q.| +000100 000F38F8 0012 000EC690 E9D4C3C8 0201 43D08008 |..F.ZMCH| But the neither the PSW nor the registers are consistent with this abend. The registers and PSW are consistent with the Exception location. The ZMCH block has the exception information. It is a COBOL program compiled with THREAD. I guess I will need a real dump, but have no idea how to trap it - after all I do not see an abend. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: COPY commands under JCL vs. under Unix System Services
On Thu, 25 Aug 2011 13:45:12 -0500, Henrique Seganfredo henrique.seganfr...@bcb.gov.br wrote: Hello, I am trying to run a job that calls BPXBATCH do execute a Unix script. Far easier to use Co:Z batch... The Unix script tries to copy the file from the Unix environment to a MVS dataset. I have tried these two approaches. The filename is variable. 1) cp -P RECFM=FB,SPACE=(CYL,(1,1)),LRECL=96,BLKSIZE=0 $myfilevar.ebcdic //'PSTR.TEMP' I have tested this with exactly your JCL. Works like a charm... JCL: //XXX JOB YY,TIME=1 //COPY EXEC PGM=BPXBATCH,REGION=8M,COND=(0,NE) //STDINDD SYSOUT=* //STDOUT DD SYSOUT=* //STDPARM DD * sh /spb/bin/Copy.sh //* Why the dataset appears to be in use ?? It DOES NOT EVEN exists! I suggest you look again. It must exist... Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: EXEC CICS FORMATTIME issue
On Thu, 25 Aug 2011 12:41:24 -0700, william janulin wjanu...@yahoo.com wrote: To list; Not sure if this is the correct forum to post this. If not, can someone point me in the right diection. It is not... Try CICS-L, there are very competent people over there. You can join the list at http://www.listserv.uga.edu/cgi-bin/wa?SUBED1=cics-lA=1 EXEC. Call DFHEI1 using by content x4a048483078483 - f0f0f5f2404040 by reference RAWTIME by content x content x by content x by content x000 reference DATE-OUT by content x by content x by content x by content x by content x = IGYPS2106-S BY was found in the CALL statement. It was not all allowed in this content x by content x by reference TIME-OUT by end-call. IGYPS2113-E The explicit scope terminator END-CALL was found without a matching verb. The scope terminator was discarded. Could it be that you have the COBOL compile option APOST on your compile and forgot to tell the pre-processor to generated apostrophes instead of (I think the default) quotes? Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
Second, why do you think anybody should get full read and write access to this file? They were being sarcastic. I saw those post and I fully agree. But I don't think the post I was refering to was meant to be sarcastic. Neither by the wording used nor by the person posting. And from my own experience I can tell many MVS people tend to set permissions wrong in their early days of zO/S UNIX experience. But after all, I might as well have been caught by said cultural and language differences :-) -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com... Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao Of course you can with Region. Even lnklst modules are loaded into your region. What is the abendcode? 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
Yeah, I know I can try that. What I really do not understand is why I do not have registers that match the alleged user abend. Also, I cannot find this abend in LE or COBOL. On Thu, 25 Aug 2011 15:00:54 -0700 Skip Robinson jo.skip.robin...@sce.com wrote: :I've had good luck with COBOL problems by setting a NONPER SLIP trap with :no abend code specified. Just job name. SLIP is supposed to catch the :first abend--before any ESTAE gets control--and produce an SVC dump for :that abend. : :. :. :JO.Skip Robinson :SCE Infrastructure Technology Services :Electric Dragon Team Paddler :SHARE MVS Program Co-Manager :626-302-7535 Office :323-715-0595 Mobile :jo.skip.robin...@sce.com : : : :From: Binyamin Dissen bdis...@dissensoftware.com :To: IBM-MAIN@bama.ua.edu :Date: 08/25/2011 02:31 PM :Subject:Help with an LE problem :Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu : : : :I have a CEEDUMP with : :CEE3250C The system or user abend U 802 R=NULL was issued. : : ABEND code: 0322 Reason code: : :CIB: : : +00 000F37F8 C3C9C240 010C0004 : 00040CB2 61C3C5C5 |CIB /CEE| : +20 000F3818 000B 000F3908 00040CB2 61C3C5C5 000B : 000EF1C8 C0D68988 |/CEE..1H.Oih| : +40 000F3838 000F1BF8 43D7CADC 000EC478 0005 :000EF2B8 |...8.PD...2.| : +60 000F3858 : || : +80 000F3878 - +9F 000F3897 same as above : +A0 000F3898 80015000 :0322 |...| : +C0 000F38B8 43D78DFC 000F1BF8 000F1BF8 43D7CADC : 0001 |.P.8...8.P..| : +E0 000F38D8 000EF1C8 0005 0064 FFFC 0001 : 000E98D0 |..1H..q.| : +000100 000F38F8 0012 000EC690 E9D4C3C8 :0201 43D08008 |..F.ZMCH| : :But the neither the PSW nor the registers are consistent with this abend. :The :registers and PSW are consistent with the Exception location. : :The ZMCH block has the exception information. : :It is a COBOL program compiled with THREAD. : :I guess I will need a real dump, but have no idea how to trap it - after :all I :do not see an abend. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Fwd: mfnetdisk - A new message was received in your Site
HI, Latly I change the CODE_REQ condition to download my code. The change is that everyone who download my product must agree to enable me to publish their experience with the product. Before this change I enable the user to select option to do not publish my feedback and my id. Lately I delete this option. So, if you download my code, you must let me publish your feedback if I like to do so. So, only users who enable me to publish their experience with the product can download my code. Why I did it? Because I work hard to make the product good. I do not ask money for the product. I pay money to cover the cost I need to pay for the product. I support the product in any time. Even if my city is attacked by rockets (Did I Richard?) I continue to support the product fi the user need me. So, I feel that this is OK with me to ask and force my users to enable me to publish their experience with my product. I know that in some cases users who works for companies which do not like my product because it can hurt their business, ask me to keep confident. In this case I will not publish their feedback. About charging users with money? I do not have intention to become company which charge money from users. The only option which exist for me is to continue with this status, or to sell my product to big company. So, no charging money as long as I am the owner of the product. I attach one of many user code request for my code from today. Thanks, Shai -- Forwarded message -- From: wayn...@gmail.com Date: Thu, Aug 25, 2011 at 10:13 PM Subject: mfnetdisk - A new message was received in your Site To: shai.h...@gmail.com *mfnetdisk - A new message was received in your Site* Dear Administrator! A new message was received through a form in your site. Form name: *code request* Form content: * - Full name: Wayne Bickerdike E-mail: wayn...@gmail.com Country and state Australia Vic ZOS version 1.8 Linux or Windows Both Required MFNetDisk feature (Disk, tape emulation, replication) All features MFNetDisk experience and comments. You can attach text file instead. I have tested replication and this is a feature I would like to implement to save offsite FTP backups. OK to publish your MFNetDisk comments? Yes, with my email and name Company (optional) Add MFNetDisk feedback in text file (optional). No file attached Contribute in the future? Yes - * - To view the message, login as an administrator through the following link: http://www.livecity.co.il/join/login.asp?depart_id=43973departResell_id=17914pathTXT=/site/include/newfeel/website3/index.asp?toolBoxBOO=1 (If the link does not work, copy and paste it into your browser). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
On Fri, 26 Aug 2011 07:16:18 -0400 Sambataro, Anthony (NIH/NBS) [E] anthony.sambat...@nih.gov wrote: :Is not the original abend a S322(CPU timeout)? That isn't what LE says. Also, the multi-threading job keeps running. :-Original Message- :From: Skip Robinson [mailto:jo.skip.robin...@sce.com] :Sent: Thursday, August 25, 2011 6:01 PM :To: IBM-MAIN@bama.ua.edu :Subject: Re: Help with an LE problem : :I've had good luck with COBOL problems by setting a NONPER SLIP trap with :no abend code specified. Just job name. SLIP is supposed to catch the :first abend--before any ESTAE gets control--and produce an SVC dump for :that abend. : :. :. :JO.Skip Robinson :SCE Infrastructure Technology Services :Electric Dragon Team Paddler :SHARE MVS Program Co-Manager :626-302-7535 Office :323-715-0595 Mobile :jo.skip.robin...@sce.com : : : :From: Binyamin Dissen bdis...@dissensoftware.com :To: IBM-MAIN@bama.ua.edu :Date: 08/25/2011 02:31 PM :Subject:Help with an LE problem :Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu : : : :I have a CEEDUMP with : :CEE3250C The system or user abend U 802 R=NULL was issued. : : ABEND code: 0322 Reason code: : :CIB: : : +00 000F37F8 C3C9C240 010C0004 : 00040CB2 61C3C5C5 |CIB /CEE| : +20 000F3818 000B 000F3908 00040CB2 61C3C5C5 000B : 000EF1C8 C0D68988 |/CEE..1H.Oih| : +40 000F3838 000F1BF8 43D7CADC 000EC478 0005 :000EF2B8 |...8.PD...2.| : +60 000F3858 : || : +80 000F3878 - +9F 000F3897 same as above : +A0 000F3898 80015000 :0322 |...| : +C0 000F38B8 43D78DFC 000F1BF8 000F1BF8 43D7CADC : 0001 |.P.8...8.P..| : +E0 000F38D8 000EF1C8 0005 0064 FFFC 0001 : 000E98D0 |..1H..q.| : +000100 000F38F8 0012 000EC690 E9D4C3C8 :0201 43D08008 |..F.ZMCH| : :But the neither the PSW nor the registers are consistent with this abend. :The :registers and PSW are consistent with the Exception location. : :The ZMCH block has the exception information. : :It is a COBOL program compiled with THREAD. : :I guess I will need a real dump, but have no idea how to trap it - after :all I :do not see an abend. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
On Fri, 26 Aug 2011 13:22:23 +0200 Alvaro Guirao Lopez alvarogui...@gmail.com wrote: :I'm had assembled some exits and I'm trying to apply as USERMOD into SMP :when I had this memory abend, the error is at LNKLST so I cannot increase it :REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Is it possible that the link-listed library went into an additional extent? -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
It's true.. before I tried but i have some error, I cannot see but I think was only some missing character... Well, I have started again with REGION=OM OK and rerun my job, it fails again, this is the abend: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED BECAUSE INSUFFICI ENT STORAGE WAS AVAILABLE. CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON CODE 2 6080021, DDNAME *LNKLST* CSV028I ABEND106-0C JOBNAME=IBMUSERD STEPNAME=MVS IEA995I SYMPTOM DUMP OUTPUT 510 SYSTEM COMPLETION CODE=106 REASON CODE=000C 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com ... Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao Of course you can with Region. Even lnklst modules are loaded into your region. What is the abendcode? 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
Only extent Binyamin 2011/8/26 Binyamin Dissen bdis...@dissensoftware.com On Fri, 26 Aug 2011 13:22:23 +0200 Alvaro Guirao Lopez alvarogui...@gmail.com wrote: :I'm had assembled some exits and I'm trying to apply as USERMOD into SMP :when I had this memory abend, the error is at LNKLST so I cannot increase it :REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Is it possible that the link-listed library went into an additional extent? -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Fwd: mfnetdisk - A new message was received in your Site
Yes he did! Richard, Vickie, and Randy Pinion --- shai.h...@gmail.com wrote: From: shai hess shai.h...@gmail.com To: IBM-MAIN@bama.ua.edu Subject: Fwd: mfnetdisk - A new message was received in your Site Date: Fri, 26 Aug 2011 04:36:58 -0700 HI, Latly I change the CODE_REQ condition to download my code. The change is that everyone who download my product must agree to enable me to publish their experience with the product. Before this change I enable the user to select option to do not publish my feedback and my id. Lately I delete this option. So, if you download my code, you must let me publish your feedback if I like to do so. So, only users who enable me to publish their experience with the product can download my code. Why I did it? Because I work hard to make the product good. I do not ask money for the product. I pay money to cover the cost I need to pay for the product. I support the product in any time. Even if my city is attacked by rockets (Did I Richard?) I continue to support the product fi the user need me. So, I feel that this is OK with me to ask and force my users to enable me to publish their experience with my product. I know that in some cases users who works for companies which do not like my product because it can hurt their business, ask me to keep confident. In this case I will not publish their feedback. About charging users with money? I do not have intention to become company which charge money from users. The only option which exist for me is to continue with this status, or to sell my product to big company. So, no charging money as long as I am the owner of the product. I attach one of many user code request for my code from today. Thanks, Shai -- Forwarded message -- From: wayn...@gmail.com Date: Thu, Aug 25, 2011 at 10:13 PM Subject: mfnetdisk - A new message was received in your Site To: shai.h...@gmail.com *mfnetdisk - A new message was received in your Site* Dear Administrator! A new message was received through a form in your site. Form name: *code request* Form content: * - Full name: Wayne Bickerdike E-mail: wayn...@gmail.com Country and state Australia Vic ZOS version 1.8 Linux or Windows Both Required MFNetDisk feature (Disk, tape emulation, replication) All features MFNetDisk experience and comments. You can attach text file instead. I have tested replication and this is a feature I would like to implement to save offsite FTP backups. OK to publish your MFNetDisk comments? Yes, with my email and name Company (optional) Add MFNetDisk feedback in text file (optional). No file attached Contribute in the future? Yes - * - To view the message, login as an administrator through the following link: http://www.livecity.co.il/join/login.asp?depart_id=43973departResell_id=17914pathTXT=/site/include/newfeel/website3/index.asp?toolBoxBOO=1 (If the link does not work, copy and paste it into your browser). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html _ Netscape. Just the Net You Need. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
On Fri, 26 Aug 2011 13:26:06 +0200 Hunkeler Peter (KIUP 4) wrote: I can tell many MVS people tend to set permissions wrong in their early days of zO/S UNIX experience. Including the design and implementation team(s) at IBM. For example, for way too long it was a requirement to run the ServerPac scripts as UID 0. There was a recent thread re security in the *nix world. Cast not your stones - the initial OE/OMVS/USS security model was appalling. And only improved in (seemingly obstinate) fits and starts. It's now better, but was an effort to get here. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
On 8/26/2011 5:36 AM, Binyamin Dissen wrote: Yeah, I know I can try that. What I really do not understand is why I do not have registers that match the alleged user abend. Also, I cannot find this abend in LE or COBOL. But it says user abend U 802, so I would suspect your code. Do you set any user abends? Or is it someone else's code? Are there any condition handlers involved here? [snip] :From: Binyamin Dissenbdis...@dissensoftware.com :To: IBM-MAIN@bama.ua.edu :Date: 08/25/2011 02:31 PM :Subject:Help with an LE problem :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu : : : :I have a CEEDUMP with : : CEE3250C The system or user abend U 802 R=NULL was issued. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
Did SMPE by any chance compress one of the LINKLIST libraries? That will cause fetch errors. If this is a system where you can do it, an LLA REFRESH might clear up your problem, but be careful because it will also be an issue if you installed maintenance that hit LINKLIST and LPALST since LPALST will not be updated and might require an IPL. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Alvaro Guirao Lopez Sent: Friday, August 26, 2011 7:22 AM To: IBM-MAIN@bama.ua.edu Subject: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail may contain confidential or privileged information. If you think you have received this e-mail in error, please advise the sender by reply e-mail and then delete this e-mail immediately. Thank you. Aetna -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SDSF REXX question
Hello, I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG output to be returned in the isfulog. stem. This works fine under TSO, but if I run the exec under IRXJCL the command is issued, but no output returned in the isfulog. stem. Any idea what I'm missing? Thanks Steve - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M? Kees. Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX_2gy_8_EUTjomDJhUF6DhxGBJVaedpV5oWqV=mjtf...@mail.gmail.com... It's true.. before I tried but i have some error, I cannot see but I think was only some missing character... Well, I have started again with REGION=OM OK and rerun my job, it fails again, this is the abend: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED BECAUSE INSUFFICI ENT STORAGE WAS AVAILABLE. CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON CODE 2 6080021, DDNAME *LNKLST* CSV028I ABEND106-0C JOBNAME=IBMUSERD STEPNAME=MVS IEA995I SYMPTOM DUMP OUTPUT 510 SYSTEM COMPLETION CODE=106 REASON CODE=000C 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com ... Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao Of course you can with Region. Even lnklst modules are loaded into your region. What is the abendcode? 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
I have done refresh to LLA too but fails with the same abend. 2011/8/26 Veilleux, Jon L veilleu...@aetna.com Did SMPE by any chance compress one of the LINKLIST libraries? That will cause fetch errors. If this is a system where you can do it, an LLA REFRESH might clear up your problem, but be careful because it will also be an issue if you installed maintenance that hit LINKLIST and LPALST since LPALST will not be updated and might require an IPL. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Alvaro Guirao Lopez Sent: Friday, August 26, 2011 7:22 AM To: IBM-MAIN@bama.ua.edu Subject: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail may contain confidential or privileged information. If you think you have received this e-mail in error, please advise the sender by reply e-mail and then delete this e-mail immediately. Thank you. Aetna -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen Yeah, I know I can try that. What I really do not understand is why I do not have registers that match the alleged user abend. Also, I cannot find this abend in LE or COBOL. Remember that LE shows User abends in decimal. D'802' == X'322'. -jc- On Thu, 25 Aug 2011 15:00:54 -0700 Skip Robinson jo.skip.robin...@sce.com wrote: :I've had good luck with COBOL problems by setting a NONPER SLIP trap with :no abend code specified. Just job name. SLIP is supposed to catch the :first abend--before any ESTAE gets control--and produce an SVC dump for :that abend. : :. :. :JO.Skip Robinson :SCE Infrastructure Technology Services :Electric Dragon Team Paddler :SHARE MVS Program Co-Manager :626-302-7535 Office :323-715-0595 Mobile :jo.skip.robin...@sce.com : : : :From: Binyamin Dissen bdis...@dissensoftware.com :To: IBM-MAIN@bama.ua.edu :Date: 08/25/2011 02:31 PM :Subject:Help with an LE problem :Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu : : : :I have a CEEDUMP with : :CEE3250C The system or user abend U 802 R=NULL was issued. : : ABEND code: 0322 Reason code: : :CIB: : : +00 000F37F8 C3C9C240 010C0004 : 00040CB2 61C3C5C5 |CIB /CEE| : +20 000F3818 000B 000F3908 00040CB2 61C3C5C5 000B : 000EF1C8 C0D68988 |/CEE..1H.Oih| : +40 000F3838 000F1BF8 43D7CADC 000EC478 0005 :000EF2B8 |...8.PD...2.| : +60 000F3858 : || : +80 000F3878 - +9F 000F3897 same as above : +A0 000F3898 80015000 :0322 |...| : +C0 000F38B8 43D78DFC 000F1BF8 000F1BF8 43D7CADC : 0001 |.P.8...8.P..| : +E0 000F38D8 000EF1C8 0005 0064 FFFC 0001 : 000E98D0 |..1H..q.| : +000100 000F38F8 0012 000EC690 E9D4C3C8 :0201 43D08008 |..F.ZMCH| : :But the neither the PSW nor the registers are consistent with this abend. :The :registers and PSW are consistent with the Exception location. : :The ZMCH block has the exception information. : :It is a COBOL program compiled with THREAD. : :I guess I will need a real dump, but have no idea how to trap it - after :all I :do not see an abend. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
alter dataset blocksize
Hi, Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11 last ref date=2011/08/15 To alter the blksize, or another dataset specifications, we use this method : 1.- create a new library with the correct specifications. 2.- copy from old to the new. 3.- remove the old lib. 3.- rename the new lib. (but it shows the NEW creation date = current date) I want to know how to alter its blocksize or to alter the creation date. Happy week end, Enrique Montero -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
W dniu 2011-08-26 13:44, Shane pisze: On Fri, 26 Aug 2011 13:26:06 +0200 Hunkeler Peter (KIUP 4) wrote: I can tell many MVS people tend to set permissions wrong in their early days of zO/S UNIX experience. Including the design and implementation team(s) at IBM. Agreed, so far. IMHO this is because unix is (was?) terra incognita for many mainframers. For example, for way too long it was a requirement to run the ServerPac scripts as UID 0. I disagree, that means: what's wrong with UID(0) for such scripts? ServerPac installation is rarely done on live production system ;-) ServerPac user do require a lot of very powerful rights, including Catalog, RACF, DATASET access, etc. etc. In fact such a person is able to destroy target system (although usually he creates the system), or damage driving system. All without UID(0). -- Radoslaw Skorupka Lodz, Poland -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
I have IEFUSI at LPA but I do not know if the EXIT is limiting REGION=0M, I just tried with REGION=20M but fails again... Any way to see IEFUSI work? 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com 106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M? Kees. Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX_2gy_8_EUTjomDJhUF6DhxGBJVaedpV5oWqV=mjtf...@mail.gmail.com ... It's true.. before I tried but i have some error, I cannot see but I think was only some missing character... Well, I have started again with REGION=OM OK and rerun my job, it fails again, this is the abend: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED BECAUSE INSUFFICI ENT STORAGE WAS AVAILABLE. CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON CODE 2 6080021, DDNAME *LNKLST* CSV028I ABEND106-0C JOBNAME=IBMUSERD STEPNAME=MVS IEA995I SYMPTOM DUMP OUTPUT 510 SYSTEM COMPLETION CODE=106 REASON CODE=000C 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML= g...@mail.gmail.com ... Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao Of course you can with Region. Even lnklst modules are loaded into your region. What is the abendcode? 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send
Re: Copying file to OMVS
On Fri, 26 Aug 2011 13:53:19 +0200 R.S. wrote: I disagree, that means: what's wrong with UID(0) for such scripts? ServerPac installation is rarely done on live production system ;-) I've seen plenty of customers with a common (i.e. only one) RACF database ... Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
On Fri, 26 Aug 2011 05:44:05 -0600 Steve Comstock st...@trainersfriend.com wrote: :On 8/26/2011 5:36 AM, Binyamin Dissen wrote: : Yeah, I know I can try that. What I really do not understand is why I do not : have registers that match the alleged user abend. : Also, I cannot find this abend in LE or COBOL. :But it says user abend U 802, so I would suspect :your code. Do you set any user abends? Or is it :someone else's code? Are there any condition handlers :involved here? So would I. There are some vendor condition handlers, but would LE mask the real condition? The exception registers are appropriate for the exception PSW which has nothing to do with a user abend. : :From: Binyamin Dissenbdis...@dissensoftware.com : :To: IBM-MAIN@bama.ua.edu : :Date: 08/25/2011 02:31 PM : :Subject:Help with an LE problem : :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu : :I have a CEEDUMP with : : CEE3250C The system or user abend U 802 R=NULL was issued. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
W dniu 2011-08-26 13:50, MONTERO ROMERO, ENRIQUE ELOI pisze: Hi, Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? IMHO not without tricks. LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11 last ref date=2011/08/15 To alter the blksize, or another dataset specifications, we use this method : 1.- create a new library with the correct specifications. 2.- copy from old to the new. 3.- remove the old lib. 3.- rename the new lib. (but it shows the NEW creation date = current date) I want to know how to alter its blocksize or to alter the creation date. Few thoughts: a) If you really need it, then ...change the time! 0.- Set clock to the time of creation of old lib 1.- create a new library with the correct specifications. While ad hoc time change is usually unacceptable on production system, you can use non-prod one. b) Why do you need original creation time? I'm really curious. Maybe the requirement is miss? c) The best idea is to create library with good blocksize. ;-) SDB coulb be your friend here, and for program libraries rule of thumb BLKSIZE=32760. Then educate the users and cane those who do not follow... d) The least recommended: zap VTOC fields. -- Radoslaw Skorupka Lodz, Poland -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
On Fri, 26 Aug 2011 06:48:59 -0500 Chase, John jch...@ussco.com wrote: : -Original Message- : From: IBM Mainframe Discussion List On Behalf Of Binyamin Dissen : Yeah, I know I can try that. What I really do not understand is why I :do not : have registers that match the alleged user abend. : Also, I cannot find this abend in LE or COBOL. :Remember that LE shows User abends in decimal. D'802' == X'322'. Also looked for that. Didn't find it. : On Thu, 25 Aug 2011 15:00:54 -0700 Skip Robinson :jo.skip.robin...@sce.com : wrote: : :I've had good luck with COBOL problems by setting a NONPER SLIP trap :with : :no abend code specified. Just job name. SLIP is supposed to catch :the : :first abend--before any ESTAE gets control--and produce an SVC dump :for : :that abend. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
Does your application use IMS? 0802 Explanation: Replace tried to obtain space from space management to replace a variable-length segment. The new 'LL' or minimum 'LL' is greater than the old 'LL'. Therefore, Replace requested additional space from space management, but received a return code indicating that no more space is available in the data set. Analysis: This is issued from module DFSDLD00 and can be a standard or a pseudoabend. Abend 0802 is traced in the Buffer Handler Trace Table in a series of entries, each of which is identified by a character D (X'C4') in its first byte. This series of entries immediately precedes the current entry in the trace table. The important field in each trace entry is the second word (offset 4), called ENTRY1. This word identifies the abend and the routine within the Delete/Replace module that encountered the problem. The ENTRY1 word in the first entry of the Delete/Replace abend trace in the key shown in the following table: Key Description 43430028 The Replace module issued a space request to lengthen a segment. The return code from space management indicated no space available. Possible cause: A rearrangement of the data set is needed to make free, or potentially free space available for access. This can be accomplished by an UNLOAD, followed by a reload of the data set. System action: The application program terminates abnormally. Programmer response: Reorganize the database. Problem determination: 17a through 17g, 35 Source: IMS abends 0802 Chapter 5. IMS abend codes 0501 - 1000 355 -Original Message- From: Binyamin Dissen [mailto:bdis...@dissensoftware.com] Sent: Friday, August 26, 2011 8:00 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Help with an LE problem On Fri, 26 Aug 2011 05:44:05 -0600 Steve Comstock st...@trainersfriend.com wrote: :On 8/26/2011 5:36 AM, Binyamin Dissen wrote: : Yeah, I know I can try that. What I really do not understand is why I do not : have registers that match the alleged user abend. : Also, I cannot find this abend in LE or COBOL. :But it says user abend U 802, so I would suspect :your code. Do you set any user abends? Or is it :someone else's code? Are there any condition handlers :involved here? So would I. There are some vendor condition handlers, but would LE mask the real condition? The exception registers are appropriate for the exception PSW which has nothing to do with a user abend. : :From: Binyamin Dissenbdis...@dissensoftware.com : :To: IBM-MAIN@bama.ua.edu : :Date: 08/25/2011 02:31 PM : :Subject:Help with an LE problem : :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu : :I have a CEEDUMP with : : CEE3250C The system or user abend U 802 R=NULL was issued. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
Yeah! Just done right down, there was limitation for the job of 4096K, I was including REGION=0M into the STEP but this fails, I have changed the REGION at JOB sentence and works OK. Thanks for your comments. 2011/8/26 Alvaro Guirao Lopez alvarogui...@gmail.com I have IEFUSI at LPA but I do not know if the EXIT is limiting REGION=0M, I just tried with REGION=20M but fails again... Any way to see IEFUSI work? 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com 106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M? Kees. Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX_2gy_8_EUTjomDJhUF6DhxGBJVaedpV5oWqV=mjtf...@mail.gmail.com ... It's true.. before I tried but i have some error, I cannot see but I think was only some missing character... Well, I have started again with REGION=OM OK and rerun my job, it fails again, this is the abend: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED BECAUSE INSUFFICI ENT STORAGE WAS AVAILABLE. CSV031I LIBRARY ACCESS FAILED FOR MODULE IDCLC01 , RETURN CODE 24, REASON CODE 2 6080021, DDNAME *LNKLST* CSV028I ABEND106-0C JOBNAME=IBMUSERD STEPNAME=MVS IEA995I SYMPTOM DUMP OUTPUT 510 SYSTEM COMPLETION CODE=106 REASON CODE=000C 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com Alvaro Guirao Lopez alvarogui...@gmail.com wrote in message news:CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML= g...@mail.gmail.com ... Hi list, I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, maybe increasing CSA at IEASYS??, If so, I must decrease ECSA? Any experiences? Thanks and best regards. -- Un saludo. Álvaro Guirao Of course you can with Region. Even lnklst modules are loaded into your region. What is the abendcode? 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Un saludo. Álvaro Guirao -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu
Re: Copying file to OMVS
W dniu 2011-08-26 13:58, Shane pisze: On Fri, 26 Aug 2011 13:53:19 +0200 R.S. wrote: I disagree, that means: what's wrong with UID(0) for such scripts? ServerPac installation is rarely done on live production system ;-) I've seen plenty of customers with a common (i.e. only one) RACF database ... Couldn't they use dedicated userid? Another idea: to use copy od RACF db, at least temporarily. -- Radoslaw Skorupka Lodz, Poland -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Check out Hurricane Irene : Tracking Map : Weather Underground
Do you mean a direct hit on Wash. DC? snip _Hurricane Irene : Tracking Map : Weather Underground_ (http://www.wunderground.com/tropical/tracking/at201109.html) We'll be hoping for the best. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Steve: Don't knowabout IRXJCL situation but I use: //TSOBAT EXEC PGM=IKJEFT01,PARM='RXCMD' where rxcmd is the rexx using isfexec. It works fine. Roberto On Fri, Aug 26, 2011 at 7:46 AM, Steve Austin steve.aus...@macro4.comwrote: Hello, I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG output to be returned in the isfulog. stem. This works fine under TSO, but if I run the exec under IRXJCL the command is issued, but no output returned in the isfulog. stem. Any idea what I'm missing? Thanks Steve - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Those who can make you believe religious absurdities, can make you commit atrocities. Voltaire The philosopher has never killed any priests, whereas the priest has killed a great many philosophers. Denis Diderot Men will never be free until the last king is strangled with the entrails of the last priest. Denis Diderot -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
Suggestion: If you are licensed for DFSMSdss, and you want to use a system-determined block size: COPY DS(INCLUDE(dsn)) + CATALOG DELETE OUTDYN(outvol) ALLDATA(*) REBLOCK(*) ADRDSSU will preserve the reference date. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
Nope. On Fri, 26 Aug 2011 08:02:38 -0400 Sambataro, Anthony (NIH/NBS) [E] anthony.sambat...@nih.gov wrote: :Does your application use IMS? : :0802 :Explanation: Replace tried to obtain space from space management to replace a variable-length segment. The new :'LL' or minimum 'LL' is greater than the old 'LL'. Therefore, Replace requested additional space from space :management, but received a return code indicating that no more space is available in the data set. :Analysis: This is issued from module DFSDLD00 and can be a standard or a pseudoabend. :Abend 0802 is traced in the Buffer Handler Trace Table in a series of entries, each of which is identified by a :character D (X'C4') in its first byte. This series of entries immediately precedes the current entry in the trace table. :The important field in each trace entry is the second word (offset 4), called ENTRY1. This word identifies the abend :and the routine within the Delete/Replace module that encountered the problem. :The ENTRY1 word in the first entry of the Delete/Replace abend trace in the key shown in the following table: :Key Description :43430028 The Replace module issued a space request to lengthen a segment. The return code from :space management indicated no space available. :Possible cause: A rearrangement of the data set is needed to make free, or potentially free space available for access. :This can be accomplished by an UNLOAD, followed by a reload of the data set. :System action: The application program terminates abnormally. :Programmer response: Reorganize the database. :Problem determination: 17a through 17g, 35 :Source: IMS abends :0802 :Chapter 5. IMS abend codes 0501 - 1000 355 : :-Original Message- :From: Binyamin Dissen [mailto:bdis...@dissensoftware.com] :Sent: Friday, August 26, 2011 8:00 AM :To: IBM-MAIN@bama.ua.edu :Subject: Re: Help with an LE problem : :On Fri, 26 Aug 2011 05:44:05 -0600 Steve Comstock st...@trainersfriend.com :wrote: : ::On 8/26/2011 5:36 AM, Binyamin Dissen wrote: :: Yeah, I know I can try that. What I really do not understand is why I do not :: have registers that match the alleged user abend. : :: Also, I cannot find this abend in LE or COBOL. : ::But it says user abend U 802, so I would suspect ::your code. Do you set any user abends? Or is it ::someone else's code? Are there any condition handlers ::involved here? : :So would I. : :There are some vendor condition handlers, but would LE mask the real :condition? : :The exception registers are appropriate for the exception PSW which has :nothing to do with a user abend. : :: :From: Binyamin Dissenbdis...@dissensoftware.com :: :To: IBM-MAIN@bama.ua.edu :: :Date: 08/25/2011 02:31 PM :: :Subject:Help with an LE problem :: :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu : :: :I have a CEEDUMP with : :: : CEE3250C The system or user abend U 802 R=NULL was issued. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Steve Austin wrote: I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG output to be returned in the isfulog. stem. This works fine under TSO, but if I run the exec under IRXJCL the command is issued, but no output returned in the isfulog. stem. How are you capturing the output into that stem variable? Please show us the statements used, if possible... Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
It works !!! // PATHMODE=(SIRWXU,SIRGRP,SIROTH), Thanks a lot John and thank you all for your help and interest. Angel 2011/8/25 John McKown joa...@swbell.net Had a power outage causing a delay in replying. I am an idiot (nothing new about that). The owner access is --- which is none. And I noticed you did not include the DD parameter PATHMODE. Try: //SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHMODE=(SIRWXU,SIRGRP,SIROTH), // PATHDISP=(KEEP,DELETE) The default in JCL if PATHMODE is not specified is no access at all to anyone according to: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B680/12.48.3 But you may need to delete the existing file first. On Thu, 2011-08-25 at 19:36 -0300, Angel Tamayo wrote: The directory /TEST already is 777 Display File Attributes Pathname : /TEST File type . . . . . . : Directory Permissions . . . . . : 777 rwxrwxrwx and COMPRESS9 is created by the job. Angel 2011/8/25 jagadishan perumal jagadish...@gmail.com Hi, Have your RACF person to provide : CHMOD 777 /TEST/COMPRESS9 to execute this command in OMVS. Also ask them to change the owner by CHOWN command.. Simple.. then submitting the JCL again On Thu, Aug 25, 2011 at 6:19 PM, Angel Tamayo a.tamay...@gmail.com wrote: Hi List, Maybe someone here could have the same or similar case. I run job: //COPY1 EXEC PGM=IEBGENER,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=SHR,DSN=HLQ.COMPRESS.PAX //SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHDISP=(KEEP,DELETE) //SYSIN DD DUMMY I received message: ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME) 479 /TEST/COMPRESS9 CL(FSOBJ ) FID(38130041) INSUFFICIENT AUTHORITY TO OPEN ACCESS INTENT(RW-) ACCESS ALLOWED(OWNER ---) EFFECTIVE UID(000999) EFFECTIVE GID(01) The RACF persons says that I need to have OMVS segment setup for my userid with UID(0). I suppose UID(0) will solve the problem but it is really the only way to solve it?. I'm looking for a solution without UID(0), any idea on this will be appreciated. As additional information ZOSUSER have authority to use SU (superuser) in OMVS environment, don't really know if this helps to this case. Angel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
ENRIQUE ELOI wrote: Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? Why changing the creation date? Just curious, if you don't mind, please? (but it shows the NEW creation date = current date) Of course! This is WAD! Groete / Greetings Elardus Engelbrecht Q: What lies at the bottom of the ocean and twitches? A: A nervous wreck... Q: What do you get from a pampered cow? A: Spoiled milk... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
AFAIK, this cannot be done using standard facilities. Others have indicated various ways to change the create date after the fact. There is an additional way. A program, on the CBT TAPE(www.cbttape.org) - DMOD. Sorry, I have no idea in which of the 700 plus files to look. HTH, snip Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11 last ref date=2011/08/15 To alter the blksize, or another dataset specifications, we use this method : 1.- create a new library with the correct specifications. 2.- copy from old to the new. 3.- remove the old lib. 3.- rename the new lib. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: EXEC CICS FORMATTIME issue
In 1314301284.8441.yahoomailclas...@web160118.mail.bf1.yahoo.com, on 08/25/2011 at 12:41 PM, william janulin wjanu...@yahoo.com said: Not sure if this is the correct forum to post this. This is a correct list; it's not the only one. I get the IGYPS2106-S error. Could the translator be case sensitive? -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
I guess I will need a real dump, but have no idea how to trap it - after all I do not see an abend. Have you tried EXEC PARM='/TRAP(OFF)' (For Cobol, LE runtime options are after the /, right?) TRAP(OFF) disables LE's usual ESPIE and ESTAE. If there is an abend you should get a dump to either //SYSABEND, /SYSUDUMP, etc. -- Peter Hunkeler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Here is the REXX exec; rc=isfcalls(ON) isfcons = NODDY /* EMCS console name */ isfdelay =10 /* WAIT time */ ADDRESS SDSF ISFEXEC '/D M=CPU' (WAIT VERBOSE) if isfmsg then say isfmsg do i2 = 1 to isfmsg2.0 /* loop though messages */ say isfmsg2.i2 end if rc = 8 then do say Number of ulog rows returned isfulog.0 if isfulog.0 1 then do do ix=1 to isfulog.0 /* loop through rows */ say isfulog.ix end end end RC=ISFCALLS(OFF) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Elardus Engelbrecht Sent: 26 August 2011 13:25 To: IBM-MAIN@bama.ua.edu Subject: Re: SDSF REXX question Steve Austin wrote: I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG output to be returned in the isfulog. stem. This works fine under TSO, but if I run the exec under IRXJCL the command is issued, but no output returned in the isfulog. stem. How are you capturing the output into that stem variable? Please show us the statements used, if possible... Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
On Fri, 26 Aug 2011 14:39:22 +0200 Hunkeler Peter (KIUP 4) peter.hunke...@credit-suisse.com wrote: :I guess I will need a real dump, but have no idea how to trap it :- after all I do not see an abend. :Have you tried EXEC PARM='/TRAP(OFF)' (For Cobol, LE runtime options :are after the /, right?) :TRAP(OFF) disables LE's usual ESPIE and ESTAE. If there is an abend :you should get a dump to either //SYSABEND, /SYSUDUMP, etc. There is vendor code that screws with the LE options. But, the basic point - nothing in the CEEDUMP shows that there was an abend, other than the message. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Steve Austin wrote: Here is the REXX exec; isfcons = NODDY :-D I asked BIGEARS with help and ... :-D Thanks. I tried it out in TSO / ISPF and also with this JCL: //ZYX EXEC PGM=IKJEFT01 //SYSPROC DD DISP=SHR,DSN=REXX //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * PROF NOPREF %SDSF2 READY %SDSF2 COMMAND ISSUED ISF754I Command 'SET CONSOLE NODDY' generated from associated variable ISFCONS. ISF754I Command 'SET DELAY 10' generated from associated variable ISFDELAY. ISF766I Request completed, status: COMMAND ISSUED. NUMBER OF ULOG ROWS RETURNED 34 2011238 14:49:24.56 ISF031I CONSOLE NODDY ACTIVATED 2011238 14:49:24.56-D M=CPU 2011238 14:49:24.57 IEE174I 14.49.24 DISPLAY M PROCESSOR STATUS ID CPU SERIAL Output is shown in SYSTSPRT... Is this what you wanted? Perhaps I missed something from your original post? Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
snip Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? /snip Also the great PDS command from cbttape.org file 182. FIXPDS file.name BLKSIZE(1234) Dana -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
I too have the REXX exec working under TSO, but I'm trying to get it to work in batch under IRXJCL. Thanks Steve -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Elardus Engelbrecht Sent: 26 August 2011 13:56 To: IBM-MAIN@bama.ua.edu Subject: Re: SDSF REXX question Steve Austin wrote: Here is the REXX exec; isfcons = NODDY :-D I asked BIGEARS with help and ... :-D Thanks. I tried it out in TSO / ISPF and also with this JCL: //ZYX EXEC PGM=IKJEFT01 //SYSPROC DD DISP=SHR,DSN=REXX //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * PROF NOPREF %SDSF2 READY %SDSF2 COMMAND ISSUED ISF754I Command 'SET CONSOLE NODDY' generated from associated variable ISFCONS. ISF754I Command 'SET DELAY 10' generated from associated variable ISFDELAY. ISF766I Request completed, status: COMMAND ISSUED. NUMBER OF ULOG ROWS RETURNED 34 2011238 14:49:24.56 ISF031I CONSOLE NODDY ACTIVATED 2011238 14:49:24.56-D M=CPU 2011238 14:49:24.57 IEE174I 14.49.24 DISPLAY M PROCESSOR STATUS ID CPU SERIAL Output is shown in SYSTSPRT... Is this what you wanted? Perhaps I missed something from your original post? Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
We all know you can trash a partitioned dataset by writing to one specifying a different block size. Maybe you can use this to your advantage. How about moving all members out to a different library, then use a batch job to copy them back, specifying the new block size you now want. Before: Data Set Name . . . . : E00.JCL.TEMP General Data Current Allocation Management class . . : MCLMNNRAllocated tracks . : 15 Storage class . . . : SCNORM Allocated extents . : 1 Volume serial . . . : PCF050 Maximum dir. blocks : 15 Device type . . . . : 3390 Data class . . . . . : DCDEFALT Organization . . . : POCurrent Utilization Record format . . . : FB Used tracks . . . . : 2 Record length . . . : 80 Used extents . . . : 1 Block size . . . . : 27920 Used dir. blocks . : 1 1st extent tracks . : 15 Number of members . : 0 Secondary tracks . : 15 Data set name type : PDS Dates Creation date . . . : 2011/06/21 Referenced date . . : 2011/08/26 Expiration date . . : ***None*** Warnings in IEBCOPY: IEB1139W THE OUTPUT DATA SET BLOCK SIZE IS BEING REDUCED FROM 27920 TO 800 BYTES. ANY EXISTING PHYSICAL RECORDS LONGER THAN 800 BYTES ARE FAT BLOCKS AND MAY CAUSE I/O ERRORS. After: Data Set Name . . . . : E00.JCL.TEMP General Data Current Allocation Management class . . : MCLMNNRAllocated tracks . : 15 Storage class . . . : SCNORM Allocated extents . : 1 Volume serial . . . : PCF050 Maximum dir. blocks : 15 Device type . . . . : 3390 Data class . . . . . : DCDEFALT Organization . . . : POCurrent Utilization Record format . . . : FB Used tracks . . . . : 2 Record length . . . : 80 Used extents . . . : 1 Block size . . . . : 800Used dir. blocks . : 1 1st extent tracks . : 15 Number of members . : 4 Secondary tracks . : 15 Data set name type : PDS Dates Creation date . . . : 2011/06/21 Referenced date . . : 2011/08/26 Expiration date . . : ***None*** Tom Chicklon Hi, Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11 last ref date=2011/08/15 To alter the blksize, or another dataset specifications, we use this method : 1.- create a new library with the correct specifications. 2.- copy from old to the new. 3.- remove the old lib. 3.- rename the new lib. (but it shows the NEW creation date = current date) I want to know how to alter its blocksize or to alter the creation date. Happy week end, Enrique Montero This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
I too have the REXX exec working under TSO, but I'm trying to get it to work in batch under IRXJCL. Why? If it works don't break it. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Steve Austin wrote: I too have the REXX exec working under TSO, but I'm trying to get it to work in batch under IRXJCL. Will this (tested before posting) one be suitable for you? //STEP1EXEC PGM=IRXJCL,PARM='SDSF2' //SYSTSPRT DD SYSOUT=* //SYSEXEC DD DSN=REXX,DISP=SHR I have used your posted example successfully for this JCL. If not desired solution, could you be kind to tell us how you want to use IRXJCL? Groete / Greetings Elardus Engelbrecht Q: Whats black and brown and looks good on an attorney? A: A Doberman pinscher. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
On Fri, 26 Aug 2011 12:46:12 +0100, Steve Austin steve.aus...@macro4.com wrote: Hello, I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG output to be returned in the isfulog. stem. This works fine under TSO, but if I run the exec under IRXJCL the command is issued, but no output returned in the isfulog. stem. Run it under the TMP in batch (TSO) instead of IRXJCL (IKJEFT01 / IKJEFT1A / IKJEFT1B). Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Thanks, Yes that is exactly what I want, but it is not working for me here. I suspect an environmental problem of some sort; possibly something in ISFPRMxx. Here is the REXX group in my ISPPRMxx. Can you see anything different to yours? /*/ /* GROUP ISFREXX - Rexx Users*/ /*/ GROUP NAME(ISFREXX),/* Group name */ IUID(ISFREXX), /* Iuid*/ ACTION(ALL),/* All route codes displayed */ ACTIONBAR(YES), /* Display action bar on panels*/ APPC(ON), /* Include APPC sysout */ AUPDT(2), /* Minimum auto update interval*/ AUTH(I,O,H,DA,PREF,SE,SR,ST), /* Authorized functions*/ CMDAUTH(ALL), /* Commands allowed for all jobs */ CMDLEV(7), /* Authorized command level*/ CONFIRM(ON),/* Enable cancel confirmation */ CURSOR(ON), /* Leave cursor on last row processed */ DADFLT(IN,OUT,TRANS,STC,TSU,JOB), /* Default rows shown on DA */ DATE(MMDD), /* Default date format */ DATESEP('/'), /* Default datesep format */ DISPLAY(OFF), /* Do not display current values */ DSPAUTH(USERID,NOTIFY,AMSG), /* Browse authority */ GPLEN(2), /* Group prefix length */ ILOGCOL(1), /* Initial display column in log */ ISYS(NONE), /* Initial system default for DA */ LANG(ENGLISH), /* Default language*/ LOGOPT(OPERACT),/* Default log option */ OWNER(NONE),/* Default owner */ UPCTAB(TRTAB2), /* Upper case translate table name */ VALTAB(TRTAB), /* Valid character translate table */ VIO(SYSALLDA) /* Unit name for page mode output */ NTBL NAME(ISFREXX) NTBLENT STRING(SA2) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Elardus Engelbrecht Sent: 26 August 2011 14:12 To: IBM-MAIN@bama.ua.edu Subject: Re: SDSF REXX question Steve Austin wrote: I too have the REXX exec working under TSO, but I'm trying to get it to work in batch under IRXJCL. Will this (tested before posting) one be suitable for you? //STEP1EXEC PGM=IRXJCL,PARM='SDSF2' //SYSTSPRT DD SYSOUT=* //SYSEXEC DD DSN=REXX,DISP=SHR I have used your posted example successfully for this JCL. If not desired solution, could you be kind to tell us how you want to use IRXJCL? Groete / Greetings Elardus Engelbrecht Q: What's black and brown and looks good on an attorney? A: A Doberman pinscher. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
On 8/26/2011 7:46 AM, Steve Austin wrote: Hello, I have a REXX exec that issues D M=CPU using ISFEXEC and I expect the ULOG output to be returned in the isfulog. stem. This works fine under TSO, but if I run the exec under IRXJCL the command is issued, but no output returned in the isfulog. stem. Any idea what I'm missing? Steve, I haven't run a test, but I'm pretty sure that SDSF requires TSO in order to function. We normally run it in ISPF, but you can also run it with TSO SDSF. IRXJCL only works for Rexx execs that don't require TSO services. Regards, Tom Conley -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
On Fri, 26 Aug 2011 13:50:24 +0200, MONTERO ROMERO, ENRIQUE ELOI enriqueeloi.mont...@servifactory.com wrote: Hi, Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11 last ref date=2011/08/15 To alter the blksize, or another dataset specifications, we use this method : 1.- create a new library with the correct specifications. 2.- copy from old to the new. 3.- remove the old lib. 3.- rename the new lib. (but it shows the NEW creation date = current date) I want to know how to alter its blocksize or to alter the creation date. Happy week end, Enrique Montero I'm always surprised when this question comes up, because we talk about the best tool for this sort of thing often. The freeware PDS command (currently PDS86). Do yourself a favor and download / install it from http://www.cbttape.org. File 182. Another tool on the CBT that will do this is (and a few things PDS86 can't) is CDSCB (File 300). Some functions of CDSCB need to be APF authorized. Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
On Fri, 26 Aug 2011 13:56:02 +0200, Alvaro Guirao Lopez alvarogui...@gmail.com wrote: I have IEFUSI at LPA but I do not know if the EXIT is limiting REGION=0M, I just tried with REGION=20M but fails again... Any way to see IEFUSI work? 2011/8/26 Vernooij, CP - SPLXM kees.verno...@klm.com 106-0C is region. Do you have an IEFUSI which is limiting your REGION=0M? It does look like a region size issue. What I have done to see the effects of IEFUSI is to use my REXXSTOR exec. See my web site for the exec and sample JCL (REXXSTOJ) to execute it with various region sizes and see the results. Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
I haven't run a test, but I'm pretty sure that SDSF requires TSO in order to function. We normally run it in ISPF, but you can also run it with TSO SDSF. IRXJCL only works for Rexx execs that don't require TSO services. SDSF is batch generally doesn't require TSO and IRKJCL is fine. However, ULOG probably does. Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Steve Austin wrote: Yes that is exactly what I want, but it is not working for me here. Ouch. More painful than a bored attorney's fee... :-D I suspect an environmental problem of some sort; possibly something in ISFPRMxx. Perhaps. Try these lines just before your own ADDRESS SDSF ISFEXEC for some diagnostics. ADDRESS SDSF ISFEXEC WHO DO IX=1 TO ISFRESP.0 SAY ISFRESP.IX IS: ISFRESP.IX END Then compare the results to see what is the difference for your TSO and Batch execution. You may need extra access permission in ISFPRMxx or in RACF. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
On Fri, 26 Aug 2011 08:35:46 -0500, Mark Zelden m...@mzelden.com wrote: I haven't run a test, but I'm pretty sure that SDSF requires TSO in order to function. We normally run it in ISPF, but you can also run it with TSO SDSF. IRXJCL only works for Rexx execs that don't require TSO services. SDSF is batch generally doesn't require TSO and IRKJCL is fine. However, ULOG probably does. I didn't really mean SDSF is batch. That would be PGM=SDSF or PGM=ISFAFD. Of course I was referring to the REXX API since that was the subject of this thread. I also forgot to mention my SDSF@DR example on my web site which I run using PGM=IRXJCL (sample JCL is in the source). Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://expertanswercenter.techtarget.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
I should have caught that the first time, rather than going on the wild goose chase. Too many weekends at work doing file conversions by myself then catching hell on Monday from arm-chair coaches who couldn't be bothered to attend any meetings or do any work. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Angel Tamayo Sent: Friday, August 26, 2011 7:26 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Copying file to OMVS It works !!! // PATHMODE=(SIRWXU,SIRGRP,SIROTH), Thanks a lot John and thank you all for your help and interest. Angel 2011/8/25 John McKown joa...@swbell.net Had a power outage causing a delay in replying. I am an idiot (nothing new about that). The owner access is --- which is none. And I noticed you did not include the DD parameter PATHMODE. Try: //SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHMODE=(SIRWXU,SIRGRP,SIROTH), // PATHDISP=(KEEP,DELETE) The default in JCL if PATHMODE is not specified is no access at all to anyone according to: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA 2B680/12.48.3 But you may need to delete the existing file first. On Thu, 2011-08-25 at 19:36 -0300, Angel Tamayo wrote: The directory /TEST already is 777 Display File Attributes Pathname : /TEST File type . . . . . . : Directory Permissions . . . . . : 777 rwxrwxrwx and COMPRESS9 is created by the job. Angel 2011/8/25 jagadishan perumal jagadish...@gmail.com Hi, Have your RACF person to provide : CHMOD 777 /TEST/COMPRESS9 to execute this command in OMVS. Also ask them to change the owner by CHOWN command.. Simple.. then submitting the JCL again On Thu, Aug 25, 2011 at 6:19 PM, Angel Tamayo a.tamay...@gmail.com wrote: Hi List, Maybe someone here could have the same or similar case. I run job: //COPY1 EXEC PGM=IEBGENER,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=SHR,DSN=HLQ.COMPRESS.PAX //SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHDISP=(KEEP,DELETE) //SYSIN DD DUMMY I received message: ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME ) 479 /TEST/COMPRESS9 CL(FSOBJ ) FID(38130041) INSUFFICIENT AUTHORITY TO OPEN ACCESS INTENT(RW-) ACCESS ALLOWED(OWNER ---) EFFECTIVE UID(000999) EFFECTIVE GID(01) The RACF persons says that I need to have OMVS segment setup for my userid with UID(0). I suppose UID(0) will solve the problem but it is really the only way to solve it?. I'm looking for a solution without UID(0), any idea on this will be appreciated. As additional information ZOSUSER have authority to use SU (superuser) in OMVS environment, don't really know if this helps to this case. Angel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives
Not mainframe, but interesting - 120 PetaByte DASD cluster
http://www.extremetech.com/computing/94082-ibm-builds-120-petabyte-cluster-made-out-of-20-hard-drives quote Smashing all known records by a multiple of 10, IBM Research Almaden, California, has developed hardware and software technologies that will allow it to strap together 200,000 hard drives to create a single storage cluster of 120 petabytes - or 120 million gigabytes. The drive collective, when it is complete, is expected to store one trillion files - or to put it in Apple terms, two billion hours of MP3 music. /quote John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CSA and SQA problem
On 8/25/2011 1:21 PM, Staller, Allan wrote: The manual previously cited does not state either case (pro or con) clearly under the discussion of the INITSQA parameter. My understanding was that this parameter was used to increase the initial allocation until the SQA parameters of IEASYSxx were processed. At that time the allocation would be included in the full initialization. See quote and references below. The initial ESQA is not replaced by the SQA parm in IEASYSxx, but is added to. To verify this, I changed the INITSQA value in my sandbox and IPL'd. The new ESQA after the system was up was increased by the amount I increased INITSQA by. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Check out Hurricane Irene : Tracking Map : Weather Underground
Nope. Apolitical on IBM-Main, I've still got friends and family in D.C. area. In a message dated 8/26/2011 7:10:29 A.M. Central Daylight Time, allan.stal...@kbmg.com writes: Do you mean a direct hit on Wash. DC? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
Yes that helped identify the problem. I changed group AUTH parameter from AUTH(I,O,H,DA,PREF,SE,SR,ST) to AUTH(ALL) and now all works as I hoped. Thanks Steve -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Elardus Engelbrecht Sent: 26 August 2011 14:40 To: IBM-MAIN@bama.ua.edu Subject: Re: SDSF REXX question Steve Austin wrote: Yes that is exactly what I want, but it is not working for me here. Ouch. More painful than a bored attorney's fee... :-D I suspect an environmental problem of some sort; possibly something in ISFPRMxx. Perhaps. Try these lines just before your own ADDRESS SDSF ISFEXEC for some diagnostics. ADDRESS SDSF ISFEXEC WHO DO IX=1 TO ISFRESP.0 SAY ISFRESP.IX IS: ISFRESP.IX END Then compare the results to see what is the difference for your TSO and Batch execution. You may need extra access permission in ISFPRMxx or in RACF. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - - This email has been scanned for all known viruses by the MessageLabs Email Security Service and the Macro 4 internal virus protection system. - -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
An ESTAE routine has the power to suppress any indication of abend, including a return code of zero if that's what it wants to do. The point of a SLIP trap is that the operating system intervenes ahead of any internal ESTAE action and tells you what happened *first*. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Binyamin Dissen bdis...@dissensoftware.com To: IBM-MAIN@bama.ua.edu Date: 08/26/2011 05:51 AM Subject:Re: Help with an LE problem Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu On Fri, 26 Aug 2011 14:39:22 +0200 Hunkeler Peter (KIUP 4) peter.hunke...@credit-suisse.com wrote: :I guess I will need a real dump, but have no idea how to trap it :- after all I do not see an abend. :Have you tried EXEC PARM='/TRAP(OFF)' (For Cobol, LE runtime options :are after the /, right?) :TRAP(OFF) disables LE's usual ESPIE and ESTAE. If there is an abend :you should get a dump to either //SYSABEND, /SYSUDUMP, etc. There is vendor code that screws with the LE options. But, the basic point - nothing in the CEEDUMP shows that there was an abend, other than the message. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: COPY commands under JCL vs. under Unix System Services
Folks, The suggestion made by Mark did work here fine. I just added a new DD cards that sets some environment variables that control the way new processes are started under BPXBATCH. //STDENV DD * _BPX_SHAREAS=YES _BPX_SPAWN_SCRIPT=YES This made the JCL run fine. One thing to note, I tried to set this variables inside of my Unix script Copy.sh (export _BPX_SHAREAS=YES...) and it did not work. Thanks for the feedback folks! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEW4000I FETCH FOR MODULE IDCLC01 FROM DDNAME -LNKLST- FAILED
In CAGzfoX-5vS-6Z7mTYr0EY_upw0Y4PiaybXDn88YOxp0ML=g...@mail.gmail.com, on 08/26/2011 at 01:22 PM, Alvaro Guirao Lopez alvarogui...@gmail.com said: I'm had assembled some exits and I'm trying to apply as USERMOD into SMP when I had this memory abend, the error is at LNKLST so I cannot increase it REGION, Why not? maybe increasing CSA at IEASYS?? How is CSA relevant? Were you trying to replace an LPA module? -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CSA and SQA problem
Thank you for the update. I learned something new today. snip On 8/25/2011 1:21 PM, Staller, Allan wrote: The manual previously cited does not state either case (pro or con) clearly under the discussion of the INITSQA parameter. My understanding was that this parameter was used to increase the initial allocation until the SQA parameters of IEASYSxx were processed. At that time the allocation would be included in the full initialization. See quote and references below. The initial ESQA is not replaced by the SQA parm in IEASYSxx, but is added to. To verify this, I changed the INITSQA value in my sandbox and IPL'd. The new ESQA after the system was up was increased by the amount I increased INITSQA by. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
In 4e578705.1090...@trainersfriend.com, on 08/26/2011 at 05:44 AM, Steve Comstock st...@trainersfriend.com said: But it says user abend U 802, so I would suspect your code. Why? For half a century the run-time libraries for language processors have been issuing documented user ABEND's. I read the message as saying that LE issued an ABEND U802 after interceptins an ABEND S322. Or is LE giving the user ABEND code in *both* hex and decimal? Nornal pracrivwe is to use decimal for user codes and hex for system codes. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF REXX question
In d3571c7d425590479eb3adb197bfc47b01133...@m4ukex02.intranet.macro4.com, on 08/26/2011 at 12:46 PM, Steve Austin steve.aus...@macro4.com said: Any idea what I'm missing? Off the top of my head, SDSF can run either as a stand-alone TSO command or as an ISPF facility. There are differences in behavior depending on how you run it. How did you invoke ISPF under TSO? Does it work the other way? There's also the issue that IRXJCL doesn't establish a TSO environment at all. Perhaps you need to tun under IKJEFT01. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMS and Not Cataloged Datasets
Good FRIDAY morning, In our SMS world of storage we have encountered not cataloged datasets which, when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some unusual results. In an ISPF 3.4 list specifying the datasetname and the specific volume serial number where the not cataloged dataset resides has resulted in the cataloged version of the dataset being uncataloged and not deleted. These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. An IEHPROGM execution returns: X'04' X'06' X'00' X'1E' Verification of SMS flags failed; caller indicates the data set is not cataloged, but the FMT1 DSCB indicates the data set is cataloged. Our question is, how do we delete these not cataloged datasets? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
1) Rename cataloged version of the dataset 2) DEF NVSAM or DEF RECATALOG as appropriate 3) Delete 4) Rename verision In step 1 back to original name Alternative: DEL 'dsn' (VVR or NVR) file(DD1) VVR - VSAM NVR - Non-VSAM DD1 volser in question HTH, snip In an ISPF 3.4 list specifying the datasetname and the specific volume serial number where the not cataloged dataset resides has resulted in the cataloged version of the dataset being uncataloged and not deleted. These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. Snippage Our question is, how do we delete these not cataloged datasets? /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
Hello, The following JCL shows an example //IDCAMSEXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //POOP DD DISP=SHR,UNIT=3390,VOL=SER=volser DELETE dsn FILE(POOP) + VVRCAT(catalog.name) If no entry exists in the volume's VVDS (unlikely), change VVR to TRUENAME. You may need to add FORCE or PURGE if IDCAMS squawks. Cheers, Alan -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Donnelly, John P Sent: Friday, August 26, 2011 10:32 AM To: IBM-MAIN@bama.ua.edu Subject: SMS and Not Cataloged Datasets Good FRIDAY morning, In our SMS world of storage we have encountered not cataloged datasets which, when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some unusual results. In an ISPF 3.4 list specifying the datasetname and the specific volume serial number where the not cataloged dataset resides has resulted in the cataloged version of the dataset being uncataloged and not deleted. These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. An IEHPROGM execution returns: X'04' X'06' X'00' X'1E' Verification of SMS flags failed; caller indicates the data set is not cataloged, but the FMT1 DSCB indicates the data set is cataloged. Our question is, how do we delete these not cataloged datasets? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
TSO I (ISMF) 1 (datasets) Specify dataset name and volser. Delete. It will display the dataset, volser, and that the dataset is not cataloged. Will delete. Also a IEFBR14 with DSN,UNIT,VOL=SER= and DISP=(OLD,DELETE) On Fri, Aug 26, 2011 at 12:31 PM, Donnelly, John P john.p.donne...@nsc.com wrote: Good FRIDAY morning, In our SMS world of storage we have encountered not cataloged datasets which, when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some unusual results. In an ISPF 3.4 list specifying the datasetname and the specific volume serial number where the not cataloged dataset resides has resulted in the cataloged version of the dataset being uncataloged and not deleted. These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. An IEHPROGM execution returns: X'04' X'06' X'00' X'1E' Verification of SMS flags failed; caller indicates the data set is not cataloged, but the FMT1 DSCB indicates the data set is cataloged. Our question is, how do we delete these not cataloged datasets? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
Radoslaw: I have never done a server PAC install on any thing other than a production systems. That meaning production jobs along side the serv PAC jobs. I have been doing servpac installs since day one of serv pacs. The same thing goes for CBIPO and CBPDO installs. Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.
Good Day To All, I have noticed that a storage pool has dsns which go back to 2 months even thought the management class is set to 3 days. On this partition we have HSM running however there is no ML2 migration, however migration is turned on : Auto Migrate . . Y (Y, N, I or P) Auto Backup . . Y (Y or N) Auto Dump . . . N (Y or N) Overflow . . . . N (Y or N) PRIMARY, SECONDARY INTERVAL SPACE management kicks off at the designated times. Could it be that space management is ignoring some of the volumes in the pool because of the migration threshold? This is what it is set to: Allocation/migration Threshold : High . . 75 (1-99) Low . . 3 (0-99) Alloc/Migr Threshold Track-Managed: High . . 85 (1-99) Low . . 1 (0-99) Below are the Expiration Attributes of this management class: Expire after Days Non-usage . : 3 Expire after Date/Days . . . . : 3 Retention Limit . . . . . . . : 0 If this is the case (migration threshold) how could I have HSM perform a clean up of these datasets which are over 3 days old? If this is not the case could someone tell me where else I should look? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.
Until a volume goes above the high threshold, it is not examined for datasets to migrate. Reduce the high threshold. On Fri, Aug 26, 2011 at 1:05 PM, willie bunter williebun...@yahoo.com wrote: Good Day To All, I have noticed that a storage pool has dsns which go back to 2 months even thought the management class is set to 3 days. On this partition we have HSM running however there is no ML2 migration, however migration is turned on : Auto Migrate . . Y (Y, N, I or P) Auto Backup . . Y (Y or N) Auto Dump . . . N (Y or N) Overflow . . . . N (Y or N) PRIMARY, SECONDARY INTERVAL SPACE management kicks off at the designated times. Could it be that space management is ignoring some of the volumes in the pool because of the migration threshold? This is what it is set to: Allocation/migration Threshold : High . . 75 (1-99) Low . . 3 (0-99) Alloc/Migr Threshold Track-Managed: High . . 85 (1-99) Low . . 1 (0-99) Below are the Expiration Attributes of this management class: Expire after Days Non-usage . : 3 Expire after Date/Days . . . . : 3 Retention Limit . . . . . . . : 0 If this is the case (migration threshold) how could I have HSM perform a clean up of these datasets which are over 3 days old? If this is not the case could someone tell me where else I should look? -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFHSM QUESTION - PRIMARY,SECONDARY INTERVAL SPACE MGMT.
Check the migration log. There are many possible reasons for a dataset not to migrate. ARC0734I present you with a return code and reason code for each action taken. Lookup the ARC0734I will refer you to another ARC12xx or ARC13xx message that contains the detailed explanation based to the return and reason codes. Common retcodes that show up in my shot are 8, 37, 19, 20, 99 8 - dataset too large for ML1 migration 37 - insufficient space on ML1 for dataset 19 - data set in use 20 - invalid file (usually a null file or invalid dsorg) 99 - other, in my case the other sysprog APF auths a personal dataset for testing. HTH, snip I have noticed that a storage pool has dsns which go back to 2 months even thought the management class is set to 3 days. On this partition we have HSM running however there is no ML2 migration, however migration is turned on : Auto Migrate . . Y (Y, N, I or P) Auto Backup . . Y (Y or N) Auto Dump . . . N (Y or N) Overflow . . . . N (Y or N) PRIMARY, SECONDARY INTERVAL SPACE management kicks off at the designated times. Could it be that space management is ignoring some of the volumes in the pool because of the migration threshold? This is what it is set to: Allocation/migration Threshold : High . . 75 (1-99) Low . . 3 (0-99) Alloc/Migr Threshold Track-Managed: High . . 85 (1-99) Low . . 1 (0-99) Below are the Expiration Attributes of this management class: Expire after Days Non-usage . : 3 Expire after Date/Days . . . . : 3 Retention Limit . . . . . . . : 0 If this is the case (migration threshold) how could I have HSM perform a clean up of these datasets which are over 3 days old? If this is not the case could someone tell me where else I should look? /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. I would change the JCL. - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help with an LE problem
On Fri, 26 Aug 2011 07:16:18 -0400, Sambataro, Anthony wrote: Is not the original abend a S322(CPU timeout)? No. ABEND code: 0322 Reason code: is what LE said. The 322 in bits 20-31 is the user abend code, decimal 802. System abend codes are in bits 8-19. Also, the DUMP bit is not set, so it is unlikely that any attempt to circumvent LE's ESTAEX would provide any useful information. I would go with Skip's suggestion or try to trap a U0802 abend in the job. -- Tom Marchant -Original Message- From: Skip Robinson [mailto:jo.skip.robin...@sce.com] Sent: Thursday, August 25, 2011 6:01 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Help with an LE problem I've had good luck with COBOL problems by setting a NONPER SLIP trap with no abend code specified. Just job name. SLIP is supposed to catch the first abend--before any ESTAE gets control--and produce an SVC dump for that abend. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Binyamin Dissen bdis...@dissensoftware.com To: IBM-MAIN@bama.ua.edu Date: 08/25/2011 02:31 PM Subject:Help with an LE problem Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu I have a CEEDUMP with CEE3250C The system or user abend U 802 R=NULL was issued. ABEND code: 0322 Reason code: CIB: +00 000F37F8 C3C9C240 010C0004 00040CB2 61C3C5C5 |CIB /CEE| +20 000F3818 000B 000F3908 00040CB2 61C3C5C5 000B 000EF1C8 C0D68988 |/CEE..1H.Oih| +40 000F3838 000F1BF8 43D7CADC 000EC478 0005 000EF2B8 |...8.PD...2.| +60 000F3858 || +80 000F3878 - +9F 000F3897 same as above +A0 000F3898 80015000 0322 |...| +C0 000F38B8 43D78DFC 000F1BF8 000F1BF8 43D7CADC 0001 |.P.8...8.P..| +E0 000F38D8 000EF1C8 0005 0064 FFFC 0001 000E98D0 |..1H..q.| +000100 000F38F8 0012 000EC690 E9D4C3C8 0201 43D08008 |..F.ZMCH| But the neither the PSW nor the registers are consistent with this abend. The registers and PSW are consistent with the Exception location. The ZMCH block has the exception information. It is a COBOL program compiled with THREAD. I guess I will need a real dump, but have no idea how to trap it - after all I do not see an abend. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
Good FRIDAY morning, In our SMS world of storage we have encountered not cataloged datasets which, when deleted through ISPF 3.4 list, or IDCAMS, or IEHPROGM, have created some unusual results. In an ISPF 3.4 list specifying the datasetname and the specific volume serial number where the not cataloged dataset resides has resulted in the cataloged version of the dataset being uncataloged and not deleted. My favorite is using DFDSS to do this. Using PARM='TYPRUN=NORUN' will list all files that meet the criteria. //* //* LIST DATA SETS NOT CATALOGED ON A VOLUME //* //NOCAT EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN' //SYSPRINT DD SYSOUT=* //OUTPUT DD DUMMY //SYSIN DD * DUMP DS (BY ((CATLG EQ NO))) - INDYNAM( - (11) , - (22) , - (33) , - (..) , - (..) , - (..) , - (nn) - ) ODD(OUTPUT) You can backup the files and then restore them if needed. To delete you would add a DELETE PURGE to the control cards. Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Inforpac RDS to Treev OVS
Is anyone familar with these products? We might convert from RDS to OVS, but are not sure how to convert the archives. Has anyone had to do this? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ted MacNEIL Sent: Friday, August 26, 2011 11:33 AM To: IBM-MAIN@bama.ua.edu Subject: Re: SMS and Not Cataloged Datasets These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. I would change the JCL. I have to agree, I have trouble thinking of an excuse for routine NOSCRATCH NOERASE even back when. In an SMS world, it just doesn't make sense and I would take measures to stop it if I found it here. Dave Gibney Information Technology Services Washington State University - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Trouble with testcase.boulder.ibm.com
Has anyone had trouble today trying to send data to testcase.boulder.ibm.com? It won't let anonymous sign on for me. Sitting here on hold enjoying music, waiting to ask IBM about it. Dana -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Trouble with testcase.boulder.ibm.com
I did encounter problem with testcase.boulder.ibm.com an hour ago. Use ftp.ecurep.ibm.com instead of testcase.boulder.ibm.com. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Dana Mitchell Sent: Friday, August 26, 2011 3:23 PM To: IBM-MAIN@bama.ua.edu Subject: Trouble with testcase.boulder.ibm.com Has anyone had trouble today trying to send data to testcase.boulder.ibm.com? It won't let anonymous sign on for me. Sitting here on hold enjoying music, waiting to ask IBM about it. Dana -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Please visit our website at http://financialservicesinc.ubs.com/wealth/E-maildisclaimer.html for important disclosures and information about our e-mail policies. For your protection, please do not transmit orders or instructions by e-mail or include account numbers, Social Security numbers, credit card numbers, passwords, or other personal information. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
In 20110826214422.6ca4399d@xpfs, on 08/26/2011 at 09:44 PM, Shane ibm-m...@tpg.com.au said: For example, for way too long it was a requirement to run the ServerPac scripts as UID 0. I believe that derived from an SMP/E limitation, now lifted. There was a recent thread re security in the *nix world. Cast not your stones - the initial OE/OMVS/USS security model was appalling. The initial OE implementation was appalling, period. That's true from both an MVS perspective and a Unix perspective. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
In 4e57892f.4060...@bremultibank.com.pl, on 08/26/2011 at 01:53 PM, R.S. r.skoru...@bremultibank.com.pl said: I disagree, that means: what's wrong with UID(0) for such scripts? Plenty, over and above violating the principle of least privilege. In another life I had RACF special and had free reign as long as I sent an e-mail explaining what I had done and why. The SOB with RACF special wouldn't give me UID(0) for my normal userid ;-) -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ICEGENER and VSAM
---snip-- Can anyone confirm for me if ICEGENER when used to copy to a VSAM cluster (SYSUT2) will preserve the CI/CA freespace parameters if they are 0. We use it successfully to copy QSAM to VSAM for CI/CA freespace=0 with significant performance gains. ---unsnip Dumb questions: 1. Is that a supported mechanism for getting data into a VSAM cluster? 2. What's wrong with the REPRO control statement for IDCAMS ?? Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: alter dataset blocksize
---snip- Hi, Is there some way to modify the (PO) dataset BLOCKSIZE keeping the original creation date? LIBRARY.TEST.BLKSIZE (PO) lrecl=23200 and blksize=0 creation date=2011/08/11 last ref date=2011/08/15 To alter the blksize, or another dataset specifications, we use this method : 1.- create a new library with the correct specifications. 2.- copy from old to the new. 3.- remove the old lib. 3.- rename the new lib. (but it shows the NEW creation date = current date) I want to know how to alter its blocksize or to alter the creation date. Happy week end, -unsnip--- If you're going to a LARGER BLKSIZE, you can IEBGENER a dummy member into it, specifying the new BLKSIZE on the SYSUT2 DD statement. Why is this necessary ?? Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Book: What On Earth is a Mainframe?
Anyone read this? I have PC kids I work with who are likely to read it, wonder what others thought. I read the pages Amazon would let me preview, and it didn't seem horrible, though it loses points for being published in 2008 and calling System z zSeries. But who knows, he may have been working on the project since before 2005, and of course (too!) many people still use the old name. http://www.amazon.com/exec/obidos/ASIN/1409225356/pakoracom -- ...phsiii -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMS and Not Cataloged Datasets
snip-- These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. I would change the JCL. ---unsnip Same here, Ted. If there's a pressing need or business case for keeping a previous version, use a GDG. (But try not to overdo it!) :-) Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Changes and SMS and Not Cataloged Datasets
This poor practice was something instilled in the Tata contractors we have employed. We change one and another crops up... We are looking to change of change control management software to capture... Thankyou all... -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Rick Fochtman Sent: Friday, August 26, 2011 1:29 PM To: IBM-MAIN@bama.ua.edu Subject: Re: SMS and Not Cataloged Datasets snip-- These datasets turn up not cataloged because of statements in our production JCL which specify things like NOSCRATCH NOERASE for a simple dataset. I would change the JCL. ---unsnip Same here, Ted. If there's a pressing need or business case for keeping a previous version, use a GDG. (But try not to overdo it!) :-) Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Changes and SMS and Not Cataloged Datasets
This poor practice was something instilled in the Tata contractors we have employed. Simple answer to that: don't hire them again. Long before SMS, in 1981 (when I started), we had utilities to automatically delete uncatalogued datasets. There has been no reason, aside from SYSRES, JES SPOOL and the like, for uncatalogued datasets for aeons! - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html