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 |
| Outpatient Pharmacy | 3 | ^PSOERUT1 (ALLERGY,SETDIAGS)^PSOERUT3 NARRATIV^PSOERUT6 |
| 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 |
| 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,TYPE,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)TYPE - Zipcode field ("ADD": Address | "ZIP": Zip Code) ; (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 |
|
| CLNADD(ADD) | ; Cleans an Address String
; Input: ADD - Address Line string to be cleaned |
|
| 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
|
|
| PTADDRS | ;display the patient address 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+118, ERXWTHT+8 , ERXWTHT+12, ERXWTHT+13, ERXWTHT+14, ERXWTHT+17, ERXWTHT+18, ERXWTHT+19 |
| GETS^DIQ | SETPAT+18 |
| ^DIR | PAUSE+1 |
| ^DIWP | SETPAT+118, ADDRESS+5 |
| CSDATA^ETSLNC | ERXWTHT+10 |
| EN6^GMRVUTL | VAWTHT+7 |
| ^PSOERUT1 | CLNADD+5 |
| ALLERGY^PSOERUT3 | SETPAT+122 |
| SETDIAGS^PSOERUT3 | SETPAT+126 |
| NARRATIV^PSOERUT6 | SETPAT+99 |
| 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 | CLNADD+4, 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+118!, SETPAT+119, SETPAT+120, ADDRESS+5!, ADDRESS+6, ADDRESS+7! |
| Name | Line Occurrences |
|---|---|
| $$ADDRESS | SETPAT+79, SETPAT+80, SETPAT+81 |
| $$CLNADD | COMPARE+11, PTADDRS+7, PTADDRS+15 |
| $$CLNSTR | SETPAT+94, SETPAT+95, SETPAT+102, SETPAT+105, SETPAT+106, SETPAT+109, SETPAT+110, COMPARE+13, PTPHONE+2, PTPHONE+3 , PTADDRS+7, PTADDRS+15 |
| $$COMPARE | SETPAT+55, SETPAT+56, SETPAT+59, SETPAT+61, SETPAT+62, SETPAT+65, SETPAT+66, SETPAT+69, SETPAT+70, SETPAT+80 , SETPAT+81, SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+86, SETPAT+87, SETPAT+88, SETPAT+91, SETPAT+102, SETPAT+105 , SETPAT+106, SETPAT+109, SETPAT+110, SETPAT+120, WTHT+8, WTHT+9, WTHT+11, WTHT+12, PTPHONE+4, PTPHONE+5 , PTADDRS+18, PTADDRS+19 |
| $$EQDATES | COMPARE+14 |
| $$ERXPHONE | SETPAT+21, SETPAT+22 |
| $$ERXWTHT | WTHT+5 |
| $$VAWTHT | WTHT+6 |
| ADDLINE | SETPAT+53, SETPAT+57, SETPAT+60, SETPAT+63, SETPAT+67, SETPAT+71, SETPAT+77, SETPAT+82, SETPAT+89, SETPAT+92 , SETPAT+103, SETPAT+107, SETPAT+111, SETPAT+116, SETPAT+120, WTHT+10, WTHT+13, BLANKLN+5, PTPHONE+6, PTADDRS+20 |
| BLANKLN | SETPAT+74, SETPAT+115, SETPAT+121, SETPAT+123, SETPAT+125, SETPAT+127, SETPAT+128 |
| PAUSE | ADDLINE+9 |
| PTADDRS | SETPAT+98 |
| PTPHONE | SETPAT+98 |
| WTHT | SETPAT+124 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADD | CLNADD~, CLNADD+4*, CLNADD+8*, CLNADD+9*, CLNADD+10 |
| ADDLINE | ADDRESS~, ADDRESS+6 |
| ADDLN | SETPAT+14~, SETPAT+78*, SETPAT+79, SETPAT+80, SETPAT+81 |
| 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+13*, COMPARE+14, COMPARE+15 |
| CLNSTR2 | COMPARE+9~, COMPARE+13*, COMPARE+14, COMPARE+15 |
| COMM | ERXPHONE+4~, ERXPHONE+5*, ERXPHONE+6 |
| COMPARE | COMPARE+9~*, COMPARE+10, COMPARE+16*, COMPARE+17, COMPARE+19*, COMPARE+20, COMPARE+22*, COMPARE+23, COMPARE+24 |
| 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+69, SETPAT+80 , SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+99, SETPAT+102, SETPAT+105, SETPAT+109, SETPAT+117, SETPAT+118, SETPAT+122 , SETPAT+124, WTHT~, WTHT+6, WTHT+8, WTHT+9, WTHT+11, WTHT+12, VAWTHT~, VAWTHT+5, PTPHONE+4 , PTADDRS+10, PTADDRS+18 |
| DIFFADDR | SETPAT+13~ |
| DIR | PAUSE+1~ |
| DIR("A" | PAUSE+1* |
| DIR(0 | PAUSE+1* |
| DIWF | SETPAT+14~, SETPAT+118* |
| DIWL | SETPAT+14~, SETPAT+118*, ADDRESS+4~, ADDRESS+5* |
| DIWR | SETPAT+14~, SETPAT+118*, ADDRESS+4~, ADDRESS+5* |
| DT | ERXWTHT+10 |
| DT1 | EQDATES+4~, EQDATES+5*, EQDATES+7 |
| DT2 | EQDATES+4~, EQDATES+6*, EQDATES+7 |
| EFULLADD | PTADDRS+2~, PTADDRS+7*, PTADDRS+18, PTADDRS+19 |
| EPTPHONE | PTPHONE+1~, PTPHONE+2*, PTPHONE+4, PTPHONE+5 |
| ERR | SETPAT+12~ |
| ERXADDR | SETPAT+12~, SETPAT+23*, SETPAT+79, SETPAT+80, SETPAT+81, PTADDRS+1, PTADDRS+3 |
| ERXCITY | SETPAT+12~, SETPAT+24*, SETPAT+83, SETPAT+84, SETPAT+86, PTADDRS+4, PTADDRS+5 |
| ERXCNTRY | SETPAT+13~, SETPAT+25*, SETPAT+90, SETPAT+91, PTADDRS+6 |
| 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+122, SETPAT+124, SETPAT+126, 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+94, SETPAT+104, SETPAT+105, PTPHONE+2 |
| ERXPHON2 | SETPAT+12~, SETPAT+21*, SETPAT+94, SETPAT+108, SETPAT+109, PTPHONE+2 |
| ERXPHON3 | SETPAT+12~, SETPAT+22*, SETPAT+94, SETPAT+101, SETPAT+102, PTPHONE+2 |
| ERXPHONE | ERXPHONE+4~*, ERXPHONE+5, ERXPHONE+7*, ERXPHONE+8 |
| ERXPHS | SETPAT+14~, SETPAT+94*, SETPAT+106, SETPAT+110, PTPHONE+3 |
| ERXSEX | SETPAT+12~, SETPAT+20*, SETPAT+69, SETPAT+70 |
| ERXSSN | SETPAT+12~, SETPAT+21*, SETPAT+65, SETPAT+66 |
| ERXSTATE | SETPAT+13~, SETPAT+24*, SETPAT+84, SETPAT+87, PTADDRS+5 |
| ERXWT | WTHT+4~, WTHT+5*, WTHT+8, WTHT+9 |
| ERXWTHT | ERXWTHT+4~, ERXWTHT+5*, ERXWTHT+12*, ERXWTHT+15*, ERXWTHT+17*, ERXWTHT+20*, ERXWTHT+21*, ERXWTHT+22 |
| ERXZIP | SETPAT+12~, SETPAT+25*, SETPAT+85, SETPAT+88, PTADDRS+7, PTADDRS+8, PTADDRS+9 |
| ETEXT | ADDLINE~, ADDLINE+11, ADDLINE+14 |
| FIND | CLNADD+3~, CLNADD+8* |
| GMRVSTR | VAWTHT+4~, VAWTHT+7* |
| HDR | SETPAT+40~, SETPAT+50*, SETPAT+52, SETPAT+53 |
| HIGHLN | RESET+4! |
| HIGHLN( | COMPARE+17*, COMPARE+23*, 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+119*, SETPAT+120, PAUSE+1~, PAUSE+2*, PAUSE+4*, CLNADD+3~, CLNADD+5*, 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+14 |
| >> IOBOFF | VIDEO+16 |
| >> IOBON | VIDEO+16 |
| >> IOINHI | COMPARE+16, COMPARE+22, VIDEO+10, VIDEO+19 |
| >> IOINORM | COMPARE+16, COMPARE+22, VIDEO+4, VIDEO+7, VIDEO+10, VIDEO+19 |
| >> IORVOFF | COMPARE+19, VIDEO+3, VIDEO+4, VIDEO+7 |
| >> IORVON | COMPARE+19, VIDEO+7 |
| IOSL | ADDLINE+7 |
| >> IOUOFF | VIDEO+13, VIDEO+19 |
| >> IOUON | VIDEO+13, VIDEO+19 |
| J | CLNADD+3~, CLNADD+6* |
| >> 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, SETPAT+64*, COMPARE+17, COMPARE+20, COMPARE+23, ADDLINE+8, ADDLINE+13*, ADDLINE+16, ADDLINE+17* , VIDEO+4 |
| LIST | CLNADD+3~, CLNADD+5*, CLNADD+6 |
| LMLINE | COMPARE~, COMPARE+17, COMPARE+20, COMPARE+23 |
| 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+69, SETPAT+70, SETPAT+71, SETPAT+74, SETPAT+77, SETPAT+80, SETPAT+81 , SETPAT+82, SETPAT+83, SETPAT+84, SETPAT+85, SETPAT+86, SETPAT+87, SETPAT+88, SETPAT+89, SETPAT+91, SETPAT+92 , SETPAT+99, SETPAT+102, SETPAT+103, SETPAT+105, SETPAT+106, SETPAT+107, SETPAT+109, SETPAT+110, SETPAT+111, SETPAT+113 , SETPAT+115, SETPAT+116, SETPAT+120, SETPAT+121, SETPAT+122, SETPAT+123, SETPAT+124, SETPAT+125, SETPAT+126, SETPAT+127 , SETPAT+128, WTHT~, WTHT+8, WTHT+9, WTHT+10, WTHT+11, WTHT+12, WTHT+13, COMPARE~, COMPARE+16 , COMPARE+17, COMPARE+19, COMPARE+20, COMPARE+22, COMPARE+23, BLANKLN~, BLANKLN+4, BLANKLN+5, ADDLINE~, ADDLINE+6 , ADDLINE+12, PTPHONE+4, PTPHONE+5, PTPHONE+6, PTADDRS+18, PTADDRS+19, PTADDRS+20 |
| NMSPC | SETPAT~, SETPAT+11*, SETPAT+53, SETPAT+57, SETPAT+60, SETPAT+63, SETPAT+67, SETPAT+71, SETPAT+77, SETPAT+82 , SETPAT+89, SETPAT+92, SETPAT+99, SETPAT+103, SETPAT+107, SETPAT+111, SETPAT+116, SETPAT+120, SETPAT+122, SETPAT+126 , WTHT+10, WTHT+13, BLANKLN+5, ADDLINE~, ADDLINE+16, PTPHONE+6, PTADDRS+20 |
| NOVB | BLANKLN~, BLANKLN+4 |
| OBS | ERXWTHT+4~ |
| PENFLG | SETPAT~, SETPAT+39, SETPAT+73 |
| POS | COMPARE~, COMPARE+17, COMPARE+20, COMPARE+23, VIDEO+1~, VIDEO+6*, VIDEO+7, VIDEO+9*, VIDEO+10, VIDEO+12* , VIDEO+13, VIDEO+15*, VIDEO+16, VIDEO+18*, VIDEO+19 |
| REP | CLNADD+3~, CLNADD+7*, CLNADD+8 |
| REPS | CLNADD+3~ |
| REPS( | CLNADD+6*, CLNADD+7, CLNADD+8 |
| RET | ERXWTHT+4~ |
| REVLN | RESET+4! |
| REVLN( | COMPARE+20*, VIDEO+5, VIDEO+6, VIDEO+7 |
| SDFLG | SETPAT~, SETPAT+39, SETPAT+64, SETPAT+65, SETPAT+66, SETPAT+68, SETPAT+76, SETPAT+97, SETPAT+114 |
| STR | CLNSTR~, CLNSTR+4*, CLNSTR+5 |
| STR1 | COMPARE~, COMPARE+9, COMPARE+11*, COMPARE+12*, COMPARE+13, COMPARE+14 |
| STR2 | COMPARE~, COMPARE+11*, COMPARE+12*, COMPARE+13, COMPARE+14 |
| SYN | CLNADD+3~, CLNADD+6* |
| TEXT | ADDLINE+5~*, ADDLINE+14*, ADDLINE+15*, ADDLINE+16 |
| TYPE | COMPARE~, COMPARE+9*, COMPARE+11, COMPARE+12, 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+79, SETPAT+80, SETPAT+81, PTADDRS+1, PTADDRS+11 |
| VACITY | SETPAT+14~, SETPAT+28*, SETPAT+32*, SETPAT+83, SETPAT+86, SETPAT+87, PTADDRS+12, PTADDRS+13 |
| VACNTRY | SETPAT+13~, SETPAT+28*, SETPAT+35*, SETPAT+36*, SETPAT+90, SETPAT+91, PTADDRS+14 |
| 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, SETPAT+66 |
| 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+95, SETPAT+104, SETPAT+106, PTPHONE+3 |
| VAPHONE2 | SETPAT+13~, SETPAT+28*, SETPAT+32*, SETPAT+95, SETPAT+108, SETPAT+110, PTPHONE+3 |
| VAPHS | SETPAT+14~, SETPAT+95*, SETPAT+102, SETPAT+105, SETPAT+109, PTPHONE+2 |
| VASEX | SETPAT+13~, SETPAT+28*, SETPAT+31*, SETPAT+69, SETPAT+70 |
| VASSN | SETPAT+13~, SETPAT+28*, SETPAT+31*, SETPAT+65, SETPAT+66 |
| VASTATE | SETPAT+13~, SETPAT+28*, SETPAT+35*, SETPAT+84, SETPAT+87, PTADDRS+13 |
| VAWT | WTHT+4~, WTHT+6*, WTHT+8, WTHT+9 |
| VAZIP | SETPAT+13~, SETPAT+28*, SETPAT+33*, SETPAT+85, SETPAT+88, PTADDRS+15, PTADDRS+16, PTADDRS+17 |
| VFULLADD | PTADDRS+2~*, PTADDRS+15*, PTADDRS+18, PTADDRS+19 |
| 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, ERXWTHT+21 |
| X | SETPAT+12~, SETPAT+118*, 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+69* , SETPAT+71, SETPAT+77*, SETPAT+80*, SETPAT+82, SETPAT+83*, SETPAT+84*, SETPAT+85*, SETPAT+89, SETPAT+91*, SETPAT+92 , SETPAT+102*, SETPAT+103, SETPAT+105*, SETPAT+107, SETPAT+109*, SETPAT+111, WTHT+4~, WTHT+8*, WTHT+10, WTHT+11* , WTHT+13, BLANKLN+3~, BLANKLN+4*, BLANKLN+5, PTPHONE+4*, PTPHONE+6, PTADDRS+2~*, PTADDRS+3*, PTADDRS+4*, PTADDRS+5* , PTADDRS+6*, PTADDRS+7, PTADDRS+8*, PTADDRS+9*, PTADDRS+18*, PTADDRS+19, PTADDRS+20 |
| XV | SETPAT+12~, SETPAT+56*, SETPAT+57, SETPAT+62*, SETPAT+63, SETPAT+66*, SETPAT+67, SETPAT+70*, SETPAT+71, SETPAT+77* , SETPAT+81*, SETPAT+82, SETPAT+86*, SETPAT+87*, SETPAT+88*, SETPAT+89, SETPAT+91*, SETPAT+92, SETPAT+102*, SETPAT+103 , SETPAT+106*, SETPAT+107, SETPAT+110*, SETPAT+111, SETPAT+116*, SETPAT+120*, WTHT+4~, WTHT+9*, WTHT+10, WTHT+12* , WTHT+13, BLANKLN+3~, BLANKLN+4*, BLANKLN+5, PTPHONE+5*, PTPHONE+6, PTADDRS+2~*, PTADDRS+11*, PTADDRS+12*, PTADDRS+13* , PTADDRS+14*, PTADDRS+15, PTADDRS+16*, PTADDRS+17*, PTADDRS+18, PTADDRS+19*, PTADDRS+20 |
| 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 |
| Name | Field # of Occurrence |
|---|---|
| $T(USPSABBS+I^PSOERUT1 | CLNADD+5 |