/L20"FOCUS" Line Comment = -* String Chars = ' File Extensions = FEX
/Delimiters = !^*+()=|;"',
/Function String = "%[a-zA-Z_]*)[~;]"
/C1"Reserved Words"
A ABS ACCESS ACROSS ADD AFTER AGAIN ALL ANALYSE AND ANOVA AS ASNAMES ASQ AVE  
B BACK BIN BINS BY 
C1 C2 C3 CASE CDN CHANGE CHECK CLEAR CNT CO COLUMN COLUMNS COLUMN-TOTAL COMBINE COMPILE COMPUTE CONTAINS CONTINUE CORRE COUNT CREATE CRTFORM CT  
DBA DECODE DECRYPT DEFINE DEL DELETE DIS DISK DISPLAY DMTY DMY DMYY DUPL 
ECHO EDIT ELSE ENCRYPT END ENDCASE ENDREPEAT EO1 EO2 EO3 EQ EX EXCEEDS EXCLUDES EXEC EXIT EXITREPEAT EXPLAIN EXSMO  
FACTO FI FILE FIN FINISH FIXFORM FML FOCUS FOOTING FOR FORM FORMAT FREEFORM FROM FST  
GE GOTO GRAPH GT GTREND  
HEADING HIST HOLD  
I IF IN INCLUDE INCLUDES INDEX INIT INPUT INT INTO INVALID IS 
IS-LESS-THAN IS-MORE-THAN IS-NOT  
JOIN JUMP 
LAST LE LET LINES LINK LIST LOC LOCATE LOCATION LOG LST LT  
MAINTAIN MARK MATCH MATCH/NOMATCH MAX MDISC MDY MDYY MIN MISSING MODIFY MOVE MSG MT MTDY MULTR 
N NE NEW NEW-OR-OLD NEW-NOR-OLD NEW-NOT-OLD NEXT NOMATCH NOPRINT NOR NOT NOTOTAL  
OFF OFFLINE OLD OLD-OR-NEW OLD-NOT-NEW OLD-NOR-NEW OM OMITS ON ONLINE 
OR OVER 
PAGE PAGE-BREAK PANEL PASS PAUSE PCT PERFORM PICKUP PIE POLRG POST PRINT PROMPT  
QUIT  
RANKED READLIMIT REBUILD RECAP RECOMPUTE RECORDLIMIT RECTYP RECTYPE REORG REPEAT REPLACE REPLOT RESTRICT RETYPE ROW ROWS ROW-TOTAL RPCT RUN
SAVB SAVE SCAN SEG SEGMENT SEGNAME SET SHOW 
SKIP-LINE  
SQRT ST STATSET STOR STORE SUBFOOT SUBHEAD SUBTOTAL  
SUB-TOTAL  
SUM SUMMARIZE SUPPRINT  
TABLE TABLEF TED TEMP THEN TLOCATE TO TOP TOT TOTAL TRACE TYPE  
UNDERLINE UP UPDATE USAGE  
USE USER  
VALIDATE 
WITH WITHIN WRITE  
X1 X2 X3 XFER  
Y YMD YMTD YYMD  
/C2"DM System Variables"
&ACCEPTS
&BASEIO
&CHNGD
&CURSOR
&DATE
&ECHO
&FOCCPU &FOCDISORG &FOCERRNUM &FOCEXTTRM &FOCFIELDNAME &FOCFOCEXEC &FOCINCLUDE &FOCMODE &FOCPRINT &FOCPUTLVL &FOCQUALCHAR &FOCREL &FOCSBORDER &FOCSYSTYP &FOCTMPDSK
&FOCTRMSD &FOCTRMSW &FORTRMTYP &FOCTTIME &FOCVTIME &FORMAT 
&HIPERFOCUS
&INPUT &INVALID &IORETURN
&LINES
&MDY &MDYY 
&NOMATCH
&PFKEY
&QUIT
&READS &RECORDS &REJECTS &RETCODE
&STACK
&TOD &TRANS
&WINDOWNAME &WINDOWVALUE
&YMD &YYMD
/C3"DM Statements"
-CMS -CLOSE -CRTCLEAR -CRTFORM
-DEFAULTS
-EXIT
-GOTO
-IF -INCLUDE
-MVS
-PASS -PROMPT
-QUIT
-READ -REPEAT -RUN
-SET
-TSO -TYPE
-WINDOW -WRITE
-?
TSO
MVS
CMS
/C4"Field Formats"
** /A
** /D
** /F
** /I
// /DMY /DMYY
// /MDY /MDYY
// /YMD /YYMD
