カタログにSASプログラムを格納するサンプル

カタログにプログラムを格納するサンプルです。探したら良い例が見つからなかったのでメモしておきます。

view plainprint?

1. /* ディレクトリにあるMM_MISC.sasをカタログに格納する */  
2. filename there '/tmp' ;  
3. libname mylib '/tmp/sashelp' ;  
4.   
5. %let trialcode = MM_MISC;  
6. %let catname = modelmgr;  
7.   
8. data _null_ ;  
9.     filename mycat catalog "mylib.&catname" lrecl= 256 ;  
10.     file   mycat("&trialcode..source") ;  
11.     infile   there("&trialcode..sas") ;  
12.     input ;  
13.     put _infile_ ;  
14. run;  
15.   
16. proc catalog c=mylib.&catname;  
17.     contents;  
18. run;  
19. quit;  
20.   
21. /* 格納したプログラムを読み込む */  
22. filename chkinit catalog "mylib.&catname..&trialcode..source";  
23. %include chkinit;  

/* ディレクトリにあるMM_MISC.sasをカタログに格納する */
filename there '/tmp' ;
libname mylib '/tmp/sashelp' ;

%let trialcode = MM_MISC;
%let catname = modelmgr;

data _null_ ;
    filename mycat catalog "mylib.&catname" lrecl= 256 ;
    file   mycat("&trialcode..source") ;
    infile   there("&trialcode..sas") ;
    input ;
    put _infile_ ;
run;

proc catalog c=mylib.&catname;
    contents;
run;
quit;

/* 格納したプログラムを読み込む */
filename chkinit catalog "mylib.&catname..&trialcode..source";
%include chkinit;