Re: IBM sees software producing half of profit by 2010
On Thu, 17 May 2007 22:28:43 -0500, Ed Gould [EMAIL PROTECTED] wrote: IBM sees software producing half of profit by 2010 EETimes Thu, 17 May 2007 9:16 AM PDT IBM said it sees software accounting for nearly half of total profit by 2010, up from about 40 percent last year, as the company shifts toward more-profitable businesses from lower-margin segments such as computer hardware. 40 % in 3 years well yes even if i think it is not very optimistic as this is about what our accounting shows here in my shop . We got the annual registered letter for july , and they said 6 % increase because of currency fluctuation ( as the euros is so high , it must represent 15 % or 20 % in dollars and it should have gone down not up ! ) a lot of us will go to db2 v8 or cics 3.x in mainframe , and this is quite a lot as well , as the consumption is growing ( cics 3.1 is about 7.5 % extra , DB2 V8 vs V7 , i do not know yet but i heard numbers ) . For distributed software , they implemented PVU's because it is just impossible to order single core processors on servers nowadays . Mainframe Tivoli software is going Full Cap . ( TSM is done , TDS also and i already got the bill ) SAO / Netview new version is also going Full Cap .( i saw the numbers and it is frightening ) So vWLC is becoming a joke for some products . I am lucky to have installed zCost to control my consumption (, i should be able to control a part of the bill up to my retirement :-)) 3 years ? :-)) Bruno Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr -- 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: Date Time in JCL
On Thu, 17 May 2007 12:30:52 -0500, Mark Steely [EMAIL PROTECTED] wrote: I believe the answer is no and that's what I told the customer, but I will ask any way. Is there a way to dynamically add the current date and time to a dataset through JCL ? We are z/OS V1R7. http://bama.ua.edu/cgi-bin/wa?A2=ind0202L=ibm-mainD=0amp;I=1O=DT=0P=100302 Bruno Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr -- 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: Date Time in JCL
However, the issue is that, there is no definitive value of current date. The issue is more than just current date (and current time is worse). It all comes down to submission time, conversion time, execution time, or system for all variable substitution under Batch JCL. Which is valid? And, for date/time what happens if you do a typrun=hold? How do you know if the submission date is what's wanted, or execution date? What happens if you submit just before midnight? Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? Robert -- 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: Top 10 software install gripes
Rick Fochtman wrote: -snip-- I think everyone agrees that directory should have safe margin for updates. However the discussion was about magic numbers like 44,45, or 46. Spare directory blocks are obvious, any of the numbers above not. Despite of discussion noone explained why these numbers (or at least any of them) are so magic. Hint: fit in the track is absolutely not reasonable. unsnip Why is Fit in the track unreasonable? I regard it as efficient use of space. Yes, it *totally* unreasonable. I mean it. It has nothing to do with efficient use of space. It was proved that rest of the track can be used for members storage. So, If I need 100 or 200 or 1340 blocks, there is no reason to round it to multiple 44 or 45 or (n*45+44). If I need 20 blocks, there is still no need to round it to 44. Last, but not least: we talk about efficient use of *fraction of track*. It is simply *not worth* to discuss. I simply don't care about wasted track in my PDS. Even if I have 100 or 1000 PDSes. All we agreed (any objection?) that directory should be safely oversized to avoid out-of-directory problems. Usually spare blocks occupy more than track. Last but not least: It's funny that people take care about holy numbers, but there are different religions: some adore 44, others worship 45, others 46, others n*45+44... -- 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.2007 r. kapita zakadowy BRE Banku SA (w caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone. -- 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: Virtual Tape hardware
Dave Kopischke wrote: On Thu, 17 May 2007 14:44:54 -0500, McKown, John wrote: Bustech http://www.bustech.com FlexCUB http://www.funsoft.com IDG9480 http://www.secureagent.com/securevts/VTStech.htm There also: Luminex - http://www.luminex.com Sepaton - http://www.sepaton.com Data Domain - http://www.datadomain.com == This looked like it was targeted to open systems rather than z servers, so I didn't look too deeply at their offerings. I think the last two (Sepaton and Data Domain) are not compatible with mainframes. To complement the lsit again it is worth to mention FSC CentricStore virtual libraries and Centera solutions (conected via IP channels). -- 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.2007 r. kapita zakadowy BRE Banku SA (w caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone. -- 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: Date Time in JCL
Robert Bardos [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... However, the issue is that, there is no definitive value of current date. The issue is more than just current date (and current time is worse). It all comes down to submission time, conversion time, execution time, or system for all variable substitution under Batch JCL. Which is valid? And, for date/time what happens if you do a typrun=hold? How do you know if the submission date is what's wanted, or execution date? What happens if you submit just before midnight? Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? Robert Of which system? Jobs can travel through serveral systems in an NJE network, submitted on system1, converted on system2 executed on system3, each with their own timesettings. Dataset1 gets timestamp 10:00, the *next* dataset2 can get timestamp 09:10 if created 10 minutes after dataset1. Quite confusing. 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: 3350 failures
On Thu, 17 May 2007 15:01:48 -0400, William Donzelli [EMAIL PROTECTED] wrote: I have a lead on a few 3350s - obsolete, but that is the point - and the owner mentioned that the typical failure mode is the breakdown and failure of the seals, letting crud get on the platters. Can any of the oldtimers here elaborate? Does anyone still service 3350s? Also, does anyone know the weight of these 3350s? Although my memory is fading , i used to maintain these boxes ( was a hw guy in a former life) We had more often failures with the Fan and the bulbs than with the rest of the box . Bruno Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr -- 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: Date Time in JCL
On Fri, 18 May 2007 09:51:23 +0200, Vernooy, C.P. - SPLXM [EMAIL PROTECTED] wrote: Of which system? Jobs can travel through serveral systems in an NJE network, submitted on system1, converted on system2 executed on system3, each with their own timesettings. Dataset1 gets timestamp 10:00, the *next* dataset2 can get timestamp 09:10 if created 10 minutes after dataset1. Quite confusing. Definitely confusing :-)) On the other hand it is executed only on one or converted only on one . If we have a dateC for conversion time , and we make it GMT , for me it is OK - or a dateE for exec time etc ... We all have different usage .We accept this on a proc for STC ! The result is the same . Which STC of which system in which time zone created the dataset ? But it is supported ! Endless discussion because it does not exist . I am quite sure that if it existed , with the written rules ansd specs , the discussions would be less because we all need it somehow , and we all put different home made solutions for it . Bruno Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr -- 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: VTOC FULL
If you can get the volume offline the you can use NEWVTOC instead of EXTVTOC. In which case you don't have to move any datasets as the VTOC is moved to a new location. Jim McAlpine On 5/17/07, Robert Pelletier [EMAIL PROTECTED] wrote: It works as long as there is space to expand into otherwise you have to move files. Thanks all. Have a Nice Day ! Bob Pelletier Connecticut Student Loan Foundation Rocky Hill, Ct. -Original Message- From: Heloisa [mailto:[EMAIL PROTECTED] Sent: Thursday, May 17, 2007 12:30 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: VTOC FULL ICKDSF Release 17 can expand a VTOC. I've never tried though. This is what the manual says: //SYSIN DD * REFORMAT DDNAME(VOLDD) VERIFY(TMP121) EXTVTOC(200) EXTINDEX(16) The example above expands both VTOC and VTOC INDEX. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- 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: PUTTING DISK OFFLINE - JES3 ENVIRONMENT
Is your device OWNED by JES3? You cannot vary offline, if not. What is the system response from: 8I D,D=9F46 or, in your case: *I D,D=9F46 This is the correct format for VARY: 8V 9F46,OFF,MVS01 From: willie bunter [EMAIL PROTECTED] Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To: IBM-MAIN@BAMA.UA.EDU Subject: Re: PUTTING DISK OFFLINE - JES3 ENVIRONMENT Date: Tue, 15 May 2007 05:14:42 -0700 I don't know how to find that out. All I know is that the environment is a JES3 environemnt. Tom Marchant [EMAIL PROTECTED] wrote: On Tue, 15 May 2007 05:01:46 -0700, willie bunter wrote: I checked with our OPS department and they use *. I tried the command but I got errors for both commands. Could it be that the command cannot be entered via SDSF? *V,9F46,OFFLINE,MVS01 IAT8188 9F46 IS AN INVALID VARY FIELD /*vary 9F46,offline,ALL IAT8188 9F46 IS AN INVALID VARY FIELD You've gotten closer. This time the command was rejected by JES3. Is 9F46 a JES3 controlled device? -- Tom Marchant -- 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 - Yahoo! oneSearch: Finally, mobile search that gives answers, not web links. -- 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 _ PC Magazines 2007 editors choice for best Web mailaward-winning Windows Live Hotmail. http://imagine-windowslive.com/hotmail/?locale=en-usocid=TXT_TAGHM_migration_HM_mini_pcmag_0507 -- 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: LRECL of Spanned Records
Paul Gilmartin wrote: 3 //STEP EXEC PGM=IEFBR14 4 //SYSUT1DD UNIT=SYSALLDA,RECFM=VBS,DSORG=PS,SPACE=(1,1), // LRECL=32767 //* STMT NO. MESSAGE - 4 IEF638I SPECIFIED NUMERIC EXCEEDS MAXIMUM ALLOWED IN THE LRECL SUBPARAMETER OF THE DCB FIELD Why? I don't know why, but I know it's stupid. You can use LRECL=32767, but you cannot specify that value in JCL. People often use such a LRECL for SMF archives (PS VBS 32767). It has nothing to do with LRECL=X. Good news: if you want to process SMF archives, you can use LRECL=32760. AFAIK no record exceeds the length. -- 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.2007 r. kapita zakadowy BRE Banku SA (w caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone. -- 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: ISPF EDIT RECOVERY scope
In [EMAIL PROTECTED], on 05/13/2007 at 10:39 PM, Paul [EMAIL PROTECTED] [EMAIL PROTECTED] said: A few months ago, I asked in this forum whether I could disable Confirm Data Set Delete in my Profile. The modal reaction was, No! Very Bad Idea! Extremely Dangerous! We hope IBM never provides such a facility, even as an option! (There were a few exceptions of the not my dog genre.) But isn't RECOVERY OFF likewise a dangerous behavior, which shouldn't be stored in a profile? Yes. Presumably IBM provided it for compatibility. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: Date Time in JCL
On Fri, 18 May 2007 09:51:23 +0200, Vernooy, C.P. - SPLXM [EMAIL PROTECTED] wrote: Robert Bardos [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? Robert Of which system? Jobs can travel through serveral systems in an NJE network, submitted on system1, converted on system2 executed on system3, each with their own timesettings. Well, let's see If I submit a job on system1 and ask for submission time, I think I would want system1's time. If I submit it to run on system3 and ask for executuion time, I think I want system3's time. Of course, if e.g. system3 is a sysplex with images running in different time zones, I'd probably want GMT time. Dataset1 gets timestamp 10:00, the *next* dataset2 can get timestamp 09:10 if created 10 minutes after dataset1. Quite confusing. I can't see how that would happen unless the two time stamps were based upon a different kind of time. Or perhaps if the job terminated and was restarted on a different member in the 'plex that ran in a different time zone and I was asking for local time. -- Tom Marchant -- 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: LRECL of Spanned Records
On Fri, 18 May 2007 13:08:15 +0200, R.S. wrote: I don't know why, but I know it's stupid. You can use LRECL=32767, but you cannot specify that value in JCL. People often use such a LRECL for SMF archives (PS VBS 32767). It has nothing to do with LRECL=X. Do you want to tell us *how* you can specify LRECL=32767? -- Tom Marchant -- 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
How can I influence VTS device allocation
Hello list, We have a TS7700 VTS in a grid Configuration, which consists of 2 TS7700 clusters each with its own tapeunits, coupled together as one VTS with two distributed libraries as seen by SMS. Since it is one VTS to SMS, SMS will select a random tapeunit from the total pool of devices. Normally this is no problem. However, if I want tot read statistics from each cluster's library manager, I must address a device from that specific cluster. Since SMS considers it one VTS, I have not been able to force my allocation to an address of the desired cluster. I tried a unitaddress, created generics for each cluster and used them, but no success. Cluster 0 has devices 0600-06FF, cluster 1 has devices 0700-07FF. How can I force an allocation to a device of the desired cluster? Thanks, 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: LRECL of Spanned Records
Tom Marchant wrote: On Fri, 18 May 2007 13:08:15 +0200, R.S. wrote: I don't know why, but I know it's stupid. You can use LRECL=32767, but you cannot specify that value in JCL. People often use such a LRECL for SMF archives (PS VBS 32767). It has nothing to do with LRECL=X. Do you want to tell us *how* you can specify LRECL=32767? Sure. You cannot. g However you can create such dataset using LIKE or IFASMFDP: //SMFCLEAR EXEC PGM=IFASMFDP //SYSPRINT DD SYSOUT=* //WEJ DD DISP=SHR,DSN=SYS1.MAN1 //WYJ DD DSN=HLQ.AAA.SMF,DISP=(,CATLG),SPACE=(CYL,(100,100)), // DSORG=PS //SYSIN DD * INDD(WEJ,OPTIONS(ALL)) OUTDD(WYJ,TYPE(000:255)) /* HLQ.AAA.SMF will be PS VBS 32767. -- 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.2007 r. kapita zakadowy BRE Banku SA (w caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone. -- 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: Date Time in JCL
Tom Marchant [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... On Fri, 18 May 2007 09:51:23 +0200, Vernooy, C.P. - SPLXM [EMAIL PROTECTED] wrote: Robert Bardos [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? Robert Of which system? Jobs can travel through serveral systems in an NJE network, submitted on system1, converted on system2 executed on system3, each with their own timesettings. Well, let's see If I submit a job on system1 and ask for submission time, I think I would want system1's time. If I submit it to run on system3 and ask for executuion time, I think I want system3's time. Of course, if e.g. system3 is a sysplex with images running in different time zones, I'd probably want GMT time. Dataset1 gets timestamp 10:00, the *next* dataset2 can get timestamp 09:10 if created 10 minutes after dataset1. Quite confusing. I can't see how that would happen unless the two time stamps were based upon a different kind of time. Or perhaps if the job terminated and was restarted on a different member in the 'plex that ran in a different time zone and I was asking for local time. It will also work without restart: job1 runs on system1 with time1, job2 runs 10 minutes later on system2 with time=time1-1hr. I must admit, if you know the mechanisme, you know its shortcomings and that could be manageable. I think the problem is at a different level: until now, symbolics are system-wide: with this addition you get symbolics per job. This means that each job must create room to store all these variables. Where do you store them, which variables do you store, how do you keep flexibility in this set of variables, will the user demand a varying set of user variables to be stored (yes, he will), etc. etc.? 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How can I influence VTS device allocation
On Fri, 18 May 2007 14:05:23 +0200, Vernooy, C.P. - SPLXM [EMAIL PROTECTED] wrote: Hello list, We have a TS7700 VTS in a grid Configuration, which consists of 2 TS7700 clusters each with its own tapeunits, coupled together as one VTS with two distributed libraries as seen by SMS. Since it is one VTS to SMS, SMS will select a random tapeunit from the total pool of devices. Normally this is no problem. However, if I want tot read statistics from each cluster's library manager, I must address a device from that specific cluster. Since SMS considers it one VTS, I have not been able to force my allocation to an address of the desired cluster. I tried a unitaddress, created generics for each cluster and used them, but no success. Cluster 0 has devices 0600-06FF, cluster 1 has devices 0700-07FF. How can I force an allocation to a device of the desired cluster? Exactly the same here . We faced the same problem , I'll ask if my colleague found a way , she was working on it Bruno Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr -- 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: Data Areas Manuals to be dropped
In my forty years of experience dealing with IBM and its customer services organization, I have found IBM to be the most customer-centric vendor out there. So it begs the question that since Vista is about to become the PC standard, why has IBM seemed to take such a cavalier attitude about getting a fairly important desktop utility up to snuff. It's just not like them at all. And by the way, I understand that the correct spelling of the Redmond company's name is Micro$oft and that they report what they want to report. Not defending them, but they are a reality. Have a good weekend all. -- 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: How do I build a stand alone z/OS
Thank you Mark for your help. Thanks Mohan On 5/17/07, Mark Zelden [EMAIL PROTECTED] wrote: On Thu, 17 May 2007 07:42:31 -0500, Mark Zelden [EMAIL PROTECTED] wrote: As a first step we are planning to install the z/OS, is there any way i could build a systempac kinda use it for future LPAR's. snip I have some examples on my cbt file - file 434 and in the JOBs section of my web site (URL below in my signature). If you don't need TCPIP then you can use the ONEPAK* examples - otherwise you need the TWOPAK* examples (which can fit on a single 3390-9). I last updated them for z/OS 1.6 but was just considering updating them for z/OS 1.8. If you are running z/OS 1.7, there are only minor changes that need to be made (new LNKLST lib for example). You can get those from the migration manual and / or looking at one of your 1.7 systems. snip These are the changes that are required from my 1.6 samples to work with z/OS 1.7 and z/OS 1.8. I will update my CBT file soon - but you can easily make them yourself if you plan on using my samples: CHANGES FROM Z/OS 1.6 VERSION FOR Z/OS 1.8: 1. DEL REFERENCES TO SISPSASC (1.8 CHANGE) 2. DEL SHASLINK AND REPLACE WITH SHASLNKE (1.7 CHANGE) 3. ADD SIEAMIGE TO COPY/ALTER/LNKLST/APF IN PROG00 (1.7 CHANGE) 4. REMOVE RDINUM= FROM JES2PARM (1.7 CHANGE) 5. ADD SCEERUN2 TO COPY/ALTER/LNKLST/APF IN PROG00 (1.7 CHANGE?) (ABEND IN CEEBINIT AT IPL WITHOUT SCEERUN2 - OMVS RELATED) 6. CHANGE TMP HFS TO A TFS (UNRELATED TO OS LEVEL CHANGE) 5 and 6 are only for the 2 pack system that includes OMVS and TCP/IP. SCEERUN2 is a large DSN, so it is going on the 2nd volume. Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group: G-ITO mailto:[EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Old RAMAC 2 still viable?
There should be no reason to drop the RAMAC2. We did the same thing, dropped our RVA for a DS6800 due to the IXFP issue. Plus the maintenance (IBM, not third party) and environmentals on the old RVA were horrendous. RAMAC2 has none of the software issues of the RVA so you should be able to keep running it without issues. Rex -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Marvin Lukasik Sent: Friday, May 18, 2007 8:38 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Old RAMAC 2 still viable? We are currently converting our 4 RVA boxes to an IBM DS8100 in preparation for installing Z/OS 1.7 since they ( actually IXFP ) will no longer be supported, but were wondering if we need to jettison our old RAMAC 2 ? It's a 9394-002 with 9395-B23. I searched IBM and this list and couldn't find any info on lack of support. Since it's already paid for with low 3rd party maintenance costs, we'd just as soon keep it use it for unimportant files we'd normally keep on tape. Another reason for keeping it is to keep the floor space and power out of the hands of the PC-server weenies, who seem to consume every square inch and watt that becomes available. TIA. -- 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: Microsoft won't sue over Linux, for now
On Fri, 18 May 2007 08:06:46 -0500, Ed Gould wrote: * QA: Microsoft won't sue over Linux, for now Of course they won't sue. If they did, they'd have to reveal what patents are being infringed. Recent supreme court rulings have tightened the requirements that a patent neither be obvious nor prior art. There is, IMO, very little probability that they have a single patent that is being infringed. No, they won't sue anyone. They'd rather extort royalties for license agreements. Even if they don't get any, they hope to intimidate users and divide the open source community and stifle development. No they won't sue anyone, for now. And I won't break your legs, for now. -- Tom Marchant -- 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
FTP Error 426
Hi, All, Trying to understand the explanation for this FTP error: 426 Connection closed; transfer aborted. The manual says only this: The FTP server received an Out Of Band ABOR subcommand from the FTP client requesting that the data transfer in progress end. The FTP server aborted the data transfer. The client in this context is z/OS 1.7; server is an AIX machine in our local network. What is an Out Of Band condition, and why would the z/OS FTP program (client) originate it? BTW, the same FTP job finally succeeded after four of the above aborts. TIA, -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
Re: Old RAMAC 2 still viable?
On Fri, 2007-05-18 at 08:38 -0500, Marvin Lukasik wrote: We are currently converting our 4 RVA boxes to an IBM DS8100 in preparation for installing Z/OS 1.7 since they ( actually IXFP ) will no longer be supported, FWIW: SVAA (the successor to IXFP) *is* supported by Sun/STK. -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: LRECL of Spanned Records
Ed Gould wrote: On May 18, 2007, at 6:08 AM, R.S. wrote: ---SNIP-- Good news: if you want to process SMF archives, you can use LRECL=32760. AFAIK no record exceeds the length. Check the archives someone ran into it (a year ago?). I checked it for years. It was discussed few years ago. I asked similar questions. g -- 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.2007 r. kapita zakadowy BRE Banku SA (w caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone. -- 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: Data Areas Manuals to be dropped
On Fri, 18 May 2007 07:59:08 -0500, Mark Baron [EMAIL PROTECTED] wrote: In my forty years of experience dealing with IBM and its customer services organization, I have found IBM to be the most customer-centric vendor out there. So it begs the question that since Vista is about to become the PC standard, why has IBM seemed to take such a cavalier attitude about getting a fairly important desktop utility up to snuff. It's just not like them at all. IBM software was slow to support XP and other newer M$SOFT software also. RMF spreadsheet reporter, HCM, ISPF GUI - just to name a few. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group: G-ITO mailto:[EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Antwort: remote printing from z/OS Spool over the WAN network
Using Infoprint you can - Retry unsuccessful transmissions - Retain data sets on the JES spool after failed transmission You format text-documents sending a document header with PCL-Commands. Albert VERLAGSGRUPPE WELTBILD GMBH Sitz der Gesellschaft: Augsburg Handelsregister Augsburg HRB 6035 Ust-ID-Nr: DE 127501299 Geschäftsführung: Carel Halff (Vorsitzender), Dr. Klaus Driever, Werner Ortner, Herbert Zoch Vorsitzender des Aufsichtsrates: Dr. Klaus Donaubauer
Re: LRECL of Spanned Records
On May 18, 2007, at 8:05 AM, R.S. wrote: --SNIP I checked it for years. It was discussed few years ago. I asked similar questions. g I *THOUGHT* IBM (someone not sure who) replied that there can be and and (perhaps??) suggested a way around it? Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Date Time in JCL
On 17 May 2007 14:28:48 -0700, [EMAIL PROTECTED] (Ted MacNEIL) wrote: However, the issue is that, there is no definitive value of current date. The issue is more than just current date (and current time is worse). It all comes down to submission time, conversion time, execution time, or system for all variable substitution under Batch JCL. Which is valid? And, for date/time what happens if you do a typrun=hold? How do you know if the submission date is what's wanted, or execution date? What happens if you submit just before midnight? Define a few values. If they don't fit someone's needs, they are no worse than before. -- 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: Date Time in JCL
On 18 May 2007 00:14:30 -0700, [EMAIL PROTECTED] (Robert Bardos) wrote: Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? With Zulu variations. Our whole computing infrastructure should migrate to GMT, at least internally. -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
On 17 May 2007 13:48:54 -0700, [EMAIL PROTECTED] (Ted MacNEIL) wrote: Go into SDSF. Type the command KEYS. Change them to whatever you want and save. New keys will be stored in the users ISPF Profile dataset. Not a global change, which was what was asked for. Of course, no change is global when you have users who have already redefine their keys.You can change the default so that what you think you have does something other than what it says. -- 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: SMTP Question
To see what mail is queued you need to first open your TCPIP SMTP=20 configuration file and find this keyword: MAILFILEDSPREFIX=20 MAILFILEDSPREFIX defines the high level qualifier of the work files that=20 SMTP uses. In my case it is TCPIP.SMTP (ok - so not very original) You will find this file always: TCPIP.SMTP.TEMP.NOTE=20 this is the temp file used by SMTP for every note. You may find other files such as these: TCPIP.SMTP.A0065752.ADDRBLOK=20 TCPIP.SMTP.A0065752.NOTE=20 These are your queued mail files. The ADDRBLOK is the addressing and the=20 NOTE is the mail. On my system they don't exist for very long unless the=20 remote mail server is backed up or down (I've seen over 1200 at one time). You can also, if you are authorized issue the SMSG SMTP QUEUES command and = you'll get something like this: Msg from SMTP: * - Mail Queues -=20 Msg from SMTP: * Spool Queue: 0=20 Msg from SMTP: * Undeliverable Queue: 0=20 Msg from SMTP: * --- Resolver Queues ---=20 Msg from SMTP: * Process Queue: 0=20 Msg from SMTP: * Send Queue: 0=20 Msg from SMTP: * Wait Queue: 0=20 Msg from SMTP: * Retry Queue: 0=20 Msg from SMTP: * Completed Queue: 0=20 Msg from SMTP: * Error Queue: 0=20 To be authorized to issue the SMSG command look in your TCPIP SMTP=20 configuration file for this section: SMSGAUTHLIST=20 userid ; OPERATOR LocalUser=20 ENDSMSGAUTHLIST =20 Replace userid with your userid or add your userid and you're set hth Lionel B. Dyck, Consultant/Specialist Enterprise Platform Services, Mainframe Engineering KP-IT Enterprise Engineering, Client and Platform Engineering Services (CAPES) 925-926-5332 (8-473-5332) | E-Mail: [EMAIL PROTECTED] AIM: lbdyck | Yahoo IM: lbdyck Kaiser Service Credo: Our cause is health. Our passion is service. We’re here to make lives better.” “Never attribute to malice what can be caused by miscommunication.” NOTICE TO RECIPIENT: If you are not the intended recipient of this e-mail, you are prohibited from sharing, copying, or otherwise using or disclosing its contents. If you have received this e-mail in error, please notify the sender immediately by reply e-mail and permanently delete this e-mail and any attachments without reading, forwarding or saving them. Thank you.
Re: FTP Error 426
John, I Googled 'out of band FTP' and got a link to RFC 0529. I'm no expert in IP networking, but to my reading, out-of-band is sort of an interrupt caused by the ABOR. So, why did the client send the abort? Could it be the timeout value had passed? I think the default is 120 seconds, but it can be overridden. If this is a batch job, you might check your EZA1617I messages in the aborted runs and see if your transfer rate was running really slow at the time. We've found IP traffic to be so flaky that we coded a proc that runs a REXX that attempts the FTP x number of times (4 as a default), sleeping 30 seconds between attempts (adapted from something we acquired from Terry Linsley somehow -- thanks, Terry). And all our batch jobs that need to FTP use the FTPRETRY proc - most of them are successful on the first attempt, but many of them wind up taking 2 or 3 attempts. And when the programmers discover a site they are FTP'ing to that seems to fail a lot, they generally increase the timeout value too. Anyway, our shop has viewed this unreliability in FTP transfers as SOP (or WAD) and have adapted. HTH, Greg Shirey Ben E. Keith Company -Original Message- From: IBM Mainframe Discussion List On Behalf Of Chase, John Sent: Friday, May 18, 2007 8:48 AM Trying to understand the explanation for this FTP error: 426 Connection closed; transfer aborted. The manual says only this: The FTP server received an Out Of Band ABOR subcommand from the FTP client requesting that the data transfer in progress end. The FTP server aborted the data transfer. The client in this context is z/OS 1.7; server is an AIX machine in our local network. What is an Out Of Band condition, and why would the z/OS FTP program (client) originate it? BTW, the same FTP job finally succeeded after four of the above aborts. -- 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: calling ISPLINK from COBOL
Jim McAlpine wrote: I'm trying to convert the following pseudo code to run under COBOL - DCL TCCSID CHAR(5); /* TERMINAL CCSID */ CALL ISPLINK('VDEFINE','ZTERMCID',TCCSID,'CHAR', LENGTH(TCCSID)); CALL ISPLINK('VGET ','ZTERMCID','SHARED '); and I've come up with - WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'ZTERMCID'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Items have to be in a specified order; for VDEFINE its: VDEFINE - the verb; you're OK there name-list - you have ZTERMCID, looks OK variable - you have TCCSID, 5 byte area where value is to be placed; looks OK format - you have CHAR; OK length - you have LCCSID; this must be a fullword binary integer; you have 8 bytes of display; Try chaning LCCSID to be defined as: LCCSID pic s9(8) binary value 5. but I'm getting rc=20 - severe error from both calls to ISPLINK. It's 20 years since I've done any of this stuff and I've been looking at it all afternoon without success. Can someone put me out of my Friday afternoon misery please. Is it time to go home yet. Hard to say: what time zone are you in? Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques -- 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: calling ISPLINK from COBOL
Jim, Change the W-S fields to this: 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 LCCSID PIC 9(6) comp VALUE 5. Kurt Gramling I'm trying to convert the following pseudo code to run under COBOL - DCL TCCSID CHAR(5); /* TERMINAL CCSID */ CALL ISPLINK('VDEFINE','ZTERMCID',TCCSID,'CHAR', LENGTH(TCCSID)); CALL ISPLINK('VGET ','ZTERMCID','SHARED '); and I've come up with - WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'ZTERMCID'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. but I'm getting rc=20 - severe error from both calls to ISPLINK. It's 20 years since I've done any of this stuff and I've been looking at it all afternoon without success. Can someone put me out of my Friday afternoon misery please. Is it time to go home yet. Jim -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?
Peter Relson: No, the dsname cannot include SYSR1. Nor is such functionality likely to be implemented. There is no full system symbol support for any symbol including SYSR1 (so substrings are not supported, for example). Peter, Thank you for noticing and the authoritative answer. I'd hope this is not the last word (even if a word comes too late for me). Why am I asking about this? Because I have a top level PARMLIB (locally updated parms/ members) for every sysres set that we have around here. I'm guessing others do likewise. The OS can easily find it via either master catalogue and/or volser in PARMLIB statement (that can be a symbol like 'SYSR1', '*MCAT*', '**). However it is me who needs to update it, and, make sure I do not touch the live, running sysres PARMLIB. Typically, for any updates, including PARMLIB/PROCLIBs we make an alternate/ cloned sysres set and prepare it for an IPL. So, each time, while editing, I'm concerned, and I do check, multiple times, am I really editing the right one? A volser (=SYSR1), in a PARMLIB dsname single qualifier, would be a helpful, visual feedback, and it would offer an additional flexibility: A sysres set level PARMLIB could be placed on other volumes (than 'SYSR1'), like *MCAT* or IODF, since it could have a unique dsname with a clear indication as to where it belongs. In our setup an IODF volume supports multiple images/ *MCAT*s. There are multiple sysres sets for an *MCAT*. A simplified support for SYSR1 symbol (no substring support) in the dsname field of LOADxx/PARMLIB statement would be a good thing for z/OS system programmers. Janek J. -- 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: Date Time in JCL
-Original Message- From: Vernooy, C.P. - SPLXM [mailto:[EMAIL PROTECTED] Sent: Friday, May 18, 2007 3:51 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Date Time in JCL Robert Bardos [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... Snipped Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? Robert Of which system? Jobs can travel through serveral systems in an NJE network, submitted on system1, converted on system2 executed on system3, each with their own timesettings. Dataset1 gets timestamp 10:00, the *next* dataset2 can get timestamp 09:10 if created 10 minutes after dataset1. Quite confusing. OK, I haven't ever contributed to this long-running debate, so here's my USD$0.02 worth: Let the customer decide what they want: SYSTMSG Time, Submit, GMT SYSTMSL Time, Submit, Local SYSTMCG Time, Convert, GMT SYSTMCL Time, Convert, Local SYSTMEG Time, Execute, GMT SYSTMEL Time, Execute, Local And the same kind of set for Date of course (SYSDTSG etc.). GMT's could be suffixed U for Universal or Z for Zulu instead of G, I don't really care as long as the functionality is the same. And to reply to another poster's objection, these are NOT JOB-saved values. They are live when-used values maintained at the system level only. If you the user want the same value later in the JCL, then save it in a SET variable of your own. So, you would NOT use the following example in your JCL to create a dataset to be used later in the same job: //DDNAME DD DISP=(,CATLG),DSN=MYUSERID.MYDATA.DSYSEDTG..TSYSETMG,... Instead, you would code it like this: // SET MYDATE=SYSEDTG,MYTIME=SYSETMG //DDNAME DD DISP=(,CATLG),DSN=MYUSERID.MYDATA.DMYDATE..TMYTIME,... And then later in the job you could code: //DDNAME DD DISP=SHR,DSN=MYUSERID.MYDATA.DMYDATE..TMYTIME with no ambiguity at all. As for RESTARTed jobs, well I don't know the rule for whether SET statements are re-executed on a restart or not. If the SET's are bypassed, RESTART is probably not possible. In which case, it's like the old vaudeville routine, Patient: Doctor, Doctor it hurts when I do that! Doctor: Don't do that!. I also just realized why people think there would be a JOB-related storage need, to carry along Submit and Convert dates/times. But wait -- why wouldn't Convert and Submit simply replace the text of the symbol name with the text value at that point in time? Then subsequent steps (Convert and Execute after Submit, Execute after Convert) would see only constant text, not a variable. Only Execute symbols would be always live and always changing. And if you need RESTARTability, don't use Execute-time symbols. Is that enough specification to make it viable? Peter This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: date and time in JCL
Why do some people persist in changing the subject line, making it difficult to thread topics? Don Imbriale -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of john gilmore Sent: Thursday, May 17, 2007 7:17 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: date and time in JCL *** Bear Stearns is not responsible for any recommendation, solicitation, offer or agreement or any information about any transaction, customer account or account activity contained in this communication. *** -- 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: 3350 errors
It has been some time since I worked on 3350s, but I believe the described fault which lead to head crashes was an air filter somewhere in the HDA assembly which eventually deteriorated and got onto the platters. I also recall the 3380s had problems with the checkstops in the HDA deteriorating, thereby causing head crashes, and the 3350s may have exhibited this as well. -- 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: Old RAMAC 2 still viable?
But will SVAA work with the old RVA? -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of David Andrews Sent: Friday, May 18, 2007 8:43 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Old RAMAC 2 still viable? On Fri, 2007-05-18 at 08:38 -0500, Marvin Lukasik wrote: We are currently converting our 4 RVA boxes to an IBM DS8100 in preparation for installing Z/OS 1.7 since they ( actually IXFP ) will no longer be supported, FWIW: SVAA (the successor to IXFP) *is* supported by Sun/STK. -- David Andrews A. Duda and Sons, Inc. [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
calling ISPLINK from COBOL
I'm trying to convert the following pseudo code to run under COBOL - DCL TCCSID CHAR(5); /* TERMINAL CCSID */ CALL ISPLINK('VDEFINE','ZTERMCID',TCCSID,'CHAR', LENGTH(TCCSID)); CALL ISPLINK('VGET ','ZTERMCID','SHARED '); and I've come up with - WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'ZTERMCID'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. but I'm getting rc=20 - severe error from both calls to ISPLINK. It's 20 years since I've done any of this stuff and I've been looking at it all afternoon without success. Can someone put me out of my Friday afternoon misery please. Is it time to go home yet. Jim -- 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: FTP Error 426
John In 4.1.3. FTP SERVICE COMMANDS, RFC 959 states the following: quote ABORT (ABOR) This command tells the server to abort the previous FTP service command and any associated transfer of data. The abort command may require special action, as discussed in the Section on FTP Commands, to force recognition by the server. No action is to be taken if the previous command has been completed (including data transfer). The control connection is not to be closed by the server, but the data connection must be closed. There are two cases for the server upon receipt of this command: (1) the FTP service command was already completed, or (2) the FTP service command is still in progress. In the first case, the server closes the data connection (if it is open) and responds with a 226 reply, indicating that the abort command was successfully processed. In the second case, the server aborts the FTP service in progress and closes the data connection, returning a 426 reply to indicate that the service request terminated abnormally. The server then sends a 226 reply, indicating that the abort command was successfully processed. /quote Interestingly enough, it doesn't mention out-of-band. I expect this explanation text you found means that the TCP OOB function is used with the sending of the ABOR command from the FTP client to the FTP server over the TCP connection. OOB is some weird protocol used within TCP which is a pale shadow of the SNA expedite function. I expect this means that the FTP client was trying to hurry along the abort request - quite understandable - and maybe it worked! Here are my presentation notes on OOB: quote Out-Of-Band Data Out-of-band data may be used for whatever purpose an application may have for it. It is usually thought of as of use for sending urgent data. It may be compared to the use of SIGNAL in SNA. The sending and receiving of out-of-band data is supported by modified versions of the standard WRITE and READ subroutine calls: SEND and RECV. These subroutine calls allow for the additional specification of a flag parameter which includes the ability to send out-of-band data with a SEND subroutine call and receive out-of-band data with a RECV subroutine call. The flag has the name MSG_OOB. Out-of-band data may be received either inline in the position it was placed in the data stream by the SEND subroutine call or not inline so that it can be received as soon as it appears in the arriving data and ahead of any normal data in the stream. Setting the option to define how out-of-band data should be received is one of the functions of the SETSOCKOPT subroutine call. The ability to query the current setting of this option is one of the functions of the GETSOCKOPT subroutine call. The socket option is specified with the name SO_OOBINLINE. Whether the out-of-band data is inline or not inline, the fact that out-of-band data is next to be read can be detected by use of one of the functions of the IOCTL subroutine call. The function has the name SIOCATMARK. The function is normally used when the out-of-band data is inline. Note that, whereas normally stream data accumulates such that data from multiple subroutine calls of any of the send types can be received with one subroutine call of any of the receive types, the presence of out-of-band data effectively creates boundaries in the stream so that a receive subroutine call stops, as it were, at the out-of-band marker. Thus there is no risk that inline out-of-band data can be missed by being embedded in normal data. However, when out-of-band data is not inline, there is a risk that the data can be lost entirely unless it is received *before* normal data which was sent after the out-of-band data. Whether the out-of-band data is inline or not, the SELECT subroutine call will indicate that out-of-band data is present by setting the exception condition for the relevant socket. This condition is cleared when the out-of-band data is received or it has been, as it were, passed over. The author has had some difficulty getting very definite descriptions of other than the most basic socket functions from available sources. At least one implementation of socket subroutine calls, namely, TCP/IP for MVS (and, almost certainly, also VM and, very probably, VTAM V3R4.2) implement out-of-band data as *a single byte*. This is nowhere precisely documented. Strangely enough, if the SEND subroutine call used to send out-of-band data specifies more than one byte of data, all bytes, other than the last, enter the stream as normal data. A further point, also discovered only by testing, is that only one out-of-band byte may be sent at any one time. If a second
Re: Is there a way to Remove BOOK from PF6 in SDSF?
On Thu, 17 May 2007 20:49:41 +, Ted MacNEIL [EMAIL PROTECTED] wrote: Not a global change, which was what was asked for. - Too busy driving to stop for gas! It's not global but I haven't read anyone refer to the KEYLIST command. -- 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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?
Jakubek, Jan wrote: Peter Relson: No, the dsname cannot include SYSR1. Nor is such functionality likely to be implemented. There is no full system symbol support for any symbol including SYSR1 snip Have you thought of issuing a SET PARMLIB command to activate a parmlib configuration that has the SYSR1 symbol in it early in the IPL process? The symbol should be able to be resolved then. -- Mark Jacobs Technical Services Time Customer Service - Tampa, FL -- Victory in defeat, there is none higher. She didn't give up, Ben; she's still trying to lift that stone after it has crushed her. She's a father going down to a dull office job while cancer is painfully eating away his insides, so as to bring home one more pay check for the kids. She's a twelve-year-old girl trying to mother her baby brothers and sisters because Mama had to go to Heaven. She's a switchboard operator sticking to her job while smoke is choking her and the fire is cutting off her escape. She's all the unsung heroes who couldn't quite cut it but never quit.* Robert A. Heinlein - Stranger in a Strange Land *Referring to the Auguste Rodin sculpture, Caryatid Who Has Fallen under Her Stone -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
Once a user accesses SDSF the ISFPROF memeber of the SISFTLIB dataset is copied into that users ISPPROF dataset. The only mechanism to effect change to all of the users is delete the ISFPROF member from each users ISPPROF dataset. This will cause a new copy of ISFPROF to be made from the SISFTLIB dataset. You can set the defaults when the system is first installed by setting your own KEYS to what you feel they should default to and then copying your ISFPROF member from your ISPPROF dataset into the SISFTLIB dataset. Short of doing this, I would say that overiiding the BOOK command with a REXX or CLIST as mentioned earilier is the quickest fix. -- 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: Date Time in JCL
On Fri, 18 May 2007 10:42:32 -0400, Farley, Peter x23353 wrote: Let the customer decide what they want: SYSTMEGTime, Execute, GMT SYSTMELTime, Execute, Local But that's a more significant change. I suspect symbolic substitution is performed at only one step in the job flow, prior to the availability of the execution time values. And, at what point in the flow must data set names be fixed for ENQs and JES3 scheduling? I'd be pleased enough to have only the submission or conversion (whichever is more practical) values. GMT, of course. And to reply to another poster's objection, these are NOT JOB-saved values. They are live when-used values maintained at the system level only. If you the user want the same value later in the JCL, then save it in a SET variable of your own. Complicateder and complicateder. So would SETs involving conversion time symbols need to be elaborated at conversion time, SETs involving execution time symbols need to be elaborated at execution time, etc. BTW, the JCL RM appears to prohibit using symbols in SET statements, though the statement is ambiguous and appears to be entirely unenforced. -- gil -- 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: date and time in JCL
On Fri, 18 May 2007 10:33:13 -0400, Imbriale, Donald [EMAIL PROTECTED] wrote: Why do some people persist in changing the subject line, making it difficult to thread topics? I've noticed that's perceptibly characteristic of John G. o Perhaps his User Agent doesn't support replicating the subject line and he has no choice but retype it with possible variation. o At times he makes a suitable, somtimes overdue, change in the subject line when the topic is drifting. o Perhaps he feels urged to correct typographic errors in the subject line (sometimes introducing his own). o Perhaps he merely dislikes ampersands. -Original Message- Behalf Of john gilmore Subject: Re: date and time in JCL -- gil -- 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: Lean and Mean: 150,000 U.S. layoffs for IBM?
In [EMAIL PROTECTED], on 05/10/2007 at 02:59 PM, Rick Fochtman [EMAIL PROTECTED] said: Here again, I have similar experiences with medics. When I got bitten by a cottonmouth at Ft. Polk, the medic-types were worse than useless, but the guy that saved my b*tt in 'Nam after I was stung by a very large wasp had the right needle in me before I was settled firmly on the ground. (I'm deathly allergic to wasp and bee stings.) It was the NCO's and Warrants that got me to the hospital in time, while the captain kept insisting that I was malingering. One of life's little ironies was that while they thought I was malingering when I kept going on sick call for my pneumonia, they ordered me to see the doctor when I banged up my lack on the obstacle course. They kept me in the hospital for a week for a lousy bruise[1] which I was perfectly content to ignore, thus setting back my training. I find it very hard to respect a leader that doesn't do anything to earn my respect except sit in his office reading magazines and signing the rare purchase order for office supplies. I was lucky in that regard; I don't recall a company commander of that sort. [1] They called it a hematoma, but that just means bruise. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: Lean and Mean: 150,000 U.S. layoffs for IBM?
In [EMAIL PROTECTED], on 05/10/2007 at 02:24 PM, Chase, John [EMAIL PROTECTED] said: The President of the United States get, what, a $400,000 annual salary? And a tenure limited by the Constitution to 8 years maximum. And quite a variety of perq for the rest of his life. Explain that! Power is the ultimate aphrodisiac. Even a failed president gets a huge amount of payoffas and spinoff from his presidency, and the potential for graft behind the Iron Curtain was even higher than it is here, where it is already enormous. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: JES2 at DR
In [EMAIL PROTECTED], on 05/10/2007 at 08:16 AM, Lizette Koehler [EMAIL PROTECTED] said: If I start JES2 with PARM='COLD,NOFMT' that will cold start the Checkpoint and not format the Spool spaces. You can't do[1] NOFMT unless the online SPOOL volumes are already formatted. You have to format the remaining SPOOL volumes sooner or later. Do you have reason to believe that it is faster to format a raw volume than to restore from a full dump of an already formatted volume? We are just doing full volume restores of our JES2 volumes so they will not be allocated as new spaces. They already exist. Then they're already formatted. We are trying to reduce the time our JES2 startup takes at DR and I forget how the spool space is handled after the Cold start is completed on the checkpoint. If you restored dumps of formatted SPOOL volumes then there is no need to format them again. Is there something that you left out of your question? Are you actually restoring from partial dumps? BTW, in a past life I was always able[2] to do a warm start for DR tests. We used FDR. YMMV. [1] As opposed to requesting NOFMT and JES2 ignoring it. [2] I'm not saying that it's a good idea, just that I got away with it. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: Lean and Mean: 150,000 U.S. layoffs for IBM?
In [EMAIL PROTECTED], on 05/10/2007 at 12:43 PM, Veilleux, Jon L [EMAIL PROTECTED] said: No, there wasn't any disciplinary action. Also, during my year over there 2 people were killed by accidental firearm discharges. See any correlation? None that wasn't predictable :-( -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
On Fri, 18 May 2007 09:51:30 -0500, Patrick Lyon [EMAIL PROTECTED] wrote: It's not global but I haven't read anyone refer to the KEYLIST command. SDSF doesn't use keylists. -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group: G-ITO mailto:[EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How do I build a stand alone z/OS
You're welcome. Upon further review... My abend in CEEBINIT was caused by trying to start SYSLOGD from /etc/rc in the ETC file copied to the twopak system. So I am not including SCEERUN2 in the updated sample except as comments and I am also including a note about the abend I saw while testing. I also removed RELADDR= from JES2PARM since this is obsolete as of z/OS 1.7. Regards, Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group: G-ITO mailto:[EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ Systems Programming expert at http://expertanswercenter.techtarget.com/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html On Fri, 18 May 2007 19:21:41 +0530, Mohan Vel [EMAIL PROTECTED] wrote: Thank you Mark for your help. Thanks Mohan On 5/17/07, Mark Zelden [EMAIL PROTECTED] wrote: On Thu, 17 May 2007 07:42:31 -0500, Mark Zelden [EMAIL PROTECTED] wrote: As a first step we are planning to install the z/OS, is there any way i could build a systempac kinda use it for future LPAR's. snip I have some examples on my cbt file - file 434 and in the JOBs section of my web site (URL below in my signature). If you don't need TCPIP then you can use the ONEPAK* examples - otherwise you need the TWOPAK* examples (which can fit on a single 3390-9). I last updated them for z/OS 1.6 but was just considering updating them for z/OS 1.8. If you are running z/OS 1.7, there are only minor changes that need to be made (new LNKLST lib for example). You can get those from the migration manual and / or looking at one of your 1.7 systems. snip These are the changes that are required from my 1.6 samples to work with z/OS 1.7 and z/OS 1.8. I will update my CBT file soon - but you can easily make them yourself if you plan on using my samples: CHANGES FROM Z/OS 1.6 VERSION FOR Z/OS 1.8: 1. DEL REFERENCES TO SISPSASC (1.8 CHANGE) 2. DEL SHASLINK AND REPLACE WITH SHASLNKE (1.7 CHANGE) 3. ADD SIEAMIGE TO COPY/ALTER/LNKLST/APF IN PROG00 (1.7 CHANGE) 4. REMOVE RDINUM= FROM JES2PARM (1.7 CHANGE) 5. ADD SCEERUN2 TO COPY/ALTER/LNKLST/APF IN PROG00 (1.7 CHANGE?) (ABEND IN CEEBINIT AT IPL WITHOUT SCEERUN2 - OMVS RELATED) 6. CHANGE TMP HFS TO A TFS (UNRELATED TO OS LEVEL CHANGE) 5 and 6 are only for the 2 pack system that includes OMVS and TCP/IP. SCEERUN2 is a large DSN, so it is going on the 2nd volume. Regards, Mark -- 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: Date Time in JCL
On Fri, 18 May 2007 08:05:31 -0600, Howard Brazee [EMAIL PROTECTED] wrote: It all comes down to submission time, conversion time, execution time, or system for all variable substitution under Batch JCL. How do you know if the submission date is what's wanted, or execution date? What happens if you submit just before midnight? Define a few values. If they don't fit someone's needs, they are no worse than before. Logically almost true. SMOP. But that means a few lines of code that the supplier needs to support and the customer needs to pay for supporting. And there will be service calls, you provided submission date, but I want execution date. But I think the balance is, Just do it!. GMT solves the time zone problem. None of the proposed circumventions (reader exit, JCL tailoring, dynamically updated JCLLIB INCLUDE members) provides more current than conversion time, yet they seem suitable for everyday use. The midnight transition question? If a STC JCL uses DSN=HLQ1.YYMMDD.HHMMSS, is it guaranteed that the date and time are evaluated on the same day? Otherwise there's a pernicious +/- 23:59:59 error. Are authors of the above mentioned circumventions confident that their code is robust with respect to this pitfall? -- gil -- 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: FTP Error 426
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Chris Mason [ technical minutiae snipped ] So in this context, Out Of Band is somewhat analogous to SNA's DFASY? But we'd still like to learn why it occurred. -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
Re: calling ISPLINK from COBOL
OK, I've changed both of those but still getting rc=20. WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Jim McAlpine On 5/18/07, Kurt Gramling [EMAIL PROTECTED] wrote: Jim, Change the W-S fields to this: 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 LCCSID PIC 9(6) comp VALUE 5. Kurt Gramling -- 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: LOADxx PARMLIB statement, can dsname include SYSR1 symbol?
In [EMAIL PROTECTED], on 05/16/2007 at 01:01 PM, Jakubek, Jan [EMAIL PROTECTED] said: If this gets noticed, and considered - it can/ may get done :-) It's already noticed ;-) Now, if you want it done, submit a requirement. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- 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: calling ISPLINK from COBOL
Jim McAlpine wrote: OK, I've changed both of those but still getting rc=20. WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Jim McAlpine On 5/18/07, Kurt Gramling [EMAIL PROTECTED] wrote: Jim, Change the W-S fields to this: 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 LCCSID PIC 9(6) comp VALUE 5. Kurt Gramling I don't think you want (TCCSID) but just TCCSID as you had it before. Why specify PIC 9(6) for your LCCSID? What you had before PIC S9(8) is good, you just needed to make the usage 'binary' (or, as the old timers say, 'comp'). Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques -- 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: FTP Error 426
-Original Message- From: IBM Mainframe Discussion List On Behalf Of Greg Shirey John, I Googled 'out of band FTP' and got a link to RFC 0529. I'm no expert in IP networking, but to my reading, out-of-band is sort of an interrupt caused by the ABOR. Hmmm.. From Chris Mason's explanation I got the impression that the ABOR subcommand was the payload, and the out of band is somewhat analogous to the SNA DFASY transmission. So, why did the client send the abort? Could it be the timeout value had passed? I think the default is 120 seconds, but it can be overridden. If this is a batch job, you might check your EZA1617I messages in the aborted runs and see if your transfer rate was running really slow at the time. Not likely, because the batch FTP jobstep started and ended in the same second. Here's the message sequence: EZA1736I APPEND 'ZOS.DATASET.NAME' + EZA1736I /AIX/pathname/filename.ext EZA1701I SITE FIXrecfm 599 LRECL=599 RECFM=FB BLKSIZE=27554 500 'SITE FIXrecfm 599 LRECL=599 RECFM=FB BLKSIZE=27554' EZA1701I PORT 200 PORT command successful. EZA1701I APPE /AIX/pathname/filename.ext 150 Opening ASCII mode data connection for 426 Connection closed; transfer aborted. EZA1735I Std Return Code = 04426, Error Code = 2 EZA1701I QUIT 221 * FILE TRANSFER FAILED It's as though z/OS said just kidding immediately after the 150 reply. We've found IP traffic to be so flaky that we coded a proc that runs a REXX that attempts the FTP x number of times (4 as a default), sleeping 30 seconds between attempts (adapted from something we acquired from Terry Linsley somehow -- thanks, Terry). And all our batch jobs that need to FTP use the FTPRETRY proc - most of them are successful on the first attempt, but many of them wind up taking 2 or 3 attempts. And when the programmers discover a site they are FTP'ing to that seems to fail a lot, they generally increase the timeout value too. Anyway, our shop has viewed this unreliability in FTP transfers as SOP (or WAD) and have adapted. OK, we may have to categorize this kind of situation as unexplainable for the time being. -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
Re: Mainframe Empty datasets
On 18 May 2007 06:25:41 -0700, [EMAIL PROTECTED] wrote: How can I code an assembler program to look at a dataset and determine if it is an empty dataset? The dataset maybe allocated but not open or closed. Why not just do: //STEP#01 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSGDD SYSOUT=* //INDD DSN=EMPTY.PDS.LIB(DUMMY), // DISP=SHR //TOOLINDD* * SET RC = 12 IF THE 'IN' DATA SET IS EMPTY, OR * SET RC = 00 IF THE 'IN' DATA SET IS NOT EMPTY COUNT FROM(IN) EMPTY /* // IF (STEP#01.RC=12) THEN //STEP#02EXEC PGM=IEBGENER //*SYSPRINT DD DUMMY //SYSPRINT DD SYSOUT=* //SYSUT2 DD SYSOUT=* //SYSUT1 DD * INPUT FILE IS EMPTY //SYSIN DD DUMMY // ELSE //STEP#03EXEC PGM=IEBGENER //*SYSPRINT DD DUMMY //SYSPRINT DD SYSOUT=* //SYSUT2 DD SYSOUT=* //SYSUT1 DD * INPUT FILE HAS DATA IN IT //SYSIN DD DUMMY // ENDIF ??? -- 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: saving ISPF profile settings
is there a way to save your ISPF profile settings without quitting out of ISPF? See: Digging Into the Bag of ISPF Tricks http://tinyurl.com/yyghzr - Too busy driving to stop for gas! -- 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: Old RAMAC 2 still viable?
But will SVAA work with the old RVA? Yes -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com -- 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: Old RAMAC 2 still viable?
It's a 9394-002 with 9395-B23. I searched IBM and this list and couldn't find any info on lack of support. There are several references to 9394 in the z/OS 1.8 library so I assume it is supported. -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com -- 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: calling ISPLINK from COBOL
Jim, You may not have all of the allocations correct in the batch JCL. Try putting the load in a dataset allocated in your ISPLLIB of your TSO session and executing it directly - TSO CCSID. Kurt Gramling OK, I've changed the calls to dynam and changed the length and ZTERMCID as follows - CBL DYNAM IDENTIFICATION DIVISION. PROGRAM-ID. CCSID. ENVIRONMENT DIVISION. CONFIGURATION SECTION. DATA DIVISION. WORKING-STORAGE SECTION. 01 ISPLINK PIC X(8) VALUE 'ISPLINK '. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'TCCSID '. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL ISPLINK USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL ISPLINK USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. but still rc=20. I'm getting the feeling it's something more basic. It's running just as a batch COBOL program BTW. Jim McAlpine -- 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: calling ISPLINK from COBOL
I don't know if you can do this, but if you can get a dump of the code at the time it is making the call to ISPLINK, you can check the parm list. R1 will point to a parmlist of full word pointers, with the last one set with the high order bit on to denote end of list. Each parm in the list has to be in the sequence specified in the ISPF manual for the type of function desired. 1st parm would point to an 8 character field with VDEFINE, 2nd parm the name field, etc., etc. Check the manual for the correct parm list for the type of call. Adjust your code accordingly. As far as I know, rc=20 says ISPF cannot recognize what it is you are asking...the parm list is un-recognizable. Hope this helps. --Dave - Original Message - From: Jim McAlpine [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Friday, May 18, 2007 10:11 AM Subject: Re: calling ISPLINK from COBOL OK, I've changed both of those but still getting rc=20. WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Jim McAlpine On 5/18/07, Kurt Gramling [EMAIL PROTECTED] wrote: Jim, Change the W-S fields to this: 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 LCCSID PIC 9(6) comp VALUE 5. Kurt Gramling -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: calling ISPLINK from COBOL
Jim, When you execute the program, are you running under a batch job or in TSO? Are you sure the call to ISPLINK is dynamic? I don't know if static links will work. Kurt Gramling OK, I've changed both of those but still getting rc=20. WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Jim McAlpine On 5/18/07, Kurt Gramling [EMAIL PROTECTED] wrote: Jim, Change the W-S fields to this: 01 ZTERMCID PIC X(8) VALUE '(TCCSID)'. 01 LCCSID PIC 9(6) comp VALUE 5. Kurt Gramling -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: calling ISPLINK from COBOL
OK, I've changed the calls to dynam and changed the length and ZTERMCID as follows - CBL DYNAM IDENTIFICATION DIVISION. PROGRAM-ID. CCSID. ENVIRONMENT DIVISION. CONFIGURATION SECTION. DATA DIVISION. WORKING-STORAGE SECTION. 01 ISPLINK PIC X(8) VALUE 'ISPLINK '. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'TCCSID '. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL ISPLINK USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL ISPLINK USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. but still rc=20. I'm getting the feeling it's something more basic. It's running just as a batch COBOL program BTW. Jim McAlpine On 5/18/07, Steve Comstock [EMAIL PROTECTED] wrote: I don't think you want (TCCSID) but just TCCSID as you had it before. Why specify PIC 9(6) for your LCCSID? What you had before PIC S9(8) is good, you just needed to make the usage 'binary' (or, as the old timers say, 'comp'). Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: calling ISPLINK from COBOL
Ah. You have to be running under TSO and start ISPF for ISPLINK to work, otherwise you get the RC 20.(Well, that first part is not exactly 100% true; I've seen some pretty good spoofing of TSO that fools ISPF.) You can run ISPF under batch TSO (EXEC PGM=IKJEFT1B or IKJEFT01); I haven't used ISPF batch before, but there are examples of how to do this in the archives (this came up recently). There is also an ISPF-centric listserv, ISPF-L. Subscribe using the usual commands at [EMAIL PROTECTED] Later, Ray -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine Sent: Friday May 18 2007 08:43 To: IBM-MAIN@BAMA.UA.EDU Subject: Re: calling ISPLINK from COBOL OK, I've changed the calls to dynam and changed the length and ZTERMCID as follows - CBL DYNAM IDENTIFICATION DIVISION. PROGRAM-ID. CCSID. ENVIRONMENT DIVISION. CONFIGURATION SECTION. DATA DIVISION. WORKING-STORAGE SECTION. 01 ISPLINK PIC X(8) VALUE 'ISPLINK '. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'TCCSID '. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL ISPLINK USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL ISPLINK USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. but still rc=20. I'm getting the feeling it's something more basic. It's running just as a batch COBOL program BTW. Jim McAlpine -- 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: Mainframe Empty datasets
Would not ICETOOL be opening the dataset to do the count? The requirement was that the dataset not be opened. You would probably have to read the vtoc in order to determine if any space is actually being used. -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Howard Brazee Sent: Friday, May 18, 2007 11:37 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Mainframe Empty datasets On 18 May 2007 06:25:41 -0700, [EMAIL PROTECTED] wrote: How can I code an assembler program to look at a dataset and determine if it is an empty dataset? The dataset maybe allocated but not open or closed. Why not just do: //STEP#01 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSGDD SYSOUT=* //INDD DSN=EMPTY.PDS.LIB(DUMMY), // DISP=SHR //TOOLINDD* * SET RC = 12 IF THE 'IN' DATA SET IS EMPTY, OR * SET RC = 00 IF THE 'IN' DATA SET IS NOT EMPTY COUNT FROM(IN) EMPTY /* // IF (STEP#01.RC=12) THEN //STEP#02EXEC PGM=IEBGENER //*SYSPRINT DD DUMMY //SYSPRINT DD SYSOUT=* //SYSUT2 DD SYSOUT=* //SYSUT1 DD * INPUT FILE IS EMPTY //SYSIN DD DUMMY // ELSE //STEP#03EXEC PGM=IEBGENER //*SYSPRINT DD DUMMY //SYSPRINT DD SYSOUT=* //SYSUT2 DD SYSOUT=* //SYSUT1 DD * INPUT FILE HAS DATA IN IT //SYSIN DD DUMMY // ENDIF ??? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: calling ISPLINK from COBOL
Kurt Gramling wrote: Jim, You may not have all of the allocations correct in the batch JCL. Try putting the load in a dataset allocated in your ISPLLIB of your TSO session and executing it directly - TSO CCSID. Kurt Gramling OK, I've changed the calls to dynam and changed the length and ZTERMCID as follows - CBL DYNAM IDENTIFICATION DIVISION. PROGRAM-ID. CCSID. ENVIRONMENT DIVISION. CONFIGURATION SECTION. DATA DIVISION. WORKING-STORAGE SECTION. 01 ISPLINK PIC X(8) VALUE 'ISPLINK '. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) COMP VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'TCCSID '. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL ISPLINK USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL ISPLINK USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. but still rc=20. I'm getting the feeling it's something more basic. It's running just as a batch COBOL program BTW. Jim McAlpine I'd go along with Kurt on this one. You need all your allocations set up. And with Ray: you need to run this under ISPF, so you probably don't want to just execute the program but issue an ISPSTART command or some other start up scenario. Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques -- 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
SMTP Question
Would you know how the NODENAME is built: NODENAME.CSLF.ORG unable to deliver following mail to recipient(s): [EMAIL PROTECTED] Have a Nice Day ! Bob Pelletier Connecticut Student Loan Foundation Rocky Hill, Ct. -- 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: FTP Error 426
Hi John, I'm not a TCP/IP person but from my searches... On the return code 426: The FTP server sends message that it's about to open a data connection but we don't see an incoming SYN from port 20 and 2 seconds later, it sends 426 Connection closed. Transfer aborted which causes the control connection to be closed. This could be due to a firewall not allowing the data connection to flow. On the meaning of out-of-band: It relates to the method of signaling between the client and server. Normally subcommands are processed one after the other and are received within the data stream (or in band). In the case of an ABOR, you don't want the other end to wait to get your command, so it is sent Out of Band. You really want to interrupt the other end and have it respond to the ABOR instead of finishing what it was doing. Out of Band is a method of signalling that gets processed immediately. Please don't ask me what any of that means. -- Regards, George Kozakos z/OS Level 2 Software Service -- 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: Date Time in JCL
-Original Message- From: Paul Gilmartin [mailto:[EMAIL PROTECTED] Sent: Friday, May 18, 2007 11:24 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Date Time in JCL On Fri, 18 May 2007 10:42:32 -0400, Farley, Peter x23353 wrote: Let the customer decide what they want: SYSTMEGTime, Execute, GMT SYSTMELTime, Execute, Local But that's a more significant change. I suspect symbolic substitution is performed at only one step in the job flow, prior to the availability of the execution time values. But this is no different than DSN=TEMP (where TEMP is not set to any value at the time the JCL is translated) generating a DSN in the standard temporary format, e.g. SYS07137.T154733.RA000.MYJOBNAM.MYDDNAME.H01 At least ISTM it is not different in principle. And, at what point in the flow must data set names be fixed for ENQs and JES3 scheduling? Now that's a good question, and no doubt a possible argument for not providing execution-time symbols. Worth discussing at length in the functional design meeting. I'd be pleased enough to have only the submission or conversion (whichever is more practical) values. GMT, of course. Agreed, either one would be sufficient to most users' needs. Personally I would be happy to have just submission-time symbols, but my needs are not everyone's needs. And to reply to another poster's objection, these are NOT JOB-saved values. They are live when-used values maintained at the system level only. If you the user want the same value later in the JCL, then save it in a SET variable of your own. Complicateder and complicateder. So would SETs involving conversion time symbols need to be elaborated at conversion time, SETs involving execution time symbols need to be elaborated at execution time, etc. But of course they would. That's the idea of providing different symbols for different stages of a job. Whether or not that idea is practical or not is a different issue. Again, worthy of serious discussion at the functional design meeting. BTW, the JCL RM appears to prohibit using symbols in SET statements, though the statement is ambiguous and appears to be entirely unenforced. By testing, I see that // SET var=value CAN be used inside of a PROC. Inside of a PROC, the PROC symbols can be used pretty much anywhere, so why not as the value in a SET assignment? And if PROC variables can be used, why not system symbols as well? The following JCL translates and executes just fine on z/OS v1.6 after you substitute your own job card: //MYUSERID JOB (...) //PROC1PROC FIRST=ONE //EXEC1EXEC PGM=IEFBR14 //EXEC1DD1 DD DUMMY // SET NEXT=FIRST //EXEC2EXEC PGM=IEFBR14,PARM='NEXT' //EXEC2DD1 DD DUMMY //* // PEND //* //PROC2PROC FIRST=ONE //EXEC1EXEC PGM=IEFBR14 //EXEC1DD1 DD DUMMY // SET NEXT=FIRST //EXEC2EXEC PGM=IEFBR14,PARM='NEXT' //EXEC2DD1 DD DUMMY //* //EXEC3EXEC PROC1,FIRST=TWO //* // PEND //* //EXECJCL EXEC PROC2 //* Peter This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Mainframe Empty datasets
LOCATE the dataset OBTAIN the DSCB Examine DS1LSTAR From: CICS Guy [EMAIL PROTECTED] Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Mainframe Empty datasets Date: Fri, 18 May 2007 11:36:37 -0500 I read it more that the dataset may have been allocated but never actually opened for output -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Barkow, Eileen Sent: Friday, May 18, 2007 12:06 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Mainframe Empty datasets Would not ICETOOL be opening the dataset to do the count? The requirement was that the dataset not be opened. You would probably have to read the vtoc in order to determine if any space is actually being used. _ More photos, more messages, more storageget 2GB with Windows Live Hotmail. http://imagine-windowslive.com/hotmail/?locale=en-usocid=TXT_TAGHM_migration_HM_mini_2G_0507 -- 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 _ PC Magazines 2007 editors choice for best Web mailaward-winning Windows Live Hotmail. http://imagine-windowslive.com/hotmail/?locale=en-usocid=TXT_TAGHM_migration_HM_mini_pcmag_0507 -- 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: Shared HFS
Depends what you mean by Shared HFS. If you want to use shared file system support as IBM describe it in the USS Planning, it has sysplex scope. End of story. Ok, then. That was what I was looking for. Thank you very much! -- 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: Mainframe Empty datasets
I read it more that the dataset may have been allocated but never actually opened for output -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Barkow, Eileen Sent: Friday, May 18, 2007 12:06 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Mainframe Empty datasets Would not ICETOOL be opening the dataset to do the count? The requirement was that the dataset not be opened. You would probably have to read the vtoc in order to determine if any space is actually being used. _ More photos, more messages, more storageget 2GB with Windows Live Hotmail. http://imagine-windowslive.com/hotmail/?locale=en-usocid=TXT_TAGHM_migration_HM_mini_2G_0507 -- 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: Mainframe Empty datasets
On 18 May 2007 09:06:53 -0700, [EMAIL PROTECTED] (Barkow, Eileen) wrote: Would not ICETOOL be opening the dataset to do the count? The requirement was that the dataset not be opened. You would probably have to read the vtoc in order to determine if any space is actually being used. Good point. -- 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: calling ISPLINK from COBOL
Yes, I think that's probably it. I was sure I had done this before, but as I said originally it was a long long time ago. Anyhow it is now definitely time to go home. I'll get back on it next week. Thanks again for all the help. Jim McAlpine On 5/18/07, Steve Comstock [EMAIL PROTECTED] wrote: I'd go along with Kurt on this one. You need all your allocations set up. And with Ray: you need to run this under ISPF, so you probably don't want to just execute the program but issue an ISPSTART command or some other start up scenario. Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Shared HFS
Yeah, I know the matter are the names, but while this is my first HFS sharing, and I had these problems, I thought of having an expert opinion. 2007/5/14, Mark Zelden [EMAIL PROTECTED]: To be honest, I don't know for sure (and didn't even try RTFM-ing). I was going to say try and test it... but it looks like you already did (although all you said was the IPL failed when starting Unix with no specifics). But why does it matter? I have a shared HFS set up where I share the sysres set (and HFS files) between sysplexes with shared HFS and non-shared HFS and monoplexes. The key is the HFS (zFS) names you choose, not whether SYSPLEX() and VERSION() are specified in BPXPRMxx. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group: G-ITO mailto:[EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: calling ISPLINK from COBOL
Steve Comstock wrote: Jim McAlpine wrote: I'm trying to convert the following pseudo code to run under COBOL - DCL TCCSID CHAR(5); /* TERMINAL CCSID */ CALL ISPLINK('VDEFINE','ZTERMCID',TCCSID,'CHAR', LENGTH(TCCSID)); CALL ISPLINK('VGET ','ZTERMCID','SHARED '); and I've come up with - WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'ZTERMCID'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Items have to be in a specified order; for VDEFINE its: VDEFINE - the verb; you're OK there name-list - you have ZTERMCID, looks OK variable - you have TCCSID, 5 byte area where value is to be placed; looks OK format - you have CHAR; OK length - you have LCCSID; this must be a fullword binary integer; you have 8 bytes of display; Try chaning LCCSID to be defined as: LCCSID pic s9(8) binary value 5. I find that using the ISPF 'MODEL' command is useful when writing ISPF programs. Make sure you're editting a PDS with a name such as MYNAME.TEST.COBOL and then issue 'MODEL WORKSTORE' and the 'a' line command where you would like the working storage fields entered. Then go down to the procedure division and to a 'MODEL VDEFINE' for a sample and =NOTE= comments. Same for the other ISPF services. Do 'MODEL' by itself to bring up a list of all the services. but I'm getting rc=20 - severe error from both calls to ISPLINK. It's 20 years since I've done any of this stuff and I've been looking at it all afternoon without success. Can someone put me out of my Friday afternoon misery please. Is it time to go home yet. Hard to say: what time zone are you in? Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com -- Don Poitras - zSeries R D - SAS Institute Inc. - SAS Campus Drive mailto:[EMAIL PROTECTED] (919)531-5637 Fax:677- Cary, NC 27513 -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
- Original Message - From: Alan Scott [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main Sent: Friday, May 18, 2007 11:22 AM Subject: Re: Is there a way to Remove BOOK from PF6 in SDSF? Once a user accesses SDSF the ISFPROF memeber of the SISFTLIB dataset is copied into that users ISPPROF dataset. The only mechanism to effect change to all of the users is delete the ISFPROF member from each users ISPPROF dataset. This will cause a new copy of ISFPROF to be made from the SISFTLIB dataset. You can set the defaults when the system is first installed by setting your own KEYS to what you feel they should default to and then copying your ISFPROF member from your ISPPROF dataset into the SISFTLIB dataset. NO NO NO NO NO!! NEVER MANUALLY COPY MEMBERS INTO SMP/E LIBRARIES, USERMOD THEM!! Regards, Tom Conley -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
- Original Message - From: Mark Zelden [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main Sent: Friday, May 18, 2007 11:04 AM Subject: Re: Is there a way to Remove BOOK from PF6 in SDSF? On Fri, 18 May 2007 09:51:30 -0500, Patrick Lyon [EMAIL PROTECTED] wrote: It's not global but I haven't read anyone refer to the KEYLIST command. SDSF doesn't use keylists. -- Mark Zelden Mark, Mark, Mark, Mark, Mark, Does too! In SDSF, enter PFSHOW, then /+ to bring up the command prompt panel (them be keylists). Regards, Tom Conley -- 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: calling ISPLINK from COBOL
Don Poitras wrote: Steve Comstock wrote: Jim McAlpine wrote: I'm trying to convert the following pseudo code to run under COBOL - DCL TCCSID CHAR(5); /* TERMINAL CCSID */ CALL ISPLINK('VDEFINE','ZTERMCID',TCCSID,'CHAR', LENGTH(TCCSID)); CALL ISPLINK('VGET ','ZTERMCID','SHARED '); and I've come up with - WORKING-STORAGE SECTION. 01 TCCSID PIC X(5). 01 LCCSID PIC S9(8) VALUE 5. 01 VDEFINE PIC X(8) VALUE 'VDEFINE '. 01 ZTERMCID PIC X(8) VALUE 'ZTERMCID'. 01 CHAR PIC X(4) VALUE 'CHAR'. 01 VGET PIC X(8) VALUE 'VGET'. 01 SHARED PIC X(8) VALUE 'SHARED '. PROCEDURE DIVISION. CALL 'ISPLINK' USING VDEFINE ZTERMCID TCCSID CHAR LCCSID. DISPLAY RETURN-CODE UPON SYSOUT. CALL 'ISPLINK' USING VGET ZTERMCID SHARED. DISPLAY RETURN-CODE UPON SYSOUT. DISPLAY TCCSID UPON SYSOUT GOBACK. Items have to be in a specified order; for VDEFINE its: VDEFINE - the verb; you're OK there name-list - you have ZTERMCID, looks OK variable - you have TCCSID, 5 byte area where value is to be placed; looks OK format - you have CHAR; OK length - you have LCCSID; this must be a fullword binary integer; you have 8 bytes of display; Try chaning LCCSID to be defined as: LCCSID pic s9(8) binary value 5. I find that using the ISPF 'MODEL' command is useful when writing ISPF programs. Make sure you're editting a PDS with a name such as MYNAME.TEST.COBOL and then issue 'MODEL WORKSTORE' and the 'a' line command where you would like the working storage fields entered. Then go down to the procedure division and to a 'MODEL VDEFINE' for a sample and =NOTE= comments. Same for the other ISPF services. Do 'MODEL' by itself to bring up a list of all the services. Excellent suggestion, Don. I second that approach. Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
snip NO NO NO NO NO!! NEVER MANUALLY COPY MEMBERS INTO SMP/E LIBRARIES, USERMOD THEM!! Regards, Tom Conley /snip I agree whole heartedly!!! It is a VERY BAD idea to copy into SMP/E files. Jon L. Veilleux [EMAIL PROTECTED] (860) 636-2683 This e-mail may contain confidential or privileged information. If you think you have received this e-mail in error, please advise the sender by reply e-mail and then delete this e-mail immediately. Thank you. Aetna -- 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: Mainframe Empty datasets
On Fri, 18 May 2007 09:37:00 -0600, Howard Brazee [EMAIL PROTECTED] wrote: On 18 May 2007 06:25:41 -0700, [EMAIL PROTECTED] wrote: How can I code an assembler program to look at a dataset and determine if it is an empty dataset? The dataset maybe allocated but not open or closed. Why not just do: //STEP#01 EXEC PGM=ICETOOL Howard, where did you find this topic to originate? Back in April or March perhaps? I can't seem to backtrack via Previous in Topic up above. It is in black (not blue) and not selectable. Can anyone help me out with navigation please?! THANX, ...mhyI -- 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: Date Time in JCL
snip The issue is more than just current date (and current time is worse). It all comes down to submission time, conversion time, execution time, or system for all variable substitution under Batch JCL. unsnip OK, give me all these symbols (CTIME, CDATE, ETIME, EDATE, etc) and I'm likely to find one that works for me 100% of the time given my pretty basic requirement. That may not work for more complex situations but I suspect that's the exception rather than the rule. Paul P -- 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: calling ISPLINK from COBOL
On Fri, 18 May 2007 10:27:43 -0500, David Day wrote: I don't know if you can do this, but if you can get a dump of the code at the time it is making the call to ISPLINK, you can check the parm list. R1 will point to a parmlist of full word pointers, with the last one set with the high order bit on to denote end of list. Each parm in the list has to be in the sequence specified in the ISPF manual for the type of function desired. 1st parm would point to an 8 character field with VDEFINE, 2nd parm the name field, etc., etc. Check the manual for the correct parm list for the type of call. Adjust your code accordingly. As far as I know, rc=20 says ISPF cannot recognize what it is you are asking...the parm list is un-recognizable. Hope this helps. I know of a program that does this kind of thing and it's calling ISPLINK with 6 parameters. The last one being some kind of option list. The rest seem to follow what you've already got. -- 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: Old RAMAC 2 still viable?
Bruce Black wrote: It's a 9394-002 with 9395-B23. I searched IBM and this list and couldn't find any info on lack of support. There are several references to 9394 in the z/OS 1.8 library so I assume it is supported. Bad assumption. There are plenty references to CVOL in current documentation, but AFAIK it is not supported for some time... A lot of unsupported terms and names can be found in IBM documentation. It's not bad at all, with a big *exception*: the obsolete things are referenced, but not defined or explained what it is. In my case, I have never seen CVOL or CYLOFL, but tried to solve some problem, where description contained the above words. So, I can read in error description - as one of the reasons - that my CVOL needs some action and I don't know what is CVOL. Possible reasons: - I should learn about my CVOL or call some support to fix it. I'm not sure how important it is, because I have no idea what it is. - I should give up, the problem belongs to black magic category. - I should ignore any statement about CVOL, because it is a zombie: resides in the book, but not in real world. Again kind of black magic. Potentially dangerous, because maybe CVOLs do exist in real world... -- 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.2007 r. kapita zakadowy BRE Banku SA (w caoci opacony) wynosi 118.064.140 z. W zwizku z realizacj warunkowego podwyszenia kapitau zakadowego, na podstawie uchwa XVI WZ z dnia 21.05.2003 r., kapita zakadowy BRE Banku SA moe ulec podwyszeniu do kwoty 118.760.528 z. Akcje w podwyszonym kapitale zakadowym bd w caoci opacone. -- 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: Is there a way to Remove BOOK from PF6 in SDSF?
On 18 May 2007 08:04:26 -0700, [EMAIL PROTECTED] (Mark Zelden) wrote: It's not global but I haven't read anyone refer to the KEYLIST command. SDSF doesn't use keylists. What is the name for whatever it is in SDSF that acts just like SPF keylists? -- 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: Mainframe Empty datasets
On 18 May 2007 10:50:04 -0700, [EMAIL PROTECTED] (Mark H. Young) wrote: Howard, where did you find this topic to originate? Back in April or March perhaps? I can't seem to backtrack via Previous in Topic up above. It is in black (not blue) and not selectable. Can anyone help me out with navigation please?! I suspect the statement I replied to might be in the newsgroup only, not in the listserv. I have my subscription set up to not e-mail me messages, but I read the newsgroup. I have Agent set up to change my replies to go to the listserve. -- 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: Mainframe Empty datasets
On Fri, 18 May 2007 12:49:57 -0500, Mark H. Young [EMAIL PROTECTED] wrote: On Fri, 18 May 2007 09:37:00 -0600, Howard Brazee [EMAIL PROTECTED] wrote: On 18 May 2007 06:25:41 -0700, [EMAIL PROTECTED] wrote: How can I code an assembler program to look at a dataset and determine if it is an empty dataset? The dataset maybe allocated but not open or closed. Why not just do: //STEP#01 EXEC PGM=ICETOOL Howard, where did you find this topic to originate? Back in April or March perhaps? I can't seem to backtrack via Previous in Topic up above. It is in black (not blue) and not selectable. Can anyone help me out with navigation please?! THANX, ...mhyI When you are using the archive Listserv web interface, the meanings of Previous in Topic and Next in Topic change depending of whether you are sorting the messages Chronologically or Most Recent First. I suspect you were using the latter when you saw Previous in Topic blacked out. I don't think the meanings should change, but they do. It's easy to demonstrate. Just view any message that has only one of Previous in Topic and Next in Topic available, and switch your sort, and the availability of Previous and Next will swap. Bill -- 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: Date Time in JCL
Peter Farley said: SYSTMEG Time, Execute, GMT SYSTMEL Time, Execute, Local GMT's could be suffixed U for Universal or Z for Zulu instead of G, I don't really care as long as the functionality is the same. Despite being an aviator, I like G more than Z in this context because it connotes G-global versus L-local. From: Farley, Peter x23353 [EMAIL PROTECTED] Reply-To: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Date Time in JCL Date: Fri, 18 May 2007 10:42:32 -0400 -Original Message- From: Vernooy, C.P. - SPLXM [mailto:[EMAIL PROTECTED] Sent: Friday, May 18, 2007 3:51 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Date Time in JCL Robert Bardos [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... Snipped Naive idea: why not provide system symbols for all of these (submission time, conversion time, execution time)? SYSSTIME, SYSCTIME, SYSETIME? Robert Of which system? Jobs can travel through serveral systems in an NJE network, submitted on system1, converted on system2 executed on system3, each with their own timesettings. Dataset1 gets timestamp 10:00, the *next* dataset2 can get timestamp 09:10 if created 10 minutes after dataset1. Quite confusing. OK, I haven't ever contributed to this long-running debate, so here's my USD$0.02 worth: Let the customer decide what they want: SYSTMSG Time, Submit, GMT SYSTMSL Time, Submit, Local SYSTMCG Time, Convert, GMT SYSTMCL Time, Convert, Local SYSTMEG Time, Execute, GMT SYSTMEL Time, Execute, Local And the same kind of set for Date of course (SYSDTSG etc.). GMT's could be suffixed U for Universal or Z for Zulu instead of G, I don't really care as long as the functionality is the same. And to reply to another poster's objection, these are NOT JOB-saved values. They are live when-used values maintained at the system level only. If you the user want the same value later in the JCL, then save it in a SET variable of your own. So, you would NOT use the following example in your JCL to create a dataset to be used later in the same job: //DDNAME DD DISP=(,CATLG),DSN=MYUSERID.MYDATA.DSYSEDTG..TSYSETMG,... Instead, you would code it like this: // SET MYDATE=SYSEDTG,MYTIME=SYSETMG //DDNAME DD DISP=(,CATLG),DSN=MYUSERID.MYDATA.DMYDATE..TMYTIME,... And then later in the job you could code: //DDNAME DD DISP=SHR,DSN=MYUSERID.MYDATA.DMYDATE..TMYTIME with no ambiguity at all. As for RESTARTed jobs, well I don't know the rule for whether SET statements are re-executed on a restart or not. If the SET's are bypassed, RESTART is probably not possible. In which case, it's like the old vaudeville routine, Patient: Doctor, Doctor it hurts when I do that! Doctor: Don't do that!. I also just realized why people think there would be a JOB-related storage need, to carry along Submit and Convert dates/times. But wait -- why wouldn't Convert and Submit simply replace the text of the symbol name with the text value at that point in time? Then subsequent steps (Convert and Execute after Submit, Execute after Convert) would see only constant text, not a variable. Only Execute symbols would be always live and always changing. And if you need RESTARTability, don't use Execute-time symbols. Is that enough specification to make it viable? Peter _ Catch suspicious messages before you open themwith Windows Live Hotmail. http://imagine-windowslive.com/hotmail/?locale=en-usocid=TXT_TAGHM_migration_HM_mini_protection_0507 -- 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: Old RAMAC 2 still viable?
Tom, According to the redbook DFSMS 1.5 Presentation Guide, page 81 2.10.1 VSAM catalogs and OS CVOLs Effective January 1, 2000, VSAM catalogs and OS CVOLs will NOT work on any currently supported release of DFSMS or MVS/DFP. I know we can't believe everything in print but I vaguely recall that support for both CVOLs and VSAM catalogs dropped at the same time, even though CVOLS are much older. Rex -- 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
Why is there JOB scope for DSN ENQ's anyway?
Picking up on something Paul G. said in another thread, I realized I have never known *why* the system issues JOB scope ENQ's on DSN's. I do realize that it is most probably to avoid an ENQ deadly embrace somewhere along the line, but for the life of me (well, and maybe because it's Friday) I can't think why a DSN ENQ would be JOB scope instead of STEP scope. At least not by default, anyway. I suppose if you create a dataset in step A and then use it DISP=SHR in step B (or F or Z, way down the line), if it were not JOB scope ENQueued some other job could come in-between your create and use steps and delete it on you, or update it in some clever but unscrupulous way, but I really can't think of a scenario that means JOB scope ENQ's are required. TIA for curing my ignorance on this subject. Peter -- As of 04/01/2007 I have a new email address, so please update your address book: Peter (dot) Farley (at) broadridge (dot) com This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Is there a way to Remove BOOK from PF6 in SDSF?
- Original Message - From: Mark Zelden [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main Sent: Friday, May 18, 2007 2:38 PM Subject: Re: Is there a way to Remove BOOK from PF6 in SDSF? On Fri, 18 May 2007 13:11:47 -0400, Pinnacle [EMAIL PROTECTED] wrote: - Original Message - From: Mark Zelden [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main Sent: Friday, May 18, 2007 11:04 AM Subject: Re: Is there a way to Remove BOOK from PF6 in SDSF? On Fri, 18 May 2007 09:51:30 -0500, Patrick Lyon [EMAIL PROTECTED] wrote: It's not global but I haven't read anyone refer to the KEYLIST command. SDSF doesn't use keylists. -- Mark Zelden Mark, Mark, Mark, Mark, Mark, Does too! In SDSF, enter PFSHOW, then /+ to bring up the command prompt panel (them be keylists). Regards, Tom Conley Wow, 5 Marks! You are correct sir. It does use them after invoking certain functions, but not from most or all of the (how do I word this) legacy selection panels or after you select a column with SDSF browse. IOW, most of the panels that work under native TSO don't use keylists under ISPF. Not often I get to do a victory dance on your grave, so I had to take the shot ;-) I discovered this bug in SDSF trying to do Dynamic ISPF for it. Looks like they finally fixed the commands panel to set ZKLUSE so that the keylists would work. Before I had to set ZKLUSE for the whole dialog just to get the command panel to work. Tom -- 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
Synchronize Time Between Mainframe and Servers?
Developers are asking me if we can do this to prevent anomalies between timestamps across platforms. In case it's an issue, no, I don't have a sysplex or timer. -- 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: Synchronize Time Between Mainframe and Servers?
Pat, You don't need a Sysplex timer to do this. The sysplex timer ensures the mainframe(s)have a consistent time. With or without a timer you can run an SNTP task on the mainframe (its part of TCP/IP since about z/OS 1.6), otherwise look for Keith Clapp's excellent SNTP product. Have your enterprise query the SNTP on the mainframe and set their clocks off that for a consistent timestamp across your organization. Developers are asking me if we can do this to prevent anomalies between timestamps across platforms. In case it's an issue, no, I don't have a sysplex or timer. -- 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: Why is there JOB scope for DSN ENQ's anyway?
On Fri, 18 May 2007 16:30:43 -0400, Farley, Peter x23353 [EMAIL PROTECTED] wrote: I do realize that it is most probably to avoid an ENQ deadly embrace somewhere along the line, but for the life of me (well, and maybe because it's Friday) I can't think why a DSN ENQ would be JOB scope instead of STEP scope. At least not by default, anyway. If all ENQs now performed with job scope were performed with job step scope, the deadly embrace would equally well be avoided. I suppose if you create a dataset in step A and then use it DISP=SHR in step B (or F or Z, way down the line), if it were not JOB scope ENQueued some other job could come in-between your create and use steps and delete it on you, or update it in some clever but unscrupulous way, but I really can't think of a scenario that means JOB scope ENQ's are required. Additionally, there's initiator hogging, where one job holds a resource and other jobs are waiting for it, each monopolizing an an initiator. While job scope ENQs are no less susceptible to initiator hogging than job step scope (perhaps even more), it may become necessary for an operator to cancel, reset, and restart jobs in order to resume the work flow. This is more safely done if the wait occurs before Step 1 than between steps 41 and 42. -- gil -- 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: Synchronize Time Between Mainframe and Servers?
On Fri, 18 May 2007 16:06:12 -0500, Field, Alan C. wrote: You don't need a Sysplex timer to do this. The sysplex timer ensures the mainframe(s)have a consistent time. With or without a timer you can run an SNTP task on the mainframe (its part of TCP/IP since about z/OS 1.6), otherwise look for Keith Clapp's excellent SNTP product. Without a time reference, the mainframe TOD clock will have a secular drift. Will SNTP adjust the TOD clock to the possibly more accurate time elsewhere in the enterprise, or merely adjust the remainder of the enterprise to the incorrect time of the mainframe? Have your enterprise query the SNTP on the mainframe and set their clocks off that for a consistent timestamp across your organization. This may be politically infeasible. It's pretty hard to rebut the argument, Why shouldn't the mainframe adjust itself to the correct time elsewhere in of the enterprise rather than demanding that the remainder of the enterprise adjust to the mainframe's incorrect time? with a blunt It can't. Will STP provide a solution? Developers are asking me if we can do this to prevent anomalies between timestamps across platforms. In case it's an issue, no, I don't have a sysplex or timer. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CICS Socket failure
Hello, any msg in the TDQueue TCPDATA (default) EZY1258I 05/15/07 15:43:31 EZACIC02 ENTRY POINT IS 103F9128 EZY1258I 05/15/07 15:43:31 EZACIC01 ENTRY POINT IS 103F3C28 EZY1291I 05/15/07 15:43:31 LISTENER TRANSACTION= CSKL TASKID= 034L We have z/OS R7 and no problem with EZACIC20 via PLTPI Roland -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Laine, Rogers Sent: Friday, May 18, 2007 8:29 PM To: IBM-MAIN@BAMA.UA.EDU Subject: FW: CICS Socket failure Guys, After going to a SYSPLEX under z/os 1.7 I started to see socket failures with a abend of AEY9 for a few of our regions. The sockets are started with PLTPI using program EZACICS20. No changes were made to the PLT when the SYSPLEX was introduced. Once I see the failure I can use the EZAO transaction to start the listener, so that tells me the EZACONFG file is okay. We start quite a few CICS regions at one time, could this be causing TCPIP delays when the socket is requested from CICS at PLTPI time? I really could use some new ideas from you to help me solve this problem. -- 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