请求编写SAS代码，基于现有代码生成指定路径的新.sas文件

基于你现有的提取Excel工作表名称的代码，我们可以通过SAS的FILE和PUT语句，在宏循环中自动生成以sheet1.sas、sheet2.sas命名的SAS文件，并保存到指定路径。以下是修改后的完整代码：

/**Assign a libname for excel sheet*/
libname inexcel xlsx '/home/viadmin/casuser/mapping.xlsx';

PROC CONTENTS DATA=inexcel._ALL_ noprint
OUT=Sheets (KEEP=Memname);
RUN;

PROC SORT DATA=Sheets NODUPLICATES;
BY Memname;
RUN;

DATA Sheets;
SET Sheets;
ID=_N_;
RUN;

DATA _NULL_;
IF 0 THEN SET Sheets NOBS=X;
CALL SYMPUT('Recount', X);
STOP;
RUN;

/** 定义生成SAS文件的输出路径，按需修改 */
%let output_path = '/home/viadmin/casuser/output_sas_files/';

%macro Excel;
%DO i = 1 %TO &Recount;
    /** 获取当前工作表名称到宏变量&Name */
    PROC SQL noprint;
        SELECT Memname INTO :Name TRIMMED
        FROM Sheets WHERE ID = &i;
    quit;

    /** 生成对应sheet的SAS文件 */
    DATA _NULL_;
        /** 指定要生成的SAS文件路径和名称 */
        FILE &output_path.sheet&i..sas;
        
        /** 写入SAS文件内容，可根据需求自定义 */
        PUT "/* 自动生成的SAS文件，对应工作表：&Name */";
        PUT "libname outlib xlsx '/home/viadmin/casuser/mapping.xlsx';";
        PUT "DATA work.&Name;";
        PUT "    SET outlib.&Name;";
        PUT "RUN;";
        PUT "libname outlib clear;";
    RUN;
%end;
%mend;

%excel;

/** 清除Excel库 */
libname inexcel clear;

关键说明： #

1. 输出路径配置：通过%let output_path指定生成文件的存放目录，确保该目录存在且SAS有写入权限。
2. 宏循环优化：移除了原代码中多余的create table sheet&i步骤，直接用PROC SQL noprint获取工作表名到宏变量，提升效率。
3. 自定义文件内容：PUT语句后的内容可根据需求修改，比如添加数据清洗逻辑、导出代码等，示例中默认写入了读取对应工作表的基础代码。
4. 文件命名规则：生成的文件名为sheet1.sas、sheet2.sas，与工作表的序号一一对应。

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