Re: Forcing TMS Tape entry into scratch status
Dave, Sorry for the confusion, I meant to say that I also did it by changing the expdt of a large number of tapes to today in batch and let TMS maintenance set them to scratch. If the TMS parms are set correctly, it will also uncatalog them at the same time. Kees. O'Brien, David W. [C] , NIH/CIT obrie...@mail.nih.gov wrote in message news:ff2686d06908c048b49f57240770b5cffb753...@nihmlbx01.nih.gov... Kees, Following your suggestion, I tried to delete one of the problem tapes and got the following: 200041UNABLE TO DELETE, MUST BE SCRATCH STATUS 0 RECORDS MARKED AS DELETED 1 ERRORS Thank You, Dave O'Brien NIH Contractor From: IBM Mainframe Discussion List [ibm-m...@bama.ua.edu] On Behalf Of Vernooij, CP - SPLXM [kees.vern...@klm.com] Sent: Wednesday, September 16, 2009 10:33 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Forcing TMS Tape entry into scratch status O'Brien, David W. [C] , NIH/CIT obrie...@mail.nih.gov wrote in message news:ff2686d06908c048b49f57240770b5cffb753...@nihmlbx01.nih.gov... We are in the process of eliminating old pools of tapes. The application owner and the tech support for the silos uncataloged the datasets and changed the Expdt to the current date expecting the nightly TMS functions to flip the scratch bit for each of these tapes. I thought I could delete the pool but the tapes must be in scratch status first. Maybe I'm just forgetting something simple but I don't see a utility that will force a 'scratch status'. Any suggestions? Thank You, Dave O'Brien That's the way I used to do it too. Kees. ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe Hall of Fame: Three New Members Added
I second Walt's nomination ! Can I nominate Walt Farrell for the next induction? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
I don't understand.The scheduling software and the operations people look at the return code and respond. But instead of poring through a dump, the displays tell them exactly what happened, making it easier and quicker to find out what they should do as a result of the failure. Thats the theory. How would you do that at 1000 tx/sec? And how would that work with the poor programming that sometimes comes from the cheaper programmers that are initially hired these days? Examples from experience: 10 return codes for 25 error reasons. Untested software paths. Software not regression tested, but put into production. A return code not being documented, because the documentation is out of date or not updated. Why default to the standard ABEND when I can give specific information and ABEND in a controlled manner? If the specific information is provided. Thats only the case with expected (caught) errors, not with unexpected errors. I would say, a dump cannot lie. A return code could. What if the return code comes from generated code and you don't have the documentation of those APIs handy as operator? And what do you do with the return code in that case? When failure *does* matter, I like to give the best information I can, and I like to make the failure as controlled as I can. The project plan for software development does not give you the time to implement that, so what? Too much uncertainty relying on programmers ;-) *you can now start beating me* Denis. -Original Message- From: Howard Brazee howard.bra...@cusys.edu To: IBM-MAIN@bama.ua.edu Sent: Wed, Sep 16, 2009 4:58 pm Subject: Re: Java Batch und JCL (DSN Disposition) On 16 Sep 2009 07:41:27 -0700, don.le...@leacom.ca (Don Leahy) wrote: Rollback is an option, but what do you do after that? ? Fail silently? Use the Return Code that has been established for the condition. Sure, but that works only in those cases where the failure doesn't matter. I don't understand.The scheduling software and the operations people look at the return code and respond. But instead of poring through a dump, the displays tell them exactly what happened, making it easier and quicker to find out what they should do as a result of the failure. Why default to the standard ABEND when I can give specific information and ABEND in a controlled manner? When failure *does* matter, I like to give the best information I can, and I like to make the failure as controlled as I can. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: 33 Years In IT/Security/Audit
Thanks Steve This was a machine that could not keep up with the times (perhaps), not like the open systems we see today. Love to see one and give it a big hug and lots of kisses ! Thanks Best Regards. Umamaheshwar Iyer | Project Manager | Tech Mahindra Hinjwadi, Pune - 411 004, INDIA Ph. Office: +91 20 4225 0801 | Cell: +91 97666 44472 Email: ui0037...@techmahindra.com www.techmahindra.com -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Thompson, Steve Sent: Wednesday, September 16, 2009 7:03 PM To: IBM-MAIN@bama.ua.edu Subject: Re: 33 Years In IT/Security/Audit -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Umamaheshwar Iyer Sent: Wednesday, September 16, 2009 7:48 AM To: IBM-MAIN@bama.ua.edu Subject: Re: 33 Years In IT/Security/Audit I started mine on a WANG-VS which was user friendly. After the demise of this wonderful machine, I got a chance working on the Mainframe, which was quite tough when working from a user friendly system to a non-user friendly system. Almost 25 Years now! Any idea if WANG is still lurking within the computing world? SNIPPAGE Dr. Wang is no longer with us. And the company, WANG, was taken over by another company and they basically dropped the hardware. Some years ago I was bidding on migrating WANG/VS based entities to z/OS. I understand that there are still a few holdouts in the Government arena. Regards, Steve Thompson -- Opinions expressed by this poster may not reflect those of poster's employer -- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Disclaimer: This message and the information contained herein is proprietary and confidential and subject to the Tech Mahindra policy statement, you may review the policy at a href=http://www.techmahindra.com/Disclaimer.html;http://www.techmahindra.com/Disclaimer.html/a externally and a href=http://tim.techmahindra.com/Disclaimer.html;http://tim.techmahindra.com/Disclaimer.html/a internally within Tech Mahindra. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
passing parameter data in BPXBATCH
Dear all, I try to call a C program via a JCL script. I get stuck in passing parameter data to the C program search_modules. It is clear that I can pass these parameters to BPXBATCH-PARM , but the limitation is the length of 100 characters of the PARM parameter. As I intend to pass more than one variable, in my case these are all DD names (e.g. TESTLIB), the C program cannot open these files given as DD names (see code). So far, I found out that the JCL seems to fork another process calling the C prog with its own address space. Though I tried to use STDENV and STDPARM it is not possible to use the TESTLIB dd name directly as I wish. Is it possible to bypass these circumstances ? Thanks my JCL: // SET CALL='/.../search_modules' //SRCHMOD EXEC PGM=BPXBATCH,PARM='PGM CALL' //TESTLIB DD DSN=EXI.DATA(LIBSV),DISP=SHR //STDOUT DD PATH='/.../results', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) //STDERR DD PATH='/tmp/searchmod.stderr', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) C code: FILE* lib_file; if ((lib_file = fopen(TESTLIB, r)) == NULL ) { printf(Error with fopen); return 1; } Output: Error with fopen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
This is just poor man's control of processing. I fail to see why savepoint, rollback and commit are less effective than abending and forcing a rollback. I am sure that the shop has access to some sort of notification system (i.e. e-mail). Save off the offending stuff, send out a processing exception to be remediated and continue. While I did cede that abends may be useful, some actual programming logic would be more useful. Basics are documented in DB2 SQL manuals. I agree for the ideal software, but in reality who pays for return codes and error handling routines or testing? As for: This is just poor man's control of processing. I fail to see why savepoint, rollback and commit are less effective than abending and forcing a rollback. You rely on the programmer to take the appropriate actions. Would you? You turn on autocommit for JDBC clients, because you don't want deadlocks or long database locks. You turn it off and leave control to the programmers, you earn long locks, deadlocks and slow processing/low parallelism. Other example: I believe the advantage of abend and rollback is, that the rollback takes place immediatly after abend. So the database locking time is short. It is unpredictable how long the time between error and rollback is if you leave control to the programmer. A program might do other things before issuing rollback. Keep a 1000tx/sec system in the back of your mind. It might (based on the database access requirements - locking) immediatly stall due to deadlocks as soon as a crucial database record is locked longer than 100ms. Who of the new hires will keep that in mind with database and application design in times of we draw a model or persist objects by mapping those into a database using an object-relational framework? Abend processing may have been popular.. but does it still need to be as a normal course of action? Rob Schramm In todays world, the way that programming is done today (insufficient and not enough testing), I would not rely on return codes. There are cases where a 20+ years programmer is cheaper than the new hire, because they don't reinvent the wheel in terms of error processing, error recovery, high volume transaction processing etc. Denis. -Original Message- From: Rob Schramm rob.schr...@siriuscom.com To: IBM-MAIN@bama.ua.edu Sent: Wed, Sep 16, 2009 5:01 pm Subject: Re: Java Batch und JCL (DSN Disposition) This is just poor man's control of processing. I fail to see why savepoint, rollback and commit are less effective than abending and forcing a rollback. I am sure that the shop has access to some sort of notification system (i.e. e-mail). Save off the offending stuff, send out a processing exception to be remediated and continue. While I did cede that abends may be useful, some actual programming logic would be more useful. Basics are documented in DB2 SQL manuals. Abend processing may have been popular.. but does it still need to be as a normal course of action? Rob Schramm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
Antwort: passing parameter data in BPXBATCH
Sven, have you tried to open the file with another syntax, like fopen(DD:TESTLIB,r)? Cheers Michael Sven Siebert extern.sven.sieb...@volkswagen.de Gesendet von: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 17.09.2009 09:20 Bitte antworten an IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU An IBM-MAIN@BAMA.UA.EDU Kopie Thema passing parameter data in BPXBATCH Dear all, I try to call a C program via a JCL script. I get stuck in passing parameter data to the C program search_modules. It is clear that I can pass these parameters to BPXBATCH-PARM , but the limitation is the length of 100 characters of the PARM parameter. As I intend to pass more than one variable, in my case these are all DD names (e.g. TESTLIB), the C program cannot open these files given as DD names (see code). So far, I found out that the JCL seems to fork another process calling the C prog with its own address space. Though I tried to use STDENV and STDPARM it is not possible to use the TESTLIB dd name directly as I wish. Is it possible to bypass these circumstances ? Thanks my JCL: // SET CALL='/.../search_modules' //SRCHMOD EXEC PGM=BPXBATCH,PARM='PGM CALL' //TESTLIB DD DSN=EXI.DATA(LIBSV),DISP=SHR //STDOUT DD PATH='/.../results', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) //STDERR DD PATH='/tmp/searchmod.stderr', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) C code: FILE* lib_file; if ((lib_file = fopen(TESTLIB, r)) == NULL ) { printf(Error with fopen); return 1; } Output: Error with fopen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: passing parameter data in BPXBATCH
Have you tried running BPXBATCH under TSO in batch??? You could create a command of any length using the + continuation character. If you want to feed in data via JCL you must create programs to read the PARM and write it out as a file, then concatenate several of these outputs together to build the TSO command Andy Robertson. Sven Siebert extern.sven.sieb...@volkswagen.de , I try to call a C program via a JCL script. I get stuck in passing parameter data to the C program search_modules. It is clear that I can pass these parameters to BPXBATCH-PARM , but the limitation is the length of 100 characters of the PARM parameter. As I intend to pass more than one variable, in my case these are all DD names (e.g. TESTLIB), the C program cannot open these files given as DD names (see code). So far, I found out that the JCL seems to fork another process calling the C prog with its own address space. Though I tried to use STDENV and STDPARM it is not possible to use the TESTLIB dd name directly as I wish. Is it possible to bypass these circumstances ? Thanks my JCL: // SET CALL='/.../search_modules' //SRCHMOD EXEC PGM=BPXBATCH,PARM='PGM CALL' //TESTLIB DD DSN=EXI.DATA(LIBSV),DISP=SHR //STDOUT DD PATH='/.../results', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) //STDERR DD PATH='/tmp/searchmod.stderr', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) C code: FILE* lib_file; if ((lib_file = fopen(TESTLIB, r)) == NULL ) { printf(Error with fopen); return 1; } Output: Error with fopen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ** This email is confidential and may contain copyright material of the John Lewis Partnership. If you are not the intended recipient, please notify us immediately and delete all copies of this message. (Please note that it is your responsibility to scan this message for viruses). Email to and from the John Lewis Partnership is automatically monitored for operational and lawful business reasons. ** John Lewis plc Registered in England 233462 Registered office 171 Victoria Street London SW1E 5NN Websites: http://www.johnlewis.com http://www.waitrose.com http://www.greenbee.com http://www.johnlewispartnership.co.uk ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Antwort: passing parameter data in BPXBATCH
fopen (testlib, r) -- looks for file userid.testlib - TSO logic fopen (\'testlib\', r) -- looks for file testlib - MVS dataset fopen (dd:testlib, r) -- looks for dd-name there are additional filename conventions for HFS files This is how C (or LE) runtime works. kind regards Bernd Michael Klaeschen schrieb: Sven, have you tried to open the file with another syntax, like fopen(DD:TESTLIB,r)? Cheers Michael -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: passing parameter data in BPXBATCH
Use BPXBATSL instead of BPXBATCH. It will do a local spawn() which means your program will run as a subtask of BPXBATSL. It will have access to all the DDs in the step. -- Peter Hunkeler CREDIT SUISSE -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
AW: Antwort: passing parameter data in BPXBATCH
Yes, I did, but same output. I also insert ' and tried several ways. I think it's not a question of the syntax. -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] Im Auftrag von Michael Klaeschen Gesendet: Donnerstag, 17. September 2009 10:08 An: IBM-MAIN@BAMA.UA.EDU Betreff: Antwort: passing parameter data in BPXBATCH Sven, have you tried to open the file with another syntax, like fopen(DD:TESTLIB,r)? Cheers Michael Sven Siebert extern.sven.sieb...@volkswagen.de Gesendet von: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 17.09.2009 09:20 Bitte antworten an IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU An IBM-MAIN@BAMA.UA.EDU Kopie Thema passing parameter data in BPXBATCH Dear all, I try to call a C program via a JCL script. I get stuck in passing parameter data to the C program search_modules. It is clear that I can pass these parameters to BPXBATCH-PARM , but the limitation is the length of 100 characters of the PARM parameter. As I intend to pass more than one variable, in my case these are all DD names (e.g. TESTLIB), the C program cannot open these files given as DD names (see code). So far, I found out that the JCL seems to fork another process calling the C prog with its own address space. Though I tried to use STDENV and STDPARM it is not possible to use the TESTLIB dd name directly as I wish. Is it possible to bypass these circumstances ? Thanks my JCL: // SET CALL='/.../search_modules' //SRCHMOD EXEC PGM=BPXBATCH,PARM='PGM CALL' //TESTLIB DD DSN=EXI.DATA(LIBSV),DISP=SHR //STDOUT DD PATH='/.../results', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) //STDERR DD PATH='/tmp/searchmod.stderr', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) C code: FILE* lib_file; if ((lib_file = fopen(TESTLIB, r)) == NULL ) { printf(Error with fopen); return 1; } Output: Error with fopen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
AW: passing parameter data in BPXBATCH
Maybe it's easier to use the STDENV or STDPARM parameter. If no obvious solution exists, it's the alternative. Thanks. -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] Im Auftrag von Andy Robertson Gesendet: Donnerstag, 17. September 2009 10:45 An: IBM-MAIN@BAMA.UA.EDU Betreff: Re: passing parameter data in BPXBATCH Have you tried running BPXBATCH under TSO in batch??? You could create a command of any length using the + continuation character. If you want to feed in data via JCL you must create programs to read the PARM and write it out as a file, then concatenate several of these outputs together to build the TSO command Andy Robertson. Sven Siebert extern.sven.sieb...@volkswagen.de , I try to call a C program via a JCL script. I get stuck in passing parameter data to the C program search_modules. It is clear that I can pass these parameters to BPXBATCH-PARM , but the limitation is the length of 100 characters of the PARM parameter. As I intend to pass more than one variable, in my case these are all DD names (e.g. TESTLIB), the C program cannot open these files given as DD names (see code). So far, I found out that the JCL seems to fork another process calling the C prog with its own address space. Though I tried to use STDENV and STDPARM it is not possible to use the TESTLIB dd name directly as I wish. Is it possible to bypass these circumstances ? Thanks my JCL: // SET CALL='/.../search_modules' //SRCHMOD EXEC PGM=BPXBATCH,PARM='PGM CALL' //TESTLIB DD DSN=EXI.DATA(LIBSV),DISP=SHR //STDOUT DD PATH='/.../results', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) //STDERR DD PATH='/tmp/searchmod.stderr', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) C code: FILE* lib_file; if ((lib_file = fopen(TESTLIB, r)) == NULL ) { printf(Error with fopen); return 1; } Output: Error with fopen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ** This email is confidential and may contain copyright material of the John Lewis Partnership. If you are not the intended recipient, please notify us immediately and delete all copies of this message. (Please note that it is your responsibility to scan this message for viruses). Email to and from the John Lewis Partnership is automatically monitored for operational and lawful business reasons. ** John Lewis plc Registered in England 233462 Registered office 171 Victoria Street London SW1E 5NN Websites: http://www.johnlewis.com http://www.waitrose.com http://www.greenbee.com http://www.johnlewispartnership.co.uk ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
AW: passing parameter data in BPXBATCH
That's it !!! :) Thanks for your help, Sven Siebert -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] Im Auftrag von Hunkeler Peter (KIUP 4) Gesendet: Donnerstag, 17. September 2009 10:46 An: IBM-MAIN@BAMA.UA.EDU Betreff: Re: passing parameter data in BPXBATCH Use BPXBATSL instead of BPXBATCH. It will do a local spawn() which means your program will run as a subtask of BPXBATSL. It will have access to all the DDs in the step. -- Peter Hunkeler CREDIT SUISSE -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
On Tue, 15 Sep 2009 07:38:10 -0600, Steve Comstock st...@trainersfriend.com wrote: 2009/9/15 Michael Klaeschen michael.klaesc...@deutscherring.de Our development staff is going to develop new programs in Java instead of COBOL. Using the same staff of programmers that wrote the COBOL code? Why not. It is not the programming language you use that makes you a good programmer. IMHO a good COBOL programmer can easily become a good Java programmer, because he/she is a good programmer, period. Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Java Batch und JCL (DSN Disposition)
On Tue, 15 Sep 2009 11:50:05 +0200, Daniel Erdmann daniel.erdman...@googlemail.com wrote: This means they force an abend within the COBOL program code if the program detects some error. So instead of evaluating the RC within the JCL and executing the necessary steps for cleaning up they just rely on the abend-disposition for a rollback of GDGs etc.. This seems to work fine. I'm working for some months only at this company, but everybody from the operating says that they're pretty happy with this kind of cleanup procedure. I'm relatively new to the mainframe system programming (coming from the Unix world), but from my point of view this is 'untidy/dirty', and want to know if this practice is common to you. I think this is not at all untidy nor dirty. I think it is very good. It is a concise way of specifying how you want your files to be disposed of in case of good and bad termination of your program. And don't forget that causing an abend has the added benefit of rolling back any database work that was being done automagically. The conrete problem is that now we get some Java programs, means they're executed by the JVM which isn't so easy to force to abend. Of course we can do it by including some COBOL code or similar via JNI but at all I'm quite unsatisfied going this way because I think the correct way is to evaluate the RCs (which of course requires some additional work for our operating as they can't use anymore the easy to use abend-disposition for cleanup). If ever you find a way of getting that abend, you created in JNI or elsewhere, to percolate out of the JVM and into the JCL, then please, PLEASE!, tell us how you did it. I never succeeded in getting an abend out of the JVM and believe me, I tried... Thanks, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Java Batch und JCL (DSN Disposition)
Jan MOEYERSONS pisze: On Tue, 15 Sep 2009 07:38:10 -0600, Steve Comstock st...@trainersfriend.com wrote: 2009/9/15 Michael Klaeschen michael.klaesc...@deutscherring.de Our development staff is going to develop new programs in Java instead of COBOL. Using the same staff of programmers that wrote the COBOL code? Why not. It is not the programming language you use that makes you a good programmer. IMHO a good COBOL programmer can easily become a good Java programmer, because he/she is a good programmer, period. I agree. However, there is something besides the programmer. It is programming environment and system platform. Relaible platform and good environment help much to create good software. It also helpful if you don't have to rewrite your code just because of OS level changes (.net, etc.). -- Radoslaw Skorupka Lodz, Poland -- BRE Bank SA ul. Senatorska 18 00-950 Warszawa www.brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237 NIP: 526-021-50-88 Wedug stanu na dzie 01.01.2009 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 118.763.528 zotych. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchway XXI WZ z dnia 16 marca 2008r., oraz uchway XVI NWZ z dnia 27 padziernika 2008r., moe ulec podwyszeniu do kwoty 123.763.528 z. Akcje w podwyszonym kapitale zakadowym BRE Banku SA bd w caoci opacone. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
On Tue, 15 Sep 2009 07:59:05 -0600, Steve Comstock st...@trainersfriend.com wrote: Ah. I ask because Jonathan Sayles, and some others, insist that long time COBOL programmers can't learn Java. So your This is simply not true. I and several of my colleagues are living examples of the contrary. Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe Hall of Fame: Three New Members Added
crashlu...@gmail.com (Chris Craddock) writes: Coyote something. That was the original postal area name. For some reason I guess it was considered un-pc at the time. re: http://www.garlic.com/~lynn/2009n.html#15 Mainframe Hall of Fame: Three New Members Added closet post office; (also) the range of hills behind the lab ... look at the images on the reference ... demarks south san jose and coyote valley. http://www.ajnordley.com/IBM/Air/SVL/ some coyote valley associiation had lobbied the state that the original 101 new/expansion would only be four lanes thru coyote valley ... so it changed from six lanes to four lanes at cochran av ... resulting in enormous traffic jam during the morning rush hour going north ... and also changed from six lanes to four lanes in south san jose (about at hiway 85 merge) resulting in enormous traffic jam going south in the evening. it was common at the time to name lab. for closest post office ... when there wasn't any other designation. that wasn't the problem. however, I happened to be in Washington DC with the kids during spring break (the week before scheduled opening of STL). There were a number of demonstrations on the steps of the capital by coyote, a san francisco working lady's association. -- 40+yrs virtualization experience (since Jan68), online at home since Mar1970 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
Denis, Just making my point for me. Don't get me wrong... I think it is great that MVS does such a wonderful job of things.. especially abends. And DB2 for rolling things back. But I know that there are developers on this list who write some damn good code and use abends judiciously. The assumption that programmers can't take care of business is just a fallacy. It is almost windows mentality just reboot to fix it. DB2 has given the programmer the ability to control when things are done.. are we advocating that the programmers are just too stupid to take advantage of it? Well, as for autocommit that you are referring.. it is more of an online thing.. and yes.. application programmers are notoriously lazy (to which they'll reply but Oracle does it for me.. why should I care.. and why doesn't DB2 just read my mind?) when it comes to such things. 1) do work, if bad rollback to prior savepoint 2) commit 3) savepoint Now granted in the promise land of all things java, programmers are supposed to be programming logic and leaving plumbing up to those that know how to do it (too many acronyms to list.. BPL comes to mind) But shouldn't the plumbing be taking advantage of everything offered... instead of oops.. just abend for any condition and stop processing. For that matter.. lets just abend CICS or WebSphere .. go out for coffee (or beverage of choice) and just leave everything in a down condition. We can get along without all these pesky computers... get back to stone age living. I thought this thread started out more as a batch issue. Oh well.. I guess it comes down to the difference of good programming and poor programming. Cheers, Rob Schramm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Is there any concern when added real memory from 5G to 7G
On Wed, 16 Sep 2009 20:38:38 -0400, Scott Rowe scott.r...@joann.com wrote: The Page Frame Table moved out of ESQA/ECSA in OS/390 2.10 OS/390 2.10 + ARCHLVL=2 Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: COBOL programmers can't learn Java
I think a harder conceptual difference isn't between programming languages, but it is between having most everything in one place and most everything spread out and used by everyone. Tracing down anomalies, changing testing standards, changing reliability standards, etc. can be harder than actually coding. We have a far higher percentage of IS professionals working behind the scenes and a far smaller percentage of IS professionals creating the applications that the users actually see.There's more systems type work - that often seem to get in the way of getting the application working. It's necessary stuff. For instance, security needs are much harder to implement when users might be in Starbucks anywhere in the world instead of in the office across from the mainframe. Automated testing tests code, but not so much whether we are actually giving the proper data to the proper people. But what choice do we have? We have to assume that components work correctly in much the same way that CoBOL programmers assume COMPUTE works correctly (We can't afford to change a component nor the way COMPUTE works when so many applications are expecting them to work the way they work now). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Interesting article on the future of mainframe programming and support personnel
On 16 Sep 2009 14:27:57 -0700, gerh...@valley.net (Gerhard Postpischil) wrote: Ian wrote: Take a moment and participate in the poll: http://www.cicsworld.com/ Like many a poll, it's missing some alternatives, making the results questionable. Just some quick additions: I'm semi-retired, doing occasional consulting work or I'm already retired or I'm retired but do occasional pro bono work or I'm not retiring, but changing careers (perhaps to politician g I'm qualified to retire - when I retire is dependent mostly upon my health, but real estate, gas prices, how much I like working in the new system, etc..There are variables within my health - for instance, if I can't play golf, I won't need as much money. All of the following (from the survey) demand that I can predict those variables. I could throw dice to come up with an answer, I suppose. Within 6 months. 6 months to a year 1 to 2 years away 3 to 5 years away 6 to 10 years away More than 10 years away I'm semi-retired, doing occasional consulting work I am retired. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
On 17 Sep 2009 00:12:01 -0700, denisgaeb...@netscape.net (Denis Gäbler) wrote: I don't understand.The scheduling software and the operations people look at the return code and respond. But instead of poring through a dump, the displays tell them exactly what happened, making it easier and quicker to find out what they should do as a result of the failure. Thats the theory. How would you do that at 1000 tx/sec? And how would that work with the poor programming that sometimes comes from the cheaper programmers that are initially hired these days? Any errors that the programmer foresees gets planned for to have a meaningful abnormal end. The ones that were not coded for get the default Abend. And good programmers do better than poor programmers - is that new? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Java Batch und JCL (DSN Disposition)
On 16 Sep 2009 12:59:43 -0700, rfocht...@ync.net (Rick Fochtman) wrote: That's not mostly because of their salaries. --unsnip- When they spend too much of our money, who cares how they spend it? To quote Ray Stevens: If 10% was good enough for Jesus, it ought to be enough for Uncle Sam! Don't think that what we are taxed is what we see taken out of our paycheck. We are taxed every time we buy something from a company that is taxed. We are taxed when the deficit removes value from our money (and of our grandchildren's money). But it *does* make a difference how it is spent. (The difference between parties in practice isn't how much they spend, it's how they spend that much). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Is there any concern when added real memory from 5G to 7G
Was it just for ARCHLVL=2? I remember having to fix some code used in several of the Softworks products that had been mucking about in the PFT for years - all of a sudden it couldn't find the PFT anymore ;-) Mark Zelden mark.zel...@zurichna.com 9/17/2009 10:16 AM On Wed, 16 Sep 2009 20:38:38 -0400, Scott Rowe scott.r...@joann.com wrote: The Page Frame Table moved out of ESQA/ECSA in OS/390 2.10 OS/390 2.10 + ARCHLVL=2 Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Multiple-Language Support in z/OS
Hi Listers I have a developer in my shop who has ported a product in z/OS, involving USS, java, WAS for z/OS and WMQ for z/OS. He wants to test the ported products compatibility with various languages like Chinese etc. He was asking me enable the language support packs for various languages.Request you to let me know how to go about it. Should I implement UNICODE/DBCS? How should I go about it? TIA Arun -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: //SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: //SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: // SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
Other question... When using this method can you think of any reason not to simplify the DD to //DB2PLAN DD DSN=PLAN I've always hated the fact that DISP defaults to (NEW,DELETE), but here is one case where that is ideal, so why not take advantage of it? Looks like SPACE must default to (0,0), so again that is ideal. Actually, I just noticed you specified PASS instead of DELETE for the normal-disp. Any specific reason? Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: //SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
For a regular batch program, yes. Unfortunately most of our programs are IMS, and as far as I know you cannot pass PARM data down to the application program. For those who don't know IMS, this is how an IMS batch program is executed: //STEP01EXEC PGM=DFSRRC00, // PARM=(DLI,DDADMP,DDMPPSB) DFSRRC00 is the IMS driver program, which calls DL/I application program called DDADMP using a DL/I PSB called DDMPPSB. Obviously I could use a separate dataset to contain the plan et all, but then I can't use symbolic parms. Frank On 9/17/2009 at 9:36 AM, in message 6133ad1f0909170836q22bed236w6d4ece6d36a82...@mail.gmail.com, Don Leahy don.le...@leacom.ca wrote: FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: //SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
Re: Reading DD card information
Assembler function e-mailed offline On Thu, 17 Sep 2009 09:27:42 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
The way our applications DB2 programs are coded is - they know nothing about the plan [or even about the DB2 subsytem to connect to]. All the have is the SQL logic. On a first SQL call a homegrown DSNHLI subroutine determines all the required parameters [that are NOT passed on the SQL call and the subroutine has no access to the EXEC PARM!], issues a connect and opens the plan. On Thu, 17 Sep 2009 11:36:45 -0400, Don Leahy don.le...@leacom.ca wrote: FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Pass DB2 PLAN names to IMS Programs (was Reading DD card information)
Hi Frank, Back in the 1980s I was asked to produce a routine to allow the passing of EXEC PARM information to IMS programs, to eliminate the use of a parameter card file. The only real issue was the DFSRRC00 like to be the TOP RB on the chain, so the solution was to write two small Assembler front programs. The first was a front end to DFSRRCO0, which took the parm information and split it so that DFSRRC00 only got its bit. The User bit of the parm was stored in the second program which was simply a holding area. The DFSRRC00 from end issued XCTL to get to DFSRRC00 proper after the split, and the User Program (COBOL) ewas invoked as normal. It called the second routine holding the 'parm information' via a dynamic link. I still have all the code. 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
IBM Software Pricing
Yesterday I went to the Midwest Computer Measurement Group (MCMG) in downtown Chicago. One of the sessions I attended was put on by Craig Mullins of Neon Software. He didn't talk about his product, zPrime, but talked about the 5 different specialty engines that IBM has. Most of what he said, I already knew, but it was a good review as I tend to forget things if I don't use them day to day. Craig had a few comments that I thought were very good regarding IBM software pricing. I wish I would have wrote them down so I could quote Craig, but I'll try to give you the gist of them. He talked about IBM's pricing, particularly regarding the zIIP and zAAP engines. He mentioned that for many of the large mainframe shops that have huge inventories of Cobol, PL/1, and CICS programs, that there is pretty much no competition for those, and that it is very expensive to convert all of them to some other platform. Then, he talked about the new workloads, such as JAVA programs, web serving, and DB2 Database serving, which have lots of competition in the marketplace. Then he mentioned that IBM has given us the zIIP and zAAP engines, and now with z/OS 1.11 or PTFs for 1.10 and 1.9, that we can even run zAAP engine processing on zIIP engines. His comment was that the software pricing on zIIP and zAAP engines, being essentially free for all IBM work that runs on them, is good for IBM, as it helps them be more competitive in these new workloads. But then Craig asked the question is it necessarily good for the average IBM customer? Maybe not. It all depends on your workload. Obviously if you have a lot of the new workload stuff running on your system, you can take advantage of the lower pricing. If not, you can't! Craig had a couple of other comments that I thought were good. The first was that the compound annual growth rate for mainframe MIPS since 2003 was 20%. The other thing was that mainframe costs tend to be broken up as follows: 25% for Labor 25% for Hardware 40% for Software 10% for all other costs Craig had gotten both of those statements from an IBM presentation he had attended, although I can't remember who gave that presentation. If anyone is interested, I'll post the link to the MCMG site that has this presentation when it is posted. Craig said he would email it to MCMG. MCMG said they would post the presentation when they got it. I checked earlier today, and it wasn't there yet. The next meeting of MCMG is in November, and will be at a user site very close to the Amtrak Union Depot train station in downtown Chicago. I'll post the link to the meeting when I get it. I forgot the exact date. If you live near Chicago, these meetings are always very worthwhile. I even got up at 4:45 A.M. to take the train to Chicago to see this. It's better if you can take public transportation, as parking cost $18 and the traffic is horrific. Of course if your company pays, it doesn't matter. Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
There is more than one way to skin this cat, but the traditional way to pass the DB2 plan name to DLI batch programs is to use the DDLITV02 dd statement. (The last two parameters are the Plan and Program names and don't have to be the same). //*-PLAN---PROGRAM-- //DDITV02 DD * DSN2,SYS1,DSNMIN10,,A,-,,XIFBB43,CIFBB43 /* And the EXEC statement resembles: //IFB43EXEC PGM=DFSRRC00,REGION=4000K, // PARM='DLI,DSNMTV01,CIFBB43,10,,,0,,N,0,T,,Y' DSNMTV01 is the DLI interface program. It launches the program specified in the DDITV02 dd using the Plan that is also specified there. On Thu, Sep 17, 2009 at 11:42 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: For a regular batch program, yes. Unfortunately most of our programs are IMS, and as far as I know you cannot pass PARM data down to the application program. For those who don't know IMS, this is how an IMS batch program is executed: //STEP01 EXEC PGM=DFSRRC00, // PARM=(DLI,DDADMP,DDMPPSB) DFSRRC00 is the IMS driver program, which calls DL/I application program called DDADMP using a DL/I PSB called DDMPPSB. Obviously I could use a separate dataset to contain the plan et all, but then I can't use symbolic parms. Frank On 9/17/2009 at 9:36 AM, in message 6133ad1f0909170836q22bed236w6d4ece6d36a82...@mail.gmail.com, Don Leahy don.le...@leacom.ca wrote: FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: // SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by
DFSMShsm ABARS
Hi, We would like to use DFSMShsm ABARS to transfer an applications datasets from one lpar to another. The transfer will take place more than once, first during a test period and then again at the cut-over. DFSMShsm ABARS makes it possible to bundle active, ML1 and ML2 datasets and get them to the target lpar into the same categories. When we repeat the transfer during the test period and finally at cut-over, we need to first delete the datasets on the target lpar. Does DFSMShsm ABARS offer help to identify the datasets so that they can be deleted, even more so, further datasets that are created by the said application? The Redpaper DFSMShsm ABARS Aggregate Stacking Procedure (This document REDP--00 was created or updated on July 30, 2008.) gives an overview and samples for ABARS. In the Redbook DFSMShsm ABARS and Mainstar Solutions (Aug 2002) I see the Mainstar Solutions' sister products ASAP and Backup Recovery Manager. Would I be dependant on these products to do this application migration? I would appreciate your help. Regards, Allan Boyles -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Question on ACS Routines
Hi Listeners, I'm trying to understand how this works: SELECT WHEN (HLQ = USER)/* When the dataset's HLQ is a*/ SET STORCLAS = 'USERSC' /* userid, set the storage class */ /* to USERSC. */ USER is a read-only variable and the storage class is set to USERSC if the HLQ is a users id. For some reason, this logic is not working and I can't figure out why? There are more entries in the SELECT but I moved this one to the top... Thanks in advance... George Rodriguez Specialist, Systems Programmer Network Technical Services (561) 357-7652 (office) (561) 707-3496 (mobile) School District of Palm Beach County 3348 Forest Hill Blvd. Room B-332 West Palm Beach, FL. 33406-5869 Florida's Only A-Rated Urban District For Five Consecutive Years -- --Palm Beach County Schools- Rated A by the Florida Department of Education 2005-2009 -Home of Florida's first LEED Gold Certified School- ---http://www.palmbeachschools.org- The District of Palm Beach County is an Equal Education Opportunity Provider and Employer. Under Florida law, e-mail addresses are public records. If you do not want your e-mail address released in response to a public records request, do not send electronic mail to this entity. Instead, contact this office by phone or in writing. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Is there any concern when added real memory from 5G to 7G
It was a 64-bit related change. Do I have a OS/390 2.10 system around to prove it? No. Can I point you to doc? No... but there is probably something in the archives. There should be another developer on the list that can confirm someone from IBM. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html On Thu, 17 Sep 2009 10:31:49 -0400, Scott Rowe scott.r...@joann.com wrote: Was it just for ARCHLVL=2? I remember having to fix some code used in several of the Softworks products that had been mucking about in the PFT for years - all of a sudden it couldn't find the PFT anymore ;-) Mark Zelden mark.zel...@zurichna.com 9/17/2009 10:16 AM On Wed, 16 Sep 2009 20:38:38 -0400, Scott Rowe scott.r...@joann.com wrote: The Page Frame Table moved out of ESQA/ECSA in OS/390 2.10 OS/390 2.10 + ARCHLVL=2 Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
Looks like SPACE must default to (0,0), so again that is ideal. SPACE has no default. If you open a disk file with no SPACE for output, you will abend. Actually, I just noticed you specified PASS instead of DELETE for the normal-disp. Any specific reason? I was taught to do it that way, as well, 30 years ago. There is no harm. If you add steps later, you can re-use the file (important consideration when disk was expensive). And, it will be deleted at EOJ. - Too busy driving to stop for gas! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Is there any concern when added real memory from 5G to 7G
It's no big deal, of course, but now that I think about it, you are probably right. I don't think we encountered the problem in our testing, because we didn't have a 64-bit machine yet, so one of our ESP customers ran into it first. It was a pretty easy fix - as soon as I looked at the code I knew what was wrong, and all I had to do was delete a large chuck of code and replace it with a PGSER. Then I had to make the same change to about 3 other products that had used the same code. Mark Zelden mark.zel...@zurichna.com 9/17/2009 12:23 PM It was a 64-bit related change. Do I have a OS/390 2.10 system around to prove it? No. Can I point you to doc? No... but there is probably something in the archives. There should be another developer on the list that can confirm someone from IBM. Mark CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains confidential and privileged information intended only for the addressee. If you are not the intended recipient, please be advised that you have received this material in error and that any forwarding, copying, printing, distribution, use or disclosure of the material is strictly prohibited. If you have received this material in error, please (i) do not read it, (ii) reply to the sender that you received the message in error, and (iii) erase or destroy the material. Emails are not secure and can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by email. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Started Task Abends S522
Hi, All, This is a new one on me: A started task abends S522 after our JWT interval. This task is basically a TCPIP Sockets listener (part of an IBM product), and will be inactive frequently for long(er than our JWT) periods of time. I don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) TIA, -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
Article on Distributed Servers
I discovered this interesting article on distributed servers from the zjournal magazine: http://zjournal.com/index.cfm?section=articleaid=1218 I'm not sure if you have to register to read it. A short quote from the article: Scale-out distributed servers are like the crack-cocaine of the IT systems business- highly addictive and extremely damaging. Once an enterprise gets hooked on this potent drug, it has proven extremely hard to wean the corporate addicts off! Despite the devastating consequences, they reached for their next x86/x64 and UNIX scale-out server fix for every new workload that arose Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Started Task Abends S522
don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) TIME=NOLIMIT (or 1440) Just because it's an STC doesn't make it imune to JWT. - Too busy driving to stop for gas! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Started Task Abends S522
Chase, John wrote: Hi, All, This is a new one on me: A started task abends S522 after our JWT interval. This task is basically a TCPIP Sockets listener (part of an IBM product), and will be inactive frequently for long(er than our JWT) periods of time. I don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) TIA, -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 Is the program name in the PPT identified as a system task or does the exec card have TIME=1440 or NOLIMIT? -- Mark Jacobs Time Customer Service Tampa, FL Beware the man who knows the answer before he understands the question. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 on ACS Routines
Hi Listeners, I'm trying to understand how this works: SELECT WHEN (HLQ = USER)/* When the dataset's HLQ is a*/ SET STORCLAS = 'USERSC' /* userid, set the storage class */ /* to USERSC. */ USER is a read-only variable and the storage class is set to USERSC if the HLQ is a users id. For some reason, this logic is not working and I can't figure out why? There are more entries in the SELECT but I moved this one to the top... Thanks in advance... George Rodriguez // I highly recommend that you use WRITE statements in your code. Applications may initially complain about them, but stick by your guns - applications will get used to the extra output and the WRITES will make your life so much easier when trying to debug errors and save you untold time and headaches trying to resolve issues like this. I also recommend using paired SET/EXIT statements. From the code stub and the little information you've given us, there's no way for us to tell if the allocation fell out of the code before it reached this SELECTstatement or continued on after your SET statement and was subsequently re-assigned another storage class. Here's an example: WHEN ( DSNTYPE EQ DSN_TYPE_LIB ) /* Filter list for PDS or PDSE ds's */ DO SET STORCLAS = 'SCTSO' WRITE 'SCHS0050 ' DSN ' ' DSNTYPE /* SCHS0050 is a unique pointer to help identify the exit point for the code. EXIT END Every segment in my code is set up the same way and it's a piece of cake to debug - the EXIT point in the SMS code is clearly identified for every allocation. I've done this at multiple shops and I've never regreted it. Also have you set up your test cases and run them? Another good technique. Keep you old test cases and build new ones as needed. Run them against both the old code and the new code. ddk ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Started Task Abends S522
On Thu, 17 Sep 2009 16:58:22 +, Ted MacNEIL eamacn...@yahoo.ca wrote: don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) TIME=NOLIMIT (or 1440) Just because it's an STC doesn't make it imune to JWT. - Do you use an IEFUTL SMF exit in SUBSYS(STC)? Most versions I have used and seen check for an STC and extend the time. If you don't use it, then TIME= is the answer. Or even if you do that will fix it without changing IEFUTL. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto:mark.zel...@zurichna.com z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Started Task Abends S522
-Original Message- From: IBM Mainframe Discussion List [On Behalf Of Mark Jacobs Chase, John wrote: Hi, All, This is a new one on me: A started task abends S522 after our JWT interval. This task is basically a TCPIP Sockets listener (part of an IBM product), and will be inactive frequently for long(er than our JWT) periods of time. I don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) Is the program name in the PPT identified as a system task or does the exec card have TIME=1440 or NOLIMIT? Duh! Like I said, it was probably something obvious. No PPT entry, but had no TIME= on the EXEC statement either. It does now. Thanks, -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: Mainframe Hall of Fame: Three New Members Added
Timothy Sipples suggests: How about Gerrit Blaauw? I second that. The descriptions on that list are, at best, amusing. For example, it identifies Gene Amdahl as the chief architect of the System/360, which was definitely not the case. That honor belongs to Gerrit A. Blaauw. In consideration of the _actual_ contributions of the folks that _are_ on the list, I would add these individuals: Maurice Wilkes Kilburn, Edwards, Lanigan, Sumner (Project MAC, M.I.T.) Donald Ludlow Tom Simpson Mark Mergen, MD Jay Unger Rick Simpson Jim Walker David N Freeman Ken Kolence Bob Tomasulo Anthony J Barr Peter Nordike -- WB -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
On 9/17/2009 at 10:40 AM, in message 1484171359-1253205613-cardhu_decombobulator_blackberry.rim.net-185013...@bda488 bisx.prod.on.blackberry, Ted MacNEIL eamacn...@yahoo.ca wrote: Looks like SPACE must default to (0,0), so again that is ideal. SPACE has no default. If you open a disk file with no SPACE for output, you will abend. Actually, I just noticed you specified PASS instead of DELETE for the normal-disp. Any specific reason? I was taught to do it that way, as well, 30 years ago. There is no harm. If you add steps later, you can re-use the file (important consideration when disk was expensive). And, it will be deleted at EOJ. This is all for the normal use of a temporary dataset. In this specific case, however, we're using it more as a DUMMY dataset that is not accessed but is just used (misused?) to be able to pass symbolics into an application. Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 on ACS Routines
Do you have a filtlist? I believe that to use user, you would have to filter on user, as in FILTLIST USER INCLUDE (XXX*) then WHEN (DSN EQ USER) DO SET STORCLAS EQ 'USERSC' EXIT END Doug Darth Keller wrote: Hi Listeners, I'm trying to understand how this works: SELECT WHEN (HLQ = USER)/* When the dataset's HLQ is a*/ SET STORCLAS = 'USERSC' /* userid, set the storage class */ /* to USERSC. */ USER is a read-only variable and the storage class is set to USERSC if the HLQ is a users id. For some reason, this logic is not working and I can't figure out why? There are more entries in the SELECT but I moved this one to the top... Thanks in advance... George Rodriguez // I highly recommend that you use WRITE statements in your code. Applications may initially complain about them, but stick by your guns - applications will get used to the extra output and the WRITES will make your life so much easier when trying to debug errors and save you untold time and headaches trying to resolve issues like this. I also recommend using paired SET/EXIT statements. From the code stub and the little information you've given us, there's no way for us to tell if the allocation fell out of the code before it reached this SELECTstatement or continued on after your SET statement and was subsequently re-assigned another storage class. Here's an example: WHEN ( DSNTYPE EQ DSN_TYPE_LIB ) /* Filter list for PDS or PDSE ds's */ DO SET STORCLAS = 'SCTSO' WRITE 'SCHS0050 ' DSN ' ' DSNTYPE /* SCHS0050 is a unique pointer to help identify the exit point for the code. EXIT END Every segment in my code is set up the same way and it's a piece of cake to debug - the EXIT point in the SMS code is clearly identified for every allocation. I've done this at multiple shops and I've never regreted it. Also have you set up your test cases and run them? Another good technique. Keep you old test cases and build new ones as needed. Run them against both the old code and the new code. ddk ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 on ACS Routines
Do you have a filtlist? I believe that to use user, you would have to filter on user, as in FILTLIST USER INCLUDE (XXX*) then WHEN (DSN EQ USER) DO SET STORCLAS EQ 'USERSC' EXIT END Doug Good point, Doug - but USER is a read-only variable which IIRC is the ID of the user allocating the DS. Maybe what he's trying to accomplish is to check the 1st level against the USER id - in which case, he probably needs to specify DSN(1) instead of DSN. ddk (I still stand behind my statements about WRITE's EXIT's!) ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: [IBMTCP-L] How do I replace a CIP with an OSA when the CIP has OnePrint connected?
Martin, The token ring resides inside the CISCO is not propagated outside the router itself. So in terms of their statement they are correct unless you have tokenring adapters on the cisco router. The virtual adapters defined for the TN3270 servers and the corresponding CSNA statements act like a ring and talk to the mainframe VTAM via the CIP. Those token ring adapters act as a endpoint for XCA/SWN definitions. IBM has a migration paper for converting CISCO TN3270 definition to OSA. You could get that at the following URL ftp://ftp.software.ibm.com/software/network/commserver/whitepapers/TN3270_Migration.pdf The Cisco IOS Bridging and IBM Networking Configuration Guide, Release 12.4 at url http://www.cisco.com/en/US/docs/ios/bridging/configuration/guide/12_4/br_12_4_book.html explains in detail of the configurations of CSNA and corresponding TN3270 servers. Thanks Natarajan Kline, Martin martin.kl...@yrcw.com 9/17/2009 6:17 AM Chris: In the diagram for Ethernet-Attached SNA Nodes, does your logical configuration correspond to the top part of the diagram which does *not* involve having a DLSw node or the bottom part which does? No. You are oversimplifying. This Cisco router has three ethernet ports connected to (maybe switches???) and one ESCON channel port connected to an ESCON director which was used to connect it to multiple mainframes. The multiple OnePrint servers use both ethernet and SNA. None of them is directly connected to the Cisco router. Instead, they are connected to (maybe switches again) However, I am assured by our network team that one of the router ports and all of the OnePrint servers must be on the same subnet RANT(There's that word again!!! Assumed to be fully understood, but never defined. It's a LAN. It's a network. It's part of a network. What defines the boundaries of a subnet? I've asked many, many times, and gotten no answer. How can I know if a device is on a particular subnet when no one can define a subnet in meaningful terms to me? We have thousands of in-house devices on our network. They are all on our LAN. Most are inside the firewall. To me, that means they are all on the same subnet - 255.255.0.0:10.0.0.0)/RANT. You speak of having DLSws as if they are devices, but when I look up the definition, I find it is a protocol. Isn't that like saying I have UDPs and SNAs? Returning to the primary goal, which is to remove the Cisco router as a connection to the mainframe, the OnePrint servers are only part of the issue, though they are the most difficult to understand. That router is the only IP connection to that mainframe system. The router itself supports TN3270 and presents these devices as remote SNA devices to the mainframe. People who use TN3270 connect to this router, and do not specify the mainframe's IP address or network name. It currently handles thousands of these connections. It also handles all other TCPIP traffic to this mainframe - SMTP, FTP, some CA product communications, EE, etc. Both TCPIP and VTAM on the mainframe access this router through the same single channel interface. I may be able to test parts of this new configuration in my sandbox, but when I unplug the router, all of this traffic must continue to work flawlessly. That's what I mean when I say it must work the first time. I do not have a test Cisco router, and I cannot disconnect this router from production so I can play with it in the sandbox. I already know how to configure the TCPIP traffic and the TN3270 traffic to use an OSA port and TN3270 on z/OS. H. (long pause here, but of course you can't see that.) I shouldn't do my thinking out loud, but perhaps I can utilize one OSA port (OSA express GBE SX) to handle all traffic except the OnePrint servers, then tackle OnePrint alone using a separate OSA port (OSA Express 2 1000 BASE T Ethernet) configured as OSE. Cheryl Meehan has some suggestions on the OnePrint implementation that may prove fruitful. For now, I'll follow that track. Needing canonical and non-canonical forms of the MAC address is what you need to bear in mind when a token ring LAN segment is bridged to an Ethernet LAN segment - if I remember this topic correctly. For what it's worth, the network team (a regrettably unreliable source) that pseudo-supports the switches and little else (definitely, if 'mainframe' is mentioned, then they do not support it), insists we absolutely do not have and do not support token ring protocol. Yet, I am looking at a printout of the Cisco CIP configuration, and see lan TokenRing 1; source-bridge 300 1 333; . . . This is the same team that believes a 30-minute outage to a main switch is 'pretty much' non-impacting, even though it disables over 100 servers, all mainframe connectivity including system consoles, and so forth. In other words, my confidence in the reliability of what they say is extremely low. -- For IBMTCP-L subscribe /
Re: Question on ACS Routines
I don't think so. You can mask any filtlist (I do all kinds, db2 datasets, tso, ftp, ftpusers, etc). The include would be masked with the ID's he wanted to include (or exclude, for that matter), or at least that's what we do. Doug Darth Keller wrote: Do you have a filtlist? I believe that to use user, you would have to filter on user, as in FILTLIST USER INCLUDE (XXX*) then WHEN (DSN EQ USER) DO SET STORCLAS EQ 'USERSC' EXIT END Doug Good point, Doug - but USER is a read-only variable which IIRC is the ID of the user allocating the DS. Maybe what he's trying to accomplish is to check the 1st level against the USER id - in which case, he probably needs to specify DSN(1) instead of DSN. ddk (I still stand behind my statements about WRITE's EXIT's!) ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 on ACS Routines
George, SELECT WHEN (HLQ = USER)/* When the dataset's HLQ is a*/ SET STORCLAS = 'USERSC' /* userid, set the storage class */ /* to USERSC. */ This looks like it should work if you are in the alloc acs environment. I second Darth's suggestion that you put in write statements to write out the variables HLQ and USER to the job log. If you are running this against a test case, you do need to provide the user value in the testcase. Regards, John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
Another way to pass parms to a program invoked via DFSRRC00 is to use the APARM parameter. The APARM contents can be retrieved via an INQY ENVIRON call in the application program. (The parm is limited to 32 bytes in length). On Thu, Sep 17, 2009 at 11:42 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: For a regular batch program, yes. Unfortunately most of our programs are IMS, and as far as I know you cannot pass PARM data down to the application program. For those who don't know IMS, this is how an IMS batch program is executed: //STEP01 EXEC PGM=DFSRRC00, // PARM=(DLI,DDADMP,DDMPPSB) DFSRRC00 is the IMS driver program, which calls DL/I application program called DDADMP using a DL/I PSB called DDMPPSB. Obviously I could use a separate dataset to contain the plan et all, but then I can't use symbolic parms. Frank On 9/17/2009 at 9:36 AM, in message 6133ad1f0909170836q22bed236w6d4ece6d36a82...@mail.gmail.com, Don Leahy don.le...@leacom.ca wrote: FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: // SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET
Re: Question on ACS Routines
Doug, As Darth stated, USER is a read only variable passed into the alloc environment. I don't have access to an environment where I can run a quick test but I suspect you would get a translate error if you attempted to use a filter list with name USER. Regards, John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 on ACS Routines
The 2 of you talking have explained why it's not working. I'm the guy do the allocation though 3.2 and when I allocate a dataset using my userid as the HLQ, it works perfectly. When I try allocating someone else's datasets with their HLQ, it doesn't work... You've cleared up the mystery... Thanks guys... George Rodriguez Specialist, Systems Programmer Network Technical Services (561) 357-7652 (office) (561) 707-3496 (mobile) School District of Palm Beach County 3348 Forest Hill Blvd. Room B-332 West Palm Beach, FL. 33406-5869 Florida's Only A-Rated Urban District For Five Consecutive Years -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Darth Keller Sent: Thursday, September 17, 2009 1:28 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Question on ACS Routines Do you have a filtlist? I believe that to use user, you would have to filter on user, as in FILTLIST USER INCLUDE (XXX*) then WHEN (DSN EQ USER) DO SET STORCLAS EQ 'USERSC' EXIT END Doug Good point, Doug - but USER is a read-only variable which IIRC is the ID of the user allocating the DS. Maybe what he's trying to accomplish is to check the 1st level against the USER id - in which case, he probably needs to specify DSN(1) instead of DSN. ddk (I still stand behind my statements about WRITE's EXIT's!) ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- --Palm Beach County Schools- Rated A by the Florida Department of Education 2005-2009 -Home of Florida's first LEED Gold Certified School- ---http://www.palmbeachschools.org- The District of Palm Beach County is an Equal Education Opportunity Provider and Employer. Under Florida law, e-mail addresses are public records. If you do not want your e-mail address released in response to a public records request, do not send electronic mail to this entity. Instead, contact this office by phone or in writing. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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 on ACS Routines
I don't think so. You can mask any filtlist (I do all kinds, db2 datasets, tso, ftp, ftpusers, etc). The include would be masked with the ID's he wanted to include (or exclude, for that matter), or at least that's what we do. Doug // I agree that you can have lots of different filterlist's - I just don't think you can have one defined USER as that is defined as an SMS read-only Variable. Where I've had the need for a filter list of user ID's, I used a name like USER_ID or AUTH_USER, etc. From the manual: z/OS V1R9.0 DFSMS Storage Administration Reference (for DFSMSdfp, DFSMSdss, DFSMShsm) 1.16.3 Read-Only Variables Most ACS variables are read-only. Read-only variables contain data set and system information, and they reflect what is known at the time of the allocation request. You can use read-only variables in comparison operations, but you cannot change their values. Attention: In the data class ACS routine, the DSNTYPE, DSORG, MAXSIZE, NVOL, RECORG, and SIZE variables all default to null if no corresponding value is specified in the JCL. Some values of the DSNTYPE variable are set from values on the DD statement or dynamic allocation. All of the read-only variables appear in Table 22. The read-only variables are case sensitive. The following pages explain the uses of the read-only variables. Table 22. Read-Only Variables ACCT_JOB ACCT_STEP ACSENVIR ALLVOL ANYVOL APPLIC BLKSIZE DD DEF_DATACLAS DEF_MGMTCLAS DEF_STORCLAS DSN DSNTYPE DSORG DSOWNER DSTYPE EXPDT FILENUM GROUP HLQ JOB LABEL LIBNAME LLQ MAXSIZE MEMHLQ MEMLLQ MEMN MEMNQUAL MSPDEST MSPARM MSPOLICY MSPOOL MSVGP NQUAL NVOL PGM RECORG RETPD SECLABL SIZE SYSNAME SYSPLEX UNIT USER XMODE . . . . USER The user ID of the person allocating the data set. When DFSMShsm invokes the ACS routines, USER is either the requestor of the recall or recover, or the user ID of the DFSMShsm address space. If the environment is recall or recover, the variable is set only if the requestor of the recall or recover is not a DFSMShsm authorized user. (See Determining Distributed FileManager/MVS Data Set Creation Requests in topic 1.16.3.7 for Distributed FileManager/MVS usage information.) Type: Literal Max value: 8 characters ** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ** -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe Hall of Fame: Three New Members Added
On Thu, Sep 17, 2009 at 6:38 AM, Anne Lynn Wheeler l...@garlic.comwrote: crashlu...@gmail.com (Chris Craddock) writes: Coyote something. That was the original postal area name. For some reason I guess it was considered un-pc at the time. closet post office; (also) the range of hills behind the lab ... look at the images on the reference ... demarks south san jose and coyote valley. snip it was common at the time to name lab. for closest post office ... when there wasn't any other designation. that wasn't the problem. however, I happened to be in Washington DC with the kids during spring break (the week before scheduled opening of STL). There were a number of demonstrations on the steps of the capital by coyote, a san francisco working lady's association. So do I get half a gold star? -- This email might be from the artist formerly known as CC (or not) You be the judge. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
On Thu, 17 Sep 2009 09:38:39 -0600, Frank Swarbrick wrote: //DB2PLAN DD DSN=amp;PLAN I've always hated the fact that DISP defaults to (NEW,DELETE), but here is one case where that is ideal, so why not take advantage of it? Looks like SPACE must default to (0,0), so again that is ideal. My experience has been that omitting SPACE results in a JCL error. SMS may change the rules. -- 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: Reading DD card information
On Thu, 17 Sep 2009 09:27:42 -0600, Frank Swarbrick wrote: Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) An alternative is BPXWDYN. -- 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: Started Task Abends S522
Chase, John wrote: -Original Message- From: IBM Mainframe Discussion List [On Behalf Of Mark Jacobs Chase, John wrote: Hi, All, This is a new one on me: A started task abends S522 after our JWT interval. This task is basically a TCPIP Sockets listener (part of an IBM product), and will be inactive frequently for long(er than our JWT) periods of time. I don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) Is the program name in the PPT identified as a system task or does the exec card have TIME=1440 or NOLIMIT? Duh! Like I said, it was probably something obvious. No PPT entry, but had no TIME= on the EXEC statement either. It does now. You can also set it and forget it with $TJOBCLASS(STC),TIME=(1440,00), assuming JES2. Bob -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
Paul Gilmartin wrote: On Thu, 17 Sep 2009 09:38:39 -0600, Frank Swarbrick wrote: //DB2PLAN DD DSN=amp;PLAN I've always hated the fact that DISP defaults to (NEW,DELETE), but here is one case where that is ideal, so why not take advantage of it? Looks like SPACE must default to (0,0), so again that is ideal. My experience has been that omitting SPACE results in a JCL error. SMS may change the rules. You can set a default space parm in the ALLOCxx parmlib member. We don't have this coded, and it appears you can't change this dynamically, so I can't test if it would avoid the JCL error, but I would think it might. Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Reading DD card information
Not to drudge up old threads, but wouldn't it be nice if JCL PROC and SET variables were not thrown away by the converter/interpreter and instead placed in an ASASYMB-style symbol table by the initiator? This would be useful in so many ways Kirk Wolf Dovetailed Technologies http://dovetail.com On Thu, Sep 17, 2009 at 2:51 PM, Richard Peurifoy r-peuri...@neo.tamu.eduwrote: Paul Gilmartin wrote: On Thu, 17 Sep 2009 09:38:39 -0600, Frank Swarbrick wrote: //DB2PLAN DD DSN=amp;PLAN I've always hated the fact that DISP defaults to (NEW,DELETE), but here is one case where that is ideal, so why not take advantage of it? Looks like SPACE must default to (0,0), so again that is ideal. My experience has been that omitting SPACE results in a JCL error. SMS may change the rules. You can set a default space parm in the ALLOCxx parmlib member. We don't have this coded, and it appears you can't change this dynamically, so I can't test if it would avoid the JCL error, but I would think it might. Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Software Pricing
In a message dated 9/17/2009 11:05:15 A.M. Central Daylight Time, eric-ibmm...@wi.rr.com writes: you live near Chicago, these meetings are always very worthwhile. I even got up at 4:45 A.M. to take the train to Chicago to see this. It's better if you can take public transportation, as parking cost $18 and the traffic is horrific. Of course if your company pays, it doesn't matter. There's three good sessions from SHARE too. 6108 by Jeff Sullivan IBM, 6124 by Craig Mullins NEON, 6138 by Greg Dyck IBM. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Started Task Abends S522
Hi, All, This is a new one on me: A started task abends S522 after our JWT interval. This task is basically a TCPIP Sockets listener (part of an IBM product), and will be inactive frequently for long(er than our JWT) periods of time. I don't recall ever having seen a started task go s522 before. Any ideas? (It's probably something obvious, but I can't see it.) TIA, -jc- I had a similar problem with a TCPIP Sockets listener. I fixed it by setting a timer with STIMERM, and then waiting on the timer ECB as well as the TCPIP ECB. When the timer pops, I simply reset it. Thus, my task wakes up every few minutes for a microsecond or so, whether it's received any connections or not. Problem solved. :) Cheers, Allen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Article on Distributed Servers
In a message dated 9/17/2009 11:58:03 A.M. Central Daylight Time, eric-ibmm...@wi.rr.com writes: hooked on this potent drug, it has proven extremely hard to wean the corporate addicts off! Despite the devastating consequences, they reached for their next x86/x64 and UNIX scale-out server fix for every new workload that arose Can almost see the landing gear popping out. Then from todays's Developer works. --- quote -- IBM presents three major approaches for enabling multi-tenancy which differ in the degree of resource sharing and development complexity. We will also discuss the technical challenges to adopting the SaaS model and how the Amazon Elastic Compute Cloud (Amazon EC2) pre-loaded with IBM middleware can meet your development and deployment needs. (23 September 2009, Waltham, MA) _Don't miss out -- register today! _ (http://www.ibm.com/vrm/newsletter_10731_5968_131228_email_DYN_1IN/EFinnell106848702) --- end quote --- Full flaps. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
Interesting. I'd seen APARM mentioned but I could never figure out what it is actually for. Of course this uses the AIB interface and I can't for the life of me to get it to work, but I'll try it out another day when I have more patience. Thanks! Frank On 9/17/2009 at 11:46 AM, in message 6133ad1f0909171046u2b5966abk77f64a0f19170...@mail.gmail.com, Don Leahy don.le...@leacom.ca wrote: Another way to pass parms to a program invoked via DFSRRC00 is to use the APARM parameter. The APARM contents can be retrieved via an INQY ENVIRON call in the application program. (The parm is limited to 32 bytes in length). On Thu, Sep 17, 2009 at 11:42 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: For a regular batch program, yes. Unfortunately most of our programs are IMS, and as far as I know you cannot pass PARM data down to the application program. For those who don't know IMS, this is how an IMS batch program is executed: //STEP01EXEC PGM=DFSRRC00, // PARM=(DLI,DDADMP,DDMPPSB) DFSRRC00 is the IMS driver program, which calls DL/I application program called DDADMP using a DL/I PSB called DDMPPSB. Obviously I could use a separate dataset to contain the plan et all, but then I can't use symbolic parms. Frank On 9/17/2009 at 9:36 AM, in message 6133ad1f0909170836q22bed236w6d4ece6d36a82...@mail.gmail.com, Don Leahy don.le...@leacom.ca wrote: FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: How on earth did you guess what I wanted to use this for? This is exactly it. I want a way to set a DB2 plan using symbolics and have the program be able to read it. So do you have some code that you use to extract the DSN from the DB2PLAN DD? Someone suggested the DYNALLOC macro, and I've been fiddling with that but not yet got it figured out. (Not being an assembler programmer...) Haven't tried the other method yet. Thanks! Frank On 9/17/2009 at 9:11 AM, in message listserv%200909171011054643.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: Frank, The ONLY way I've found to pass a short string [up to 8 bytes] via a temporary DD is: //SET PLAN=PLANNAME //DB2PLAN DD DISP=(,PASS),SPACE=(0,0),DSN=amp;PLAN the above DSN will be formatted by JES as //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx from where you CAN get the desired PLANNAME. For longer strings consider multiple temporary DDs. HTH, -Victor- On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: I believe I have seen something like the following: //FJSTEST JOB NOTIFY=SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e- mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender
Re: passing parameter data in BPXBATCH
Sven, You might want to try our free COZBATCH utility, which is an alternative to BPXBATCH. See: http://dovetail.com/products/cozbatch.html Some features that apply to your question: - It runs in the same address space, so you C program will be able to read DDs. Unlike BPXBATSL, you can easily run a login shell in the same address space without being root. - you can use //STDIN DD *, so that is easy to write a shell script inline in your JCL. - you can work around the 100-character parm limit. See example #6 here: http://dovetail.com/docs/cozbatch/examples.html Kirk Wolf Dovetailed Technologies http://dovetail.com On Thu, Sep 17, 2009 at 2:20 AM, Sven Siebert extern.sven.sieb...@volkswagen.de wrote: Dear all, I try to call a C program via a JCL script. I get stuck in passing parameter data to the C program search_modules. It is clear that I can pass these parameters to BPXBATCH-PARM , but the limitation is the length of 100 characters of the PARM parameter. As I intend to pass more than one variable, in my case these are all DD names (e.g. TESTLIB), the C program cannot open these files given as DD names (see code). So far, I found out that the JCL seems to fork another process calling the C prog with its own address space. Though I tried to use STDENV and STDPARM it is not possible to use the TESTLIB dd name directly as I wish. Is it possible to bypass these circumstances ? Thanks my JCL: // SET CALL='/.../search_modules' //SRCHMOD EXEC PGM=BPXBATCH,PARM='PGM CALL' //TESTLIB DD DSN=EXI.DATA(LIBSV),DISP=SHR //STDOUT DD PATH='/.../results', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) //STDERR DD PATH='/tmp/searchmod.stderr', //PATHOPTS=(OWRONLY,OCREAT,OTRUNC), //PATHMODE=(SIRWXU,SIRWXG,SIRWXO) C code: FILE* lib_file; if ((lib_file = fopen(TESTLIB, r)) == NULL ) { printf(Error with fopen); return 1; } Output: Error with fopen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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
Denver SHARE Presentations on linuxvm.org - Three More
Cross-posted to Linux-390, IBMVM, and IBM-MAIN I've received three more Linux and z/VM presentations. Thanks to all the speakers that have contributed. Session Presenter Title 9137Rick Barlow Virtual Linux Server Disaster Recovery Planning 9153Rick Barlow z/VM Goody Bag 9213Rick Barlow Linux Servers on System z: Benefits and Features of Virtualization in the Enterprise Data Center http://linuxvm.org/Present/#share113 Mark Post -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Mainframe Hall of Fame: Three New Members Added
mike.my...@pcmh.com (Mike Myers) writes: I recall it being called Coyote Canyon on one of my trips out there. re: http://www.garlic.com/~lynn/2009n.html#15 Mainframe Hall of Fame: Three New Members Added http://www.garlic.com/~lynn/2009n.html#16 Mainframe Hall of Fame: Three New Members Added previously referenced URL with pictures and blurb about silicon valley lab http://www.ajnordley.com/IBM/Air/SVL/ also from above: Formerly known as Santa Teresa Lab (STL), IBM's SVL, nestled in the country side just south of the foot hills at the north end of the Coyote Valley in south San Jose, employs 1,300 people, and is where much of the software for IBM systems is developed. ... snip ... wiki page http://en.wikipedia.org/wiki/Coyote_Valley when tandem growth as at its height, they took option on the open field on the other side of santa teresa blvd (north of bailey ave) ... to build a large campus type location ... and then things took a downturn and it never happened. both tandem and apple had plans in the 70s moving major operations into coyote valley. http://lomaprieta.sierraclub.org/lp0103_Disasters.html from above: * Coyote Valley in south San Jose (still being waged by the chapter). In 1983 the San Jose City Council approved a 548-acre industrial park for Tandem Computers, which, the LP reported, in effect, opens up the entire 5,000-acre Coyote Valley for development. (The Tandem facility was not built.) ... snip ... apple and others had plans at various times in expanding into coyote valley. http://www.sanjoseca.gov/coyotevalley/index.html article from March 1999: http://findarticles.com/p/articles/mi_hb5553/is_199903/ai_n22390270/ from above: Mar. 3 -- Sixteen years after former Silicon Valley up-and-comers such as Tandem Computers Inc., Verbatim Corp. and Apple Computer Inc. said they were headed to San Jose's Coyote Valley, Cisco Systems Inc. on Tuesday formally announced its intention to do likewise. ... snip ... slightly related tandem drift ... past post mentioning celebration for Jim Gray last year: http://www.garlic.com/~lynn/2008p.html#27 Father of Financial Dataprocessing When Jim left for Tandem ... Jim wanted me to take over some number of his activities at IBM ... including things like consulting with the IMS group and interfacing to early relational database customers (some references in the above post, including references to old email from the period). A recent post discussing some of the subject http://www.garlic.com/~lynn/2009n.html#3 Hacker charges also an indictment on PCI, expert says -- 40+yrs virtualization experience (since Jan68), online at home since Mar1970 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Mainframe Hall of Fame: Three New Members Added
In a message dated 9/17/2009 1:21:00 P.M. Central Daylight Time, crashlu...@gmail.com writes: So do I get half a gold star? Maybe a big clap! Anyway, hard to talk about 360 without mentioning Fred Brooks-mythically speaking of course. _http://en.wikipedia.org/wiki/Fred_Brooks_ (http://en.wikipedia.org/wiki/Fred_Brooks) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
My god yes. VSE does this (allows symbolic JCL parms to be interrogated programatically). I was hesitant to bring it up, as people seem to think I just like to stir up trouble, but... :-) On 9/17/2009 at 2:13 PM, in message b2b367b60909171313g30eef2e0y4dd61782fdcf5...@mail.gmail.com, Kirk Wolf k...@dovetail.com wrote: Not to drudge up old threads, but wouldn't it be nice if JCL PROC and SET variables were not thrown away by the converter/interpreter and instead placed in an ASASYMB-style symbol table by the initiator? This would be useful in so many ways Kirk Wolf Dovetailed Technologies http://dovetail.com On Thu, Sep 17, 2009 at 2:51 PM, Richard Peurifoy r-peuri...@neo.tamu.eduwrote: Paul Gilmartin wrote: On Thu, 17 Sep 2009 09:38:39 -0600, Frank Swarbrick wrote: //DB2PLAN DD DSN=amp;PLAN I've always hated the fact that DISP defaults to (NEW,DELETE), but here is one case where that is ideal, so why not take advantage of it? Looks like SPACE must default to (0,0), so again that is ideal. My experience has been that omitting SPACE results in a JCL error. SMS may change the rules. You can set a default space parm in the ALLOCxx parmlib member. We don't have this coded, and it appears you can't change this dynamically, so I can't test if it would avoid the JCL error, but I would think it might. Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Software Pricing
OK Ed, where are these 3 sessions from Share being held at? Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Ed Finnell efinnel...@aol.com In a message dated 9/17/2009 11:05:15 A.M. Central Daylight Time, eric-ibmm...@wi.rr.com writes: you live near Chicago, these meetings are always very worthwhile. I even got up at 4:45 A.M. to take the train to Chicago to see this. It's better if you can take public transportation, as parking cost $18 and the traffic is horrific. Of course if your company pays, it doesn't matter. There's three good sessions from SHARE too. 6108 by Jeff Sullivan IBM, 6124 by Craig Mullins NEON, 6138 by Greg Dyck IBM. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Software Pricing
These were all from Denver proceedings. _www.share.org_ (http://www.share.org) In a message dated 9/17/2009 5:05:50 P.M. Central Daylight Time, eric-ibmm...@wi.rr.com writes: OK Ed, where are these 3 sessions from Share being held at? Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Ed Finnell efinnel...@aol.com In a message dated 9/17/2009 11:05:15 A.M. Central Daylight Time, eric-ibmm...@wi.rr.com writes: you live near Chicago, these meetings are always very worthwhile. I even got up at 4:45 A.M. to take the train to Chicago to see this. It's better if you can take public transportation, as parking cost $18 and the traffic is horrific. Of course if your company pays, it doesn't matter. There's three good sessions from SHARE too. 6108 by Jeff Sullivan IBM, 6124 by Craig Mullins NEON, 6138 by Greg Dyck IBM. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
On Thu, 17 Sep 2009 15:43:04 -0600, Frank Swarbrick wrote: My god yes. VSE does this (allows symbolic JCL parms to be interrogated programatically). I was hesitant to bring it up, as people seem to think I just like to stir up trouble, but... :-) On 9/17/2009 at 2:13 PM, in message b2b367b60909171313g30eef2e0y4dd61782fdcf5...@mail.gmail.com, Kirk Wolf wrote: Not to drudge up old threads, but wouldn't it be nice if JCL PROC and SET variables were not thrown away by the converter/interpreter and instead placed in an ASASYMB-style symbol table by the initiator? This would be useful in so many ways Oh, drudge away! (Or, even dredge if you prefer.) I wouldn't mind changing my JCL to enable this. A couple possibilities: o Support for symbol substitution in SYSIN data sets, so one might code: //STDPARM DD *,SYMBOLS=YES FOO=FOO BAR=BAR ... (wouldn't you like to be able to substitute JCL symbols in STDIN for COZBATCH?) o Or support in JCL to pass these in the second, third, ... arguments as in CALL (and without the 100-character limit): //STEP EXEC PGM=MYPROG,PARM=(LIST,XREF), // ALTPARM=('alternate DDNAME list','FOO=FOO','BAR=BAR',...) -- 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: Reading DD card information
snip-- Oh, drudge away! (Or, even dredge if you prefer.) I wouldn't mind changing my JCL to enable this. A couple possibilities: o Support for symbol substitution in SYSIN data sets, so one might code: //STDPARM DD *,SYMBOLS=YES FOO=FOO BAR=BAR ... (wouldn't you like to be able to substitute JCL symbols in STDIN for COZBATCH?) --unsnip-- There are a number of RYO utilities that will take values from the PARM field to update SYSIN-type datasets. Even have one myself, if you'd like a copy. snip-- o Or support in JCL to pass these in the second, third, ... arguments as in CALL (and without the 100-character limit): //STEP EXEC PGM=MYPROG,PARM=(LIST,XREF), // ALTPARM=('alternate DDNAME list','FOO=FOO','BAR=BAR',...) ---unsnip-- This one might be a bit harder. You'd have to update all your HLL compilers/libraries to allow for this possibility. If the 100-character limit were lifted for the standard PARM field, that might be a lot easier, especially within HLL compilers/libraries. Would you settle for a 255-character limit? Rick -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Reading DD card information
Oh, drudge away! (Or, even dredge if you prefer.) I wouldn't mind changing my JCL to enable this. A couple possibilities: o Support for symbol substitution in SYSIN data sets, so one might code: //STDPARM DD *,SYMBOLS=YES FOO=FOO BAR=BAR ... (wouldn't you like to be able to substitute JCL symbols in STDIN for COZBATCH?) o Or support in JCL to pass these in the second, third, ... arguments as in CALL (and without the 100-character limit): //STEP EXEC PGM=MYPROG,PARM=(LIST,XREF), // ALTPARM=('alternate DDNAME list','FOO=FOO','BAR=BAR',...) -- gil Or how about just: // IF ('FOO' EQ 'FOO') THEN // ... // ENDIF This facility would help us a *lot*. Allen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Reading DD card information
This sounds almost ideal. It seems to me that DB2 should allow for a user exit that is called the first time DSNHLI (DSNALI?) is called. If they did this, and documented it well, then we wouldn't have 20 zillion people having to solve this same issue over and over. Anyway, being what it is, and since you were so kind to share with me your DSNAME code, I don't suppose you'd be able to share with me your DSNHLI code as well...? Thanks, Frank On 9/17/2009 at 9:56 AM, in message listserv%200909171056561145.0...@bama.ua.edu, Victor Gil victor@broadridge.com wrote: The way our applications DB2 programs are coded is - they know nothing about the plan [or even about the DB2 subsytem to connect to]. All the have is the SQL logic. On a first SQL call a homegrown DSNHLI subroutine determines all the required parameters [that are NOT passed on the SQL call and the subroutine has no access to the EXEC PARM!], issues a connect and opens the plan. On Thu, 17 Sep 2009 11:36:45 -0400, Don Leahy don.le...@leacom.ca wrote: FWIW, I usually specify the plan via a PARM. Would this not suit your purpose? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Software Pricing
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Ed Finnell [ snip ] got up at 4:45 A.M. to take the train to Chicago to see this. It's better if you can take public transportation, as parking cost $18 [ snip ] Guess you haven't been to Chicago recently.. -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: Reading DD card information
At 09:42 -0600 on 09/17/2009, Frank Swarbrick wrote about Re: Reading DD card information: For a regular batch program, yes. Unfortunately most of our programs are IMS, and as far as I know you cannot pass PARM data down to the application program. For those who don't know IMS, this is how an IMS batch program is executed: //STEP01EXEC PGM=DFSRRC00, // PARM=(DLI,DDADMP,DDMPPSB) I may be confusing this program with a different program but I have the impression that it allows you to pass a parm to the application program by adding /passed-parm to the parm field: //STEP01EXEC PGM=DFSRRC00, // PARM=(DLI,DDADMP,DDMPPSB/) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IBM Software Pricing
The last time I was in Chicago for an MCMG meeting was at least a year and a half ago. I remember someone announcing that if you park in the lot at the Holiday Inn World Trade Center, it was $10 back then. There was a sign near the registration desk about $18 parking yesterday. I wish my pay went up that fast! And, I'll bet you do too. Of course, being on unemployment right now, I guess my unemployment would have to have a raise. Somehow, I don't think the taxpayers (myself included) would allow that. I heard something about a private company taking over all of the parking meters in Chicago, and raising the rates like 5 times or more if you park at a parking meter. Maybe that's why parking in private lots is so high. Someone also told me that they were trying to park at or near Soldiers Field, where the Bears play, and the sign said $45. And I thought it was ridiculous when the Brewer's parking went up to I think $8. Maybe thats why I haven't gone for several years. (How did this thread degenerate from IBM Software Pricing to the price of parking in Chicago? Some people ought to be shot!) Eric Bielefeld Sr. Systems Programmer Milwaukee, Wisconsin 414-475-7434 - Original Message - From: Chase, John jch...@ussco.com -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ed Finnell [ snip ] got up at 4:45 A.M. to take the train to Chicago to see this. It's better if you can take public transportation, as parking cost $18 [ snip ] Guess you haven't been to Chicago recently.. -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