|
7
|
1 " Vim syntax file
|
|
|
2 " Language: SAS
|
|
|
3 " Maintainer: James Kidd <james.kidd@covance.com>
|
|
|
4 " Last Change: 02 Jun 2003
|
|
|
5 " Added highlighting for additional keywords and such;
|
|
|
6 " Attempted to match SAS default syntax colors;
|
|
|
7 " Changed syncing so it doesn't lose colors on large blocks;
|
|
|
8 " Much thanks to Bob Heckel for knowledgeable tweaking.
|
|
|
9 " For version 5.x: Clear all syntax items
|
|
|
10 " For version 6.x: Quit when a syntax file was already loaded
|
|
|
11 if version < 600
|
|
|
12 syntax clear
|
|
|
13 elseif exists("b:current_syntax")
|
|
|
14 finish
|
|
|
15 endif
|
|
|
16
|
|
|
17 syn case ignore
|
|
|
18
|
|
|
19 syn region sasString start=+"+ skip=+\\\\\|\\"+ end=+"+
|
|
|
20 syn region sasString start=+'+ skip=+\\\\\|\\"+ end=+'+
|
|
|
21
|
|
|
22 " Want region from 'cards;' to ';' to be captured (Bob Heckel)
|
|
|
23 syn region sasCards start="^\s*CARDS.*" end="^\s*;\s*$"
|
|
|
24 syn region sasCards start="^\s*DATALINES.*" end="^\s*;\s*$"
|
|
|
25
|
|
|
26 syn match sasNumber "-\=\<\d*\.\=[0-9_]\>"
|
|
|
27
|
|
|
28 syn region sasComment start="/\*" end="\*/" contains=sasTodo
|
|
|
29 " Ignore misleading //JCL SYNTAX... (Bob Heckel)
|
|
|
30 syn region sasComment start="[^/][^/]/\*" end="\*/" contains=sasTodo
|
|
|
31
|
|
|
32 " Allow highlighting of embedded TODOs (Bob Heckel)
|
|
|
33 syn match sasComment "^\s*\*.*;" contains=sasTodo
|
|
|
34
|
|
|
35 " Allow highlighting of embedded TODOs (Bob Heckel)
|
|
|
36 syn match sasComment ";\s*\*.*;"hs=s+1 contains=sasTodo
|
|
|
37
|
|
|
38 " Handle macro comments too (Bob Heckel).
|
|
|
39 syn match sasComment "^\s*%*\*.*;" contains=sasTodo
|
|
|
40
|
|
|
41 " This line defines macro variables in code. HiLink at end of file
|
|
|
42 " defines the color scheme. Begin region with ampersand and end with
|
|
|
43 " any non-word character offset by -1; put ampersand in the skip list
|
|
|
44 " just in case it is used to concatenate macro variable values.
|
|
|
45
|
|
|
46 " Thanks to ronald höllwarth for this fix to an intra-versioning
|
|
|
47 " problem with this little feature
|
|
|
48
|
|
|
49 if version < 600
|
|
|
50 syn region sasMacroVar start="\&" skip="[_&]" end="\W"he=e-1
|
|
|
51 else " for the older Vim's just do it their way ...
|
|
|
52 syn region sasMacroVar start="&" skip="[_&]" end="\W"he=e-1
|
|
|
53 endif
|
|
|
54
|
|
|
55
|
|
|
56 " I dont think specific PROCs need to be listed if use this line (Bob Heckel).
|
|
|
57 syn match sasProc "^\s*PROC \w\+"
|
|
|
58 syn keyword sasStep RUN QUIT DATA
|
|
|
59
|
|
|
60
|
|
|
61 " Base SAS Procs - version 8.1
|
|
|
62
|
|
|
63 syn keyword sasConditional DO ELSE END IF THEN UNTIL WHILE
|
|
|
64
|
|
|
65 syn keyword sasStatement ABORT ARRAY ATTRIB BY CALL CARDS CARDS4 CATNAME
|
|
|
66 syn keyword sasStatement CONTINUE DATALINES DATALINES4 DELETE DISPLAY
|
|
|
67 syn keyword sasStatement DM DROP ENDSAS ERROR FILE FILENAME FOOTNOTE
|
|
|
68 syn keyword sasStatement FORMAT GOTO INFILE INFORMAT INPUT KEEP
|
|
|
69 syn keyword sasStatement LABEL LEAVE LENGTH LIBNAME LINK LIST LOSTCARD
|
|
|
70 syn keyword sasStatement MERGE MISSING MODIFY OPTIONS OUTPUT PAGE
|
|
|
71 syn keyword sasStatement PUT REDIRECT REMOVE RENAME REPLACE RETAIN
|
|
|
72 syn keyword sasStatement RETURN SELECT SET SKIP STARTSAS STOP TITLE
|
|
|
73 syn keyword sasStatement UPDATE WAITSAS WHERE WINDOW X SYSTASK
|
|
|
74
|
|
|
75 " Keywords that are used in Proc SQL
|
|
|
76 " I left them as statements because SAS's enhanced editor highlights
|
|
|
77 " them the same as normal statements used in data steps (Jim Kidd)
|
|
|
78
|
|
|
79 syn keyword sasStatement ADD AND ALTER AS CASCADE CHECK CREATE
|
|
|
80 syn keyword sasStatement DELETE DESCRIBE DISTINCT DROP FOREIGN
|
|
|
81 syn keyword sasStatement FROM GROUP HAVING INDEX INSERT INTO IN
|
|
|
82 syn keyword sasStatement KEY LIKE MESSAGE MODIFY MSGTYPE NOT
|
|
|
83 syn keyword sasStatement NULL ON OR ORDER PRIMARY REFERENCES
|
|
|
84 syn keyword sasStatement RESET RESTRICT SELECT SET TABLE
|
|
|
85 syn keyword sasStatement UNIQUE UPDATE VALIDATE VIEW WHERE
|
|
|
86
|
|
|
87
|
|
|
88 syn match sasStatement "FOOTNOTE\d" "TITLE\d"
|
|
|
89
|
|
|
90 syn match sasMacro "%BQUOTE" "%NRBQUOTE" "%CMPRES" "%QCMPRES"
|
|
|
91 syn match sasMacro "%COMPSTOR" "%DATATYP" "%DISPLAY" "%DO"
|
|
|
92 syn match sasMacro "%ELSE" "%END" "%EVAL" "%GLOBAL"
|
|
|
93 syn match sasMacro "%GOTO" "%IF" "%INDEX" "%INPUT"
|
|
|
94 syn match sasMacro "%KEYDEF" "%LABEL" "%LEFT" "%LENGTH"
|
|
|
95 syn match sasMacro "%LET" "%LOCAL" "%LOWCASE" "%MACRO"
|
|
|
96 syn match sasMacro "%MEND" "%NRBQUOTE" "%NRQUOTE" "%NRSTR"
|
|
|
97 syn match sasMacro "%PUT" "%QCMPRES" "%QLEFT" "%QLOWCASE"
|
|
|
98 syn match sasMacro "%QSCAN" "%QSUBSTR" "%QSYSFUNC" "%QTRIM"
|
|
|
99 syn match sasMacro "%QUOTE" "%QUPCASE" "%SCAN" "%STR"
|
|
|
100 syn match sasMacro "%SUBSTR" "%SUPERQ" "%SYSCALL" "%SYSEVALF"
|
|
|
101 syn match sasMacro "%SYSEXEC" "%SYSFUNC" "%SYSGET" "%SYSLPUT"
|
|
|
102 syn match sasMacro "%SYSPROD" "%SYSRC" "%SYSRPUT" "%THEN"
|
|
|
103 syn match sasMacro "%TO" "%TRIM" "%UNQUOTE" "%UNTIL"
|
|
|
104 syn match sasMacro "%UPCASE" "%VERIFY" "%WHILE" "%WINDOW"
|
|
|
105
|
|
|
106 " SAS Functions
|
|
|
107
|
|
|
108 syn keyword sasFunction ABS ADDR AIRY ARCOS ARSIN ATAN ATTRC ATTRN
|
|
|
109 syn keyword sasFunction BAND BETAINV BLSHIFT BNOT BOR BRSHIFT BXOR
|
|
|
110 syn keyword sasFunction BYTE CDF CEIL CEXIST CINV CLOSE CNONCT COLLATE
|
|
|
111 syn keyword sasFunction COMPBL COMPOUND COMPRESS COS COSH CSS CUROBS
|
|
|
112 syn keyword sasFunction CV DACCDB DACCDBSL DACCSL DACCSYD DACCTAB
|
|
|
113 syn keyword sasFunction DAIRY DATE DATEJUL DATEPART DATETIME DAY
|
|
|
114 syn keyword sasFunction DCLOSE DEPDB DEPDBSL DEPDBSL DEPSL DEPSL
|
|
|
115 syn keyword sasFunction DEPSYD DEPSYD DEPTAB DEPTAB DEQUOTE DHMS
|
|
|
116 syn keyword sasFunction DIF DIGAMMA DIM DINFO DNUM DOPEN DOPTNAME
|
|
|
117 syn keyword sasFunction DOPTNUM DREAD DROPNOTE DSNAME ERF ERFC EXIST
|
|
|
118 syn keyword sasFunction EXP FAPPEND FCLOSE FCOL FDELETE FETCH FETCHOBS
|
|
|
119 syn keyword sasFunction FEXIST FGET FILEEXIST FILENAME FILEREF FINFO
|
|
|
120 syn keyword sasFunction FINV FIPNAME FIPNAMEL FIPSTATE FLOOR FNONCT
|
|
|
121 syn keyword sasFunction FNOTE FOPEN FOPTNAME FOPTNUM FPOINT FPOS
|
|
|
122 syn keyword sasFunction FPUT FREAD FREWIND FRLEN FSEP FUZZ FWRITE
|
|
|
123 syn keyword sasFunction GAMINV GAMMA GETOPTION GETVARC GETVARN HBOUND
|
|
|
124 syn keyword sasFunction HMS HOSTHELP HOUR IBESSEL INDEX INDEXC
|
|
|
125 syn keyword sasFunction INDEXW INPUT INPUTC INPUTN INT INTCK INTNX
|
|
|
126 syn keyword sasFunction INTRR IRR JBESSEL JULDATE KURTOSIS LAG LBOUND
|
|
|
127 syn keyword sasFunction LEFT LENGTH LGAMMA LIBNAME LIBREF LOG LOG10
|
|
|
128 syn keyword sasFunction LOG2 LOGPDF LOGPMF LOGSDF LOWCASE MAX MDY
|
|
|
129 syn keyword sasFunction MEAN MIN MINUTE MOD MONTH MOPEN MORT N
|
|
|
130 syn keyword sasFunction NETPV NMISS NORMAL NOTE NPV OPEN ORDINAL
|
|
|
131 syn keyword sasFunction PATHNAME PDF PEEK PEEKC PMF POINT POISSON POKE
|
|
|
132 syn keyword sasFunction PROBBETA PROBBNML PROBCHI PROBF PROBGAM
|
|
|
133 syn keyword sasFunction PROBHYPR PROBIT PROBNEGB PROBNORM PROBT PUT
|
|
|
134 syn keyword sasFunction PUTC PUTN QTR QUOTE RANBIN RANCAU RANEXP
|
|
|
135 syn keyword sasFunction RANGAM RANGE RANK RANNOR RANPOI RANTBL RANTRI
|
|
|
136 syn keyword sasFunction RANUNI REPEAT RESOLVE REVERSE REWIND RIGHT
|
|
|
137 syn keyword sasFunction ROUND SAVING SCAN SDF SECOND SIGN SIN SINH
|
|
|
138 syn keyword sasFunction SKEWNESS SOUNDEX SPEDIS SQRT STD STDERR STFIPS
|
|
|
139 syn keyword sasFunction STNAME STNAMEL SUBSTR SUM SYMGET SYSGET SYSMSG
|
|
|
140 syn keyword sasFunction SYSPROD SYSRC SYSTEM TAN TANH TIME TIMEPART
|
|
|
141 syn keyword sasFunction TINV TNONCT TODAY TRANSLATE TRANWRD TRIGAMMA
|
|
|
142 syn keyword sasFunction TRIM TRIMN TRUNC UNIFORM UPCASE USS VAR
|
|
|
143 syn keyword sasFunction VARFMT VARINFMT VARLABEL VARLEN VARNAME
|
|
|
144 syn keyword sasFunction VARNUM VARRAY VARRAYX VARTYPE VERIFY VFORMAT
|
|
|
145 syn keyword sasFunction VFORMATD VFORMATDX VFORMATN VFORMATNX VFORMATW
|
|
|
146 syn keyword sasFunction VFORMATWX VFORMATX VINARRAY VINARRAYX VINFORMAT
|
|
|
147 syn keyword sasFunction VINFORMATD VINFORMATDX VINFORMATN VINFORMATNX
|
|
|
148 syn keyword sasFunction VINFORMATW VINFORMATWX VINFORMATX VLABEL
|
|
|
149 syn keyword sasFunction VLABELX VLENGTH VLENGTHX VNAME VNAMEX VTYPE
|
|
|
150 syn keyword sasFunction VTYPEX WEEKDAY YEAR YYQ ZIPFIPS ZIPNAME ZIPNAMEL
|
|
|
151 syn keyword sasFunction ZIPSTATE
|
|
|
152
|
|
|
153 " Handy settings for using vim with log files
|
|
|
154 syn keyword sasLogMsg NOTE
|
|
|
155 syn keyword sasWarnMsg WARNING
|
|
|
156 syn keyword sasErrMsg ERROR
|
|
|
157
|
|
|
158 " Always contained in a comment (Bob Heckel)
|
|
|
159 syn keyword sasTodo TODO TBD FIXME contained
|
|
|
160
|
|
|
161 " These don't fit anywhere else (Bob Heckel).
|
|
|
162 syn match sasUnderscore "_NULL_"
|
|
|
163 syn match sasUnderscore "_INFILE_"
|
|
|
164 syn match sasUnderscore "_N_"
|
|
|
165 syn match sasUnderscore "_WEBOUT_"
|
|
|
166 syn match sasUnderscore "_NUMERIC_"
|
|
|
167 syn match sasUnderscore "_CHARACTER_"
|
|
|
168 syn match sasUnderscore "_ALL_"
|
|
|
169
|
|
|
170 " End of SAS Functions
|
|
|
171
|
|
|
172 " Define the default highlighting.
|
|
|
173 " For version 5.7 and earlier: only when not done already
|
|
|
174 " For version 5.8 and later: only when an item doesn't have highlighting yet
|
|
|
175
|
|
|
176 if version >= 508 || !exists("did_sas_syntax_inits")
|
|
|
177 if version < 508
|
|
|
178 let did_sas_syntax_inits = 1
|
|
|
179 command -nargs=+ HiLink hi link <args>
|
|
|
180 else
|
|
|
181 command -nargs=+ HiLink hi def link <args>
|
|
|
182 endif
|
|
|
183
|
|
|
184 " Default sas enhanced editor color syntax
|
|
|
185 hi sComment term=bold cterm=NONE ctermfg=Green ctermbg=Black gui=NONE guifg=DarkGreen guibg=White
|
|
|
186 hi sCard term=bold cterm=NONE ctermfg=Black ctermbg=Yellow gui=NONE guifg=Black guibg=LightYellow
|
|
|
187 hi sDate_Time term=NONE cterm=bold ctermfg=Green ctermbg=Black gui=bold guifg=SeaGreen guibg=White
|
|
|
188 hi sKeyword term=NONE cterm=NONE ctermfg=Blue ctermbg=Black gui=NONE guifg=Blue guibg=White
|
|
|
189 hi sFmtInfmt term=NONE cterm=NONE ctermfg=LightGreen ctermbg=Black gui=NONE guifg=SeaGreen guibg=White
|
|
|
190 hi sString term=NONE cterm=NONE ctermfg=Magenta ctermbg=Black gui=NONE guifg=Purple guibg=White
|
|
|
191 hi sText term=NONE cterm=NONE ctermfg=White ctermbg=Black gui=bold guifg=Black guibg=White
|
|
|
192 hi sNumber term=NONE cterm=bold ctermfg=Green ctermbg=Black gui=bold guifg=SeaGreen guibg=White
|
|
|
193 hi sProc term=NONE cterm=bold ctermfg=Blue ctermbg=Black gui=bold guifg=Navy guibg=White
|
|
|
194 hi sSection term=NONE cterm=bold ctermfg=Blue ctermbg=Black gui=bold guifg=Navy guibg=White
|
|
|
195 hi mDefine term=NONE cterm=bold ctermfg=White ctermbg=Black gui=bold guifg=Black guibg=White
|
|
|
196 hi mKeyword term=NONE cterm=NONE ctermfg=Blue ctermbg=Black gui=NONE guifg=Blue guibg=White
|
|
|
197 hi mReference term=NONE cterm=bold ctermfg=White ctermbg=Black gui=bold guifg=Blue guibg=White
|
|
|
198 hi mSection term=NONE cterm=NONE ctermfg=Blue ctermbg=Black gui=bold guifg=Navy guibg=White
|
|
|
199 hi mText term=NONE cterm=NONE ctermfg=White ctermbg=Black gui=bold guifg=Black guibg=White
|
|
|
200
|
|
|
201 " Colors that closely match SAS log colors for default color scheme
|
|
|
202 hi lError term=NONE cterm=NONE ctermfg=Red ctermbg=Black gui=none guifg=Red guibg=White
|
|
|
203 hi lWarning term=NONE cterm=NONE ctermfg=Green ctermbg=Black gui=none guifg=Green guibg=White
|
|
|
204 hi lNote term=NONE cterm=NONE ctermfg=Cyan ctermbg=Black gui=none guifg=Blue guibg=White
|
|
|
205
|
|
|
206
|
|
|
207 " Special hilighting for the SAS proc section
|
|
|
208
|
|
|
209 HiLink sasComment sComment
|
|
|
210 HiLink sasConditional sKeyword
|
|
|
211 HiLink sasStep sSection
|
|
|
212 HiLink sasFunction sKeyword
|
|
|
213 HiLink sasMacro mKeyword
|
|
|
214 HiLink sasMacroVar NonText
|
|
|
215 HiLink sasNumber sNumber
|
|
|
216 HiLink sasStatement sKeyword
|
|
|
217 HiLink sasString sString
|
|
|
218 HiLink sasProc sProc
|
|
|
219 " (Bob Heckel)
|
|
|
220 HiLink sasTodo Todo
|
|
|
221 HiLink sasErrMsg lError
|
|
|
222 HiLink sasWarnMsg lWarning
|
|
|
223 HiLink sasLogMsg lNote
|
|
|
224 HiLink sasCards sCard
|
|
|
225 " (Bob Heckel)
|
|
|
226 HiLink sasUnderscore PreProc
|
|
|
227 delcommand HiLink
|
|
|
228 endif
|
|
|
229
|
|
|
230 " Syncronize from beginning to keep large blocks from losing
|
|
|
231 " syntax coloring while moving through code.
|
|
|
232 syn sync fromstart
|
|
|
233
|
|
|
234 let b:current_syntax = "sas"
|
|
|
235
|
|
|
236 " vim: ts=8
|
