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! |