Re: Using symbolic in JCL
Ted MacNEIL wrote: (*) I mean: submitted,converted,executed on the same system. Most of the installations are monoplexes, probably most of them do not use NJE for vast majority of jobs. I have never worked in a single system shop, either before or after SYSPLEX, so I have always been in an environment where the job could be handled in three different places. You work for big shops. Majority of mainframe users is not sysplexed. Probably almost every shop, even monplex use more than one systems (that's why we have LPARs). Probably many of them have NJE established, I don't know how many (*), nevermind. The question is how many of them use NJE to submit the jobs on regular basis. (*) However I wonder if NJE is so popular for everyday, regular use. Once upon a time I studied NJE RACF security, asked questions to RACF-L group. Limited number or answers indicated it's not very popular. BTW: Here, in Poland, we have approx. 100 mainframe sites, and 140 CPCs. Only 4 (four) of them have production sysplexed. As numbers above show, many of them have one CPC. As far as I know, vast majority of them do not use NJE, even do not have NJE configured. Whole job's lifecycle is on same system. BTW, the results are not indeterminate. If you use a symbol in the JCL, you will always get a JCL error. That's because it is forbidden by IBM. I'd prefer determinate on single system *only*. Limited functionality. This is more than I have today. Today I have nothing. -- Radoslaw Skorupka Lodz, Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Catalog question
Hello list, this looks like a Friday question, but maybe some of you know already this, or Mark Thomen can shed some light on this. There it goes : issuing LISTC EN(/) ALL beside a UCAT you get to see all ALIASes being defined in the MCAT. Issuing the same cmd beside a UCAT whose ALIASes are SYMBOLICRELATED, you do NOT see any ALIASes. WAD or bug ? Walter Marguccio -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
CICS Abend Code
Hello, There is this abend error code ABDT logged in our Error Logs for CICS screen abends. Can anyone help me understand this code? -- Parin Gangar -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CICS Abend Code
Is ABDT all of the error message ? Im not seeing anything for that error code in 'CICS Transaction Server for z/OS V2.2 CICS Messages and Codes' -Original Message- From: Parin Gangar [mailto:[EMAIL PROTECTED] Sent: Friday, November 25, 2005 3:08 AM To: IBM-MAIN@BAMA.UA.EDU Subject: CICS Abend Code Hello, There is this abend error code ABDT logged in our Error Logs for CICS screen abends. Can anyone help me understand this code? -- Parin Gangar -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html **Confidentiality Notice** This electronic transmission and any attached documents or other writings are confidential and are for the sole use of the intended recipient(s) identified above. This message may contain information that is privileged, confidential or otherwise protected from disclosure under applicable law. If the receiver of this information is not the intended recipient, or the employee, or agent responsible for delivering the information to the intended recipient, you are hereby notified that any use, reading, dissemination, distribution, copying or storage of this information is strictly prohibited. If you have received this information in error, please notify the sender by return email and delete the electronic transmission, including all attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Fw: Running COBOL under z/os.e
On Thu, 24 Nov 2005 01:19:28 -0700, William M. Klein [EMAIL PROTECTED] wrote: This certainly is NOT the intended target for z/OS.e - but it is clearly documented as allowed (both technically and by the license). Does any one have information as to what approximate proportion of mainframe sites are running z/os.e, either alone or with other operating systems?? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CICS Abend Code
ABDT does not seem to be a CICS transaction abend code, so it can be an ISV product or application abend code. You should post this on the CICS-L list. Rogerio D. Nascimento CICS subsystem support On 11/25/05, Parin Gangar [EMAIL PROTECTED] wrote: Hello, There is this abend error code ABDT logged in our Error Logs for CICS screen abends. Can anyone help me understand this code? -- Parin Gangar -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Introducing delay in a assembler.
Hi all, In my assembler program I need to introduce a wait or delay for 5 seconds. Is there any macro for doing it. I guess there is a WAIT macro but I dont know how to use it. Is WAIT macro intended for that purpose ? Even when I introduced the wait macro, I get a compilation error stating ECBLIST required. But I am not using any ECBs in my program and I don't have the knowledge of ECBs too. Please help me in this situation. All I need is very simple, in the middle of my program execution I need to introduce a WAIT of few seconds. How to acheive this.. Thanks in advance, Jerry. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
STIMER WAIT,BINTVL=VACATION VACATION DCF'500' HUNDRETHS OF SECONDS FOR STIMER (5 SECS) I love the easy ones. j -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Jerry Ragland Sent: Friday, November 25, 2005 8:44 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Introducing delay in a assembler. Hi all, In my assembler program I need to introduce a wait or delay for 5 seconds. Is there any macro for doing it. I guess there is a WAIT macro but I dont know how to use it. Is WAIT macro intended for that purpose ? Even when I introduced the wait macro, I get a compilation error stating ECBLIST required. But I am not using any ECBs in my program and I don't have the knowledge of ECBs too. Please help me in this situation. All I need is very simple, in the middle of my program execution I need to introduce a WAIT of few seconds. How to acheive this.. Thanks in advance, Jerry. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
RES: Introducing delay in a assembler.
Jerry, Take a look in STIMER macro. Atenciosamente / Regards / Saludos Ituriel do Nascimento Neto Banco Bradesco S/A 4254/DPCD Alphaville Suporte Técnico - Software Básico Mainframes Tel: 55 11 4197-2021 Fax: 55 11 4197-2814 -Mensagem original- De: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] nome de Jerry Ragland Enviada em: sexta-feira, 25 de novembro de 2005 10:44 Para: IBM-MAIN@BAMA.UA.EDU Assunto: Introducing delay in a assembler. Hi all, In my assembler program I need to introduce a wait or delay for 5 seconds. Is there any macro for doing it. I guess there is a WAIT macro but I dont know how to use it. Is WAIT macro intended for that purpose ? Even when I introduced the wait macro, I get a compilation error stating ECBLIST required. But I am not using any ECBs in my program and I don't have the knowledge of ECBs too. Please help me in this situation. All I need is very simple, in the middle of my program execution I need to introduce a WAIT of few seconds. How to acheive this.. Thanks in advance, Jerry. AVISO LEGAL BR Esta mensagem é destinada exclusivamente para a(s) pessoa(s) a quem é dirigida, podendo conter informação confidencial e/ou legalmente privilegiada. Se você não for destinatário desta mensagem, desde já fica notificado de abster-se a divulgar, copiar, distribuir, examinar ou, de qualquer forma, utilizar a informação contida nesta mensagem, por ser ilegal. Caso você tenha recebido esta mensagem por engano, pedimos que nos retorne este E-Mail, promovendo, desde logo, a eliminação do seu conteúdo em sua base de dados, registros ou sistema de controle. Fica desprovida de eficácia e validade a mensagem que contiver vínculos obrigacionais, expedida por quem não detenha poderes de representação. +**+ LEGAL ADVICE BR This message is exclusively destined for the people to whom it is directed, and it can bear private and/or legally exceptional information. If you are not addressee of this message, since now you are advised to not release, copy, distribute, check or, otherwise, use the information contained in this message, because it is illegal. If you received this message by mistake, we ask you to return this email, making possible, as soon as possible, the elimination of its contents of your database, registrations or controls system. The message that bears any mandatory links, issued by someone who has no representation powers, shall be null or void. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
Jerry Ragland wrote: In my assembler program I need to introduce a wait or delay for 5 seconds. Is there any macro for doing it. I guess there is a WAIT macro but I dont know how to use it. Is WAIT macro intended for that purpose ? Even when I introduced the wait macro, I get a compilation error stating ECBLIST required. But I am not using any ECBs in my program and I don't have the knowledge of ECBs too. Please help me in this situation. All I need is very simple, in the middle of my program execution I need to introduce a WAIT of few seconds. How to acheive this.. WAIT specifically delays until an event is complete, as denoted by POSTing an ECB. ECBLIST is used to specify more than one ECB. For a simple delay, try: STIMER REAL,BINTVL==A(5*100) BINTVL specifies that the requested interval is in units of 1/100th of a second, so 5*100 gives you 5 second. Please note that you may be delayed for more than five seconds if your system is heavily loaded; the request only enables your program to run after five seconds, but does not guarantee that it will be dispatched. Gerhard Postpischil Bradford, VT -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
STIMER WAIT,BINTVL=VACATION VACATION DCF'500' HUNDRETHS OF SECONDS FOR STIMER (5 SECS) I prefer longer lasting vacations ;-) Peter Hunkeler Credit Suisse - Information Technology -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
Hi James, Thanks for ur reply. But I get a compilation error which states- 18 STIMER WAIT,BINTVL=VACATION ASMA141E Bad character in operation code - WAIT,BINTVL=VACATION Thanks, Jerry. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Running COBOL under z/os.e
Date:Thu, 24 Nov 2005 01:19:28 -0700 From:William M. Klein [EMAIL PROTECTED] Subject: Fw: Running COBOL under z/os.e FWIW I have modified the CEEPIPI sample program and tested it on z/OS.e. Obviously you cannot compile the COBOL program on z/OS.e but you can run the program object. The program currently loads a hard coded program name but could be modified to fetch any program. If anyone would like a copy I will send it along. Tom Russell Stay calm. Be brave. Wait for the signs. -- Jasper FriendlyBear -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
Jerry Ragland [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... Hi James, Thanks for ur reply. But I get a compilation error which states- 18 STIMER WAIT,BINTVL=VACATION ASMA141E Bad character in operation code - WAIT,BINTVL=VACATION Thanks, Jerry. The opcode must be STIMER,not WAIT. Apparently STIMER is a label, move it to pos. 10. LABELxx STIMER WAIT,BINTVL=VACATION Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
Hi James, Thanks for ur reply. But I get a compilation error which states- 18 STIMER WAIT,BINTVL=VACATION ASMA141E Bad character in operation code - WAIT,BINTVL=VACATION First, what level of HLASM are you running? Or the operating system release? Second, have you reviewed the Assembler Services Reference book: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iea1a741/CCONTENT S I would also like to see the snippets of the generated code for the STIMER instruction and your BINTVL=VACATION instruction. That way we could see what was actually generated by your system. Provide the output a couple of lines before and after the area of interest. Hope this helps, Lizette Koehler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Introducing delay in a assembler.
There is a typo---perhaps a reflection of too much C---here. | STIMER REAL,BINTVL==5*100 should be | STIMER REAL,BINTVL=5*100 In my pedantic fashion I prefer |five_secs seta 5*100 --BINTVL unit is 1/100 sec | STIMER REAL,BINTVL=five_secs John Gilmore Ashland, MA 01721-1817 USA From: Gerhard Postpischil [EMAIL PROTECTED] Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Introducing delay in a assembler. Date: Fri, 25 Nov 2005 08:54:56 -0500 Jerry Ragland wrote: In my assembler program I need to introduce a wait or delay for 5 seconds. Is there any macro for doing it. I guess there is a WAIT macro but I dont know how to use it. Is WAIT macro intended for that purpose ? Even when I introduced the wait macro, I get a compilation error stating ECBLIST required. But I am not using any ECBs in my program and I don't have the knowledge of ECBs too. Please help me in this situation. All I need is very simple, in the middle of my program execution I need to introduce a WAIT of few seconds. How to acheive this.. WAIT specifically delays until an event is complete, as denoted by POSTing an ECB. ECBLIST is used to specify more than one ECB. For a simple delay, try: STIMER REAL,BINTVL==A(5*100) BINTVL specifies that the requested interval is in units of 1/100th of a second, so 5*100 gives you 5 second. Please note that you may be delayed for more than five seconds if your system is heavily loaded; the request only enables your program to run after five seconds, but does not guarantee that it will be dispatched. Gerhard Postpischil Bradford, VT -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html _ FREE pop-up blocking with the new MSN Toolbar get it now! http://toolbar.msn.click-url.com/go/onm00200415ave/direct/01/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Problem with Subsystem Interface to JESx, Function 80
Hello, we have an application that submits jobs using the VSAM-Interface (Macros GENCB, MODCB, SHOWCB etc.) to the internal reader and then obtains the submitted job's id using the ENDREQ-Makro. This all works fine and we always get a job id when the input stream contains a valid job and no garbage. Now we added some code to optionally wait for the submitted job to complete. For that, we use the subsystem interface (IEFSSREQ) with function code 80 (extended status call). We use the job id returned from the ENDREQ as a filter to return only information for this job. Depending on the load on the JES subsystem, the first calls trying to obtain the job status using IEFSSREQ always fail to provide information on this job id. It takes some time (sometimes several seconds) until the job appears in the output of IEFSSREQ. From my understanding, as the job has already been assigned a job id, it should appear on one of the JES queues, for example somewhere in the JES input processing phase. As the program has no influence on the type of job submitted, there is no way to decide whether the job has not yet appeared on the JES queues or whether it has already disappeared after PURGE processing. So my question is: Is there a foolproof way to obtain information about a job that has been assigned an id during submit and has not yet appeared on the JES queues ? Our system is the z/OS 1.4 Summer with JES2 from the preconfigured ADCD. Any comments are welcome. Regards Wolfgang Rupprath FSP GmbH Cologne/Germany -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
In a recent note, R.S. said: Date: Fri, 25 Nov 2005 09:07:48 +0100 That's because it is forbidden by IBM. I'd prefer determinate on single system *only*. Limited functionality. This is more than I have today. Today I have nothing. With similar more than I have today motivation, I tried using a SET symbol instead of a system symbol, as follows: // SET SYS=MVS3 //* /*JOBPARM SYSAFF=SYS INVALID /*JOBPARM CARD *** $HASP106 JOB DELETED BY JES2 OR CANCELLED BY OPERATOR BEFORE EXECUTION No joy. Dammit, how many things can IBM do wrong in the JCL parser? I suspect I've only begun the catalog. Look, IBM guys, perform the substitution first, _then_ interpret the statement. It's that simple! Same applies to the misinterpretation of //SYSIN DD DATA,DLM=SYMBOL, etc. -- gil -- StorageTek INFORMATION made POWERFUL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Control-M info
Hi, I am trying to find out if there is a newsgroup for BMC's Control-M scheduling package. I am trying to find the layout of the data in a particular table. Any help would be appreciated. Thanks, Dirk -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Running COBOL under z/os.e
On Nov 25, 2005, at 1:53 AM, R.S. wrote: SNIP-- iously (maybe not for IBM) z/OS.e is very interesting mostly for existing mainframe users, thos fighting for lower TCO. Some of them decide to change the platform (see MMA, or other ideas), or they try to (we call it catch left ear with right hand) wangle how to fit in terms and conditions of z/OS.e. I know some customers which dropped CICS giving place for replacement product (there are such). Solution for that situation was mentioned hundred of times: make software fees lower. Mainframe software is too expensive. EOT -- Well it as always depends... If you calculate in the salaries of the OEM CICS programmer types I'll bet that it comes out pretty close to being even (or possibly less). 30 (or so years ago) a company I worked for bought a replacement (called INTERCOM) for one group. WIth the idea that it might replace it for the entire company. The problem was that they couldn't find people that knew INTERCOM and the ones that did wanted big $$$. The people that brought it in ended up leaving the company as they could make lots more money elsewhere. BTW INTERCOM was probably a better product that CICS (then) now, I don't know enough about CICS-TS to say. Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
On Nov 25, 2005, at 2:07 AM, R.S. wrote: -SNIP__ You work for big shops. Majority of mainframe users is not sysplexed. Probably almost every shop, even monplex use more than one systems (that's why we have LPARs). Probably many of them have NJE established, I don't know how many (*), nevermind. The question is how many of them use NJE to submit the jobs on regular basis. (*) However I wonder if NJE is so popular for everyday, regular use. Once upon a time I studied NJE RACF security, asked questions to RACF-L group. Limited number or answers indicated it's not very popular. BTW: Here, in Poland, we have approx. 100 mainframe sites, and 140 CPCs. Only 4 (four) of them have production sysplexed. As numbers above show, many of them have one CPC. As far as I know, vast majority of them do not use NJE, even do not have NJE configured. Whole job's lifecycle is on same system. About 20 years ago we had approximately 75 systems connected up via NJE (SNA Bisync). These were *SEPARATE* companies (not connected by anything but a telco wire . The company I worked for had 2 sites (Chicago NY) were connected up VIA NJE and there were thousands of jobs submitted on one system and sent to the other site everyday for execution. We were a small-medium company yet had many connections across the US (mostly NY west coast) . Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: dynamic LPA
Are the SYS1.PARMLIB(PROGxx) entries: LPA ADD DSNAME(SYS1.MVS.EXITLOAD) MODNAME(...) always processed before: EXIT ADD EXITNAME(SYS.name) MODNAME(...) during z/OS initialization? All statements in a single parmlib PROGxx parmlib member are processed to completion in the order they are seen. But that is not relevant here because LPA ADD is not allowed during IPL processing PROGxx. If you want something in LPA during IPL, you would use LPALSTxx, IEALPAxx, or IEAFIXxx. Peter Relson z/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
/*JOBPARM (and its /* brethren) and JES3's //* cards, are JECL - Job Entry Control Language. JESn sees and processes these cards before it passes the stream to JCL conversion. So the symbolic you specified does not exist yet, because you're not in JCL conversion which means, alas, what seems logical won't work. (At least in VSE symbolics are a lot easier, although I have my own gripes about VSE JCS.) (What are you doing working on the Friday after Thanksgiving? Better yet, I should ask myself the same question.) Later, Ray -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin Sent: Friday November 25 2005 07:01 To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Using symbolic in JCL In a recent note, R.S. said: Date: Fri, 25 Nov 2005 09:07:48 +0100 That's because it is forbidden by IBM. I'd prefer determinate on single system *only*. Limited functionality. This is more than I have today. Today I have nothing. With similar more than I have today motivation, I tried using a SET symbol instead of a system symbol, as follows: // SET SYS=MVS3 //* /*JOBPARM SYSAFF=SYS INVALID /*JOBPARM CARD *** $HASP106 JOB DELETED BY JES2 OR CANCELLED BY OPERATOR BEFORE EXECUTION No joy. Dammit, how many things can IBM do wrong in the JCL parser? I suspect I've only begun the catalog. Look, IBM guys, perform the substitution first, _then_ interpret the statement. It's that simple! Same applies to the misinterpretation of //SYSIN DD DATA,DLM=SYMBOL, etc. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Running COBOL under z/os.e
Obviously you cannot compile the COBOL program on z/OS.e but ... ... but if you are interested in compiling COBOL (and PL/I and FORTRAN) programs from a z/OS.e system (legally - we virtualize the compile to a service machine) please check out my client's Web site http://syspointusa.com. (Posted with Darren's permission.) Charles -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Tom Russell Sent: Friday, November 25, 2005 9:03 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Running COBOL under z/os.e Date:Thu, 24 Nov 2005 01:19:28 -0700 From:William M. Klein [EMAIL PROTECTED] Subject: Fw: Running COBOL under z/os.e FWIW I have modified the CEEPIPI sample program and tested it on z/OS.e. Obviously you cannot compile the COBOL program on z/OS.e but you can run the program object. The program currently loads a hard coded program name -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Early Release of JES2 SPOOL space for spin-off data sets
Hello: For years, JES2 wouldn't release spool space allocated to a given job until all of the job was purged - i.e. freeing SPOOL space seemed to be an all-or-nothing proposition. I learned today that JES2 frees up SPOOL space for spin-OFF SYSOUT data sets (FREE=CLOSE) as soon as they're printed or purged, i.e. JES2 no longer waits for the entire job to get purged in order to free up some of the space allocated to it. Apparently, this isn't something new at all: a quick test on my RESCUE system shows that JES2 already behaved like that on MVS/ESA 5.2.2. When did JES2 start freeing SPOOL space for spin-off data sets? Am I confused again? Thanks. -- Gilbert Saint-Flour GSF Software http://gsf-soft.com/ mailto:[EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
-teD Me? A skeptic? I trust you have proof! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
When are the symbol values determined for a started task? When the task starts (actually gets converted). Remember, a started task always starts on the same system that it is invoked on. There are the submitting/conversion/execution system is always the same. (PS: sorry for the previous almost black note. My mouse got out of control) -teD Me? A skeptic? I trust you have proof! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
You work for big shops. Majority of mainframe users is not sysplexed. Probably almost every shop, even monplex use more than one systems (that's why we have LPARs). I don't think that is an accurate statement for North America. Most corporations that are still running Mainframes are running with a SYSPLEX. Define big shop. Here a 4000 MIPS shop is a small one. -teD Me? A skeptic? I trust you have proof! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Early Release of JES2 SPOOL space for spin-off data sets
-For years, JES2 wouldn't release spool space allocated to a given job -until all of the job was purged - i.e. freeing SPOOL space seemed to be -an all-or-nothing proposition. I learned today that JES2 frees up -SPOOL space for spin-OFF SYSOUT data sets (FREE=CLOSE) as soon as -they're printed or purged, i.e. JES2 no longer waits for the entire job -to get purged in order to free up some of the space allocated to it. -Apparently, this isn't something new at all: a quick test on my RESCUE -system shows that JES2 already behaved like that on MVS/ESA 5.2.2. -When did JES2 start freeing SPOOL space for spin-off data sets? Am I -confused again? Thanks. Gilbert, I am not entirely sure on this, but functionality for all JES2 SYSOUTs seems to have changed with our latest upgrade to z/OS 1.6 (at least this is when I started noticing). It appears that the SYSOUT (even without FREE=CLOSE) remain independent of each other within the Outgroup number groupings and allow rerouting of segments within an OUTGRP to separate destinations, classes, etc. For instance, if you run a simple IEBGENER and have your SYSUT2 route to the same OUTGRP as your MSGCLASS going to the held queue, you can enter the held queue of SDSF, type a '?' next to the output, and change it whichever class or destination you like. When you perform this, the OUTGRP number gets reassigned for the entry to the next sequential number. I believe this new (new to me anyway) ability to separate the SYSOUT and keep them independent is what allows JES2 to now free up space. If you purge this output from the queue, you should notice the space is cleared. As I recall, the SYSOUTs coded with FREE=CLOSE were always assigned their own exclusive OUTGRP number and thus space was freed when they were purged or printed. I could be wrong there though. When I started noticing this behavior recently, I thought I was going crazy and wondered if it was always like this. Hope this helps... Thanks, Hank Medler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Using symbolic in JCL
-teD wrote: I don't think that is an accurate statement for North America. Most corporations that are still running Mainframes are running with a SYSPLEX. Define big shop. Here a 4000 MIPS shop is a small one. It appears to me, little informed, that the benefits of outsourcing did not reach, or fully engulfed, some less privileged countries, like Poland. Or, may, they studies the alleged benefits, and, are not convinced. :-) If the current trend continues - we will not ...source unknown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Control-M info
Dirk, If you let me know what information you need, I'll see about getting the information for you. Best regards, John Maxfield Lead Developer BMC Software, Inc. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Dirk Devos Sent: Friday, November 25, 2005 10:06 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Control-M info Hi, I am trying to find out if there is a newsgroup for BMC's Control-M scheduling package. I am trying to find the layout of the data in a particular table. Any help would be appreciated. Thanks, Dirk -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Early Release of JES2 SPOOL space for spin-off data sets
On Fri, 25 Nov 2005 13:46:16 -0600, Hank Medler [EMAIL PROTECTED] wrote: -For years, JES2 wouldn't release spool space allocated to a given job -until all of the job was purged - i.e. freeing SPOOL space seemed to be -an all-or-nothing proposition. I learned today that JES2 frees up -SPOOL space for spin-OFF SYSOUT data sets (FREE=CLOSE) as soon as -they're printed or purged, i.e. JES2 no longer waits for the entire job -to get purged in order to free up some of the space allocated to it. -Apparently, this isn't something new at all: a quick test on my RESCUE -system shows that JES2 already behaved like that on MVS/ESA 5.2.2. -When did JES2 start freeing SPOOL space for spin-off data sets? Am I -confused again? Thanks. Gilbert, I am not entirely sure on this, but functionality for all JES2 SYSOUTs seems to have changed with our latest upgrade to z/OS 1.6 (at least this is when I started noticing). It appears that the SYSOUT (even without FREE=CLOSE) remain independent of each other within the Outgroup number groupings and allow rerouting of segments within an OUTGRP to separate destinations, classes, etc. For instance, if you run a simple IEBGENER and have your SYSUT2 route to the same OUTGRP as your MSGCLASS going to the held queue, you can enter the held queue of SDSF, type a '?' next to the output, and change it whichever class or destination you like. When you perform this, the OUTGRP number gets reassigned for the entry to the next sequential number. I believe this new (new to me anyway) ability to separate the SYSOUT and keep them independent is what allows JES2 to now free up space. If you purge this output from the queue, you should notice the space is cleared. As I recall, the SYSOUTs coded with FREE=CLOSE were always assigned their own exclusive OUTGRP number and thus space was freed when they were purged or printed. I could be wrong there though. When I started noticing this behavior recently, I thought I was going crazy and wondered if it was always like this. Hope this helps... Thanks, Hank Medler Hate to reply to myself, but I was wrong and it appears that the space is truly only freed when a SYSOUT is coded as FREE=CLOSE. Sorry, but even though it separates the output to another entry, the space is not freed when purging or printing the output of a non-FREE=CLOSE SYSOUT. Sorry, but I can't aid any help on the historic beginnings of freeing space on spin- off datasets... I haven't been around that long. Thanks, Hank Medler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Early Release of JES2 SPOOL space for spin-off data sets
On Fri, 25 Nov 2005 14:28:48 -0600, Hank Medler [EMAIL PROTECTED] wrote: On Fri, 25 Nov 2005 13:46:16 -0600, Hank Medler [EMAIL PROTECTED] wrote: -For years, JES2 wouldn't release spool space allocated to a given job -until all of the job was purged - i.e. freeing SPOOL space seemed to be -an all-or-nothing proposition. I learned today that JES2 frees up -SPOOL space for spin-OFF SYSOUT data sets (FREE=CLOSE) as soon as -they're printed or purged, i.e. JES2 no longer waits for the entire job -to get purged in order to free up some of the space allocated to it. -Apparently, this isn't something new at all: a quick test on my RESCUE -system shows that JES2 already behaved like that on MVS/ESA 5.2.2. -When did JES2 start freeing SPOOL space for spin-off data sets? Am I -confused again? Thanks. Gilbert, I am not entirely sure on this, but functionality for all JES2 SYSOUTs seems to have changed with our latest upgrade to z/OS 1.6 (at least this is when I started noticing). It appears that the SYSOUT (even without FREE=CLOSE) remain independent of each other within the Outgroup number groupings and allow rerouting of segments within an OUTGRP to separate destinations, classes, etc. For instance, if you run a simple IEBGENER and have your SYSUT2 route to the same OUTGRP as your MSGCLASS going to the held queue, you can enter the held queue of SDSF, type a '?' next to the output, and change it whichever class or destination you like. When you perform this, the OUTGRP number gets reassigned for the entry to the next sequential number. I believe this new (new to me anyway) ability to separate the SYSOUT and keep them independent is what allows JES2 to now free up space. If you purge this output from the queue, you should notice the space is cleared. As I recall, the SYSOUTs coded with FREE=CLOSE were always assigned their own exclusive OUTGRP number and thus space was freed when they were purged or printed. I could be wrong there though. When I started noticing this behavior recently, I thought I was going crazy and wondered if it was always like this. Hope this helps... Thanks, Hank Medler Hate to reply to myself, but I was wrong and it appears that the space is truly only freed when a SYSOUT is coded as FREE=CLOSE. Sorry, but even though it separates the output to another entry, the space is not freed when purging or printing the output of a non-FREE=CLOSE SYSOUT. Sorry, but I can't aid any help on the historic beginnings of freeing space on spin- off datasets... I haven't been around that long. Thanks, Hank Medler Okay, deja-vu... replying to myself again. While playing with this, I noticed something strange. I coded a simple IEBGENER with no FREE=CLOSE on the SYSOUT. If I take the output from that and purge it from SDSF, the space is not freed and all the DD's can be seen when doing a '?' next to the job in the status queue. However... if I do the '?' next to the job first and perform the 'P' command next to the DD while in the held queue, the space is freed and the job does not show the particular DD from the status queue. You can even purge the JESMSGLG, JESJCL, and JESYSMSG DDs from JES2 as well. Seems odd to me that purging an entire segment from the queue would be different from purging a specific DD, but perhaps I have just been oblivious to this behavior for quite some time. Please let me know if I have... Thanks, Hank Medler -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Early Release of JES2 SPOOL space for spin-off data sets
On Fri, 25 Nov 2005 14:28:48 -0600, Hank Medler [EMAIL PROTECTED] wrote: Hate to reply to myself, but I was wrong and it appears that the space is truly only freed when a SYSOUT is coded as FREE=CLOSE. Sorry, but even though it separates the output to another entry, the space is not freed when purging or printing the output of a non-FREE=CLOSE SYSOUT. Sorry, but I can't aid any help on the historic beginnings of freeing space on spin- off datasets... I haven't been around that long. Correct It cannot be freed because what you purge is a JOE ( Job Output Element ) Unfortunately JOE belongs to JQE ( Job Queue Element ) and the allocation (the number of trackgroups used by the JOE's) is written in the JQE . So unless you delete all elements ( that means you delete the JQE also ) you do not free the space as it remains allocated by the JQE . This is from memory For free=close i guess it is different and i do not know how it works .I think it came with change in BERTs cleanup but i do not know how. Bruno -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
WELLS FARGO QUESTION
Dear Member, I need your help to identify the cause of a problem that has brought me and my family tremendous trouble and grief. My bank, Wells Fargo, made errors in the ownership designations on three of our accounts, attributing the mistakes to a simple, computer error--not human error. I am writing for your help in determining how and why the following changes did in fact occur: (1) Certificates of Deposit: Certificates in my family's name were, without authorization, put in someone else's name, and ours replaced. The bank attributes this to a computer error, without explanation. (2) Home Mortgage: Wells Fargo changed my home mortgage account, without consent, so that I was bumped from primary customer to additional customer, and the same stranger who appeared on the CD accounts became the primary customer. (3) Home Equity Line of Credit: Wells Fargo says the same computer error caused the change in ownership by replacing my spouses name with that of the person who appeared on the other accounts. In the latter two cases, the bank sent mail to my home address, with the stranger's name appearing instead of my spouses. Wells Fargo refuses to explain, beyond a vague computer error, how this situation came about and I would appreciate some expert take on this: Is it possible for a single computer error to cause the changes in multiple accounts? If so, how would such changes occur? How could we trace them? Could the errors have occurred by random malfunction? Would an individual have had to make multiple entries to effect those changes? Can a bank's computer malfunction on its own, select three of my accounts at random, and then transfer ownership this way? Or must the server be programmed to do this? Do these snafus seem innocent, or do you think something sinister could be involved? Is there a way to determine if Wells Fargo's server has been hacked into, and, if so, to trace who and where the hacker is? What employee(s) in the bank would have information about how the changes occurred? Do you know, or have you heard, of similar activities affecting other Wells Fargo accounts? I appreciate any comments or suggestions and thanks for the help. Please e-mail me at [EMAIL PROTECTED] for comments you wish to share with me. Sincerely, Sam Muhawi -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Early Release of JES2 SPOOL space for spin-off data sets
On Fri, 25 Nov 2005 14:28:48 -0600, Hank Medler [EMAIL PROTECTED] wrote: On Fri, 25 Nov 2005 13:46:16 -0600, Hank Medler [EMAIL PROTECTED] wrote: -For years, JES2 wouldn't release spool space allocated to a given job -until all of the job was purged - i.e. freeing SPOOL space seemed to be -an all-or-nothing proposition. I learned today that JES2 frees up -SPOOL space for spin-OFF SYSOUT data sets (FREE=CLOSE) as soon as -they're printed or purged, i.e. JES2 no longer waits for the entire job -to get purged in order to free up some of the space allocated to it. -Apparently, this isn't something new at all: a quick test on my RESCUE -system shows that JES2 already behaved like that on MVS/ESA 5.2.2. -When did JES2 start freeing SPOOL space for spin-off data sets? Am I -confused again? Thanks. Gilbert, I am not entirely sure on this, but functionality for all JES2 SYSOUTs seems to have changed with our latest upgrade to z/OS 1.6 (at least this is when I started noticing). It appears that the SYSOUT (even without FREE=CLOSE) remain independent of each other within the Outgroup number groupings and allow rerouting of segments within an OUTGRP to separate destinations, classes, etc. For instance, if you run a simple IEBGENER and have your SYSUT2 route to the same OUTGRP as your MSGCLASS going to the held queue, you can enter the held queue of SDSF, type a '?' next to the output, and change it whichever class or destination you like. When you perform this, the OUTGRP number gets reassigned for the entry to the next sequential number. I believe this new (new to me anyway) ability to separate the SYSOUT and keep them independent is what allows JES2 to now free up space. If you purge this output from the queue, you should notice the space is cleared. As I recall, the SYSOUTs coded with FREE=CLOSE were always assigned their own exclusive OUTGRP number and thus space was freed when they were purged or printed. I could be wrong there though. When I started noticing this behavior recently, I thought I was going crazy and wondered if it was always like this. Hope this helps... Thanks, Hank Medler Hate to reply to myself, but I was wrong and it appears that the space is truly only freed when a SYSOUT is coded as FREE=CLOSE. Sorry, but even though it separates the output to another entry, the space is not freed when purging or printing the output of a non-FREE=CLOSE SYSOUT. Sorry, but I can't aid any help on the historic beginnings of freeing space on spin- off datasets... I haven't been around that long. Thanks, Hank Medler Okay, deja-vu... replying to myself again. While playing with this, I noticed something strange. I coded a simple IEBGENER with no FREE=CLOSE on the SYSOUT. If I take the output from that and purge it from SDSF, the space is not freed and all the DD's can be seen when doing a '?' next to the job in the status queue. However... if I do the '?' next to the job first and perform the 'P' command next to the DD while in the held queue, the space is freed and the job does not show the particular DD from the status queue. You can even purge the JESMSGLG, JESJCL, and JESYSMSG DDs from JES2 as well. Seems odd to me that purging an entire segment from the queue would be different from purging a specific DD, but perhaps I have just been oblivious to this behavior for quite some time. Please let me know if I have... Thanks, Hank Medler SPOOL space is freed for individual SYSOUT Data Sets only when it has been dynamically allocated. All JCL allocated SYSOUT, even with FREE=CLOSE, has SPOOL allocated in the Job's primary IOT. Whan a SYSOUT Data Set is dynamically allocated, it gets its own allocation IOT, so the space can be freed when the Data Set is deleted. All SYSOUT allocated in the Job's primary allocation IOT will be freed only when the entire Job is purged. Keith E. Moe Laid Back Software, Inc. http://www.laidbacksoftware.com [EMAIL PROTECTED] (408) 749-0655 (voice and FAX) (408) 480-2067 (cell) We take our clients seriously, not ourselves. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
