Average MIPS consumed
Hi All, Good Morning !! We have IEFACTRT exit routine installed in our shop which shows the Job condition code and the CPU value. Here one of our Application developer is interested to know the value in MIPS for a Job. I checked one article which says like http://itknowledgeexchange.techtarget.com/itanswers/convert-cpu-time-into-mips/ This makes the assumption that the job is not multi-tasking either through it's own code or with the built-in cpu parallelism of DB2. 1) divide the cpu time by the elapsed time 2) divide the total processor MIPS by the number of engines on the processor 3) multiply the two above results together Example: 1) A job that ran for 60 minutes consumed 20 minutes of cpu time. So 20/60 = .33 2) The processor has a 6 engines and a total of 1200 MIPS. So 1200/6 = 200 MIPS per engine. 3) 200*.33 = 66 MIPS Bill Can we really represent the Total CPU time taken for a Job in MIPS(average) ? Does it really makes sense to represent the CPU time in MIPS ? To be honest our shop does not own any SAS or MXG to process the RAW data on SMF Record 30 type, but yes I do have a unconventional way of Processing the SMF records but again it shows only CPU time taken. Could anyone please shed some light on the above. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Parallel Sysplex Training
Try veroef training On Jun 13, 2012 7:10 PM, saurabh khandelwal sourabhkhandelwal...@gmail.com wrote: Hello, I am looking for classroom/Virtual/Online Parallel Sysplex training. Please help me if you have any idea on this. -- Thanks Regards Saurabh -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Convert Text to XMIT
Paul, Thanks for your reply. I presume this would need little more research and get back to you all once I recover it. Jake On Tue, Jun 12, 2012 at 12:53 PM, Paul Gilmartin paulgboul...@aim.comwrote: On Mon, 11 Jun 2012 07:23:22 -0500, McKown, John wrote: If you mean that they FTP transferred an XMIT file via an intermediate system which was ASCII based (such as Windows) and forgot to do a BINary transfer at some stage, you are out of luck. The problem is that, in general, if you do an EBCDIC to ASCII to EBCDIC tranlation which include non printable character, you don't get back the original file. The reason is because multiple EBCDIC characters translate to the same ASCII character. So there is NO way to know what the original character is. The OP sent me, privately, a sample of his data. Excerpts from my analysis/reply to him: It was apparently a PDS containing several (perhaps 5) Rexx EXECs. ... Apparently a TRANSMIT OUTDATASET() was performed. That output data set, about 100kB, was FTPed to the PC in ASCII mode. Is the EBCDIC instance lost from z/OS? ... Recovery is tedious. I haven't the resources to help you further. Some of the members (a little more than half the content) had sequence numbered lines; those numbers could be useful markers in reconstructing the data. [Abby Sciuto or Penelope Garcia would do it in seconds.] You might take this back to IBM-MAIN. ... But, please, answer completely any questions people ask you; don't expect others to do all the detective work. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Convert Text to XMIT
Dear List, Are there any possibilities of converting TEXT file to XMIT format. Since some of our home grown IMS tools were XMITED improperly with TEXT file. So just trying to know if the TEXT file can be FTPed and received all its member to a PDS. Has anyone recovered the TEXT file to XMIT ? Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Convert Text to XMIT
Unfortunately the pds was transmitted with .txt file some years ago but now am trying restore the pds members from text files. On Jun 11, 2012 5:25 PM, Paul Gilmartin paulgboul...@aim.com wrote: On Mon, 11 Jun 2012 12:10:35 +0530, Jake anderson wrote: Are there any possibilities of converting TEXT file to XMIT format. Since TRANSMIT does this. some of our home grown IMS tools were XMITED improperly with TEXT file. So just trying to know if the TEXT file can be FTPed and received all its member to a PDS. If you used TRANSMIT and RECEIVE and a problem occurred, open a PMR against TRANSMIT or RECEIVE. If you used something else, try using TRANSMIT and RECEIVE instead. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Convert Text to XMIT
Unfortunately it was ASCII On Jun 11, 2012 7:21 PM, Williamson, James R james.r.william...@uscg.mil wrote: If the file with the .txt suffix was transferred with mode binary, the suffix does not matter. Just transfer the .txt file using binary mode to a mainframe file with an LRECL of 80 and receive that file. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jake anderson Sent: Monday, June 11, 2012 7:03 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Convert Text to XMIT Unfortunately the pds was transmitted with .txt file some years ago but now am trying restore the pds members from text files. On Jun 11, 2012 5:25 PM, Paul Gilmartin paulgboul...@aim.com wrote: On Mon, 11 Jun 2012 12:10:35 +0530, Jake anderson wrote: Are there any possibilities of converting TEXT file to XMIT format. Since TRANSMIT does this. some of our home grown IMS tools were XMITED improperly with TEXT file. So just trying to know if the TEXT file can be FTPed and received all its member to a PDS. If you used TRANSMIT and RECEIVE and a problem occurred, open a PMR against TRANSMIT or RECEIVE. If you used something else, try using TRANSMIT and RECEIVE instead. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Controlling the FTP server - FTCHKPWD
Dear List, Good Day !! To control the FTP server we know we can use FTCHKPWD user exit. Has anyone used this EXIT at your shop to control the FTP access ? Just wanted to understand the method to install this exit and control only the specified user gaining access to FTP server running on Z/OS. Environment : Z/OS 1.8 Resource link : http://publib.boulder.ibm.com/infocenter/zos/v1r11/index.jsp?topic=/com.ibm.zos.r11.halz002/f1a1b391185.htm Any comments or suggestions would help a lot Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Controlling the FTP server - FTCHKPWD
You might also consider using a port of entry (the TERMINAL CLASS), to restrict access by IP address. I could see examples on CICS but any syntax which secures the port 21 alone ? Jake On Fri, Jun 8, 2012 at 10:48 PM, Kirk Wolf k...@dovetail.com wrote: Steven is an expert in this area, but there is also some good information in the IBM document: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/FRAMESET/F1A1B391/2.3.4.1?SHELF=F1A1BKB1DT=20100121150057 See Steps for http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/F1A1B391/2.3.4.1.3?SHELF=F1A1BKB1DT=20100121150057FS=TRUEScrollTOP=HDRWQ678#HDRWQ678 controlling user access to the FTP server in topic 2.3.4.1.3 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/F1A1B391/2.3.4.1.3?SHELF=F1A1BKB1DT=20100121150057FS=TRUEScrollTOP=HDRWQ678#HDRWQ678 ). You might also consider using a port of entry (the TERMINAL CLASS), to restrict access by IP address. Kirk Wolf Dovetailed Technologies http://dovetail.com On Fri, Jun 8, 2012 at 7:41 AM, Steven St.Jean sstj...@sdsusa.com wrote: Jake, I do not use FTCHKPWD, but I use FTCHKCMD to control user access (and lots of other things). I preferred FTCHKCMD, because I found I could accomplish everything that FTCHKPWD allowed me to do and more, and it shares a scratchpad with FTPOSTPR. The server exits are pretty easy to install and test. You can use a STEPLIB in your FTP server proc and put the exits in there. Changes are picked up right away, since the FTP server spawns a new address space for each session. Just assemble and link your exit to the STEPLIB library and connect to the server. The exits need to be in an APF authorized library, and must be program-controlled, like this: RDEF PROGRAM FTCHKCMD ADDMEM ('LOAD.LIBRARY.NAME'/volser /NOPADCHK) UACC(READ) SETR WHEN(PROGRAM) REFRESH Failure to do this will result in messages like this to the console: ICH420I PROGRAM FTCHKCMD FROM LIBRARY LOAD.LIBRARY.NAME CAUSED THE ENVIRONMENT TO BECOME UNCONTROLLED BPXP014I ENVIRONMENT MUST BE CONTROLLED FOR DAEMON (BPX.DAEMON) PROCESSING. You can make SAF (RACROUTE) calls from the exits. The number of parameters passed to the exits can change from release to release, so be sure to check the second parameter, which tells you how many parameters are passed. Hope this helps. Steven St.Jean http://sdsusa.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Jake anderson Sent: Friday, June 08, 2012 6:05 AM To: IBM-MAIN@bama.ua.edu Subject: Controlling the FTP server - FTCHKPWD Dear List, Good Day !! To control the FTP server we know we can use FTCHKPWD user exit. Has anyone used this EXIT at your shop to control the FTP access ? Just wanted to understand the method to install this exit and control only the specified user gaining access to FTP server running on Z/OS. Environment : Z/OS 1.8 Resource link : http://publib.boulder.ibm.com/infocenter/zos/v1r11/index.jsp?topic=/com. ibm.zos.r11.halz002/f1a1b391185.htm Any comments or suggestions would help a lot Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
FTPing datasets to MS Share Point Server
Dear List, Good Day !! I have tried FTPing using the IEBGENER to my Local PC but just wanted to understand if we can FTP all the Dataset contents to a Share Point Server ? I am in process of automating a process of FTPing all the MF datasets to a share Point server on a monthly Basis for our Internal Review. Has Anyone Performed a similar set up at your Shop of FTPing the MF data's to Share Point server ? Any Pointers or suggestions are most welcome. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CSVEDIT using COBOL
Dear All, The subject header deals with CSVedit not with IEBEDIT. Mansi, Can't you create a new thread Jake On Mon, May 14, 2012 at 11:31 PM, Scott Ford scott_j_f...@yahoo.com wrote: Mansi, Please try to explain what your trying to do..it is not clear from you post Scott ford www.identityforge.com On May 14, 2012, at 12:15 AM, Mansi Kulkarni mansi.e...@gmail.com wrote: Hi, Sir can u tell me program of IEBEDIT utility in JCL.. Plz give all details of steps please... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CSVEDIT using COBOL
Mansi, Please try to create a new thread when you have any new question. Please don't dilute your post with the original post. Well for IEBEDIT the below link would give you more examples on IEBEDIT. On Mon, May 14, 2012 at 10:11 AM, Mark Douglas (CITEC) mark.doug...@citec.com.au wrote: Google is your friend: http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idau100%2Fu1103.htm MARK DOUGLAS -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mansi Kulkarni Sent: Monday, 14 May 2012 2:16 PM To: IBM-MAIN@bama.ua.edu Subject: Re: CSVEDIT using COBOL Hi, Sir can u tell me program of IEBEDIT utility in JCL.. Plz give all details of steps please... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN * Disclaimer * The contents of this electronic message and any attachments are intended only for the addressee and may contain privileged or confidential information. They may only be used for the purposes for which they were supplied. If you are not the addressee, you are notified that any transmission, distribution, downloading, printing or photocopying of the contents of this message or attachments is strictly prohibited. The privilege of confidentiality attached to this message and attachments is not waived, lost or destroyed by reason of mistaken delivery to you. If you receive this message in error please notify the sender by return e-mail or telephone. Please note: the Department of Public Works carries out automatic software scanning, filtering and blocking of E-mails and attachments (including emails of a personal nature) for detection of viruses, malicious code, SPAM, executable programs or content it deems unacceptable. All reasonable precautions will be taken to respect the privacy of individuals in accordance with the Information Privacy Act 2009 (Qld). Personal information will only be used for official purposes, e.g. monitoring Departmental Personnel's compliance with Departmental Policies. Personal information will not be divulged or disclosed to others, unless authorised or required by Departmental Policy and/or law. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
SQLFire installation Information
Dear All, Could anyone please let me know if anyone has a experience of installing SQLFire in your Mainframe Environment ? I am just Looking for some documentation to understand the installation. Apology if this question is more of DB2 but thought this forum would target majority of the system programmers who could help me in directing to a right direction. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Reversing the Catalog Definition entries
Mark, If you use that exec to undo indirect cataloging, *YOU MUST* change DEVT() to DEVT(3390) (assuming you are not using something like a P/390 with 3380 DASD) before submitting the IDCAMS job Yeah I have pointed DEVT(3390).. On Wed, Apr 18, 2012 at 8:30 PM, Tom Marchant m42tom-ibmm...@yahoo.comwrote: On Wed, 18 Apr 2012 08:18:25 +0530, Jake anderson wrote: I am just curious to know if we have indirectly cataloged one set of volume lets say ZX2RS2 to SYSR2. Can we change back the entries in Master Catalog from SYSR2 to ZX2RS2 ? Could anyone please advise me if such options are available to do so. Are you sure you want to do that? Why? There might be a better solution to whatever problem you are trying to solve. -- Tom Marchant -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Reversing the Catalog Definition entries
Hi All, I am just curious to know if we have indirectly cataloged one set of volume lets say ZX2RS2 to SYSR2. Can we change back the entries in Master Catalog from SYSR2 to ZX2RS2 ? Could anyone please advise me if such options are available to do so. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Reversing the Catalog Definition entries
Hello , If you bring the datasets up in ISPF 3.4, just type a U in front of the DSN(s) and when that completes, type a C Are there any sample JCLs which would perform the above stuff at once for all 214 datasets. Jake On Wed, Apr 18, 2012 at 8:41 AM, retired mainframer retired-mainfra...@q.com wrote: If you bring the datasets up in ISPF 3.4, just type a U in front of the DSN(s) and when that completes, type a C :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of Jake anderson :: Sent: Tuesday, April 17, 2012 7:48 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Reversing the Catalog Definition entries :: :: Hi All, :: :: I am just curious to know if we have indirectly cataloged one set of :: volume :: lets say ZX2RS2 to SYSR2. Can we change back the entries in Master :: Catalog :: from SYSR2 to ZX2RS2 ? Could anyone please advise me if such options :: are :: available to do so. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
GO TO cobol
Hi All, Apology for asking a basic question and Being Ignorant. We know that GO TO statments are a big NO in many production sites and one of the reason being it monopolizes the entire CPU. Are there any documentation explaining about the GO TO statements which clearly describes how it effects the System CPU and performances ? Apology again if the question is not really sensible or else it requires more information. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Coding IEASYMxx
Hi, Seasons Greeting !! One curious question is that if the Two source SYSRES volumes are in seperate MOD-3 volumes, but the Target SYSRES Volume is initialized using MOD-9. In this scenario how do make use of the SYMBOLIC parameter when two Source SYSRES volumes(MOD-3) are copied to Single SYSRES volume(mod-9). Jake On Mon, Apr 9, 2012 at 3:59 AM, retired mainframer retired-mainfra...@q.com wrote: Keep it in the list please. You get more responses and any incorrect advice will be caught by others. The few symbols that IBM needs, such as SYSR1, are built automatically. There is no need for a default IEASYMxx. Considering the multitude of filtering options allowed, I doubt if IBM could come up with one that didn't cause more problems than it solved. If your LOADxx member specifies your PARMLIB libraries, I think you can place the IEASYMxx in anyone of those. The same may be true if your PARMLIBs are specified in MSTRJCL. I have always put it in SYS1.PARMLIB but that may be just force of habit. _ From: Sent: Sunday, April 08, 2012 5:33 AM Subject: Re: Coding IEASYMxx Hi, Thanks a bunch again, but recently I have installed a new system. Surprisingly IEASYmxx were not in any of my parmlibs, so Just wanted to know If I can create this member manually in any of the parmlib and update the same in LOADxx member ? Please advise me your expert comment. Jake On Sun, Apr 8, 2012 at 7:46 AM, retired mainframer retired-mainfra...@q.com wrote: :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of Jake anderson :: Sent: Saturday, April 07, 2012 6:58 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Coding IEASYMxx :: :: Hello All, :: :: First of all apology for asking a very basic question and being :: ignorant.In :: our shop we have two sysres volumes MTSRS1, MTSRS2,MSTRS3 so during :: SYSRES :: cloning we adopt indirect cataloging. Also it is important to specify :: the :: symbolic parameter at IEASYMxx member. My only basic question is that :: will :: it be wise enough to code like below : :: :: SYMDEF(SYSR2='MTSRS2') :: SYMDEF(SYSR3='MTSRS3'). If you code it like this, then when you have a second set of SYSRES volumes, say TSTRS1, TSTRS2, TSTRS3, SYSR1 will resolve to TSTRS1 as you want but SYSR2 will still resolve to the MTSRS2, not TSTRS2. :: :: I have referred the link :: http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fco :: m.ibm.zos.r12.ieae200%2Fplnsym.htm :: but I am not really able to understand the below coding when we more :: than :: 1 sysres volumes : :: :: :SYSDEF . :: ::. ::SYMDEF(SYSR2='SYSR1(1:3).RS2') /* second SYSRES logical :: extension */ This code says set the value of SYSR2 to the first three characters of SYSR1 followed by the characters RS2. When you IPL from MTSRS1, the first three characters of SYSRS1 are MTS so SYSRS2 resolves to MTSRS2. And when you IPL from TSTRS1, the first three characters are TST so SYSR2 will resolve to TSTRS2. This insures that SYSRS1, SYSRS2, and SYSRS3 always resolve to the three volumes that are part of a matched set. ::SYMDEF(SYSR3='SYSR1(1:3).RS3') /* third SYSRES logical :: extension */ :: :: :: Could anyone please explain me about the above syntax. How to make use :: the of the above syntax reasonably. The only change you need to make to the above is to decide how many volumes are involved. My last system (1.11) had only two 3390-9s so I didn't bother with SYSRS3. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Coding IEASYMxx
Hi, Apology for not being precise. Here I am trying to understand about SYSRES cloning, so I have referred the Currently Running SYSRES as source SYSRES and Target Volume specifies as the Volume Which Would be used during DFSMSdss SYSRES cloning. This volumes are not SMS managed. On Tue, Apr 10, 2012 at 9:05 AM, retired mainframer retired-mainfra...@q.com wrote: We need to get the terminology straight first. What do you mean by source SYSRES and target SYSRES? Is source the IPL volumes and target the volume holding the SMPE target datasets? Or are you using ServerPac terminology? BTW, are any of these volumes SMS managed? :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of Jake anderson :: Sent: Monday, April 09, 2012 8:20 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Re: Coding IEASYMxx :: :: Hi, :: :: Seasons Greeting !! :: :: One curious question is that if the Two source SYSRES volumes are in :: seperate MOD-3 volumes, but the Target SYSRES Volume is initialized :: using :: MOD-9. In this scenario how do make use of the SYMBOLIC parameter when :: two :: Source SYSRES volumes(MOD-3) are copied to Single SYSRES volume(mod-9). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Coding IEASYMxx
Thanks a lot for your precise explanation. On Sun, Apr 8, 2012 at 7:46 AM, retired mainframer retired-mainfra...@q.com wrote: :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of Jake anderson :: Sent: Saturday, April 07, 2012 6:58 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Coding IEASYMxx :: :: Hello All, :: :: First of all apology for asking a very basic question and being :: ignorant.In :: our shop we have two sysres volumes MTSRS1, MTSRS2,MSTRS3 so during :: SYSRES :: cloning we adopt indirect cataloging. Also it is important to specify :: the :: symbolic parameter at IEASYMxx member. My only basic question is that :: will :: it be wise enough to code like below : :: :: SYMDEF(SYSR2='MTSRS2') :: SYMDEF(SYSR3='MTSRS3'). If you code it like this, then when you have a second set of SYSRES volumes, say TSTRS1, TSTRS2, TSTRS3, SYSR1 will resolve to TSTRS1 as you want but SYSR2 will still resolve to the MTSRS2, not TSTRS2. :: :: I have referred the link :: http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fco :: m.ibm.zos.r12.ieae200%2Fplnsym.htm :: but I am not really able to understand the below coding when we more :: than :: 1 sysres volumes : :: :: :SYSDEF . :: ::. ::SYMDEF(SYSR2='SYSR1(1:3).RS2') /* second SYSRES logical :: extension */ This code says set the value of SYSR2 to the first three characters of SYSR1 followed by the characters RS2. When you IPL from MTSRS1, the first three characters of SYSRS1 are MTS so SYSRS2 resolves to MTSRS2. And when you IPL from TSTRS1, the first three characters are TST so SYSR2 will resolve to TSTRS2. This insures that SYSRS1, SYSRS2, and SYSRS3 always resolve to the three volumes that are part of a matched set. ::SYMDEF(SYSR3='SYSR1(1:3).RS3') /* third SYSRES logical :: extension */ :: :: :: Could anyone please explain me about the above syntax. How to make use :: the of the above syntax reasonably. The only change you need to make to the above is to decide how many volumes are involved. My last system (1.11) had only two 3390-9s so I didn't bother with SYSRS3. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Coding IEASYMxx
Hello All, First of all apology for asking a very basic question and being ignorant.In our shop we have two sysres volumes MTSRS1, MTSRS2,MSTRS3 so during SYSRES cloning we adopt indirect cataloging. Also it is important to specify the symbolic parameter at IEASYMxx member. My only basic question is that will it be wise enough to code like below : SYMDEF(SYSR2='MTSRS2') SYMDEF(SYSR3='MTSRS3'). I have referred the link http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.ieae200%2Fplnsym.htm but I am not really able to understand the below coding when we more than 1 sysres volumes : :SYSDEF . . SYMDEF(SYSR2='SYSR1(1:3).RS2') /* second SYSRES logical extension */ SYMDEF(SYSR3='SYSR1(1:3).RS3') /* third SYSRES logical extension */ Could anyone please explain me about the above syntax. How to make use the of the above syntax reasonably. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape error
Hi Mike, I removed the LABEL statement but again with the same error. //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=(0890,1,DEFER) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Jake On Tue, Apr 3, 2012 at 4:35 PM, Mike Schwab mike.a.sch...@gmail.com wrote: Why did you add the LABEL statement? On Tue, Apr 3, 2012 at 12:05 AM, Jake anderson justmainfra...@gmail.com wrote: //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=(0890,1,DEFER),LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Mike, Its again the same error message. Jake On Tue, Apr 3, 2012 at 10:30 AM, Mike Schwab mike.a.sch...@gmail.com wrote: Try //TAPEDD UNIT=(0890,1,DEFER) On Mon, Apr 2, 2012 at 11:20 PM, Jake anderson justmainfra...@gmail.com wrote: Dear Linda, Still no luck: //TAPE DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape error
Hi Mike/All, I modified the statment like below and started working : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD DSN=IBMUSER.TAPE,UNIT=(890,1,DEFER),DISP=(NEW,CATLG) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Not sure why the previous IBM standard JCL didn't worked. Jake On Tue, Apr 3, 2012 at 4:42 PM, Jake anderson justmainfra...@gmail.comwrote: Hi Mike, I removed the LABEL statement but again with the same error. //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=(0890,1,DEFER) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Jake On Tue, Apr 3, 2012 at 4:35 PM, Mike Schwab mike.a.sch...@gmail.comwrote: Why did you add the LABEL statement? On Tue, Apr 3, 2012 at 12:05 AM, Jake anderson justmainfra...@gmail.com wrote: //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=(0890,1,DEFER),LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Mike, Its again the same error message. Jake On Tue, Apr 3, 2012 at 10:30 AM, Mike Schwab mike.a.sch...@gmail.com wrote: Try //TAPEDD UNIT=(0890,1,DEFER) On Mon, Apr 2, 2012 at 11:20 PM, Jake anderson justmainfra...@gmail.com wrote: Dear Linda, Still no luck: //TAPE DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape Options
Hi Mike, I get the same error message using with below JCL Jake On Mon, Apr 2, 2012 at 10:46 AM, Mike Schwab mike.a.sch...@gmail.comwrote: I see some differences between your jcl and IBM's examples. Why don't you try IBM's values? Probably don't need the DEN value, or the LABEL that you supplied. http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idau100%2Fdgt2u16018.htm Example 1: Write EBCDIC Labels on Three Tapes z/OS V1R12.0 DFSMSdfp Utilities SC26-7414-07 In this example, serial numbers 001234, 001235 and 001236 are placed on three tape volumes. The labels are written in EBCDIC at 800 bits per inch. Each volume labeled is mounted, when it is required, on a single 9-track tape unit. //LABEL1 JOB ... //STEP1EXEC PGM=IEHINITT //SYSPRINT DD SYSOUT=A //LABELDD DCB=DEN=2,UNIT=(tape,1,DEFER) //SYSINDD * LABEL INITT SER=001234,NUMBTAPE=3 /*The control statements are as follows: LABEL DD defines the tape unit used in the labeling operation. SYSIN DD defines the control data set, which follows in the input stream. LABEL INITT specifies the number of tapes to be labeled (3), beginning with 001234. On Sun, Apr 1, 2012 at 11:16 PM, Jake anderson justmainfra...@gmail.com wrote: Dear All, Reason for opting another option to initialize was due to the below abend : SYSTEM SUPPORT UTILITIES IEHINITT TAPE INITT SER=Z9BQB1 0007 IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR FOR EXPLANATION OF BIT SETTINGS IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED JCL : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T, // NOTIFY=SYSUID //STEP1EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 ] Z/os : 1.8 Lookat explanation : Explanation: The volume was not labeled as a result of exit processing. The reason for the failure is encoded (hex representation) in the reason code, which maps directly to the settings in the four-byte field INXNLBRS in macro IEHUEXIT, which normally resides in SYS1.MACLIB. The macro should be referenced for the very latest mapping. However, the bit definitions current at the time of this edition are: Byte 1 ww X'80' Error on call to CSVDYNEX. X'40' An exit routine abended. X'20' Invalid return code from exit routine (not 0, 4, 8). X'10' Invalid reason code from exit routine (not 0, 4). X'08' A previous exit indicated that the volume is not to be labeled. X'04' Conflicts in the results from calls to exits have been encountered. X'02' At least one exit routine returned rc=0 with a modified volser and either other exit routines returned rc=0 without modifying the volser, or the modified volser's didn't match. X'01' Two or more exits requested that the volser be changed, but the changed volsers don't match. Byte 2 xx X'80' An exit routine requested no OWNERID change, but another exit requested an OWNERID change. X'40' Two or more exits requested that the OWNERID be changed, but the changed OWNERIDs don't match. X'20' An exit routine requested no ACCODE change, but another exit requested ACCODE change. X'10' Two or more exits requested that the ACCODE be changed, but the changed ACCODEs don't match. X'08' A conflict in the return codes returned by the exit routines was detected. One routine returned a 0 and another returned an 8. X'04' Invalid volser character supplied by an exit routine. X'02' Invalid OWNERID character supplied by an exit routine. X'01' Invalid ACCODE character supplied by an exit routine. Byte 3 yy X'80' There is a conflict in rc=8 reason code processing. An exit routine returned rsn=4, requesting remount and another returned rsn=0, indicating don't label the tape at all. X'40' An exit routine requested remount but no new volser was provided. X'20' Conflict in remount volser value. New volser values don't match. X'10' Failure in internal processing not related to dynamic exits services. X'08' Operator replied to skip labeling the volume. X'04' Mounted volume is file protected. X'02' Reserved. X'01' Reserved. Byte 4 zz X'FF' Reserved. System action: Processing will continue with next INITT control card, if possible. Conditions such as failures in the CSVDYNEX facility will prevent continuation. Operator response: None. System programmer response: A System Programmer may need to investigate some failures, particularly those associated with the CSVDYNEX facility itself. Other failures that may require such attention would be those associated with conflicts between exit routines. Is there anyone who has faced this similar issue at your shops ? Jake On Mon, Apr 2, 2012 at 7:38 AM, Russell Witt res09...@verizon.net wrote: Kees
Fwd: Initialize Tape error
Changed the subject header -- Forwarded message -- From: Jake anderson justmainfra...@gmail.com Date: Mon, Apr 2, 2012 at 12:10 PM Subject: Re: Initialize Tape Options To: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Hi Mike, I get the same error message using with below JCL Jake On Mon, Apr 2, 2012 at 10:46 AM, Mike Schwab mike.a.sch...@gmail.comwrote: I see some differences between your jcl and IBM's examples. Why don't you try IBM's values? Probably don't need the DEN value, or the LABEL that you supplied. http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idau100%2Fdgt2u16018.htm Example 1: Write EBCDIC Labels on Three Tapes z/OS V1R12.0 DFSMSdfp Utilities SC26-7414-07 In this example, serial numbers 001234, 001235 and 001236 are placed on three tape volumes. The labels are written in EBCDIC at 800 bits per inch. Each volume labeled is mounted, when it is required, on a single 9-track tape unit. //LABEL1 JOB ... //STEP1EXEC PGM=IEHINITT //SYSPRINT DD SYSOUT=A //LABELDD DCB=DEN=2,UNIT=(tape,1,DEFER) //SYSINDD * LABEL INITT SER=001234,NUMBTAPE=3 /*The control statements are as follows: LABEL DD defines the tape unit used in the labeling operation. SYSIN DD defines the control data set, which follows in the input stream. LABEL INITT specifies the number of tapes to be labeled (3), beginning with 001234. On Sun, Apr 1, 2012 at 11:16 PM, Jake anderson justmainfra...@gmail.com wrote: Dear All, Reason for opting another option to initialize was due to the below abend : SYSTEM SUPPORT UTILITIES IEHINITT TAPE INITT SER=Z9BQB1 0007 IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR FOR EXPLANATION OF BIT SETTINGS IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED JCL : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T, // NOTIFY=SYSUID //STEP1EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 ] Z/os : 1.8 Lookat explanation : Explanation: The volume was not labeled as a result of exit processing. The reason for the failure is encoded (hex representation) in the reason code, which maps directly to the settings in the four-byte field INXNLBRS in macro IEHUEXIT, which normally resides in SYS1.MACLIB. The macro should be referenced for the very latest mapping. However, the bit definitions current at the time of this edition are: Byte 1 ww X'80' Error on call to CSVDYNEX. X'40' An exit routine abended. X'20' Invalid return code from exit routine (not 0, 4, 8). X'10' Invalid reason code from exit routine (not 0, 4). X'08' A previous exit indicated that the volume is not to be labeled. X'04' Conflicts in the results from calls to exits have been encountered. X'02' At least one exit routine returned rc=0 with a modified volser and either other exit routines returned rc=0 without modifying the volser, or the modified volser's didn't match. X'01' Two or more exits requested that the volser be changed, but the changed volsers don't match. Byte 2 xx X'80' An exit routine requested no OWNERID change, but another exit requested an OWNERID change. X'40' Two or more exits requested that the OWNERID be changed, but the changed OWNERIDs don't match. X'20' An exit routine requested no ACCODE change, but another exit requested ACCODE change. X'10' Two or more exits requested that the ACCODE be changed, but the changed ACCODEs don't match. X'08' A conflict in the return codes returned by the exit routines was detected. One routine returned a 0 and another returned an 8. X'04' Invalid volser character supplied by an exit routine. X'02' Invalid OWNERID character supplied by an exit routine. X'01' Invalid ACCODE character supplied by an exit routine. Byte 3 yy X'80' There is a conflict in rc=8 reason code processing. An exit routine returned rsn=4, requesting remount and another returned rsn=0, indicating don't label the tape at all. X'40' An exit routine requested remount but no new volser was provided. X'20' Conflict in remount volser value. New volser values don't match. X'10' Failure in internal processing not related to dynamic exits services. X'08' Operator replied to skip labeling the volume. X'04' Mounted volume is file protected. X'02' Reserved. X'01' Reserved. Byte 4 zz X'FF' Reserved. System action: Processing will continue with next INITT control card, if possible. Conditions such as failures in the CSVDYNEX facility will prevent continuation. Operator response: None. System programmer response: A System Programmer may need to investigate some failures, particularly those associated with the CSVDYNEX facility itself. Other failures that may require
Re: Initialize Tape Options
Hey Mike/Russell/All, Thanks for giving an explanation. Yes the Device D72D is Dasd Device Address which is specifically used for allocating temporary datasets, but when I check if this device is exhausted it isn't really instead the temporary dataset volumes are 73% free. However, IEH605I is interesting - it gives device as D72D - yet your JCL specified UNIT 890. So which is the actual tape drive you wanted to use? Did your ACS routines direct the allocation to some wrong device? Yes here the ACS plays a vital role in directing the allocation to a device D72D which is exclusively being used for holding temporary datasets. Be sure SMS ACS does not direct your allocation to wrong device IEE457I 08.01.02 UNIT STATUS 425 UNIT TYPE STATUSVOLSER VOLSTATE D72D 3390 A TEMP02 PRIV/RSDN Is it possible to direct the allocation on a NON-sms volume ? Jake On Tue, Apr 3, 2012 at 5:59 AM, Russell Witt res09...@verizon.net wrote: Mike might be on to something. If the device you want to be allocated on is outside the robot; you might also have to code STORCLAS=DUPT@SMS to force SMS to not attempt to allocate it inside the robot. If device D72D is a dasd device, that would indicate your ACS routines have re-directed the allocation to dasd from the specific unit type. Russell Witt CA 1 L2 Support Manager -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mike Wood Sent: Monday, April 02, 2012 12:12 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Initialize Tape Options Jake, do you really get the exact same error messages? i.e. IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR FOR EXPLANATION OF BIT SETTINGS IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED Seems there is enough to go on, isnt there? IEH627I you found the msg explanation and from that the reason code says it an internal error not related to dynamic exits. So based on that you would call IBM for support - if it was available. However, IEH605I is interesting - it gives device as D72D - yet your JCL specified UNIT 890. So which is the actual tape drive you wanted to use? Did your ACS routines direct the allocation to some wrong device? IEH607I just says there was no other allocated tapes to try. Be sure you specify DEFER on the UNIT keyword. Be sure SMS ACS does not direct your allocation to wrong device. If you have rmm running - use EDGINERS instead of IEHINITT - but same JCL requirements for UNIT with DEFER Mike Wood -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Fwd: Initialize Tape error
Are your SMS rules overriding your allocation? Yes ACS routines are overriding it. 890 is our TAPE device. On Mon, Apr 2, 2012 at 8:37 PM, McKown, John john.mck...@healthmarkets.comwrote: Probably due to lack of a DISP= parameter on the DD. The default is DISP=(NEW,DELETE,DELETE). The OP should likely use a DISP=OLD on the DD that defines the drive to be used to initialize the tape. As coded, the DSN is a temporary DSN and DISP=(NEW,DELETE,DELETE), and so I would guess that the SMS routines are being invoked and trying to allocate a temporary disk dataset. 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 Richard L Peurifoy Sent: Monday, April 02, 2012 10:01 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Fwd: Initialize Tape error On 4/2/2012 4:26 AM, Jake anderson wrote: Changed the subject header On Sun, Apr 1, 2012 at 11:16 PM, Jake andersonjustmainfra...@gmail.com wrote: Dear All, Reason for opting another option to initialize was due to the below abend : SYSTEM SUPPORT UTILITIES IEHINITT TAPE INITT SER=Z9BQB1 0007 IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR FOR EXPLANATION OF BIT SETTINGS IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED JCL : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T, // NOTIFY=SYSUID //STEP1EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 The IEH605I message indicates device D72D, but your JCL specifies 890. Are your SMS rules overriding your allocation? -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape error
Dear Linda, Still no luck: //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T, // REGION=5M,NOTIFY=SYSUID //STEP1EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 Error : SYSPRINT : SYSTEM SUPPORT UTILITIES IEHINITT TAPE INITT SER=Z9BQB1 00061039 IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED jessysmsg : ALLOC. FOR TAPEINIT STEP1 SMS ALLOCATED TO DDNAME (TAPE) DSN (SYS12094.T094601.RA000.TAPEINIT.R0192856) STORCLAS (TEMP) MGMTCLAS () DATACLAS () VOL SER NOS= TEMP02 JES2 ALLOCATED TO SYSPRINT JES2 ALLOCATED TO SYSIN JES2 ALLOCATED TO SYSIN TAPEINIT STEP1 - STEP WAS EXECUTED - COND CODE 0008 SYS12094.T094601.RA000.TAPEINIT.R0192856 DELETED, DDNAME=TAPE A255209.TAPEINIT.JOB09969.D103.? SYSOUT A255209.TAPEINIT.JOB09969.D101.? SYSIN A255209.TAPEINIT.JOB09969.D102.? SYSIN STEP/STEP1 /START 2012094.0946 STEP/STEP1 /STOP 2012094.0946 CPU0MIN 00.01SEC SRB0MIN 00.00S JOB/TAPEINIT/START 2012094.0946 JOB/TAPEINIT/STOP 2012094.0946 CPU0MIN 00.01SEC SRB0MIN 00.00S Jake On Tue, Apr 3, 2012 at 9:26 AM, Linda Mooney linda.lst...@comcast.netwrote: Try adding STORCLASS=NONSMS to your tape dd. IF you are using any type of tape management product, e.g. CA1, RMM, ZARA, whatever, It is generally best to use the product's utility to init tapes. HTH Linda - Original Message - From: Jake anderson justmainfra...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Monday, April 2, 2012 7:54:10 PM Subject: Re: Fwd: Initialize Tape error Are your SMS rules overriding your allocation? Yes ACS routines are overriding it. 890 is our TAPE device. On Mon, Apr 2, 2012 at 8:37 PM, McKown, John john.mck...@healthmarkets.comwrote: Probably due to lack of a DISP= parameter on the DD. The default is DISP=(NEW,DELETE,DELETE). The OP should likely use a DISP=OLD on the DD that defines the drive to be used to initialize the tape. As coded, the DSN is a temporary DSN and DISP=(NEW,DELETE,DELETE), and so I would guess that the SMS routines are being invoked and trying to allocate a temporary disk dataset. 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 Richard L Peurifoy Sent: Monday, April 02, 2012 10:01 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Fwd: Initialize Tape error On 4/2/2012 4:26 AM, Jake anderson wrote: Changed the subject header On Sun, Apr 1, 2012 at 11:16 PM, Jake andersonjustmainfra...@gmail.com wrote: Dear All, Reason for opting another option to initialize was due to the below abend : SYSTEM SUPPORT UTILITIES IEHINITT TAPE INITT SER=Z9BQB1 0007 IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR FOR EXPLANATION OF BIT SETTINGS IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED JCL : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T, // NOTIFY=SYSUID //STEP1EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 The IEH605I message indicates device D72D, but your JCL specifies 890. Are your SMS rules overriding your allocation? -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu
Re: Initialize Tape Options
My storcalas defintion says like below : *FILTLIST NONSMS_DSN INCLUDE(DSN*.**,CICSTS31.**,MQM.**, + * * BTS*.**,IMS*.**,PAGE.**,CATALOG.**,CPAC*.**,OMVS.**,HWS*.**)* I did specify DISP=OLD in my JCL but no luck : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL),DISP=OLD,VOL=SER=TEMP02 //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Jake On Tue, Apr 3, 2012 at 9:57 AM, retired mainframer retired-mainfra...@q.com wrote: :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of Jake anderson :: Sent: Monday, April 02, 2012 7:35 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Re: Initialize Tape Options :: :: Hey Mike/Russell/All, :: :: Thanks for giving an explanation. Yes the Device D72D is Dasd Device :: Address which is specifically used for allocating temporary datasets, :: but :: when I check if this device is exhausted it isn't really instead the :: temporary dataset volumes are 73% free. :: :: However, IEH605I is interesting - it gives device as D72D - yet your :: JCL :: specified UNIT 890. So which is the actual tape drive you wanted to :: use? :: Did your ACS routines direct the allocation to some wrong device? :: :: Yes here the ACS plays a vital role in directing the allocation to a :: device :: D72D which is exclusively being used for holding temporary datasets. :: :: Be sure SMS ACS does not direct your allocation to wrong device :: :: IEE457I 08.01.02 UNIT STATUS 425 :: UNIT TYPE STATUSVOLSER VOLSTATE :: D72D 3390 A TEMP02 PRIV/RSDN :: :: Is it possible to direct the allocation on a NON-sms volume ? That depends on your site. Is there a storclas name that tells your ACS routines this dataset is not to be SMS managed (something like NONSMS)? Is there a high level qualifier (perhaps T.) that tells your ACS routines the dataset should be allocated to tape? Are your tapes SMS managed? What happens if you change the JCL to specify DISP=OLD? Does specifying a volser help at all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape error
//TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=(0890,1,DEFER),LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Mike, Its again the same error message. Jake On Tue, Apr 3, 2012 at 10:30 AM, Mike Schwab mike.a.sch...@gmail.comwrote: Try //TAPEDD UNIT=(0890,1,DEFER) On Mon, Apr 2, 2012 at 11:20 PM, Jake anderson justmainfra...@gmail.com wrote: Dear Linda, Still no luck: //TAPE DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape error
Hi, To put more clarity : We are able to run daily back using the tape Device 890 but this seems to be wide spread issue when it comes during for Tape initialization. What I deduce from the error message(DD statement) is that 890 device seems to be invalid. I also see that 890 is properly added in our IODF. This really looks strange. Jake On Tue, Apr 3, 2012 at 10:35 AM, Jake anderson justmainfra...@gmail.comwrote: //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=SYSUID,CLASS=T //STEP1 EXEC PGM=IEHINITT //TAPE DD UNIT=(0890,1,DEFER),LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 /* Mike, Its again the same error message. Jake On Tue, Apr 3, 2012 at 10:30 AM, Mike Schwab mike.a.sch...@gmail.comwrote: Try //TAPEDD UNIT=(0890,1,DEFER) On Mon, Apr 2, 2012 at 11:20 PM, Jake anderson justmainfra...@gmail.com wrote: Dear Linda, Still no luck: //TAPE DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS -- 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Initialize Tape Options
Hello List, Good Morning ! Apart from IEHINIT, are there any freeware or any available utility to initialize the 3590 tape ? This is just a general question out of curiosity :). My environment : Z/os : 1.8 Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape Options
Hi, Could anyone please point me to the manual of DFSMSrmm implementation and customisation guide especially for z/os 1.8 version. Jake On Sun, Apr 1, 2012 at 5:01 PM, R.S. r.skoru...@bremultibank.com.pl wrote: W dniu 2012-04-01 08:35, Jake anderson pisze: Hello List, Good Morning ! Apart from IEHINIT, are there any freeware or any available utility to initialize the 3590 tape ? This is just a general question out of curiosity :). My environment : Z/os : 1.8 CA1 has its own utility, RMM has EDGINERS utility, probably other TMSes have their own utility as well. IMHO the most important enhancement of those utilities is cooperation with TMS database, not the initialisation itself. Q: what do you want to do? What's wrong with IEHINITT? Radoslaw Skorupka Lodz, Poland tej wiadomo ci mo e zawiera informacje prawnie chronione Banku przeznaczone wy cznie do u ytku s bowego adresata. Odbiorc e by jedynie jej adresat z wy czeniem dost pu os b trzecich. Je eli nie jeste adresatem niniejszej wiadomo ci lub pracownikiem upowa nionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dzia anie o podobnym charakterze jest prawnie zabronione i mo e by karalne. Je eli otrzyma wiadomo omy kowo, prosimy niezw ocznie zawiadomi nadawc wysy c odpowied oraz trwale usun wiadomo czaj c 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, www.brebank.pl, e-mail: i...@brebank.pl d Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru S dowego, nr rejestru przedsi biorc w KRS 025237, NIP: 526-021-50-88. ug stanu na dzie 01.01.2012 r. kapita zak adowy BRE Banku SA (w ca ci wp acony) wynosi 168.410.984 z otych. --** --**-- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.eduwith the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Initialize Tape Options
Dear All, Reason for opting another option to initialize was due to the below abend : SYSTEM SUPPORT UTILITIES IEHINITT TAPE INITT SER=Z9BQB1 0007 IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE MANUAL FOR FOR EXPLANATION OF BIT SETTINGS IEH605I INVALID DEVICE ALLOCATED ON D72D IEH607I ALLOCATED DEVICES EXHAUSTED JCL : //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T, // NOTIFY=SYSUID //STEP1EXEC PGM=IEHINITT //TAPE DD UNIT=890,LABEL=(1,SL) //SYSPRINT DD SYSOUT=* //SYSINDD * TAPE INITT SER=Z9BQB1 ] Z/os : 1.8 Lookat explanation : Explanation: The volume was not labeled as a result of exit processing. The reason for the failure is encoded (hex representation) in the reason code, which maps directly to the settings in the four-byte field INXNLBRS in macro IEHUEXIT, which normally resides in SYS1.MACLIB. The macro should be referenced for the very latest mapping. However, the bit definitions current at the time of this edition are: Byte 1 ww X'80' Error on call to CSVDYNEX. X'40' An exit routine abended. X'20' Invalid return code from exit routine (not 0, 4, 8). X'10' Invalid reason code from exit routine (not 0, 4). X'08' A previous exit indicated that the volume is not to be labeled. X'04' Conflicts in the results from calls to exits have been encountered. X'02' At least one exit routine returned rc=0 with a modified volser and either other exit routines returned rc=0 without modifying the volser, or the modified volser's didn't match. X'01' Two or more exits requested that the volser be changed, but the changed volsers don't match. Byte 2 xx X'80' An exit routine requested no OWNERID change, but another exit requested an OWNERID change. X'40' Two or more exits requested that the OWNERID be changed, but the changed OWNERIDs don't match. X'20' An exit routine requested no ACCODE change, but another exit requested ACCODE change. X'10' Two or more exits requested that the ACCODE be changed, but the changed ACCODEs don't match. X'08' A conflict in the return codes returned by the exit routines was detected. One routine returned a 0 and another returned an 8. X'04' Invalid volser character supplied by an exit routine. X'02' Invalid OWNERID character supplied by an exit routine. X'01' Invalid ACCODE character supplied by an exit routine. Byte 3 yy X'80' There is a conflict in rc=8 reason code processing. An exit routine returned rsn=4, requesting remount and another returned rsn=0, indicating don't label the tape at all. X'40' An exit routine requested remount but no new volser was provided. X'20' Conflict in remount volser value. New volser values don't match. X'10' Failure in internal processing not related to dynamic exits services. X'08' Operator replied to skip labeling the volume. X'04' Mounted volume is file protected. X'02' Reserved. X'01' Reserved. Byte 4 zz X'FF' Reserved. System action: Processing will continue with next INITT control card, if possible. Conditions such as failures in the CSVDYNEX facility will prevent continuation. Operator response: None. System programmer response: A System Programmer may need to investigate some failures, particularly those associated with the CSVDYNEX facility itself. Other failures that may require such attention would be those associated with conflicts between exit routines. Is there anyone who has faced this similar issue at your shops ? Jake On Mon, Apr 2, 2012 at 7:38 AM, Russell Witt res09...@verizon.net wrote: Kees, Actually, the CA-1 utility does not invoke IEHINITT. After doing the administration (validating the tape is in scratch status), we re-write the VOL1/HDR1 records with the defined volser. And there is an option to do a secure erase of the remainder of the tape if desired (though for a 3590 that might take a while). Russell Witt CA 1 L2 Support Manager -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Vernooij, CP - SPLXM Sent: Sunday, April 01, 2012 3:30 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Initialize Tape Options CA1 has its own tape init utility, but I won't be surprised if this is IEHINIT plus some CA1 administration. Kees. Jake anderson justmainfra...@gmail.com wrote in message news:CAHTvvRWZEbxVF-b+HH3TOzBMGPVKQv7c4F=cjrd_emcqzyh...@mail.gmail.com ... Hello List, Good Morning ! Apart from IEHINIT, are there any freeware or any available utility to initialize the 3590 tape ? This is just a general question out of curiosity :). My environment : Z/os : 1.8 Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists
Host on Demand Installation
Hi, Are there any specific minimum MSU requirement for installing HOD ? Since Our environment is capped at 13 MSU and 21 MSU wth no ZAAP and ZIIP facility. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Migrating to Z196
Hello, We are planning to migrate from Z10 to Z196. So are there any manuals which speaks more on PSP bucket changes that is required during this migrations ? Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Clarification on UNIX file systems
Hello Group, We have five files under /etc/sslserv directory in z/OS unix with extension of kdb,der,p7b,rdb,sth with prefix of system name. Whenever we create any new system , we are coping these files from old system and coping to new system and renaming it as per system name. I tried searching on goggle and many books about uses of these files but I just found that these files are called key database and used for SSL. But not much information.Now going forward we dont want to copy these file, whenever we create new system rather we want to build these file newly on those system.Can you please help me to understand about these file and how to building new files rather then coping it from older system. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
User datasets wrongly catalogued under Master Catalogue
Hi, Recently We have installed a new system Z/OS 1.13. During migration the Users datasets were restored and unfortunately all the user datasets are catalogued under Master catalogue. I agree that this happens when a userid is defined with alias relating to user catalog. I am just trying to understand if it is possible to move all the users dataset catalogued under master catalogue to a user catalogue since the Number of datasets are in big number. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Fwd: User datasets wrongly catalogued under Master Catalogue
I agree that this happens when a userid is defined with alias relating to user catalog. typo - it happens when a userid is *not* defined with alias relating to user catalog. -- Forwarded message -- From: Jake anderson justmainfra...@gmail.com Date: Wed, Feb 29, 2012 at 9:11 AM Subject: User datasets wrongly catalogued under Master Catalogue To: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Hi, Recently We have installed a new system Z/OS 1.13. During migration the Users datasets were restored and unfortunately all the user datasets are catalogued under Master catalogue. I agree that this happens when a userid is defined with alias relating to user catalog. I am just trying to understand if it is possible to move all the users dataset catalogued under master catalogue to a user catalogue since the Number of datasets are in big number. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Fwd: User datasets wrongly catalogued under Master Catalogue
Robert, I am unable to find any Information on MIGRATECAT on google search.. Is there someone who can point me to some Fine manuals relating to MIGRATCAT? Jake On Wed, Feb 29, 2012 at 1:04 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: Paul Gilmartin paulgboul...@aim.com wrote in message news:5467422117818390.wa.paulgboulderaim@bama.ua.edu... On Wed, 29 Feb 2012 09:14:36 +0530, Jake anderson wrote: typo - it happens when a userid is *not* defined with alias relating to user catalog. To my understanding, that's half right. It happens when a userid is *not* defined with alias relating to user catalog _and_ the master catalog is *not* suitably protected. I have a question on terminology: someone stated here lately that user catalogs are ancient history; no longer used. Is this so? If so, how are user data sets catalogued? -- gil This was probably about CVOL catalogs, I remember this remark. 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: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
IPLTEXT query
Hi All, How to know that a specific SYSRES volume has the IPLTEXT in it ? Apology if my question doesn't makes any sense and it requires more information. Regards, Jakes -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
COBOL execs Dummy Question
Hello All, Apology in advance for posting a very basic or a stupid question but I am curious to know about the COBOL compiler Programes : IGYWCL and IGYCRCTL. I very well know that IGY stands for the language Prefix but Would like know what WCL or CRCTL stands for ? I tried Google to find some Basic History about this programs but I am unable to fetch any presentations or talk about these Programs in depth. Any information or direction would be much appreciated. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Logger dataset clarification
Hi Group, In one of our test system we have encountered an error as : IXGH008E : One or more log streams encountered a staging data set full condition sincestart date (GMT). From the IBM manual I understand that the below troubleshoot will resolve the error . Troubleshoot : System programmer response: Consider taking one or more of the following actions: - Resolve any log stream offload constraints. - Increase the size of the staging data set. - Decrease the HIGHOFFLOAD for one or more of the affected log streams. - Increase the LOWOFFLOAD for one or more of the affected log streams. - Use the CFSizer to obtain an appropriate size for the structure if the log stream is structure-based. After correcting a log stream condition, consider using the MODIFY command to update the 'TIME(mm/dd/ hh:mm:ss)' parameter to a time after this condition occurred so it is no longer displayed as an exception. Is it possible to dynamically modify the above recommendations ? Also, how to check which Logger staging datasets have reached 100%. Any thoughts or suggestions would be much appreciated. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Version Query for Installed Product
Hi, There are some Product in our system where the version Indication is not visible via Datasets(SMPE datasets) or thru SMP/E panel. Our systems MSU capacity is too low due to which we are unable to make the installed product to run which might cause the products to consume more process or CPU. Are there any sample JCLs which will pull out the version of the offline products. I was able to get the version of some product through SMP/E panel(query facility). There are some products for which I am unable to extract. Any Hints or suggestion would really help me in extracting the details. Jakes -- 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
Clarification on IEHPROGM
Hi, When I try to rename a dataset using a Utility IEHPROGM and I get a error message like : Error : SYSTEM SUPPORT UTILITIES IEHPROGM RENAME DSNAME=BETTY.JCL.PDS, X00027015 NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 00028017 IEH207I STATUS OF USERS REQUEST TO RENAME DATA SET BETTY.JCL.PDS VOLUME I.D. ACTION TAKEN REASON FOR TAKING THIS ACTION KMCG03 NONE CORRECT PASSWORD NOT AVAILABLE END OF LISTING OF DATA SETS TO BE SCRATCHED OR RENAMED ... UNUSUAL END UTILITY END My JCL : //BETTYU$ JOB TIME=(5,0),REGION=5M //STEP1 EXEC PGM=IEHPROGM //DD1 DD DSN=BETTY.JCL.PDS,DISP=SHR,VOL=SER=KMCG03,UNIT=3390 //SYSPRINT DD SYSOUT=* //SYSIN DD * RENAME DSNAME=BETTY.JCL.PDS, X NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 /* The above Error message Popped up due to Intended NEWNAME was already in Use(Means Already catalogued). This I found when I tried Renaming via TSO command R. I am just confused why IEHPROGM utility is throwing a different message for renaming whereas the TSO commands gives out a different message for renaming. What Macro is invoked when we try to Rename using TSO command R beside a dataset ? What is the difference between the two methodology ? Could anyone please enlighten me ? Jakes -- 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: Clarification on IEHPROGM
Is the disk SMS managed? Yes - So is is it possible to take the existing name for renaming Purpose using IEHPROGM ? But when I try renaming with a non-existent name then I am able to do it whereas existing name produces this error message Password protected. If I do a recatalog of existing name , then will it erase the Old content of existing Dataset(NEWNAME as in JCL) ? Jakes On Tue, Nov 15, 2011 at 2:04 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: Jake anderson justmainfra...@gmail.com wrote in message news:cahtvvrw503n-daal98sqzcritzj4bhyxu-hsgpfdmxgqhsj...@mail.gmail.com ... Hi, When I try to rename a dataset using a Utility IEHPROGM and I get a error message like : Error : SYSTEM SUPPORT UTILITIES IEHPROGM RENAME DSNAME=BETTY.JCL.PDS, X00027015 NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 00028017 IEH207I STATUS OF USERS REQUEST TO RENAME DATA SET BETTY.JCL.PDS VOLUME I.D. ACTION TAKEN REASON FOR TAKING THIS ACTION KMCG03 NONE CORRECT PASSWORD NOT AVAILABLE END OF LISTING OF DATA SETS TO BE SCRATCHED OR RENAMED ... UNUSUAL END UTILITY END My JCL : //BETTYU$ JOB TIME=(5,0),REGION=5M //STEP1 EXEC PGM=IEHPROGM //DD1 DD DSN=BETTY.JCL.PDS,DISP=SHR,VOL=SER=KMCG03,UNIT=3390 //SYSPRINT DD SYSOUT=* //SYSIN DD * RENAME DSNAME=BETTY.JCL.PDS, X NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 /* The above Error message Popped up due to Intended NEWNAME was already in Use(Means Already catalogued). This I found when I tried Renaming via TSO command R. I am just confused why IEHPROGM utility is throwing a different message for renaming whereas the TSO commands gives out a different message for renaming. What Macro is invoked when we try to Rename using TSO command R beside a dataset ? What is the difference between the two methodology ? Could anyone please enlighten me ? Jakes The main difference between rename by TSO and by IEHPROGM is that TSO tries to recatalog the dataset (and discovers that the new name already exists), while IEHPROGM concentrates only on the VTOC of the disk. After renaming the dataset on disk, you will have to recatalog it yourself. While processing the dataset on disk, IEHPROGM sees that it is 'password protected' and you did not specify the 'correct password'. Is the disk SMS managed? 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 -- 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: Clarification on IEHPROGM
I am trying RENAME for NON-VSAM, but I used your Given JCL to rename with existing name itself but it conflicts with Duplicate name(Obviously) Since the NEWNAME do already do exist. But my clarification why IEHPROGM throws an error as Correct Password not available whereas we have not protected the Dataset with Password ? Jakes On Tue, Nov 15, 2011 at 2:43 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: You are trying to rename a 2011 data set with a 1980's utility. You can do it with IDCAMS, this will take care of the data set on disk and the catalog info. //IDCAMS EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSINDD * ALTER BETTY.JCL.PDS NEWNAME(BETTY.JCL1.PDS) /* Watch the space in front of ALTER. Will this solve your problem? Kees. Jake anderson justmainfra...@gmail.com wrote in message news:CAHTvvRXCvrwv_CSeHnw6nN=dhfwaqrw_mkpsvygse1vvu1t...@mail.gmail.com ... Is the disk SMS managed? Yes - So is is it possible to take the existing name for renaming Purpose using IEHPROGM ? But when I try renaming with a non-existent name then I am able to do it whereas existing name produces this error message Password protected. If I do a recatalog of existing name , then will it erase the Old content of existing Dataset(NEWNAME as in JCL) ? Jakes On Tue, Nov 15, 2011 at 2:04 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: Jake anderson justmainfra...@gmail.com wrote in message news:cahtvvrw503n-daal98sqzcritzj4bhyxu-hsgpfdmxgqhsj...@mail.gmail.com ... Hi, When I try to rename a dataset using a Utility IEHPROGM and I get a error message like : Error : SYSTEM SUPPORT UTILITIES IEHPROGM RENAME DSNAME=BETTY.JCL.PDS, X00027015 NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 00028017 IEH207I STATUS OF USERS REQUEST TO RENAME DATA SET BETTY.JCL.PDS VOLUME I.D. ACTION TAKEN REASON FOR TAKING THIS ACTION KMCG03 NONE CORRECT PASSWORD NOT AVAILABLE END OF LISTING OF DATA SETS TO BE SCRATCHED OR RENAMED ... UNUSUAL END UTILITY END My JCL : //BETTYU$ JOB TIME=(5,0),REGION=5M //STEP1 EXEC PGM=IEHPROGM //DD1 DD DSN=BETTY.JCL.PDS,DISP=SHR,VOL=SER=KMCG03,UNIT=3390 //SYSPRINT DD SYSOUT=* //SYSIN DD * RENAME DSNAME=BETTY.JCL.PDS, X NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 /* The above Error message Popped up due to Intended NEWNAME was already in Use(Means Already catalogued). This I found when I tried Renaming via TSO command R. I am just confused why IEHPROGM utility is throwing a different message for renaming whereas the TSO commands gives out a different message for renaming. What Macro is invoked when we try to Rename using TSO command R beside a dataset ? What is the difference between the two methodology ? Could anyone please enlighten me ? Jakes The main difference between rename by TSO and by IEHPROGM is that TSO tries to recatalog the dataset (and discovers that the new name already exists), while IEHPROGM concentrates only on the VTOC of the disk. After renaming the dataset on disk, you will have to recatalog it yourself. While processing the dataset on disk, IEHPROGM sees that it is 'password protected' and you did not specify the 'correct password'. Is the disk SMS managed? 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: Clarification on IEHPROGM
I am quite sure that the 'password' error is caused by the fact that the data set is SMS managed. Was just curious to know why this password error Pops up for the SMS managed Dataset whereas we have not protected the dataset with Password. On Tue, Nov 15, 2011 at 3:16 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: I am not sure what you are trying to achieve. You are trying impossible things, but why? SMS managed datasets must be cataloged, so you cannot rename/recatalog it to a name that already exists. IDCAMS can also rename non-VSAM datasets. I am quite sure that the 'password' error is caused by the fact that the data set is SMS managed. Kees. Jake anderson justmainfra...@gmail.com wrote in message news:cahtvvrwjiv8qvb2hcr159ayus+ycyce8o58gjkwrvfnatyu...@mail.gmail.com ... I am trying RENAME for NON-VSAM, but I used your Given JCL to rename with existing name itself but it conflicts with Duplicate name(Obviously) Since the NEWNAME do already do exist. But my clarification why IEHPROGM throws an error as Correct Password not available whereas we have not protected the Dataset with Password ? Jakes On Tue, Nov 15, 2011 at 2:43 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: You are trying to rename a 2011 data set with a 1980's utility. You can do it with IDCAMS, this will take care of the data set on disk and the catalog info. //IDCAMS EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSINDD * ALTER BETTY.JCL.PDS NEWNAME(BETTY.JCL1.PDS) /* Watch the space in front of ALTER. Will this solve your problem? Kees. Jake anderson justmainfra...@gmail.com wrote in message news:CAHTvvRXCvrwv_CSeHnw6nN=dhfwaqrw_mkpsvygse1vvu1t...@mail.gmail.com ... Is the disk SMS managed? Yes - So is is it possible to take the existing name for renaming Purpose using IEHPROGM ? But when I try renaming with a non-existent name then I am able to do it whereas existing name produces this error message Password protected. If I do a recatalog of existing name , then will it erase the Old content of existing Dataset(NEWNAME as in JCL) ? Jakes On Tue, Nov 15, 2011 at 2:04 PM, Vernooij, CP - SPLXM kees.verno...@klm.com wrote: Jake anderson justmainfra...@gmail.com wrote in message news:cahtvvrw503n-daal98sqzcritzj4bhyxu-hsgpfdmxgqhsj...@mail.gmail.com ... Hi, When I try to rename a dataset using a Utility IEHPROGM and I get a error message like : Error : SYSTEM SUPPORT UTILITIES IEHPROGM RENAME DSNAME=BETTY.JCL.PDS, X00027015 NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 00028017 IEH207I STATUS OF USERS REQUEST TO RENAME DATA SET BETTY.JCL.PDS VOLUME I.D. ACTION TAKEN REASON FOR TAKING THIS ACTION KMCG03 NONE CORRECT PASSWORD NOT AVAILABLE END OF LISTING OF DATA SETS TO BE SCRATCHED OR RENAMED ... UNUSUAL END UTILITY END My JCL : //BETTYU$ JOB TIME=(5,0),REGION=5M //STEP1 EXEC PGM=IEHPROGM //DD1 DD DSN=BETTY.JCL.PDS,DISP=SHR,VOL=SER=KMCG03,UNIT=3390 //SYSPRINT DD SYSOUT=* //SYSIN DD * RENAME DSNAME=BETTY.JCL.PDS, X NEWNAME=BETTY.JCL1.PDS,VOL=3390=KMCG03 /* The above Error message Popped up due to Intended NEWNAME was already in Use(Means Already catalogued). This I found when I tried Renaming via TSO command R. I am just confused why IEHPROGM utility is throwing a different message for renaming whereas the TSO commands gives out a different message for renaming. What Macro is invoked when we try to Rename using TSO command R beside a dataset ? What is the difference between the two methodology ? Could anyone please enlighten me ? Jakes The main difference between rename by TSO and by IEHPROGM is that TSO tries to recatalog the dataset (and discovers that the new name already exists), while IEHPROGM concentrates only on the VTOC of the disk. After renaming the dataset on disk, you will have to recatalog it yourself. While processing the dataset on disk, IEHPROGM sees that it is 'password protected' and you did not specify the 'correct password'. Is the disk SMS managed? 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
Re: Problem with add RACF certificate
I guess the certificate name,label name is conflicting with the one present in RACF Database. Best is to Take a backup or export the content to a dataset. Remove the certificate from the RACF DB with RACDCERT DELETE command. Then perform all the steps to add the newly signed certificate. Note : Make sure the the existing certificate is not used by anyother application in your system. You can just check by RACDCERT CERTAUTH LIST. HTH On Wed, Nov 2, 2011 at 9:43 PM, Jorge Garcia jgarc...@mapfre.com wrote: Hello: We have a problem when we add a new signed trusted certificate. The step finished with RC 04 and the message: IRRD109I The certificate cannot be added. Profile 0005.CN=Company[CA[RAIZ.O=Company is already defined We detail the definition steps: 1 .- Create a new ring: RACDCERT ID(TCPIPC) ADDRING(KRSEBK) 2 .- Create a new certificate (NONICSF): RACDCERT ID(TCPIPC) GENCERT - SUBJECTSDN(CN('VSIS') - O('MAPFRE') OU('MAPFRE VIDA') C('ES')) - ALTNAME(E('ZZL DGTP IT SOPORTE SISTEMAS Z/OS')) - WITHLABEL('CERTIF. VSIS_BK') 3 .- Generate a dataset from certificate: RACDCERT ID(TCPIPC) - GENREQ(LABEL('CERTIF. VSIS_BK')) - DSN('SYS3.CERT.VIDA.VSIS.TCPIPC.FBK.NOMICSF') 4 .- We send the certificate to a trusted certificate authority. They return a signed certificate. We copy the content from this file to dataset SYS3.CERT.VIDA.VSIS.TCPIPC.FBK.NOMICSF'. 5 .- We add the new signed certificate to TCPIPC: RACDCERT ID(TCPIPC) - ADD('SYS3.CERT.VIDA.VSIS.TCPIPC.FBK.NOMICSF')TRUST - WITHLABEL('CERTIF. VSIS_BK') It fails with IRRD109I The certificate cannot be added. Profile 0005.CN=Company[CA[RAIZ.O=Company is already defined We can't connect to TN3270. Fails with a problem with the signed certificate authority. We remove all the keyrings active except KRSEBK. It doesn't work. Is possible delete or replace the profile?. Regards Jorge García Juanino Técnico de Sistemas Z/Os DGTP Departamento de Técnica de Sistemas MAPFRE Gobelas 47 - 49 2ª C y D 28023 Madrid Tfno: 91 581 27 34/ 618 33 35 59 Fax: 91 581 24 01 jgarc...@mapfre.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
ECSA usage - Clarification
Hi All, My RMF workflow/exception monitorning Snap Shot showed the below information. -- Exceptions - Name ReasonCritical val. Possible cause or action *ECSA* SECS% 70 73.3 % System ECSA usage 73 %. Version : Z/OS 1.12 Could anyone please suggest me how to identify the resource which are consuming more ECSA. Jake -- 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: Management Class - expiration of dataset
Hola Greg, That's a bit confusing to me (and perhaps others, based on the lack of response) - could you clarify a little what you are asking about? Without the management class is it possible to specify expiration date for a dataset ?, But What i understood from the IBM manual is that it needs management class for setting expiration period for any dataset. In our shop one of a user has specified expiration date for his dataset though we have not set any management class. Could you please clarify Jake On Tue, Oct 25, 2011 at 7:33 PM, Greg Shirey wgshi...@benekeith.com wrote: Jake, I'm not sure the quoted answer you got was worded quite right - the ACS routines are called when data sets are allocated, so I don't think they can't be said to track anything. Your original question was: Does it mean the dataset has taken the expiration date into account ? That's a bit confusing to me (and perhaps others, based on the lack of response) - could you clarify a little what you are asking about? Regards, Greg Shirey Ben E. Keith Company -Original Message- From: IBM Mainframe Discussion List On Behalf Of Jake anderson Sent: Monday, October 24, 2011 10:54 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Management Class - expiration of dataset the ones without the Management class, would still be tracked via the ACS routines and there would be routines run via DFS* Could you please point me to the fine Manual which speaks more about the above. This would help me in understanding the best practises and narrow down the unneccessary Selection of Expiration of dataset by application programmer. Jake -- 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
Management Class - expiration of dataset
Hi All, We know that management class takes care of expiration of dataset(sms-managed), but in one of our system(Where management class routine is not in place) user is able specify expiration of dataset using ISPF 3.2 and management class space looks blank. Does it mean the dataset has taken the expiration date into account ? Please enlighten me. Jake -- 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: Management Class - expiration of dataset
the ones without the Management class, would still be tracked via the ACS routines and there would be routines run via DFS* Could you please point me to the fine Manual which speaks more about the above. This would help me in understanding the best practises and narrow down the unneccessary Selection of Expiration of dataset by application programmer. Jake On Mon, Oct 24, 2011 at 9:06 PM, amit amitpdu...@gmail.com wrote: hi Jake, the ones without the Management class, would still be tracked via the ACS routines and there would be routines run via DFS* or thridparty tools to have expiration and deletion/after actions into account. On Mon, Oct 24, 2011 at 8:21 PM, Jake anderson justmainfra...@gmail.com wrote: Hi All, We know that management class takes care of expiration of dataset(sms-managed), but in one of our system(Where management class routine is not in place) user is able specify expiration of dataset using ISPF 3.2 and management class space looks blank. Does it mean the dataset has taken the expiration date into account ? Please enlighten me. Jake -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Certificate JCL error
Hi Mark, I think the problem may be your label is too long. The max is 32 chars Fair, but I too reduced the length but I get a different error as certificate not added. Profile Name exist Verisign, But this is the first time we are trying to add these Situation is : We have a CICS region where we it acts as requestor and has to send the request via proxy server. Our Webservice provider has provided us three certificates Root, Intermediate and Server Certificates. My concern is that we are unable to find the right Label name for Root and Server. Is it something LABEL name must be given by the webservice provider or else we can choose the LABLE name of our own. Or else do we need to raise a CSR for a particular Racf ID and send it to CA for validation. Please suggest Jake On Thu, Oct 13, 2011 at 7:44 PM, Mark Zelden m...@mzelden.com wrote: On Thu, 13 Oct 2011 11:08:38 +0530, Jake anderson justmainfra...@gmail.com wrote: Hi Experts, As part of SSL enablement we have received three certificates(Root,intermediate and Server). I tried updating the certificates using the below JCL but i get a error related to strings : //CERTAUT$ JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=B, // REGION=5M,NOTIFY=SYSUID //STEP1 EXEC PGM=IKJEFT01 //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSTSINDD * RACDCERT CERTAUTH ADD('A255209.GXS.ROOT') - WITHLABEL('VeriSign Class 3 Secure Server CA') TRUST RACDCERT ID(CICSUSER) CONNECT (RING(GXSRING) - CERTAUTH LABEL('VeriSign Class 3 Secure Server CA')- USAGE(CERTAUTH)) SETROPTS RACLIST(DIGTCERT,DIGTNMAP) REFRESH /* Error message : READY RACDCERT CERTAUTH ADD('A255209.GXS.ROOT') WITHLABEL(VeriSign Class 3 Secure S IKJ56701I MISSING Label Name in quotes+ IKJ56701I MISSING The Label Name for the new Digital Certificate, in quotes IKJ56716I EXTRANEOUS INFORMATION WAS IGNORED: VeriSign Class 3 Secure Server CA READY RACDCERT ID(CICSUSER) CONNECT (RING(GXSRING) CERTAUTH LABEL(VeriSign Class 3 IKJ56701I MISSING Label Name in quotes+ IKJ56701I MISSING The Label Name, for the Digital Certificate, in quotes IKJ56716I EXTRANEOUS INFORMATION WAS IGNORED: VeriSign Class 3 Secure Server CA READY SETROPTS RACLIST(DIGTCERT,DIGTNMAP) REFRESH READY END I think the problem may be your label is too long. The max is 32 chars. 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 -- 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
Certificate JCL error
Hi Experts, As part of SSL enablement we have received three certificates(Root,intermediate and Server). I tried updating the certificates using the below JCL but i get a error related to strings : //CERTAUT$ JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=B, // REGION=5M,NOTIFY=SYSUID //STEP1 EXEC PGM=IKJEFT01 //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSTSINDD * RACDCERT CERTAUTH ADD('A255209.GXS.ROOT') - WITHLABEL('VeriSign Class 3 Secure Server CA') TRUST RACDCERT ID(CICSUSER) CONNECT (RING(GXSRING) - CERTAUTH LABEL('VeriSign Class 3 Secure Server CA')- USAGE(CERTAUTH)) SETROPTS RACLIST(DIGTCERT,DIGTNMAP) REFRESH /* Error message : READY RACDCERT CERTAUTH ADD('A255209.GXS.ROOT') WITHLABEL(VeriSign Class 3 Secure S IKJ56701I MISSING Label Name in quotes+ IKJ56701I MISSING The Label Name for the new Digital Certificate, in quotes IKJ56716I EXTRANEOUS INFORMATION WAS IGNORED: VeriSign Class 3 Secure Server CA READY RACDCERT ID(CICSUSER) CONNECT (RING(GXSRING) CERTAUTH LABEL(VeriSign Class 3 IKJ56701I MISSING Label Name in quotes+ IKJ56701I MISSING The Label Name, for the Digital Certificate, in quotes IKJ56716I EXTRANEOUS INFORMATION WAS IGNORED: VeriSign Class 3 Secure Server CA READY SETROPTS RACLIST(DIGTCERT,DIGTNMAP) REFRESH READY END Is it something My JCL is Bad or it needs any kind of tweak. Jakes -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Auto Backup Issue
Hello, On one of our z/OS system the daily SMFDUMP that starts to run at 2200 hrs. bets a message from RMM due to the daily backup running. The response to the message fails saying that Reply xx was not requested from this console. This process works on most other systems. 2200 is when the auto commands cause teh SMF to start offloading, and that is when the auto commands also cause the RMM tape system to be backed up. It's just that the system seems to think the wrong console is in effect. We use a free scheduling procedure. The program is called AUTO and is tarted from SYS2.PROCLIB(AUTO). A proc, SYS2.PROCLIB(AUTOCMPS) starts every day. It has a series of timed commands, one of which is REPLYTO. SMFDUMP Job //SMFDUMP PROC //* //IEFPROC EXEC PGM=SMFDUMP, // REGION=0M //DUMPOUT DD DSN=SMF.SYSNAME..DLYYMMDD..TLHHMMSS, // UNIT=CART, // VOL=(,,,99), // DISP=(MOD,CATLG) //* //*MF7079 DD DSN=SMF.SYSNAME..DLYYMMDD..TLHHMMSS..TYPE70S, //*UNIT=CART, //*VOL=(,,,99), //*DISP=(MOD,CATLG) //* //SYSPRINT DD SYSOUT=* //* //IEFRDER DD DUMMY, // DISP=SHR . . . . . . . . . . . . . . . . . . . . . . . . . /*YSINDD DSN=TECH.SMF.CNTL(RMF7079), /*DISP=SHR /SYSINDD DSN=TECH.SMF.CNTL(DUMPALL), / DISP=SHR AUTO Job BROWSESYS2.PROCLIB(AUTO) - 01.04 Line Col 001 080 Command === Scroll === CSR * Top of Data ** //AUTO EXEC PGM=AUTO, // TIME=1440, // DPRTY=(7,9) //* //STEPLIB DD DSN=XXX1.SYS1.LINKLIB, // DISP=SHR //* //COMMANDS DD DSN=SYS2.AUTO.SYSNAME..COMMANDS, // DISP=SHR //* //JOB00DD DSN=SYS2.AUTO.JOBS, // DISP=SHR //* //INTRDR DD SYSOUT=(A,INTRDR) //* //SYSABEND DD SYSOUT=A //SYSUDUMP DD SYSOUT=A REPLYTO JOB BROWSESYS2.AUTO.JOBS(REPLYTO) - 01.08Line Col 001 080 Command === Scroll === CSR * Top of Data ** //REPLYTO JOB (PS01),'REPLY TO ',MSGCLASS=Z,CLASS=E,REGION=0M // NOTIFY=TEC1001 //* //S1 EXEC PGM=REPLYTO, // PARM='M=EDG4010D|R=RETRY' //* //S2 EXEC PGM=REPLYTO, // PARM='M=EDG4010D|R=RETRY|T=120|W=Y' //* //S3 EXEC PGM=REPLYTO, // PARM='M=EDG4010D|R=RETRY|T=120|W=Y' //* //S4 EXEC PGM=REPLYTO, // PARM='M=EDG4010D|R=RETRY|T=120|W=Y' //* //S5 EXEC PGM=REPLYTO, // PARM='M=EDG4010D|R=RETRY|T=120|W=Y' //* //S6 EXEC PGM=REPLYTO, // PARM='M=EDG4010D|R=RETRY|T=120|W=Y' //* Regards, Jakes -- 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: Suggestion for a Job running Under a Loop
I am not doing a COMPILE,BIND,LINKLED. Its the application trainee users who perform this task. Not the same user but different users performing same task as part of training. Just curious to know if there are any limitation on TGNUM or CPU time to know if a Job is taking more resources. Jake On Tue, Sep 20, 2011 at 6:04 AM, Lizette Koehler stars...@mindspring.comwrote: Jake, I am a little confused. Are you doing a COMPLE,BIND,LINKED every time you run your program? 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 -- 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
Suggestion for a Job running Under a Loop
Hi All, I have development system(LPAR) here wherein the jobs submitted by the developers/trainees gets into loop very often. Usually i use to find this through either the TGNUM value or through the EXCP Cnt. But today i found a genuine job( not a system or admin job) running with high TGNUM EXCP and also with considerable amount of CPU time . Are there any way to find a if a Job is really consuming lot of CPU or Running Under Loop for a long time. Any suggestion or an advise would be of a great help. Jake -- 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: Suggestion for a Job running Under a Loop
Hi, Do you have any monitoring tools like STROBE or Omegamon (Tivoli)? No, We have a very basic Shop. What version of z/OS are you running? V1.8 Are these cobol programs or something else? Cobol Programs Are these loops with vendor products or in-house written programs? In House Written Programs. Jake/ On Mon, Sep 19, 2011 at 5:44 PM, Lizette Koehler stars...@mindspring.comwrote: Hi All, I have development system(LPAR) here wherein the jobs submitted by the developers/trainees gets into loop very often. Usually i use to find this through either the TGNUM value or through the EXCP Cnt. But today i found a genuine job( not a system or admin job) running with high TGNUM EXCP and also with considerable amount of CPU time . Are there any way to find a if a Job is really consuming lot of CPU or Running Under Loop for a long time. Any suggestion or an advise would be of a great help. Jake Jake, Do you have any monitoring tools like STROBE or Omegamon (Tivoli)? What version of z/OS are you running? Are these cobol programs or something else? Are these loops with vendor products or in-house written programs? 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 -- 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: Suggestion for a Job running Under a Loop
Are the Cobol programs calling any assembler programs or any other language (PL/I, C, etc)? Its a COBOL DB2 program which does a Link edit, Bind etc... On Mon, Sep 19, 2011 at 7:29 PM, Binyamin Dissen bdis...@dissensoftware.com wrote: On Mon, 19 Sep 2011 16:28:57 +0530 Jake anderson justmainfra...@gmail.com wrote: :I have development system(LPAR) here wherein the jobs submitted by the :developers/trainees gets into loop very often. Usually i use to find this :through either the TGNUM value or through the EXCP Cnt. But today i found a :genuine job( not a system or admin job) running with high TGNUM EXCP and :also with considerable amount of CPU time . Are there any way to find a if a :Job is really consuming lot of CPU or Running Under Loop for a long time. :Any suggestion or an advise would be of a great help. The only way to know that a program is in a loop is to know what it does. Best approach is a default low TINE and OUTLIM, and those than know they need more will override. -- 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
Auto-purge of Jobs
Hi, We have a sandbox systems where some users are given a basic level of mainframe training. Some times users jobs do run under loop or consume more CPU, In this scenario are there any possibility of implementing auto-purge of Jobs which runs under Loop or Consumes more CPU. Wanted to know if someone has implemented a similar practise at anyone of your shops. If so please share me your ideas or thoughts. Jake -- 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: Auto-purge of Jobs
��z{S���}�ĝ��xjǺ�*'���O*^��m��Z�w!j�
SMF - CPU and Memory Usage Calculations
Hi All, Here I wanted to know How all your shop does the CPU and Memory Calculations using SMF records. We have an environment where we have not installed any tools to do. Our systems are used by various department and we have assigned seperate RACF default group. Based on RACF default group we calculate the CPU and Memory by taking the help of COBOL source code(I am not that good in COBOL). We do the CPU and Memory calculations based on the SMF Man dataset dumped to a flat file(VBS) sys1.smfrec. I wanted to know some of the best practises to do the CPU and Memory Calculations based on a racf default groups. Any advises would be much appreciated. Jake, -- 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