VPRSDAD ;OIT/CF -- SDA DPT utilities ;10/25/18 15:29
Source file <VPRSDAD.m>
| 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 |
|---|---|---|
| SID | ; -- State GET ID Action
; ForeignCountryFlag set & cleaned up patient address entities |
|
| FCF | ; set ForeignCountryFlag
|
|
| NUSC(VPRX) | ; boolean true if non-United States country
|
|
| ADD(DFN) | ; -- flag if foreign address fields for VPR PATIENT ADDRESS
; called from GET ID action |
|
| TEMP(DFN) | ; -- populate foreign address fields for VPR PATIENT TEMP ADDRESS
; called from GET ID action |
|
| NOK(DFN) | ; -- populate foreign address fields for VPR PATIENT NOK ADDRESS
; called from GET ID action |
|
| NOK2(DFN) | ; -- populate foreign address fields for VPR PATIENT NOK2 ADDRESS
; called from GET ID action |
|
| ECON(DFN) | ; -- populate foreign address fields for VPR PATIENT ECON ADDRESS
; called from GET ID action |
|
| ECON2(DFN) | ; -- populate foreign address fields for VPR PATIENT ECON2 ADDRESS
; called from GET ID action |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| Name | Line Occurrences |
|---|---|
| $$NUSC | ADD+2, TEMP+2, NOK+2, NOK2+2, ECON+2, ECON2+2 |
| FCF | ADD+6, TEMP+6, NOK+6, NOK2+6, ECON+6, ECON2+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DDEOUT | SID+3* |
| DFN | ADD~, ADD+2, TEMP~, TEMP+2, TEMP+4, TEMP+5, NOK~, NOK+2, NOK+4, NOK+5 , NOK2~, NOK2+2, NOK2+4, NOK2+5, ECON~, ECON+2, ECON+4, ECON+5, ECON2~, ECON2+2 , ECON2+4, ECON2+5 |
| >> DIENTY | SID+3* |
| >> DNAME | SID+4* |
| >> VAOA("HasCountry" | NOK+2*, NOK+3, NOK2+2*, NOK2+3, ECON+2*, ECON+3, ECON2+2*, ECON2+3 |
| >> VAOA("PostalCode" | NOK+5*, NOK2+5*, ECON+5*, ECON2+5* |
| >> VAOA("Province" | NOK+4*, NOK2+4*, ECON+4*, ECON2+4* |
| >> VAPA("HasCountry" | ADD+2*, ADD+3 |
| >> VATEMP("HasCountry" | TEMP+2*, TEMP+3 |
| >> VATEMP("PostalCode" | TEMP+5* |
| >> VATEMP("Province" | TEMP+4* |
| >> VPR("ForeignCountryFlag" | SID+2, FCF+1* |
| VPRX | NUSC~, NUSC+1 |