天天看点

SAS的SQL过程(SQL Procedure in SAS)(四)

9.创建索引

创建索引时,索引的名字必须与表中所建索引的列名相同。另外,当索引唯一时,加入关键字unique。可以在多个列上创建复合索引(composite index)。

创建索引格式如下

CREATE <UNIQUE> INDEX index-name ON table-name(column-name, column-name);

注:(1)可以基于数值型或字符型列创建索引。

(2)在同一个列名上不必创建两个索引。

(3)若预先对要创建索引的表排序,可提高索引的性能。

(4)复合索引名不能与列名相同。

下述例子创建了基于EmpID的索引,并且不允许有重复ID。

Proc sql;

Create unique index EmpID

On airline.payrollmaster(EmpID);

创建复合索引:

proc sql;

create unique index daily

on airline.marchflights(FlightNumber, Date);

10.修改表

使用Proc SQL 能够

(1) 修改数据值

(2) 增加行到一个表或视图

(3) 删除行

(4) 修改表的列属性

(5) 增加新列到一个表

(6) 删除列

(7) 删除整个表,视图或索引

(1)更新数据值

UPDATE table-name

SET column-name=expression,

SET column-name=expression,

Where expression;

例如

proc sql;

update sirline.payrollmaster

set Salary=Salary*

Case when substr(JobCode,3,1)= ’ 1’ then 1.05

When substr(jobCode,3,1)= ’ 2 ’ then 1.10

When substr(JobCode,3,1)= ’ 3’ then 1.15

Else 1.08

End;

(2)插入数据到表或视图

INSERT INTO table-name

SET column-name=value,…

INSERT INTO table-name <(column list)>

VALUE (value,value,…);

INSERT INTO table-name<(column list)>

SELECT columns from table-name

(3)删除行

DELETE RROM table-name

WHERE expression;

(4)修改列

一般形式如下:

ALTER TABLE table-name

ADD column-definition, column-definition,…

DROP column-name, column-name,…

MODEIFY column-definition, column-definition, …

例1.增加列

proc sql;

alter table airline.payrollmaster

add Bonus num format=comma10.2

Level char(3);

例2.删除列

proc sql;

alter table airline.payrollmaster

drop DestinationType;

例3.修改列的属性

proc sql;

alter table airline.payrollmaster

modify Bonus num format=comma8.2,

Level char(1)

Label=’ Employee Level’;

(5) 删除表,索引和视图

一般形式如下:

DROP TABLE table-name, table-name,…;

DROP VIEW view-name, view-name,…;

DROP INDEX index-name, index-name, …

From table-name;

更新视图的例子:

创建视图:proc sql;

create view airline.raise as

select EmpID, JobCode, Salary, Salary/12 as MonthlySalary format=dollar12.

From airline.payrollmaster;

更新视图

proc slq;

update airline.raise

set Salary=Salary*1.20

where JobCode=’ PT3’;

11.Proc SQL 与宏

一个简单的将宏嵌入Proc SQL的例子如下:

%let datasetname=payrollmaster;

%let bigsalary=100000;

select *

from airline.&datasetname

where Salary>&bigsalary;

等价于

select *

from airline.payrollmaster

where Salary>100000;

Proc SQL能够使用INTO子句创建或更新宏变量。使用形式有3种:

方法1 在elect表达式中使用into关键字

SELECT col1, col2, …

INTO : mvar1, :mvar2,…

FROM …

注意:此种方式仅对宏变量赋给查询结果的的第一行的值。

例如,下述例子将雇员的平均值赋给一个宏变量后,再查询出薪水大于平均值的雇员。

%let code=NA1;

select avg(Salary) into :mean

from airline.payrollmaster

where JobCode=’ &code’;

reset print;

title1 “&code Employee Earning Above-Average Salaries”;

title2 “Average Salary for &code Employees Is &mean”;

select *

from airline.payrollmaster

where Salary>&mean and

JobCode=”&code”;

方法2 将查询结果的前n个结果赋给n个宏变量

SELECT a,b,…

INTO :a1- :an, :b1- :bn

FROM …

例如,按类统计有多少个飞行员

reset noprint;

select MemberType, count(*) as Frequency

into :memtype1-:memtype3,

:freq1-:freq3

from airline.frequentflyers

group by MemberType;

%put Member types: &memtype1 &memtype2 &memtype3;

%put Frequencies: &freq1 &freq2 &freq3;

方法3 将所有查询结果,以分隔符分隔开,赋给某个宏变量

其形式为

SELECT col1,col2, …

INTO :macrovar1, :macrovar2, …

SEPARATED BY ’ delimiter’

FROM…

例如

select distinct Destination

into :airportcodes

separated by ’ ’

from airline.internationalflights;

%put &airportcodes;

系统宏变量有

SQLOBS 记录输出或删除的行数

SQLRC 保留每条SQL语句返回的代码

SQLOOPS 保留SQL语句中循环的次数

例如,写一条宏,将州代号作为参量,创建一个保留此洲的雇员的表,显示此表的前10条记录。

%macro state(st);

proc sql;

create table &st as

select LastName, FirstName

from airline.staffmaster

where State=”&st”;

%put NOTE: The table &st has &sqlobs rows. ;

title “&st Employee”;

%if &sqlobs>10 %then %do;

%put NOTE: only the first 10 rows are displayed;

title2 “NOTE : only 10 rows are displayed. “

reset outobs=10;

%end;

select * from &st;

quit;

%mend state;

调用宏:

%state(NY)

12 程序测试与性能

PROC SQL的参数设置可以测试SQL程序,评价其性能。

EXEC|NOEXEC 控制所提交的SQL是否执行。

NOSTIMER|STIMER 在SAS LOG中报告对每和SQL性能的统计

NOERRORSTOP|ERRORSTOP 错误发生后,PROC SQL进入语法检查模式。

例如下述语句显示SELECT *中所缩写的列名,但并不执行其查询。

%let datasetname=payrollmaster;

proc sql

feedback

noexec;

select *

from airline.&datasetname ;

转载于:https://www.cnblogs.com/zgw21cn/archive/2008/08/22/1274167.html