如何配置SAS自动重复尝试连接远程Oracle数据库直至成功？

核心实现逻辑 #

通过SAS宏封装连接逻辑，循环执行connect to oracle语句，捕获连接失败的错误状态，在达到最大重试次数前，按指定间隔重复尝试连接。

可配置重试宏代码 #

%macro retry_oracle_connect(
    max_retry=5,          /* 最大重试次数 */
    wait_seconds=10,      /* 每次重试间隔（秒） */
    oracle_conn_str=      /* Oracle连接字符串，格式如: path=XXX user=XXX password=XXX */
);
    %local retry_count sqlrc;
    %let retry_count=0;
    %let sqlrc=0;

    %do %while(&retry_count < &max_retry and &sqlrc ne 0);
        %let retry_count=%eval(&retry_count + 1);
        proc sql noprint;
            /* 尝试连接Oracle */
            connect to oracle (&oracle_conn_str);
            /* 获取连接状态码 */
            %let sqlrc=&sqlrc;
        quit;

        %if &sqlrc ne 0 %then %do;
            %put 第&retry_count次连接失败，&wait_seconds秒后重试...;
            /* 等待指定时长 */
            data _null_;
                sleep(&wait_seconds);
            run;
        %end;
        %else %do;
            %put 第&retry_count次连接成功！;
        %end;
    %end;

    %if &sqlrc ne 0 %then %do;
        %put 已达到最大重试次数&max_retry，连接失败！;
        /* 可根据需求添加后续错误处理逻辑 */
    %end;
%mend retry_oracle_connect;

代码说明 #

• 参数配置：
  • max_retry：设置允许的最大重试次数，默认5次
  • wait_seconds：设置两次重试之间的等待间隔，默认10秒
  • oracle_conn_str：替换为你的Oracle实际连接参数，需包含path、user、password等必要信息
• 错误捕获：通过&sqlrc变量获取proc sql的执行状态码，非0表示连接失败
• 等待逻辑：使用SAS内置的sleep()函数实现重试间隔，SAS 9.4与Viya版本均兼容

使用示例 #

/* 调用宏，配置重试参数与Oracle连接信息 */
%retry_oracle_connect(
    max_retry=3,
    wait_seconds=15,
    oracle_conn_str=path=ORCL user=myuser password=mypwd
);

/* 连接成功后，可继续执行后续Pass-Through操作 */
proc sql;
    select * from connection to oracle (
        select * from my_table where rownum <=10
    );
    disconnect from oracle;
quit;

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