关于条件退出MACRO的问题

shiyiming

大家能帮我看看在下面程序中，当条件成立时如何退出整个MACRO吗，谢谢

shiyiming

没太看明白这个宏的功能,但好象可以用%if语句试试看
[code:3f6t023n]        %if &groups ne admin %then
                %do;
                        filename ls pipe "ls -lR &dir";
                        data permission;
                        infile ls;
                        length permission $ 10 owner group $ 8 Path $ 300 parent $ 300;
                        run;
                %end;[/code:3f6t023n]

shiyiming

我想当 时[color=#FF0000:1g5ytvkf]退出整个macro[/color:1g5ytvkf]哦


有 %if &groups ne a%then %stop/%quit  之类的吗？

shiyiming

不会做,助你好运.

shiyiming

你再试试下面的程序，应该能够解决你的问题，标红为新增加的内容。

%macro zhutou(user=, dir=);
filename id pipe "groups &user";
data groups;
       infile id;
       length groups $ 100;
       input;
       groups = substr(_infile_, find(_infile_, ':')+1);
       call symputx('groups', cats('"', tranwrd(trim(groups), ' ', '","'), '"'));
       [color=#FF0000:3c3ni57z]%if &groups='admin' %then %do;
          %goto exitmacro;
       %end;[/color:3c3ni57z]filename ls pipe "ls -lR &dir";
       data permission;
       infile ls;
       length permission $ 10 owner group $ 8 Path $ 300 parent $ 300;
run;
[color=#FF0000:3c3ni57z]%exitmacto:[/color:3c3ni57z]
%mend;[/quote]

shiyiming

这样可以运行过去，但好像[color=#FF0000:2ww4nlpx]%if &groups='admin' %then %do;[/color:2ww4nlpx]这句没做判断似的，就算groups = 'admin' 程序也不会跳出macro，还是继续运行到最后，请大家再帮我看看啦，时间不多了，谢啦

shiyiming

等你时间用完了我再告诉你引号是多余的

shiyiming

%if ... %then %abort;

shiyiming

[quote="ahuige":1mh0h19a]等你时间用完了我再告诉你引号是多余的[/quote:1mh0h19a]

Cute!! <!-- s:lol: --><img src="{SMILIES_PATH}/icon_lol.gif" alt=":lol:" title="Laughing" /><!-- s:lol: -->