Re: SDSF Batch command size limit
I found the following example which seems to work the best for my requirement. Thank you for all your responses. //REMVLF EXEC PGM=IEBGENER,COND=(0,NE) //SYSPRINT DD SYSOUT=* //SYSUT1 DD *,DLM=ZZ /*$VS,'RO *ALL,F CATALOG,NOVLF(CATL.USER0.ALPLEX)' ZZ //SYSUT2 DD SYSOUT=(S,INTRDR) //SYSINDD DUMMY -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF Batch command size limit
Hi, You don't say which release you are, but from 1.9 onwards, you should be able to use the ' option if you use the ISFAFD program to invoke batch SDSF. The following is an example: //EXECSSID EXEC PGM=ISFAFD //ISFOUTDD SYSOUT=* //ISFIN DD * / ++='SETPROG APF,ADD,'='DSN=PSDB2.PERM.SBD1.SDSNEXIT,SMS' The syntax should be in the manuals Best regards, David Tidy Tel:(31)115-67-1745 IS Technical Management/SAP-Mf Fax:(31)115-67-1762 Dow Benelux B.V.Mailto:dt...@dow.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Robin van Westendorp Sent: 25 June 2009 15:58 To: IBM-MAIN@bama.ua.edu Subject: SDSF Batch command size limit I would like to submit a batch job to issue a catalog command. However, I find that the total command exceeds the size that one can issue on SDSF command line. Is there a way to issue a slash in SDSF batch to get to the System Command Extention? In the example below, the closing backet ) is truncated. //REMVLF EXEC PGM=SDSF,COND=(0,NE) //ISFOUT DD SYSOUT=* //ISFINDD * /RO *ALL,F CATALOG,NOVLF(CATL.USER0.ALPLEX) ISF015I SDSF COMMAND EXECUTED 'RO *ALL,F CATALOG,NOVLF (CATL.USER0.ALPLEX ' ABRW005 BATCHBATCH RO *ALL,F CATALOG,NOVLF(CATL.USER0.ALPLEX RO T=030,AL01,F CATALOG,NOVLF(CATL.USER0.ALPLEX RO T=030,AL02,F CATALOG,NOVLF(CATL.USER0.ALPLEX -ABRW005C REMVLF 00133297.00.00 .0 450 BATCH0 0 0 0 F CATALOG,NOVLF(CATL.USER0.ALPLEX IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE IEC353I CATALOG ADDRESS SPACE MODIFY UNSUCCESSFUL IEC353I INVALID COMMAND FORMAT F CATALOG,NOVLF(CATL.USER0.ALPLEX IEC351I CATALOG ADDRESS SPACE MODIFY COMMAND ACTIVE IEC353I CATALOG ADDRESS SPACE MODIFY UNSUCCESSFUL IEC353I INVALID COMMAND FORMAT -- 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: OS/390
I think you might be able to run it under z/VM, you certainly can run it under Hercules. If you get a fast enough PC, you can probably beat the MIPS of what your running it on now;) What is the purpose of the question? Is it just a gee, I wonder, or is there a real need to give it a go? I have done a lot of (well over 100) conversions from even as far back as MVS/SP and MVS/XA to z/OS in the past few years and it's not impossible to convert quickly, but there are a lot of better ways to handle the conversion to a newer operating system level than to just dump the old version on a new processor type and hope to be able to convert that way.:) I was going to give a Share presentation on just this type of thing, but the revenue to send me this time just wasn't available. :( Brian -- 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: IF-Statement in JCL
On Thu, 25 Jun 2009 11:55:54 -0500, Paul Gilmartin paulgboul...@aim.com wrote: On Thu, 25 Jun 2009 09:35:26 -0600, Frank Swarbrick wrote: // IF COMPILE=CICS //SYSLIB DD DISP=SHR,DSN=CICS.SDFHCOB // ENDIF But I don't much care. I keep my more complicated JCL as here-documents in shell scripts which can do all the conditionals and tailoring I need. And you would be amazed what ISPF file tailoring can do for you. Even in batch. Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
OMVS data not found in dump
Hi all dear liters, Do you have any idea how can I produce an SDUMP including OMVS data storage areas? All COMMUNICATIONS, FILE, PROCESS data are not available in produced dump. I am using SDATA= (COUPLE,ALLNUC,LPA,LSQA,PSA,SWA,RGN,SQA,TRT,CSA,GRSQ, XESDATA,SUM). Is there any missing parameter so to inlude OMVS storage in dump? -- 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: OMVS data not found in dump
On Fri, 26 Jun 2009 05:07:50 -0500 Kostas Zafiropoulos kzafiropou...@eurobank.gr wrote: :Hi all dear liters, I could use a liter or two right now. :Do you have any idea how can I produce an SDUMP including OMVS data :storage areas? All COMMUNICATIONS, FILE, PROCESS data are not available in :produced dump. I am using :SDATA= :(COUPLE,ALLNUC,LPA,LSQA,PSA,SWA,RGN,SQA,TRT,CSA,GRSQ, :XESDATA,SUM). Is there any missing parameter so to inlude OMVS storage in :dump? Ask the vendor (IBM?) who is requesting the dump to provide you with the required keywords. There are keywords to include additional jobnames and dataspaces. -- 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
Staff size survey results
I see that there is no data for z/VM- zLINUX shops. Any reason for excluding them? -- Thank you, Bob Molerio. -- 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: IBM Software Secure Support via USA Citizens
Ted, Mate, we're on the same page on that one. I'm wondering if they'll provide support for US residents that are not citizens... I better be ready with my Social Security Number. Ron -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Ted MacNEIL Sent: Tuesday, June 16, 2009 12:42 PM To: IBM-MAIN@bama.ua.edu Subject: Re: [IBM-MAIN] IBM Software Secure Support via USA Citizens Ya know! Not everybody on this is a USA Citizen. Nor, do we live in the USA. I'm still trying to see where this helps me. (Flame me if you wish). But, I'd prefer to see this topic dropped. - Too busy driving to stop for gas! -- 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
Thought that I understood IODF and IOCDS but ..
I understand that to synch the IODF and IOCDS for more than 'software change' that I need to ACTIVATE IODF=A0,ACTIOCDS=A0 This should make the H/W (HSA) and S/W happy on the LPAR that I issue the command? My question is 'will it make the other LPARs unhappy', in that the HSA won't reflect their IODF, before an IPL or ACTIVATE in the other LPARs? Also will VM/Linux 'see' the changes without disruption/IPL? Finally in MVS, the LOAD parm specifies the HCD's operating system configuration but how does VM respond/accept it? Jack Kelly 202-502-2390 (Office) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMPE usermod sample
After seeing the posts this week about ISRONLY in ISP.SISPSAMP, I am trying to write a SMPE usermod that will: 1) Copy/move ISRONLY from SISPSAMP to SISPEXEC 2) Add alias ONLY to it. Does anyone have any samples/pointers on how to do this? Thanks in advance, Dave _ Dave Jousma Assistant Vice President, Mainframe Services david.jou...@53.com 1830 East Paris, Grand Rapids, MI 49546 MD RSCB1G p 616.653.8429 f 616.653.8497 This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IF-Statement in JCL
On Fri, 26 Jun 2009 05:01:41 -0500, Jan MOEYERSONS wrote: // IF COMPILE=CICS //SYSLIB DD DISP=SHR,DSN=CICS.SDFHCOB // ENDIF But I don't much care. I keep my more complicated JCL as here-documents in shell scripts which can do all the conditionals and tailoring I need. And you would be amazed what ISPF file tailoring can do for you. Even in batch. I'd be amazed only if it supported regular expressions. -- gil -- 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: anynet SNA over TCPIP
Pat While true, there isn't much need for it, either. You're using the wrong tense; try was for is. In the days when AnyNet Sockets over SNA was created, the mid-90s, there was an golden opportunity not to scrap SNA network infrastructure in favour of IP network infrastructure but simply to benefit from IP-based applications and interface to existing IP network infrastructure while preserving all the benefits of maintaining the existing SNA network infrastructure. Sadly the suits were taken in by the bigots and we got lumbered with IP infrastructure with all its myriad disadvantages - sad for all except for the vendors of that infrastructure of course who no doubt congratulated themselves wildly on their successful hustle. It's rare to find 2 devices with SNA connectivity that don't have IP connectivity. I used to work in an education centre - as you anyhow know. A new internal application was brought in from the US. It had training in the title to which I vociferously objected since I - together with my colleagues - was offering education[1] The application was built on an UNIX base and so employed sockets communication. The introduction struggled miserably in its European test sites, my and other education centres being the client sites with a server site near the Black Forest. The reason was that the production networks at the time were (still) built on SNA infrastructure while IP infrastructure had very limited bandwidth. Fortunately a guy in the in the introducing team remembered I had mentioned running sockets programs over SNA in a meeting a short while before. So I was obliged to come to the rescue of this demeaning system with AnyNet Sockets over SNA access nodes and gateways, sacrificing my and a Freundins 2217s[2] to the cause. Eventually the IP infrastructure was upgraded and the purity of the application was restored. AnyNet SNA over IP ... made an appl-to-appl connection. EE makes an APPN node-to-node connection. Pat, there's a hole in your education! AnyNet SNA over IP constituted a Low Entry Networking (LEN) link just like any other LEN link, SDLC, frame relay, X.25, 802.2 LAN etc. The only difference is that you couldn't set the bits in the XID which offered APPN services - and CP LU to CP LU sessions - in the case of AnyNet SNA over IP. There's a hole in my education which I'm not going to bother to repair - unless some post prompts it (unlikely) - in not knowing about TCP62 or any other of the etc. which are/were not strict MPTN AnyNet SNA over TCP/UDP/IP. AnyNet over IP implementing a LEN link is then strictly replaced by Enterprise Extender (EE) implementing an APPN/HPR link. AnyNet over IP cannot be enhanced to be an APPN/HPR link and EE cannot be downgraded to be a LEN link. That's the difference. ... there is more to setting up the connection if the nodes are not already APPN nodes. Indeed, this is where I usually say something like and, by the way, you need to ensure that your VTAM is enabled for APPN if not already done which is typically not a trivial task. Setting up LEN links with a traditional subarea VTAM also needed a few novel concepts to be taken on board, the same- domain CDRSC being one. And, of course, the EE connection can automatically handle any other SNA sessions you care to add once you have it in place. may apply to implementations such as TCP62 but not in comparison with fully developed AnyNet SNA over IP. Wasn't TCP62 just the name of the non-VTAM AnyNet SNA over IP LU6.2 component? Dunno - although GC34-6889-00 does imply that. The manual seems just to discuss LU type 6.2 so I guess that LU type 6.2 was all that TCP62 could handle - which is fine if that was the mission the product was given. The manual may have been terrible, ... It may be that the manuals which describe TCP62 by itself do their job very well. It is only this ridiculous migration manual created in order to deal with the demise of AnyNet SNA over IP in VTAM to which I object. It pretends that Enterprise Extender is the solution when, as soon as you bother to digest what the manual actually covers, you see that the function supplied by TCP62 is replaced by a concatenation of Remote API Client over IP and an SNA link to VTAM - of any type whatsoever. The middle box is shown as running Communications Server for Linux on zSeries but it could be any non- VTAM Communications Server.[3] Was anything other than than LU6.2 support implemented using AnyNet SNA over IP? SSCP-dependent LUs of any type were also supported - eventually. And this was a significant exception to the rule that the DLUR-DLUS pipe sessions had to pass over a concatenation of links all capable of supporting APPN flows with CP LU to CP LU connectivity existing between the DLUR and DLUS nodes. Reflect on the text of sense code 0877 0056 quote Sense code 0877 Resource mismatch: The receiver of a request has detected a mismatch between two of the
Re: OMVS data not found in dump
IBM will generally request parameters similar to: SDATA=(ALLNUC,PSA,CSA,LPA,TRT,SQA,RGN,GRSQ,LSQA,SUM) JOBNAME=(OMVS), DSPNAME=('OMVS'.*),END On Fri, 26 Jun 2009 05:07:50 -0500, Kostas Zafiropoulos kzafiropou...@eurobank.gr wrote: Hi all dear liters, Do you have any idea how can I produce an SDUMP including OMVS data storage areas? All COMMUNICATIONS, FILE, PROCESS data are not available in produced dump. I am using SDATA= (COUPLE,ALLNUC,LPA,LSQA,PSA,SWA,RGN,SQA,TRT,CSA,GRSQ, XESDATA,SUM). Is there any missing parameter so to inlude OMVS storage in dump? -- 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: question about searching datasets for ip addresses
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Klein, Kenneth Try this: //*-+1+2+3+4+5+6+7-- //PROC001 PROC //SCAN EXEC PGM=ISRSUPC,PARM=('L SRCHCMP ANYC') //OUTDD DD SYSOUT=* //NEWDD DD DISP=SHR,DSN=DSN //SYSIN DD DISP=SHR,DSN=KQKTEMP.$TSO.JCLLIB(SCANPARM) //ENDOFIT PEND //S0A EXEC PROC=PROC001,DSN='KQKTEMP.$TSO.JCLLIB' //* scanparm looks like this: // SRCHFOR 'KQKTEMP' An option I've not seen mentioned yet is DFSORT (and possibly Syncsort), using the substring ( SS ) function of the INCLUDE control card: //STEP01 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DISP=SHR,DSN=your.input.dataset //SORTOUT DD DISP=(,CATLG),DSN=your.output.dataset, //UNIT=SYSALLDA,SPACE=(TRK,(1,1)) //SYSINDD * SORT FIELDS=COPY INCLUDE COND=(1,80,SS,EQ,C'192.168.1.14',OR, 1,80,SS,EQ,C'192.168.001.014') /* This just does the basic find and copies the found records unchanged to SORTOUT. Of course, you can get a whole lot fancier with the output using the OUTFIL control card. -jc- -- 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: OS/390
The company currently has a 2003-116 and IBM will be dropping maintenance 12/31/2009. They want to go to newer hardware (z890/z990) but does not want to upgrade their software, I repeat, does not want to upgrade their software. They want to stay on OS/390 1.3 until they migrate off to an ERP package. Billy Timothy Sipples e99...@jp.ibm.com wrote: For the record, IBM never supported OS/390 1.3 on the z900 model. The earliest OS/390 release supported on the z900 was 2.6. On the z800 the earliest was 2.8. Perhaps it would be a good idea if the original poster described what he is trying to do. We might have some alternative ideas for solving the problem (s). - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Based in Tokyo, Serving IBM Japan / Asia-Pacific E-Mail: timothy.sipp...@us.ibm.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OMVS data not found in dump
On Fri, 26 Jun 2009 05:07:50 -0500, Kostas Zafiropoulos kzafiropou...@eurobank.gr wrote: Hi all dear liters, Do you have any idea how can I produce an SDUMP including OMVS data storage areas? All COMMUNICATIONS, FILE, PROCESS data are not available in produced dump. I am using SDATA= (COUPLE,ALLNUC,LPA,LSQA,PSA,SWA,RGN,SQA,TRT,CSA,GRSQ, XESDATA,SUM). Is there any missing parameter so to inlude OMVS storage in dump? Include OMVS and BPXOINIT in your jobname list and also DSPNAME=('OMVS'.*). I have an IEADMCOM parmlib member for just dumping OMVS that looks like this: JOBNAME=(OMVS,BPXOINIT),DSPNAME=('OMVS'.*),ASID=1, SDATA=(ALLNUC,PSA,CSA,LPA,TRT,SQA,RGN,GRSQ,SUM) -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Microsoft claims mainframes anti-competitive
http://tech.slashdot.org/story/09/06/26/0652216/Microsoft-Backed-Firm-Sa ys-IBM-Is-Anticompetitive -- 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: OS/390
That being the case, I would search for a third party maintenance contract, do time and materials and keep the 2003-116. - Robert B. Richards(Bob) US Office of Personnel Management 1900 E Street NW Room: BH04L Washington, D.C. 20415 Phone: (202) 606-1195 Email: robert.richa...@opm.gov - -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Billy R. Bingham Sent: Friday, June 26, 2009 8:20 AM To: IBM-MAIN@bama.ua.edu Subject: Re: OS/390 The company currently has a 2003-116 and IBM will be dropping maintenance 12/31/2009. They want to go to newer hardware (z890/z990) but does not want to upgrade their software, I repeat, does not want to upgrade their software. They want to stay on OS/390 1.3 until they migrate off to an ERP package. Billy Timothy Sipples e99...@jp.ibm.com wrote: For the record, IBM never supported OS/390 1.3 on the z900 model. The earliest OS/390 release supported on the z900 was 2.6. On the z800 the earliest was 2.8. Perhaps it would be a good idea if the original poster described what he is trying to do. We might have some alternative ideas for solving the problem (s). - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Based in Tokyo, Serving IBM Japan / Asia-Pacific E-Mail: timothy.sipp...@us.ibm.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OS/390
You weren't specific before, so I wasn't either. IIRC, it won't IPL even under z/VM without the z990 exploitation code. http://www-03.ibm.com/support/techdocs/atsmastr.nsf/WebIndex/FLASH10236 Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html On Fri, 26 Jun 2009 07:19:53 -0500, Billy R. Bingham billy.bingham...@suddenlink.net wrote: The company currently has a 2003-116 and IBM will be dropping maintenance 12/31/2009. They want to go to newer hardware (z890/z990) but does not want to upgrade their software, I repeat, does not want to upgrade their software. They want to stay on OS/390 1.3 until they migrate off to an ERP package. Billy Timothy Sipples e99...@jp.ibm.com wrote: For the record, IBM never supported OS/390 1.3 on the z900 model. The earliest OS/390 release supported on the z900 was 2.6. On the z800 the earliest was 2.8. Perhaps it would be a good idea if the original poster described what he is trying to do. We might have some alternative ideas for solving the problem (s). - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Based in Tokyo, Serving IBM Japan / Asia-Pacific E-Mail: timothy.sipp...@us.ibm.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: INFOZIP 2Gb
On Thursday 25 June 2009, Bob Woodside wrote: Nope, not quite ready. When I tried to add a large file to an archive, I got this error message: It appears getting the cmsmvs version LARGE_FILES is proving to be more challenging than I've anticipated. This is a limitation of zip - no external tool can get around it. That's the way zip handles input from stdin. Using COZBATCH and USS infozip method would have been ideal quicker too, however the file name - within zip is really a problem for our Windows unzip program get Error : no files found. Our users would like to retain the input dataset name. Do you mean bzip2? Yes I did mean bzip2. I hope we'll manage to set the full input dataset name within zip. Do you have some batch JCL for zip set up? Yes, I do have a batch JCL for the cmsmvs zip set up : //INFOZIP EXEC PGM=ZIP, // PARM='/-avl -1 -MV=dots DD:OUT ''INPUT.DATASET.NAME''' //STEPLIB DD DSN=userid.INFOZIP.LOAD,DISP=SHR //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //OUT DD DSN=OUTPUT.DATASET.NAME, //DISP=(NEW,CATLG,DELETE), //SPACE=(TRK,(45000,5000),RLSE), //DCB=(RECFM=FB,LRECL=80,BLKSIZE=0) //SYSINDD DUMMY Oh, well. We keep plodding along. I appreciate the effort Bob, thanks for at least trying. Please Note: This email and its contents are subject to our email legal notice which can be viewed at http://www.sars.gov.za/Email_Disclaimer.pdf -- 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
DFSORT - the missing date conversion.
DFSORT has some wonderful abilities to convert encoded date/times to various printable outputs. These include SMF's PL4'0cyyddd' as well as TOD (STCK output) and ETOD (STCKE output). But I ran into one that is not there. I was writing a report from DCOLLECT data. The DCOLLECT date format is PL4'ddd'. DFSORT does not have a conversion for this. OK, you Brainiacs out there probably see how to get around this already. Simply subtract PL4'190' and you have converted the date to the SMF format of PL4'0cyyddd'. However, there is still one problem. Sometimes the dates are PL4'0' as a missing value. So if you simply subtract 190 from that and then use one of DFSORT's date conversions on it, the result is interesting. So what I do, as an example for those who might be interested, is use the INREC and the IFTHEN. INREC IFTHEN=(WHEN=(117,4,PD,GT,191), OVERLAY=(117:109,4,PD,SUB,+190,TO=PD,LENGTH=4), HIT=NEXT) I then use the OUTREC to convert something like: OUTREC FIELDS=(117,4,DT1,EDIT=(-TT-TT)) The only problem with this, which I haven't yet bothered to fix, is the PL4'0' input ends up with a date of ZL10'1900-01-00' in my output. Many thanks to the DFSORT people for those date conversions. I'm able to write ICETOOL reports which would be a royal PITA in COBOL or EasyTrieve. I miss SAS. John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: java6 can't initialize JVM
Please provide a little more information... like where are you trying to start the JVM, under TSO OMVS? Do you know how much storage you have available above the line? For -Xms100m you probably want at least 140m. You might try a tool like Mark Zelden's REXXSTOR exec: http://home.flash.net/~mzelden/mvsutil.html (BTW: a *default* setting of 100M max heap size seems odd to me unless *all* of your java applications need a large heap. It is best not to use a max heap size much more than you need) If you use the JZOS batch launcher, which ships with the SDK, you can set LOGLVL='+D' and you will get some debugging information, including a display of the LDA storage map. Kirk Wolf Dovetailed Technologies 2009/6/25 he_ming he_m...@bayss.com I use 32 bit java. No IEFUSI exit is installed. OS is ZOS 1.8. I set below variable in etc/profile, but still fail to init JVM. IBM_JAVA_OPTIONS=-Xmx100m export IBM_JAVA_OPTIONS Best regards, He Ming (贺 明) Mobile: 1392-500-5956, 发件人: Barkow, Eileen 发送时间: 2009-06-25 21:28:15 收件人: IBM-MAIN 抄送: 主题: Re: java6 can't initialize JVM did you download the 64 bit version or the 32 bit? if 64, try 32. the size of the jvm in the users unix profile .profile member when you log into OMVS. IBM_JAVA_OPTIONS=-Xmxnnm - you may need to either increase or decrease it. I originally had a problem running any release of java under z/os 1.9 because it could not get the initial storage so i had to lower the XMx value. i think that the IEFUSI exit was to blame. Someone on this list (or the OMVS list) recently said that the IEFUSI exit needed to be excluded from SMF processing - no one ever really explained what this had to do with non-SMF processing. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of he_ming Sent: Thursday, June 25, 2009 7:51 AM To: IBM-MAIN@bama.ua.edu Subject: java6 can't initialize JVM Hi All, I download java sdk6 for zos from ibm site and install it. but when I use #java -version to verify installation, it show below error. I tried to increase logon region size, but it still fail. # java -version JVMJ9VM015W Initialization error for library j9gc24(2): Failed to instantiate gl obal garbage collector Could not create the Java virtual machine. Best regards, He Ming(贺 明) Mobile: 1392-500-5956, -- 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: Microsoft claims mainframes anti-competitive
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Howard Brazee Sent: Friday, June 26, 2009 7:36 AM To: IBM-MAIN@bama.ua.edu Subject: Microsoft claims mainframes anti-competitive http://tech.slashdot.org/story/09/06/26/0652216/Microsoft-Back ed-Firm-Sa ys-IBM-Is-Anticompetitive WOW, that's the pot calling the kettle Farberware! (to avoid any offense in this PC era). The argument, as I read it is that the z is simply too efficient at the newest cloud computing. And that's putting a crimp in the Windows server market. And MS has a guaranteed right to be on top regardless of changes in the computing landscape. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: java6 can't initialize JVM
do you have JAVA_HOME and LIBPATH SET in the profile? JAVA_HOME=/udir../j16/J6.0 LIBPATH=$JAVA_HOME/include:$JAVA_HOME/bin:$JAVA_HOME/bin/classic -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of he_ming Sent: Thursday, June 25, 2009 8:25 PM To: IBM-MAIN@bama.ua.edu Subject: Re: java6 can't initialize JVM I use 32 bit java. No IEFUSI exit is installed. OS is ZOS 1.8. I set below variable in etc/profile, but still fail to init JVM. IBM_JAVA_OPTIONS=-Xmx100m export IBM_JAVA_OPTIONS Best regards, He Ming (贺 明) Mobile: 1392-500-5956, 发件人: Barkow, Eileen 发送时间: 2009-06-25 21:28:15 收件人: IBM-MAIN 抄送: 主题: Re: java6 can't initialize JVM did you download the 64 bit version or the 32 bit? if 64, try 32. the size of the jvm in the users unix profile .profile member when you log into OMVS. IBM_JAVA_OPTIONS=-Xmxnnm - you may need to either increase or decrease it. I originally had a problem running any release of java under z/os 1.9 because it could not get the initial storage so i had to lower the XMx value. i think that the IEFUSI exit was to blame. Someone on this list (or the OMVS list) recently said that the IEFUSI exit needed to be excluded from SMF processing - no one ever really explained what this had to do with non-SMF processing. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of he_ming Sent: Thursday, June 25, 2009 7:51 AM To: IBM-MAIN@bama.ua.edu Subject: java6 can't initialize JVM Hi All, I download java sdk6 for zos from ibm site and install it. but when I use #java -version to verify installation, it show below error. I tried to increase logon region size, but it still fail. # java -version JVMJ9VM015W Initialization error for library j9gc24(2): Failed to instantiate gl obal garbage collector Could not create the Java virtual machine. Best regards, He Ming(贺 明) Mobile: 1392-500-5956, -- 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: OS/390
On Fri, Jun 26, 2009 at 1:19 PM, Billy R. Bingham billy.bingham...@suddenlink.net wrote: The company currently has a 2003-116 and IBM will be dropping maintenance 12/31/2009. They want to go to newer hardware (z890/z990) but does not want to upgrade their software, I repeat, does not want to upgrade their software. They want to stay on OS/390 1.3 until they migrate off to an ERP package. Billy Have you looked at the FLEX-ES option. That should run any version I believe and because it runs on pc technology, the hardware will be available for some other use when the mainframe application is finished with. Jim McAlpine -- 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: DFSORT - the missing date conversion.
John, Investigate IFTHEN WHEN=(condition) so that if the number would be valid with the subtraction then do the subtraction, otherwise don't. Cheers, Martin Martin Packer Performance Consultant IBM United Kingdom Ltd +44-20-8832-5167 +44-7802-245-584 email: martin_pac...@uk.ibm.com Twitter ID: MartinPacker They're figuring out that collaboration isn't a productivity hit, it makes them smarter. Sam Palmisano on BlogCentral, 26 November 2008 Unless stated otherwise above: IBM United Kingdom Limited - Registered in England and Wales with number 741598. Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: INFOZIP 2Gb
On Friday 26 June 2009, Vikesh Bhoola wrote: It appears getting the cmsmvs version LARGE_FILES is proving to be more challenging than I've anticipated. Or I. I managed to run several tests of both versions last night, and I found that the cmsmvs version would run successfully if I added the -fz flag. I don't like this hack for a couple of reasons: 1) it isn't documented - at least zip -h doesn't explain it, yet; 2) it violates the convention that -fz should be equivalent to -f and z (which are both valid flags in their own right); and 3) this is a workaround that just masks a program bug (that doesn't happen in the Unix build). But we may go with that as a temporary solution to get you something that will work soon. The thing that bothers me more is that the cmsmvs version ran for about 40 minutes to zip a large file that the regular Unix version handled in about 10 minutes. There's clearly a lot more work to be done here. Yes, I do have a batch JCL for the cmsmvs zip set up : Thanks for the JCL. I'll keep you posted. Cheers, Bob Bob Woodside Woodsway Consulting, Inc. http://www.woodsway.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OS/390
On Fri, 26 Jun 2009 14:26:10 +0100, Jim McAlpine jim.mcalp...@gmail.com wrote: On Fri, Jun 26, 2009 at 1:19 PM, Billy R. Bingham billy.bingham...@suddenlink.net wrote: The company currently has a 2003-116 and IBM will be dropping maintenance 12/31/2009. They want to go to newer hardware (z890/z990) but does not want to upgrade their software, I repeat, does not want to upgrade their software. They want to stay on OS/390 1.3 until they migrate off to an ERP package. Billy Have you looked at the FLEX-ES option. That should run any version I believe and because it runs on pc technology, the hardware will be available for some other use when the mainframe application is finished with. Jim McAlpine Jim, where have you been the last few years? Don't you know FLEX-ES is dead? Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OS/390
On Fri, Jun 26, 2009 at 2:54 PM, Mark Zelden mark.zel...@zurichna.comwrote: On Fri, 26 Jun 2009 14:26:10 +0100, Jim McAlpine jim.mcalp...@gmail.com wrote: Have you looked at the FLEX-ES option. That should run any version I believe and because it runs on pc technology, the hardware will be available for some other use when the mainframe application is finished with. Jim McAlpine Jim, where have you been the last few years? Don't you know FLEX-ES is dead? Mark -- I thought it was only dead for the Partnerworld and 64 bit version of z/OS. I was under the impression that it was still available for commercial users as long as they ran a 31 bit flavour of MVS. If I'm mistaken then my apologies, I've obviously got the wrong end of the stick. Jim McAlpine -- 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
z/os omvs maintenance service and hfs/zfs
Newbie question: I'm starting my research into how to apply maintenance to omvs for the first time in _my_ career. I'm fine with z/os, smp/e, the csi and zones, put's, rsu's and so on but this shop (I'm new here) has some clone-jobs that set up the whole hfs file structure under a /Service node. What the heck is that for? Ken Klein Sr. Systems Programmer Kentucky Farm Bureau Insurance - Louisville -- 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: z/os omvs maintenance service and hfs/zfs
snip /Service node. What the heck is that for? unsnip Unless you want to apply maint to your running OMVS components, then pointing to the /Service (or whatever) directory will some 'issues'. Generically you run the maint from a driving system and /Service (and mounting) lets you point to the target's OMVS. Jack Kelly 202-502-2390 (Office) -- 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: Thought that I understood IODF and IOCDS but ..
John Kelly wrote: I understand that to synch the IODF and IOCDS for more than 'software change' that I need to ACTIVATE IODF=A0,ACTIOCDS=A0 This should make the H/W (HSA) and S/W happy on the LPAR that I issue the command? My question is 'will it make the other LPARs unhappy', in that the HSA won't reflect their IODF, before an IPL or ACTIVATE in the other LPARs? After activation, other LPARs will be out of sync. You will need to do software-only activation to get them back in sync. Also will VM/Linux 'see' the changes without disruption/IPL? You can do dynamic updates using z/VM HCD just like you can with z/OS. Use the CBDSACT command. Finally in MVS, the LOAD parm specifies the HCD's operating system configuration but how does VM respond/accept it? z/VM does not have a LOADxx member and IPLPARM data set. The z/VM load parm has nothing to do with IODF processing. Rather, in z/VM you have an IODF statement in the SYSTEM CONFIG file on the PARMDISK used at IPL. -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMPE usermod sample
On Fri, 26 Jun 2009 07:46:51 -0400, Jousma, David david.jou...@53.com wrote: After seeing the posts this week about ISRONLY in ISP.SISPSAMP, I am trying to write a SMPE usermod that will: 1) Copy/move ISRONLY from SISPSAMP to SISPEXEC 2) Add alias ONLY to it. Does anyone have any samples/pointers on how to do this? Thanks in advance, Dave _ Dave Jousma Perhaps Kurt Quackenbush (or someone else) would have a better way or more proper way to do it, but I think this should work: ++USERMOD (UMISPMZ) . ++VER (Z038) FMID(HIF5H02) . ++EXEC(ISRONLY) DISTLIB(AISPEXEC) ALIAS(ONLY) SYSLIB(SISPEXEC) TXLIB(SISPSAMP). ++JCLIN. //STEP1EXEC PGM=IEBCOPY //SISPSAMP DD DSN=SISPSAMP,DISP=SHR //SISPEXEC DD DSN=SISPEXEC,DISP=SHR //SYSIN DD * COPY INDD=SISPSAMP,OUTDD=SISPEXEC TYPE=DATA SELECT MEMBER=ISRONLY SELECT MEMBER=ONLY ALIAS OF ISRONLY /* Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMPE usermod sample
Mark, That is a beautiful thing. Worked like a champ! Thanks,. DAve _ Dave Jousma Assistant Vice President, Mainframe Services david.jou...@53.com 1830 East Paris, Grand Rapids, MI 49546 MD RSCB1G p 616.653.8429 f 616.653.8497 -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Mark Zelden Sent: Friday, June 26, 2009 10:25 AM To: IBM-MAIN@bama.ua.edu Subject: Re: SMPE usermod sample On Fri, 26 Jun 2009 07:46:51 -0400, Jousma, David david.jou...@53.com wrote: After seeing the posts this week about ISRONLY in ISP.SISPSAMP, I am trying to write a SMPE usermod that will: 1) Copy/move ISRONLY from SISPSAMP to SISPEXEC 2) Add alias ONLY to it. Does anyone have any samples/pointers on how to do this? Thanks in advance, Dave _ Dave Jousma Perhaps Kurt Quackenbush (or someone else) would have a better way or more proper way to do it, but I think this should work: ++USERMOD (UMISPMZ) . ++VER (Z038) FMID(HIF5H02) . ++EXEC(ISRONLY) DISTLIB(AISPEXEC) ALIAS(ONLY) SYSLIB(SISPEXEC) TXLIB(SISPSAMP). ++JCLIN. //STEP1EXEC PGM=IEBCOPY //SISPSAMP DD DSN=SISPSAMP,DISP=SHR //SISPEXEC DD DSN=SISPEXEC,DISP=SHR //SYSIN DD * COPY INDD=SISPSAMP,OUTDD=SISPEXEC TYPE=DATA SELECT MEMBER=ISRONLY SELECT MEMBER=ONLY ALIAS OF ISRONLY /* Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/os omvs maintenance service and hfs/zfs
-Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Klein, Kenneth Sent: Friday, June 26, 2009 9:08 AM To: IBM-MAIN@bama.ua.edu Subject: z/os omvs maintenance service and hfs/zfs Newbie question: I'm starting my research into how to apply maintenance to omvs for the first time in _my_ career. I'm fine with z/os, smp/e, the csi and zones, put's, rsu's and so on but this shop (I'm new here) has some clone-jobs that set up the whole hfs file structure under a /Service node. What the heck is that for? Ken Klein Updating the running system is frowned upon. The way that I do maintenance is to put the maintenance onto an alternate set of OS volumes. That is easy to do with legacy datasets. However, to update z/UNIX files, the container dataset must be mounted on the updating system. So, the /Service subdirectory is where you mount your alternate z/UNIX filesystems. Think of it as a similar to the SSA alias used in SMP/E to refer to the datasets on your alternate RES volumes via that normal catalog. So, you'd first MOUNT your alternate ROOT filesystem dataset on the /Service subdirectory. You'd then mount your alternate VAR filesystem at /Service/var, XML at /Service/usr/lpp/ixm, SHPUROOT at /Service/usr/lpp/ported, SHPHROOT at /Service/usr/lpp/php, SHPEROOT at /Service/usr/lpp/perl, MQS at /Service/usr/lpp/mqm, and so on. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z/os omvs maintenance service and hfs/zfs
In addition make sure your SMPE dddef's point to /service/. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of McKown, John Sent: Friday, June 26, 2009 10:30 AM To: IBM-MAIN@bama.ua.edu Subject: Re: z/os omvs maintenance service and hfs/zfs -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Klein, Kenneth Sent: Friday, June 26, 2009 9:08 AM To: IBM-MAIN@bama.ua.edu Subject: z/os omvs maintenance service and hfs/zfs Newbie question: I'm starting my research into how to apply maintenance to omvs for the first time in _my_ career. I'm fine with z/os, smp/e, the csi and zones, put's, rsu's and so on but this shop (I'm new here) has some clone-jobs that set up the whole hfs file structure under a /Service node. What the heck is that for? Ken Klein Updating the running system is frowned upon. The way that I do maintenance is to put the maintenance onto an alternate set of OS volumes. That is easy to do with legacy datasets. However, to update z/UNIX files, the container dataset must be mounted on the updating system. So, the /Service subdirectory is where you mount your alternate z/UNIX filesystems. Think of it as a similar to the SSA alias used in SMP/E to refer to the datasets on your alternate RES volumes via that normal catalog. So, you'd first MOUNT your alternate ROOT filesystem dataset on the /Service subdirectory. You'd then mount your alternate VAR filesystem at /Service/var, XML at /Service/usr/lpp/ixm, SHPUROOT at /Service/usr/lpp/ported, SHPHROOT at /Service/usr/lpp/php, SHPEROOT at /Service/usr/lpp/perl, MQS at /Service/usr/lpp/mqm, and so on. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- 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: DFSORT - the missing date conversion.
John McKown wrote on 06/26/2009 05:57:30 AM: DFSORT has some wonderful abilities to convert encoded date/times to various printable outputs. These include SMF's PL4'0cyyddd' as well as TOD (STCK output) and ETOD (STCKE output). But I ran into one that is not there. I was writing a report from DCOLLECT data. The DCOLLECT date format is PL4'ddd'. DFSORT does not have a conversion for this. OK, you Brainiacs out there probably see how to get around this already. Simply subtract PL4'190' and you have converted the date to the SMF format of PL4'0cyyddd'. However, there is still one problem. Sometimes the dates are PL4'0' as a missing value. So if you simply subtract 190 from that and then use one of DFSORT's date conversions on it, the result is interesting. So what I do, as an example for those who might be interested, is use the INREC and the IFTHEN. INREC IFTHEN=(WHEN=(117,4,PD,GT,191), OVERLAY= (117:109,4,PD,SUB,+190,TO=PD,LENGTH=4), HIT=NEXT) I then use the OUTREC to convert something like: OUTREC FIELDS=(117,4,DT1,EDIT=(-TT-TT)) The only problem with this, which I haven't yet bothered to fix, is the PL4'0' input ends up with a date of ZL10'1900-01-00' in my output. I think you meant: INREC IFTHEN=(WHEN=(117,4,PD,GT,191), OVERLAY=(117:117,4,PD,SUB,+190,TO=PD,LENGTH=4)) But a better way to do this would be to use these DFSORT statements which will give -00-00 (or whatever else you want to plug in) for the 0 date. OPTION COPY INREC IFOUTLEN=10, IFTHEN=(WHEN=(117,4,PD,EQ,0), BUILD=(C'-00-00')), IFTHEN=(WHEN=NONE, OVERLAY=(11:117,4,PD,SUB,+190,TO=PD,LENGTH=4, 1:11,4,DT1,EDIT=(-TT-TT))) Many thanks to the DFSORT people for those date conversions. I'm able to write ICETOOL reports which would be a royal PITA in COBOL or EasyTrieve. You're welcome. Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com Specialties: FINDREP, WHEN=GROUP, DATASORT, ICETOOL, Symbols, Migration = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/ -- 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: Dynamic PAV assigment has stopped
On Wed, 10 Jun 2009 15:06:54 -0500, Dave Butts dave.w.bu...@lowes.com wrote: It was an OS problem after all, and not due to the MCLs. APAR OA29370 has been opened. We have been over the 65535 device boundry for a long time, but the bug became exposed when I deleted over 5000 addresses the week before via dynamic iogen activate. The PAV assignment code broke because of the 2 byte CMCTHMBI field. We have just been lucky for several years that the truncated value (to fit the field) resulted in a value that was higher than our highest UCB. With the recent deletion of the 5000+ devices along with the truncation, we ended up with a total number of devices being tracked that is less than our starting DASD UCB. Strange though that the propblem didn't actually start until the next weekend when we performed a power-on-reset. Still investigating that one... Here's another one APAR Identifier .. OA29016 Last Changed 09/06/25 UNABLE TO BIND PAV DEVICES FOLLOWING AN ACTIVATE FAILURE Symptom .. IN INCORROUT Status ... CLOSED PER Severity ... 2 Date Closed . 09/06/25 Component .. 5752SC1C3 Duplicate of Reported Release . 730 Fixed Release 999 Component Name IOS Special Notice HIPER Current Target Date ..09/08/28 Flags SCP ... FUNCTIONLOSS Platform Status Detail: APARCLOSURE - APAR is being closed. PE PTF List: PTF List: Release 730 : PTF not available yet Release 730 : Relief is available in the form of: PTF Release 740 : PTF not available yet Release 740 : Relief is available in the form of: PTF Release 750 : PTF not available yet Release 750 : Relief is available in the form of: PTF Release 760 : PTF not available yet Release 760 : Relief is available in the form of: PTF Parent APAR: Child APAR list: ERROR DESCRIPTION: Customer performed an ACTIVATE SOFT, which involved changes on the usage of base and alias devices. During dynamic configuration change processing, IOS sets indicators in the devices being changed to prevent them from being bound again during the dynamic change. However, if the activate fails and all traditional PAV devices were unbound, configuration change processing fails to reset these indicators. This prevents these devices from future binding. VERIFICATION STEPS: 1. Binds are not occurring following an ACTIVATE TEST 2. Check SYSLOG for IOS500I message to determine if TEST is used with ACTIVATE. 3. Get a dump of IOSAS very soon after failure (or if can recreate, after you recreate) 4. Run CTRACE COMP(SYSIOS) SUMM LOCAL 5. Find the date in question F 'mm/dd/' 6. F 'Dyn config change - Start' to find the start of the activate. 7. F CMV1 eyecatcher entries after start for one device in question. 8. Check the UCBXNBND Counter for that device and then find the device again checking to see if counter is non-zero. UCBXNBND bit is UCBX+6F = 80 bit. Counter is UCBOB + x'34' LOCAL FIX: PROBLEM SUMMARY: * USERS AFFECTED: Users at HBB7730 and above. * * PROBLEM DESCRIPTION: After a failed ACTIVATE, unbound* * traditional PAVs are unable to bind or * * perform I/O because the back out* * processing is incorrectly skipped for * * these devices. * * PAV PAVS D/T2105 D/T2107 D/T1750* * RECOMMENDATION: * During the course of an ACTIVATE, PAV Aliases undergo processing to prevent them from being bound while dynamic changes to the configuration are happening. If an error occurs during an ACTIVATE, this processing should be backed out so that the Aliases can be bound as before. However, if only PAV Aliases of the unbound traditional type are being changed, the back out processing does not occur as expected and attempts to bind the effected PAVs will fail. PROBLEM CONCLUSION: Error processing will be changed so that all PAV Aliases will undergo back out processing to be returned to their original state and therefore be able to be bound. -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities:
Re: OS/390
While it may be able to run under z/VM using a kludge that to my knowledge, has never been tested, search the archives for a posting by Jim Mulder 2 or three years back. The issue has to do with the introduction of the multi-level TLB's in the current machines. === Wayne Driscoll OMEGAMON DB2 L3 Support/Development wdrisco(AT)us.ibm.com === Brian Westerman brian_wester...@syzygyinc.com Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 06/26/2009 04:21 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu To IBM-MAIN@bama.ua.edu cc Subject Re: OS/390 I think you might be able to run it under z/VM, you certainly can run it under Hercules. If you get a fast enough PC, you can probably beat the MIPS of what your running it on now;) What is the purpose of the question? Is it just a gee, I wonder, or is there a real need to give it a go? I have done a lot of (well over 100) conversions from even as far back as MVS/SP and MVS/XA to z/OS in the past few years and it's not impossible to convert quickly, but there are a lot of better ways to handle the conversion to a newer operating system level than to just dump the old version on a new processor type and hope to be able to convert that way.:) I was going to give a Share presentation on just this type of thing, but the revenue to send me this time just wasn't available. :( Brian -- 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: Another one bites the dust
On Wed, 24 Jun 2009 23:34:59 +0200, R.S. wrote: BTW: green is sales pitch. My green z10 consumes exactly 50% more power than blue z9. MIPS, channels, crypto, memory - remains the same (I wrote about it in the past). I was surprised by this, so I went to look at the specs. You can find them if you go to http://www-03.ibm.com/systems/z/hardware/ Select product details for each and download the data sheet. z9 BC 5.4 KW z10 BC 3.7-7.35 KW z9 EC 6.3-18.3 KW z10 EC 9.7-27.5 KW -- Tom Marchant -- 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: z/os omvs maintenance service and hfs/zfs
John McKown So, you'd first MOUNT your alternate ROOT filesystem dataset on the /Service subdirectory. You'd then mount your alternate VAR filesystem at /Service/var, XML at /Service/usr/lpp/ixm, SHPUROOT at /Service/usr/lpp/ported, SHPHROOT at /Service/usr/lpp/php, SHPEROOT at /Service/usr/lpp/perl, MQS at /Service/usr/lpp/mqm, and so on. We use /service/SYSR1 like mount point/s for SMPE work... -- 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: Thought that I understood IODF and IOCDS but ..
On Fri, 26 Jun 2009 07:41:36 -0400, John Kelly wrote: I understand that to synch the IODF and IOCDS for more than 'software change' that I need to ACTIVATE IODF=A0,ACTIOCDS=A0 This should make the H/W (HSA) and S/W happy on the LPAR that I issue the command? My question is 'will it make the other LPARs unhappy', in that the HSA won't reflect their IODF, before an IPL or ACTIVATE in the other LPARs? Well. You need to do the ACTIOCDS so that the next time you perform a POR the system will use an IOCDS that matches your new IODF. ACTIOCDS does not update the HSA on the system. It tells the system which IOCDS to use for POR. To make the HSA be in sync with the software on all MVS LPARs, you need to do a HW and SW activate on one LPAR and a SW only activate on the other LPARs. -- Tom Marchant -- 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: IF-Statement in JCL
On 6/26/2009 at 4:01 AM, in message listserv%200906260501418449.0...@bama.ua.edu, Jan MOEYERSONS jan.moeyers...@adelior.be wrote: On Thu, 25 Jun 2009 11:55:54 -0500, Paul Gilmartin paulgboul...@aim.com wrote: On Thu, 25 Jun 2009 09:35:26 -0600, Frank Swarbrick wrote: // IF COMPILE=CICS //SYSLIB DD DISP=SHR,DSN=CICS.SDFHCOB // ENDIF But I don't much care. I keep my more complicated JCL as here-documents in shell scripts which can do all the conditionals and tailoring I need. And you would be amazed what ISPF file tailoring can do for you. Even in batch. Where is the best place to learn about the tricks of ISPF file tailoring? (I haven't checked the IBM manuals, but I generally find they deal only with the how and not the why and when.) Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation Lakewood, CO USA P: 303-235-1403 F: 303-235-2075 The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- 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: IBM Software Secure Support via USA Citizens
Ed Gould wrote: I had a job interview about 20 years ago at a place in California that handled top secret (and above data) all the time. I asked how they contacted IBM for support and how they handled dumps problems etc...The answer I got back was that they didn't contact IBM and you were expected to figure out the issue. I was at that time of the interview pretty sure I was not interested in it so I asked but without source how can you expect to figure out where the problem was and even if you could how could you fix it without telling IBM how to fix it. The answer was surprising even to me. They said you don't. I shook my head and walked out and drove back to the airport and took the plane back and was so disgusted with myself for wasting my time on an interview that if I had been given an outline of all the restrictions that would be put on the job I would not have wasted my time. I have received dumps from top secret government organizations (both domestic and foreign) that have been programmatically redacted. The dumps were pre-formatted by the customer (the output of various IPCS commands against the original dump file). All names of things (userid, system, sysplex, NJE node, JES member, etc.) in the dump were replaced with the characters in both hex and EBCDIC portions of each line. Amazingly, I have been able to solve problems using such dumps! -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Thought that I understood IODF and IOCDS but ..
Thanks to Tom and Edward for their insight. Tom's final sentence confirmed the scenario for me. To make the HSA be in sync with the software on all MVS LPARs, you need to do a HW and SW activate on one LPAR and a SW only activate on the other LPARs. Thanks Jack Kelly 202-502-2390 (Office) -- 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: VSAM Query Product
It would be worth looking at the UltraQuest family of products - which let you query and build reports from mainframe VSAM, QSAM, DB2, IMS, IDMS, and Teradata, plus mid-tier Oracle and SQL Server -- and let you join data from all these data sources. http://www.selectbs.com/mainframe/Ultraquest/ultraquest-reporter http://www.selectbs.com/mainframe/Nomad/nomad Regards, Rich J - Original Message - From: John P Kalinich jkali...@csc.com Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@bama.ua.edu Sent: Thursday, June 25, 2009 11:40 AM Subject: VSAM Query Product Is there a software product available that can query VSAM files using a generalized query language? Regards, John K -- 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: IBM Software Secure Support via USA Citizens
In the days when paper dumps where still common, I remember getting a dump from a customer that looked liked a box of Swiss cheese. Before sending us the dump, they went through it page by page and would cut out sections that contained data they felt was sensitive. === Wayne Driscoll OMEGAMON DB2 L3 Support/Development wdrisco(AT)us.ibm.com === Edward Jaffe edja...@phoenixsoftware.com Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 06/26/2009 10:43 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu To IBM-MAIN@bama.ua.edu cc Subject Re: IBM Software Secure Support via USA Citizens Ed Gould wrote: I had a job interview about 20 years ago at a place in California that handled top secret (and above data) all the time. I asked how they contacted IBM for support and how they handled dumps problems etc...The answer I got back was that they didn't contact IBM and you were expected to figure out the issue. I was at that time of the interview pretty sure I was not interested in it so I asked but without source how can you expect to figure out where the problem was and even if you could how could you fix it without telling IBM how to fix it. The answer was surprising even to me. They said you don't. I shook my head and walked out and drove back to the airport and took the plane back and was so disgusted with myself for wasting my time on an interview that if I had been given an outline of all the restrictions that would be put on the job I would not have wasted my time. I have received dumps from top secret government organizations (both domestic and foreign) that have been programmatically redacted. The dumps were pre-formatted by the customer (the output of various IPCS commands against the original dump file). All names of things (userid, system, sysplex, NJE node, JES member, etc.) in the dump were replaced with the characters in both hex and EBCDIC portions of each line. Amazingly, I have been able to solve problems using such dumps! -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IF-Statement in JCL
I realize that this is still conditional code execution, but a very simple Rexx exec will work: SetCC: (I'll borrow your program name) interpret 'return' arg(1) JCL fragment: // SET TODAY=FRI //TEST EXEC PGM=IRXJCL,PARM='SETCC TODAY=FRI' //SYSEXEC DD DISP=SHR,DSN=pds.contains.setcc //* // IF (TEST.RC = 1) THEN //CODE EXEC PGM=IEFBR14 // ENDIF Actually, if you're willing to deal with the strangeness, you could use the following where the '@' is replaced by one byte of hex '00'. // SET TODAY=FRI //TEST EXEC PGM=IRXJCL,PARM='@ TODAY=FRI' //SYSEXEC DD * interpret 'return' arg(1) //* // IF (TEST.RC = 1) THEN //CODE EXEC PGM=IEFBR14 // ENDIF Of course, you'll get the -CAUTION- Data contains invalid (non-display) characters. Use command === FIND P'.' to position cursor to these message each time you edit the JCL :( We use a simple exit to change // SET TODAY=LWDAY into // SET TODAY=FRI On Thu, 25 Jun 2009 09:40:41 -0400, Barkow, Eileen ebar...@doitt.nyc.gov wrote: i wrote a program (aptly named SETCC) that accepts various parms passed in the parm field and passes them as condition codes, including an option to pass the date and time. The program accepts numbers to be passed as well as various keywords that it converts to numbers. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Thursday, June 25, 2009 9:36 AM To: IBM-MAIN@bama.ua.edu Subject: Re: IF-Statement in JCL On Thu, 25 Jun 2009 14:01:54 +0200, Michael Knigge wrote: Roland, Not with YES/NO but like this Note: IEFBR14 always set RC0 oh my god, that simple.. I always thought to myself, I could write a utility that just returns (so do a B R14) and set a RC that I've specified with a PARM JCL-Statement (EXEC PGM=FOO,PARM='1' or something like that) You can use IDCAMS to set RC to a desired value, but it must appear in SYSIN, not in PARM. And you can use JCL symbols in IF statements; something like: // SET YES=0 ... // IF ( IEFBR14.RC = YES ) ... -- gil -- 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: IF-Statement in JCL
i did not know that Rexx can convert a day to a number (at least I think that is what it is doing). is this returning the day of the week 1-7 or just setting 1 if it is friday. my program can also return the month of the year (1-12), day of year (1-365) time of day (0-2400) and day of week (1-7), but it is helpful to know that alot of these functions may be available in Rexx. Thanks for the info Robert. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Robert Birdsall Sent: Friday, June 26, 2009 12:29 PM To: IBM-MAIN@bama.ua.edu Subject: Re: IF-Statement in JCL I realize that this is still conditional code execution, but a very simple Rexx exec will work: SetCC: (I'll borrow your program name) interpret 'return' arg(1) JCL fragment: // SET TODAY=FRI //TEST EXEC PGM=IRXJCL,PARM='SETCC TODAY=FRI' //SYSEXEC DD DISP=SHR,DSN=pds.contains.setcc //* // IF (TEST.RC = 1) THEN //CODE EXEC PGM=IEFBR14 // ENDIF Actually, if you're willing to deal with the strangeness, you could use the following where the '@' is replaced by one byte of hex '00'. // SET TODAY=FRI //TEST EXEC PGM=IRXJCL,PARM='@ TODAY=FRI' //SYSEXEC DD * interpret 'return' arg(1) //* // IF (TEST.RC = 1) THEN //CODE EXEC PGM=IEFBR14 // ENDIF Of course, you'll get the -CAUTION- Data contains invalid (non-display) characters. Use command === FIND P'.' to position cursor to these message each time you edit the JCL :( We use a simple exit to change // SET TODAY=LWDAY into // SET TODAY=FRI On Thu, 25 Jun 2009 09:40:41 -0400, Barkow, Eileen ebar...@doitt.nyc.gov wrote: i wrote a program (aptly named SETCC) that accepts various parms passed in the parm field and passes them as condition codes, including an option to pass the date and time. The program accepts numbers to be passed as well as various keywords that it converts to numbers. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Thursday, June 25, 2009 9:36 AM To: IBM-MAIN@bama.ua.edu Subject: Re: IF-Statement in JCL On Thu, 25 Jun 2009 14:01:54 +0200, Michael Knigge wrote: Roland, Not with YES/NO but like this Note: IEFBR14 always set RC0 oh my god, that simple.. I always thought to myself, I could write a utility that just returns (so do a B R14) and set a RC that I've specified with a PARM JCL-Statement (EXEC PGM=FOO,PARM='1' or something like that) You can use IDCAMS to set RC to a desired value, but it must appear in SYSIN, not in PARM. And you can use JCL symbols in IF statements; something like: // SET YES=0 ... // IF ( IEFBR14.RC = YES ) ... -- gil -- 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 -- 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
Finding CICS on an MVS image
Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. As an example of what I'm talking about, to locate DB2 address spaces, a search of the SSCT chain is done to find an SSCT with a pointer to a DB2 ERLY block. Once that is found, the DB2 system name is known, and the address spaces that make up that instance of DB2 can be located. Is the technique for CICS similar? I would appreciate any help one can provide on this. Thanks in advance. --Dave Day -- 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: Finding CICS on an MVS image
Dave Day wrote: Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. If you have cross-memory access, there is a TCBAUX (IIRC, I don't have access to mapping right now) that I've never seen non-zero except in CICS. But if there is something available without going into address space data, I'd like to know about it. Gerhard Postpischil Bradford, VT -- 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: Finding CICS on an MVS image
The only way that I am aware of (and I had to write this exact function for the MXI G2 CICS plug-in) is to loop thru the TCBs in the suspect address space hunting for the AFCX control block which is pointed to by TCBCAUF. To do this you need to squirt an SRB into the suspect ASID and recover from any 0C4s (and other nasties) that you are going to get snooping around. It helps *hugely* if you have some site knowledge that narrows down the list of possibles by using one or more patterns in the Jobname and/or some of the WLM classes (service, report or workload). Also be aware that CICS control blocks sometimes wear their I LOVE JES2 t-shirts and enjoy shuffling fields around and changing offsets between releases - so any code you write in x-memory mode for CICS needs an offset table per release approach. Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Dave Day Sent: 26 June 2009 17:53 To: IBM-MAIN@bama.ua.edu Subject: Finding CICS on an MVS image Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. As an example of what I'm talking about, to locate DB2 address spaces, a search of the SSCT chain is done to find an SSCT with a pointer to a DB2 ERLY block. Once that is found, the DB2 system name is known, and the address spaces that make up that instance of DB2 can be located. Is the technique for CICS similar? I would appreciate any help one can provide on this. Thanks in advance. --Dave Day -- 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
UNABLE TO DOWNLOAD/SAVE IBM MANUAL - NO PDF
I am attempting to download the following manual: DFHSM V2R6.0 Messages ARC6MS02 01/31/95 10:42:49 SH35-0094-08 However, there is NO PDF associated with it. Is there a way around this? Could I try something else. Thanks. Access Yahoo!7 Mail on your mobile. Anytime. Anywhere. Show me how: http://au.mobile.yahoo.com/mail -- 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: Finding CICS
The only way that I am aware of (and I had to write this exact function for the MXI G2 CICS plug-in) is to loop thru the TCBs in the suspect address space hunting for the AFCX control block which is pointed to by TCBCAUF. To do this you need to squirt an SRB into the suspect ASID and recover from any 0C4s (and other nasties) that you are going to get snooping around. It helps *hugely* if you have some site knowledge that narrows down the list of possibles by using one or more patterns in the Jobname and/or some of the WLM classes (service, report or workload). Also be aware that CICS control blocks sometimes wear their I LOVE JES2 t-shirts and enjoy shuffling fields around and changing offsets between releases - so any code you write in x-memory mode for CICS needs an offset table per release approach. Rob, Thanks for that info. I don't think I want to run an SRB into every active address space, and I don't know how to narrow it down to just suspects. I was thinking it was probably some control block chain scan, such as I mentioned in the original post about DB2. I would think there has to be a way Again, thanks for the input. --Dave -- 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: IF-Statement in JCL
Actually, I wasn't using the Rexx to interpret the date in my example - it just checked the equality of two strings. JCL converted 'TODAY' into 'FRI' so the argument passed to rexx was 'FRI=FRI'. Rexx does have many functions, though, and they are all available this way. So... //TEST EXEC PGM=IRXJCL,PARM='SETCC Date(W)=Friday' will work without the // SET TODAY=FRI statement. Note the extra quotation marks are required to keep Rexx from converting Friday to FRIDAY (because the Date(W) function returns Friday, not FRIDAY). //TEST EXEC PGM=IRXJCL,PARM='SETCC Date(B)//7' will return 0-6 where 0=Monday and 6=Sunday. See http://publibz.boulder.ibm.com/cgi- bin/bookmgr_OS390/BOOKS/IKJ4C310/CCONTENTS?SHELF=IKJ4BK90DN=SA22- 7791-01DT=20010706113306 (watch the wrap) for all the available Rexx functions. On Fri, 26 Jun 2009 12:46:02 -0400, Barkow, Eileen ebar...@doitt.nyc.gov wrote: i did not know that Rexx can convert a day to a number (at least I think that is what it is doing). is this returning the day of the week 1-7 or just setting 1 if it is friday. my program can also return the month of the year (1-12), day of year (1-365) time of day (0-2400) and day of week (1-7), but it is helpful to know that alot of these functions may be available in Rexx. Thanks for the info Robert. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Robert Birdsall snip SetCC: (I'll borrow your program name) interpret 'return' arg(1) JCL fragment: // SET TODAY=FRI //TEST EXEC PGM=IRXJCL,PARM='SETCC TODAY=FRI' //SYSEXEC DD DISP=SHR,DSN=pds.contains.setcc //* // IF (TEST.RC = 1) THEN //CODE EXEC PGM=IEFBR14 // ENDIF /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
z Power (was Re: Another one bites the dust)
You can find them if you go to http://www-03.ibm.com/systems/z/hardware/ Select product details for each and download the data sheet. z9 BC 5.4 KW z10 BC 3.7-7.35 KW z9 EC 6.3-18.3 KW z10 EC 9.7-27.5 KW Interesting, the data for the z10BC shows four actual power ratings, not the scale as you note... 3.7, 4.3, 6.2, 7.35 KW and the footnote mentions the number of I/O drawers. Scanning the white paper link Energy Management and Performance Analysis on the IBM System z10 BC, it looks like there are actually 8 power levels which depend on the number of drawers and the temperature in the room being either above or below 82F. I thought it was more variable than that and went up and down with workload, even? Jeffrey Deaver, Engineer Systems Engineering jeffrey.dea...@securian.com 651-665-4231(v) IS - Creating competitive advantage with technology. Providing service that excels. OSS - Where Innovation Happens -- 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: Finding CICS on an MVS image
The SHOWZOS program does this. Look in the USERS section. David Elliot zSeries Software Support -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Dave Day Sent: Friday, June 26, 2009 11:53 AM To: IBM-MAIN@bama.ua.edu Subject: Finding CICS on an MVS image Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. As an example of what I'm talking about, to locate DB2 address spaces, a search of the SSCT chain is done to find an SSCT with a pointer to a DB2 ERLY block. Once that is found, the DB2 system name is known, and the address spaces that make up that instance of DB2 can be located. Is the technique for CICS similar? I would appreciate any help one can provide on this. Thanks in advance. --Dave Day -- 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: UNABLE TO DOWNLOAD/SAVE IBM MANUAL - NO PDF
Unfortunately, if the PDF icon is grey then you can only access it via Bookmgr. The file can be downloaded as a .boo and then you would need to have Softcopy Librarian from IBM to read it. Lizette I am attempting to download the following manual: DFHSM V2R6.0 Messages ARC6MS02 01/31/95 10:42:49 SH35-0094-08 However, there is NO PDF associated with it. Is there a way around this? Could I try something else. Thanks. -- 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: Microsoft claims mainframes anti-competitive
I wonder how the author can attribute the CCIA's actions to Microsoft (or call the CCIA a Microsoft funded organization) when the CCIA appears to have been as equally vigorous pursuing the antitrust claims against Microsoft. Most companies don't sue themselves or piss in their own mess kits. -Original Message- From: McKown, John Sent: Friday, June 26, 2009 6:06 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Microsoft claims mainframes anti-competitive -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Howard Brazee Sent: Friday, June 26, 2009 7:36 AM To: IBM-MAIN@bama.ua.edu Subject: Microsoft claims mainframes anti-competitive http://tech.slashdot.org/story/09/06/26/0652216/Microsoft-Back ed-Firm-Sa ys-IBM-Is-Anticompetitive WOW, that's the pot calling the kettle Farberware! (to avoid any offense in this PC era). The argument, as I read it is that the z is simply too efficient at the newest cloud computing. And that's putting a crimp in the Windows server market. And MS has a guaranteed right to be on top regardless of changes in the computing landscape. -- 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: Finding CICS on an MVS image
I think that you can do it like this: 1. CVT==CVTASVT==ASVTENTY (IHAASVT) 2. each ASVTENTY points to ASCB (IHAASCB 3. ASCB==ASXB (IHAASXB) 4. ASXB +4==ASXBFTCB (first tcb) 5. for each TCB, TCB (proper) +B4==JSCB (IEZJSCB) 6. JSCB+168==JSCBPGMN (job step program name will always be DFHSIP for CICS). -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Dave Day Sent: Friday, June 26, 2009 12:53 PM To: IBM-MAIN@bama.ua.edu Subject: Finding CICS on an MVS image Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. As an example of what I'm talking about, to locate DB2 address spaces, a search of the SSCT chain is done to find an SSCT with a pointer to a DB2 ERLY block. Once that is found, the DB2 system name is known, and the address spaces that make up that instance of DB2 can be located. Is the technique for CICS similar? I would appreciate any help one can provide on this. Thanks in advance. --Dave Day -- 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: Microsoft claims mainframes anti-competitive
I read more of the article. Another part of the anti-competitive stance is that only IBM does, or can, produce a 64-bit z series machine for customer use (FlexES 64-bit was only for developers?). One of the plaintiff was/is T3, who was with HP in the area of running IBM z/OS, and other z software, on an Itanium via some sort of emulator. They claim that this limits competition because IBM has again bundled the hardware and software, excluding other hardware vendors from making compatible hardware which can run IBM's z/OS and other 64-bit z series software, thus locking in their customers. I am aware that, unlike the S/360 S/370, some of the instructions on the z are patented and undocumented, but used in critical parts of the z series OS (z/OS, and z/VM at least). That is, you cannot use the published POO to create a work alike. I am not sure how this compares to Intel's x86 and AMD's implementation of x86. I guess it is the fact that Intel and AMD have cross license! s, whereas IBM does not have any sort of cross licenses for zArch. I'm not really sure where MS actually comes into this, at all. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Weird Formatting of posts
On Thu, 25 Jun 2009 16:07:33 -0500, Bill Godfrey yak36...@yahoo.com wrote: This problem was discussed, but not resolved, in a thread named width of postings July 18-19 2007. In that thread, in one of my posts, I suggested it might be a problem with the HTML built by the Listserv program... I still think the problem is in Listserv. ... Well, we have one of those weird ones in today's archive: Ed Gould's posting. (As usual, watch the wrap.) http://bama.ua.edu/cgi-bin/wa?A2=ind0906L=ibm- mainT=0O=DF=S=P=183214 With IBM-Main options medium text and monospaced font, and using IE6.0 with who-knows-what options I see the repeated words and, well, this is a lot weider than I thought. If I vary the width of my browser window so that the lines are reformated the problem goes away and will not reappear regardless of my display width. But if I exit and rebrowse the posting, the duplication is back. This evening I'll check using Firefox. Pat O'Keefe -- 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: anynet SNA over TCPIP
Just one small comment on one very small excerpt: On Fri, 26 Jun 2009 07:07:15 -0500, Chris Mason chrisma...@belgacom.net wrote: ... Pat, there's a hole in your education! ... Chris, This definitely not the first time you've discovered that! :-) Nor the first time I've displayed that on this list (and others). ... AnyNet SNA over IP constituted a Low Entry Networking (LEN) link just like any other LEN link, ... Actually, I didn't have any education (or training) on AnyNet. I just picked up some manuals and started cobbling together something that would allow a CICS to talk with a TCP62 application on some remote device. Perhaps if the that remote device had implemented an SSCP I would have seen beyond the APPL-APPL connection. Pat O'Keefe -- 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: INFOZIP 2Gb
On Friday 26 June 2009, Vikesh Bhoola wrote: Yes, I do have a batch JCL for the cmsmvs zip set up : //INFOZIP EXEC PGM=ZIP, // PARM='/-avl -1 -MV=dots DD:OUT ''INPUT.DATASET.NAME''' By the way, Vikesh, did you have to apply the patches against zip 3.1b that Lutz posted to the Info-ZIP forum to get the dots stuff to work? -- 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: Weird Formatting of posts
Patrick O'Keefe wrote: On Thu, 25 Jun 2009 16:07:33 -0500, Bill Godfrey yak36...@yahoo.com wrote: This problem was discussed, but not resolved, in a thread named width of postings July 18-19 2007. In that thread, in one of my posts, I suggested it might be a problem with the HTML built by the Listserv program... I still think the problem is in Listserv. ... Well, we have one of those weird ones in today's archive: Ed Gould's posting. (As usual, watch the wrap.) http://bama.ua.edu/cgi-bin/wa?A2=ind0906L=ibm- mainT=0O=DF=S=P=183214 With IBM-Main options medium text and monospaced font, and using IE6.0 with who-knows-what options I see the repeated words and, well, this is a lot weider than I thought. If I vary the width of my browser window so that the lines are reformated the problem goes away and will not reappear regardless of my display width. But if I exit and rebrowse the posting, the duplication is back. This evening I'll check using Firefox. Pat O'Keefe I think the posts that don't show this problem may have CRs often enough that the browser doesn't have to flow the text. When the text has to be flowed to new lines, the browser (IE6 ?) sometimes repeats part of the text. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
z/OS zip file processing - an idea
I've seen a lot of messages about InfoZIP and other z/OS compatible zip creation software. So, I just got to thinking (again). Java has a __lot__ of functionality in the base language (well in the included classes) to handle zip archives as well as code conversion. Using this, along with the ZFile classes in JZOS, it should be possible to address all of the concerns about functionality. The plus minus is the fact that it would be in Java. The plus is that, as a Java application, it would be zAAP eligible. The minus is that, as a Java application, if run on a CP, it would be a dog and increase the MSUs over well coded C (or HLASM). Does anybody think that this would be an interesting application? This could app could run in batch under JZOS or as a UNIX command. I don't know how to run it under TSO as a TSO command process or even if that would even be possible. John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IF-Statement in JCL
On Fri, 26 Jun 2009 11:28:52 -0500, Robert Birdsall wrote: JCL fragment: Actually, if you're willing to deal with the strangeness, you could use the following where the '@' is replaced by one byte of hex '00'. // SET TODAY=FRI //TEST EXEC PGM=IRXJCL,PARM='@ TODAY=FRI' //SYSEXEC DD * interpret 'return' arg(1) //* I was completely unaware of the '00'X trick. But it works! Where's it documented? Comments in the source code of Rexx? 12.2.1.1 z/OS V1R8.0 TSO/E REXX Reference ___ 12.2.1.1 Using IRXJCL to run a REXX exec in MVS batch To run an exec in MVS batch, specify IRXJCL as the program name (PGM= ) on the JCL EXEC statement. Specify the member name of the exec and one argument you want to pass to the exec in the PARM field on the EXEC statement. You can specify only the name of a member of a PDS. You cannot specify the name of a sequential data set. I suppose this could be externalized in an INCLUDE member with // SET NULL='@' Thanks, gil -- 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: UNABLE TO DOWNLOAD/SAVE IBM MANUAL - NO PDF
Lizette Koehler wrote: The file can be downloaded as a .boo and then you would need to have Softcopy Librarian from IBM to read it. ITYM Softcopy Reader, Library Reader, or Library Server. Softcopy Librarian is something entirely different: a facility for managing your softcopy repositories. -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Weird Formatting of posts
On Fri, 26 Jun 2009 14:12:12 -0500, Patrick O'Keefe wrote: Well, we have one of those weird ones in today's archive: Ed Gould's posting. (As usual, watch the wrap.) http://bama.ua.edu/cgi-bin/wa?A2=ind0906L=ibm-mainT=0amp;O=DF=S=P=183214 With IBM-Main options medium text and monospaced font, and using IE6.0 with who-knows-what options I see the repeated words and, well, this is a lot weider than I thought. If I vary the width of my browser window so that the lines are reformated the problem goes away and will not reappear regardless of my display width. But if I exit and rebrowse the posting, the duplication is back. Looking at the HTML, I find: pre { font-size: 14px; white-space: pre-wrap; /* css-3 */ white-space: -moz-pre-wrap !important; /* Mozilla, since 1999 */ white-space: -pre-wrap; /* Opera 4-6 */ white-space: -o-pre-wrap; /* Opera 7 */ word-wrap: break-word; /* Internet Explorer 5.5+ */ word-wrap:break-word; _white-space:pre; /* IE only hack to re-specify in addition to word-wrap */ } ... so the comments indicate that IE is treated specially; plausibly incorrectly. And very long lines are wrapped in pre.../pre markup. Ugh! Whatever happened to KISS? Whatever happened to browser- independence? Why is the HTML for Ed's modest post over 20KB long? And LISTSERV will likely corrupt my quoted HTML. -- gil -- 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
duplex using z/OS LPR
Does anyone have an suggestions on how to invoke duplex mode in TSO LPR? Actually I think a more general question would be is there a way to insert PCL codes in to an LPR datastream. For CICS printing we are able to do this as follows by sending a string that contains hex 35, followed by a 2 byte binary length value, followed by the (ASCII) PCL commands needed to do things such as switch to duplex, switch to Landscape, etc. The x'35' is the SNA Character String code to invoke transparent mode which then allows you to pass data that does not get converted from EBCDIC to ASCII. But I don't see any way to do that with LPR. The only thing I can think to do (and I have not yet tried it) is to invoke LPR in BINary mode and send the entire data stream as ASCII. I'd rather not do this if there is a better way. Thanks, Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation Lakewood, CO USA P: 303-235-1403 F: 303-235-2075 The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- 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: Finding CICS on an MVS image
(job step program name will always be DFHSIP for CICS). Not sure about that - I remember hearing that some sites have got front-end programs for CICS - maybe supplied by ISVs - am not sure. I do remember that the person you told me that I could not assume DFHSIP as the jobstep program knew a hell of a lot more about CICS that I did at the time (and still does). Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Barkow, Eileen Sent: 26 June 2009 19:38 To: IBM-MAIN@bama.ua.edu Subject: Re: Finding CICS on an MVS image I think that you can do it like this: 1. CVT==CVTASVT==ASVTENTY (IHAASVT) 2. each ASVTENTY points to ASCB (IHAASCB 3. ASCB==ASXB (IHAASXB) 4. ASXB +4==ASXBFTCB (first tcb) 5. for each TCB, TCB (proper) +B4==JSCB (IEZJSCB) 6. JSCB+168==JSCBPGMN (job step program name will always be DFHSIP for CICS). -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Dave Day Sent: Friday, June 26, 2009 12:53 PM To: IBM-MAIN@bama.ua.edu Subject: Finding CICS on an MVS image Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. As an example of what I'm talking about, to locate DB2 address spaces, a search of the SSCT chain is done to find an SSCT with a pointer to a DB2 ERLY block. Once that is found, the DB2 system name is known, and the address spaces that make up that instance of DB2 can be located. Is the technique for CICS similar? I would appreciate any help one can provide on this. Thanks in advance. --Dave Day -- 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: Finding CICS on an MVS image
The last time I looked, I think this code only works for MRO regions. Rob Scott Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Elliot, David Sent: 26 June 2009 19:32 To: IBM-MAIN@bama.ua.edu Subject: Re: Finding CICS on an MVS image The SHOWZOS program does this. Look in the USERS section. David Elliot zSeries Software Support -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Dave Day Sent: Friday, June 26, 2009 11:53 AM To: IBM-MAIN@bama.ua.edu Subject: Finding CICS on an MVS image Can someone tell me how to identify the CICS address spaces on an MVS image? By identifying, I mean programmatically. As an example of what I'm talking about, to locate DB2 address spaces, a search of the SSCT chain is done to find an SSCT with a pointer to a DB2 ERLY block. Once that is found, the DB2 system name is known, and the address spaces that make up that instance of DB2 can be located. Is the technique for CICS similar? I would appreciate any help one can provide on this. Thanks in advance. --Dave Day -- 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: Finding CICS
I got this from a CICS sysprog friend. DSECT Function DFHSABDS The CICS® subsystem anchor block (SAB). This is used to contain global subsystem-related information that is common to all CICS regions in the MVST image. It is used to record the options specified in the DFHSSInn member of SYS1.PARMLIB. It contains a pointer to a bit map that records which MVS address spaces contain an active CICS. It also contains the address of the subsystem control table extension (SCTE) used by IRC, and the address of the CEC status tracking information used by XRF. Now I just need to be able to find the macro library that contains the dsect for DFHSABDS on my system at Dallas, and I think I might have a start at getting this. None of the DFH* libraries that ended in MAC or MACLIB had it. --Dave -- 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: z/OS zip file processing - an idea
Not only possible, but already available! See the sample program com.ibm.jzos.sample.ZipDatasets in the JZOS Sample programs download, which is available here: http://www-03.ibm.com/servers/eserver/zseries/software/java/products/jzos/jzossamp.html Like most Java programs, you can run this from a shell or using the JZOS Batch launcher. You can also run java under TSO, using REXX/bpxwunix or BPXBATCH. I've clipped the comment header from the sample class below. Kirk Wolf Dovetailed Technologies http://dovetail.com /** * A sample Java main class that can be invoked to create a Zip archive from one * or more datasets or PDS members. Datasets are treated as text and converted * from EBCDIC to ASCII (ISO8859-1) or to the specified target codepage. * p/ * Details on the input arguments to this class are available by executing * the main method with no arguments. (see {...@link #usage()) * p/ * Example: Zip several partitioned datasets to a Unix zip file: pre com.ibm.jzos.sample.ZipDatasets test.zip sys1.proclib(asm*) hlq.**.jcl /pre * p/ * Example: Zip all datasets matching two patterns to a dataset: pre com.ibm.jzos.sample.ZipDatasets //hlq.backup.zip payroll.*.data gl.**.dat* /pre * p/ * Example: Zip data using DDs and input and output: pre com.ibm.jzos.sample.ZipDatasets //DD:ZIPOUT //DD:INSEQ1 //DD:INPDS1 //DD:INPDS2(FOO*) /pre * p/ * The following classes and APIs are demonstrated: * @see com.ibm.jzos.ZFile * @see com.ibm.jzos.ZUtil * @see com.ibm.jzos.CatalogSearch * @see java.util.zip.ZipOutputStream * @see java.util.regex.Pattern * @see java.util.regex.Matcher * @see ZipDatasetSource the class which creates Zip archive entries for each input dataset/pattern * @since 2.3.0 */ On Fri, Jun 26, 2009 at 3:21 PM, McKown, John jmck...@healthmarkets.com wrote: I've seen a lot of messages about InfoZIP and other z/OS compatible zip creation software. So, I just got to thinking (again). Java has a __lot__ of functionality in the base language (well in the included classes) to handle zip archives as well as code conversion. Using this, along with the ZFile classes in JZOS, it should be possible to address all of the concerns about functionality. The plus minus is the fact that it would be in Java. The plus is that, as a Java application, it would be zAAP eligible. The minus is that, as a Java application, if run on a CP, it would be a dog and increase the MSUs over well coded C (or HLASM). Does anybody think that this would be an interesting application? This could app could run in batch under JZOS or as a UNIX command. I don't know how to run it under TSO as a TSO command process or even if that would even be possible. John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * (817)-961-6183 cell john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- 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
The downside
Hello all, I have a question. Does anyone have a list, or white paper, or even scratch paper of what would be the downside of not upgrading from z/os 1.7 to the current release. Aside from being unsupported that is. Also you can purchase support for any release of z/os, right? Or am I wrong in thinking that? == This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to which they are addressed. If you have received this email in error please notify the system manager. This message contains confidential information and is intended only for the individual named. If you are not the named addressee you should not disseminate, distribute or copy this e-mail. Please notify the sender immediately by e-mail if you have received this e-mail by mistake and delete this e-mail from your system. If you are not the intended recipient you are notified that disclosing, copying, distributing or taking any action in reliance on the contents of this information is strictly prohibited. -- 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: The downside
On Fri, 26 Jun 2009 16:20:50 -0500, Ward, Mike S wrote: Hello all, I have a question. Does anyone have a list, or white paper, or even scratch paper of what would be the downside of not upgrading from z/os 1.7 to the current release. Aside from being unsupported that is. Also you can purchase support for any release of z/os, right? Or am I wrong in thinking that? Not any release, I don't think, at least not officially. IBM has announced special support beyond the normal, at a price, for certain releases. Note that this does not alter the migration and coexistence considerations. If you pay enough, you may be able to get support for other releases, but I would expect the cost to increase as the software gets older. One down side is that you won't be able to run new hardware. For example, you need at least z/OS 1.10 to support Extended Address Volumes. -- Tom Marchant -- 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: Microsoft claims mainframes anti-competitive
Howard Brazee wrote: http://tech.slashdot.org/story/09/06/26/0652216/Microsoft-Backed-Firm-Sa ys-IBM-Is-Anticompetitive Wonder what they'd do if they had some competition on their own size platform. File suit??? Strikes me as another example of (whine, whine, piss and moan) because you're in a different world and don't like it. Time to WAKE UP AND SMELL THE COFFEE!!! -- 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: question about searching datasets for ip addresses
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 06/25/2009 12:45:24 PM: //SEARCH EXEC PGM=ISRSUPC,PARM=(SRCHCMP,'ANYC') //NEWDD DD DSN=SOME.DATA.SET,DISP=SHR//OUTDD DD SYSOUT=*//SYSIN DD * SRCHFOR 'SOMETHING' /* -Rob -- 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: IF-Statement in JCL
Frank Swarbrick wrote: On 6/26/2009 at 4:01 AM, in message listserv%200906260501418449.0...@bama.ua.edu, Jan MOEYERSONS jan.moeyers...@adelior.be wrote: On Thu, 25 Jun 2009 11:55:54 -0500, Paul Gilmartin paulgboul...@aim.com wrote: On Thu, 25 Jun 2009 09:35:26 -0600, Frank Swarbrick wrote: // IF COMPILE=CICS //SYSLIB DD DISP=SHR,DSN=CICS.SDFHCOB // ENDIF But I don't much care. I keep my more complicated JCL as here-documents in shell scripts which can do all the conditionals and tailoring I need. And you would be amazed what ISPF file tailoring can do for you. Even in batch. Where is the best place to learn about the tricks of ISPF file tailoring? (I haven't checked the IBM manuals, but I generally find they deal only with the how and not the why and when.) Frank Ahem... http://www.trainersfriend.com/TSO_Clist_REXX_Dialog_Mgr/a810descrpt.htm Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques == Ask about being added to our opt-in list: == == * Early announcement of new courses == == * Early announcement of new techincal papers == == * Early announcement of new promotions == -- 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
OT completely..........
A great number of you kind ladies and gentlemen have shared private E-Mail addresses with me in the past. I would be highly appreciative (and VERY DISCRETE), if you could share that information again. Just drop me a line with Address as the subject line. Between a persistant virus and a hard drive failure, I've lost my entire address list and ask for your help in rebuilding it. I've also lost a lot of other things, but that's another story. :-( -- 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: HYPERPAV Definitions
On Tue, 23 Jun 2009 23:18:52 -0600, John Baxter wrote: This may be common knowledge for HDS customers, but you do need a Compatible PAV license on the subsystem in order to install your HyperPAV license. HyperPAV rocks, but watch your RMF queuing reports {or MXG or whatever) to ensure you're not experiencing delays from alias shortages. Yeah, I just got the quote. It rocks all right. Three layers of management passed out cold. That's a pretty neat trick... Anyway, considering other responses concerning page volumes, how do you exclude page volumes from PAVs ??? Thanks again !! -- 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: The downside
On Fri, 26 Jun 2009 16:40:00 -0500, Tom Marchant wrote: On Fri, 26 Jun 2009 16:20:50 -0500, Ward, Mike S wrote: Hello all, I have a question. Does anyone have a list, or white paper, or even scratch paper of what would be the downside of not upgrading from z/os 1.7 to the current release. Aside from being unsupported that is. Also you can purchase support for any release of z/os, right? Or am I wrong in thinking that? Not any release, I don't think, at least not officially. IBM has announced special support beyond the normal, at a price, for certain releases. Note that this does not alter the migration and coexistence considerations. If you pay enough, you may be able to get support for other releases, but I would expect the cost to increase as the software gets older. One down side is that you won't be able to run new hardware. For example, you need at least z/OS 1.10 to support Extended Address Volumes. Isn't there a future upgrade concern as well ??? I don't think you can upgrade from z/OS 1.7 to z/OS 1.10 or above and be supported by IBM. It might work, but more importantly, it might not... -- 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: The downside
On Fri, 26 Jun 2009, Dave Kopischke wrote: Isn't there a future upgrade concern as well ??? I don't think you can upgrade from z/OS 1.7 to z/OS 1.10 or above and be supported by IBM. It might work, but more importantly, it might not... There is no compatability maintence for z/OS 1.7 for anything (like catalogs) that is updated on z/OS 1.10. So if you try and want to fall back, then you might end up with malfunctions on z/OS 1.7. If you go forward with no intent to fall back, then you shouldn't have any problems with z/OS 1.10. -- Trying to write with a pencil that is dull is pointless. Maranatha! John McKown -- 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: The downside
Dave Kopischke wrote: Isn't there a future upgrade concern as well ??? I don't think you can upgrade from z/OS 1.7 to z/OS 1.10 or above and be supported by IBM. It might work, but more importantly, it might not... z/OS migration outside the 3-year window is a theme we will be discussing at SHARE over the next few conferences. In Denver, in addition to our excellent IBM presentations on supported migration paths, we will present: Session 2241 Successful Unsupported z/OS Upgrade Paths for Trailing Edge Shops - User Experience Thursday, August 27th @ 1:30 pm. Speaker: Tom Conley, Pinnacle Consulting Excellent location, excellent time, excellent speaker, excellent topic. Be there! 8-) -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 edja...@phoenixsoftware.com http://www.phoenixsoftware.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