Date:         Thu, 24 Feb 2000 09:42:45 +0100
Reply-To:     Jim Groeneveld <J.Groeneveld@ITGROUPS.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Jim Groeneveld <J.Groeneveld@ITGROUPS.COM>
Subject:      Re: to add application autocall library to sasautos(MVS)
Comments: To: "peter.crawford@db.com" <peter.crawford@db.com>
Content-Type: text/plain; charset="iso-8859-1"

Peter,

You may be right. I did not indicate the interpretation of the parentheses
correctly. To demonstrate the effect, run the following code:

%let haakjes = %str(()     ); %* Last right parenthesis closes STR;
%put haakjes=«&haakjes»;
%let haakjes = %str(%(%)     ); %* Last right parenthesis closes STR;
%put haakjes=«&haakjes»;
%let haakjes = %str(%()     ); %* First right parenthesis closes STR;
%put haakjes=«&haakjes»;
%let haakjes = %str((%)     ); %* Closing parenthesis is lacking! ;
%put haakjes=«&haakjes»; %* STR function still open, recursive: error; );

Regards - Jim.
--
Y. Groeneveld, MSc            IMRO TRAMARKO       tel. +31 412 407 070
senior statistician,          P.O. Box 1          fax. +31 412 407 080
head IT department            5350 AA BERGHEM     IMRO TRAMARKO: a CRO
J.Groeneveld@ITGroups.com     the Netherlands     in clinical research

My computer now is used long enough to the year ²°°° trap.


> -----Original Message-----
> From: peter.crawford@db.com [SMTP:peter.crawford@db.com]
> Sent: Wednesday, February 23, 2000 4:57 PM
> To:   J.Groeneveld@itgroups.com
> Subject:      Antwort: RE: to add application autocall library to
> sasautos(MVS)
>
>
>
> Hi Jim
> do you mean that I should be able to remove one ) ?
> I may misunderstand, but your idea didn't work for me !
>
> I tried that with this comparison (testing on winXX)
> 94   %let Jim = ( some text );
> 95   %let nak =  %sysfunc( translate( &jim, %str( ), %str(())
> SYMBOLGEN:  Macro variable JIM resolves to ( some text )
> 96                                  )
> 97                       )  ;
> 98   %put >nak<=>&nak<;
> SYMBOLGEN:  Macro variable NAK resolves to some text
> >nak<=>some text<
> 99   %let Jim = ( some text );
> 100  %let nak =  %sysfunc( translate( &jim, %str( ), %str(()
> SYMBOLGEN:  Macro variable JIM resolves to ( some text )
> 101                                 )
> 102                      )  ;
> ERROR: Expected close parenthesis after macro function invocation not
> found.
> 103  %put >nak<=>&nak<;
> ERROR: Open code statement recursion detected.
>
> The test at log line 100 differs only by having one ) removed !
>
> Regards
> Peter
>
> Datum:         23.02.2000 16:36
> An:            Peter Crawford/Zentrale/DeuBaExt
> Kopie:         SAS-L@listserv.uga.edu
>
>
> Betreff:       RE: to add application autocall library to sasautos(MVS)
> Nachrichtentext:
>  << File: ATT01598.txt >>