SAS proc download批量下载多文件宏变量调用报错求助

• 宏变量赋值逻辑错误：代码中%let link3=link2;仅将宏变量link3赋值为字面字符串link2，并未读取数据集B中存储的实际服务器文件路径，PROC DOWNLOAD执行时会查找名为link2的不存在文件，直接触发物理文件不存在报错。
• 缺少批量遍历逻辑：现有代码没有循环读取路径列表的逻辑，单个宏变量只能存储单个值，无法覆盖数据集A中所有待下载文件路径。
• 本地输出路径非法：直接将服务器侧的/abc/xxx.txt路径拼接到Windows本地路径E:/后，会生成带多余斜杠的非法路径，Windows系统无法正常识别写入。
• 跨会话数据引用错误：rsubmit块内的代码运行在远程服务器环境，直接引用本地会话生成的数据集B会找不到对应对象，需要提前将路径列表上传到远程会话。

先在本地会话预处理路径，提前拆分服务器侧文件路径和本地合法输出路径，再通过批量语句生成逻辑逐一下载文件：

/* 本地会话预处理：生成规范的路径映射表 */
data B ;
    set A;
    length link server_path local_out_path $ 500;
    link = strip(Name);
    /* 拼接远程服务器上的完整文件路径 */
    server_path = cats('/abc/', link);
    /* 生成本地Windows系统合法的输出路径，文件直接存到E盘根目录 */
    local_out_path = cats('E:/', link);
    keep server_path local_out_path;
run;

/* 建立远程服务器连接 */
%let abc=server name;
options comamid=TCP remote=abc;
signon username=user password="xyz";

/* 将本地生成的路径映射表上传到远程会话 */
rsubmit;
proc upload data=B out=work.B;
run;
endrsubmit;

/* 批量生成下载语句执行，无需额外定义复杂宏 */
data _null_;
    set B;
    call execute(
        'rsubmit;'
        || 'proc download infile="' || strip(server_path) || '" '
        || 'outfile="' || strip(local_out_path) || '";'
        || 'run;'
        || 'endrsubmit;'
    );
run;

/* 所有文件下载完成后关闭远程连接 */
signoff;

补充说明：如果数据集A中Name字段本身已经携带/abc/前缀，删除server_path = cats('/abc/', link);这行，直接写server_path = strip(Name);即可，避免路径重复拼接导致找不到文件。如果需要自定义本地存储的子目录，修改local_out_path的拼接规则即可，注意不要保留服务器侧路径的前置斜杠。

内容的提问来源于stack exchange，提问作者Learning