158 lines
4.2 KiB
HTML
158 lines
4.2 KiB
HTML
<h2>Comments</h2>
|
||
<pre><code>/* This is a
|
||
multi-line comment */
|
||
|
||
* This is a comment too;</code></pre>
|
||
|
||
<h2>Numbers, dates and times</h2>
|
||
<pre><code>42; 4.5; 4.5e-10; -3; -3.5e2; -4.2e-23;
|
||
0afx; 0123x; abcdefx;
|
||
'1jan2013'd; '01jan09'd;
|
||
'9:25't; '9:25:19pm't;
|
||
'01may12:9:30:00'dt; '18jan2003:9:27:05am'dt;
|
||
'2013-05-17T09:15:30–05:00'dt; '2013-05-17T09:15:30–05'dt;
|
||
'2013-07-20T12:00:00+00:00'dt; '2013-07-20T12:00:00Z'dt;</code></pre>
|
||
|
||
<h2>Strings</h2>
|
||
<pre><code>'Single quoted string';
|
||
"Double quoted string";
|
||
'String ''quoted'' string "containing" quote';
|
||
"Double ""quoted"" string 'containing' quote";</code></pre>
|
||
|
||
<h2>Operators</h2>
|
||
<pre><code>A**B;
|
||
'foo'||'bar'!!'baz'¦¦'test';
|
||
A<>B><C;
|
||
A~=B¬=C^=D>=E<=F;
|
||
a*b/c+d-e<f>g&h|i!j¦k;
|
||
~a;¬b;^c;
|
||
(a eq b) ne (c gt d) lt e ge f le h;
|
||
state in ('NY','NJ','PA');
|
||
not a;</code></pre>
|
||
|
||
<h2>More examples</h2>
|
||
<pre><code>/* Some examples adapted from the documentation (http://support.sas.com/documentation/cdl/en/basess/64003/PDF/default/basess.pdf) */
|
||
|
||
data city; * another inline comment;
|
||
|
||
input Year 4. @7 ServicesPolice comma6.
|
||
@15 ServicesFire comma6. @22 ServicesWater_Sewer comma6.
|
||
@30 AdminLabor comma6. @39 AdminSupplies comma6.
|
||
@45 AdminUtilities comma6.;
|
||
ServicesTotal=ServicesPolice+ServicesFire+ServicesWater_Sewer;
|
||
AdminTotal=AdminLabor+AdminSupplies+AdminUtilities;
|
||
Total=ServicesTotal+AdminTotal;
|
||
|
||
Test='A string '' whith a quote';
|
||
Test2 = "A string "" whith a quote";
|
||
|
||
label Total='Total Outlays'
|
||
ServicesTotal='Services: Total'
|
||
ServicesPolice='Services: Police'
|
||
ServicesFire='Services: Fire'
|
||
ServicesWater_Sewer='Services: Water & Sewer'
|
||
AdminTotal='Administration: Total'
|
||
AdminLabor='Administration: Labor'
|
||
AdminSupplies='Administration: Supplies'
|
||
AdminUtilities='Administration: Utilities';
|
||
datalines;
|
||
1993 2,819 1,120 422 391 63 98
|
||
1994 2,477 1,160 500 172 47 70
|
||
1995 2,028 1,061 510 269 29 79
|
||
1996 2,754 893 540 227 21 67
|
||
1997 2,195 963 541 214 21 59
|
||
1998 1,877 926 535 198 16 80
|
||
1999 1,727 1,111 535 213 27 70
|
||
2000 1,532 1,220 519 195 11 69
|
||
2001 1,448 1,156 577 225 12 58
|
||
2002 1,500 1,076 606 235 19 62
|
||
2003 1,934 969 646 266 11 63
|
||
2004 2,195 1,002 643 256 24 55
|
||
2005 2,204 964 692 256 28 70
|
||
2006 2,175 1,144 735 241 19 83
|
||
2007 2,556 1,341 813 238 25 97
|
||
2008 2,026 1,380 868 226 24 97
|
||
2009 2,526 1,454 946 317 13 89
|
||
2010 2,027 1,486 1,043 226 . 82
|
||
2011 2,037 1,667 1,152 244 20 88
|
||
2012 2,852 1,834 1,318 270 23 74
|
||
2013 2,787 1,701 1,317 307 26 66
|
||
;
|
||
proc datasets library=work nolist
|
||
;
|
||
contents data=city
|
||
;
|
||
run;
|
||
|
||
|
||
data city3;
|
||
set city(firstobs=10 obs=15);
|
||
run;
|
||
|
||
data services (keep=ServicesTotal ServicesPolice ServicesFire
|
||
ServicesWater_Sewer)
|
||
admin (keep=AdminTotal AdminLabor AdminSupplies
|
||
AdminUtilities);
|
||
set city(drop=Total);
|
||
run;
|
||
proc print data=services;
|
||
title 'City Expenditures: Services';
|
||
run;
|
||
|
||
data newlength;
|
||
set mylib.internationaltours;
|
||
length Remarks $ 30;
|
||
if Vendor = 'Hispania' then Remarks = 'Bonus for 10+ people';
|
||
else if Vendor = 'Mundial' then Remarks = 'Bonus points';
|
||
else if Vendor = 'Major' then Remarks = 'Discount for 30+ people';
|
||
run;
|
||
proc print data=newlength;
|
||
var Country Vendor Remarks;
|
||
title 'Information About Vendors';
|
||
run;
|
||
|
||
libname mylib 'permanent-data-library';
|
||
data mylib.departures;
|
||
input Country $ 1-9 CitiesInTour 11-12 USGate $ 14-26
|
||
ArrivalDepartureGates $ 28-48;
|
||
datalines;
|
||
Japan 5 San Francisco Tokyo, Osaka
|
||
Italy 8 New York Rome, Naples
|
||
Australia 12 Honolulu Sydney, Brisbane
|
||
Venezuela 4 Miami Caracas, Maracaibo
|
||
Brazil 4 Rio de Janeiro, Belem
|
||
;
|
||
proc print data=mylib.departures;
|
||
title 'Data Set AIR.DEPARTURES';
|
||
run;
|
||
|
||
data missingval;
|
||
length Country $ 10 TourGuide $ 10;
|
||
input Country TourGuide;
|
||
* lines is an alias for datalines;
|
||
lines;
|
||
Japan Yamada
|
||
Italy Militello
|
||
Australia Edney
|
||
Venezuela .
|
||
Brazil Cardoso
|
||
;
|
||
|
||
data inventory_tool;
|
||
input PartNumber $ Description $ InStock @17
|
||
ReceivedDate date9. @27 Price;
|
||
format ReceivedDate date9.;
|
||
* cards is an alias for datalines;
|
||
cards;
|
||
K89R seal 34 27jul2010 245.00
|
||
M4J7 sander 98 20jun2011 45.88
|
||
LK43 filter 121 19may2011 10.99
|
||
MN21 brace 43 10aug2012 27.87
|
||
BC85 clamp 80 16aug2012 9.55
|
||
NCF3 valve 198 20mar2012 24.50
|
||
KJ66 cutter 6 18jun2010 19.77
|
||
UYN7 rod 211 09sep2010 11.55
|
||
JD03 switch 383 09jan2013 13.99
|
||
BV1E timer 26 03aug2013 34.50
|
||
;
|
||
run;</code></pre> |