DPTDZPO1 ; IHS/TUCSON/JCM - PRE-MERGE INIT FOR PATIENT MERGE ; [ 09/10/2001 11:43 AM ]
Source file <DPTDZPO1.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | ^DIC ^DIR | 
| IHS Patient Registration | 1 | START^AGFACE | 
| Kernel | 1 | ^%ZIS | 
| Patient Care Component | 1 | EN^APCHS | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| END | ||
| DEVICEX | ||
| EOJ | ; | |
| ASKX | ||
| FACE | ; | |
| START | ; | |
| HEALTH | ; | |
| ASK | ; | |
| DEVICE | ; | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^%ZOSF("XY" | HEALTH+1, FACE+1 | 
| ^APCHSCTL("B" | ASK+9 | 
| ^AUTTSITE(1 | ASK+3 | 
| Name | Line Occurrences | 
|---|---|
| ASK | START+4 | 
| ASKX | ASK+5, ASK+6 | 
| DEVICE | START+6 | 
| DEVICEX | DEVICE+3 | 
| END | START+4, START+6 | 
| EOJ | END | 
| FACE | START+8 | 
| HEALTH | START+7 | 
| Name | Field # of Occurrence | 
|---|---|
| ^("XY" | HEALTH+1, FACE+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %ZIS | DEVICEX! | 
| %ZIS(0 | DEVICE+2* | 
| AGOPT | START+8!, FACE+3! | 
| APCHSPAT | HEALTH+2!, HEALTH+3* | 
| APCHSTYP | HEALTH+2!, HEALTH+3* | 
| DFN | START+3, FACE+2*, EOJ+1!* | 
| DIC | ASK+7!*, ASK+9! | 
| DIC("A" | ASK+7* | 
| DIC("B" | ASK+9* | 
| DIC(0 | ASK+7* | 
| DIR | ASK+1!, ASK+4! | 
| DIR("A" | ASK+2*, ASK+3* | 
| DIR("B" | ASK+2* | 
| DIR(0 | ASK+2* | 
| DPTDZPO1 | START+1!, EOJ+2! | 
| DPTDZPO1("DEVICE" | DEVICE+4* | 
| DPTDZPO1("DFN" | START+3*, EOJ+1 | 
| DPTDZPO1("PAT" | START+5*, HEALTH+3, FACE+2 | 
| DPTDZPO1("PCC" | START+7, ASK+3*, ASK+7 | 
| DPTDZPO1("QFLG" | START+2*, START+4, START+6, ASK+5*, ASK+6*, ASK+9*, DEVICE+3* | 
| DPTDZPO1("TYPE" | ASK+9*, HEALTH+3 | 
| >> DTOUT | ASK+5 | 
| >> DUOUT | ASK+5 | 
| DX | HEALTH+1*!, FACE+1*! | 
| DY | HEALTH+1*!, FACE+1*! | 
| IO | DEVICE+4 | 
| IOM | DEVICE+4 | 
| IOSL | DEVICE+4 | 
| IOST | DEVICE+4 | 
| POP | DEVICE+3, DEVICEX! | 
| U | ASK+3 | 
| >> X | ASK+9* | 
| >> XDRMRG("TO" | START+5 | 
| Y | ASK+6, ASK+7!, ASK+9, ASKX! |