The code below worked fine for me.

/* rexx */
op = '

Hi

The code below worked fine for me.


/* rexx */
op = ''

DO WHILE op \= 'E'
  SAY ''
  SAY 'Enter a text or "e" to exit.'
  PARSE UPPER PULL op
  SAY 'The text is "'op'".'
END
SAY 'You selected the exit option.'
EXIT

 
 
Regards,
 
Alexandre




----- Mensagem original ----
De: Jürgen Kehr <[EMAIL PROTECTED]>
Para: [email protected]
Enviadas: Sábado, 4 de Outubro de 2008 14:11:23
Assunto: Re: REXX question

Hi,

I looked up the TSO REXX reference, it says:

PULL reads a string from the head of the external data queue. It is just 
a short form of the instruction:  PARSE UPPER PULL template_list ;

if you do not need the uppercase translation you should code "parse pull".

Lizette Koehler schrieb:
> I looked up the PARSE command in the TSO REXX commands manual.  It states
>
> If you specify the UPPER option, the data to be parsed is first translated
> to uppercase (that is, lowercase a–z to uppercase A–Z). Otherwise, no
> uppercase translation takes place during the parsing.
>
> I did have my syntax backward.  It should have read
>
> PARSE UPPER PULL answer
>
>
> Lizette
>
>  
>> Hello,
>>
>> AFAIK pull is the short form for parse upper pull,  so it shouldn't
>> make  any difference to your version. What makes me nervous instead is
>> the single quote in the do until clause ... : N'
>>
>> Lizette Koehler schrieb:
>>    
>>> Rexx is case sensitive.
>>>
>>> Use                  PARSE Pull UPPER Answer
>>>
>>> Then it will always be upper case and a test for Upper Case
>>>      
>> letters/words
>>    
>>> will work.
>>>
>>> Lizette
>>>
>>> PS.  You may wish to join the TSO-REXX newsgroup.
>>>
>>> For TSO-REXX subscribe / signoff / archive access instructions, send
>>>      
>> email
>>    
>>> to [EMAIL PROTECTED] with the message: INFO TSO-REXX
>>>
>>>
>>>
>>>      
>>>> hi
>>>>
>>>> I make this:
>>>> do until answer = N'
>>>>      instructions
>>>>     say 'Do you want to exit? (s/n)'
>>>>     pull answer
>>>>     if answer = 'S' then exit
>>>> end
>>>>
>>>> I type s, but not exit of the do until?? Why?? this is a case
>>>> sensitive??
>>>>
>>>> It´s correct??
>>>>
>>>>
>>>>
>>>> more a question:
>>>> how i do to treat for error:
>>>>      10 +++  dec25 = date("B",year"1225","S")//7
>>>>  IRX0040I Error running CHRISTMA, line 10: Incorrect call to routine
>>>>
>>>> the error ocorred when typed less four digits to year??
>>>> ex: year with tree or two or one digits
>>>>      200 or 20 or 2.
>>>>
>>>> regards
>>>>
>>>>
>>>>
>>>>        
>
> ----------------------------------------------------------------------
> 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
>
>  

-- 

___________________________________________________________________

Freundliche Gruesse / Kind regards

Dipl.Math. Juergen Kehr, IT Schulung & Beratung, IT Education + Consulting

Tel. +49-561-9528788 Fax +49-561-9528789 Mobil +49-172-5129389

ICQ 292-318-696 (JKehr)

mailto:[EMAIL PROTECTED]

mailto:[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


      Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

----------------------------------------------------------------------
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

Reply via email to