libref libref libref

Size: px

Start display at page:

Download "libref libref libref"

ありさありはら
7 years ago
Views:

1 Spring

2 libref libref libref

4 LIBNAME '; LIBNAME '; PROC MIGRATE IN=source OUT=target <>; : c: saslib source : source : c: saslib target : target ERROR: File TARGET.XXXXX (memtype=zzzz) cannot be migrated. A file of that name already exists in the OUT= library TARGET. NOTE:XXX.YYY.DATA WARNING : xxxxx LIBNAME source <v6/v8> 'c: saslib source'; LIBNAME target v9 'c: saslib v92lib'; PROC MIGRATE IN=source OUT=target;

A file of that name already exists in the OUT= library TARGET. NOTE:XXX.YYY.

5 : /migrate/source : source : tran.cpt : /migrate/target : target FILENAME tran '/migrate/tran.cpt '; LIBNAME source '/migrate/source'; PROC CPORT LIB=source FILE=tran; LIBNAME target v9 '/migrate/target'; V9 FILENAME tran '/migrate/tran.cpt'; PROC CIMPORT LIB=target INFILE=tran; OPTIONS REMOTE=<> COMAMID=TCP; FILENAME RLINK ''; SIGNON; RSUBMIT; LIBNAME rlslib <v6/v8> '/migrate/source'; ENDRSUBMIT; LIBNAME source <v6/v8> '/migrate/source'; LIBNAME rlslib SERVER=sassrv; : /migrate/source : rlslib LIBNAME target v9 '/migrate/target'; : /migrate/target : target PROC MIGRATE IN=source OUT=target SLIBREF=rlslib;

cpt'; PROC CIMPORT LIB=target INFILE=tran; OPTIONS REMOTE=<> COMAMID=TCP; FILENAME RLINK ''; SIGNON; RSUBMIT; LIBNAME rlslib <v6/v8> '/migrate/source';

6 SAS Academic News

7 LNAME FNAME JOBCODE Whitley Sam na1 data navigate; set employees; if jobcode = 'NA1' then jobdesc = 'Navigator'; A. B. C. D. data test; input name $ age; cards; John +35 ; A.name age John 35 B.name age John (missing value) C.name age (missing value) (missing value) D.The DATA step fails execution due to data errors. proc format; value score 1-50 = 'Fail' = 'Pass'; A.proc print data = sasuser.class; var test; format test score; B.proc print data = sasuser.class; var test; format test score.; C.proc print data = sasuser.class format = score; var test; D.proc print data = sasuser.class format = score.; var test; data loop; x = 0; do index = 1 to 5 by 2; x = index ; end; A. B. C. D. E.

name age --------------------- (missing value) (missing value) D.The DATA step fails execution due to data errors. proc format; value score 1-50 = 'Fail' 51-100 = 'Pass'; A.proc print data = sasuser.

8 data combine; set one two; A. B. C. D. proc sql; select one.*, sales from one right join two on one.year = two.year; quit; A. B. A.proc sql; create table three as select * from one full join two where one.num = two.num; quit; B.proc sql; create table three as select coalesce(one.num, two.num) as NUM, char1, char2 from one full join two where one.num = two.num; quit; C.proc sql; create table three as select one.num, char1, char2 from one full join two on one.num = two.num; quit; D.proc sql; create table three as select coalesce(one.num, two.num) as NUM, char1, char2 from one full join two on one.num = two.num; quit; C. D. %let type = RANCH; proc sql; create view houses as select * from sasuser.houses where style = "&type"; quit; %let type = CONDO; data three; merge one (in = in1) two (in = in2); by num; proc print data = houses; A. B. C. D.

proc sql; create table three as select one.num, char1, char2 from one full join two on one.num = two.num; quit; D.proc sql; create table three as select coalesce(one.num, two.

9 A.proc print data = sasdata.sales; by date; B.proc print data = sasdata.sales; where month(date) = 3; C.data march; set sasdata.sales; if '01mar2002'd < date < '31mar2002'd; D.data march; set sasdata.sales; where date < '31mar2002'd or revenue > 50000;

10 proc univariate data=question; var Q1;; class Q2class Q4; proc import out=question datafile= sheet= dbms=;

11 OPTIONS NOXWAIT NOXSYNC; EXCEL DATA _NULL_; X "START EXCEL"; X = SLEEP(5); FILENAME format DDE 'EXCEL SYSTEM'; DATA _NULL_; FILE format; PUT '[FORMAT.NUMBER("@")]'; FILENAME xls DDE "EXCEL SHEET1!R1C1" NOTAB; DATA _NULL_; FILE xls; PUT '102'; FILENAME super DDE 'EXCEL SYSTEM'; DATA _NULL_; FILE super; PUT '[SELECT("R1C1")]'; PUT '[FONT.PROPERTIES("ARIAL","BOLD",8,0,1,0,0,0,1,0,0,1,3,1)]'; PROC MIGRATE IN=inlib OUT=outlib KEEPNODUPKEY; LIBNAME alib "c: a"; LIBNAME blib "c: b"; DATECOPY PROC COPY IN=alib OUT=blib DATECOPY;

R1C1" NOTAB; DATA _NULL_; FILE xls; PUT '102'; FILENAME super DDE 'EXCEL SYSTEM'; DATA _NULL_; FILE super; PUT '[SELECT("R1C1")]';

12 ... $_Stream= END [_EOF_] DATA trans; INPUT name $; DATALINES; ; RUN PROC SQL NOPRINT; SELECT QUOTE(TRIM(LEFT(name))) INTO :list SEPARATED BY ' ' FROM trans; QUIT; DATA master; INPUT name $; DATALINES; ; PRINT PROC PRINT DATA=master; WHERE name IN (&list); PROC PRINTTO LOG="c: temp test.log"; DATA _NULL_; PROC PRINTTO LOG=LOG; DATA _NULL_; INFILE "c: temp test.log" LRECL=200 PAD; INPUT MSG $CHAR200.; PUT MSG; DATA sample; INPUT d1; FORMAT d1 COMMA10.2; CARDS; Excel PROC EXPORT DATA=sample OUTFILE='c: temp sample1.txt' DBMS=TAB REPLACE; Excel PROC SQL;

(&list); PROC PRINTTO LOG="c: temp test.log"; DATA _NULL_; PROC PRINTTO LOG=LOG; DATA _NULL_; INFILE "c: temp test.log" LRECL=200 PAD; INPUT MSG $CHAR200.

13 CREATE VIEW work.sample_view AS SELECT PUT(d1, COMMA10.2) AS d1 FROM sample; QUIT; PROC EXPORT DATA=work.sample_view OUTFILE='c: temp sample2.xls' DBMS=EXCEL REPLACE; DDE Excel sheet Excel [ ] [ ] SAS [ ] [ ] [DDE ] DDE Cntl + C Cntl+ V DDE Program Editor FILENAME excl DDE 'Excel [Book1]Sheet1!R1C1:R3C2';!DDE DATA _NULL_; SET sample; FILE excl; PUT d1 :COMMA10.2; PROC FREQ DATA=one NOPRINT; TABLES row*col /OUTEXPECT SPARSE OUT=out; WEIGHT count; WARNING DATA flag; SET out END=eof; IF EXPECTED < 5 THEN less+1; IF eof THEN DO; ratio=less / _N_; IF ratio > 0.20 THEN flag=1; ELSE flag=0; OUTPUT; END; KEEP ratio flag; PROC REG DATA=sashelp.class; MODEL weight height=age; OUTPUT OUT=out R=r_w r_h; QUIT;

DDE DATA _NULL_; SET sample; FILE excl; PUT d1 :COMMA10.

14 SAS Training

16 Spring 2009 TEL: FAX:

Microsoft Word - sample_adv-programming.docx

Microsoft Word - sample_adv-programming.docx サンプル問題以下のサンプル問題は包括的ではなく必ずしも試験を構成するすべての種類の問題を表すとは限りません問題は個人が認定試験を受ける準備ができているかどうかを評価するためのものではありません SAS Advanced Programming for SAS 9 問題 1 次の SAS データセット ONE と TWO があります proc sql; select one.*, sales