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 Behalf Of Howard Rifkind
Sent: Monday, July 07, 2008 9:24 AM
To: [email protected]
Subject: REXX coding question.
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
SAY ANSWER
SAY 'THE WRONG RESPONSE HAS BEEN ENTERED'
SAY
SAY 'PROCEDURE IS TERMINATING, PLEASE TRY AGAIN'
EXIT
END
Thanks
_____________
LEGAL NOTICE
Unless expressly stated otherwise, this message is confidential
and may be privileged. It is intended for the addressee(s) only.
Access to this E-mail by anyone else is unauthorized.
If you are not an addressee, any disclosure or copying of the
contents of this E-mail or any action taken (or not taken) in
reliance on it is unauthorized and may be unlawful. If you are not an
addressee, please inform the sender immediately, then delete this
message and empty from your trash.
