美文网首页
SAS编程:如何读入外部文档数据?

SAS编程:如何读入外部文档数据?

作者: 野藤_ | 来源:发表于2022-05-31 00:06 被阅读0次

    工作中有时需要将外部文本信息导入SAS数据集中进行处理,例如,将.log文档导入SAS数据集进行判断输出相关issue。这篇文章,介绍2种SAS读入外部文档数据的方法。

    第一种方法,通过Fopen系列函数读入;第二种方法,通过infile语句读入。两者相比,后者的代码相对简洁,建议使用后者。

    以以下路径内容进行演示:

    Filepath

    1. Fopen系列函数

    在之前文章中介绍过,通过Fopen系列函数获取文件的末次修改时间的应用,例如,SAS编程-宏:Source侧与QC侧程序运行时间检查

    关于读入外部数据,主要用到FreadFget这两个函数。

    Fread函数的作用是,从外部文件中读入一条记录到文件数据缓冲区(Reads a record from an external file into the FileData Buffer (FDB))。成功读入一条记录,函数返回0值;读入失败, 函数返回非0值。一个Fread函语句只能读入一条记录,如果想要读取外部文档的所有记录,需要通过循环进行处理

    Fget函数作用是,将数据从文件数据缓冲区(FDB)复制到一个变量中(Copies data from the File Data Buffer (FDB) into a variable)。成功复制,函数返回0值;如果没有内容复制,函数返回-1。

    在介绍Fread函数的SAS官方文档的中,就有利用这两个函数读入外部文档的程序举例。只不过示例使用的是宏程序,并将文档内容输出到SAS日志中。(来源:SAS Help Center: FREAD Function

    Fread

    为方便对文档信息的处理,需将文档内容读入SAS 数据集。以上程序不难在Data 步中实现。

    %let filepath  = E:\99_Test\Test\test5\Check_date.log;
    
    data tmp;
    
      *Get fileID;
      fileres = filename("filepath", "&filepath.");
      fileid = fopen("filepath");
    
      length text $200;
      
      do while ( fread(fileid) = 0 );
         getres = fget(fileid, text, 200);
         output;
      end;
    run;
    
    

    以上程序并没有使用Fclose函数注销“文件ID”,也没有使用filename函数取消取消文件路径的关联。这样操作对输出结果没有影响,因为程序运行结束后,关联会自动移除、释放。

    其实,以上代码也无法使用这两个函数,因为这两个函数在Data步骤只能以赋值语句的形式存在。由于Do while代码块中有Output语句,循环结束后赋值语句是失效的,所以无法实现。.

    不过,如果通过Do Until语句实现循环,则可以在循环内部进行处理“释放”相关内容。最后一次循环记录不会读入外部文档记录,可以直接删除。

    %let filepath  = E:\99_Test\Test\test5\Check_date.log;
    
    data tmp;
      *Get fileID;
      fileres = filename("filepath", "&filepath.");
      fileid = fopen("filepath");
    
      *Read records;
      length text $200;
      
      readres = 0;
      do until ( readres ne 0 );
         getres = fget(fileid, text, 200);
         readres = fread(fileid);
    
         if readres ne 0 then do;
            clores = fclose(fileid);
            defile = filename("filepath", " ");
            delete;
         end;
    
         output;
      end;
    run;
    

    输出结果如下:

    Result 1

    2. infile语句

    infile语句的作用是,指定要用INPUT语句读入的外部文件(Specifies an external file to read with an INPUT statement)。

    infile语句不像Fread系列函数那样需要2步读入,可以直接读入外部文档,简洁高效许多。

    示例代码如下:

    %let filepath  = E:\99_Test\Test\test5\Check_date.log;
    
    data tmp2;
      filepath = "&.filepath.";
      infile dummy filevar = filepath end = lastrec truncover;
    
      do while(not lastrec);
        input text $200;
        output;
      end;
    run;
    

    filevar =选项指定保存外部文档地址的变量,变量可以包含多个文件地址,input语句会一次进行读入。

    如果读入的记录不足input语句设定的长度时,infile语句会默认接着读取下一条记录。truncover选项使得读入记录长度小于input语句设定长度时,会另开一行读取下一条记录。

    就不详细介绍其他选项的含义了,具体参考SAS官方文档SAS Help Center: INFILE Statement

    读入结果如下,与前面结果一致。

    Result 2

    总结

    文章介绍了2种读入外部文档的方法,推荐使用infile语句,简洁高效。

    感谢阅读, 欢迎关注!
    若有疑问,欢迎评论交流!

    相关文章

      网友评论

          本文标题:SAS编程:如何读入外部文档数据?

          本文链接:https://www.haomeiwen.com/subject/afuuprtx.html