PSOERUT0 ;ALB/MFR - eRx Patient - ListMan Utilities; 06/03/2023 5:14pm
Source file <PSOERUT0.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 4 | ^%DT ($$GET1,GETS)^DIQ ^DIR ^DIWP |
Kernel | 2 | $$FMTE^XLFDT ($$TRIM,$$UP)^XLFSTR |
Enterprise Terminology Services | 1 | CSDATA^ETSLNC |
General Medical Record - Vitals | 1 | EN6^GMRVUTL |
List Manager | 1 | (CNTRL,RESTORE)^VALM10 |
Outpatient Pharmacy | 1 | (ALLERGY,SETDIAGS)^PSOERUT3 |
Registration | 1 | (ADD,DEM)^VADPT |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
SETPAT(MODE,ERXIEN,DFN,NMSPC,PENFLG) | ; Set ListMan Side-By-Side Section for Patient
|
|
WTHT(MODE,ERXIEN,DFN) | ; Adds eRx Weight & Height
; Input: MODE - Display Mode: "RS": Roll & Scroll | "LM": ListMan ; ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) ; DFN - Pointer to PATIENT File(#2) |
|
COMPARE(MODE,STR1,STR2,POS,ZIP,LMLINE,IGNNULL) | ; Compare two strings and Sets Reverse/Highlight Video Array if different
; Input: MODE - Display Mode: "RS": Roll & Scroll | "LM": ListMan ; STR1 - String 1 to be compared with String 2 ; STR2 - String 2 to be compared with String 1 ; POS - Position to start the Reverse Video ; (o)ZIP - Zipcode field (1: Yes | 0: No) ; (o)LMLINE - Current ListMan line (LM Mode only) ; (o)IGNNULL - Ignore when STR2 is null/blank |
|
BLANKLN(MODE,NOVB) | ; Add a Blank Line
|
|
ADDLINE(MODE,NMSPC,ETEXT,VTEXT) | ;Adds a New Line to the list
|
|
PAUSE | ; Page break + erases the "Press Return..."
|
|
EQDATES(DATE1,DATE2) | ;Checks if the fields are valid dates and are the same
; Input: DATE1 - Date 1 to be compared with Date 2 ; DATE2 - Date 2 to be compared with Date 1 |
|
CLNSTR(STR) | ; Cleans String (Removes any characters different than a-A & 1-9)
; Input: STR - String to be cleaned |
|
RESET() | ; Reset Video Atributes
; - Resetting list to NORMAL video attributes |
|
VIDEO() | ; Changes the Video Attributes for the list
|
|
ERXPHONE(ERXPAT,TYPE) | ; Return the eRx Patient Phone # (if there is one)
; Input: ERXPAT - Pointer to ERX PATIENT (#52.46) ; TYPE - "PT": Primary Telephone | "HT": Home Telephone |
|
ADDRESS(VALUE,ADDLINE) | ; Returns Address Line1, Line2, Line3... (max 39 characters)
; Input: VALUE - Complete Address (Line1+Line2+Line3) ; ADDLINE - Line of the formatted address |
|
ERXWTHT(ERXIEN,TYPE) | ||
VAWTHT(DFN,TYPE) | ; VistA Patient Weight/Height
; Input: DFN - Pointer to PATIENT File(#2) ; TYPE - "WT": Weight in Kg | "HT": Height in cm |
Name | Field # of Occurrence |
---|---|
^%DT | EQDATES+5, EQDATES+6 |
$$GET1^DIQ | SETPAT+16, SETPAT+23, SETPAT+26, SETPAT+31, SETPAT+34, SETPAT+40, SETPAT+41, SETPAT+42, SETPAT+109, ERXWTHT+8 , ERXWTHT+12, ERXWTHT+13, ERXWTHT+14, ERXWTHT+17, ERXWTHT+18, ERXWTHT+19 |
GETS^DIQ | SETPAT+17 |
^DIR | PAUSE+1 |
^DIWP | SETPAT+109, ADDRESS+5 |
CSDATA^ETSLNC | ERXWTHT+10 |
EN6^GMRVUTL | VAWTHT+7 |
ALLERGY^PSOERUT3 | SETPAT+113 |
SETDIAGS^PSOERUT3 | SETPAT+116 |
ADD^VADPT | SETPAT+29 |
DEM^VADPT | SETPAT+29 |
CNTRL^VALM10 | VIDEO+4, VIDEO+7, VIDEO+10, VIDEO+13, VIDEO+16, VIDEO+19 |
RESTORE^VALM10 | RESET+3 |
$$FMTE^XLFDT | SETPAT+46, ERXWTHT+14, ERXWTHT+18 |
$$TRIM^XLFSTR | SETPAT+22, SETPAT+32, SETPAT+33, ADDRESS+5, ADDRESS+6 |
$$UP^XLFSTR | CLNSTR+4, ERXWTHT+13, ERXWTHT+19 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |
^PS(52.46 - [#52.46] | GETS^DIQ |
^PS(52.49 - [#52.49] | GET1^DIQ |
52.49306 | GET1^DIQ |
^PS(55 - [#55] | GET1^DIQ |
^HL(779.004 - [#779.004] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | VAWTHT+6 |
^PS(52.46 - [#52.46] | ERXPHONE+5, ERXPHONE+6 |
^PS(52.49 - [#52.49] | ERXWTHT+6 |
^TMP( | ADDLINE+16* |
^UTILITY($J | SETPAT+109!, SETPAT+110, SETPAT+111, ADDRESS+5!, ADDRESS+6, ADDRESS+7! |
Name | Line Occurrences |
---|---|
$$ADDRESS | SETPAT+76, SETPAT+77, SETPAT+78 |
$$CLNSTR | SETPAT+91, SETPAT+92, SETPAT+94, SETPAT+97, SETPAT+98, SETPAT+101, SETPAT+102, COMPARE+12 |
$$COMPARE | SETPAT+54, SETPAT+55, SETPAT+58, SETPAT+60, SETPAT+61, SETPAT+63, SETPAT+64, SETPAT+66, SETPAT+67, SETPAT+77 , SETPAT+78, SETPAT+80, SETPAT+81, SETPAT+82, SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+88, SETPAT+94, SETPAT+97 , SETPAT+98, SETPAT+101, SETPAT+102, SETPAT+111, WTHT+8, WTHT+9, WTHT+11, WTHT+12 |
$$EQDATES | COMPARE+13 |
$$ERXPHONE | SETPAT+20, SETPAT+21 |
$$ERXWTHT | WTHT+5 |
$$VAWTHT | WTHT+6 |
ADDLINE | SETPAT+52, SETPAT+56, SETPAT+59, SETPAT+62, SETPAT+65, SETPAT+68, SETPAT+74, SETPAT+79, SETPAT+86, SETPAT+89 , SETPAT+95, SETPAT+99, SETPAT+103, SETPAT+107, SETPAT+111, WTHT+10, WTHT+13, BLANKLN+5 |
BLANKLN | SETPAT+72, SETPAT+106, SETPAT+112, SETPAT+115, SETPAT+117 |
PAUSE | ADDLINE+9 |
WTHT | SETPAT+114 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDLINE | ADDRESS~, ADDRESS+6 |
ADDLN | SETPAT+13~, SETPAT+75*, SETPAT+76, SETPAT+77, SETPAT+78 |
ADDRESS | ADDRESS+4~, ADDRESS+6*, ADDRESS+8 |
AMATCH | SETPAT+39~, SETPAT+40*, SETPAT+45 |
BLINKLN | RESET+4! |
BLINKLN( | SETPAT+51*, VIDEO+14, VIDEO+15, VIDEO+16 |
CHR | CLNSTR+3~, CLNSTR+5* |
CLNSTR | CLNSTR+3~*, CLNSTR+5*, CLNSTR+6 |
CLNSTR1 | COMPARE+9~, COMPARE+12*, COMPARE+13, COMPARE+14 |
CLNSTR2 | COMPARE+9~, COMPARE+12*, COMPARE+13, COMPARE+14 |
COMM | ERXPHONE+4~, ERXPHONE+5*, ERXPHONE+6 |
COMPARE | COMPARE+9~*, COMPARE+10, COMPARE+15*, COMPARE+16, COMPARE+18*, COMPARE+19, COMPARE+21*, COMPARE+22, COMPARE+23 |
DATA | SETPAT+11~, SETPAT+17 |
DATA( | SETPAT+18 |
DATE1 | EQDATES~, EQDATES+5 |
DATE2 | EQDATES~, EQDATES+6 |
DFN | SETPAT~, SETPAT+26*, SETPAT+28, SETPAT+31, SETPAT+54, SETPAT+58, SETPAT+60, SETPAT+63, SETPAT+66, SETPAT+77 , SETPAT+80, SETPAT+81, SETPAT+82, SETPAT+94, SETPAT+97, SETPAT+101, SETPAT+108, SETPAT+109, SETPAT+113, SETPAT+114 , WTHT~, WTHT+6, WTHT+8, WTHT+9, VAWTHT~, VAWTHT+5 |
DIFFADDR | SETPAT+12~ |
DIR | PAUSE+1~ |
DIR("A" | PAUSE+1* |
DIR(0 | PAUSE+1* |
DIWF | SETPAT+13~, SETPAT+109* |
DIWL | SETPAT+13~, SETPAT+109*, ADDRESS+4~, ADDRESS+5* |
DIWR | SETPAT+13~, SETPAT+109*, ADDRESS+4~, ADDRESS+5* |
DT | ERXWTHT+10 |
DT1 | EQDATES+4~, EQDATES+5*, EQDATES+7 |
DT2 | EQDATES+4~, EQDATES+6*, EQDATES+7 |
ERR | SETPAT+11~ |
ERXADDR | SETPAT+11~, SETPAT+22*, SETPAT+76, SETPAT+77, SETPAT+78 |
ERXCITY | SETPAT+11~, SETPAT+23*, SETPAT+80, SETPAT+81, SETPAT+83 |
ERXCNTRY | SETPAT+12~, SETPAT+24*, SETPAT+87, SETPAT+88 |
ERXDM | SETPAT+11~, SETPAT+18* |
ERXDM( | SETPAT+19, SETPAT+20, SETPAT+22, SETPAT+23, SETPAT+24 |
ERXDOB | SETPAT+11~, SETPAT+19*, SETPAT+60, SETPAT+61 |
ERXHT | WTHT+4~, WTHT+5*, WTHT+11, WTHT+12 |
ERXIEN | SETPAT~, SETPAT+16, SETPAT+26, SETPAT+40, SETPAT+41, SETPAT+42, SETPAT+113, SETPAT+114, SETPAT+116, WTHT~ , WTHT+5, ERXWTHT~, ERXWTHT+6, ERXWTHT+7 |
ERXNAME | SETPAT+11~, SETPAT+19*, SETPAT+54, SETPAT+55, SETPAT+57, SETPAT+58 |
ERXPAT | SETPAT+11~, SETPAT+16*, SETPAT+17, SETPAT+18, SETPAT+20, SETPAT+21, ERXPHONE~, ERXPHONE+5, ERXPHONE+6 |
ERXPHON1 | SETPAT+11~, SETPAT+20*, SETPAT+91, SETPAT+96, SETPAT+97 |
ERXPHON2 | SETPAT+11~, SETPAT+20*, SETPAT+91, SETPAT+100, SETPAT+101 |
ERXPHON3 | SETPAT+11~, SETPAT+21*, SETPAT+91, SETPAT+93, SETPAT+94 |
ERXPHONE | ERXPHONE+4~*, ERXPHONE+5, ERXPHONE+7*, ERXPHONE+8 |
ERXPHS | SETPAT+13~, SETPAT+91*, SETPAT+98, SETPAT+102 |
ERXSEX | SETPAT+11~, SETPAT+19*, SETPAT+66, SETPAT+67 |
ERXSSN | SETPAT+11~, SETPAT+20*, SETPAT+63, SETPAT+64 |
ERXSTATE | SETPAT+12~, SETPAT+23*, SETPAT+81, SETPAT+84 |
ERXWT | WTHT+4~, WTHT+5*, WTHT+8, WTHT+9 |
ERXWTHT | ERXWTHT+4~, ERXWTHT+5*, ERXWTHT+12*, ERXWTHT+15*, ERXWTHT+17*, ERXWTHT+20*, ERXWTHT+21 |
ERXZIP | SETPAT+11~, SETPAT+24*, SETPAT+82, SETPAT+85 |
ETEXT | ADDLINE~, ADDLINE+11, ADDLINE+14 |
GMRVSTR | VAWTHT+4~, VAWTHT+7* |
HDR | SETPAT+39~, SETPAT+49*, SETPAT+51, SETPAT+52 |
HIGHLN | RESET+4! |
HIGHLN( | COMPARE+16*, COMPARE+22*, VIDEO+8, VIDEO+9, VIDEO+10 |
HIGUNDLN | RESET+4! |
HIGUNDLN( | VIDEO+17, VIDEO+18, VIDEO+19 |
HOBDT | ERXWTHT+4~, ERXWTHT+14* |
HT | VAWTHT+4~, VAWTHT+6*, VAWTHT+8*, VAWTHT+11 |
HUOM | ERXWTHT+4~, ERXWTHT+13*, ERXWTHT+15 |
I | SETPAT+110*, SETPAT+111, PAUSE+2*, CLNSTR+3~, CLNSTR+5*, RESET+2~, RESET+3*, VIDEO+1~, VIDEO+4*, ADDRESS+4~ |
IEN | ERXWTHT+4~, ERXWTHT+5*, ERXWTHT+6*, ERXWTHT+7 |
IENS | ERXWTHT+4~, ERXWTHT+7*, ERXWTHT+8, ERXWTHT+12, ERXWTHT+13, ERXWTHT+14, ERXWTHT+17, ERXWTHT+18, ERXWTHT+19 |
IGNNULL | COMPARE~, COMPARE+13 |
>> IOBOFF | VIDEO+16 |
>> IOBON | VIDEO+16 |
>> IOINHI | COMPARE+15, COMPARE+21, VIDEO+10, VIDEO+19 |
>> IOINORM | COMPARE+15, COMPARE+21, VIDEO+4, VIDEO+7, VIDEO+10, VIDEO+19 |
>> IORVOFF | COMPARE+18, VIDEO+3, VIDEO+4, VIDEO+7 |
>> IORVON | COMPARE+18, VIDEO+7 |
IOSL | ADDLINE+7 |
>> IOUOFF | VIDEO+13, VIDEO+19 |
>> IOUON | VIDEO+13, VIDEO+19 |
>> LASTLINE | RESET+3 |
LCODE | ERXWTHT+4~, ERXWTHT+8*, ERXWTHT+9, ERXWTHT+10 |
LDATA | ERXWTHT+4~, ERXWTHT+10 |
LDATA("LEX" | ERXWTHT+11, ERXWTHT+16 |
>> LINE | SETPAT+10*, SETPAT+51, COMPARE+16, COMPARE+19, COMPARE+22, ADDLINE+8, ADDLINE+13*, ADDLINE+16, ADDLINE+17*, VIDEO+4 |
LMLINE | COMPARE~, COMPARE+16, COMPARE+19, COMPARE+22 |
LN | VIDEO+1~, VIDEO+5*, VIDEO+6, VIDEO+7, VIDEO+8*, VIDEO+9, VIDEO+10, VIDEO+11*, VIDEO+12, VIDEO+13 , VIDEO+14*, VIDEO+15, VIDEO+16, VIDEO+17*, VIDEO+18, VIDEO+19 |
MATCH | SETPAT+39~, SETPAT+43*, SETPAT+45*, SETPAT+46*, SETPAT+47*, SETPAT+48*, SETPAT+49, SETPAT+50* |
MODE | SETPAT~, SETPAT+52, SETPAT+54, SETPAT+55, SETPAT+56, SETPAT+58, SETPAT+59, SETPAT+60, SETPAT+61, SETPAT+62 , SETPAT+63, SETPAT+64, SETPAT+65, SETPAT+66, SETPAT+67, SETPAT+68, SETPAT+72, SETPAT+74, SETPAT+77, SETPAT+78 , SETPAT+79, SETPAT+80, SETPAT+81, SETPAT+82, SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+86, SETPAT+88, SETPAT+89 , SETPAT+94, SETPAT+95, SETPAT+97, SETPAT+98, SETPAT+99, SETPAT+101, SETPAT+102, SETPAT+103, SETPAT+105, SETPAT+106 , SETPAT+107, SETPAT+111, SETPAT+112, SETPAT+113, SETPAT+114, SETPAT+115, SETPAT+116, SETPAT+117, WTHT~, WTHT+8 , WTHT+9, WTHT+10, WTHT+11, WTHT+12, WTHT+13, COMPARE~, COMPARE+15, COMPARE+16, COMPARE+18, COMPARE+19 , COMPARE+21, COMPARE+22, BLANKLN~, BLANKLN+4, BLANKLN+5, ADDLINE~, ADDLINE+6, ADDLINE+12 |
NMSPC | SETPAT~, SETPAT+10*, SETPAT+52, SETPAT+56, SETPAT+59, SETPAT+62, SETPAT+65, SETPAT+68, SETPAT+74, SETPAT+79 , SETPAT+86, SETPAT+89, SETPAT+95, SETPAT+99, SETPAT+103, SETPAT+107, SETPAT+111, SETPAT+113, SETPAT+116, WTHT+10 , WTHT+13, BLANKLN+5, ADDLINE~, ADDLINE+16 |
NOVB | BLANKLN~, BLANKLN+4 |
OBS | ERXWTHT+4~ |
PENFLG | SETPAT~, SETPAT+38, SETPAT+71 |
POS | COMPARE~, COMPARE+16, COMPARE+19, COMPARE+22, VIDEO+1~, VIDEO+6*, VIDEO+7, VIDEO+9*, VIDEO+10, VIDEO+12* , VIDEO+13, VIDEO+15*, VIDEO+16, VIDEO+18*, VIDEO+19 |
RET | ERXWTHT+4~ |
REVLN | RESET+4! |
REVLN( | COMPARE+19*, VIDEO+5, VIDEO+6, VIDEO+7 |
STR | CLNSTR~, CLNSTR+4*, CLNSTR+5 |
STR1 | COMPARE~, COMPARE+9, COMPARE+11*, COMPARE+12, COMPARE+13 |
STR2 | COMPARE~, COMPARE+11*, COMPARE+12, COMPARE+13 |
TEXT | ADDLINE+5~*, ADDLINE+14*, ADDLINE+15*, ADDLINE+16 |
TYPE | ERXPHONE~, ERXPHONE+7, ERXWTHT~, ERXWTHT+11, ERXWTHT+16, VAWTHT~, VAWTHT+10, VAWTHT+11 |
UNDERLN | RESET+4! |
UNDERLN( | SETPAT+51*, VIDEO+11, VIDEO+12, VIDEO+13 |
VAADDR | SETPAT+12~, SETPAT+27*, SETPAT+32*, SETPAT+33*, SETPAT+76, SETPAT+77, SETPAT+78 |
VACITY | SETPAT+13~, SETPAT+27*, SETPAT+31*, SETPAT+80, SETPAT+83, SETPAT+84 |
VACNTRY | SETPAT+12~, SETPAT+27*, SETPAT+34*, SETPAT+35*, SETPAT+87, SETPAT+88 |
VADM | SETPAT+12~ |
VADM(1 | SETPAT+30 |
VADM(2 | SETPAT+30 |
VADM(3 | SETPAT+30 |
VADM(5 | SETPAT+30 |
VADOB | SETPAT+12~, SETPAT+27*, SETPAT+30*, SETPAT+60, SETPAT+61 |
VAHT | WTHT+4~, WTHT+6*, WTHT+11, WTHT+12 |
VALDTTM | SETPAT+39~, SETPAT+41*, SETPAT+42, SETPAT+46 |
>> VALMEVL | RESET+3, VIDEO+3 |
VALUE | ADDRESS~, ADDRESS+5 |
VALUSER | SETPAT+39~, SETPAT+41*, SETPAT+46 |
VANAME | SETPAT+12~, SETPAT+27*, SETPAT+30*, SETPAT+54, SETPAT+55 |
VAPA | SETPAT+12~ |
VAPA(1 | SETPAT+32 |
VAPA(11 | SETPAT+32 |
VAPA(2 | SETPAT+32 |
VAPA(25 | SETPAT+34 |
VAPA(3 | SETPAT+33 |
VAPA(4 | SETPAT+31 |
VAPA(5 | SETPAT+34 |
VAPA(8 | SETPAT+31 |
VAPHONE1 | SETPAT+12~, SETPAT+27*, SETPAT+31*, SETPAT+92, SETPAT+96, SETPAT+98 |
VAPHONE2 | SETPAT+12~, SETPAT+27*, SETPAT+31*, SETPAT+92, SETPAT+100, SETPAT+102 |
VAPHS | SETPAT+13~, SETPAT+92*, SETPAT+94, SETPAT+97, SETPAT+101 |
VASEX | SETPAT+12~, SETPAT+27*, SETPAT+30*, SETPAT+66, SETPAT+67 |
VASSN | SETPAT+12~, SETPAT+27*, SETPAT+30*, SETPAT+63, SETPAT+64 |
VASTATE | SETPAT+12~, SETPAT+27*, SETPAT+34*, SETPAT+81, SETPAT+84 |
VAWT | WTHT+4~, WTHT+6*, WTHT+8, WTHT+9 |
VAZIP | SETPAT+12~, SETPAT+27*, SETPAT+32*, SETPAT+82, SETPAT+85 |
VM | VAWTHT+4~, VAWTHT+7* |
VPATIEN | SETPAT+39~, SETPAT+40*, SETPAT+45 |
VTEXT | ADDLINE~, ADDLINE+11, ADDLINE+15 |
WOBDT | ERXWTHT+4~, ERXWTHT+18* |
WT | VAWTHT+4~, VAWTHT+6*, VAWTHT+8*, VAWTHT+10 |
WUOM | ERXWTHT+4~, ERXWTHT+19*, ERXWTHT+20 |
X | SETPAT+11~, SETPAT+109*, WTHT+4~, PAUSE+3, EQDATES+4~, EQDATES+5*, EQDATES+6*, ADDRESS+4~, ADDRESS+5*, VAWTHT+4~ , VAWTHT+6*, VAWTHT+7, VAWTHT+8* |
XE | SETPAT+11~, SETPAT+54*, SETPAT+56, SETPAT+58*, SETPAT+59, SETPAT+60*, SETPAT+62, SETPAT+63*, SETPAT+65, SETPAT+66* , SETPAT+68, SETPAT+74*, SETPAT+77*, SETPAT+79, SETPAT+80*, SETPAT+81*, SETPAT+82*, SETPAT+86, SETPAT+88*, SETPAT+89 , SETPAT+94*, SETPAT+95, SETPAT+97*, SETPAT+99, SETPAT+101*, SETPAT+103, WTHT+4~, WTHT+8*, WTHT+10, WTHT+11* , WTHT+13, BLANKLN+3~, BLANKLN+4*, BLANKLN+5 |
XV | SETPAT+11~, SETPAT+55*, SETPAT+56, SETPAT+61*, SETPAT+62, SETPAT+64*, SETPAT+65, SETPAT+67*, SETPAT+68, SETPAT+74* , SETPAT+78*, SETPAT+79, SETPAT+83*, SETPAT+84*, SETPAT+85*, SETPAT+86, SETPAT+88*, SETPAT+89, SETPAT+94*, SETPAT+95 , SETPAT+98*, SETPAT+99, SETPAT+102*, SETPAT+103, SETPAT+107*, SETPAT+111*, WTHT+4~, WTHT+9*, WTHT+10, WTHT+12* , WTHT+13, BLANKLN+3~, BLANKLN+4*, BLANKLN+5 |
>> XX | PAUSE+3* |
Y | ADDLINE+7~*, ADDLINE+8, EQDATES+4~, EQDATES+5, EQDATES+6, VAWTHT+4~, VAWTHT+8* |
Z | ERXPHONE+4~, ERXPHONE+6*, ERXPHONE+7 |
ZIP | COMPARE~, COMPARE+11 |