Re: z/VM 5.3 and PAV

2008-07-07 Thread Dave Yarris
Thanks for the reply Bill. Unfortunately, any numbers I have now are not any indication of where we will be. We have been in the early stages of development of our first application of Linux on z/VM for the last two years and I have yet to get the project folks to give me much in the way of

REXX coding question.

2008-07-07 Thread Howard Rifkind
This is confusing me. The response to the variable 'answer' is a Y. Yet this portion of the code isn't working. Shouldn't the logic just fall thru because the response was a Y. IF SUBSTR(ANSWER,1,1) /= 'Y' | ANSWER /= 'YES' THEN DO

Re: REXX coding question.

2008-07-07 Thread Robert Payne
I have seen this before and it was a case sensitive issue, also had to check lower case y HTH -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] Behalf Of Howard Rifkind Sent: Monday, July 07, 2008 11:24 AM To: IBMVM@LISTSERV.UARK.EDU Subject: REXX coding

Re: REXX coding question.

2008-07-07 Thread Howard Rifkind
Shouldn't the PULL have brought the character as upper case? Thanks. Robert Payne [EMAIL PROTECTED] 7/7/2008 12:25 PM I have seen this before and it was a case sensitive issue, also had to check lower case y HTH -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL

Re: REXX coding question.

2008-07-07 Thread Howard Rifkind
BTW, a 'SAY ANSWER' after the pull shows the character in caps. Robert Payne [EMAIL PROTECTED] 7/7/2008 12:25 PM I have seen this before and it was a case sensitive issue, also had to check lower case y HTH -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL

Re: REXX coding question.

2008-07-07 Thread Hughes, Jim
The statement as written says IF SUBSTR(ANSWER,1,1) Not = 'Y' OR ANSWER Not = 'YES' THEN If the reply was Y then ANSWER Not = YES is satisfying the IF statement. Jim Hughes 603-271-5586 Its kind of fun to do the impossible. (Walt Disney)

Re: REXX coding question.

2008-07-07 Thread McKown, John
Your logic is faulty. Suppose that ANSWER is Y. ANSWER /= 'Y' is false. ANSWER /= 'YES' is true. TRUE or FALSE is TRUE, so you execute the contents of the IF statement. Perhaps you need an AND instead of OR? Or am I the one confused? -- John McKown Senior Systems Programmer HealthMarkets

Re: REXX coding question.

2008-07-07 Thread Huegel, Thomas
Try it this way: IF SUBSTR(ANSWER,1,1) ¬= 'Y' ANSWER ¬= 'YES' THEN -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] Behalf Of Howard Rifkind Sent: Monday, July 07, 2008 11:24 AM To: IBMVM@LISTSERV.UARK.EDU Subject: REXX coding question. This is

Re: REXX coding question.

2008-07-07 Thread Hughes, Jim
This is the perfect example for using the rexx ABBREV function. Jim Hughes 603-271-5586 Its kind of fun to do the impossible. (Walt Disney) From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of Robert Payne Sent:

Re: REXX coding question.

2008-07-07 Thread Howard Rifkind
Thanks every one...yes the 's have it. That worked thanks again. McKown, John [EMAIL PROTECTED] 7/7/2008 12:31 PM Your logic is faulty. Suppose that ANSWER is Y. ANSWER /= 'Y' is false. ANSWER /= 'YES' is true. TRUE or FALSE is TRUE, so you execute the contents of the IF statement.

Re: REXX coding question.

2008-07-07 Thread Gentry, Stephen
Is the user entering the response in upper or lower case? You may need to use the translate function to get it to upper case. And you may want to use for not equal vs. what you've coded. The not sign doesn't always translate well when going from ebcidic to ascii (depends on code page being

Re: REXX coding question.

2008-07-07 Thread Huegel, Thomas
If he uses PULL ANSWER to get the response, I believe he will always get upper case responses. PULL does PARSE UPPER... -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] Behalf Of Gentry, Stephen Sent: Monday, July 07, 2008 11:28 AM To:

Re: REXX coding question.

2008-07-07 Thread Schuh, Richard
Try something like If ^abbrev('YES', translate(answer), 1) then do . . . end Using this will allow the answer to be shown by the say Regards, Richard Schuh From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On

REXX coding question

2008-07-07 Thread Phil Smith III
Howard Rifkin wrote: This is confusing me. The response to the variable 'answer' is a Y. Yet this portion of the code isn't working. Shouldn't the logic just fall thru because the response was a Y. IF SUBSTR(ANSWER,1,1) /= 'Y' | ANSWER /= 'YES' THEN DO

Re: REXX coding question.

2008-07-07 Thread Mike Rydberg
Here's a snip of code that forces a user to enter a valid option and avoids the problem of typing other than a simple numeric choice 1 to 5. answer = '' do until index('12345',answer) 0 say 'Do you want to do something?' say 'Enter: 1=Yes

Re: REXX coding question.

2008-07-07 Thread Huegel, Thomas
It must be a slow day in Bedrock. I was looking at this and realized that there may be a flaw. As it is written it doesn't matter what the 'ANSWER' is as long as it starts with a 'Y' it will be true. A response of YABADABADOO would pass the test. My guess is what you really want is that ONLY 'Y'

Re: REXX coding question

2008-07-07 Thread Schuh, Richard
If you do that, you might as well simplify it by coding If answer ^= 'YES' - that covers both bases. Why cause answers of YOGURT or YO-YO to be tested twice? I still think that the ABBREV function is what is needed. It would accept answers Y, YE and YES, and nothing else. Regards, Richard

Re: REXX coding question.

2008-07-07 Thread Huegel, Thomas
That'll do it. -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] Behalf Of Schuh, Richard Sent: Monday, July 07, 2008 2:31 PM To: IBMVM@LISTSERV.UARK.EDU Subject: Re: REXX coding question. Or If wordpos(answer, 'Y YES') = 0 then do ... Regards, Richard

Re: REXX coding question.

2008-07-07 Thread Chip Davis
I'm afraid we're gonna have to cite you for a flagrant violation of DeMorgan's Law, Howard. ;-) In fairness, your problem is not caused by unfamiliarity with formal logic, but mere lack of clarity. If I might suggest an alternative so far overlooked: If \(Left(answer,1) = 'Y' | answer =

Re: REXX coding question.

2008-07-07 Thread Howard Rifkind
Well folks, You have shown me a number of ways to skin the cat...on offense to the cat of course. It's programming and you can solve the problem in a number of ways, all of which here are interesting and I have to tell you that I've learned something today. Chip Davis [EMAIL PROTECTED]

Re: REXX coding question.

2008-07-07 Thread Schuh, Richard
There is no need to apply Boolean Algebra to a compound expression at all. Most programmers use DeMorgan's Law, many who have never known that they were applying a named law. There may be many, considering the graying of the list, who do not remember that the name of the law that they are applying

Re: REXX coding question.

2008-07-07 Thread Huegel, Thomas
Well said .. -Original Message- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] Behalf Of Schuh, Richard Sent: Monday, July 07, 2008 4:11 PM To: IBMVM@LISTSERV.UARK.EDU Subject: Re: REXX coding question. There is no need to apply Boolean Algebra to a compound expression

Re: REXX coding question.

2008-07-07 Thread Brian Nielsen
On Mon, 7 Jul 2008 20:26:50 +, Chip Davis [EMAIL PROTECTED] wrote: In fairness, your problem is not caused by unfamiliarity with formal logic, but mere lack of clarity. Brings back memories of the obfuscated C contest. Some of those entries were brilliant. If I might suggest an

Re: REXX coding question.

2008-07-07 Thread Howard Rifkind
Yep...I was thinking about the SELECT instruction also. Brian Nielsen [EMAIL PROTECTED] 7/7/2008 5:51 PM On Mon, 7 Jul 2008 20:26:50 +, Chip Davis [EMAIL PROTECTED] wrote: In fairness, your problem is not caused by unfamiliarity with formal logic, but mere lack of clarity. Brings back

Re: REXX coding question.

2008-07-07 Thread Schuh, Richard
Brings back memories of the obfuscated C contest. Some of those entries were brilliant. C needs no obfuscation :-) /* */ _.='' _.y='Y' _.ye='Y' _.yes='Y' _.okay='Y' _.please='Y' _.maybe='Help' phrase='I GROVEL BEFORE YOU TO PERMIT IT' _.phrase='Y' phrase='YOU ARE CRAZY IF YOU

Re: REXX coding question.

2008-07-07 Thread Brian Nielsen
Well, it's the stems that do all the work. Brian Nielsen On Mon, 7 Jul 2008 17:56:47 -0400, Howard Rifkind [EMAIL PROTECTED] wrote: Yep...I was thinking about the SELECT instruction also. Brian Nielsen [EMAIL PROTECTED] 7/7/2008 5:51 PM On Mon, 7 Jul 2008 20:26:50 +, Chip Davis

Re: REXX coding question.

2008-07-07 Thread Brian Nielsen
On Mon, 7 Jul 2008 14:58:19 -0700, Schuh, Richard [EMAIL PROTECTED] wrote : This must be REXX on U*IX :-) No. z/VM 5.3. Brian Nielsen

Re: REXX coding question.

2008-07-07 Thread Rich Greenberg
On: Mon, Jul 07, 2008 at 02:58:19PM -0700,Schuh, Richard Wrote: } Brings back memories of the obfuscated C contest. Some of } those entries were brilliant. } } } C needs no obfuscation :-) If you want to read a funny account of the origins of C Un*x, See:

Re: z/VM 5.3 and PAV

2008-07-07 Thread Eric R Farman
Hi JR, I'm a little confused by your description of the experiences you've been having with PAV, so have interjected my commentary on the matter below in hopes of understanding it better... Imler, Steven J wrote on 07/03/2008 09:32:13 PM: Well ... for me ... it's not an issue of what benefit

SHARE: Second call for session chairs for San Jose

2008-07-07 Thread Rich Smrcina
With SHARE in San Jose about 4 weeks away, we need to get session chairs set up. There are still plenty of sessions available, get them while they're hot! If you choose to become a session chair, your job is simple but vital. You get to introduce the speaker of the session, mitigate wayward