Re: z/OS and Linux on same z/VM Image
John McKown writes: >...the CPs running z/VM and z/Linux still cause >the z/OS software prices to go up (in many cases). Assuming VWLC, I'm trying to figure out why that would be true. I could see how running some Linux workload on CPs might cause z/OS software charges to *decrease*, though. Mark Post writes: >My understanding was that within a particular z/VM guest, >you would still have the restriction of not mixing IFLs >and other processor types. I don't think IBM's Statement of Direction gets into that level of detail, so we'll have to see how things evolve. But, even if so, that wouldn't be a particularly onerous restriction IMHO. - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Specializing in Software Architectures Related to System z Based in Tokyo, Serving IBM Japan and IBM Asia-Pacific E-Mail: [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: WTO from REXX under Unix Ssystem Services?
Thanks to all that responded. It looks like it is as simple as I hoped. Pat O'Keefe -- 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: WTO from REXX under Unix Ssystem Services?
On Sat, 15 Mar 2008 13:00:34 -0700, Edward Jaffe wrote:
>Patrick O'Keefe wrote:
>> I need to be able to issue a WTO from REXX running under Unix
>> System Services on z/OS 1.8 and beyond.
>
> message = 'Hello World!'
> rc = syscalls('ON')
> address syscall 'open /dev/console' O_WRONLY 666
> consolefd = RETVAL
> address syscall 'write' consolefd 'message'
>
Or variants such as:
'dup2 (consolefd) 1'
say 'Message 2'
RC = BPXWDYN( 'alloc dd(SYSUDUMQ) pathopts(OWRONLY) path(''/dev/console'')
reuse' )
M.1 = 'Message 3'
address 'MVS' 'EXECIO 1 DISKW SYSUDUMQ (stem M.'
... but be aware that some shops may have chmoded /dev/console
or disabled the BPXW024I message with autoops so it is not
available to unprivileged programmers.
-- 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: WTO from REXX under Unix Ssystem Services?
This is some code I used at some point in time. I don't exactly remember which manual it came from ... sorry. /* rexx */ trace r call syscalls 'ON' address syscall path='/dev/console' 'open' path, O_wronly, 666 if retval=-1 then do say 'file not opened, error codes' errno errnojr return end fd=retval rec= 'Your WTO text goes here' || esc_n 'write' fd 'rec' length(rec) if retval=-1 then say 'record not written, error codes' errno errnojr 'close' fd Regards, Ulrich Krueger -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Patrick O'Keefe Sent: Saturday, March 15, 2008 12:40 To: IBM-MAIN@bama.ua.edu Subject: WTO from REXX under Unix Ssystem Services? I need to be able to issue a WTO from REXX running under Unix System Services on z/OS 1.8 and beyond. I've been looking the in fine manuals and can find next to nothing. I've searched the IBM-Main archives and also find next to nothing. (That probably implies I've searched for the wrong terms.) The only thing I found was reference to a Unix_console(). I have not found where that is documented, but I saw it's use requires uid(0). That sounds a bit restrictive for a simple WTO so I suspect this command is not what I'm looking for. I did find a description of BPXICCS, callable from assembler, so I guess I could write a small assembler routine to do this but that seems like overkill. Would somebody point me to a sample that does this, or at least point me to a manual describing it? Thanks. Pat O'Keefe -- 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: WTO from REXX under Unix Ssystem Services?
Patrick, The C-library __console2() api gives you everything in the assember API. Using /dev/console works, but is less flexible. If you download the free Co:Z toolkit (http://dovetail.com/coz), it includes a shell command called "wto" that you can use from REXX or a shell script. It uses the __console2() api. I've attached below the usage/syntax of the wto command. Kirk Wolf Dovetailed Technologies === $ wto Missing WTO message USAGE: wto [-r ROUTCDE,...] [-d DESC,...] message where: ROUTCDE: DESC: 1 - Operator Action 1 - System Failure (*) 2 - Operator Information 2 - Immediate Action Required (*) 3 - Tape Pool 3 - Eventual Action Required (*) 4 - Direct Access Pool4 - System Status (*) 5 - Tape Library 5 - Immediate Command Response (*) 6 - Disk Library 6 - Job Status (*) 7 - Unit Record Pool 7 - Task-Related 8 - Teleprocessing Control8 - Out-of-Line 9 - System Security 9 - Operator's Request 10 - System/Error Maintenance 10 - Not Defined 11 - Programmer Information 11 - Critical Eventual Action Required (*) 12 - Emulation12 - Important Information (*) 13-128 - See Authorized Asm Ref(*) - Mutually exclusive If you omit the ROUTCDE or DESC codes, the system uses the routing code specified on the ROUTCODE keyword on the DEFAULT statement in the CONSOLxx member of SYS1.PARMLIB. NOTE: The message will be prefixed by: "BPXM023I (userid)" unless the userid has access to "BPX.CONSOLE" in the SAF "FACILITY" class. == On Sat, Mar 15, 2008 at 2:39 PM, Patrick O'Keefe <[EMAIL PROTECTED]> wrote: > I need to be able to issue a WTO from REXX running under Unix > System Services on z/OS 1.8 and beyond. I've been looking the in > fine manuals and can find next to nothing. I've searched the IBM-Main > archives and also find next to nothing. (That probably implies I've > searched for the wrong terms.) > > The only thing I found was reference to a Unix_console(). I have not > found where that is documented, but I saw it's use requires uid(0). > That sounds a bit restrictive for a simple WTO so I suspect this command > is not what I'm looking for. > > I did find a description of BPXICCS, callable from assembler, so I guess > I could write a small assembler routine to do this but that seems like > overkill. > > Would somebody point me to a sample that does this, or at least > point me to a manual describing it? > > Thanks. > > Pat O'Keefe > > -- > 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: WTO from REXX under Unix Ssystem Services?
Patrick O'Keefe wrote:
I need to be able to issue a WTO from REXX running under Unix
System Services on z/OS 1.8 and beyond.
[snip]
Would somebody point me to a sample that does this, or at least
point me to a manual describing it?
message = 'Hello World!'
rc = syscalls('ON')
address syscall 'open /dev/console' O_WRONLY 666
consolefd = RETVAL
address syscall 'write' consolefd 'message'
--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.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: clock, daylight savings time
>And modern day politicians found a cheap "solution" to energy use that didn't >work and cost a lot, but made it look as though they were useful (not to >mention it allowed them to use power). DST actually costs more than leaving the clocks alone. - 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
WTO from REXX under Unix Ssystem Services?
I need to be able to issue a WTO from REXX running under Unix System Services on z/OS 1.8 and beyond. I've been looking the in fine manuals and can find next to nothing. I've searched the IBM-Main archives and also find next to nothing. (That probably implies I've searched for the wrong terms.) The only thing I found was reference to a Unix_console(). I have not found where that is documented, but I saw it's use requires uid(0). That sounds a bit restrictive for a simple WTO so I suspect this command is not what I'm looking for. I did find a description of BPXICCS, callable from assembler, so I guess I could write a small assembler routine to do this but that seems like overkill. Would somebody point me to a sample that does this, or at least point me to a manual describing it? Thanks. Pat O'Keefe -- 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: clock, daylight savings time
On 12 Mar 2008 13:55:20 -0700, [EMAIL PROTECTED] (Robert Justice) wrote: >sounds good here too, changing the clock twice a year is absurd Even Ben Franklin can make mistakes - this time he assumed that the world had his sleeping habits. And modern day politicians found a cheap "solution" to energy use that didn't work and cost a lot, but made it look as though they were useful (not to mention it allowed them to use power). -- 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: Tool to import/export a job step
Interesting thought. You would certainly have to capture it while it was running, as any temporary datasets would not exist after the job ended. And GDG entries could change if someone tried to get the job from two days ago. There is a post in March, someone claiming to have such a product but you needed to contact them offline. I would think a vendor of such a product would want to have their product known. Did you ever find something suitable? On Fri, 29 Feb 2008 11:35:48 +0100, Miklos Szigetvari <[EMAIL PROTECTED] PAPYRUS.COM> wrote: >Hi > >Searching for a tool to import/export a job step with all the datasets. >(We have different products running by a number of customers, sometimes >to debug /reproduce a problem >we would need something which exports everything from a job step in error) > We do this now manually, but the received data is fast never complete. > >-- >Miklos Szigetvari > >Development Team >ISIS Information Systems Gmbh >tel: (+43) 2236 27551 570 >Fax: (+43) 2236 21081 > >E-mail: [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: Sorting Hex Data - ISPF or Batch
My way - http://www.ktomiak.biz/ORG/STUFF/tips/REXX036.html Adding a column for non-displayable data was not an option I wanted to do. Nor was writing my own specialized sort. I also submitted a requirement through the SHARE ISPF Project to have ISPF do something as simple as this. How long ago was that, I forget. On Thu, 6 Mar 2008 19:33:43 +0200, Binyamin Dissen <[EMAIL PROTECTED]> wrote: >On Thu, 6 Mar 2008 11:31:11 -0500 Lizette Koehler <[EMAIL PROTECTED]> >wrote: > >:>I have gone through several iterations and just cannot see the forest for the trees. > >:>I need to sort hex data in ISPF and batch. I have tried a couple of variations but the x'A' - x'F' always go to the top of the sorted list. I really would like 0-9, x'A' - x'F' > >:>I have not found on the ISPF sort command a hex option for sorting. And I am not sure what control cards I can use in batch sort to make it happen. > >:>Any one willing to point me in the right direction? If not, I will write a >sort process in REXX. > >A simple approach for ISPF is to add a non-displayed column which has the >binary value and sort on it. > >For batch the better options have already been mentioned. > -- 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: z/OS 1.7 to z/OS 1.9 Migration - Increase in CPU/MSU Consumption
>Ted's comments just added to the confusion I had no intent to confuse; if I did that I'm sorry. My comment was more intended to say that you cannot reduce resource consumption by 5% every release, because eventually that would tend to zero. And, we know MVS does not consume zero resources. - 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: Is 00000000 a valid sequence number?
On Mon, 3 Mar 2008 10:01:25 -0600, Paul Gilmartin <[EMAIL PROTECTED]> wrote: >> >But if I intend to write a sequence number >validator, I'm concerned less with what the producers generate than >with what the consumers (IEBUPDTE, ISPF, ISRSUPC, other?) accept. ISPF is both a generator and a consumer. In ISPF EDIT, with NUM ON STD, if you try to change a sequence number to 0, you get 'Some input data ignored'. Turn NUM OFF and you can change the data to 0, then turn NUM ON STD and EDIT is still okay with it. I then turned NUM ON COB, could not change the number, NUM OFF, changed it, and turned NUM ON COB and EDIT was still happy with it. IEBUPDTE happily added a member with sequence number 0. Edit turned NUM ON and it happily showed sequence 0. Other programs' results may vary. -- 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: Rexx - TRAP errors / Exception handling ?
>> Would someone please verify if z/OS (or any other) >>REXX yields "not valid" for any month numbers other than 2, >>13, 14, or 15? Those are the only ones invalid in my test. ><- snip -> > >Executing your REXX code with OpenObject Rexx on my Windows/XP system: 01/01/08 is valid 01/02/08 is valid 01/03/08 is valid 01/04/08 is valid 01/05/08 is valid 01/06/08 is valid 01/07/08 is valid 01/08/08 is valid 01/09/08 is valid 01/10/08 is valid 01/11/08 is valid 01/12/08 is valid 01/13/08 is not valid 01/14/08 is not valid 01/15/08 is not valid > -- 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: z/OS 1.7 to z/OS 1.9 Migration - Increase in CPU/MSU Consumption
Walt Farrell wrote: To try to clarify that question a bit: I think -I- know what we're trying to do, but I'm not sure everyone on the list is interpreting that "5% decrease" in the same way. Or maybe it was just Ted (sorry, Ted :-) who confused me. I'll accept some of the responsibility for your confusion, Walt. I first used the words "5% decrease in utilization" to describe how many fewer resources the operating system was expected to use. I see now how that phrase might be misinterpreted. (Ted's comments just added to the confusion.) A better, non-ambiguous, wording choice would have been to say "5% performance improvement" like Cheryl did. (I guess that's why they pay her the "big bucks". :-) -- Edward E Jaffe Phoenix Software International, Inc 5200 W Century Blvd, Suite 800 Los Angeles, CA 90045 310-338-0400 x318 [EMAIL PROTECTED] http://www.phoenixsoftware.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: Unable To Delete Archived Dataset
I notice there is no MSGID with the :ITEM DOES NOT ADHERE TO RESTRICTIONS text. Is that a DMS message? Maybe DMS is unable to delete it's recorded entry of it being migrated? The IEFBR14 suggestion should have caused a RECALL to occur and then the delete to happen. If it was not deleted, why isn't DMS recalling it properly? On Mon, 10 Mar 2008 12:57:53 -0400, esmie moo <[EMAIL PROTECTED]> wrote: >Good Day Gentle Readers, > > I am trying to delete this dataset MILDCOP.NPR256D.CNTLNLDSVOLD. Yes, the last qualifier is correct. This dsn was migrated by DMS. I tried a del nscr purge but I got the error message :ITEM DOES NOT ADHERE TO RESTRICTIONS. > > I also tried IEHPROGM to no avail. > > I cannot understand as to how this dsn was created. However, my immediate problem is deleting this dsn. Could anybody suggestion > -- 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: Unable To Delete Archived Dataset
IEFBR14 basically returns with R15=0, so it should always return with a code 0. The only other expectation you could have is getting a JCL error in the step. It never opens the DD statements you include. It cares not if your allocation requests work or not. Thus as long as allocation for datasets works, COND CODE is quite normal. On Mon, 10 Mar 2008 14:01:49 -0400, esmie moo <[EMAIL PROTECTED]> wrote: >Ulrich, > > I tried your suggestion. The job ran successfully with a code 0. But it > did not delete the dsn. I also tried the suggestion to > -- 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: SMPE error in FROMNET
I was getting that error last week, starting around 4 PM MST on a Thursday. It continued until Tuesday. We slowly pieced together what our problem was, your results may vary. A combination of a DNS server change on our part and the domain registrar broadcasting some IP addresses for DNS servers that were retired years ago. Once we flushed the DNS cache on our servers, Tuesday, it magically started working again. During this time, inbound mail was arriving slowly, too. At first I suggested the IBM servers might be overwhelmed if everyone jumps to receive the RSU maintenance after we get notified it is available. A year ago we used to alternate which site we went to if it failed on one. We stopped having to do that six months ago. On Fri, 14 Mar 2008 08:43:07 -0400, Kurt Quackenbush <[EMAIL PROTECTED]> wrote: >> I used the example on the IBM website to get the maintenance for z/OS >> V1R8. I am getting the following message: >> >> Connecting to: dispsd-76.boulder.ibm.com 207.25.253.76 port: 21. >> Connection to server interrupted or timed out. Initial connection >> Std Return Code = 1, Error Code = 8 >> >> Is there a way to place a WAIT in the > connection time? > >I received similar errors yesterday myself, so I suggest this error may >be transient and caused by the IBM FTP server and not by your z/OS >system or network. Maybe. Try again today and see if the problem >persists. > >Even so, there are options you can tweak in your FTP.DATA file that >affect FTP connect time, etc. I don't remember the specific keywords, >but you can find them in the Communications Server IP User's Guide. >BTW, check out the tag in your SMP/E CLIENT data set in >case you want to override the default FTP.DATA file. > >Kurt Quackenbush -- IBM, SMP/E Development > -- 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: Disclaimers
More time in the court system. On Fri, 14 Mar 2008 13:40:25 -0300, Shmuel Metz (Seymour J.) wrote: > >You file suit against the lawyer for abuse of process. The risks are not >all on one side. > >-- > Shmuel (Seymour J.) Metz, SysProg and JOAT -- 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
Joseph Weizenbaum, 1923-2008
He was one of the giants; Eliza was and will remain a landmark system. Perhaps more importantly, he reminded us, and we need constant reminding, that computing is an ethically neutral technology, one that lends itself to radical misuse: o It props up conservative, risk-averse bureraucracies; o it lends itself to the support of a naif, reductionist world view. All this Weizenbaum fought against, and no replacement figure of his stature is at hand. John Gilmore Ashland, MA 01721-1817 USA _ Connect and share in new ways with Windows Live. http://www.windowslive.com/share.html?ocid=TXT_TAGHM_Wave2_sharelife_012008 -- 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: Disclaimers
Prior to my retirement from UA, and being the Listserv Admin, I had an exit in place that checked for excessive quoting and disclaimers. I had to take out that exit when I retired. So you may be seeing an increase in excessive quoting and disclaimers. My apologies. I wish I could do more about it. It is up to each subscriber that posts to the list to remove non-essential text from their replies. Unfortunately, some subscribers have disclaimers added to their posts by mailers after they send it. And, of course, there are others that just dont care. Darren -- 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
