Re: Why are TSO IDs limited to 7 characters
On Wed, Nov 10, 2010 at 09:32, Scott Rowe scott.r...@joann.com wrote: Flynn is dead. TRON is dead. *LONG LIVE THE MCP!* I am sure Unisys would be glad to see that sentiment expressed on an IBM forum. :-) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Why does TEST cancel breakpoints on BRC instructions?
The offset in a BRC is relative to the instruction, whether it is executed directly or by EX, so you cannot easily execute it out of line without recalculating the offset or simulating execution. It is easier to restore the instruction and execute inline. On Tue, Nov 9, 2010 at 17:32, Tony Harminc t...@harminc.net wrote: On 9 November 2010 17:45, Rick Fochtman rfocht...@ync.net wrote: ---snip-- Any ideas why this weird restriction exists? unsnip- I seriously doubt if TEST has been updated in donkey's years. I've noticed other restrictions. Well it can't be donkey's years, since there have been updates to at least detect things like this, whatever problem their code was having with it. There are others restrictions: you can't even set a breakpoint on a PR, even though it's a 2-byte instruction, and so is the SVC 97 they use as a breakpoint. But why they allow certain breakpoints just once... Perhaps it's on things that are hard to EXecute reliably. Hmmm... Needs more thought. Hard to know if it's just that they don't want to udpate old code with certain assumptions, or if it's really difficult to do for some reason. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Fast way of changing time - CBT File 639
We simply issue the appropriate SET TIMEZONE or SET CLOCK command on the appropriate day on the machines, and have not had problems for years. These commands do not change the TOD clock, and none of our software is sensitive to the local time. (We do follow up with a change to the CLOCKxx member, and, in that respect, the CBT file would be useful.) On Mon, Nov 8, 2010 at 08:06, Sam Golob sbgo...@cbttape.org wrote: Hi Folks, I enjoy when someone makes a post, a second person makes a remark about the post - related or unrelated to the original intent - and the people go to town, commenting about the remark, and saying not one word about the original subject. It's a lot of fun to read all this, and we certainly learn a lot from everything that is written. But sometimes it's also valuable to get back to the original point. So (regarding my post), even though it's nice to ask the operating system to AUTOMATICALLY adjust the time zones, my point was, that since operators operate z/OS anyway, you can enter one command (S SETHOUR or S SETFALL or S SETSPRING) and do everything in one fell swoop, including the change to the CLOCKxx PARMLIB member. That's the nice thing about CBT File 639 ( www.cbttape.org). Some installations might find doing that, useful, instead of having to IPL and make a big deal out of every clock change. I admit that when you move the clock forward, it might be easier, because you don't get overlapping SMF records for the same times, than when you move the clock backward. There may be other consequences that I don't know about. I'd like to hear a discussion of these types of implications and consequences. In a shop where I previously worked, they would shut down the machine for an hour when they moved the clock backward an hour. But they weren't a bank, and they didn't have to be up 24/7. Anyway, I'd appreciate hearing about the consequences for XCF and anything else internally in z/OS that might be relevant to a time change, especially when moving the time back. On a busy z/OS system that is up the better part of 24/7, what are the CONSEQUENCES of a time change, especially BACKWARD, as in the fall? Thanks again for any and all comments (directly relevant or not). I do appreciate what EVERYONE says. Keep up the good work! All the best of everything to all of you. Sincerely,Sam -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Fast way of changing time - CBT File 639
That raises a question. Why is there no way to pre-define the time zone offsets and boundaries in z/OS? You can do it easily in z/VM, z/VSE and, of course, Linux. Why not z/OS? On Sun, Nov 7, 2010 at 09:11, Sam Golob sbgo...@cbttape.org wrote: Hi Folks, CBT Tape File 639 from Hunter Zhou is a very fast and clever and on the fly way of changing the system time, so you may not be forced to IPL. SETHOUR is on File 639, and it is quite easy to set up, with 3 procedures and an APF-authorized program. SETHOUR not only resets the system clock on the operating system, but it edits the current CLOCKxx PARMLIB member automatically, so that the clock changes are saved after an IPL. Try it on your test system. You may like it well enough to use it in production. All the best of everything to all of you. (CBT disclaimer still applies, but I have found this to be very handy and useful.) Sincerely,Sam Golob -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Fast way of changing time - CBT File 639
On Sun, Nov 7, 2010 at 11:17, Paul Gilmartin paulgboul...@aim.com wrote: z/VM? Enlighten me. Last I looked, if I performed a SENDFILE the Friday before the DST change and received it the Monday after, the restored time stamp was an hour off. Likewise the times shown by the CP DISPLAY READER command. I suspect there are Info APARs defining these behaviors as features. That may have more to do with the way the timestamps are encoded in the spool files, than with the way the z/VM clock is set. In the z/VM system configuration, you can set the time zone boundaries, so that the appropriate GMT offset will be used when you IPL. (Likewise in z/VSE.) It does not switch automatically, but it does simplify things. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Fast way of changing time - CBT File 639
On Sun, Nov 7, 2010 at 14:12, Paul Gilmartin paulgboul...@aim.com wrote: Did you imply in your previoust that z/VM requires an IPL? z/OS does better than that (at least if you have ETR/STP). No, it does not require it. You can change the time zone with a a command, but when you do need to IPL, it will pick up the correct offset, without operator intervention. On z/OS, you can change the timezone with a command also, but you must change the CLOCKxx member or rely on the operator to get the correct value when you IPL. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: initiator
Do you have any exits that allocate datasets? On Wed, Nov 3, 2010 at 07:03, Carroll, William carro...@grangeinsurance.com wrote: Good morning all. I have a problem I would like to put out here and see if anybody else has seen it. The last couple of days I am having a batch job issue the message 'ief099i' waiting for datasets. The wait is being caused by an initiator that has not freed a dataset. In last night's case a job executed at 21:30 and ended successfully. The other job started to execute at 23:45 and issued the message. The local fix is to purge the initiator of the job that is holding the dsn. Thank YOU Bill Carroll CICS Systems Programmer\ Grange Insurance carro...@grangeinsurance.com DISCLAIMER: The information contained in this message may be privileged or confidential and is protected from disclosure. If the reader of this message is not the intended recipient, or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any dissemination, distribution or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by replying to the message and deleting it from your computer. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Sample code to read a PDS member using BPAM
Just to complete the options list - You can also read the members using QSAM in the case of dynamically determined or multiple members. You can use RDJFCB to get the JFCB, insert the member name, and use OPEN TYPE=J. To process another member, close the file, update the JFCB and re-open it. Using BPAM is more efficient, and does not require that the dataset be closed and re-opened between members. On Thu, Sep 30, 2010 at 03:03, John Blythe Reid johnblyther...@gmail.comwrote: Thanks a lot to everyone for your help. I based it on Eileen's sample code and it works fine. It's not obvious at first how to find out the length of the block read, but digging into it I saw that there's a pointer to status indicators at decb+16. At offset 14 into the status indicators is a half-word containing the residual byte count, so subtracting this from the block size gives the length of the block just read. Why do it in assembler ? Mainly because the other stuff here that does this sort of thing is already in assembler and I thought it was about time that I had a go at BPAM. I couldn't put the member name on the DD statement, as I always have done before, as it needs to handle multiple members, one for each AREA macro on the DBD definition. Bye for now, John. On 29 September 2010 20:21, Barkow, Eileen ebar...@doitt.nyc.gov wrote: ***this is part of a routine that reads a member of sys1.parmlib using BPAM OPEN (PARMLIB,(INPUT)) LTR 15,15 BNZ DEALPLIB USING IHADCB,1 MVC BLKSIZE,DCBBLKSI SAVE BLOCKSIZE MVC LRECL,DCBLRECL SAVE RECORD LEN ***ALLOCATE AND READ LOAD MEMBER FIND PARMLIB,LOADMEMB,D LTR 15,15 BNZ OUTPLIB *LOOK FOR SYSPARM FIELD IN LOADXX MEMBER L2,READAREA ST 2,LASTBLOC GETPLIBS DS 0H READ READECB,SF,PARMLIB,(2),'S' CHECK READECB CLI READECB,X'7F' BNE OUTPLIB LR 1,2 TESTPLIB DS 0H CLC 0(7,1),=CL7'SYSPARM' BE GOTSPARM CLC 0(4,1),=CL4'IODF' BE GOTIODF NEXTPLIB DS 0H L 1,LASTBLOC AH 1,LRECLNEXT RECORD C 1,ENDBLOCK **BH OUTPLIB BH IEASYS00 ST 1,LASTBLOC B TESTPLIB PARMLIB DCB DSORG=PO,MACRF=(R),DDNAME=PARMLIB -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of John Blythe Reid Sent: Wednesday, September 29, 2010 2:00 PM To: IBM-MAIN@bama.ua.edu Subject: Sample code to read a PDS member using BPAM I'm writing some code to check VSAM CLUSTER defintions in a standard RECFM=FB,LRECL=80 PDS. It's to cross check IMS DBD defintions against their associated CLUSTER definitions. I've never used BPAM before but at first glance it seems to be OPEN/FIND/READ/CHECK/deblock to get logical records/CLOSE. Does anyone have a sample piece of code to read PDS members with BPAM that I could have a look at ? Thanks, 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF Exit suppression question
Did you install the exits in SYSTSO? SYSTSO.IEFU83 SYSTSO.IEFU84 SYSTSO.IEFU85 On Thu, Sep 23, 2010 at 11:59, Charles Mills charl...@mcn.org wrote: I've got an exit that installs on SYS.IEFU83, 4 and 5. On my test system and several customer systems it works as expected. However, on one customer (z/OS V1R7 FWIW, although I have tested on V1R7 successfully) I am seeing *some* of the expected records but not all. The exit is installed first on the chain of exits. For example, I am seeing Type 30 JES2 start records but not TSO start records. I am seeing some Type 80 violation records but not all types of violations. The missing record types are consistent. That is, I am missing certain *kinds* of records, not just missing *some* records. For example, I get all of the JES2 starts but none of the TSO starts. The customer says but I have not personally verified that all of the expected SMF records do show up in some sort of SMF report program. As I have not seen that with my own eyes I might view that evidence as less than 100% certain. D SMF,O shows the following (edited to what I thought might be significant): SUBSYS(OMVS,NOTYPE(39,40,60,63,68,69)) -- SYS SUBSYS(OMVS,EXITS(IEFU83)) -- PARMLIB SUBSYS(SLS0,EXITS(IEFU83)) -- SYS SUBSYS(SLS0,EXITS(IEFU84)) -- SYS SUBSYS(SLS0,EXITS(IEFU85)) -- SYS SUBSYS(SLS0,TYPE(255)) -- PARMLIB SUBSYS(ASCH,NOTYPE(39,40,60,63,68,69)) -- SYS SUBSYS(TSO,DETAIL) -- SYS SUBSYS(TSO,NOTYPE(39,40,60,63,68,69)) -- SYS SUBSYS(TSO,EXITS(IEFU83)) -- SYS SUBSYS(TSO,EXITS(IEFU84)) -- SYS SUBSYS(TSO,EXITS(IEFU85)) -- SYS SUBSYS(STC,EXITS(IEFU85)) -- PARMLIB SUBSYS(STC,EXITS(IEFU84)) -- PARMLIB SUBSYS(STC,EXITS(IEFU83)) -- PARMLIB SUBSYS(STC,NOTYPE(19,39,40,60,63,68,69)) -- PARMLIB SYS(EXITS(IEFU85)) -- PARMLIB SYS(EXITS(IEFU84)) -- PARMLIB SYS(EXITS(IEFU83)) -- PARMLIB SYS(NOTYPE(39,40,60,63,68,69)) -- PARMLIB Am I not seeing a problem in SMF,O? What should I be looking for? For example, are there any third-party products that might somehow be intercepting the expected SMF records? Anything else in PARMLIB? Any other MVS options?. I have desk-checked the code pretty carefully. There certainly could be an error in the code but there just is nothing that should be so specific as to work correctly on JES2 starts but not TSO starts at only one shop. Thanks, Charles Mills -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: SMF Exit suppression question
No, that alone will not fix the problem. TSO exits are already getting type 30 and 80. You need to add your exit to the dynamic exit list for each subsystem you want to monitor. On Thu, Sep 23, 2010 at 14:32, Charles Mills charl...@mcn.org wrote: Perhaps I need an explicit SUBSYS(TSO,TYPE(30,80))? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Charles Mills Sent: Thursday, September 23, 2010 11:59 AM To: IBM-MAIN@bama.ua.edu Subject: SMF Exit suppression question I've got an exit that installs on SYS.IEFU83, 4 and 5. On my test system and several customer systems it works as expected. However, on one customer (z/OS V1R7 FWIW, although I have tested on V1R7 successfully) I am seeing *some* of the expected records but not all. The exit is installed first on the chain of exits. For example, I am seeing Type 30 JES2 start records but not TSO start records. I am seeing some Type 80 violation records but not all types of violations. The missing record types are consistent. That is, I am missing certain *kinds* of records, not just missing *some* records. For example, I get all of the JES2 starts but none of the TSO starts. The customer says but I have not personally verified that all of the expected SMF records do show up in some sort of SMF report program. As I have not seen that with my own eyes I might view that evidence as less than 100% certain. D SMF,O shows the following (edited to what I thought might be significant): SUBSYS(OMVS,NOTYPE(39,40,60,63,68,69)) -- SYS SUBSYS(OMVS,EXITS(IEFU83)) -- PARMLIB SUBSYS(SLS0,EXITS(IEFU83)) -- SYS SUBSYS(SLS0,EXITS(IEFU84)) -- SYS SUBSYS(SLS0,EXITS(IEFU85)) -- SYS SUBSYS(SLS0,TYPE(255)) -- PARMLIB SUBSYS(ASCH,NOTYPE(39,40,60,63,68,69)) -- SYS SUBSYS(TSO,DETAIL) -- SYS SUBSYS(TSO,NOTYPE(39,40,60,63,68,69)) -- SYS SUBSYS(TSO,EXITS(IEFU83)) -- SYS SUBSYS(TSO,EXITS(IEFU84)) -- SYS SUBSYS(TSO,EXITS(IEFU85)) -- SYS SUBSYS(STC,EXITS(IEFU85)) -- PARMLIB SUBSYS(STC,EXITS(IEFU84)) -- PARMLIB SUBSYS(STC,EXITS(IEFU83)) -- PARMLIB SUBSYS(STC,NOTYPE(19,39,40,60,63,68,69)) -- PARMLIB SYS(EXITS(IEFU85)) -- PARMLIB SYS(EXITS(IEFU84)) -- PARMLIB SYS(EXITS(IEFU83)) -- PARMLIB SYS(NOTYPE(39,40,60,63,68,69)) -- PARMLIB Am I not seeing a problem in SMF,O? What should I be looking for? For example, are there any third-party products that might somehow be intercepting the expected SMF records? Anything else in PARMLIB? Any other MVS options?. I have desk-checked the code pretty carefully. There certainly could be an error in the code but there just is nothing that should be so specific as to work correctly on JES2 starts but not TSO starts at only one shop. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: SMF Exit suppression question
Each defined subsystem has its own set of dynamic exits. If you have not defined a separate TSO subsystem, the SYS defaults will be used, but the SYS ** exits are called for subsystem if it is defined in the SMF parms. Similarly, if JES2 is defined in SMF, you will need to install your exits in SYSJES2 to get called for batch work. On Thu, Sep 23, 2010 at 14:14, Charles Mills charl...@mcn.org wrote: Did you install the exits in SYSTSO? No, have not needed to on the other systems. Would you expect that I would have to sometimes? Under what circumstances? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Brian Kennelly Sent: Thursday, September 23, 2010 12:12 PM To: IBM-MAIN@bama.ua.edu Subject: Re: SMF Exit suppression question Did you install the exits in SYSTSO? SYSTSO.IEFU83 SYSTSO.IEFU84 SYSTSO.IEFU85 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: SMF Exit suppression question
That is an accurate recap. (I ran into this one myself.) To see the exits on the system, you can use *D PROG,EXIT* or *D PROG,EXIT,MODNAME=IEFU84* to see the exits for IEFU84, e.g.. * * You should see the exit names for each subsystem listed. On Thu, Sep 23, 2010 at 15:01, Charles Mills charl...@mcn.org wrote: Thanks much. Please allow me to clarify. (Not arguing -- just wanting to make sure I understand perfectly.) You are saying that on the not working system I need to install in SYSTSO.IEFU8x because of the statements SUBSYS(TSO,... that appear in the not working system's PARMLIB. But on the other hand, looking at one of my working systems, it works without being installed in SYSTSO.IEFU8x because there are no SUBSYS(TSO,... statements in PARMLIB. Do I have it correct? And this accounts for the absence both of Type 30 and Type 80 records for TSO? And I assume that you could substitute JES2 or STC for TSO in the descriptions above? Thanks again, Charles -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Brian Kennelly Sent: Thursday, September 23, 2010 2:29 PM To: IBM-MAIN@bama.ua.edu Subject: Re: SMF Exit suppression question Each defined subsystem has its own set of dynamic exits. If you have not defined a separate TSO subsystem, the SYS defaults will be used, but the SYS ** exits are called for subsystem if it is defined in the SMF parms. Similarly, if JES2 is defined in SMF, you will need to install your exits in SYSJES2 to get called for batch work. On Thu, Sep 23, 2010 at 14:14, Charles Mills charl...@mcn.org wrote: Did you install the exits in SYSTSO? No, have not needed to on the other systems. Would you expect that I would have to sometimes? Under what circumstances? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Brian Kennelly Sent: Thursday, September 23, 2010 12:12 PM To: IBM-MAIN@bama.ua.edu Subject: Re: SMF Exit suppression question Did you install the exits in SYSTSO? SYSTSO.IEFU83 SYSTSO.IEFU84 SYSTSO.IEFU85 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF Exit suppression question
Here is the relevant documentation from the *Installation and Tuning Reference*: The SUBSYS specification overrides the SYS specification. Use SUBSYS to make exceptions to your SYS specification for particular subsystems. ... When you associate new exit routines with SMF exits through PROGxx or the SETPROG command, you must use the following naming conventions: - For exits listed on the EXITS keyword of the SYS statement in SMFPRMxx, each exit will have the name SYS. (where is one of the exits listed). - For exits listed on the EXITS keyword of the SUBSYS statement of SMFPRMxx, each exit will have the name SYS. (where is the name of the subsystem and is one of the exits listed). - Where a SYS statement has been coded that does not contain an EXITS keyword, each exit will have the name SYS. (where is one of the exits listed). The list of exits will be all SMF system exits. - Where a SUBSYS statement has been coded that does not contain an EXITS keyword, each exit will have the name SYS. (where is the name of the subsystem and is one of the exits listed). The list of exits will be propagated from the EXITS keyword in the SYS statement. If the EXITS keyword is not coded in the SYS statement as well, the list of exits will be all SMF system exits. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: S737 Abends, Deleted GDG Data Sets and TWS
On Wed, Sep 8, 2010 at 15:53, Tabor, Rich richard.ta...@usairways.comwrote: The short answer I think is yes - yes it is TWS's fault. Yes, as suggested, if I specify the absolute GDG data set name in the JCL, I see only the enqueue for the absolute GDG data set and no enqueue for the GDG base. And MVS/DFP does not allow the data set to be deleted by another tso user or batch job in this instance (as we all hope and expect). I don't know for sure if it has to do with enqueuing on both the GDG base and the actual gdg data set. I don't know why it is possible in some circumstances for a TSO user or some other job to delete a gdg allocated to a job restarted by TWS, but TWS is apf-authorized and is modifying JES control blocks so I can't see another culprit here. I'm just making sure that the problem is on record so that someone running into this in the future will find that it has happened before. It is very likely a basic error in the TWS restart. I remember another vendor's restart product that had a similar problem. it would reset the SWA blocks for a GDS to reflect the absolute generation, as John described, but it did so after MVS had built its enqueue table, so the GDS did not get enqueued. The programmer had to add code to acquire the enqueue and update the enqueue table. When I wrote my restart code, I made sure to avoid that error. I adjust the base, but not the relative generations on generation datasets. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Format of STCK
STCK D2(B2) [S] | 'B205' | B2 | D2 | |||| 016 20 31 The current value of bits 0-63 of the TOD clock is stored in the eight-byte field designated by the second-operand address, provided the clock is in the set, stopped, or not-set state. On Tue, Aug 31, 2010 at 12:34, Micheal Butz michealb...@optonline.netwrote: Hi Would any know the format of the STCK inst Sent from my iPhone -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Date formats
On Fri, Aug 13, 2010 at 09:25, zMan zedgarhoo...@gmail.com wrote: Rexx has a few others, but they're conveniences, like the number of days this year -- I don't really consider that a date format, though it's useful sometimes. That is actually a very import format, as well as the full format returned by the TIME macro: 0cyyddd. (Century, year, days in year.) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Date formats
On Fri, Aug 13, 2010 at 10:42, zMan zedgarhoo...@gmail.com wrote: Sure, days this year can be useful, but does anyone store dates as days so far in the year? It's basically the Julian date without the year. Yes, they do. I worked on a data conversion product a few years ago for a software vendor, and that was one of the formats we needed to support, on multiple sites. Yes, it was more often Julian format, but many customers stored the year and days separately. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email 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: Cataloguing fake tape datasets?
I have not tried it with your scenario, but what about using an IEFBR14 JCL step with UNIT=(3490,DEFER)? That would allow you to use a referback, but not require a mount. On Wed, Jun 30, 2010 at 13:49, Paul Gilmartin paulgboul...@aim.com wrote: On Wed, 30 Jun 2010 15:36:38 -0500, Field, Alan C. wrote: IDCAMS DEFINE NONVSAM ? DEFINE NONVSAM (NAME(your.dsn ) + VOL(H4) + FSEQN( 1) + DEVT(3490) ) Great! Thanks!! (Well, almost. Can I do this with a referback (VOL=REF) to the step that created the tape, all in the same job, and eliminate the Post-It entirely?) If I use FSEQN(999) to make the chicanery transparent will anyone check? EXPDT=98000 presumably disables most of this; I think our auto-ops is trained to ignore it. Thanks again, gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html