Re: How Submit a JOB from Z/VM to Z/OS using RSCS ?
Speaking of submitting jobs, does anyone remember of have a copy of the old SUB EXEC that was floating around the network some years back? In addition to doing the requisite SPOOL/TAG/PUNCH commands, it also provided for parameter substitution, includes and nested includes. I seem to have misplaced my copy during one of my moves. George Shedlock Jr AEGON Information Technology AEGON USA 502-560-3541
Sort Fields Question
Hello List, We have a CMS file, with some fields. One of this field is a date, in the DD/MM/YY format. We also have 200 records medium by day. Another field, is a numeric percentage that I need get the top 50 for each day. So, We think execute a sort under a REXX EXEC , like this : trace r queue 1 8 63 65 sort cpux9 batchw a cpux9 batd a exit But, looking on HELP of sort command can't see the descending option. We think this, because after the sort, will write another REXX that read only the first 50 records , and write another output file. Someone already have used the sort with descending order, or know if have another way to do this? Thanks very much, Sergio Lima Costa Sao Paulo - Brazil
SFS question
How can I tell what users and/or what files are in a storage group? I'd prefer to know users but can trace it back if I know what files. Thanks, Steve
Re: SFS question
Steve, grab Kris Buelen's SFSULIST tool from the VM download page; it does exactly what you are looking for. Have a good one. On 01/04/2011 08:13 AM, Gentry, Stephen wrote: How can I tell what users and/or what files are in a storage group? I'd prefer to know users but can trace it back if I know what files. Thanks, Steve -- Dave Jones V/Soft Software www.vsoft-software.com Houston, TX 281.578.7544
Re: Sort Fields Question
PIPEs would be much easier. PIPE (endchar ?), input file x, | SORT positions, | output file y Frank M. Ramaekers Jr. From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of Sergio Lima Sent: Tuesday, January 04, 2011 8:10 AM To: IBMVM@LISTSERV.UARK.EDU Subject: Sort Fields Question Hello List, We have a CMS file, with some fields. One of this field is a date, in the DD/MM/YY format. We also have 200 records medium by day. Another field, is a numeric percentage that I need get the top 50 for each day. So, We think execute a sort under a REXX EXEC , like this : trace r queue 1 8 63 65 sort cpux9 batchw a cpux9 batd a exit But, looking on HELP of sort command can't see the descending option. We think this, because after the sort, will write another REXX that read only the first 50 records , and write another output file. Someone already have used the sort with descending order, or know if have another way to do this? Thanks very much, Sergio Lima Costa Sao Paulo - Brazil _ This message contains information which is privileged and confidential and is solely for the use of the intended recipient. If you are not the intended recipient, be aware that any review, disclosure, copying, distribution, or use of the contents of this message is strictly prohibited. If you have received this in error, please destroy it immediately and notify us at privacy...@ailife.com.
Re: SFS question
Thanks Dave. I was sure there was something out there that would provide this info. I had SFSULIST already downloaded just didn't know that's what it would/could do. Steve -Original Message- From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of Dave Jones Sent: Tuesday, January 04, 2011 9:20 AM To: IBMVM@LISTSERV.UARK.EDU Subject: Re: SFS question Steve, grab Kris Buelen's SFSULIST tool from the VM download page; it does exactly what you are looking for. Have a good one. On 01/04/2011 08:13 AM, Gentry, Stephen wrote: How can I tell what users and/or what files are in a storage group? I'd prefer to know users but can trace it back if I know what files. Thanks, Steve -- Dave Jones V/Soft Software www.vsoft-software.com Houston, TX 281.578.7544
Re: Sort Fields Question
Sergio - Take a look at HELP PIPE SORT. 'PIPE cpux9 batchw a | sort 1-8 descending 63-65 | cpux9 batd a' /Fran Hensler at Slippery Rock University of Pennsylvania USA for 47 years mailto:f...@zvm.sru.edu http://zvm.sru.edu/~fjh +1.724.738.2153 Yes, Virginia, there is a Slippery Rock -- On Tue, 4 Jan 2011 17:10:16 +0300 Sergio Lima said: Hello List, We have a CMS file, with some fields. One of this field is a date, in the DD/MM/YY format. We also have 200 records medium by day. Another field, is a numeric percentage that I need get the top 50 for each day. So, We think execute a sort under a REXX EXEC , like this : trace r queue 1 8 63 65 sort cpux9 batchw a cpux9 batd a exit But, looking on HELP of sort command can't see the descending option. We think this, because after the sort, will write another REXX that read only the first 50 records , and write another output file. Someone already have used the sort with descending order, or know if have another way to do this? Thanks very much, Sergio Lima Costa Sao Paulo - Brazil
Re: Sort Fields Question
Hello Frank, and Fran. PIPE run well. pipe cpux9 batchw a | sort 1-8 descending 63-65 | cpux9 batd a Thanks very much for your help. Regards, Sergio Date: Tue, 4 Jan 2011 09:37:44 -0500 From: f...@zvm.sru.edu Subject: Re: Sort Fields Question To: IBMVM@LISTSERV.UARK.EDU Sergio - Take a look at HELP PIPE SORT. 'PIPE cpux9 batchw a | sort 1-8 descending 63-65 | cpux9 batd a' /Fran Hensler at Slippery Rock University of Pennsylvania USA for 47 years mailto:f...@zvm.sru.edu http://zvm.sru.edu/~fjh +1.724.738.2153 Yes, Virginia, there is a Slippery Rock -- On Tue, 4 Jan 2011 17:10:16 +0300 Sergio Lima said: Hello List, We have a CMS file, with some fields. One of this field is a date, in the DD/MM/YY format. We also have 200 records medium by day. Another field, is a numeric percentage that I need get the top 50 for each day. So, We think execute a sort under a REXX EXEC , like this : trace r queue 1 8 63 65 sort cpux9 batchw a cpux9 batd a exit But, looking on HELP of sort command can't see the descending option. We think this, because after the sort, will write another REXX that read only the first 50 records , and write another output file. Someone already have used the sort with descending order, or know if have another way to do this? Thanks very much, Sergio Lima Costa Sao Paulo - Brazil
Re: Sort Fields Question
And, as he only want the first 50, the pipe can be easily extended: 'PIPE cpux9 batchw a | sort 1-8 descending 63-65 | take 50 | cpux9 bat50 a' What then? Process in REXX? If so, change the pipe to write into a stem 'PIPE cpux9 batchw a | sort 1-8 descending 63-65 | take 50 | stem REC.' do i=1 to rec.0 To learn something about CMS Pipelines, consider our free, self study, course: http://www.vm.ibm.com/download/packages/descript.cgi?TCVM2 Once you get away with PIPE, you can gain lots of time by not having to code many REXX statements as they can be replaced by some PIPE stages. 2011/1/4 Fran Hensler f...@zvm.sru.edu Sergio - Take a look at HELP PIPE SORT. 'PIPE cpux9 batchw a | sort 1-8 descending 63-65 | cpux9 batd a' /Fran Hensler at Slippery Rock University of Pennsylvania USA for 47 years mailto:f...@zvm.sru.edu http://zvm.sru.edu/~fjhhttp://zvm.sru.edu/%7Efjh +1.724.738.2153 Yes, Virginia, there is a Slippery Rock -- On Tue, 4 Jan 2011 17:10:16 +0300 Sergio Lima said: Hello List, We have a CMS file, with some fields. One of this field is a date, in the DD/MM/YY format. We also have 200 records medium by day. Another field, is a numeric percentage that I need get the top 50 for each day. So, We think execute a sort under a REXX EXEC , like this : trace r queue 1 8 63 65 sort cpux9 batchw a cpux9 batd a exit But, looking on HELP of sort command can't see the descending option. We think this, because after the sort, will write another REXX that read only the first 50 records , and write another output file. Someone already have used the sort with descending order, or know if have another way to do this? Thanks very much, Sergio Lima Costa Sao Paulo - Brazil -- Kris Buelens, IBM Belgium, VM customer support
Re: SFS question
SFSULIST is an interactive tool. If you need this information in a REXX exec: Q LIMITS is your friend. If you also need to know the files: after Q LIMITS, you use LISTDIR; ACCESS and LISTFILE... 2011/1/4 Gentry, Stephen stephen.gen...@lafayettelife.com Thanks Dave. I was sure there was something out there that would provide this info. I had SFSULIST already downloaded just didn't know that's what it would/could do. Steve -Original Message- From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of Dave Jones Sent: Tuesday, January 04, 2011 9:20 AM To: IBMVM@LISTSERV.UARK.EDU Subject: Re: SFS question Steve, grab Kris Buelen's SFSULIST tool from the VM download page; it does exactly what you are looking for. Have a good one. On 01/04/2011 08:13 AM, Gentry, Stephen wrote: How can I tell what users and/or what files are in a storage group? I'd prefer to know users but can trace it back if I know what files. Thanks, Steve -- Dave Jones V/Soft Software www.vsoft-software.com Houston, TX 281.578.7544 -- Kris Buelens, IBM Belgium, VM customer support
Re: How Submit a JOB from Z/VM to Z/OS using RSCS ?
I'll send my old submit stuff, dated from a former life where I had many VM/VSE customers 2011/1/4 Shedlock, George gshedl...@aegonusa.com Speaking of submitting jobs, does anyone remember of have a copy of the old “SUB EXEC” that was floating around the network some years back? In addition to doing the requisite SPOOL/TAG/PUNCH commands, it also provided for parameter substitution, includes and nested includes. I seem to have misplaced my copy during one of my moves. *George Shedlock Jr* *AEGON Information Technology* *AEGON USA* *502-560-3541* -- Kris Buelens, IBM Belgium, VM customer support
Re: SFS question
Steve, note that your user id must be enrolled in the file pool as an administrator for SFSULIST to return all of the menaingful results. DJ On 01/04/2011 08:25 AM, Gentry, Stephen wrote: Thanks Dave. I was sure there was something out there that would provide this info. I had SFSULIST already downloaded just didn't know that's what it would/could do. Steve -Original Message- From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of Dave Jones Sent: Tuesday, January 04, 2011 9:20 AM To: IBMVM@LISTSERV.UARK.EDU Subject: Re: SFS question Steve, grab Kris Buelen's SFSULIST tool from the VM download page; it does exactly what you are looking for. Have a good one. On 01/04/2011 08:13 AM, Gentry, Stephen wrote: How can I tell what users and/or what files are in a storage group? I'd prefer to know users but can trace it back if I know what files. Thanks, Steve -- Dave Jones V/Soft Software www.vsoft-software.com Houston, TX 281.578.7544
Re: VTAM logmodes
(Subject line changed to reflect topic drift) Alan Altmark writes: As others have said, the problem is in the logmode associated with the non-SNA 3270 LU. For some reason, VTAM sysprogs keep using ancient logmodes for reasons they can't actually articulate except that's the way we've always done it. For almost a quarter century, the correct logmode for any 3270 has been D4A3290 (local SNA) or D4B3290 (non-SNA). I was unable to get these logmode names to work and they don't appear in the z/OS 1.9 Comms Server SNA Resource Definition Reference Manual. The 3290 logmodes are simple, removing all screen size and capability information from the PSERVIC field, and causing VTAM to query the terminal to determine its configuration and capabilities. However, the manual does document logmodes D4A32XX3 and D4B32XX3 in the Default logon mode table (ISTINCLM) in Appendix A and their behaviour closely matches your description: TITLE ’D4A32XX3’ ** * 3274 MODEL 1A (LOCAL SNA) * * PRIMARY SCREEN 24 X 80 (1920) * * ALTERNATE SCREEN TO BE DETERMINED BY APPLICATION * with PSERVIC being X’02800300’. The corresponding D4B32XX3 for non-SNA seems right too (same PSERVIC except without that 2 bit). I tried it out on my zPDT z/OS 1.9 system and it worked fine...once I'd stripped out the helpful DemoPKG VTAM config which didn't only have a DLOGMOD=S32793 in the VTAM entry for the terminal devices but also had an overriding default in its USSTAB which made the TSO command silently include a LOGMODE(S32793) as well. Since the commands to change all this dynamically are a bit fiddly to non-VTAM experts (all in the Comms Server SNA Ops manual) and one weak link in the chain means the dynamic sizing doesn't work, I guess it's simply a case of many people not quite getting 100% of the end-to-end config to work and then giving up and waiting a few years or so before seeing if it's got any easier. --Malcolm -- Malcolm Beattie Mainframe Systems and Software Business, Europe IBM UK
Re: Sort Fields Question
Sergio, Others have already pointed you at PIPE, I use it myself for descending sorts. There is no descending option in CMS SORT. There is a descending option in the XEDIT SORT command. I don't know if your data is going to span across months, but sorting the date formatted as DD/MM/YY using columns 1-8 will sort the first of every month together, and you will not be in date order anymore. For example, if your file contains dates from January and February, and you sort on 1-8, you'll see this results: 01/01/11 01/02/11 02/01/11 02/02/11 03/01/11 03/02/11 and so on... Ron On Tue, Jan 4, 2011 at 8:10 AM, Sergio Lima sergiovm...@hotmail.com wrote: Hello List, We have a CMS file, with some fields. One of this field is a date, in the DD/MM/YY format. We also have 200 records medium by day. Another field, is a numeric percentage that I need get the top 50 for each day. So, We think execute a sort under a REXX EXEC , like this : trace r queue 1 8 63 65 sort cpux9 batchw a cpux9 batd a exit But, looking on HELP of sort command can't see the descending option. We think this, because after the sort, will write another REXX that read only the first 50 records , and write another output file. Someone already have used the sort with descending order, or know if have another way to do this? Thanks very much, Sergio Lima Costa Sao Paulo - Brazil
Re: Assembler Question
Hello John. Very creative. I need learn much more. Thanks very much Regards, Sergio Date: Mon, 3 Jan 2011 13:36:27 -0600 From: john.mck...@healthmarkets.com Subject: Re: Assembler Question To: IBMVM@LISTSERV.UARK.EDU I guess this is to stop the no-so-smart. The first thing that comes to mind is to make some slight changes to cause confusion: You have: MVC MAQUINA+0(1),=XL1'E5' MVC MAQUINA+1(1),=XL1'E2' MVC MAQUINA+2(1),=XL1'C5' MVC MAQUINA+3(1),=XL1'D3' MVC MAQUINA+4(1),=XL1'C1' MVC MAQUINA+5(1),=XL1'C2' Simple change: MVC MAQUINA+3(1),=XL1'D3' MVC MAQUINA+4(1),=XL1'C1' MVC MAQUINA+5(1),=XL1'C2' MVC MAQUINA+0(1),=XL1'E5' MVC MAQUINA+1(1),=XL1'E5' MVC MAQUINA+2(1),=XL1'E2' What shows up in the module would be: LABVSE. Looks reasonable, doesn't it? Now, to really mess up their minds: create a guest machine with that name. Monitor who actually sends something to it. Then beat them with an appropriate stick for being an idiot. If you want to simply disguise the name, then I'd likely do something simple, such as: MVC MAQUINA+0(1),=XL1'05' MVC MAQUINA+1(1),=XL1'12' MVC MAQUINA+2(1),=XL1'25' MVC MAQUINA+3(1),=XL1'33' MVC MAQUINA+4(1),=XL1'41' MVC MAQUINA+5(1),=XL1'52' L 0,MAQUINA AL0,=X'E0D0A0A0' ICM 0,B'0101',MAQUINA+4 AL0,=X'10802070' STCM 0,B'0101',MAQUINA+4 This last is a bit nasty to the casual observer. Especially the use of the ICM to make the bytes in the second part of the name not be next to each other. And putting in the unused data in the AL instruction which don't matter and which does nothing in particular, will really mess up someone's mind But a smarty could still disassemble the module and do the instructions by hand to try to figure out what is going on. Either kill them or hire them as a forensic technician. John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets® 9151 Boulevard 26 • N. Richland Hills • TX 76010 (817) 255-3225 phone • john.mck...@healthmarkets.com • www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets® is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. –The Chesapeake Life Insurance Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of Sergio Lima Sent: Monday, January 03, 2011 12:57 PM To: IBMVM@LISTSERV.UARK.EDU Subject: Assembler Question Hello List, We wrote a sample ASSEMBLER Program here under CMS, that will submit a JOB to VSE Machine, using the CP SPOOL PUNCH command. Sorry, if you understand that here is not the good place to put this question. The people ask to me, if is possible the name of CMS MACHINE not appear on the MODULE. The program is this : PUNCHA CSECT USING PUNCHA,3 USING FSCBD,4 PRINT GEN LR3,15 ST14,SAVE * LA4,FSCB1 MVC FILENAME(8),8(1) MVC FILETYPE(8),16(1) MVC FILEMODE(8),24(1) * MVC FSCBFN,FILENAME MVC FSCBFT,FILETYPE MVC FSCBFM,FILEMODE * MVC MAQUINA+0(1),=XL1'E5' MVC MAQUINA+1(1),=XL1'E2' MVC MAQUINA+2(1),=XL1'C5' MVC MAQUINA+3(1),=XL1'D3' MVC MAQUINA+4(1),=XL1'C1' MVC MAQUINA+5(1),=XL1'C2' * WRTERMFILENAME,8 WRTERMFILETYPE,8 WRTERMFILEMODE,2 WRTERMMAQUINA,8 * SR1,1 LA1,DESTINA SVC 202 DCAL4(1) * LECARD FSREADFSCB=FSCB1,ERROR=EOF * PUNCHCIOAREA WRTERMIOAREA,80 B LECARD *
Re: VTAM logmodes
On Tuesday, 01/04/2011 at 10:58 EST, Malcolm Beattie beatt...@uk.ibm.com wrote: Alan Altmark writes: As others have said, the problem is in the logmode associated with the non-SNA 3270 LU. For some reason, VTAM sysprogs keep using ancient logmodes for reasons they can't actually articulate except that's the way we've always done it. For almost a quarter century, the correct logmode for any 3270 has been D4A3290 (local SNA) or D4B3290 (non-SNA). I was unable to get these logmode names to work and they don't appear in the z/OS 1.9 Comms Server SNA Resource Definition Reference Manual. However, the manual does document logmodes D4A32XX3 and D4B32XX3 in the Default logon mode table (ISTINCLM) in Appendix A and their behaviour closely matches your description From ISTINCLM ASSEMBLE: FLAG REASON RELEASE DATE ORIGIN FLAG DESCRIPTORS -- --- -- -- $01= VM39614 VM330 900117 042852: CORRECT ERRORS IN THE PSERVIC OF D4C3290, D4B3290, D4A3290 $03= VM46183 VM340 910402 810410: INCLUDE LOGMODE ENTRIES D4B32XX3 AND D4C32XX3. $04= VM46559 VM340 910819 914077: INCLUDE LOGMODE ENTRY D4A32XX3 Perhaps the 3290 versions are specific to z/VM. It wouldn't be the first time that VM accidentally got Good Stuff that MVS didn't. It apparently took an additional release cycle to create the properly-named 32XX versions common to both MVS and VM. Alan Altmark z/VM and Linux on System z Consultant IBM System Lab Services and Training ibm.com/systems/services/labservices office: 607.429.3323 alan_altm...@us.ibm.com IBM Endicott
Re: VTAM logmodes
Good is a relative term when discussing VTAM :-) Regards, Richard Schuh It wouldn't be the first time that VM accidentally got Good Stuff that MVS didn't.
Re: Toolsrun function without RSCS
We have the master copy of our tools disk in SFS on one system. Each system has a local copy on minidisk. A job on each system accesses the master and applies updates to the local copy every night. If the SFS master isn't available, no harm is done to the copies. Dennis Perhaps if Mayor Michael Bloomberg spent less time keeping salt off our tables and more time getting salt on the streets, New York roads might have been passable this week.. -- Eric Felten, in The Wall Street Journal -Original Message- From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of Lee Stewart Sent: Wednesday, December 29, 2010 09:02 To: IBMVM@LISTSERV.UARK.EDU Subject: [IBMVM] Toolsrun function without RSCS Hi... I fondly remember TOOLSRUN from my IBM days... We're looking for a similar function - a tools repository mirrored between many VMs, some distant. But we aren't licensed for RSCS, and that cost becomes prohibitive for this customer... So short of writing our FTP based tool, does anyone have any thoughts on any easy way to keep a set of local tools in sync across multiple systems? Thanks, Lee -- Lee Stewart, Senior SE Sirius Computer Solutions Phone: (303) 996-7122 Email: lee.stew...@siriuscom.com Web: www.siriuscom.com -- This message w/attachments (message) is intended solely for the use of the intended recipient(s) and may contain information that is privileged, confidential or proprietary. If you are not an intended recipient, please notify the sender, and then please delete and destroy all copies and attachments, and be advised that any review or dissemination of, or the taking of any action in reliance on, the information contained in or attached to this message is prohibited. Unless specifically indicated, this message is not an offer to sell or a solicitation of any investment products or other financial product or service, an official confirmation of any transaction, or an official statement of Sender. Subject to applicable law, Sender may intercept, monitor, review and retain e-communications (EC) traveling through its networks/systems and may produce any such EC to regulators, law enforcement, in litigation and as required by law. The laws of the country of each sender/recipient may impact the handling of EC, and EC may be archived, supervised and produced in countries other than the country in which you are located. This message cannot be guaranteed to be secure or free of errors or viruses. References to Sender are references to any subsidiary of Bank of America Corporation. Securities and Insurance Products: * Are Not FDIC Insured * Are Not Bank Guaranteed * May Lose Value * Are Not a Bank Deposit * Are Not a Condition to Any Banking Service or Activity * Are Not Insured by Any Federal Government Agency. Attachments that are part of this EC may have additional important disclosures and disclaimers, which you should read. This message is subject to terms available at the following link: http://www.bankofamerica.com/emaildisclaimer. By messaging with Sender you consent to the foregoing.
Re: How can get the Week day ?
tyvm, Chip, for the explanation. So this century really began in Jan 1, 2001, not 2000. Interesting. Certainly glad it was the C programmers, not the BAL programmers, that went wrong. A good BAL programmer knows that everything is relative 0, not 1. Chip Davis c...@aresti.com Sent by: The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU 01/03/2011 09:25 PM Please respond to The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU To IBMVM@LISTSERV.UARK.EDU cc Subject Re: How can get the Week day ? Technically, the first year of each century is cc01, not cc00. Due to an appalling lack of consistency, the C programmers in the first decade (0) of the first century (0) declared the first year to be 1. :-) -Chip- On 1/3/11 16:03 George Henke/NYLIC said: Not quite sure what is the difference between the number of days since the beginning of the century and the number of days since the most recent year ending in '00' unless going back or ahead more than a century or 2. But I suppose there is a difference or it would have been moot. *Chip Davis c...@aresti.com* Be careful with Date('C'). It doesn't really give you the number of days in the current century (as it was originally documented). It returns the number of days since the beginning of the most recent year ending in '00', e.g. '2000'. On 1/3/11 14:25 George Henke/NYLIC said: REXX also has a nifty function called Century Day that simplifies things by working in century days, days since the beginning of the century, rather than days since the beginning of the year.
Re: SORTING DIRECTORY GAPS BY USER
Or better yet... _why_? It sounds as if you want to display users and mdisks, sorted by user (and perhaps mdisk, too) which reside between gaps. But _why_? What are you attempting to do? Mike Walter Aon Corporation The opinions expressed herein are mine alone, not my employer's. Tom Huegel tehue...@gmail.com Sent by: The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU 01/04/2011 03:26 PM Please respond to The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU To IBMVM@LISTSERV.UARK.EDU cc Subject Re: SORTING DIRECTORY GAPS BY USER I don't understand your question.. If there is a GAP then there is no USER. ??? On Tue, Jan 4, 2011 at 1:13 PM, George Henke/NYLIC george_he...@newyorklife.com wrote: Does anybody have anything like a PIPE command or a utility to do this sort of thing, sort the DIRECTORY DISKMAP on USER within GAPS? I am sure DIRMAINT would obviate the necessity for such a thing, but right now this is all I can do. The information contained in this e-mail and any accompanying documents may contain information that is confidential or otherwise protected from disclosure. If you are not the intended recipient of this message, or if this message has been addressed to you in error, please immediately alert the sender by reply e-mail and then delete this message, including any attachments. Any dissemination, distribution or other use of the contents of this message by anyone other than the intended recipient is strictly prohibited. All messages sent to and from this e-mail address may be monitored as permitted by applicable law and regulations to ensure compliance with our internal policies and to protect our business. E-mails are not secure and cannot be guaranteed to be error free as they can be intercepted, amended, lost or destroyed, or contain viruses. You are deemed to have accepted these risks if you communicate with us by e-mail.
Re: How can get the Week day ?
It is right with the DATE(B) function - 01/01/1001. All the technicalities aside, forget about the word Century and view the letter C as an abstraction for the described function. Then, everything is consistent, even if technically incorrect. Regards, Richard Schuh From: The IBM z/VM Operating System [mailto:ib...@listserv.uark.edu] On Behalf Of George Henke/NYLIC Sent: Tuesday, January 04, 2011 1:14 PM To: IBMVM@LISTSERV.UARK.EDU Subject: Re: How can get the Week day ? tyvm, Chip, for the explanation. So this century really began in Jan 1, 2001, not 2000. Interesting. Certainly glad it was the C programmers, not the BAL programmers, that went wrong. A good BAL programmer knows that everything is relative 0, not 1. Chip Davis c...@aresti.com Sent by: The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU 01/03/2011 09:25 PM Please respond to The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU To IBMVM@LISTSERV.UARK.EDU cc Subject Re: How can get the Week day ? Technically, the first year of each century is cc01, not cc00. Due to an appalling lack of consistency, the C programmers in the first decade (0) of the first century (0) declared the first year to be 1. :-) -Chip- On 1/3/11 16:03 George Henke/NYLIC said: Not quite sure what is the difference between the number of days since the beginning of the century and the number of days since the most recent year ending in '00' unless going back or ahead more than a century or 2. But I suppose there is a difference or it would have been moot. *Chip Davis c...@aresti.com* Be careful with Date('C'). It doesn't really give you the number of days in the current century (as it was originally documented). It returns the number of days since the beginning of the most recent year ending in '00', e.g. '2000'. On 1/3/11 14:25 George Henke/NYLIC said: REXX also has a nifty function called Century Day that simplifies things by working in century days, days since the beginning of the century, rather than days since the beginning of the year.
Re: How can get the Week day ?
Well, not quite, unless you're using a VERY non-ANSI-Standard version of Rexx. :-) Say Date('U',0,'B') -- 01/01/01 But you're right about the C for Century; it was always better to think of it as the Roman numeral for 100. It still suffered from the same boundary issues as the old Julian date, just not as frequently. The fact is, Date('C') is not even legal at Rexx Language Level 4.00 (much less ANSI Standard) which has been around for quite a while now. So the best option is to simply forget about the Date('C') option in the first place and use Date('B') instead. If you have existing code that you need to convert, you can establish the Date('C') epoch as a constant (now 730119) offset to the Date('B') value. -Chip- On 1/4/11 22:25 Schuh, Richard said: It is right with the DATE(B) function - 01/01/1001. All the technicalities aside, forget about the word Century and view the letter C as an abstraction for the described function. Then, everything is consistent, even if technically incorrect. *From:* *George Henke/NYLIC* tyvm, Chip, for the explanation. So this century really began in Jan 1, 2001, not 2000. Interesting. *From:* *Chip Davis c...@aresti.com* Technically, the first year of each century is cc01, not cc00. On 1/3/11 16:03 George Henke/NYLIC said: Not quite sure what is the difference between the number of days since the beginning of the century and the number of days since the most recent year ending in '00' unless going back or ahead more than a century or 2. But I suppose there is a difference or it would have been moot. *Chip Davis c...@aresti.com* Be careful with Date('C'). It doesn't really give you the number of days in the current century (as it was originally documented). It returns the number of days since the beginning of the most recent year ending in '00', e.g. '2000'. On 1/3/11 14:25 George Henke/NYLIC said: REXX also has a nifty function called Century Day that simplifies things by working in century days, days since the beginning of the century, rather than days since the beginning of the year.