P						| Color type P,D, or N
\sj_StdColor := <<gfore>> + (<<gback>> Shl 4);	| CLS color
\sj_ClrScr;					| Clear Screen
\sj_BoxColor := <<fore>> + (<<back>> Shl 4);	| Box color 1
\sj_ClearBoxYN := True; 			| Box color 2
sj_Box(<<r1>>,<<c1>>,<<r2>>,<<c2>>,		| Draw Box
\sj_DoubleBox); 				| If Double
\sj_SingleBox); 				| If Single
\sj_StdColor := <<fore>> + (<<back>> Shl 4);	| Say Color 1
#						| Say Color 2
\sj_Say(<<r1>>,<<c1>>, '<<var>>');              | Say Text
#						| Say Char
sj_SayStr(<<r1>>,<<c1>>, <<var>>, <<width>>,	| Say String
&\sj_SayDate(<<r1>>,<<c1>>, <<var>>);		| Say Date
#						| Say Byte
#						| Say Integer
#						| Say Long
sj_SayNum(<<r1>>,<<c1>>, <<var>>, <<width>>, <<dec>>,	   | Say Real
&\sj_SayLogical(<<r1>>,<<c1>>, <<var>>);	| Say Logical
\ '<<var>>');                                   | With Say Picture
\ '');                                          | Without Say Picture
#						| With Say Picture Alt
#						| Without Say Picture Alt
\sj_EnhColor := <<fore>> + (<<back>> Shl 4);	| Get Color 1
\sj_HiColor := <<fore>> + (<<back>> Shl 4);	| Get Color 2
#						| Get Char
sj_GetStr(<<r1>>,<<c1>>, <<var>>, <<width>>,	| Get String
&\sj_GetDate(<<r1>>,<<c1>>, <<var>>);		| Get Date
#						| Get Byte
#						| Get Integer
#						| Get Long
sj_GetNum(<<r1>>,<<c1>>, <<var>>, <<width>>, <<dec>>,	   | Get Real
&\sj_GetLogical(<<r1>>,<<c1>>, <<var>>);	| Get Logical
\ '<<var>>');                                   | With Get Picture
\ '');                                          | Without Get Picture
#						| With Get Picture Alt
#						| Without Get Picture Alt
\sj_Range('<<v1>>','<<v2>>');                   | With Range
#						| Without Range
\sj_PreFieldTrigger(@<<var>>);			| With PreField
#						| Without PreField
\sj_Valid(@<<var>>);				| With Valid
#						| Without Valid
END-OF-FILE