太高深一定好好学习了，

希望有大神指导一下，试了好久，取不出来

正则表达式，或者根据 逗号 数量来做循环scan一下也可以

代码能力太差，对于单个字符串还可以，对于所有观测写宏循环提取失败了，没琢磨明白

把你的数据保存了个文件，每条观测一行。
然后上网copy了一段代码。


%macro JSONParse(Filename, varList);
data JSON (keep=&varlist);
    infile &FILENAME ;
    input;
    ExpressionID = prxparse('/{(.*?)}/');
    jsontext = _INFILE_;
    start = 1;
    stop = length(jsontext);

    array vlist $200 &Varlist;

   call prxnext(ExpressionID, start, stop, jsontext, position, length);

   put position length;

    do while (position > 0);
        newpos = position + 1;
        record = substr(jsontext, newpos, newlen);
                put newpos newlen
        i=0;   
        do over vlist;
            i+1;

            vlist = strip(compress(scan(scan( record, i, ",{"), 2, ":"), '{"}'));
        end;
        output;
        call prxnext(ExpressionID, start, stop, jsontext, position, length);
    end;

run;
%mend;

options  mlogic mprint symbolgen;

FILENAME TEST "F:/SASfiles/first.json";
%JSONParse(TEST, applyJoinSitu
cmfqFpNrAlLv3
dminFpAvPsCnt3
execStlRate
finCmlisrAmt
finStrisrAmt
finingTerm
finingTotalAmt
scoreVO
aliScore
applyNo
tdScore
sumFpNrLnCnt3
vegAge
zm);