PSUDEM1 ;BIR/DAM - Patient Demographics Extract ; 20 DEC 2001
Source file <PSUDEM1.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Benefits Management | 4 | PULL^PSUCP PDSSN^PSUDEM4 PDMAIL^PSUDEM5 ($$VAL,$$VALI)^PSUTL |
| VA Fileman | 3 | YMD^%DTC IX^DIC $$GET1^DIQ |
| Registration | 1 | (DEM,ELIG)^VADPT |
| Scheduling | 1 | $$OUTPTPR^SDUTL3 |
| Uncategorized | 1 | $$GETICN^MPIF001 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;EN Routine control module
|
|
| ICN | ;Find patient ICN
|
|
| PRIO | ;Pull Enrollment Priority
|
|
| HL7 | ;This is the Patient Demographics extract that runs only when
|
|
| MISC | ;Pulls miscellaneous additional info via EN^DIQ1 call
|
|
| DAT | ;Date Module
|
|
| XMD | ;Format mailman message and send.
|
|
| INST | ;EN Place institution code sending report into temp global.
|
|
| DEM | ;PULL PATIENT DEMOGRAPHICS. This is run only when user selects
|
|
| CONF | ;Construct globals for confirmation message
|
|
| DEM1 | ;
|
|
| REC | ;EN If "^" is contained in any record, replace it with "'"
|
|
| ETH | ;Ethnicity and multiple race entries
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGEN(27.11 - [#27.11] | PRIO+3, PRIO+4 |
| ^DPT - [#2] | DEM1+4, DEM1+5 |
| ^DPT("B" | DEM+11, DEM+13 |
| ^PS(55 - [#55] | DEM1+20 |
| ^PSUDEM - [#59.9] | HL7+8 |
| ^PSUDEM("B" | HL7+5, HL7+7 |
| ^XTMP( | CONF+6*, CONF+7* |
| ^XTMP("PSU" | HL7+9*, HL7+13 |
| ^XTMP("PSUMANL" | EN+3 |
| ^XTMP("PSU_" | EN+4, EN+5, EN+6!, EN+8, EN+18!, EN+19!, EN+20!, INST+4*, INST+9*, DEM1+40* , XMD+3, XMD+4*, XMD+11, XMD+14*, XMD+16*, XMD+18*, XMD+22, CONF+4 |
| Name | Line Occurrences |
|---|---|
| CONF | XMD+25 |
| DAT | EN+2 |
| DEM | EN+3 |
| DEM1 | HL7+13, DEM+13 |
| ETH | DEM1+39 |
| HL7 | EN+4 |
| ICN | DEM1+36 |
| INST | CONF+3 |
| MISC | DEM1+34 |
| PRIO | DEM1+31 |
| XMD | EN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %H | DAT+3* |
| >> C | ETH+4*, ETH+6* |
| >> D | INST+7* |
| DFN | HL7+8*, HL7+9, HL7+10!, HL7+12*, HL7+13*, DEM+13* |
| >> DIC | INST+7* |
| >> DIC(0 | INST+7* |
| >> I | EN+14*, HL7+6*, HL7+7*, HL7+8, XMD+15*, XMD+16, XMD+18 |
| >> PSUAB | XMD+2*, XMD+3*, XMD+4 |
| >> PSUAUTO | EN+10* |
| PSUDATMP | MISC+4~, MISC+7*, MISC+8, MISC+9*, MISC+10 |
| PSUDDTMP | MISC+4~ |
| PSUDIVIS | CONF+2~, CONF+4*, CONF+6, CONF+7 |
| >> PSUDIVNM | INST+8*, INST+9 |
| PSUDMDFN | EN+21!, HL7+13*, DEM+12*, DEM+13*, DEM1+4, DEM1+5, DEM1+20, DEM1+40, PRIO+3, MISC+6 , ICN+4 |
| PSUDOD | DEM+8!, DEM1+3!, DEM1+4*, MISC+11 |
| PSUDTMPA | MISC+4~, MISC+6*, MISC+7 |
| >> PSUEC | PRIO+2*, PRIO+3*, PRIO+4 |
| >> PSUEDT | HL7+5 |
| PSUICN | ICN+3~, ICN+4*, ICN+5, ICN+6 |
| PSUICN1 | ICN+3~ |
| >> PSUJOB | EN+4, EN+5, EN+6, EN+8, EN+18, EN+19, EN+20, HL7+9, HL7+13, INST+4 , INST+9, DEM1+40, XMD+3, XMD+4, XMD+11, XMD+14, XMD+16, XMD+18, XMD+22, CONF+4 , CONF+5 |
| PSULC | XMD+7~, XMD+11*, XMD+13* |
| >> PSUM | XMD+22*, XMD+24* |
| PSUMAX | XMD+7~, XMD+8*, XMD+9*, XMD+13 |
| PSUMC | XMD+7~, XMD+10*, XMD+13*, XMD+14, XMD+16, XMD+18, XMD+22, XMD+24, CONF+6 |
| >> PSUMLC | XMD+10*, XMD+12*, XMD+13*, XMD+14, XMD+16, XMD+17*, XMD+18 |
| >> PSUMOD( | EN+14* |
| >> PSUMOD(10 | EN+16 |
| >> PSUNAM | DEM+10*, DEM+11*, DEM+13 |
| >> PSUOPTS | EN+9*, EN+14 |
| >> PSUPL | XMD+2*, XMD+4, XMD+5* |
| PSURAC | EN+21!, ETH+6* |
| >> PSURCE | ETH+4*, ETH+5*, ETH+6 |
| PSURDT | EN+21!, DAT+6*, DEM1+11 |
| PSUREC | DEM+5~, DEM1+1!, DEM1+11*, DEM1+13*, DEM1+15*, DEM1+17*, DEM1+19*, DEM1+20*, DEM1+22*, DEM1+24* , DEM1+26*, DEM1+28*, DEM1+30*, DEM1+33*, DEM1+38*, DEM1+40, PRIO+5*, MISC+8*, MISC+10*, MISC+11* , ICN+6*, ETH+2*, ETH+4*, ETH+6*, REC+2* |
| PSUREC1 | DEM+6!, DEM1+1!, DEM1+5*, DEM1+6, DEM1+7, DEM1+13, DEM1+15, DEM1+17, DEM1+19 |
| PSUREC10 | DEM+7!, DEM1+2!, PRIO+4*, PRIO+5 |
| PSUREC11 | DEM+7!, DEM1+2!, DEM1+33* |
| PSUREC12 | DEM+7!, DEM1+2!, DEM1+38* |
| PSUREC13 | DEM+7!, DEM1+2! |
| PSUREC14 | DEM+7!, DEM1+2!, ETH+2* |
| PSUREC15 | DEM+8!, DEM1+3! |
| PSUREC2 | DEM+6!, DEM1+1! |
| PSUREC3 | DEM+6!, DEM1+1!, DEM1+13* |
| PSUREC4 | DEM+6!, DEM1+1!, DEM1+15* |
| PSUREC5 | DEM+6!, DEM1+1!, DEM1+17* |
| PSUREC6 | DEM+6!, DEM1+1!, DEM1+19* |
| PSUREC7 | DEM+6!, DEM1+1!, DEM1+20*, DEM1+22 |
| PSUREC8 | DEM+7!, DEM1+2!, DEM1+28* |
| PSUREC9 | DEM+7!, DEM1+2!, DEM1+30* |
| >> PSUSDT | HL7+5*, HL7+7 |
| >> PSUSIT | INST+5* |
| >> PSUSNDR | INST+3*, INST+4, INST+5, INST+7, DEM1+26 |
| >> PSUSUB | CONF+5*, CONF+6, CONF+7 |
| PSUTLC | XMD+7~, XMD+21*, XMD+22*, CONF+7 |
| PSUTMC | XMD+7~ |
| U | HL7+8, INST+4, INST+9, DEM1+4, DEM1+6, DEM1+7, DEM1+11, DEM1+13, DEM1+15, DEM1+17 , DEM1+19, DEM1+20, DEM1+22, DEM1+24, DEM1+26, DEM1+28, DEM1+30, DEM1+33, DEM1+38, PRIO+4 , PRIO+5, MISC+7, MISC+8, MISC+10, MISC+11, ICN+6, ETH+2, ETH+4, ETH+6, CONF+4 |
| VADM | DEM+8!, DEM1+3! |
| VADM(11 | ETH+2 |
| VADM(12 | ETH+5, ETH+6 |
| VADM(4 | DEM1+38 |
| VADM(8 | DEM1+28 |
| VAEL | DEM+8!, DEM1+3! |
| VAEL(1 | DEM1+30 |
| VAEL(9 | DEM1+33 |
| >> X | DAT+6, INST+3*, INST+7*, INST+8*, XMD+11*, XMD+14, XMD+15, XMD+16, XMD+18, XMD+22* |
| >> Y | INST+8 |
| >> Z | XMD+15* |