XDRMERGB ;SF-IRMFO.SEA/JLI - TENATIVE UPDATE POINTER NODES ;5/14/98 10:30
Source file <XDRMERGB.m>
Package | Total | Caller Graph |
---|---|---|
Toolkit | 3 | XDRMERG0 XDRMERG1 XDRMERG2 |
Barcode Medication Administration | 1 | PSBXMRG |
IHS Patient Merge | 1 | BPMXDRV |
Lab Service | 1 | LRXDRPT |
Name | Comments | DBIA/ICR reference |
---|---|---|
SNDMSG(XDRFDA) | ;Sends msg when merge process has completed.
|
|
NAME | ||
MERGEIT | ; MERGE TWO ENTRIES IN FILE
|
|
SAVEPNTR(IENFROM,IENTO,FILE,IENS,FIELD,VALUE) | ;
|
|
QUE | ; (Moved from XDRMERG0)
|
|
SAVEMERG(FILE,IENFROM,IENTO) | ;
|
|
STORMERG | ;
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | NAME+42 |
$$FIND1^DIC | SAVEMERG+4, SAVEMERG+14, SAVEMERG+25, SAVEPNTR+3, NAME+6 |
^DIE | NAME+37, NAME+44 |
FILE^DIE | MERGEIT+26, MERGEIT+45, NAME+30 |
UPDATE^DIE | SAVEMERG+11, SAVEMERG+20, SAVEMERG+31, STORMERG+8, SAVEPNTR+7, NAME+13, NAME+25, NAME+55 |
^DIK | MERGEIT+57, NAME+58 |
$$GET1^DIQ | SNDMSG+2, SNDMSG+4, SNDMSG+5, QUE+10 |
^DIR | QUE+36, NAME+4 |
$$FILE^XDRDPICK | QUE+6 |
DODIS^XDRMERGA | MERGEIT+53 |
DOSUBS^XDRMERGA | MERGEIT+55 |
$$NOW^XLFDT | MERGEIT+27, MERGEIT+46 |
^XMD | SNDMSG+10 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(15.1 - [#15.1] | GET1^DIQ |
^VA(15.2 - [#15.2] | Classic Fileman Calls, FIND1^DIC, GET1^DIQ |
^XDRM - [#15.4] | FIND1^DIC |
15.41 | FIND1^DIC |
15.42 | FIND1^DIC |
^DIC(19.1 - [#19.1] | GET1^DIQ |
^XMB(3.8 - [#3.8] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | MERGEIT+20, MERGEIT+21, MERGEIT+37, MERGEIT+40 |
^DIC - [#1] | SAVEMERG+13, STORMERG+3, QUE+14 |
^VA(15 - [#15] | QUE+18, QUE+19, NAME+32 |
^VA(15.2 - [#15.2] | NAME+38, NAME+45 |
^VA(15.4 | STORMERG+1! |
^VA(200 - [#200] | QUE+9 |
^XDRM - [#15.4] | SAVEMERG+5 |
^XTMP("XDRTESTK" | MERGEIT+27*, MERGEIT+46* |
Name | Line Occurrences |
---|---|
NAME | NAME+6 |
STORMERG | SAVEMERG+23, SAVEMERG+34 |
Name | Field # of Occurrence |
---|---|
^( | MERGEIT+20, MERGEIT+21, QUE+18 |
^("ZZ" | MERGEIT+27*, MERGEIT+46* |
^(0 | NAME+32* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | MERGEIT+1~, MERGEIT+57!*, QUE+4~, NAME+36*, NAME+44*, NAME+56* |
DFN | MERGEIT+1~, MERGEIT+6*, MERGEIT+57* |
DIC | QUE+2~ |
DIE | QUE+2~, NAME+35*, NAME+44* |
DIK | MERGEIT+1~, MERGEIT+57*, QUE+4~, NAME+57* |
DIR | QUE+2~, QUE+32!, QUE+36!, NAME+5! |
DIR("?" | NAME+2*, NAME+3* |
DIR("A" | QUE+33*, QUE+34*, QUE+35*, NAME+1* |
DIR(0 | QUE+32*, NAME* |
DIU | MERGEIT+57~ |
DIU(0 | MERGEIT+57* |
DR | QUE+2~, NAME+34!*, NAME+44!* |
DT | SAVEMERG+10 |
DUZ | QUE+9 |
FIELD | SAVEPNTR~, SAVEPNTR+4 |
FILE | SAVEMERG~, SAVEMERG+13, STORMERG+3, SAVEPNTR~, SAVEPNTR+4 |
FLD | MERGEIT+19~, MERGEIT+20*, MERGEIT+21, MERGEIT+23, MERGEIT+30~, MERGEIT+37*, MERGEIT+38, MERGEIT+39, MERGEIT+40 |
>> FROM | SAVEMERG+2, SAVEMERG+3, SAVEPNTR+2 |
FROMARG | SAVEMERG+1~, SAVEMERG+2*, SAVEMERG+3, SAVEMERG+4, SAVEMERG+5, SAVEMERG+8, SAVEPNTR+1~, SAVEPNTR+2*, SAVEPNTR+3 |
I | MERGEIT+1~, MERGEIT+33*, MERGEIT+34, MERGEIT+37, MERGEIT+38 |
IENFROM | MERGEIT+12, MERGEIT+17, MERGEIT+23, MERGEIT+28, MERGEIT+31, MERGEIT+51, MERGEIT+56, MERGEIT+57, MERGEIT+58, SAVEMERG~ , SAVEMERG+2, SAVEMERG+3, SAVEMERG+18, SAVEMERG+21, SAVEMERG+22, SAVEPNTR~, SAVEPNTR+2 |
IENS | SAVEMERG+1~, SAVEMERG+11*, SAVEMERG+14*, SAVEMERG+15, SAVEMERG+16*, SAVEMERG+17, SAVEMERG+18, SAVEMERG+20*, SAVEMERG+25*, SAVEMERG+26 , SAVEMERG+27*, SAVEMERG+28, SAVEMERG+29, SAVEMERG+31*, STORMERG+1, STORMERG+2*, STORMERG+6, STORMERG+7, SAVEPNTR~, SAVEPNTR+4 |
IENTO | MERGEIT+5, MERGEIT+6, MERGEIT+14, MERGEIT+28, MERGEIT+29, MERGEIT+32, MERGEIT+47, MERGEIT+52, MERGEIT+54, MERGEIT+55 , SAVEMERG~, SAVEMERG+2, SAVEMERG+3, SAVEMERG+29, SAVEMERG+32, SAVEMERG+33, SAVEPNTR~, SAVEPNTR+2 |
IENTOSTR | MERGEIT+1~, MERGEIT+5*, MERGEIT+23, MERGEIT+40, MERGEIT+54*, MERGEIT+55 |
IENVAL | SAVEMERG+1~, SAVEMERG+22*, SAVEMERG+33*, STORMERG+3 |
J | MERGEIT+19~, MERGEIT+21* |
>> JXFLD | MERGEIT+37* |
N | MERGEIT+19~, MERGEIT+20*, MERGEIT+23 |
NODE | MERGEIT+1~, MERGEIT+10*, MERGEIT+11, MERGEIT+12, MERGEIT+13*, MERGEIT+14, MERGEIT+15*, MERGEIT+16*, MERGEIT+17, MERGEIT+20 , MERGEIT+23, MERGEIT+28, MERGEIT+29, MERGEIT+31, MERGEIT+32, MERGEIT+37, MERGEIT+47, MERGEIT+51, MERGEIT+52, MERGEIT+53 |
NODE1 | MERGEIT+1~, MERGEIT+12*, MERGEIT+13, MERGEIT+15, MERGEIT+16, MERGEIT+18 |
NODE2 | MERGEIT+1~, MERGEIT+14*, MERGEIT+15, MERGEIT+18 |
NODEA | MERGEIT+1~ |
NODEB | MERGEIT+1~ |
Q | SAVEMERG+1~, STORMERG+3*, STORMERG+4*, STORMERG+6, STORMERG+7 |
Q1 | SAVEMERG+1~, STORMERG+3*, STORMERG+4 |
>> R(1 | SNDMSG+3* |
SFILE | MERGEIT+1~ |
TOARG | SAVEMERG+1~, SAVEMERG+3*, SAVEMERG+9 |
U | MERGEIT+4, MERGEIT+23, MERGEIT+33, MERGEIT+34, MERGEIT+38, MERGEIT+56, SAVEMERG+5, SAVEMERG+13, QUE+20, QUE+21 , QUE+22, QUE+23, QUE+24, QUE+25, QUE+26, NAME+5, NAME+32, NAME+38, NAME+45 |
VALUE | MERGEIT+1~, SAVEPNTR~, SAVEPNTR+6 |
VREF | MERGEIT+1~ |
X | MERGEIT+21*, MERGEIT+22, MERGEIT+33*, MERGEIT+38, MERGEIT+40, SAVEPNTR+4*, SAVEPNTR+5, QUE+3~, QUE+8~, QUE+9* , QUE+10, QUE+16*, QUE+18* |
>> X1 | MERGEIT+31*, MERGEIT+33* |
X2 | MERGEIT+32*, MERGEIT+34, MERGEIT+38*, MERGEIT+41, MERGEIT+45~, MERGEIT+47 |
>> X3 | MERGEIT+32*, MERGEIT+41 |
XDRAA | MERGEIT+2~, MERGEIT+24!*, MERGEIT+27, MERGEIT+43!*, MERGEIT+46 |
XDRDA | SAVEMERG+1~, SAVEMERG+4*, SAVEMERG+5*, SAVEMERG+6, SAVEMERG+12*, SAVEMERG+14, SAVEMERG+16, SAVEMERG+25, SAVEMERG+27, STORMERG+1 , STORMERG+2, SAVEPNTR+1~, SAVEPNTR+3*, SAVEPNTR+5, SAVEPNTR+6 |
>> XDRDIC | MERGEIT+4, MERGEIT+12, MERGEIT+14, MERGEIT+17, MERGEIT+23, MERGEIT+28, MERGEIT+29, MERGEIT+31, MERGEIT+32, MERGEIT+47 , MERGEIT+51, MERGEIT+52, MERGEIT+56, MERGEIT+57, MERGEIT+58, QUE+14*, QUE+15, QUE+24 |
XDRFDA | SAVEMERG+1~, SAVEMERG+7~, SAVEMERG+24!, STORMERG+5!, SAVEPNTR+1~, SNDMSG~, SNDMSG+2, QUE+4~, NAME+14*, NAME+17 , NAME+29, NAME+36, NAME+38, NAME+44, NAME+45, NAME+56 |
XDRFDA( | SAVEMERG+8*, SAVEMERG+9*, SAVEMERG+10*, SAVEMERG+17*, SAVEMERG+18*, SAVEMERG+28*, SAVEMERG+29*, STORMERG+6*, STORMERG+7*, SAVEPNTR+5* , SAVEPNTR+6* |
XDRFIL | QUE+3~, QUE+6*, QUE+7, QUE+14, NAME+12, NAME+45 |
XDRFILE | SAVEMERG+1~, SAVEMERG+13*, SAVEMERG+14, SAVEMERG+17, SAVEMERG+25, SAVEMERG+28 |
XDRFROM | MERGEIT+1~, MERGEIT+51*, MERGEIT+55 |
XDRGLOB | QUE+3~, QUE+15*, QUE+18 |
XDRGRP | SNDMSG+1~, SNDMSG+4*, SNDMSG+5, SNDMSG+6*, SNDMSG+7, SNDMSG+8 |
>> XDRGRPN | SNDMSG+5*, SNDMSG+6 |
XDRI | QUE+4~, NAME+18*, NAME+19, NAME+20, NAME+22, NAME+49*, NAME+50, NAME+51 |
XDRIENS | MERGEIT+5, MERGEIT+54, QUE+4~, NAME+17*, NAME+22, NAME+23, NAME+24 |
XDRJ | QUE+4~, NAME+19*, NAME+20, NAME+23, NAME+50*, NAME+51 |
XDRK | QUE+4~, NAME+20*, NAME+24, NAME+28, NAME+29, NAME+32, NAME+51*, NAME+53, NAME+54 |
XDRKEY | QUE+8~, QUE+9*, QUE+10*, QUE+12 |
XDRMA | QUE+2~, NAME+26! |
XDRNAME | SNDMSG+1~, SNDMSG+2*, SNDMSG+3, SNDMSG+9, QUE+3~, NAME+5*, NAME+6, NAME+11, NAME+40 |
XDRSUB | SAVEMERG+1~, SAVEMERG+22*, SAVEMERG+33*, STORMERG+1, STORMERG+6, STORMERG+7 |
>> XDRTESTK | MERGEIT+24, MERGEIT+27*, MERGEIT+43, MERGEIT+46* |
XDRTO | MERGEIT+1~, MERGEIT+52*, MERGEIT+55 |
XDRX | QUE+3~ |
XDRX( | QUE+25*, QUE+26*, NAME+18, NAME+19, NAME+20, NAME+49, NAME+50, NAME+51 |
XDRX(0 | QUE+29 |
XDRXX | MERGEIT+1~, MERGEIT+19~, MERGEIT+24, MERGEIT+26, MERGEIT+30~, MERGEIT+42, MERGEIT+43, MERGEIT+56*, MERGEIT+58, QUE+2~ , NAME+21!, NAME+26!, NAME+52! |
XDRXX( | MERGEIT+23*, MERGEIT+40*, NAME+11*, NAME+12*, NAME+22*, NAME+23*, NAME+24* |
XDRXX(15 | NAME+28*, NAME+29*, NAME+53*, NAME+54* |
XDRY | QUE+3~ |
XDRYY | QUE+2~, NAME+21!, NAME+26!, NAME+52! |
XDRYY(1 | NAME+14 |
XDRZZ | MERGEIT+1~, MERGEIT+25!, MERGEIT+27, MERGEIT+44!, MERGEIT+46 |
XFILNO | MERGEIT+1~, MERGEIT+4*, MERGEIT+20, MERGEIT+21, MERGEIT+23, MERGEIT+37, MERGEIT+38, MERGEIT+39, MERGEIT+40, MERGEIT+53 |
>> XMCHAN | SNDMSG+9* |
XMDUZ | SNDMSG+1~, SNDMSG+9* |
XMSUB | SNDMSG+1~, SNDMSG+9* |
XMTEXT | SNDMSG+1~, SNDMSG+9* |
>> XMY( | SNDMSG+7*, SNDMSG+8* |
>> XNCNT | QUE+17*, QUE+27*, QUE+28 |
>> XNCNT0 | QUE+17* |
XNN | MERGEIT+1~ |
XVALUE | MERGEIT+1~ |
Y | MERGEIT+1~, MERGEIT+34*, MERGEIT+35, QUE+3~, QUE+7, QUE+12*, QUE+18*, QUE+19, QUE+25, QUE+26 , QUE+36, NAME+5 |
YVAL | QUE+19~*, QUE+20, QUE+21, QUE+22, QUE+23, QUE+24, QUE+25, QUE+26 |
YYY | SAVEMERG+1~, SAVEMERG+19!, SAVEMERG+30! |
YYY(1 | SAVEMERG+11, SAVEMERG+12, SAVEMERG+20, SAVEMERG+31 |
>> ZTDESC | NAME+40* |
ZTDTH | QUE+2~, NAME+38*, NAME+39 |
>> ZTIO | NAME+41* |
>> ZTRTN | NAME+40* |
>> ZTSAVE("XDRFDA" | NAME+41* |
ZTSK | QUE+2~, NAME+39, NAME+43, NAME+44, NAME+45 |
ZZZ | SAVEMERG+1~, SAVEMERG+30! |