Global: ^%ZIS(2

FileMan FileNo	FileMan Filename	Package
3.2	TERMINAL TYPE	Kernel

Package	Total	Routines
Kernel	29	%ZIS %ZIS2 %ZIS3 %ZIS4 %ZIS5 %ZIS6 %ZISC %ZISP %ZISS CONTROL CODES XQ21 XQH1 XQH2 XQUSR XU8P440 XU8P585 XUDHGUI XUDHSET XUINEND XUINP348 XUINPCH XUINZIS XUS5 ZISX ^%ZIS(2 XUS1 ZIS4 ^%ZIS(3.22 ^DIC(3
Controlled Substances	13	PSDLBL0 PSDLBL1 PSDLBL2 PSDLBL3 PSDLBL5 PSDLBLI PSDLBLP PSDLBLR0 PSDLBLR2 PSDPGS1 PSDRPGS2 PSDUP2 PSDUP3
Outpatient Pharmacy	9	PSOLBL PSOLLL7 PSOLLLH PSOLLLHN PSOLLLI PSOLLU2 PSOLLU3 PSOLLU4 PSOLSET
Third Party Tracking	7	ABPAAGEL ABPALBII ABPAMLBL ABPAPRT ABPAVAR ABPVPRT ABPVVAR
Contract Health Management Information System	6	ACHSC6P ACHSCHLG ACHSEOB2 ACHSFU ACHSPS16 ACHSTCK1
Inpatient Medications	6	PSIVALN PSIVALNC PSIVHYPL PSIVHYPR PSIVLABL PSIVLABR
IHS Changes To Pharmacy	5	APSAPPIM APSPLBL APSPSLBL APSPSOB APSQPMI
Lab Service	5	LRHYBL1 LRHYBLD LRKDIFF LRKUR LRPARAM
Alcohol Chemical Dependency	4	ACD ACDCINV2 ACDCSD ACDDE2
IHS Changes To Lab	4	BLRAG10 BLRAGUT BLRLM BLRLMR
Order Entry Results Reporting	4	ORPRS01 ORWRP ORWU ORWU16
PCC Medical Query	4	AMQQ AMQQMGR5 AMQQRML AMQQSEC
Registration	4	DGPLBL DGPTF1 DGPWBD DGRPV
Third Party Billing	4	ABMDLBLA ABMDR16 ABMDRCPI ABMVDF
Auto Replenishment Ward Stock	3	PSGWPI PSGWPI1 PSGWPIS
Barcode Medication Administration	3	PSBOBLU PSBOBZ PSBRPC1
Dietetics	3	FHASS FHDEV FHZVARS
IHS Accounts Receivable	3	BAR277LM BARLN0 BARVDF
IHS VA Utilities	3	XBLM XBVDF XBVIDEO
NCR Financial System	3	AFSHCK1 AFSHCRTS AFSHTCK1
CMOP	2	PSXRPPL PSXSRP
Commitment Register	2	ACRFLM ACRFMENU
Diabetes Registry	2	BDMFLM BDMFMENU
IHS Patient Registration	2	AG AGVDF
Local Area Programs	2	AZAMWRN AZANWRN
MailMan	2	XMC1B XMCD
Nursing Acuity	2	ANSMENU ANSU
Toolkit	2	XTLATSET ZTEDIT2
Utilities	2	AUCLS AULOCATE
3780 Telecommunications	1	AFSTCK1
Automated Lab Instruments	1	LAKUR
CIA Utilities	1	CIAUHFS
CPT Files	1	ACPTVDF
Case Management System	1	ACMED
ClassMan	1	KLASHOW
Contracts and Grants	1	ACGSMENU
Emergency Room	1	AMERUTIL
IHS Changes To ADT	1	ADGVAR
IHS Changes To Scheduling	1	BSDFORM
IHS Dental System	1	ADEXBLM
IHS Emergency Dept Dashboard	1	BEDDADM
IHS GPRA Information System	1	BGPXBLM
IHS Generic Interface System	1	INHUT8
IHS Immunizations Interface	1	BYIMIMM6
Immunization Tracking	1	BIVT100
Patient Care Component	1	APCDVAR
Patient Care Component Reports	1	APCLSRT2
Pharmacy Point of Sale	1	ABSPMHDR
Phoenix	1	BZXPTMSG
Radiology Nuclear Medicine	1	RABAR
Scheduling	1	SDAMU
Supply	1	ASUUHDG
VA Fileman	1	DDGLIB0
VueCentric Framework	1	CIAVUTIO

Package	Total	Routines
Controlled Substances	3	PSDTER PSDTER1 PSDTER2
Outpatient Pharmacy	3	PSOB PSOBGMG1 PSOBMST
Patient Registration GUI	2	AGGRFCE AGGRPRT
iCare	2	BQIRFCE BQIWHPRF
ClassMan	1	KLASHOW
Clinical Reminders	1	PXRMHOST
Lab Service	1	LRHYAFT
Order Entry Results Reporting	1	ORCPOST
Text Integration Utility	1	TIUPS139

Package	Total	FileMan Files
Kernel	3	DEVICE(#3.5)[3, 23] LINE/PORT ADDRESS(#3.23)[3] NEW PERSON(#200)[9.3, 8983.13]
Automated Information Collection System	1	ENCOUNTER FORM PRINTERS(#357.94)[.01]
IHS Changes To Lab	1	IHS SCHEDULING PARAMETERS(#9009020.2)[.13]
Registration	1	MAS PARAMETERS(#43)[#43.077(.01)]

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!(X'?1.2U1"-".UNP) X` LAST EDITED: `MAR 10, 1989` HELP-PROMPT: `Answer must be 1-2 uppercase, 1 "-", 1-27 characters. (3-30 char.)` DESCRIPTION: `Name should be in following form:` C- for video terminals PK- for printers with keyboards P- for printers without keyboards M- for modems NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `3.2^B` 1)= S ^%ZIS(2,"B",$E(X,1,30),DA)="" 2)= K ^%ZIS(2,"B",$E(X,1,30),DA)
.02	SELECTABLE AT SIGN-ON	0;2	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `AUG 24, 1989` HELP-PROMPT: `Is this an acceptable terminal type to choose at sign-on.` DESCRIPTION: This field is used to screan the choices that can be made at the DEVICE TYPE question during sign-on.
1	RIGHT MARGIN	1;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>256)!(X<0)!(X?.E1"."1N.N) X` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 0 AND 256` DESCRIPTION: This is the number of characters wide this device is.
2	FORM FEED	1;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `D CHECK^%ZISS1,FORM^%ZISS1 K:$L(X)>70!($L(X)<1) X` HELP-PROMPT: `ARGUMENT OF MUMPS 'WRITE' TO CLEAR SCREEN OR GO TO TOP-OF-PAGE` DESCRIPTION: The argument of a MUMPS WRITE statement that will set the top-of-form for the use of tractor-feed paper on a printer, or will clear the screen of a video display terminal.
3	PAGE LENGTH	1;3	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>65534)!(X<3)!(X?.E1"."1.N) X` LAST EDITED: `NOV 25, 2008` HELP-PROMPT: `Type a number between 3 and 65534, 0 Decimal Digits` DESCRIPTION: This is the number of usable lines on the output device.
4	BACK SPACE	1;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>9!($L(X)<1) X` LAST EDITED: `OCT 03, 1985` HELP-PROMPT: `ANSWER MUST BE 1-9 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement which will cause the cursor to Back-Space.
5	*OLD XY CRT	1;5	MUMPS	INPUT TRANSFORM: `D CHECK1^%ZISS1 K:$L(X)>100!($L(X)<2) X D ^DIM:$D(X)` LAST EDITED: `JUN 05, 1990` HELP-PROMPT: `ANSWER MUST BE 2-100 CHARACTERS IN LENGTH` DESCRIPTION: This is the Xecutable MUMPS code which places the cursor at a XY location. WRITE AUTHORITY: @ UNEDITABLE NOTES: `TRIGGERED by the XY CRT field of the TERMINAL TYPE File`
5.2	XY CRT	XY;E1,245	MUMPS	INPUT TRANSFORM: `D CHECK1^%ZISS1 K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `JUN 05, 1990` HELP-PROMPT: `This is Standard MUMPS code.` DESCRIPTION: This is the Xecutable MUMPS code which places the cursor at a XY location. WRITE AUTHORITY: @ CROSS-REFERENCE: `^^TRIGGER^3.2^5` 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(2,D0,1)):^(1),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV S X=DIV X ^DD(3.2,5.2,1,1,1.4) 1.4)= S DIH=$S($D(^%ZIS(2,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,5)=DIV,DIH=3.2,DIG=5 D ^DICR:$O(^DD(DIH,DIG,1,0))>0 2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(2,D0,1)):^(1),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X="" S DIH=$S($D(^%ZIS(2,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,5)=DIV,DIH=3.2,DIG=5 D ^DICR:$O(^DD(DIH,DIG,1,0)) >0 3)= FOR DATA CONVERSION CREATE VALUE)= #5.2 DELETE VALUE)= @ FIELD)= #5 This is a temporary trigger to phase out the old xy crt field.
6	OPEN EXECUTE	2;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` HELP-PROMPT: `XECUTABLE MUMPS CODE` DESCRIPTION: This is the Xecutable MUMPS code which is used by %ZIS to OPEN the terminal. WRITE AUTHORITY: @
6.1	OPEN EXECUTE DESCRIPTION	W6;0	WORD-PROCESSING #3.206
7	CLOSE EXECUTE	3;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` HELP-PROMPT: `XECUTABLE MUMPS CODE` DESCRIPTION: This is the Xecutable MUMPS code which is used to CLOSE the terminal, i.e. X ^%ZIS("C"). WRITE AUTHORITY: @
8	ONLINE CHECK	4;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` HELP-PROMPT: `XECUTABLE MUMPS CODE` DESCRIPTION: This is the Xecutable MUMPS code which is used by %ZIS during the OPENing of the terminal to see if the device is On-Line. WRITE AUTHORITY: @
10	10 PITCH	5;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>25 X` LAST EDITED: `FEB 10, 1984` HELP-PROMPT: `ARGUMENT OF MUMPS 'WRITE' TO SET DEVICE TO 10 CHARACTERS PER INCH DISPLAY` DESCRIPTION: The argument of a MUMPS WRITE statement that will set a printer to 10 pitch. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
12	12 PITCH	5;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>25 X` LAST EDITED: `FEB 10, 1984` HELP-PROMPT: `ARGUMENT OF MUMPS 'WRITE' TO SET DEVICE TO 12 CHARACTERS PER INCH` DESCRIPTION: The argument of a MUMPS WRITE statement that will set a printer to 12 pitch. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
12.1	16 PITCH	12.1;E1,250	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>25 X` LAST EDITED: `FEB 10, 1984` HELP-PROMPT: `ARGUMENT OF MUMPS 'WRITE' TO SET DEVICE TO 16 CHARACTERS PER INCH DISPLAY` DESCRIPTION: The argument of a MUMPS WRITE statement that will set a printer to 16 pitch. WRITE AUTHORITY: @ NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
12.11	DEFAULT PITCH	12.11;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will set a printer to a default pitch. WRITE AUTHORITY: @
12.12	X PITCH	12.12;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will use the value in the variable X to set the characters per inch display of a printer. WRITE AUTHORITY: @
12.13	6 LINES PER INCH	12.13;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will set a printer to 6 lines per inch. WRITE AUTHORITY: @
12.14	8 LINES PER INCH	12.14;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will set the printer to 8 lines per inch. WRITE AUTHORITY: @
12.15	DEFAULT LINES PER INCH	12.15;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will set the printer to the default lines per inch. WRITE AUTHORITY: @
12.16	X LINES PER INCH	12.16;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will use the value in the variable X to set the lines per inch. WRITE AUTHORITY: @
12.2	QUALITY 0	12.2;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 21, 1989` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on a specific letter quality mode of a printer.
12.3	QUALITY 1	12.2;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 21, 1989` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on a specific letter quality mode of a printer.
12.4	QUALITY 2	12.2;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<3) X` LAST EDITED: `NOV 21, 1989` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on a specific letter quality mode of a printer.
13	HOME CURSOR	5;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will move the cursor to the Home position of this terminal. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
14	REVERSE VIDEO ON	5;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn ON reverse video on a CRT. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
15	REVERSE VIDEO OFF	5;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn OFF reverse video on a CRT. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
16	ERASE TO END OF LINE	5;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement which will erase from the cursor to the end of the line on a CRT. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
17	ERASE TO END OF PAGE	5;7	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement which will erase from the cursor to the end of the page on a CRT. Doing a HOME CURSOR followed by an ERASE TO END OF PAGE will erase the entire display. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
18	BLINK ON	5;8	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement which will turn ON blinking for a CRT. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
19	BLINK OFF	5;9	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement which will turn OFF blinking for a CRT. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
20	RESET	6;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>12!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-12 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will RESET the device.
20.5	SGR ATTRIBUTES OFF	6;8	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<1) X` LAST EDITED: `JUL 26, 1989` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `This is an argument of a MUMPS WRITE statement that will turn off all attributes of SELECT GRAPHIC RENDITION.` Some of the attributes of SELECT GRAPHIC RENDITION are o Bold or increased intensity o Underscore o Blink o Negative(reverse) image
21	HALF UP	6;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>12!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-12 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will move the print head one-half line up (for superscripts).
22	HALF DOWN	6;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>12!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-12 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will move the print head one-half line down (for subscripts).
23	UNDERLINE ON	6;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn ON underlineing. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
24	UNDERLINE OFF	6;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn OFF underlining. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
25	REVERSE LINE FEED	6;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20 X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ARGUMENT OF MUMPS 'WRITE' TO MOVE PRINTER UP ONE LINE` DESCRIPTION: The argument of a MUMPS WRITE statement that will set the terminal to reverse line feed mode. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
26	PROPORTIONAL SPACING	6;7	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on proportional spacing for a printer. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
27	HIGH INTENSITY (BOLD)	7;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ARGUMENT OF A MUMPS 'WRITE' COMMAND` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn ON high intensity for a CRT. This is also used to hold the code to set a printer to BOLD or emphasize print. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
28	LOW INTENSITY (UNBOLD)	7;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ARGUMENT OF A MUMPS 'WRITE' COMMAND` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn ON low intensity for a CRT. This is also used to hold the code to set a printer to REGULAR print. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
29	NORMAL INTENSITY (RESET)	7;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 30, 1986` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will return a CRT to its NORMAL (default) intensity. If a printer were set to BOLD, this code would reset the printer to its default setting.
30	INSERT MODE	7;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 16, 1988` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate insert mode.
31	REPLACE MODE	7;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 16, 1988` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate replace mode.
32	ERASE FROM BEG OF PAGE	13;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate erasing from the beginning of the page.
33	ERASE ENTIRE PAGE	13;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate erasing the entire page.
34	ERASE FROM BEG OF LINE	13;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate erasing from the beginning of a line.
35	ERASE ENTIRE LINE	13;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate erasing the entire line.
36	ERASE CHARACTER	13;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate erasing of a single character.
37	ERASE FIELD	13;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>40!($L(X)<2) X` LAST EDITED: `JUL 31, 1989` HELP-PROMPT: `Answer must be 2-40 characters in length.` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate the erasing of a field given the length of the field in varariable X.
40	CURSOR UP	8;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate upward movement of the cursor. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
41	CURSOR DOWN	8;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate downward movement of the cursor. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
42	CURSOR RIGHT	8;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate cursor movement to the right. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
43	CURSOR LEFT	8;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate cursor movement to the left. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
44	ARROW KEY STRING LENGTH	8;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>3)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUN 01, 1987` HELP-PROMPT: `TYPE A WHOLE NUMBER BETWEEN 1 AND 3` DESCRIPTION: The value that should be entered into this field should be the number of characters produced by depressing an arrow key.
45	DELETE LINE	8;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate deletion of an entire line. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
46	INSERT LINE	8;7	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate insertion of an entire line. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
47	DELETE CHAR.	8;8	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will indicate deletion of a single character. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
48	INSERT CHAR.	8;9	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `MAY 24, 1989` HELP-PROMPT: `ANSWER MUST BE 2-20 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of MUMPS WRITE statement that will indicate insertion of a single character. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
49	CURSOR ON	8.1;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `NOV 09, 1993` HELP-PROMPT: `Answer must be 2-20 characters in length.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
49.1	CURSOR OFF	8.1;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `NOV 09, 1993` HELP-PROMPT: `Answer must be 2-20 characters in length.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
50	MODEM DIAL LOGIC	50;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `FEB 07, 1984` HELP-PROMPT: `Executable code to dial the modem` DESCRIPTION: `This is Xecutable MUMPS code which is used whenever MailMan needs to dial a modem. The variable XMPHONE holds the number to be dialed. The variable ER is 0 if the modem dialed successfully; is 1 otherwise. The variable` Y, if defined, holds a message about the dial operation, i.e. busy, no answer, etc. WRITE AUTHORITY: @
51	MODEM HANG UP LOGIC	51;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `FEB 07, 1984` HELP-PROMPT: `This is Standard MUMPS code.` DESCRIPTION: This is Xecutable MUMPS code which is used whenever MailMan needs to hang up a modem. Variable ER=0 if sucessful, =1 if not. WRITE AUTHORITY: @
52	MODEM STATUS LOGIC	52;E1,200	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-200 CHARACTERS IN LENGTH` DESCRIPTION: `This is Xecutable MUMPS code which is used whenever MailMan needs to check the status of a Modem. The variable Y holds the response. This logic is used by the network diagnostics menu only, and need not be defined if the` modem has no self-checking status mode. WRITE AUTHORITY: @
55	CONTROL CODES	55;0	Multiple #3.2055	3.2055
60	BAR CODE ON	BAR1;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `ANSWER MUST BE 2-245 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on bar code printing mode of a device. WRITE AUTHORITY: @
61	BAR CODE OFF	BAR0;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `ANSWER MUST BE 2-245 CHARACTERS IN LENGTH` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn off bar code printing mode of a device. WRITE AUTHORITY: @
62	RESERVED	BARX;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-245 CHARACTERS IN LENGTH` DESCRIPTION: This field is reserved for additional bar code specifications. WRITE AUTHORITY: @
65	SUBSCRIPT ON	SUB1;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on SUBSCRIPT on the printer WRITE AUTHORITY: @
65.1	SUBSCRIPT OFF	SUB0;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn off SUBSCRIPT on the printer WRITE AUTHORITY: @
65.2	SUPERSCRIPT ON	SPR1;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn on SUPERSCRIPT on the printer. WRITE AUTHORITY: @
65.3	SUPERSCRIPT OFF	SPR0;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn off SUPERSCRIPT on the printer. WRITE AUTHORITY: @
66	ITALICS ON	I1;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn on ITALICS on the printer. WRITE AUTHORITY: @
67	ITALICS OFF	I0;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn ITALICS on the printer. WRITE AUTHORITY: @
67.21	COLOR ON	CLR1;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 1-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn on COLOR on the printer.
67.22	COLOR OFF	CLR0;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 1-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn off COLOR on the printer.
68	GRAPHICS ON	G1;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn on GRAPHICS mode on the printer. WRITE AUTHORITY: @
69	GRAPHICS OFF	G0;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to turn off GRAPHICS mode on the printer. WRITE AUTHORITY: @
69.11	TOP LEFT CORNER	G;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the TOP LEFT CORNER part of a window in graphics mode.
69.12	BOTTOM LEFT CORNER	G;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the BOTTOM LEFT CORNER of a window in graphics mode.
69.13	TOP RIGHT CORNER	G;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the TOP RIGHT CORNER of a window in graphics mode.
69.14	BOTTOM RIGHT CORNER	G;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the BOTTOM RIGHT CORNER of a window in graphics mode.
69.2	MIDDLE T	G;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the graphics T character that joins a four box window at the middle.
69.3	TOP T	G;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the TOP middle of a four box window.
69.4	BOTTOM T	G;7	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the BOTTOM middle of a four box window.
69.5	LEFT T	G;8	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the LEFT middle of a four box window.
69.6	RIGHT T	G;9	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the RIGHT middle of a four box window.
69.7	VERTICAL LINE	G;10	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to that produce the VERTICAL LINE in graphics mode.
69.8	HORIZONTAL LINE	G;11	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X` LAST EDITED: `MAY 05, 1991` HELP-PROMPT: `Answer must be 3-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to produce the HORIZONTAL LINE in graphics mode.
70	INDEX	14;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the argument of a MUMPS WRITE statement that will cause the active position to move downward one line without changing column position. If the active position is at the bottom of the screen, a scroll up is` performed.
71	REVERSE INDEX	14;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will cause the active position to move up by one. If the cursor is at the top of the screen, a scroll down is performed.
72	SAVE CURSOR	14;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will save the current cursor position.
73	RESTORE CURSOR	14;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will restore the cursor position.
74	NEXT LINE	14;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will transfer the cursor position to the next line.
75	AUTO WRAP ON	15;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will cause characters to wrap to the next line when the right margin has been exceeded.
76	AUTO WRAP OFF	15;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will cause truncation of text that exceeds the right margin limit.
77	AUTO REPEAT ON	15;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `AUG 17, 1989` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will cause characters to automatically repeat when keys are depressed and held in the down position.
78	AUTO REPEAT OFF	15;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `AUG 17, 1989` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will disable repeat mode.
79	KEYPAD APPLICATION MODE	15;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `AUG 17, 1989` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will toggle the keypad into application mode.
79.1	KEYPAD NUMERIC MODE	15;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `AUG 17, 1989` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This the argument of a MUMPS WRITE statement that will toggle the keypad into numeric mode.
80	TAB SET	16;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will set a value for the tab function.
81	TAB CLEAR	16;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will clear the settings of tabs.
82	CLEAR ALL TABS	16;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will clear all tab settings.
83	SET TOP & BOTTOM MARGINS	16;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `AUG 17, 1989` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will set the top and bottom margins of the scrolling region of a display terminal.
85	DOUBLE HIGH DOUBLE WIDE TOP	17;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the argument of a MUMPS WRITE statement that will display the top half portion of the current line with each character at double height and double wide. This argument must be used in pairs with DOUBLE HIGH DOUBLE` WIDE BOTTOM on adjacent lines with the same character output.
86	DOUBLE HIGH DOUBLE WIDE BOTTOM	17;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the argument of a MUMPS WRITE statement that will display the bottom half portion of the current line with each character at double height and double wide. This argument must be used in pairs with DOULBE HIGH` DOUBLE WIDE TOP on adjacent lines with the same character output.
87	SINGLE HIGH DOUBLE WIDE	17;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement that will display each character on the current line at a character size of double wide.
88	SINGLE HIGH SINGLE WIDE	17;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `MAY 23, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: This is the argument of a MUMPS WRITE statement to restore the display of characters to the normal width on a single line.
99	DESCRIPTION	9;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<6) X` LAST EDITED: `APR 18, 1984` HELP-PROMPT: `ANSWER MUST BE 6-80 CHARACTERS IN LENGTH` DESCRIPTION: This is a brief description of this type of terminal.
102	ANSWERBACK LOGIC	102;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `MAR 02, 1984` HELP-PROMPT: `MUMPS CODE THAT WILL SET $T SWITCH 'TRUE' IF DEVICE IS ONLINE` DESCRIPTION: This is Xecutable MUMPS code which will set the $T switch to "TRUE" (i.e. 1) if this terminal is On-Line. WRITE AUTHORITY: @
110	OPEN PRINTER PORT	10;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `JUL 30, 1985` HELP-PROMPT: `Mumps code to open printer port` DESCRIPTION: This is Xecutable MUMPS code which will OPEN the terminal's printer port. WRITE AUTHORITY: @
110.1	OPEN PRINTER DESCRIPTION	W110;0	WORD-PROCESSING #3.207
111	CLOSE PRINTER PORT	11;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `JUL 30, 1985` HELP-PROMPT: `Mumps code to close the printer port.` DESCRIPTION: This is Xecutable MUMPS code which will CLOSE this terminal's printer port. WRITE AUTHORITY: @
112	PRINT SCREEN	PRT;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>40!($L(X)<2) X` LAST EDITED: `SEP 06, 1989` HELP-PROMPT: `Answer must be 2-40 characters in length.` DESCRIPTION: The argument of a MUMPS write statement used to print the screen display onto a slaved printer.
120	KP0	18;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `JUN 22, 1990` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement used to generate the same escape sequence produced by depressing the '0' key of the keypad.
121	KP1	18;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `JUN 22, 1990` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '1' key on the keypad.
122	KP2	18;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '2' key on the keypad.
123	KP3	18;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '3' key on the keypad.
124	KP4	18;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '4' key on the keypad.
125	KP5	18;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '5' key on the keypad.
126	KP6	18;7	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '6' key on the keypad.
127	KP7	18;8	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '7' key on the keypad.
128	KP8	18;9	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '8' key on the keypad.
129	KP9	18;10	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '9' key on the keypad.
130	PF1	19;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` LAST EDITED: `JUN 22, 1990` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF1' key on the keypad.
131	PF2	19;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF2' key on the keypad.
132	PF3	19;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF3' key on the keypad.
133	PF4	19;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF4' key on the keypad.
134	MINUS	19;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '-' key on the keypad.
135	COMMA	19;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the ',' key on the keypad.
136	ENTER	19;7	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'ENTER' key on the keypad.
137	PERIOD	19;8	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-20 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '1' key on the keypad.
140	FIND	20;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUN 22, 1990` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'FIND' key on the keyboard.
141	SELECT	20;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUN 22, 1990` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'SELECT' key on the keyboard.
142	INSERT HERE	20;3	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'INSERT HERE' key on the keyboard.
143	REMOVE	20;4	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'REMOVE' key on the keyboard.
144	PREV SCREEN	20;5	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PREV SCRN' key on the keyboard.
145	NEXT SCREEN	20;6	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'NEXT SCRN' key on the keyboard.
146	HELP	21;1	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUN 22, 1990` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'HELP' key on the keyboard.
147	DO	21;2	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'DO' key on the keyboard.
200	DEFAULT FONT TITLE	200;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Name of the default font.
201	DEFAULT FONT CODE	201;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on the default font. WRITE AUTHORITY: @
202	FONT NUMBER 1 TITLE	202;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Name of font #1
203	FONT NUMBER 1 CODE	203;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on the specified font. WRITE AUTHORITY: @
204	FONT NUMBER 2 TITLE	204;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Name of font #2
205	FONT NUMBER 2 CODE	205;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on the specified font. WRITE AUTHORITY: @
206	FONT NUMBER 3 TITLE	206;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Name of font #3
207	FONT NUMBER 3 CODE	207;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on the specified font. WRITE AUTHORITY: @
208	FONT NUMBER 4 TITLE	208;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Name of font #4
209	FONT NUMBER 4 CODE	209;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on the specified font. WRITE AUTHORITY: @
210	FONT NUMBER 5 TITLE	210;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: Name of font #5
211	FONT NUMBER 5 CODE	211;E1,245	FREE TEXT	INPUT TRANSFORM: `D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X` LAST EDITED: `OCT 18, 1990` HELP-PROMPT: `Answer must be 2-245 characters in length.` DESCRIPTION: The argument of a MUMPS WRITE statement that will turn on the specified font. WRITE AUTHORITY: @
1001	SIMPLEX	1001;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: `The argument of a MUMPS WRITE command used to set a printer into SIMPLEX, or printing only on the first side of the page. This field is only applicable for terminal types with a duplex printing feature such as the HP` LaserJet 4 Si printers purchased by MCCR for print of encounter forms.
1002	DUPLEX, LONG EDGE BINDING	1001;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This should be used when printing double sided forms that will be bound at the side such as forms to be put in a binder.
1003	DUPLEX, SHORT EDGE BINDING	1001;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUN 14, 1995` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: This should be used when printing double sided forms that will be bound at the top, such as forms to be put in a medical record.
1925	SYNONYM	SY;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>9!($L(X)<1) X` LAST EDITED: `OCT 02, 1984` HELP-PROMPT: `ANSWER MUST BE 1-9 CHARACTERS IN LENGTH` DESCRIPTION: This is a synonym for the name of this type of terminal. CROSS-REFERENCE: `3.2^B^MNEMONIC` 1)= S ^%ZIS(2,"B",$E(X,1,30),DA)=1 2)= K ^%ZIS(2,"B",$E(X,1,30),DA) Since this cross-reference is also a B cross-reference, the alternate name should not be the same name as the #.01 NAME field. If they are set the same, then a change in one could affect the cross-reference of the other.

Field #

Name

Loc

Type

Details

.01

NAME

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!(X'?1.2U1"-".UNP) X
LAST EDITED: MAR 10, 1989
HELP-PROMPT: Answer must be 1-2 uppercase, 1 "-", 1-27 characters. (3-30 char.)

DESCRIPTION: Name should be in following form:

C-    for video terminals

PK-   for printers with keyboards

P-    for printers without keyboards

M-    for modems

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 3.2^B

1)= S ^%ZIS(2,"B",$E(X,1,30),DA)=""

2)= K ^%ZIS(2,"B",$E(X,1,30),DA)

.02

SELECTABLE AT SIGN-ON

0;2

SET

'0' FOR NO;
'1' FOR YES;

LAST EDITED: AUG 24, 1989
HELP-PROMPT: Is this an acceptable terminal type to choose at sign-on.

DESCRIPTION:

This field is used to screan the choices that can be made at the DEVICE TYPE question during sign-on.

1

RIGHT MARGIN

1;1

NUMBER

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:+X'=X!(X>256)!(X<0)!(X?.E1"."1N.N) X
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 0 AND 256

DESCRIPTION:

This is the number of characters wide this device is.

2

FORM FEED

1;2

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: D CHECK^%ZISS1,FORM^%ZISS1 K:$L(X)>70!($L(X)<1) X
HELP-PROMPT: ARGUMENT OF MUMPS 'WRITE' TO CLEAR SCREEN OR GO TO TOP-OF-PAGE

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set the top-of-form for the use of tractor-feed paper on a printer, or will clear the screen of a video display terminal.

3

PAGE LENGTH

1;3

NUMBER

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:+X'=X!(X>65534)!(X<3)!(X?.E1"."1.N) X
LAST EDITED: NOV 25, 2008
HELP-PROMPT: Type a number between 3 and 65534, 0 Decimal Digits

DESCRIPTION:

This is the number of usable lines on the output device.

4

BACK SPACE

1;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>9!($L(X)<1) X
LAST EDITED: OCT 03, 1985
HELP-PROMPT: ANSWER MUST BE 1-9 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement which will cause the cursor to Back-Space.

5

*OLD XY CRT

1;5

MUMPS

INPUT TRANSFORM: D CHECK1^%ZISS1 K:$L(X)>100!($L(X)<2) X D ^DIM:$D(X)
LAST EDITED: JUN 05, 1990
HELP-PROMPT: ANSWER MUST BE 2-100 CHARACTERS IN LENGTH

DESCRIPTION:

This is the Xecutable MUMPS code which places the cursor at a XY location.

WRITE AUTHORITY:  @

UNEDITABLE

NOTES: TRIGGERED by the XY CRT field of the TERMINAL TYPE File

5.2

XY CRT

XY;E1,245

MUMPS

INPUT TRANSFORM: D CHECK1^%ZISS1 K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: JUN 05, 1990
HELP-PROMPT: This is Standard MUMPS code.

DESCRIPTION:

This is the Xecutable MUMPS code which places the cursor at a XY location.

WRITE AUTHORITY:  @

CROSS-REFERENCE: ^^TRIGGER^3.2^5

1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(2,D0,1)):^(1),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV S X=DIV X ^DD(3.2,5.2,1,1,1.4)

1.4)= S DIH=$S($D(^%ZIS(2,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,5)=DIV,DIH=3.2,DIG=5 D ^DICR:$O(^DD(DIH,DIG,1,0))>0

2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^%ZIS(2,D0,1)):^(1),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X="" S DIH=$S($D(^%ZIS(2,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,5)=DIV,DIH=3.2,DIG=5 D ^DICR:$O(^DD(DIH,DIG,1,0))

>0

3)= FOR DATA CONVERSION

CREATE VALUE)= #5.2

DELETE VALUE)= @

FIELD)= #5

This is a temporary trigger to phase out the old xy crt field.

6

OPEN EXECUTE

2;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
HELP-PROMPT: XECUTABLE MUMPS CODE

DESCRIPTION:

This is the Xecutable MUMPS code which is used by %ZIS to OPEN the terminal.

WRITE AUTHORITY:  @

6.1

OPEN EXECUTE DESCRIPTION

W6;0

WORD-PROCESSING #3.206

7

CLOSE EXECUTE

3;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
HELP-PROMPT: XECUTABLE MUMPS CODE

DESCRIPTION:

This is the Xecutable MUMPS code which is used to CLOSE the terminal, i.e. X ^%ZIS("C").

WRITE AUTHORITY:  @

8

ONLINE CHECK

4;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
HELP-PROMPT: XECUTABLE MUMPS CODE

DESCRIPTION:

This is the Xecutable MUMPS code which is used by %ZIS during the OPENing of the terminal to see if the device is On-Line.

WRITE AUTHORITY:  @

10

10 PITCH

5;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>25 X
LAST EDITED: FEB 10, 1984
HELP-PROMPT: ARGUMENT OF MUMPS 'WRITE' TO SET DEVICE TO 10 CHARACTERS PER INCH DISPLAY

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set a printer to 10 pitch.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

12

12 PITCH

5;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>25 X
LAST EDITED: FEB 10, 1984
HELP-PROMPT: ARGUMENT OF MUMPS 'WRITE' TO SET DEVICE TO 12 CHARACTERS PER INCH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set a printer to 12 pitch.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

12.1

16 PITCH

12.1;E1,250

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>25 X
LAST EDITED: FEB 10, 1984
HELP-PROMPT: ARGUMENT OF MUMPS 'WRITE' TO SET DEVICE TO 16 CHARACTERS PER INCH DISPLAY

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set a printer to 16 pitch.

WRITE AUTHORITY:  @

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

12.11

DEFAULT PITCH

12.11;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set a printer to a default pitch.

WRITE AUTHORITY:  @

12.12

X PITCH

12.12;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will use the value in the variable X to set the characters per inch display of a printer.

WRITE AUTHORITY:  @

12.13

6 LINES PER INCH

12.13;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set a printer to 6 lines per inch.

WRITE AUTHORITY:  @

12.14

8 LINES PER INCH

12.14;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set the printer to 8 lines per inch.

WRITE AUTHORITY:  @

12.15

DEFAULT LINES PER INCH

12.15;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set the printer to the default lines per inch.

WRITE AUTHORITY:  @

12.16

X LINES PER INCH

12.16;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will use the value in the variable X to set the lines per inch.

WRITE AUTHORITY:  @

12.2

QUALITY 0

12.2;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<3) X
LAST EDITED: NOV 21, 1989
HELP-PROMPT: Answer must be 3-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on a specific letter quality mode of a printer.

12.3

QUALITY 1

12.2;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<3) X
LAST EDITED: NOV 21, 1989
HELP-PROMPT: Answer must be 3-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on a specific letter quality mode of a printer.

12.4

QUALITY 2

12.2;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<3) X
LAST EDITED: NOV 21, 1989
HELP-PROMPT: Answer must be 3-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on a specific letter quality mode of a printer.

13

HOME CURSOR

5;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will move the cursor to the Home position of this terminal.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

14

REVERSE VIDEO ON

5;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn ON reverse video on a CRT.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

15

REVERSE VIDEO OFF

5;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn OFF reverse video on a CRT.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

16

ERASE TO END OF LINE

5;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement which will erase from the cursor to the end of the line on a CRT.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

17

ERASE TO END OF PAGE

5;7

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement which will erase from the cursor to the end of the page on a CRT. Doing a HOME CURSOR followed by an ERASE TO END OF PAGE will erase the entire display.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

18

BLINK ON

5;8

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement which will turn ON blinking for a CRT.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

19

BLINK OFF

5;9

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement which will turn OFF blinking for a CRT.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

20

RESET

6;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>12!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-12 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will RESET the device.

20.5

SGR ATTRIBUTES OFF

6;8

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<1) X
LAST EDITED: JUL 26, 1989
HELP-PROMPT: Answer must be 1-20 characters in length.

DESCRIPTION: This is an argument of a MUMPS WRITE statement that will turn off all attributes of SELECT GRAPHIC RENDITION.

Some of the attributes of SELECT GRAPHIC RENDITION are

o  Bold or increased intensity

o  Underscore

o  Blink

o  Negative(reverse) image

21

HALF UP

6;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>12!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-12 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will move the print head one-half line up (for superscripts).

22

HALF DOWN

6;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>12!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-12 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will move the print head one-half line down (for subscripts).

23

UNDERLINE ON

6;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn ON underlineing.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

24

UNDERLINE OFF

6;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn OFF underlining.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

25

REVERSE LINE FEED

6;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20 X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ARGUMENT OF MUMPS 'WRITE' TO MOVE PRINTER UP ONE LINE

DESCRIPTION:

The argument of a MUMPS WRITE statement that will set the terminal to reverse line feed mode.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

26

PROPORTIONAL SPACING

6;7

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on proportional spacing for a printer.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

27

HIGH INTENSITY (BOLD)

7;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ARGUMENT OF A MUMPS 'WRITE' COMMAND

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn ON high intensity for a CRT.  This is also used to hold the code to set a printer to BOLD or emphasize print.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

28

LOW INTENSITY (UNBOLD)

7;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ARGUMENT OF A MUMPS 'WRITE' COMMAND

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn ON low intensity for a CRT. This is also used to hold the code to set a printer to REGULAR print.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

29

NORMAL INTENSITY (RESET)

7;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAY 30, 1986
HELP-PROMPT: ANSWER MUST BE 1-30 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will return a CRT to its NORMAL (default) intensity.  If a printer were set to BOLD, this code would reset the printer to its default setting.

30

INSERT MODE

7;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAY 16, 1988
HELP-PROMPT: ANSWER MUST BE 1-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate insert mode.

31

REPLACE MODE

7;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<1) X
LAST EDITED: MAY 16, 1988
HELP-PROMPT: ANSWER MUST BE 1-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate replace mode.

32

ERASE FROM BEG OF PAGE

13;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate erasing from the beginning of the page.

33

ERASE ENTIRE PAGE

13;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate erasing the entire page.

34

ERASE FROM BEG OF LINE

13;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate erasing from the beginning of a line.

35

ERASE ENTIRE LINE

13;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate erasing the entire line.

36

ERASE CHARACTER

13;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate erasing of a single character.

37

ERASE FIELD

13;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>40!($L(X)<2) X
LAST EDITED: JUL 31, 1989
HELP-PROMPT: Answer must be 2-40 characters in length.

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate the erasing of a field given the length of the field in varariable X.

40

CURSOR UP

8;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate upward movement of the cursor.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

41

CURSOR DOWN

8;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate downward movement of the cursor.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

42

CURSOR RIGHT

8;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate cursor movement to the right.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

43

CURSOR LEFT

8;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate cursor movement to the left.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

44

ARROW KEY STRING LENGTH

8;5

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>3)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JUN 01, 1987
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 3

DESCRIPTION:

The value that should be entered into this field should be the number of characters produced by depressing an arrow key.

45

DELETE LINE

8;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate deletion of an entire line.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

46

INSERT LINE

8;7

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate insertion of an entire line.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

47

DELETE CHAR.

8;8

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will indicate deletion of a single character.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

48

INSERT CHAR.

8;9

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: MAY 24, 1989
HELP-PROMPT: ANSWER MUST BE 2-20 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of MUMPS WRITE statement that will indicate insertion of a single character.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

49

CURSOR ON

8.1;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: NOV 09, 1993
HELP-PROMPT: Answer must be 2-20 characters in length.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

49.1

CURSOR OFF

8.1;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: NOV 09, 1993
HELP-PROMPT: Answer must be 2-20 characters in length.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

50

MODEM DIAL LOGIC

50;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: FEB 07, 1984
HELP-PROMPT: Executable code to dial the modem
DESCRIPTION: This is Xecutable MUMPS code which is used whenever MailMan needs to dial a modem. The variable XMPHONE holds the number to be dialed. The variable ER is 0 if the modem dialed successfully; is 1 otherwise. The variable
```
Y, if defined, holds a message about the dial operation, i.e. busy, no answer, etc.
```
```
WRITE AUTHORITY:  @
```

51

MODEM HANG UP LOGIC

51;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: FEB 07, 1984
HELP-PROMPT: This is Standard MUMPS code.

DESCRIPTION:

This is Xecutable MUMPS code which is used whenever MailMan needs to hang up a modem.  Variable ER=0 if sucessful, =1 if not.

WRITE AUTHORITY:  @

52

MODEM STATUS LOGIC

52;E1,200

FREE TEXT

INPUT TRANSFORM: K:$L(X)>200!($L(X)<1) X
HELP-PROMPT: ANSWER MUST BE 1-200 CHARACTERS IN LENGTH
DESCRIPTION: This is Xecutable MUMPS code which is used whenever MailMan needs to check the status of a Modem. The variable Y holds the response. This logic is used by the network diagnostics menu only, and need not be defined if the
```
modem has no self-checking status mode.
```
```
WRITE AUTHORITY:  @
```

55

CONTROL CODES

55;0

Multiple #3.2055

3.2055

60

BAR CODE ON

BAR1;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: ANSWER MUST BE 2-245 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on bar code printing mode of a device.

WRITE AUTHORITY:  @

61

BAR CODE OFF

BAR0;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: ANSWER MUST BE 2-245 CHARACTERS IN LENGTH

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn off bar code printing mode of a device.

WRITE AUTHORITY:  @

62

RESERVED

BARX;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-245 CHARACTERS IN LENGTH

DESCRIPTION:

This field is reserved for additional bar code specifications.

WRITE AUTHORITY:  @

65

SUBSCRIPT ON

SUB1;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on SUBSCRIPT on the printer

WRITE AUTHORITY:  @

65.1

SUBSCRIPT OFF

SUB0;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn off SUBSCRIPT on the printer

WRITE AUTHORITY:  @

65.2

SUPERSCRIPT ON

SPR1;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn on SUPERSCRIPT on the printer.

WRITE AUTHORITY:  @

65.3

SUPERSCRIPT OFF

SPR0;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn off SUPERSCRIPT on the printer.

WRITE AUTHORITY:  @

66

ITALICS ON

I1;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn on ITALICS on the printer.

WRITE AUTHORITY:  @

67

ITALICS OFF

I0;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn ITALICS on the printer.

WRITE AUTHORITY:  @

67.21

COLOR ON

CLR1;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 1-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn on COLOR on the printer.

67.22

COLOR OFF

CLR0;E1,245

FREE TEXT

INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 1-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn off COLOR on the printer.

68

GRAPHICS ON

G1;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn on GRAPHICS mode on the printer.

WRITE AUTHORITY:  @

69

GRAPHICS OFF

G0;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to turn off GRAPHICS mode on the printer.

WRITE AUTHORITY:  @

69.11

TOP LEFT CORNER

G;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the TOP LEFT CORNER part of a window in graphics mode.

69.12

BOTTOM LEFT CORNER

G;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the BOTTOM LEFT CORNER of a window in graphics mode.

69.13

TOP RIGHT CORNER

G;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the TOP RIGHT CORNER of a window in graphics mode.

69.14

BOTTOM RIGHT CORNER

G;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the BOTTOM RIGHT CORNER of a window in graphics mode.

69.2

MIDDLE T

G;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the graphics T character that joins a four box window at the middle.

69.3

TOP T

G;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the TOP middle of a four box window.

69.4

BOTTOM T

G;7

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the BOTTOM middle of a four box window.

69.5

LEFT T

G;8

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the LEFT middle of a four box window.

69.6

RIGHT T

G;9

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the perpendicular intersection of lines at the RIGHT middle of a four box window.

69.7

VERTICAL LINE

G;10

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to that produce the VERTICAL LINE in graphics mode.

69.8

HORIZONTAL LINE

G;11

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<3) X
LAST EDITED: MAY 05, 1991
HELP-PROMPT: Answer must be 3-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to produce the HORIZONTAL LINE in graphics mode.

70

INDEX

14;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION: This is the argument of a MUMPS WRITE statement that will cause the active position to move downward one line without changing column position. If the active position is at the bottom of the screen, a scroll up is
```
performed.
```

71

REVERSE INDEX

14;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will cause the active position to move up by one.  If the cursor is at the top of the screen, a scroll down is performed.

72

SAVE CURSOR

14;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will save the current cursor position.

73

RESTORE CURSOR

14;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will restore the cursor position.

74

NEXT LINE

14;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will transfer the cursor position to the next line.

75

AUTO WRAP ON

15;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will cause characters to wrap to the next line when the right margin has been exceeded.

76

AUTO WRAP OFF

15;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will cause truncation of text that exceeds the right margin limit.

77

AUTO REPEAT ON

15;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: AUG 17, 1989
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will cause characters to automatically repeat when keys are depressed and held in the down position.

78

AUTO REPEAT OFF

15;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: AUG 17, 1989
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will disable repeat mode.

79

KEYPAD APPLICATION MODE

15;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: AUG 17, 1989
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will toggle the keypad into application mode.

79.1

KEYPAD NUMERIC MODE

15;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: AUG 17, 1989
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This the argument of a MUMPS WRITE statement that will toggle the keypad into numeric mode.

80

TAB SET

16;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will set a value for the tab function.

81

TAB CLEAR

16;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will clear the settings of tabs.

82

CLEAR ALL TABS

16;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will clear all tab settings.

83

SET TOP & BOTTOM MARGINS

16;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: AUG 17, 1989
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will set the top and bottom margins of the scrolling region of a display terminal.

85

DOUBLE HIGH DOUBLE WIDE TOP

17;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION: This is the argument of a MUMPS WRITE statement that will display the top half portion of the current line with each character at double height and double wide. This argument must be used in pairs with DOUBLE HIGH DOUBLE
```
WIDE BOTTOM on adjacent lines with the same character output.
```

86

DOUBLE HIGH DOUBLE WIDE BOTTOM

17;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION: This is the argument of a MUMPS WRITE statement that will display the bottom half portion of the current line with each character at double height and double wide. This argument must be used in pairs with DOULBE HIGH
```
DOUBLE WIDE TOP on adjacent lines with the same character output.
```

87

SINGLE HIGH DOUBLE WIDE

17;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement that will display each character on the current line at a character size of double wide.

88

SINGLE HIGH SINGLE WIDE

17;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 23, 1988
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH

DESCRIPTION:

This is the argument of a MUMPS WRITE statement to restore the display of characters to the normal width on a single line.

99

DESCRIPTION

9;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>80!($L(X)<6) X
LAST EDITED: APR 18, 1984
HELP-PROMPT: ANSWER MUST BE 6-80 CHARACTERS IN LENGTH

DESCRIPTION:

This is a brief description of this type of terminal.

102

ANSWERBACK LOGIC

102;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: MAR 02, 1984
HELP-PROMPT: MUMPS CODE THAT WILL SET $T SWITCH 'TRUE' IF DEVICE IS ONLINE

DESCRIPTION:

This is Xecutable MUMPS code which will set the $T switch to "TRUE" (i.e. 1) if this terminal is On-Line.

WRITE AUTHORITY:  @

110

OPEN PRINTER PORT

10;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: JUL 30, 1985
HELP-PROMPT: Mumps code to open printer port

DESCRIPTION:

This is Xecutable MUMPS code which will OPEN the terminal's printer port.

WRITE AUTHORITY:  @

110.1

OPEN PRINTER DESCRIPTION

W110;0

WORD-PROCESSING #3.207

111

CLOSE PRINTER PORT

11;E1,245

MUMPS

INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: JUL 30, 1985
HELP-PROMPT: Mumps code to close the printer port.

DESCRIPTION:

This is Xecutable MUMPS code which will CLOSE this terminal's printer port.

WRITE AUTHORITY:  @

112

PRINT SCREEN

PRT;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>40!($L(X)<2) X
LAST EDITED: SEP 06, 1989
HELP-PROMPT: Answer must be 2-40 characters in length.

DESCRIPTION:

The argument of a MUMPS write statement used to print the screen display onto a slaved printer.

120

KP0

18;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: JUN 22, 1990
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement used to generate the same escape sequence produced by depressing the '0' key of the keypad.

121

KP1

18;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: JUN 22, 1990
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '1' key on the keypad.

122

KP2

18;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '2' key on the keypad.

123

KP3

18;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '3' key on the keypad.

124

KP4

18;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '4' key on the keypad.

125

KP5

18;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '5' key on the keypad.

126

KP6

18;7

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '6' key on the keypad.

127

KP7

18;8

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '7' key on the keypad.

128

KP8

18;9

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '8' key on the keypad.

129

KP9

18;10

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '9' key on the keypad.

130

PF1

19;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
LAST EDITED: JUN 22, 1990
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF1' key on the keypad.

131

PF2

19;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF2' key on the keypad.

132

PF3

19;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF3' key on the keypad.

133

PF4

19;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PF4' key on the keypad.

134

MINUS

19;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '-' key on the keypad.

135

COMMA

19;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the ',' key on the keypad.

136

ENTER

19;7

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'ENTER' key on the keypad.

137

PERIOD

19;8

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>20!($L(X)<2) X
HELP-PROMPT: Answer must be 2-20 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the '1' key on the keypad.

140

FIND

20;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: JUN 22, 1990
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'FIND' key on the keyboard.

141

SELECT

20;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: JUN 22, 1990
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'SELECT' key on the keyboard.

142

INSERT HERE

20;3

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'INSERT HERE' key on the keyboard.

143

REMOVE

20;4

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'REMOVE' key on the keyboard.

144

PREV SCREEN

20;5

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'PREV SCRN' key on the keyboard.

145

NEXT SCREEN

20;6

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'NEXT SCRN' key on the keyboard.

146

HELP

21;1

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
LAST EDITED: JUN 22, 1990
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'HELP' key on the keyboard.

147

DO

21;2

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>30!($L(X)<2) X
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statment used to generate the same escape sequences produced by depressing the 'DO' key on the keyboard.

200

DEFAULT FONT TITLE

200;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
```
Name of the default font.
```

201

DEFAULT FONT CODE

201;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on the default font.

WRITE AUTHORITY:  @

202

FONT NUMBER 1 TITLE

202;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
```
Name of font #1
```

203

FONT NUMBER 1 CODE

203;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on the specified font.

WRITE AUTHORITY:  @

204

FONT NUMBER 2 TITLE

204;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
```
Name of font #2
```

205

FONT NUMBER 2 CODE

205;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on the specified font.

WRITE AUTHORITY:  @

206

FONT NUMBER 3 TITLE

206;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
```
Name of font #3
```

207

FONT NUMBER 3 CODE

207;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on the specified font.

WRITE AUTHORITY:  @

208

FONT NUMBER 4 TITLE

208;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
```
Name of font #4
```

209

FONT NUMBER 4 CODE

209;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on the specified font.

WRITE AUTHORITY:  @

210

FONT NUMBER 5 TITLE

210;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
```
Name of font #5
```

211

FONT NUMBER 5 CODE

211;E1,245

FREE TEXT

INPUT TRANSFORM: D CHECK^%ZISS1 K:$L(X)>245!($L(X)<2) X
LAST EDITED: OCT 18, 1990
HELP-PROMPT: Answer must be 2-245 characters in length.

DESCRIPTION:

The argument of a MUMPS WRITE statement that will turn on the specified font.

WRITE AUTHORITY:  @

1001

SIMPLEX

1001;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-30 characters in length.
DESCRIPTION: The argument of a MUMPS WRITE command used to set a printer into SIMPLEX, or printing only on the first side of the page. This field is only applicable for terminal types with a duplex printing feature such as the HP
```
LaserJet 4 Si printers purchased by MCCR for print of encounter forms.
```

1002

DUPLEX, LONG EDGE BINDING

1001;2

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This should be used when printing double sided forms that will be bound at the side such as forms to be put in a binder.

1003

DUPLEX, SHORT EDGE BINDING

1001;3

FREE TEXT

INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: JUN 14, 1995
HELP-PROMPT: Answer must be 2-30 characters in length.

DESCRIPTION:

This should be used when printing double sided forms that will be bound at the top, such as forms to be put in a medical record.

1925

SYNONYM

SY;1

FREE TEXT

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>9!($L(X)<1) X
LAST EDITED: OCT 02, 1984
HELP-PROMPT: ANSWER MUST BE 1-9 CHARACTERS IN LENGTH

DESCRIPTION:

This is a synonym for the name of this type of terminal.

CROSS-REFERENCE: 3.2^B^MNEMONIC

1)= S ^%ZIS(2,"B",$E(X,1,30),DA)=1

2)= K ^%ZIS(2,"B",$E(X,1,30),DA)

Since this cross-reference is also a B cross-reference, the alternate name should not be the same name as the #.01 NAME field.  If they are set the same, then a change in one could affect the cross-reference of the other.

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #323	CONTROLLED SUBSTANCES	OPEN PRINTER PORT (110). Access: Direct Global Read & w/Fileman CLOSE PRINTER PORT (111). Access: Direct Global Read & w/Fileman
ICR #812	FEE BASIS OUTPATIENT PHARMACY Barcode Medication Administration
ICR #932	INTEGRATED BILLING	NAME (.01). Access: Pointed to
ICR #978	IFCAP	OPEN PRINTER PORT (110). Access: Direct Global Read & w/Fileman CLOSE PRINTER PORT (111). Access: Direct Global Read & w/Fileman BAR CODE OFF (61). Access: Direct Global Read & w/Fileman BAR CODE ON (60). Access: Direct Global Read & w/Fileman
ICR #979	LETTERMAN
ICR #2247	OUTPATIENT PHARMACY CMOP	BAR CODE OFF (61). Access: Direct Global Read & w/Fileman BAR CODE ON (60). Access: Direct Global Read & w/Fileman	This file is pointed to by the Subtype field of theDevice file. It holds attributes that charaterize a terminal type.
ICR #2964	ORDER ENTRY/RESULTS REPORTING	NAME (.01). Access: Direct Global Read & w/Fileman REVERSE VIDEO ON (14). Access: Direct Global Read & w/Fileman REVERSE VIDEO OFF (15). Access: Direct Global Read & w/Fileman HIGH INTENSITY (BOLD) (27). Access: Direct Global Read & w/Fileman LOW INTENSITY (UNBOLD) (28). Access: Direct Global Read & w/Fileman NORMAL INTENSITY (RESET) (29). Access: Direct Global Read & w/Fileman
ICR #3265	General Medical Record - Vitals	NAME (.01). Access: Direct Global Read & w/Fileman RIGHT MARGIN (1). Access: Direct Global Read & w/Fileman
ICR #3435	INPATIENT MEDICATIONS OUTPATIENT PHARMACY REGISTRATION Barcode Medication Administration	ABBREVIATION (.01). Access: Direct Global Read & w/Fileman FULL NAME (1). Access: Direct Global Read & w/Fileman CONTROL CODE (2). Access: Direct Global Read & w/Fileman
ICR #3442	Automated Information Collection System ORDER ENTRY/RESULTS REPORTING	NAME (.01). Access: Direct Global Read & w/Fileman RIGHT MARGIN (1). Access: Direct Global Read & w/Fileman FORM FEED (2). Access: Direct Global Read & w/Fileman PAGE LENGTH (3). Access: Direct Global Read & w/Fileman OPEN EXECUTE (6). Access: Direct Global Read & w/Fileman	The 'B' cross reference is accessed directly to get tothe data.
ICR #5725	MENTAL HEALTH	UNDERLINE ON (23). Access: Read w/Fileman UNDERLINE OFF (24). Access: Read w/Fileman

Name	Field # of Occurrence
CHECK^%ZISS1	2+1, 4+1, 10+1, 12+1, 12.1+1, 12.11+1, 12.12+1, 12.13+1, 12.14+1, 12.15+1 , 12.16+1, 12.2+1, 12.3+1, 12.4+1, 13+1, 14+1, 15+1, 16+1, 17+1, 18+1 , 19+1, 20+1, 20.5+1, 21+1, 22+1, 23+1, 24+1, 25+1, 26+1, 27+1 , 28+1, 29+1, 30+1, 31+1, 32+1, 33+1, 34+1, 35+1, 36+1, 37+1 , 40+1, 41+1, 42+1, 43+1, 45+1, 46+1, 47+1, 48+1, 49+1, 49.1+1 , 68+1, 69+1, 69.11+1, 69.12+1, 69.13+1, 69.14+1, 69.2+1, 69.3+1, 69.4+1, 69.5+1 , 69.6+1, 69.7+1, 69.8+1, 70+1, 71+1, 72+1, 73+1, 74+1, 75+1, 76+1 , 77+1, 78+1, 79+1, 79.1+1, 80+1, 81+1, 82+1, 83+1, 85+1, 86+1 , 87+1, 88+1, 112+1, 120+1, 121+1, 122+1, 123+1, 124+1, 125+1, 126+1 , 127+1, 128+1, 129+1, 130+1, 131+1, 132+1, 133+1, 134+1, 135+1, 136+1 , 137+1, 140+1, 141+1, 142+1, 143+1, 144+1, 145+1, 146+1, 147+1, 201+1 , 203+1, 205+1, 207+1, 209+1, 211+1
CHECK1^%ZISS1	5+1, 5.2+1
FORM^%ZISS1	2+1
EN^DDIOL	IDW99+1
^DICR	5.2(XREF 1n1.4), 5.2(XREF 1K)
^DIM	5+1, 5.2+1, 6+1, 7+1, 8+1, 50+1, 51+1, 102+1, 110+1, 111+1

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(2 - [#3.2]	.01(XREF 1S), .01(XREF 1K), 5.2(XREF 1S), 5.2(XREF 1n1.4), 5.2(XREF 1K), 1925(XREF 1S), 1925(XREF 1K)
^DD(	5.2(XREF 1n1.4), 5.2(XREF 1K)
^DD(3.2	5.2(XREF 1S)

Name	Field # of Occurrence
^(1	5.2(XREF 1S), 5.2(XREF 1n1.4), 5.2(XREF 1K)
^(9	IDW99+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Customize PDF page

Package: Kernel

Global: ^%ZIS(2

Information

Description

Directly Accessed By Routines, Total: 171

Accessed By FileMan Db Calls, Total: 15

Pointed To By FileMan Files, Total: 6

Fields, Total: 156

ICR, Total: 11

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend:

Name	Field # of Occurrence
%	IDW99+1~*
>> D0	5.2(XREF 1S), 5.2(XREF 1K)
>> DA	.01(XREF 1S), .01(XREF 1K), 5.2(XREF 1S), 5.2(XREF 1K), 1925(XREF 1S), 1925(XREF 1K)
>> DIG	5.2(XREF 1n1.4), 5.2(XREF 1K)
>> DIH	5.2(XREF 1n1.4), 5.2(XREF 1K)
>> DIU	5.2(XREF 1S), 5.2(XREF 1K)
DIV	5.2(XREF 1S), 5.2(XREF 1n1.4), 5.2(XREF 1K)
DIV(0	5.2(XREF 1S), 5.2(XREF 1n1.4), 5.2(XREF 1K)
U	IDW99+1, 5.2(XREF 1S), 5.2(XREF 1n1.4), 5.2(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, 3+1!, 4+1!, 5+1!, 5.2+1!, 5.2(XREF 1S) , 5.2(XREF 1n1.4), 5.2(XREF 1K), 6+1!, 7+1!, 8+1!, 10+1!, 12+1!, 12.1+1!, 12.11+1!, 12.12+1! , 12.13+1!, 12.14+1!, 12.15+1!, 12.16+1!, 12.2+1!, 12.3+1!, 12.4+1!, 13+1!, 14+1!, 15+1! , 16+1!, 17+1!, 18+1!, 19+1!, 20+1!, 20.5+1!, 21+1!, 22+1!, 23+1!, 24+1! , 25+1!, 26+1!, 27+1!, 28+1!, 29+1!, 30+1!, 31+1!, 32+1!, 33+1!, 34+1! , 35+1!, 36+1!, 37+1!, 40+1!, 41+1!, 42+1!, 43+1!, 44+1!, 45+1!, 46+1! , 47+1!, 48+1!, 49+1!, 49.1+1!, 50+1!, 51+1!, 52+1!, 60+1!, 61+1!, 62+1! , 65+1!, 65.1+1!, 65.2+1!, 65.3+1!, 66+1!, 67+1!, 67.21+1!, 67.22+1!, 68+1!, 69+1! , 69.11+1!, 69.12+1!, 69.13+1!, 69.14+1!, 69.2+1!, 69.3+1!, 69.4+1!, 69.5+1!, 69.6+1!, 69.7+1! , 69.8+1!, 70+1!, 71+1!, 72+1!, 73+1!, 74+1!, 75+1!, 76+1!, 77+1!, 78+1! , 79+1!, 79.1+1!, 80+1!, 81+1!, 82+1!, 83+1!, 85+1!, 86+1!, 87+1!, 88+1! , 99+1!, 102+1!, 110+1!, 111+1!, 112+1!, 120+1!, 121+1!, 122+1!, 123+1!, 124+1! , 125+1!, 126+1!, 127+1!, 128+1!, 129+1!, 130+1!, 131+1!, 132+1!, 133+1!, 134+1! , 135+1!, 136+1!, 137+1!, 140+1!, 141+1!, 142+1!, 143+1!, 144+1!, 145+1!, 146+1! , 147+1!, 200+1!, 201+1!, 202+1!, 203+1!, 204+1!, 205+1!, 206+1!, 207+1!, 208+1! , 209+1!, 210+1!, 211+1!, 1001+1!, 1002+1!, 1003+1!, 1925+1!, 1925(XREF 1S), 1925(XREF 1K)
Y	5.2(XREF 1S), 5.2(XREF 1K)
Y(1	5.2(XREF 1S), 5.2(XREF 1K)