DPTDZPRE ; IHS/TUCSON/JCM - PRE-MERGE INIT FOR PATIENT MERGE ; [ 09/10/2001 11:01 AM ]
Source file <DPTDZPRE.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 | ;
|
|
CHECK | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("XY" | HEALTH+1, FACE+1 |
^APCHSCTL("B" | ASK+8 |
^AUTTSITE(1 | ASK+3 |
^DPT - [#2] | CHECK+1, CHECK+5, CHECK+6 |
Name | Line Occurrences |
---|---|
ASK | START+6 |
ASKX | ASK+5, ASK+6 |
CHECK | START+1 |
DEVICE | START+8, START+9 |
DEVICEX | DEVICE+3 |
END | START+6, START+8 |
EOJ | END |
FACE | START+9 |
HEALTH | START+9 |
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+9!, FACE+3! |
APCHSPAT | HEALTH+2!, HEALTH+3* |
APCHSTYP | HEALTH+2!, HEALTH+3* |
DFN | START+5, FACE+2*, EOJ+1!* |
DIC | ASK+7!*, ASK+8! |
DIC("A" | ASK+7* |
DIC("B" | ASK+8* |
DIC(0 | ASK+7* |
DIR | ASK+1!, ASK+4! |
DIR("A" | ASK+2*, ASK+3* |
DIR("B" | ASK+2* |
DIR(0 | ASK+2* |
DPTDZPRE | START+3!, START+9*, EOJ+2! |
DPTDZPRE("DEVICE" | DEVICE+4* |
DPTDZPRE("DFN" | START+5*, EOJ+1 |
DPTDZPRE("FR" | START+7*, START+9 |
DPTDZPRE("PAT" | START+9*, HEALTH+3, FACE+2 |
DPTDZPRE("PCC" | START+9, ASK+3*, ASK+7 |
DPTDZPRE("QFLG" | START+4*, START+6, START+8, ASK+5*, ASK+6*, ASK+8*, DEVICE+3* |
DPTDZPRE("TO" | START+7*, START+9 |
DPTDZPRE("TYPE" | ASK+8*, 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, CHECK+1, CHECK+5, CHECK+6 |
>> X | ASK+8* |
>> XDRM("AUTO" | START+2 |
>> XDRMPDA | CHECK+7 |
>> XDRMRG("FR" | START+7, CHECK+1, CHECK+5 |
>> XDRMRG("QFLG" | CHECK+2* |
>> XDRMRG("TO" | START+7, CHECK+1, CHECK+6 |
Y | ASK+6, ASK+7!, ASK+8, ASKX! |
>> ZTQUEUED | CHECK+3 |