使用带空格的引号替换宏变量值中的空格

我想用带空格的双引号（即“”）替换宏变量中传递的变量之间的空格。请在下面找到我使用的代码和我得到的结果。使用带空格的引号替换宏变量值中的空格

%let str7=ABC DEF UVW XYZ; 

%let str8 = %qsysfunc(quote(%qsysfunc(tranwrd(%qsysfunc(compbl(%qsysfunc(strip(%upcase(&str7.))))),%str(),%nrstr(%"))))); 

%put ^^^^&str8;

的日志显示：

18 %put ^^^^&str8;

^^^^"ABC""DEF""UVW""XYZ"

我需要这是 “ABC”， “DEF” “UVW” “XYZ”。

我也曾尝试以下...

proc fcmp outlib=work.funcs.funcs; 

    function delimit_words(iString $) $;  
    result = '"' || tranwrd(cats(compbl(iString))," ", '" ,"') || '"';  
    return (result); 
    endsub; 

run; 


%let x = A B C ; 
%let y = %sysfunc(delimit_words(&x)); 
%put &y;

，但它给了我下面的错误...

错误：在％SYSFUNC或％QSYSFUNC宏函数引用的DELIMIT_WORDS功能不找到。

我已经使用了Jeff给出的以下方法。

data test; 
    id =1; _var="ABC"; output; 
    id =1; _var="DEF"; output; 
    id =1; _var="UVW"; output; 
    id =2; _var="UVW"; output; 
    id =3; _var="ABC"; output; 
    id =3; _var="UVW"; output; 
    id =3; _var="XYZ"; output; 
    id =4; _var="ABC"; output; 
    id =4; _var="XYZ"; output; 
run; 

%macro __test1(_byvar=, _qnam=, _id=); 
    proc sort data= test out=_test; 
     by &_byvar.; 

    %if %superq(_qnam) ne %then 
    %do; 
      %let __tmpmv_qnam = %qsysfunc(prxchange(%bquote(s/\b/"/),-1,%bquote(&_qnam))); 
      *"; 
      %put ^^^^^&__tmpmv_qnam.; 
     where upcase(&_id) in (&__tmpmv_qnam); 
    %end; 

    run; 

%mend; 

%__test1 (_byvar=id ,_qnam = ABC UVW, _id=_var);

日志diaplayed以下错误：

SYMBOLGEN: Macro variable _QNAM resolves to ABC UVW 
ERROR: Literal contains unmatched quote.

请在这一个帮助。

来源

2014-10-30 Priyesh Sura

无需调试上述任一你的方法，我可以提供第三：

%let str8 = %sysfunc(prxchange(%bquote(s/\b/"/),-1,%quote(&str7.))); 
*";

的prxchange()函数告诉SAS与"更换每一个字边界（\b）。至于什么时候使用bquote()，而不是quote()，它都在线记录，但老实说，我通常诉诸试验和错误。

*";什么都不做，但如果编辑器的语法突出显示会被单引号混淆（就像我的做法一样），它会让事情看起来更好。

来源

2014-10-30 14:22:39 Jeff

感谢您使用更整洁的方法，但它给了我以下错误。错误：文字包含无与伦比的报价。 – 2014-10-30 14:38:00

我有一个错字，现在修正了（buote而不是quote）。对于那个很抱歉。 – Jeff 2014-10-30 14:39:26

是的。我明白了，但错误依然存在。 – 2014-10-30 14:46:41

你FCMP如果添加行

options cmplib=work.funcs;

你的代码，如果你在SAS 9.3或更高版本上运行工作正常。

一般来说，最好的方法是不要这样做：相反，首先使用引号创建宏变量。你是如何创造这个的？如果从数据集创建它，例如，你可以这样做：

proc sql; 
    select quote(strip(name)) into :varlist separated by ',' 
    from sashelp.class; 
quit;

"Alfred","Alice","Barbara","Carol","Henry","James","Jane","Janet","Jeffrey","John","Joyce","Judy" ,"Louise","Mary","Philip","Robert","Ronald","Thomas","William"

来源

2014-10-30 15:05:29 Joe

试试这个：

%let str7=ABC DEF UVW XYZ; 

%let str8 ="%bquote(%sysfunc(tranwrd(%sysfunc(strip(&str7.)),%str(),%nrstr(%",%"))))"; 

%put ^^^^&str8;

来源

2016-06-22 09:35:19

只要你想使用双引用，那么我认为你工作太辛苦了。

%let str7=ABC DEF UVW XYZ; 
%let str8="%sysfunc(tranwrd(&str7,%str()," "))";

现在，如果您的原始字符串没有很好地形成，并可能包含单词之间的空格multple那么你首先需要使用%COMPBL()把它清理干净。

%let str8=%sysfunc(compbl(&str7)); 
%let str8="%sysfunc(tranwrd(&str8,%str()," "))";

来源

2016-06-22 11:15:26 Tom

使用带空格的引号替换宏变量值中的空格

回答

相关问题