Re: OS/390
The machine capacities vary. The Multiprise 2000 (2003-xxx) was available in several different capacities, ranging from roughly 3 to just shy of 170 MIPS. The Model 116 (2003-116) specifically is approximately 38 MIPS and exactly 6 MSUs (and Group 38). - - - - - 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: IBM COD
Timothy, thanks for this update. I don't understand how WLC increases for z/OS and IMS by one MSU and not for CICS. Maybe, you consider CICS is running on one other Lpar which an equal z/OS consumption? To resume, I think new OOCoD records for z10 are very attractive because you can fix your capacity as you want,when you want,etc.. with an autonomic view (why not!). Then you can manage well all IPLA products without surprise if your negotiated VUs allow it. But the customer must control very well the MLC process because a temporary added capacity of 250 MSUs just for one day could affect really WLC if this isn't controlled;and maybe with a bad surprise on the next SCRT... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 if COND code / IF THEN struct
It works! Thanks for your example... It seems to me that IF (STEP0001.PRCSTEP3.RC = 0) (STEP0002.PRCSTEP3.RC = 0) THEN before STEP0003 is simply the same as IF STEP0002.PRCSTEP3.RC = 0 THEN So in case I need to execute the PROC1 many times, say STEP EXEC PROC1, all I need to do is to use IF STEP-1.PRCSTEP3.RC = 0 THEN Paul -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 Mon, 29 Jun 2009 11:32:07 +0900, Timothy Sipples e99...@jp.ibm.com wrote: OS/390 V1 is licensed software, and it is licensed to a specific machine. If the original poster wants to move OS/390 to another machine, he must seek IBM's permission. Permission will likely be granted for IBM, Fujitsu-Amdahl, and Hitachi hardware, new or used. It will likely not be granted for Hercules. ... Timothy Sipples IBM Consulting Enterprise Software Architect Based in Tokyo, Serving IBM Japan / Asia-Pacific E-Mail: timothy.sipp...@us.ibm.com Thanks, Timothy. That's about the clearest statement I've seen so far from IBM. May we take this as official IBM policy? I guess your statement must be based upon some sort of official documents or other information that you have access to as an IBMer. If you could elaborate on the basis for your statement, that would be extremely helpful. Thanks, Roger Bowler http://www.openmainframe.org -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SHARK withdrawal(2105)
_IBM US Announcement Letter_ (http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?subtype=cainfotype=anappname=iSourcesupplier=897letternum=ENUS909-1 44opencm_mmc=5020-_-n-_-vrm_newsletter-_-10577_119944cmibm_em=dm:0:106848 70) So if you're planning upgrades or enhancements get your orders in pronto. **A Good Credit Score is 700 or Above. See yours in just 2 easy steps! (http://pr.atwola.com/promoclk/100126575x1222377075x1201454393/aol?redir=http://www.freecreditreport.com/pm/default.aspx?sc=668072hmpgID=62bcd= JunestepsfooterNO62) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
OA29560
Just wanted everyone to be aware. This is a open apar. We have 20 plus images running on 1.10 but last weekend when attempting to move 1 additonal we hit this problem. We had to back down to 1.9 after multiple attempts to IPL we still had a volume we were not able to access. All attempts to access data on a volume abended with s013-e0. The SVC dump will indicate module IGBDIS01 receiving a s0c4 abend. The apar does not document yet any work around. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Overriding PARM from the START JOB command
the program we use reads a job stream from a pds and substitutes parameters before submitting the job to the internal reader. It is executed via a proc named 'JOB' - something like S JOB,J=PDSMEMB,P='PRM1=ABC, PRM2=123' where the jobstream in PDSMEMB would contain the statement //*% PRM1=DEFAULT PRM2=DEFAULT (which would set the default values for PRM1 and PRM2). subsequent jcl statements containing the words %PRM1 %PRM2 anywhere in the job stream would get the values of PRM1/PRM2 substituted with ABC/123 or whatever was passed to JOB in the P parm. multiple parms can be passed. this is the JOB proc. I am trying to find a copy of the source code which a former colleague here wrote along time ago, although I think that it might have been based on some IBM supplied code at the time. //JOB PROC J=PDSMEMB, // LIB='PDSMEMB.JOBLIB', // P=NONE, // PLIB='PDSMEMB.JOBLIB', // PL=NOPL, // INTRDR=INTRDR //ZHINTRDR EXEC PGM=ZHINTRDR, // PARM='P' //PROGRAM DD DDNAME=IEFRDER //IEFRDER DD DSN=PLIB(PL),DISP=SHR // DD DSN=LIB(J),DISP=SHR //INTRDR DD SYSOUT=(A,INTRDR) -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Paul Gilmartin Sent: Monday, June 29, 2009 6:51 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Overriding PARM from the START JOB command On Mon, 29 Jun 2009 21:26:51 +, Ted MacNEIL wrote: the program reads the job stream and substitutes parms flagged by % signs with user supplied values. At the risk of being obtuse, why roll your own, when the JES2/3 interpreters can already do this with ''? Does JOB (the program), perhaps, perform the substitution in instream data sets, label fields, etc.? This would be great added value over the JES2/3 interpreters (ITYM reader/converters -- isn't the substitution done before interpreter?) Did anyone supply the original member name of IBM's sample? I'll reread the thread. -- 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
spam
Anyone else get spam from ittrader ?. Just wondering if my address was harvested from here. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OA29560
Can you provide a little more information about the components and symptoms? snip Just wanted everyone to be aware. This is a open apar. We have 20 plus images running on 1.10 but last weekend when attempting to move 1 additonal we hit this problem. We had to back down to 1.9 after multiple attempts to IPL we still had a volume we were not able to access. All attempts to access data on a volume abended with s013-e0. The SVC dump will indicate module IGBDIS01 receiving a s0c4 abend. The apar does not document yet any work around. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OS/390
On Tue, 2009-06-30 at 06:07 -0500, Roger Bowler wrote: Thanks, Timothy. That's about the clearest statement I've seen so far from IBM. May we take this as official IBM policy? I guess your statement must be based upon some sort of official documents or other information that you have access to as an IBMer. If you could elaborate on the basis for your statement, that would be extremely helpful. (Still) can't resist tugging the tigers tail Roger ?. Phil would be proud ... ;0) Interesting site in your sig - hadn't been there before. Interesting mix of links. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Control HSM Pri/SEC migration from batch job
We just use our scheduler to rung batch jobs that issue the hold/release commands and to set max tape task depending on the other batch job schedule/needs. Initial time settings are set in a very wide range. Mike Wickman -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of John Mattson Sent: Monday, June 29, 2009 3:56 PM To: IBM-MAIN@bama.ua.edu Subject: [IBM-MAIN] Control HSM Pri/SEC migration from batch job Does anyone have a REXX or other BATCH utility one can use to set DFHSM primary and secondary migration times to eg: Now Plus 2 Minutes. I am trying to schedule HSM migrations based on my scheduler rather than fixed times in the HSM SETSYS. Basically the fixed times in ARCCMD00 may not correspond to my schedule when there are processing problems etc etc etc. My basic idea it to execute a batch REXX which creates HSM commands like HSEND SETSYS PRIMARYSPMGMTSTART(1148 1155) where the start time is current system clock plus sum minutes. Someone must have done this before. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html font size=1 div style='border:none;border-bottom:double windowtext 2.25pt;padding:0in 0in 1.0pt 0in' /div This email is intended to be reviewed by only the intended recipient and may contain information that is privileged and/or confidential. If you are not the intended recipient, you are hereby notified that any review, use, dissemination, disclosure or copying of this email and its attachments, if any, is strictly prohibited. If you have received this email in error, please immediately notify the sender by return email and delete this email from your system. /font -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OA29560
See https://www-304.ibm.com/ibmlink/sis/viewAparDoc.wss?context=aparAndUsage documentIds=OA29560searchWords=OA29560libraryType=Dlc=encc=US Dennis Roach GHG Corporation Lockheed Martin Mission Services Facilities Design and Operations Contract NASA/JSC Address: 2100 Space Park Drive LM-15-4BH Houston, Texas 77058 Mail: P.O. Box 58487 Mail Code H4C Houston, Texas 77258 Phone: Voice: (281)336-5027 Cell: (713)591-1059 Fax:(281)336-5410 E-Mail: dennis.ro...@lmco.com All opinions expressed by me are mine and may not agree with my employer or any person, company, or thing, living or dead, on or near this or any other planet, moon, asteroid, or other spatial object, natural or manufactured, since the beginning of time. -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Staller, Allan Sent: Tuesday, June 30, 2009 8:23 AM To: IBM-MAIN@bama.ua.edu Subject: Re: OA29560 Can you provide a little more information about the components and symptoms? snip Just wanted everyone to be aware. This is a open apar. We have 20 plus images running on 1.10 but last weekend when attempting to move 1 additonal we hit this problem. We had to back down to 1.9 after multiple attempts to IPL we still had a volume we were not able to access. All attempts to access data on a volume abended with s013-e0. The SVC dump will indicate module IGBDIS01 receiving a s0c4 abend. The apar does not document yet any work around. /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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Running TSO TMP as a started task.
I have a REXX exec that writes tapes (using TSO ALLOCATE) that I want to run as a started task. The STC has an ACID associated with it (Top Secret obviously), and the ACID has an entry in UADS to get MOUNT authority. No matter what I do, I still get the message: IKJ56644I NO VALID TSO USERID, DEFAULT USER ATTRIBUTES USED. Is it even possible to run the TSO TMP as a started task and have it pick up a valid Userid? Oh, and yes, there is a DD statement to SYS1.UADS in the JCL. Neal -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: spam
Shane wrote: Anyone else get spam from ittrader ?. Just wondering if my address was harvested from here. Shane ... I got one, but I'm on several lists, so it's hard to tell where it came from. Anyway, 'Delete' works fast. 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
Re: OA29560
Al, This is PAV code and it causes access to the volume to abend. The APAR has the basics documented but IBM is still researching the cause. We have an open ETR and have asked IBM if a PE PTF is causing the issue and if a work around is available if this occurs? I will let you know what we get from IBM. I would assume this will go HYPER if not Red Alert status when IBM diagnoses the issue. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: spam
Shane, been getting this c r a p for a couple of weeks now. They generally used to harvest Hotmail addresses. So they've now advanced to more sophisticated ways. As Steve The Trainer said, Delete works well. Personally, I find if I intersperse some Welsh into it, it works even better! Aled -Original Message- From: Shane ibm-m...@tpg.com.au To: IBM-MAIN@bama.ua.edu Sent: Tue, Jun 30, 2009 2:20 pm Subject: spam Anyone else get spam from ittrader ?. Just wondering if my address was harvested from here. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
I have something like this: # pwd /Service # du . 16 ./RESZS1/etc 16 ./RESZS1/jv390 160 ./RESZS1/root 16 ./RESZS1/var 224 ./RESZS1 240 . # The dddefs are all set up with cloned paths just like on our production system, about 160 paths to omvs files under /Service/sysr1. So now if I IPL onto the new target res pack and all the files get mounted under /Service, the apply (check) should find everything? Should I set up the bpxprm__ to mount all these /Service mountpoints at IPL or would it be better to mount them with the mount command? Ken Klein Sr. Systems Programmer Kentucky Farm Bureau Insurance - Louisville kenneth.kl...@kyfb.com 502-495-5000 x7011 -Original Message- From: Lizette Koehler [mailto:stars...@mindspring.com] Sent: Friday, June 26, 2009 10:54 AM To: Klein, Kenneth Subject: Re: z/os omvs maintenance service and hfs/zfs Since this is long, I thought I would take it off list. When I installed z/OS V1.9 I kept everything in the SERVERPAC (Tlibs, Dlibs, etc) as is. Then I copied the OMVS and TLIBS to SYSRES Volumes to IPL. That way I could always use the base SMP/E environment I setup for the initial install of the operating system There is a phiolosphy in the Manuals that you create new SYSRES and OMVS envrionment, and point the new OMVS environment to the /SERVICE directory. This way you can apply your maint to the new targets and not affect your production stuff. Since zFS files MUST be cataloged, you probably want to use something like OMVS.LPARname.ROOT.SYRESvol to keep them unique (OMVS.LPAR1.ROOT.SRES1A) The path you take will be however you want to maintain your systems. I prefer to keep everything in SMP/E as shipped (I use ZOS19T for tlibs and ZOS19D for dlibs and ZOS19 for all other datasets). Then I just use FDR to pick up the ZOS19T and place them on the new SYSRES home and change ZOS19T to SYS1. Then do any other customization needed for the IPL (like the SAD program) If you have questions feel free to write. Lizette -Original Message- From: Klein, Kenneth kenneth.kl...@kyfb.com Sent: Jun 26, 2009 10: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 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
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 /* I was out of the office for a couple of days, so I'm a little late, but here's my 2 cents: The above USERMOD should indeed work, except you can scrap the JCLIN since it has no affect and is ignored by SMP/E. That is, all TYPE=DATA copy steps are ignored. Kurt Quackenbush -- IBM, SMP/E Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: ICSF Question
Salah, There is no archive function in ICSF. The keys stored in the CKDS (and PKDS) as well, are stored based upon the name you've given the key. If you've created your key with let's say the name FRED, and you replace that key, the old key is gone - forever. If you need to save multiple values, then you will need to give each key a unique name. Hayim _ Hayim Sokolsky, CISSP Mainframe Security Architect DTCC Corporate Information Security 18301 Bermuda Green Dr, MS 1-CIS Tampa FL 33647-1760 Tel. (813) 470-2177 Salah Balboul salah...@hotmail.com Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu 2009.06.29 20:14 Please respond to IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu To IBM-MAIN@bama.ua.edu cc Subject ICSF Question Hello List, This is a question related to ICSF Key generation/update process: what I'm trying to do is Generate a new key using the CSNBKGN call and then update the Today-instant-issue-key, using the CSNBKRW, call with the newly generated key. My question is – what does ICSF do with old keys? Are they archived on the CKDS somehow? Some of the error messages seems to give that impression (see reason codes x’2710’, x’2711’ for a return code of 0; see reason code x’2714’ for a return code of 8). Being that we will be updating that key every business day, that will mean 260 key updates a year for this one key alone. That’s a lot of records on the CKDS to archive if this occurs. I’m not sure what the repercussions are for this, if anything at all. 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 DTCC DISCLAIMER: This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error, please notify us immediately and delete the email and any attachments from your system. The recipient should check this email and any attachments for the presence of viruses. The company accepts no liability for any damage caused by any virus transmitted by this email.
Re: Running TSO TMP as a started task.
On Tue, 30 Jun 2009 09:41:59 -0400, Neal Eckhardt neckha...@penntraffic.com wrote: I have a REXX exec that writes tapes (using TSO ALLOCATE) that I want to run as a started task. The STC has an ACID associated with it (Top Secret obviously), and the ACID has an entry in UADS to get MOUNT authority. No matter what I do, I still get the message: IKJ56644I NO VALID TSO USERID, DEFAULT USER ATTRIBUTES USED. Is it even possible to run the TSO TMP as a started task and have it pick up a valid Userid? Oh, and yes, there is a DD statement to SYS1.UADS in the JCL. If you were on a system using RACF, that message would indicate that either: (a) the STC was not running with an identity at all; or (b) the STC had an identity, but it did not have a TSO segment and did not have entry in UADS (and SYS1.UADS would not be needed in its JCL, by the way). -- Walt Farrell, CISSP IBM STSM, z/OS Security Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
IPCS and multiple CICS address spaces
I feel kind of foolish having to ask this, but how can I get IPCS to run the following commands and generate trace data from whichever of the regions are present in the multi-address dump? I'm running in batch mode because the SDSF screens are not tailored with the CICS environment settings. If I've got the command syntax wrong, please accept my appologies for not being able to see it. //IPCSDUMP.SYSTSIN DD * IPCS NOPARM DROPDUMP DD(DFHSDUMP) SETDEF DD(DFHSDUMP) + NOPROBLEM NOCONFIRM NOTERMINAL PRINT LIST VERBEXIT CICS650 'JOB=myaor100,DEF=1,TR=3' VERBEXIT CICS650 'JOB=myaor200,DEF=1,TR=3' VERBEXIT CICS650 'JOB=myaor300,DEF=1,TR=3' VERBEXIT CICS650 'JOB=myaor400,DEF=1,TR=3' VERBEXIT CICS650 'JOB=mytor100,DEF=1,TR=3' VERBEXIT CICS650 'JOB=mytor200,DEF=1,TR=3' END /* The rest of the JCL comes from the CICS Operations and Utilities Guide (release 3.2). The output shows only the triggering region worth of data, and for the others show: * * * * * CICS 6.5.0 - IPCS EXIT * * * * * CICS650 OPERANDS: JOB=mytor200,DEF=1,TR=3 === SUMMARY OF ACTIVE ADDRESS SPACES ASID(hex): JOBNAME: 01ED myaor300 -- DFHPD0115 CICS job not found during ASCB scan. ** DFHPD0120 CICS IPCS exit is terminating. The ultra-dumb part of this is that it is making me doubt whether the SLIP trap caught the data when the production problem triggered. That region I get the task analysis and internal trace every time. Is there a simple inventory command that says what parts of which address spaces are in a system level dump dataset? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: IPCS and multiple CICS address spaces
Don It looks like you have an MRO Configuration. So When the dumpas taken were all the CICS Regions dumped together as a unit (at the same time) ? Click to learn about options trading and get the latest information. http://thirdpartyoffers.juno.com/TGL2141/fc/BLSrjpTIzQZRJiHxzCd1F6iv4fdTTWrMxECY4XJE7JoGot7lwh6Is4jX6r2/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: spam
Shane wrote: Anyone else get spam from ittrader ?. Just wondering if my address was harvested from here. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html I got it too. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: spam
I didn't get it. MA On Tue, Jun 30, 2009 at 12:33 PM, Rick Fochtman rfocht...@ync.net wrote: Shane wrote: Anyone else get spam from ittrader ?. Just wondering if my address was harvested from here. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html I got it too. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: z/os omvs maintenance service and hfs/zfs
What still confuses me about the way these jobs were set up to apply maintenance to z/os is that the bpxprm__ uses the sysr1 symbol as the second level qualifier of the omvs.root/etc/var/java*/sigyroot/scsdroot files so if I clone to reszs3 I still have to apply my maintenance from say reszs1 to apply it to the reszs3 omvs datasets. But then the smp apply job running on reszs1 would have to set boundary to the target zone of reszs3. I thought I would be running the apply on the system I was upgrading. How can you apply maintenance to omvs _and_ z/os from a different lpar?? Ken Klein Sr. Systems Programmer Kentucky Farm Bureau Insurance - Louisville kenneth.kl...@kyfb.com 502-495-5000 x7011 -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Klein, Kenneth Sent: Tuesday, June 30, 2009 10:17 AM To: IBM-MAIN@bama.ua.edu Subject: Re: z/os omvs maintenance service and hfs/zfs I have something like this: # pwd /Service # du . 16 ./RESZS1/etc 16 ./RESZS1/jv390 160 ./RESZS1/root 16 ./RESZS1/var 224 ./RESZS1 240 . # The dddefs are all set up with cloned paths just like on our production system, about 160 paths to omvs files under /Service/sysr1. So now if I IPL onto the new target res pack and all the files get mounted under /Service, the apply (check) should find everything? Should I set up the bpxprm__ to mount all these /Service mountpoints at IPL or would it be better to mount them with the mount command? Ken Klein Sr. Systems Programmer Kentucky Farm Bureau Insurance - Louisville kenneth.kl...@kyfb.com 502-495-5000 x7011 -Original Message- From: Lizette Koehler [mailto:stars...@mindspring.com] Sent: Friday, June 26, 2009 10:54 AM To: Klein, Kenneth Subject: Re: z/os omvs maintenance service and hfs/zfs Since this is long, I thought I would take it off list. When I installed z/OS V1.9 I kept everything in the SERVERPAC (Tlibs, Dlibs, etc) as is. Then I copied the OMVS and TLIBS to SYSRES Volumes to IPL. That way I could always use the base SMP/E environment I setup for the initial install of the operating system There is a phiolosphy in the Manuals that you create new SYSRES and OMVS envrionment, and point the new OMVS environment to the /SERVICE directory. This way you can apply your maint to the new targets and not affect your production stuff. Since zFS files MUST be cataloged, you probably want to use something like OMVS.LPARname.ROOT.SYRESvol to keep them unique (OMVS.LPAR1.ROOT.SRES1A) The path you take will be however you want to maintain your systems. I prefer to keep everything in SMP/E as shipped (I use ZOS19T for tlibs and ZOS19D for dlibs and ZOS19 for all other datasets). Then I just use FDR to pick up the ZOS19T and place them on the new SYSRES home and change ZOS19T to SYS1. Then do any other customization needed for the IPL (like the SAD program) If you have questions feel free to write. Lizette -Original Message- From: Klein, Kenneth kenneth.kl...@kyfb.com Sent: Jun 26, 2009 10: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 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
RES: z/os omvs maintenance service and hfs/zfs
Hi,
You can change it in SMPE :
SET BDY(YourTarget) .
ZEDIT DDDEF .
CHANGE PATH('/RESZS1/'*,
'/RESZS3'*) .
ENDZEDIT .
Atenciosamente / Regards / Saludos
Ituriel do Nascimento Neto
Banco Bradesco S/A
4254 - DPCD Engenharia de Software
Sistemas Operacionais Mainframes
Tel: 55 11 4197-2021 R: 22021 Fax: 55 11 4197-2814
|-Mensagem original-
|De: IBM Mainframe Discussion List
|[mailto:ibm-m...@bama.ua.edu] Em nome de Klein, Kenneth
|Enviada em: terça-feira, 30 de junho de 2009 13:55
|Para: IBM-MAIN@bama.ua.edu
|Assunto: Re: z/os omvs maintenance service and hfs/zfs
|
|What still confuses me about the way these jobs were set up to
|apply maintenance to z/os is that the bpxprm__ uses the sysr1
|symbol as the second level qualifier of the
|omvs.root/etc/var/java*/sigyroot/scsdroot
|files so if I clone to reszs3 I still have to apply my
|maintenance from say reszs1 to apply it to the reszs3 omvs
|datasets. But then the smp apply job running on reszs1 would
|have to set boundary to the target zone of reszs3. I thought I
|would be running the apply on the system I was upgrading. How
|can you apply maintenance to omvs _and_ z/os from a different lpar??
|
|
|Ken Klein
|Sr. Systems Programmer
|Kentucky Farm Bureau Insurance - Louisville
|kenneth.kl...@kyfb.com 502-495-5000 x7011
|
|-Original Message-
|From: IBM Mainframe Discussion List
|[mailto:ibm-m...@bama.ua.edu] On Behalf Of Klein, Kenneth
|Sent: Tuesday, June 30, 2009 10:17 AM
|To: IBM-MAIN@bama.ua.edu
|Subject: Re: z/os omvs maintenance service and hfs/zfs
|
|I have something like this:
|
|# pwd
|/Service
|# du .
|16 ./RESZS1/etc
|16 ./RESZS1/jv390
| 160 ./RESZS1/root
|16 ./RESZS1/var
| 224 ./RESZS1
| 240 .
|#
|
|The dddefs are all set up with cloned paths just like on our production
|system, about 160 paths to omvs files under /Service/sysr1.
|
|So now if I IPL onto the new target res pack and all the files
|get mounted under /Service, the apply (check) should find
|everything? Should I set up the bpxprm__ to mount all these
|/Service mountpoints at IPL or would it be better to mount
|them with the mount command?
|
|Ken Klein
|Sr. Systems Programmer
|Kentucky Farm Bureau Insurance - Louisville
|kenneth.kl...@kyfb.com 502-495-5000 x7011
|
|-Original Message-
|From: Lizette Koehler [mailto:stars...@mindspring.com]
|Sent: Friday, June 26, 2009 10:54 AM
|To: Klein, Kenneth
|Subject: Re: z/os omvs maintenance service and hfs/zfs
|
|Since this is long, I thought I would take it off list.
|
|When I installed z/OS V1.9 I kept everything in the SERVERPAC
|(Tlibs, Dlibs, etc) as is. Then I copied the OMVS and TLIBS
|to SYSRES Volumes to IPL.
|
|That way I could always use the base SMP/E environment I setup
|for the initial install of the operating system
|
|There is a phiolosphy in the Manuals that you create new
|SYSRES and OMVS envrionment, and point the new OMVS
|environment to the /SERVICE directory. This way you can apply
|your maint to the new targets and not affect your production
|stuff. Since zFS files MUST be cataloged, you
|probably want to use something like OMVS.LPARname.ROOT.SYRESvol to
|keep them unique (OMVS.LPAR1.ROOT.SRES1A)
|
|
|The path you take will be however you want to maintain your systems.
|
|I prefer to keep everything in SMP/E as shipped (I use ZOS19T
|for tlibs and ZOS19D for dlibs and ZOS19 for all other
|datasets). Then I just use FDR to pick up the ZOS19T and
|place them on the new SYSRES home and change ZOS19T to SYS1.
|Then do any other customization needed for the IPL (like the
|SAD program)
|
|If you have questions feel free to write.
|
|Lizette
|
|
|-Original Message-
|From: Klein, Kenneth kenneth.kl...@kyfb.com
|Sent: Jun 26, 2009 10: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
|Sr. Systems Programmer
|Kentucky Farm Bureau Insurance - Louisville
|
|--
|For IBM-MAIN subscribe / signoff / archive access instructions, send
|email to
BPXWDYN and the Internal Reader (INTRDR)
Hi Folks,
I am in need of some direction from this august body.
As a bit of fun I am trying to mimic the TSO SUBMIT command available in
REXX, by using BPXWDYN in a COBOL program to dynamically allocate an FTINCL
output file and write it to the internal reader.
The first BPXWDYN to allocate the FTINCL disk data set works a treat, i.e.
RC = .
The second BPXWDYN which attempts to allocate the output to the internal
reader fails with either rc=0025 or 002M (i.e. -24).
I will admit to not having experimented with the OUTDES component yet, but
am wondering whether this is actually possible given the BPXWDYN does not
have the full capability of TSO ALLOC, at least that is implied in the
manual.
The COBOL Working Storage elements are:
01 ALLOC-FT-JOB.
03 FILLER PIC X(30) VALUE
'ALLOC FI(JOBIN) SHR MSG(2) DA('.
03 FT-JOB-DSN PIC X(45) VALUE SPACES.
01 ALLOC-JES-JOB.
03 FILLER PIC X(38) VALUE
'ALLOC FI(JOBOUT) WRITER(INTRDR) MSG(2)'.
Kind regards - Terry
Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore, Sheffield, S17 3LA, UK
Tel: +44 (0)114 262 0933
WEB: www.legac-e.co.uk
Company Reg: 3767263 at the above address
All outgoing E-mail is scanned, but it remains the recipient's
responsibility to ensure their system is protected from spy-ware, trojans,
viruses, and worms.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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 assume you mean Phil Payne. Does anyone know what happened to him? I assume from some of his last posts that he was getting out of mainframes. I always enjoyed Phil's wit and aserbic comments. Eric Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Shane ibm-m...@tpg.com.au (Still) can't resist tugging the tigers tail Roger ?. Phil would be proud ... ;0) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Phil Payne (was OS/390)
Hi Eric, I see Phil regularly. He no longer operates in the mainframe arena. I believe it was something to do with money or more precisely the lack of it. He still fixes Audi's which keeps him reasonably busy, but on the IT front he specialises in optimizing WEB sites, and is one of a small band of Google accredited technicians in that field. Kind regards - Terry Terry Sambrooks Director KMS-IT Limited 228 Abbeydale Road South Dore, Sheffield, S17 3LA, UK Tel: +44 (0)114 262 0933 WEB: www.legac-e.co.uk Company Reg: 3767263 at the above address All outgoing E-mail is scanned, but it remains the recipient's responsibility to ensure their system is protected from spy-ware, trojans, viruses, and worms. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: BPXWDYN and the Internal Reader (INTRDR)
Would a SYSOUT status keyword do the job?
ALLOC FI(JOBOUT) SYSOUT(x) WRITER(INTRDR) MSG(2
Just a guess.
David Elliot
zSeries Software Support
-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
Behalf Of Terry Sambrooks
Sent: Tuesday, June 30, 2009 1:19 PM
To: IBM-MAIN@bama.ua.edu
Subject: BPXWDYN and the Internal Reader (INTRDR)
Hi Folks,
I am in need of some direction from this august body.
As a bit of fun I am trying to mimic the TSO SUBMIT command available in
REXX, by using BPXWDYN in a COBOL program to dynamically allocate an
FTINCL
output file and write it to the internal reader.
The first BPXWDYN to allocate the FTINCL disk data set works a treat,
i.e.
RC = .
The second BPXWDYN which attempts to allocate the output to the internal
reader fails with either rc=0025 or 002M (i.e. -24).
I will admit to not having experimented with the OUTDES component yet,
but
am wondering whether this is actually possible given the BPXWDYN does
not
have the full capability of TSO ALLOC, at least that is implied in the
manual.
The COBOL Working Storage elements are:
01 ALLOC-FT-JOB.
03 FILLER PIC X(30) VALUE
'ALLOC FI(JOBIN) SHR MSG(2) DA('.
03 FT-JOB-DSN PIC X(45) VALUE SPACES.
01 ALLOC-JES-JOB.
03 FILLER PIC X(38) VALUE
'ALLOC FI(JOBOUT) WRITER(INTRDR) MSG(2)'.
Kind regards - Terry
Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore, Sheffield, S17 3LA, UK
Tel: +44 (0)114 262 0933
WEB: www.legac-e.co.uk
Company Reg: 3767263 at the above address
All outgoing E-mail is scanned, but it remains the recipient's
responsibility to ensure their system is protected from spy-ware,
trojans,
viruses, and worms.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email 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: BPXWDYN and the Internal Reader (INTRDR)
On Tue, 30 Jun 2009 13:42:23 -0500, Elliot, David wrote: Would a SYSOUT status keyword do the job? ALLOC FI(JOBOUT) SYSOUT(x) WRITER(INTRDR) MSG(2 Indeed. Absent SYSOUT, I get: u...@mvs:134$ rexx say bpxwdyn( 'ALLOC FI(JOBOUT) WRITER(INTRDR) MSG(WTP) reuse' ) 12.54.00 STC07716 IKJ56877I FILE JOBOUT NOT ALLOCATED, MUTUALLY INCLUSIVE PARAMETER MISSING 58982425 u...@mvs:135$ Suggestion: Depending on context, msg(2) works less or more well. I find msg(WTP) to be more portable. BTW, nowadays JCL needn't be fixed-80. I find it very liberating to be able to use longer lines in SYSIN, readily done if you allocate your own INTRDR. -- 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: BPXWDYN and the Internal Reader (INTRDR)
Terry Sambrooks wrote:
Hi Folks,
I am in need of some direction from this august body.
As a bit of fun I am trying to mimic the TSO SUBMIT command available in
REXX, by using BPXWDYN in a COBOL program to dynamically allocate an FTINCL
output file and write it to the internal reader.
Do you mean an FTINCL _input_ file?
The first BPXWDYN to allocate the FTINCL disk data set works a treat, i.e.
RC = .
The second BPXWDYN which attempts to allocate the output to the internal
reader fails with either rc=0025 or 002M (i.e. -24).
I will admit to not having experimented with the OUTDES component yet, but
am wondering whether this is actually possible given the BPXWDYN does not
have the full capability of TSO ALLOC, at least that is implied in the
manual.
The COBOL Working Storage elements are:
01 ALLOC-FT-JOB.
03 FILLER PIC X(30) VALUE
'ALLOC FI(JOBIN) SHR MSG(2) DA('.
03 FT-JOB-DSN PIC X(45) VALUE SPACES.
01 ALLOC-JES-JOB.
03 FILLER PIC X(38) VALUE
'ALLOC FI(JOBOUT) WRITER(INTRDR) MSG(2)'.
Kind regards - Terry
Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore, Sheffield, S17 3LA, UK
You haven't shown your procedure division call of BPXWDYN.
In our new 2-day course Writing z/OS CGIs in COBOL, we
tackle the problem of having a user request a job and a
parm string, then we allocate the input JCL and an output
file to intrdr, copy the input file to the output, substituting
the parm string at the appropriate time (among other interesting
tasks)
http://www.trainersfriend.com/UNIX_and_Web_courses/uc04descr.htm
It looks to me like you haven't allowed for the fact the input
to a call to BPXWDYN from a COBOL program uses a half-word
prefixed string. Here are some excerpts from the submit-a-job
lab solution from the course:
.
.
.
File-control.
Select jobin assign to jobin
file status is job-in-stat.
Select jobout assign to jobout
file status is job-out-stat.
Data division.
File section.
FD jobin.
01 jobin-rec pic x(80).
FD jobout.
01 jobout-recpic x(80).
.
.
.
Working-storage section.
* items used in file alloation and processing --
01 bpxwdyn pic x(8) value 'BPXWDYN'.
01 alloc1.
02pic s9(4) binary value 50.
02pic x(40)
value 'alloc fi(jobin) shr dsn(scomsto.tr.cntl('.
02 ddin pic x(10) value spaces.
01 alloc2.
02pic s9(4) binary value 66.
02pic x(40)
value 'alloc fi(jobout) sysout writer(intrdr) '.
02pic x(26)
value 'recfm(f) lrecl(80) msg(2) '.
01 free-in.
02pic s9(4) binary value 22.
02pic x(22) value 'free fi(jobin)'.
01 free-out.
02pic s9(4) binary value 22.
02pic x(22) value 'free fi(jobout)'.
01 job-out-stat pic 99.
01 job-in-stat pic 99.
.
.
.
* Allocate and OPEN files
*
file-setup.
call bpxwdyn using alloc1
if return-code = 0
open input jobin
if job-in-stat = 00
continue
else
display 'h2OPEN failed; code: '
job-in-stat '/h2'
perform html-end
goback
end-if
else
display 'h2Allocation of input file failed; code: '
return-code '/h2'
perform html-end
goback
end-if
call bpxwdyn using alloc2
if return-code = 0
open output jobout
if job-out-stat = 00
continue
else
display 'h2OPEN failed; code: '
job-out-stat '/h2'
perform html-end
goback
end-if
else
display 'h2Allocation of output file failed; code: '
return-code '/h2'
perform html-end
goback
end-if
... and lots more ...
Works fine.
Other techniques covered in this exciting course:
* emiting HTML to stdout using DISPLAY, printf, and calling
BPX1WRT
* Redirecting to an alternate page
* Accessing environment variables; displaying environment variables
* Handling GET requests
* Dynamically building HTML responses using data from a VSAM file
* Dynamically building HTML responses using data from a DB2 table
* Creating and handling hidden controls and cookies
* Handling POST requests
* Saving files in the HFS
* Emitting Unicode
and, of course,
* Submitting jobs
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
Re: IPCS and multiple CICS address spaces
The SLIP was supposed to catch these 6 address spaces plus SMSVSAM and some of the system areas to support an IBM PMR review. Assuming the SLIP (configured between local IBM and customer sysprogs) is correct, that means I'm missing something so basic it will seem silly when it is found. I've tried inserting SETDEF ASID, SELECT ASIDLIST, or SELECT JOBLIST at different times without success. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 Mon, 29 Jun 2009 11:32:07 +0900, Timothy Sipples e99...@jp.ibm.com wrote: Sorry, it is not technically possible to move to newer hardware and continue running OS/390 1.3. :-( Have to take issue with you there, Timothy! There are plenty of modern machines that *can* run OS/390. Here's just one example: http://www-03.ibm.com/systems/x/hardware/rack/x3650m2/index.html The IBM x3650 M2 with Hercules software is quite capable of running OS/390. What's more, it will outperform the 2098-A02 in terms of MIPS, floor space, and energy consumption, for about one twentieth the price. Yes, that's just 5% of the price of a small z10 BC including DASD. So if IBM cannot meet the customer's stated requirement (which was to continue running OS/390 on newer hardware) the reason is certainly not technical. It's because of the artificial barriers which IBM's software licensing policy puts in their way. Regards, Roger Bowler Hercules the people's mainframe http://www.openmainframe.org -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: BPXWDYN and the Internal Reader (INTRDR)
Hi, Thanks for the prompt responses, my problem is now resolved. SYSOUT was indeed missing as having read the Using REXX and USS manual there was an implication that WRITER replaced SYSOUT on the ALLOC statement. My second problem was exactly has Steve pointed out. I had omitted the half word prefix containing the length. I somehow seemed to have bounced over that information when perusing the manual. Thanks again - Terry Terry Sambrooks Director KMS-IT Limited 228 Abbeydale Road South Dore, Sheffield, S17 3LA, UK Tel: +44 (0)114 262 0933 WEB: www.legac-e.co.uk Company Reg: 3767263 at the above address All outgoing E-mail is scanned, but it remains the recipient's responsibility to ensure their system is protected from spy-ware, trojans, viruses, and worms. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: IPCS and multiple CICS address spaces
On Tue, 30 Jun 2009 14:59:53 -0500 Don Moore don.mo...@aciworldwide.com
wrote:
:The SLIP was supposed to catch these 6 address spaces plus SMSVSAM and
:some of the system areas to support an IBM PMR review.
:Assuming the SLIP (configured between local IBM and customer sysprogs) is
:correct, that means I'm missing something so basic it will seem silly when it
is
:found.
:I've tried inserting SETDEF ASID, SELECT ASIDLIST, or SELECT JOBLIST at
:different times without success.
Do a
listdump dsn('whatever') select
or go to the inventory screen and do a
ld
line command to see what is in the dump.
--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com
Director, Dissen Software, Bar Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OS/390
On Tue, 30 Jun 2009 14:24:05 -0400, Eric Bielefeld eric-ibmm...@wi.rr.com wrote: I assume you mean Phil Payne. Does anyone know what happened to him? I assume from some of his last posts that he was getting out of mainframes. I always enjoyed Phil's wit and aserbic comments. Eric, You can continue to enjoy Phil Payne's ready wit and repartee in the google webmaster support forums. Here's an example: http://tinyurl.com/nl6bb6 And here you even get to see a photo of Uncle Phil himself: http://tinyurl.com/lyzkf3 Enjoy, Roger Bowler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
Thanks Roger. Phil doesn't look anything like I thought he would. Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Roger Bowler ibm-m...@snacons.com Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@bama.ua.edu Sent: Tuesday, June 30, 2009 4:37 PM Subject: Re: OS/390 On Tue, 30 Jun 2009 14:24:05 -0400, Eric Bielefeld eric-ibmm...@wi.rr.com wrote: I assume you mean Phil Payne. Does anyone know what happened to him? I assume from some of his last posts that he was getting out of mainframes. I always enjoyed Phil's wit and aserbic comments. Eric, You can continue to enjoy Phil Payne's ready wit and repartee in the google webmaster support forums. Here's an example: http://tinyurl.com/nl6bb6 And here you even get to see a photo of Uncle Phil himself: http://tinyurl.com/lyzkf3 Enjoy, Roger Bowler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 Tue, 30 Jun 2009 16:51:52 -0400, Eric Bielefeld eric-ibmm...@wi.rr.com wrote: Thanks Roger. Phil doesn't look anything like I thought he would. Here's another one: http://www.legsreunited.org.uk/reunion/reunionpics/lastlegs/fr-jds/slides/2005-12-041.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
Roger, If IBM's current mainframe revenue stream was to dwindle to one twentieth of its current, how long do you think we would continue to see the improvements we have seen in both harware and software in recent years? Just to maintain current revenue, they would have to increase market share twenty fold. Estimates are that there are somewhere between 6 and 10 thousand z/OS shops, worldwide. Taking the smaller number, do you actually think z/SO could grow to 120,000 paying installations? I'm not a fan of IBM's current pricing strategy, as I do feel it is way to complicated, and overpriced. But 1/20th of the current revenue? I think we would all be taking in each other's wash to find work. They could not stay in the business. My .02, for what its worth. --Dave Day There are plenty of modern machines that *can* run OS/390. Here's just one example: http://www-03.ibm.com/systems/x/hardware/rack/x3650m2/index.html The IBM x3650 M2 with Hercules software is quite capable of running OS/390. What's more, it will outperform the 2098-A02 in terms of MIPS, floor space, and energy consumption, for about one twentieth the price. Yes, that's just 5% of the price of a small z10 BC including DASD. So if IBM cannot meet the customer's stated requirement (which was to continue running OS/390 on newer hardware) the reason is certainly not technical. It's because of the artificial barriers which IBM's software licensing policy puts in their way. Regards, Roger Bowler Hercules the people's mainframe http://www.openmainframe.org -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
This assumes that all of IBM's revenue comes form hardware. I expect quite a bit of it comes from software license charges which are not linearly related to the hardware prices. -Original Message- From: Dave Day Sent: Tuesday, June 30, 2009 2:13 PM To: IBM-MAIN@bama.ua.edu Subject: Re: OS/390 Roger, If IBM's current mainframe revenue stream was to dwindle to one twentieth of its current, how long do you think we would continue to see the improvements we have seen in both harware and software in recent years? Just to maintain current revenue, they would have to increase market share twenty fold. Estimates are that there are somewhere between 6 and 10 thousand z/OS shops, worldwide. Taking the smaller number, do you actually think z/SO could grow to 120,000 paying installations? I'm not a fan of IBM's current pricing strategy, as I do feel it is way to complicated, and overpriced. But 1/20th of the current revenue? I think we would all be taking in each other's wash to find work. They could not stay in the business. My .02, for what its worth. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 Mon, 29 Jun 2009 11:32:07 +0900, Timothy Sipples e99...@jp.ibm.com wrote: Just for fun, let's assume that the company had migrated to z/OS V1 five years ago. They would have saved $711,420 on the base operating system charge by now. That would have purchased some very nice hardware plus many hamburgers. ... Methinks there was some grave mismanagement of IT infrastructure at this company. But it's not too late to correct that. Hmm. That's a novel way to promote customer loyalty. Overcharge them 700 grand for obsolete software, and then tell them it's *their* fault for mismanaging their account! Regards, Roger Bowler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: IPCS and multiple CICS address spaces
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Don Moore The SLIP was supposed to catch these 6 address spaces plus SMSVSAM and some of the system areas to support an IBM PMR review. Assuming the SLIP (configured between local IBM and customer sysprogs) is correct, that means I'm missing something so basic it will seem silly when it is found. I've tried inserting SETDEF ASID, SELECT ASIDLIST, or SELECT JOBLIST at different times without success. Are you certain that all of the dumping address spaces are going into the same dump dataset? From your described symptoms, I'd guess they are not. -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
On Tue, 30 Jun 2009 16:12:59 -0500, Dave Day wrote: Roger, If IBM's current mainframe revenue stream was to dwindle to one twentieth of its current, how long do you think we would continue to see the improvements we have seen in both harware and software in recent years? Just to maintain current revenue, they would have to increase market share twenty fold. Estimates are that there are somewhere between 6 and 10 thousand z/OS shops, worldwide. Taking the smaller number, do you actually think z/SO could grow to 120,000 paying installations? Unfortunately it's too late now. When the CMOS processors arrived in the 1990s there was a golden opportunity to bring mainframe prices down to more reasonable levels, which might well have resulted in the kind of growth you mention. z/OS could have established the same foothold in small and medium sized companies as it has today in large companies. But IBM took the choice to keep mainframe prices high, and they could do this because at that time there was really no alternative. In 1990 the idea of running a production workload on a PC was still laughable. But now that the toy computers have caught up and overtaken the mainframe in almost all respects, we are seeing the inevitable dwindling in the number of mainframe sites. In the 1990's it was estimated that there were 22000 CICS installations alone. Now we are talking about figures of 6 thousand sites and falling. IBM reports growth in mainframe hardware revenues. Increased MIPS at the high end and increasing server prices (yes, a z10 does cost more than a similarly powered z9) account for this. But the astonishing pace of system z hardware and software development, funded by premium price tags, does little to improve the employment prospects of the bulk of mainframe professionals. The number of installations diminishes, and the improvements to z/OS reduce the staffing requirements even further. 1/20th of the current revenue? I think we would all be taking in each other's wash to find work. They could not stay in the business. Most of us reading this forum probably have a common interest: to keep a healthy market alive for our skills. IBM's interest is to maximise its profits by continuing to squeeze as much as possible out of the mainframe market while it still exists. The question is, do IBM's methods coincide or conflict with our interest, given that z/OS will never now achieve mass market penetration? I don't claim to know the answer to that question (although of course I have my opinion). Regards, Roger Bowler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 Tue, 30 Jun 2009 16:12:59 -0500, Dave Day wrote: If IBM's current mainframe revenue stream was to dwindle to one twentieth of its current, how long do you think we would continue to see the improvements we have seen in both harware and software in recent years? Just to maintain current revenue, they would have to increase market share twenty fold. Estimates are that there are somewhere between 6 and 10 thousand z/OS shops, worldwide. Taking the smaller number, do you actually think z/SO could grow to 120,000 paying installations? Allowing small mainframe shops to run on hardware such as Roger mentioned would not equate to IBM getting 5% of their current revenue. For one thing, small machines such as this would not suffice for large shops. For another, the software charges for running OS/390 on the machine that the OP is currently running are, based upon Timothy's post, $16,260 per month. How much does it matter that the hardware can be purchased for $5,000 rather than for $100,000? IBM mainframe market share has been dwindling for 20 years, during which time the need for servers has increased dramatically. This happened because the mainframe is perceived as too expensive. That perception came about because of the cost of software. In the old days, the pricing model was simple, both for hardware and software. As the compute power increased, the price increased proportionately. That, by the way is the reason that Amdahl computers came to be. Dr. Amdahl presented his design to IBM, who rejected it because, based upon their price/performance curve, they figured that they would have to charge $10 million for it, and they wouldn't be able to sell enough of them. Amdahl said that he thought they could make a profit at $4 Million, but his idea was rejected. When IBM started charging for software, the pricing curve was very nearly linear. It remained that way for many years. Every few years, shops would buy a new computer with about double the power of the one that they had before. It would cost about the same as the last one that they bought, and the cost for the software doubled. It didn't take many cycles of this for people to notice that the price of software was increasing rapidly. Computer billing departments had similar charging algorithms. Where I worked in the '70s, every time a new computer was purchased, they had a set of billing benchmarks that were run and the rate per CPU minute was adjusted so that users paid about the same price for the work done on the new computer as they did on the old one. It seemed to make sense at the time, but the charges soon became unreasonable as the faster computers became available for similar prices. So, mainframe market share has been decreasing for many years. IBM, to their credit, has reduced the charges for software, but IMO, not nearly quickly enough. Over the last ten years or so, the cost of the operating system has fallen to about a quarter of what it was. So, again, based upon Tim's post, it is now $4,403 per month for similar sized hardware. In that same time frame, the processing power of the high end mainframe has increased 20 fold. I know one shop that had 10 of the largest available mainframes in one site 30 years ago. Over the years, as their computing needs grew, they tended to put new workload on other platforms because of the cost, perceived or actual. Now they have one mainframe in each site. If IBM had changed its pricing model 30 years ago, I have no doubt that the number of mainframe shops would have grown with the rest of the industry. There could easily be 100 times as many mainframe shops as there are today. Instead, every few months we hear about another shop that has migrated off of the mainframe. I'm not a fan of IBM's current pricing strategy, as I do feel it is way to complicated, and overpriced. But 1/20th of the current revenue? I think we would all be taking in each other's wash to find work. They could not stay in the business. My .02, for what its worth. -- 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
ERASEDATA - DASD disposal
Greetings! I am in the process of retiring 3 RAMAC 2 racks, each with a 3990 mod 6 controller, and 1 RAMAC 3 rack, with a 9293 controller. All data has been moved to new DASD. The RAMAC DASD will be surplused so I have to be sure that the data has been wiped clean and nothing is recoverable - w ithout physically damaging the devices. All of the DASD is 3390-3. For the RAMAC2 data wipe I have been using ICKDSF release 17.0 TRKFMT UNITADDRESS(B40) VERIFY(ZSDLZ6) ERASEDATA - CYLRANGE(0,5000) CYCLES(4) That takes about 20 minutes per cycle. Our maintenance vendor recommended 4 cycles. That seems to be proceeding fine. I am having a problem with the RAMAC 3. I tried the same coding with the RAMAC 3 and it took about 5 hours to run (per address) as compared to roughly 1 hour 20 minutes on the RAMAC 2 . All devices are 3390-3, each controller has 4 paths, low system activity generally with no other work on these strings, and the long run time was consistent for several packs on the RAMAC 3. Should I use some other ICKDSF command to wipe the RAMAC3? Any t houghts on why the run time would be so mu ch longer for the RAMAC3? Do you consider the 4 passes with TRKFMT enough to be sure that the data is really gone? TIA, Linda Mooney -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
Eric Bielefeld wrote: Thanks Roger. Phil doesn't look anything like I thought he would. He looks a little like Roy Kinnear, playing the role of Algernon, Professor Foot's assistant, in Help! (1965) :-D -- 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
