例: CASでのテーブルの管理

proc casutil outcaslib='casuser';
   load data=sashelp.cars;                /* 1 */
run;

data mycas.cars2 / sessref=casauto;       /* 2 */
   set mycas.cars;                        /* 3 */
   if mpg_city > 25 then eff='Y';
      else eff='N';
   put 'Thread number: '  _threadid_  
       'on worker node '  _hostname_;
run;

filename names url 
 "http://support.sas.com/documentation/onlinedoc/viya/exampledatasets/names.csv";

data mycas.names;
  infile names dsd truncover firstobs=2;                  /* 1 */
  input BRTH_YR :$10. GNDR :$10. ETHCTY :$10. NM :$10. 
            CNT :$10.  RNK :$10.;                         /* 2 */
run;

proc casutil incaslib='casuser';                          /* 3 */ 
   save casdata='names' outcaslib='casuser' replace; 
   list; 
run;             

BRTH_YR,GNDR,ETHCTY,NM,CNT,RNK
2011,FEMALE,HISPANIC,GERALDINE,13,75
2011,FEMALE,HISPANIC,GIA,21,67
2011,FEMALE,HISPANIC,GIANNA,49,42
2011,FEMALE,HISPANIC,GISELLE,38,51
        <more rows>
2014,MALE,WHITE NON HISPANIC,Youssef,24,88
2014,MALE,WHITE NON HISPANIC,Yusuf,16,96
2014,MALE,WHITE NON HISPANIC,Zachary,90,39
2014,MALE,WHITE NON HISPANIC,Zev,49,65

data mycas.earnings;                           
   Amount=1000;                             /* 1 */
   Rate=.075/12; 
   do month=1 to 12;   
      Earned +(amount+earned)*(rate);   
   end;  
   run;
proc print data=mycas.earnings;run;

libname mysas "/file-path/";               /* 2 */
data mysas.earnings;                       /* 3 */
   set mycas.earnings;
run; 

filename names url                                        /* 1 */
 "http://support.sas.com/documentation/onlinedoc/viya/exampledatasets/names.csv";

proc import datafile=names                                /* 2 */ 
            dbms=csv 
            out=mycas.names      /* 3 */
            replace;
run;
proc print data=mycas.names; run;  /* 4 */

filename names url 
 "http://support.sas.com/documentation/onlinedoc/viya/exampledatasets/names.csv";

data mycas.names;
  infile names dsd truncover firstobs=2;                  /* 1 */
  input BRTH_YR :$10. GNDR :$10. ETHCTY :$10. NM :$10. 
            CNT :$10.  RNK :$10.;                         /* 2 */
run;

proc casutil incaslib='casuser';                          /* 3 */ 
   save casdata='names' outcaslib='casuser' replace; 
   list; 
run;             

BRTH_YR,GNDR,ETHCTY,NM,CNT,RNK
2011,FEMALE,HISPANIC,GERALDINE,13,75
2011,FEMALE,HISPANIC,GIA,21,67
2011,FEMALE,HISPANIC,GIANNA,49,42
2011,FEMALE,HISPANIC,GISELLE,38,51
        <more rows>
2014,MALE,WHITE NON HISPANIC,Youssef,24,88
2014,MALE,WHITE NON HISPANIC,Yusuf,16,96
2014,MALE,WHITE NON HISPANIC,Zachary,90,39
2014,MALE,WHITE NON HISPANIC,Zev,49,65

data animal1;                                /* 1 */
input Common $ Animal $ 3-8     
      Number 10-11;          
datalines; 
a Ant    1
b Bird   2
c Cat    3
d Dog    4
e Eagle  5
f Frog   6
g Goose  7
h Hawk   8
i Impala 9
;                     
data plant1;                                 /* 2 */
input Common $ Plant $ 3-10 
      Number 12-13;
datalines;
a Grape    1
c Hazelnut 2
e Indigo   3
g Jicama   4
i Kale     5
;

data append;                                 /* 3 */
  set animal1 plant1;
run;

proc print data=append;     
title '1. Plant1 Appended to Animal1 in a ';
title2 'DATA Step Running in SAS'; run;

data interleaveByCommon;                     /* 4 */
  set animal1 plant1;
  by common; run;

proc print data=interleaveByCommon;    
title '2. Animals and Plants Interleaved 
          by Variable COMMON';
title2 'in a DATA Step Running in SAS'; 
run;

data interleaveByCommonNumber;               /* 5 */
   set animal1 plant1;
   by common Number; run;

proc print data=interleaveByCommonNumber;
title '3. Animals and Plants Interleaved 
          by Common and Number';
title2 'in a DATA Step Running in SAS'; 
run;

proc casutil incaslib="casuser"              /* 6 */ 
             outcaslib="casuser"; 
  load data=animal1 replace;
  load data=plant1 replace; 
run;

data mycas.appendCas / sessref=casauto;      /* 7 */
   set mycas.animal1 mycas.plant1;
   hostname=_hostname_; run;

proc print data=mycas.appendCas;
title  '4. Plant1 Appended to Animal1 in a';
title2 'Multithreaded DATA Step 
        Running in CAS'; 
run;
     

data mycas.byCommon / sessref=casauto; 
   set mycas.animal1 mycas.plant1;           /* 8 */
   by common; 
   hostname=_hostname_; run;

proc print data=mycas.byCommon;
title '5. Animal and Plant Combined 
          by Common';
title2 'in a Multithreaded DATA Step 
        Running in CAS'; 
run;

data mycas.ByCommonNumber / sessref=casauto; /* 9 */
   set mycas.animal1 mycas.plant1;
   by common Number; 
   hostname=_hostname_;  
run;

proc print data=mycas.ByCommonNumber; 
title '6. Animal and Plant Combined 
         by Common and Number'; 
title2 'in a DATA Step Running in CAS'; 
run;

data mycas.class(promote=yes);           /*1*/
   set sashelp.class;                  
   where Weight>115;                     /*2*/
run;

data mycas.addClass;                     /*3*/
input Name $ Sex $ Age Height Weight;
datalines;
Aaron M 13  64 112
Becky F 16  68 125
;

data mycas.class(append=force);  /*4*/ 
   set mycas.addClass;  
   where weight>115;                                   /*5*/ 
run;
proc print data=mycas.class; run;  /*6*/
 

data mycas.addClass;
   length Sex $1;
   set mycas.class;
run;