Re: So About those Consoles on the z10 HMC
Thanks for the great assist and for considering the problem. The issue is not getting the x3270 consoles to appear and connect on the physical HMC, that works fine mostly. The issue occurs when we access the HMC remotely using a browser; the x3270 sessions active on the physical HMC do not appear. On the z890, the PCOMM equivalent sessions did. I followed up on the previous suggestion regarding the redbook and RESOURCELINK. The technical redbook for the z/10 BC was just updated in fact. I did not see anything in the redbook on this matter. I'm still trying to get into RESOURCELINK; that will be today's activity. When I get a solution, even if its FIN or WAD, I will pass along the info. I'm on digest so there is a communications lag. Thanks again. Edward Long From: Ed Long rdhm...@prodigy.net To: IBM-MAIN@BAMA.UA.EDU Sent: Sun, December 13, 2009 12:11:25 PM Subject: So About those Consoles on the z10 HMC Happy Holidays to one and all. So, we have a new z/10 BC which replaced a z890 and will also soon replace a 7060. Being a small ISV we have limited system programming and no operator staff. We use the HMC as our console; on the old OS2 systems, PCOMM did an adequate job of allowing us to see the console when the HMC was remoted. Not so on the linux x3270 based z10. The 3270 emulation sessions don't appear when we remote the HMC console. Is there a configuration setting we missed or is this simply a feature? Thanks for your help.. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
So About those Consoles on the z10 HMC
Happy Holidays to one and all. So, we have a new z/10 BC which replaced a z890 and will also soon replace a 7060. Being a small ISV we have limited system programming and no operator staff. We use the HMC as our console; on the old OS2 systems, PCOMM did an adequate job of allowing us to see the console when the HMC was remoted. Not so on the linux x3270 based z10. The 3270 emulation sessions don't appear when we remote the HMC console. Is there a configuration setting we missed or is this simply a feature? Thanks for your help.. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Light Weight Printing from Development z/OS 1.8 to HP Laser Jets
Hi all and Happy New Year. I'd like to setup a facility whereby I can print directly from JES2 to an HP Laser Jet type printer without dedicating a printer, buying a printer, or spending time I don't have in INFOPRINT jail. What do you do for z/OS printing in a development context? The requirement is to be able to print small listings locally and conveniently. The difference between today, where we FTP the listing to a PC and print, and tomorrow, is that I want the carriage control characters to be honored. I define small as less than 5000 lines per report and maybe 5 reports per day. I've spent several lovely hours cruising the INFOPRINT website and getting reacquainted with PSF, AFP, and their cousins. Most of this technology qualifies as gross overkill for my needs. I did not see anything directly on point that could be considered lightweight. Is there an easy way to tell Jes2 about a TCPIP connected printer and to have the printer respond to basic CC commands? No fancy forms or checks to be printed, just short reports. Thanks for your ideas, comments, and grand one liners. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
FTPing of DFDSS Dump Files
So, since I transfer 4 DFDSS dumps a day via TERSE and FTP, I thought I'd put together a test restore to see what happened. I used the following FTP command stream; which is identical, except for replacing the put with a get, to the outbound. It worked fine; a DFDSS TYPRUN=NORUN restore read the entire dataset and would have restored the known universe. The site rdw command gets a command not understood, since the Windows FTP server doesn't do Record Descriptor Words. Here are the FTP commands. note the clever use of the DDNAME option. nottherealserver nottherealuid nottherealpswd binary site rdw cd \ftp\blue2\backup lcd 'TEMP.FULLSYS.DFDSS.SHIFTBK.BACKUPR' status ls lpwd pwd get shift.trs //DD:SYSUT1 quit Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Fwd: FW: NEDB2UG Meeting Notice - November 15, 2007
Please attend if you can, and if you can't, pass it on to someone who can. This will be an excellent meeting with great food. Long, Edward [EMAIL PROTECTED] wrote: Subject: FW: NEDB2UG Meeting Notice - November 15, 2007 Date: Thu, 1 Nov 2007 10:45:28 -0400 From: Long, Edward [EMAIL PROTECTED] To: [EMAIL PROTECTED] v\:* {behavior:url(#default#VML);} o\:* {behavior:url(#default#VML);} w\:* {behavior:url(#default#VML);} .shape {behavior:url(#default#VML);} st1\:*{behavior:url(#default#ieooui) } A joint session with the RACF user’s group. Ed Long Corporate Technical Consultant Kronos Incorporated 300 Billerica Road Chelmsford Ma. 01824 p: 978 947 1719 m: 978 387 5490 f: 978 244 9017 www.kronos.com Experts at Improving the Performance of People and Business™ - From: New England DB2 Users Group [mailto:[EMAIL PROTECTED] Sent: Wednesday, October 31, 2007 3:59 PM To: [EMAIL PROTECTED] Subject: NEDB2UG Meeting Notice - November 15, 2007 Hello All The next meeting of the New England DB2 User's group will occur on Thursday November 15 2007 at the Publick House in Sturbridge Mass. As usual we will start at 0900 and wrap up by 4pm. We have a terrific lineup featuring presentations on both the 'database' and the 'administration' parts of our job(s). We will hear from IBM on techniques for offloading data security responsibilities to the Data Security folks and on ways to cut the cost of running DB2. We will also hear from NEON Enterprise Software and Lumigent on how to efficiently administer the various users of our logging facilities and why that is important. Our speakers include Jay Yothers (IBM SVL) who has spoken to our group almost as often as Roger Miller, and with equal grace, wit and insight. Mark Nelson (IBM POK) who is one of the authors of the RACF /DB2 interface and is a frequent speaker at Share, IOD and elsewhere. Henry Parnell (Lumigent), a solution architect with 20+ years experience in system development and administration Joe Brockert (Neon Enterprise Software Inc.)has 30 years of experience in our industry with much of it as a DBA . All of these presentations will cover both the business aspects and the technical aspects of their topics. As such this is a great meeting for DBA's, Data Security types, Data Processing Auditors, performance analysts and even system programmers. Anyone involved with evaluating the implications and costs of some of these 'audit' strategies will get a lot from this meeting. For example, how much will my CPU consumption go up if I turn on detailed audit logging for all DB2 tables? Who will post process that data, and how? How much processor will that workload consume? Who will pay for this development? Please do pass this note around and encourage your colleagues to attend. This is your group too! We will have more info on the speakers and presentations on our website by the end of next week(11/2). Now the facts: Location: Public House Hotel, Sturbridge, MA Date: Thursday, November 15, 2007 Time: 9:00 to 4:00(registration and continental breakfast at 8:00) Cost $40 including a fabulous lunch and all the sticky buns I can eat! Agenda: 0900Opening Remarks 0915-1030 Henry Parnell (Lumigent) Choosing a database audit strategy and process. 1030-1045 Break. 1045-1200 Jay Yothers on DB2 Version 9 and some Very Useful technologies. 1200-1300 Lunch. 1300-1415 Mark Nelson (IBM) RACF and DB2. 1415-1430 Break. 1430-1545 Joe Brockert (Neon Enterprise Software Inc.) The Impact of Regulatory Compliance on database administration 1545-1600 Wrapup and Raffle. To preregister, please send an email to [EMAIL PROTECTED] . All preregistrations should be received no later than November 9th. Any questions, please let us know. Hope to see all of you on November 15. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF SWITCHING WITH IEFU29
Thanks again to everyone who assisted with this, particularly Mark and Peter. While its true that we could name the exit anything, the IBM supplied sample jobs use IEFU29 thereby duplicating the dummy name. It would be interesting, if I wasn't up to my handsome nose in DB2 v8, to research the history of the two IEFU29's. Why should be a good story. This situation would be simpler, I think, if IEFU29 was only the sample version. The worst, at least that I can think of on one cup of coffee, thing that happens is the DUMPXY started task jcl errors out. That at least is visible and obvious to fix. I will pass Mark's suggestion regarding the SYS1.LPALIB fix on to the ADCD guys as something they may want to do on their distributed version to make we developer's life a little less complex. Its a pretty common requirement to automatically capture SMF data. I suppose they could remove the dummy as well. Thanks again for the great assistance. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF SWITCHING WITH IEFU29
Hi everyone. Sorry for the delay in replying to the several most helpful suggestions for which I am most grateful. Root cause identified and solved. I had in fact assembled and linked the exit correctly into user.lpalib. USER.LPALIB is #1 in the LPALSTXX concatenation. LPALSTXX (actually LPALSTDB) is being selected at IPL time. SYS1.LPALIB is in fact referenced about 2/3's of the way down in the LPALSTXX member. BUT, at least on z/OS 1.5, a copy of SYS1.LPALIB is always, and under the covers, prepended to the LPALST so that it gets selected first even if its included in the list. As a result, the dummy IEEU29 was being used. It, of course, does nothing, and does it quietly. So, I renamed the bogus IEEU29 to IEEU29BG (for bogus), reipled and away go my SMF datasets. The default IEEU29 appears to also have a hard restriction on DSN length of 4 characters after the period. In response to Mark's query, MULCFUNC -- DEFAULT MEMLIMIT(0M) -- DEFAULT DDCONS(YES) -- DEFAULT LASTDS(MSG) -- DEFAULT NOBUFFS(MSG) -- DEFAULT SYNCVAL(00) -- DEFAULT INTVAL(30) -- DEFAULT DUMPABND(RETRY) -- DEFAULT SUBSYS(STC,NOTYPE(19,69,99,110)) -- SYS SUBSYS(STC,NODETAIL) -- SYS SUBSYS(STC,INTERVAL(SMF)) -- PARMLIB SUBSYS(STC,EXITS(IEFUSO)) -- PARMLIB SUBSYS(STC,EXITS(IEFUJP)) -- PARMLIB SUBSYS(STC,EXITS(IEFU84)) -- PARMLIB SUBSYS(STC,EXITS(IEFU83)) -- PARMLIB SUBSYS(STC,EXITS(IEFU29)) -- PARMLIB SID(SYS1) -- PARMLIB SYS(NOINTERVAL) -- DEFAULT SYS(NODETAIL) -- PARMLIB SYS(EXITS(IEFU29)) -- PARMLIB SYS(EXITS(IEFUJI)) -- PARMLIB SYS(EXITS(IEFUSI)) -- PARMLIB SYS(EXITS(IEFACTRT)) -- PARMLIB SYS(EXITS(IEFU84)) -- PARMLIB SYS(EXITS(IEFU83)) -- PARMLIB SYS(NOTYPE(19,69,99,110)) -- PARMLIB LISTDSN -- PARMLIB JWT(1800) -- PARMLIB STATUS(01) -- PARMLIB MAXDORM(3000) -- PARMLIB REC(PERM) -- PARMLIB NOPROMPT -- PARMLIB DSNAME(SYS1.MN16) -- PARMLIB DSNAME(SYS1.MN15) -- PARMLIB DSNAME(SYS1.MN14) -- PARMLIB DSNAME(SYS1.MN13) -- PARMLIB DSNAME(SYS1.MN12) -- PARMLIB DSNAME(SYS1.MN11) -- PARMLIB ACTIVE -- PARMLIB SUBPARM(SVAA(250,2,5,7)) -- PARMLIB Ed Long [EMAIL PROTECTED] wrote: Hi everyone. I have finished upgrading one of my 7060's to the latest, and last version of z/OS 1.5. The one remaining, nagging, issue it has, is the DUMPXY exit aka IEFU29 doesn't seem to execute when I issue a i smf command. The previous system it worked fine. Load modules are same length;both are in USER.LPALIB. I am certain its something I've done, but darned if I know what it is. Any and all suggestions most appreciated. As you can see from the following, the exit is being seen, and loaded properly, its not being heard however. CSV550I 18.21.37 LPA DISPLAY 581 FLAGS MODULE ENTRY PT LOAD PT LENGTH DIAG P IEFU29 8507FA68 0507FA68 0020 08C1C860 CSV461I 18.21.37 PROG,EXIT DISPLAY 584 EXIT MODULE STATE MODULE STATE MODULE STATE SYS.IEFU29 IEFU29 A CSV461I 18.21.37 PROG,EXIT DISPLAY 585 EXIT MODULE STATE MODULE STATE MODULE STATE SYSSTC.IEFU29 IEFU29 A Edward Long Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
SMF SWITCHING WITH IEFU29
Hi everyone. I have finished upgrading one of my 7060's to the latest, and last version of z/OS 1.5. The one remaining, nagging, issue it has, is the DUMPXY exit aka IEFU29 doesn't seem to execute when I issue a i smf command. The previous system it worked fine. Load modules are same length;both are in USER.LPALIB. I am certain its something I've done, but darned if I know what it is. Any and all suggestions most appreciated. As you can see from the following, the exit is being seen, and loaded properly, its not being heard however. CSV550I 18.21.37 LPA DISPLAY 581 FLAGS MODULE ENTRY PT LOAD PT LENGTH DIAG P IEFU29 8507FA68 0507FA68 0020 08C1C860 CSV461I 18.21.37 PROG,EXIT DISPLAY 584 EXIT MODULE STATE MODULE STATE MODULE STATE SYS.IEFU29 IEFU29 A CSV461I 18.21.37 PROG,EXIT DISPLAY 585 EXIT MODULE STATE MODULE STATE MODULE STATE SYSSTC.IEFU29 IEFU29 A Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
CA Sues Rocket Software
This has been an interesting discussion. Two observations I'd like to add to the solera are: 1: This is a nearly identical suit to the one CA filed against Quest two or three years ago just as Quest was gaining momentum in the DB2 space. After the appropriate money got spent on legal fees a settlement was reached; Quest still has better tools. 2: The technology allegedly stolen is now 8 years old unless CA has been derelict in their asset protection activities. What an interesting indictment of CA's investment in the relevant tools that they think that the code they bought 8 years ago is still a viable basis for a current product. That may be why they have had trouble supporting V8 and V9 of DB2. These two releases change the specs on nearly every object in DB2 requiring quite a bit of rewriting. I believe Rocket's stuff supports V8 now. Rocket / IBM's tools have been gaining market share often at CA's expense. In both cases it becomes reasonable to suspect that the director of litigation and the director of marketing may have chatted. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: K E,1 Alternatives
Thanks to everyone who offered their advice. A couple of points: 1: The console is in roll mode; this message is, rightly, considered serious enough to hang on the console. 2: At least of the replies (I'm in digest mode), I've seen so far, no one has explained why the K e,1,10 doesn't work, but apparently should. I will try out your suggestions and report back. I appreciate the PF key setup suggestion immensely. Thank you all again. Ed Long [EMAIL PROTECTED] wrote: Hi everyone. I recently suffered a console flood caused by the RACFDS running out of space. This is an ADCD z/OS 1.5 system. The out of space condition appears to have occurred due to an oddity in how DB2 archive logs were RACF protected. Each dataset Db2 created caused RACF to create a matching RACF profile. The dataset names of course have Date and Time in them so are unique. It appears to have taken 5.5 years to blow out RACF. I deleted the existing profile and created a generic profile which appears to not cause the problem. Oh, I also deleted all the old profiles. My actual question has to do with the control operator command. On this system, the only form of it that appears to work is K E,1 (delete 1 message). K E,1,10 - according to the Command Reference manual should delete the first 10 action messages; but it gets rejected due to 'invalid range'. My fingers got tired repeating k e,1 for every IRR405I that got generated. Is this correct that only K E,1 should work? Is there a better procedure than this for dealing with the flood, short of punching out and reipling? Will Daiske survive Yankee Stadium? Thanks. Edward Long Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
K E,1 Alternatives
Hi everyone. I recently suffered a console flood caused by the RACFDS running out of space. This is an ADCD z/OS 1.5 system. The out of space condition appears to have occurred due to an oddity in how DB2 archive logs were RACF protected. Each dataset Db2 created caused RACF to create a matching RACF profile. The dataset names of course have Date and Time in them so are unique. It appears to have taken 5.5 years to blow out RACF. I deleted the existing profile and created a generic profile which appears to not cause the problem. Oh, I also deleted all the old profiles. My actual question has to do with the control operator command. On this system, the only form of it that appears to work is K E,1 (delete 1 message). K E,1,10 - according to the Command Reference manual should delete the first 10 action messages; but it gets rejected due to 'invalid range'. My fingers got tired repeating k e,1 for every IRR405I that got generated. Is this correct that only K E,1 should work? Is there a better procedure than this for dealing with the flood, short of punching out and reipling? Will Daiske survive Yankee Stadium? Thanks. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
DB2 Table definitions for DCOLLECT Records
I'd like to load my DCOLLECT data into DB2 tables. Has anyone coded up Table definitions and or load cards to match the various record types? I already use MXG on my PC; for this application keeping the process on z/OS will be easier to automate. Thanks for your assistance. Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: GRS Ring Between Two 7060's using ESCON.
Thanks to all of you who responded. The answer turns out to be a fact not in evidence in my original question. System A is in LPAR mode; single partition, but LPAR nonetheless. As such, according to GRS and IOS Level2, The CNC channel described below must be dedicated, not shared. The control unit on the other side could also be modified to work but that would require a lot more HCD work than simply changing the channel so to speak. After changing to dedicated, GRS popped right up. Now I know why MIM is such a money maker. Thanks again. Ed Long [EMAIL PROTECTED] wrote: Hi all. I am trying to build a two system GRS ring between my two 7060's. Why? Because I have a large V960 disk array between them, and I need to protect myself from myself. So far, I have a single ESCON connection defined between them, call them System A and System B. System B thinks the channel is a CTC; System A a CNC. Both systems are z/OS 1.5 in MONOPLEX mode. For GRS purposes, I have defined the relationship as Mixed. System B, after a D GRS, shows the links as Quiet. System A, considers the links disabled. I have updated the GRS parmlib entries to include the CTC's as per the GRS book. D GRS,SYSTEM only shows the local system on either system. The RNL list is still the default. Now my questions; Do I need a second ESCON cable between the boxes with System A's CHPID defined as CTC and B's as CNC? If so, which CTC's do I put in the definitions? The GRS planning book says to include the same definitions on both sides. What am I doing wrong? Have any of you ever lashed two 7060's together like this? Thanks for the assist. Edward Long Edward Long Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
GRS Ring Between Two 7060's using ESCON.
Hi all. I am trying to build a two system GRS ring between my two 7060's. Why? Because I have a large V960 disk array between them, and I need to protect myself from myself. So far, I have a single ESCON connection defined between them, call them System A and System B. System B thinks the channel is a CTC; System A a CNC. Both systems are z/OS 1.5 in MONOPLEX mode. For GRS purposes, I have defined the relationship as Mixed. System B, after a D GRS, shows the links as Quiet. System A, considers the links disabled. I have updated the GRS parmlib entries to include the CTC's as per the GRS book. D GRS,SYSTEM only shows the local system on either system. The RNL list is still the default. Now my questions; Do I need a second ESCON cable between the boxes with System A's CHPID defined as CTC and B's as CNC? If so, which CTC's do I put in the definitions? The GRS planning book says to include the same definitions on both sides. What am I doing wrong? Have any of you ever lashed two 7060's together like this? Thanks for the assist. Edward Long Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: MP 3000 18.2 gig drive
My only source has been IBM support. These drives are actually just standard IBM DeathStar 18 Gb. SCSI drives with a fancy carrier. Its the carrier that makes them unique. We have two MP3K's and, between them, we have had to replace a bunch of these guys. There is also a 3 9gb. drive array in the box that has a similar unhappy track record. We've even lost two of these 18gb. drives in the same array; we lost about 100Gb. of data as a result. Prepare to be gaffed if you don't have an IBM service contract. Don't delay. Dave Guthrie [EMAIL PROTECTED] wrote: One of our drives is/has failed, would anybody know of a source for them? It's a drive unique (as far as I know) to the Multiprise Thanks, Dave _ IMPORTANT NOTICE This communication is confidential and is intended only for the use of the individual or entity to which it is addressed. This communication may contain information that is protected from disclosure by applicable law. If the recipient of this communication is not the intended recipient, or the employee or agent responsible for delivering this communication to the intended recipient, you are hereby notified that any dissemination, distribution or reproduction of this communication is strictly prohibited. If you have received this communication in error, please notify the sender immediately by telephone at 760-602-1400 and delete the communication from all email files. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: U0852
To Mike's list I'd add missing APAR or PTF. Several of my worst pointer disasters were maintenance related. SMU, run standalone, is definitely a good first step. DISP=OLD at a minimum. Mike Bell [EMAIL PROTECTED] wrote: Short but not complete list 1. abend that didn't backout correctly 2. invalid sharing - 2 update jobs with disp=shr 3. more exotic - write failures on disk, working as designed, running a report job while online is still updateing. The proper response is to run SMU and find out if the lost pointer still exists. If yes, fix it - see IMS manuals. The abend is because someone has a job that isn't playing by the rules. Mike Bell On 9/28/05, Mehrdad Rastegar wrote: Hi all, In IMS V6R1, How a LOST POINTER may be created in a database and how we can prevent the Abend U0852 in batch process? This is part of system log at the time of Abend: -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
DFSORT Selecting all records today - 365 days
Hi all. I'm trying to develop a simple purge using DFSORT that drops all records in the input older than 1 year. The target field is an externalized DB2 timestamp. So far, the following works, sort of, but is not very elegant. Any suggestions? SORT FIELDS=(COPY) INCLUDE COND=(21,7,CH,EQ,C'2004-07',OR, 21,7,CH,EQ,C'2004-08',OR, 21,7,CH,EQ,C'2004-09',OR, 21,7,CH,EQ,C'2004-10',OR, 21,7,CH,EQ,C'2004-11',OR, 21,7,CH,EQ,C'2004-12',OR, 21,7,CH,EQ,C'2005-01',OR, 21,7,CH,EQ,C'2005-02',OR, 21,7,CH,EQ,C'2005-03',OR, 21,7,CH,EQ,C'2005-04',OR, 21,7,CH,EQ,C'2005-05',OR, 21,7,CH,EQ,C'2005-06',OR, 21,7,CH,EQ,C'2005-07') Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFSORT Selecting all records today - 365 days
Please accept this dual purpose response (both to John and to Ben). Yes, the include clause can be coded as GT,GE,LT,LE; however, for some, as yet, unknown reason, that construct continued to include older records. The present construct only includes the desired records, but is SQL like in its ponderousness. Thanks to both of you for the assist; I guess I was hoping for some kind of special register ala SQL as in GE (CURRENT DATE - 365 DAYS). Chase, John [EMAIL PROTECTED] wrote: -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ed Long Hi all. I'm trying to develop a simple purge using DFSORT that drops all records in the input older than 1 year. The target field is an externalized DB2 timestamp. So far, the following works, sort of, but is not very elegant. Any suggestions? SORT FIELDS=(COPY) INCLUDE COND=(21,7,CH,EQ,C'2004-07',OR, ... 21,7,CH,EQ,C'2005-07') How about INCLUDE COND=(21,7,CH,GE,C'2004-07') or OMIT COND=(21,7,CH,LT,C'2004-07') ? -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DFSORT Selecting all records today - 365 days
Thanks to all for participating. Here we go: I did previously see all of the date stuff in the Fine Manual, as subsetted and reprinted by Howard. None of the examples that I could find- note to Frank, please increase the number of examples - include the externalized DB2 format as in 2004-07-25 (Note the dashes and the 4 digit year). Note that the subset reprinted by Howard is all 2 digit years. I saw no examples of a 4 digit year - 2 digit month - 2 digit Day etc. Any of the INCLUDES so far, either of Frank's or either of mine, suffer from the same maintenance problem. I'm not actually getting 365 days worth; I'm getting somewhere between 365 and 395 days worth depending upon the day of the month that the job runs on. The job runs weekly on Saturday. Once a month I have to remember to edit this control card to include the new month and delete the oldest. I have trouble remembering lunch. Scott's suggestion may be the slickest so far; essentially generating the control cards weekly just before use. I tried following Craig's URL's; no such page on either one. I'll come back to that later this afternoon. I am curious though that no one has yet suggested ICETOOL. Thanks again to all of you for the assist. Frank Yaeger [EMAIL PROTECTED] wrote: Ed Long wrote: Yes, the include clause can be coded as GT,GE,LT,LE; however, for some, as yet, unknown reason, that construct continued to include older records. Which construct? Older records with what dates? DFSORT has no problem handling GT, GE, LT, LE for INCLUDE or OMIT, so I'm wondering what the user error was here. :-) The present construct only includes the desired records, but is SQL like in its ponderousness. The following non-ponderous construct is equivalent to the ponderous construct and gives the same results: INCLUDE COND=(21,7,CH,GE,C'2004-07',AND,21,7,CH,LE,C'2005-07') Thanks to both of you for the assist; I guess I was hoping for some kind of special register ala SQL as in GE (CURRENT DATE - 365 DAYS). Well, you're mixing up current date formats here. If your date is a mm date (or variation), then you'd want to subtract 12 months, not 365 days. If your date was a mmdd or ddd variation, then you'd want to substract 365 days. DFSORT has DATE2 for mm, but doesn't allow addition or subraction of months from it. DFSORT has DATE1 for mmdd and DATE3 for ddd, but doesn't allow addition or subtraction of days from it. However, we consider that a high priority candidate for a future enhancement to DFSORT. Frank Yaeger - DFSORT Team (IBM) Specialties: ICETOOL, IFTHEN, OVERLAY, Symbols, Migration = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEBGENER and SDB
Don't rely on IEBGENER to copy the DFDSS tapes; it will break your heart at the worst possible moment. Use copydump. Its a failing of DFDSS that you can't use gener, but there it is. Martin Kline [EMAIL PROTECTED] wrote: Specify two DD names in the OUTDD parameter to create both copies at the same time, and eliminate the IEBGENER. CONFIDENTIALITY NOTICE: This electronic transmission (including any accompanying attachments) is intended solely for its authorized recipient(s), and may contain confidential and/or legally privileged information. If you are not an intended recipient, or responsible for delivering some or all of this transmission to an intended recipient, be aware that any review, copying, printing, distribution, use or disclosure of the contents of this message is strictly prohibited. If you have received this electronic message in error, please contact us immediately by electronic mail at [EMAIL PROTECTED] or notify us immediately by telephone at 1-800-345-2021 or 816-531-5575 and destroy the original and all copies of this transmission (including any attachments). Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html Edward Long -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html