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,SDFLG) | ; 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 |
|
| PTPHONE | ;display phone in the Single eRx View/Display mode
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | EQDATES+5, EQDATES+6 |
| $$GET1^DIQ | SETPAT+17, SETPAT+24, SETPAT+27, SETPAT+32, SETPAT+35, SETPAT+41, SETPAT+42, SETPAT+43, SETPAT+115, ERXWTHT+8 , ERXWTHT+12, ERXWTHT+13, ERXWTHT+14, ERXWTHT+17, ERXWTHT+18, ERXWTHT+19 |
| GETS^DIQ | SETPAT+18 |
| ^DIR | PAUSE+1 |
| ^DIWP | SETPAT+115, ADDRESS+5 |
| CSDATA^ETSLNC | ERXWTHT+10 |
| EN6^GMRVUTL | VAWTHT+7 |
| ALLERGY^PSOERUT3 | SETPAT+119 |
| SETDIAGS^PSOERUT3 | SETPAT+122 |
| ADD^VADPT | SETPAT+30 |
| DEM^VADPT | SETPAT+30 |
| CNTRL^VALM10 | VIDEO+4, VIDEO+7, VIDEO+10, VIDEO+13, VIDEO+16, VIDEO+19 |
| RESTORE^VALM10 | RESET+3 |
| $$FMTE^XLFDT | SETPAT+47, ERXWTHT+14, ERXWTHT+18 |
| $$TRIM^XLFSTR | SETPAT+23, SETPAT+33, SETPAT+34, 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 |
|
| 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+115!, SETPAT+116, SETPAT+117, ADDRESS+5!, ADDRESS+6, ADDRESS+7! |
| Name | Line Occurrences |
|---|---|
| $$ADDRESS | SETPAT+78, SETPAT+79, SETPAT+80 |
| $$CLNSTR | SETPAT+93, SETPAT+94, SETPAT+99, SETPAT+102, SETPAT+103, SETPAT+106, SETPAT+107, COMPARE+12, PTPHONE+2, PTPHONE+3 |
| $$COMPARE | SETPAT+55, SETPAT+56, SETPAT+59, SETPAT+61, SETPAT+62, SETPAT+65, SETPAT+66, SETPAT+68, SETPAT+69, SETPAT+79 , SETPAT+80, SETPAT+82, SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+86, SETPAT+87, SETPAT+90, SETPAT+99, SETPAT+102 , SETPAT+103, SETPAT+106, SETPAT+107, SETPAT+117, WTHT+8, WTHT+9, WTHT+11, WTHT+12, PTPHONE+4, PTPHONE+5 |
| $$EQDATES | COMPARE+13 |
| $$ERXPHONE | SETPAT+21, SETPAT+22 |
| $$ERXWTHT | WTHT+5 |
| $$VAWTHT | WTHT+6 |
| ADDLINE | SETPAT+53, SETPAT+57, SETPAT+60, SETPAT+63, SETPAT+67, SETPAT+70, SETPAT+76, SETPAT+81, SETPAT+88, SETPAT+91 , SETPAT+100, SETPAT+104, SETPAT+108, SETPAT+113, SETPAT+117, WTHT+10, WTHT+13, BLANKLN+5, PTPHONE+6 |
| BLANKLN | SETPAT+73, SETPAT+112, SETPAT+118, SETPAT+121, SETPAT+123 |
| PAUSE | ADDLINE+9 |
| PTPHONE | SETPAT+96 |
| WTHT | SETPAT+120 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADDLINE | ADDRESS~, ADDRESS+6 |
| ADDLN | SETPAT+14~, SETPAT+77*, SETPAT+78, SETPAT+79, SETPAT+80 |
| ADDRESS | ADDRESS+4~, ADDRESS+6*, ADDRESS+8 |
| AMATCH | SETPAT+40~, SETPAT+41*, SETPAT+46 |
| BLINKLN | RESET+4! |
| BLINKLN( | SETPAT+52*, 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+12~, SETPAT+18 |
| DATA( | SETPAT+19 |
| DATE1 | EQDATES~, EQDATES+5 |
| DATE2 | EQDATES~, EQDATES+6 |
| DFN | SETPAT~, SETPAT+27*, SETPAT+29, SETPAT+32, SETPAT+55, SETPAT+59, SETPAT+61, SETPAT+65, SETPAT+68, SETPAT+79 , SETPAT+82, SETPAT+83, SETPAT+84, SETPAT+99, SETPAT+102, SETPAT+106, SETPAT+114, SETPAT+115, SETPAT+119, SETPAT+120 , WTHT~, WTHT+6, WTHT+8, WTHT+9, VAWTHT~, VAWTHT+5, PTPHONE+4 |
| DIFFADDR | SETPAT+13~ |
| DIR | PAUSE+1~ |
| DIR("A" | PAUSE+1* |
| DIR(0 | PAUSE+1* |
| DIWF | SETPAT+14~, SETPAT+115* |
| DIWL | SETPAT+14~, SETPAT+115*, ADDRESS+4~, ADDRESS+5* |
| DIWR | SETPAT+14~, SETPAT+115*, ADDRESS+4~, ADDRESS+5* |
| DT | ERXWTHT+10 |
| DT1 | EQDATES+4~, EQDATES+5*, EQDATES+7 |
| DT2 | EQDATES+4~, EQDATES+6*, EQDATES+7 |
| EPTPHONE | PTPHONE+1~, PTPHONE+2*, PTPHONE+4, PTPHONE+5 |
| ERR | SETPAT+12~ |
| ERXADDR | SETPAT+12~, SETPAT+23*, SETPAT+78, SETPAT+79, SETPAT+80 |
| ERXCITY | SETPAT+12~, SETPAT+24*, SETPAT+82, SETPAT+83, SETPAT+85 |
| ERXCNTRY | SETPAT+13~, SETPAT+25*, SETPAT+89, SETPAT+90 |
| ERXDM | SETPAT+12~, SETPAT+19* |
| ERXDM( | SETPAT+20, SETPAT+21, SETPAT+23, SETPAT+24, SETPAT+25 |
| ERXDOB | SETPAT+12~, SETPAT+20*, SETPAT+61, SETPAT+62 |
| ERXHT | WTHT+4~, WTHT+5*, WTHT+11, WTHT+12 |
| ERXIEN | SETPAT~, SETPAT+17, SETPAT+27, SETPAT+41, SETPAT+42, SETPAT+43, SETPAT+119, SETPAT+120, SETPAT+122, WTHT~ , WTHT+5, ERXWTHT~, ERXWTHT+6, ERXWTHT+7 |
| ERXNAME | SETPAT+12~, SETPAT+20*, SETPAT+55, SETPAT+56, SETPAT+58, SETPAT+59 |
| ERXPAT | SETPAT+12~, SETPAT+17*, SETPAT+18, SETPAT+19, SETPAT+21, SETPAT+22, ERXPHONE~, ERXPHONE+5, ERXPHONE+6 |
| ERXPHON1 | SETPAT+12~, SETPAT+21*, SETPAT+93, SETPAT+101, SETPAT+102, PTPHONE+2 |
| ERXPHON2 | SETPAT+12~, SETPAT+21*, SETPAT+93, SETPAT+105, SETPAT+106, PTPHONE+2 |
| ERXPHON3 | SETPAT+12~, SETPAT+22*, SETPAT+93, SETPAT+98, SETPAT+99, PTPHONE+2 |
| ERXPHONE | ERXPHONE+4~*, ERXPHONE+5, ERXPHONE+7*, ERXPHONE+8 |
| ERXPHS | SETPAT+14~, SETPAT+93*, SETPAT+103, SETPAT+107, PTPHONE+3 |
| ERXSEX | SETPAT+12~, SETPAT+20*, SETPAT+68, SETPAT+69 |
| ERXSSN | SETPAT+12~, SETPAT+21*, SETPAT+65, SETPAT+66 |
| ERXSTATE | SETPAT+13~, SETPAT+24*, SETPAT+83, SETPAT+86 |
| 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+12~, SETPAT+25*, SETPAT+84, SETPAT+87 |
| ETEXT | ADDLINE~, ADDLINE+11, ADDLINE+14 |
| GMRVSTR | VAWTHT+4~, VAWTHT+7* |
| HDR | SETPAT+40~, SETPAT+50*, SETPAT+52, SETPAT+53 |
| 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+116*, SETPAT+117, PAUSE+1~, PAUSE+2*, PAUSE+4*, 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+11*, SETPAT+52, 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+40~, SETPAT+44*, SETPAT+46*, SETPAT+47*, SETPAT+48*, SETPAT+49*, SETPAT+50, SETPAT+51* |
| MODE | SETPAT~, SETPAT+53, SETPAT+55, SETPAT+56, SETPAT+57, SETPAT+59, SETPAT+60, SETPAT+61, SETPAT+62, SETPAT+63 , SETPAT+65, SETPAT+66, SETPAT+67, SETPAT+68, SETPAT+69, SETPAT+70, SETPAT+73, SETPAT+76, SETPAT+79, SETPAT+80 , SETPAT+81, SETPAT+82, SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+86, SETPAT+87, SETPAT+88, SETPAT+90, SETPAT+91 , SETPAT+99, SETPAT+100, SETPAT+102, SETPAT+103, SETPAT+104, SETPAT+106, SETPAT+107, SETPAT+108, SETPAT+110, SETPAT+112 , SETPAT+113, SETPAT+117, SETPAT+118, SETPAT+119, SETPAT+120, SETPAT+121, SETPAT+122, SETPAT+123, 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, PTPHONE+4, PTPHONE+5 , PTPHONE+6 |
| NMSPC | SETPAT~, SETPAT+11*, SETPAT+53, SETPAT+57, SETPAT+60, SETPAT+63, SETPAT+67, SETPAT+70, SETPAT+76, SETPAT+81 , SETPAT+88, SETPAT+91, SETPAT+100, SETPAT+104, SETPAT+108, SETPAT+113, SETPAT+117, SETPAT+119, SETPAT+122, WTHT+10 , WTHT+13, BLANKLN+5, ADDLINE~, ADDLINE+16, PTPHONE+6 |
| NOVB | BLANKLN~, BLANKLN+4 |
| OBS | ERXWTHT+4~ |
| PENFLG | SETPAT~, SETPAT+39, SETPAT+72 |
| 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 |
| SDFLG | SETPAT~, SETPAT+39, SETPAT+64, SETPAT+75, SETPAT+96, SETPAT+111 |
| 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+52*, VIDEO+11, VIDEO+12, VIDEO+13 |
| VAADDR | SETPAT+13~, SETPAT+28*, SETPAT+33*, SETPAT+34*, SETPAT+78, SETPAT+79, SETPAT+80 |
| VACITY | SETPAT+14~, SETPAT+28*, SETPAT+32*, SETPAT+82, SETPAT+85, SETPAT+86 |
| VACNTRY | SETPAT+13~, SETPAT+28*, SETPAT+35*, SETPAT+36*, SETPAT+89, SETPAT+90 |
| VADM | SETPAT+13~ |
| VADM(1 | SETPAT+31 |
| VADM(2 | SETPAT+31 |
| VADM(3 | SETPAT+31 |
| VADM(5 | SETPAT+31 |
| VADOB | SETPAT+13~, SETPAT+28*, SETPAT+31*, SETPAT+61, SETPAT+62 |
| VAHT | WTHT+4~, WTHT+6*, WTHT+11, WTHT+12 |
| VALDTTM | SETPAT+40~, SETPAT+42*, SETPAT+43, SETPAT+47 |
| >> VALMEVL | RESET+3, VIDEO+3 |
| VALUE | ADDRESS~, ADDRESS+5 |
| VALUSER | SETPAT+40~, SETPAT+42*, SETPAT+47 |
| VANAME | SETPAT+13~, SETPAT+28*, SETPAT+31*, SETPAT+55, SETPAT+56 |
| VAPA | SETPAT+13~ |
| VAPA(1 | SETPAT+33 |
| VAPA(11 | SETPAT+33 |
| VAPA(2 | SETPAT+33 |
| VAPA(25 | SETPAT+35 |
| VAPA(3 | SETPAT+34 |
| VAPA(4 | SETPAT+32 |
| VAPA(5 | SETPAT+35 |
| VAPA(8 | SETPAT+32 |
| VAPHONE1 | SETPAT+13~, SETPAT+28*, SETPAT+32*, SETPAT+94, SETPAT+101, SETPAT+103, PTPHONE+3 |
| VAPHONE2 | SETPAT+13~, SETPAT+28*, SETPAT+32*, SETPAT+94, SETPAT+105, SETPAT+107, PTPHONE+3 |
| VAPHS | SETPAT+14~, SETPAT+94*, SETPAT+99, SETPAT+102, SETPAT+106, PTPHONE+2 |
| VASEX | SETPAT+13~, SETPAT+28*, SETPAT+31*, SETPAT+68, SETPAT+69 |
| VASSN | SETPAT+13~, SETPAT+28*, SETPAT+31*, SETPAT+65, SETPAT+66 |
| VASTATE | SETPAT+13~, SETPAT+28*, SETPAT+35*, SETPAT+83, SETPAT+86 |
| VAWT | WTHT+4~, WTHT+6*, WTHT+8, WTHT+9 |
| VAZIP | SETPAT+13~, SETPAT+28*, SETPAT+33*, SETPAT+84, SETPAT+87 |
| VM | VAWTHT+4~, VAWTHT+7* |
| VPATIEN | SETPAT+40~, SETPAT+41*, SETPAT+46 |
| VPTPHONE | PTPHONE+1~, PTPHONE+3*, PTPHONE+4, PTPHONE+5 |
| 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+12~, SETPAT+115*, WTHT+4~, EQDATES+4~, EQDATES+5*, EQDATES+6*, ADDRESS+4~, ADDRESS+5*, VAWTHT+4~, VAWTHT+6* , VAWTHT+7, VAWTHT+8* |
| XE | SETPAT+12~, SETPAT+55*, SETPAT+57, SETPAT+59*, SETPAT+60, SETPAT+61*, SETPAT+63, SETPAT+65*, SETPAT+67, SETPAT+68* , SETPAT+70, SETPAT+76*, SETPAT+79*, SETPAT+81, SETPAT+82*, SETPAT+83*, SETPAT+84*, SETPAT+88, SETPAT+90*, SETPAT+91 , SETPAT+99*, SETPAT+100, SETPAT+102*, SETPAT+104, SETPAT+106*, SETPAT+108, WTHT+4~, WTHT+8*, WTHT+10, WTHT+11* , WTHT+13, BLANKLN+3~, BLANKLN+4*, BLANKLN+5, PTPHONE+4*, PTPHONE+6 |
| XV | SETPAT+12~, SETPAT+56*, SETPAT+57, SETPAT+62*, SETPAT+63, SETPAT+66*, SETPAT+67, SETPAT+69*, SETPAT+70, SETPAT+76* , SETPAT+80*, SETPAT+81, SETPAT+85*, SETPAT+86*, SETPAT+87*, SETPAT+88, SETPAT+90*, SETPAT+91, SETPAT+99*, SETPAT+100 , SETPAT+103*, SETPAT+104, SETPAT+107*, SETPAT+108, SETPAT+113*, SETPAT+117*, WTHT+4~, WTHT+9*, WTHT+10, WTHT+12* , WTHT+13, BLANKLN+3~, BLANKLN+4*, BLANKLN+5, PTPHONE+5*, PTPHONE+6 |
| XX | PAUSE+1~, 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 |
