RGDRM03 ;BAY/ALS-MPI/PD AWARE DUPLICATE RECORD MERGE ;03/17/00
Source file <RGDRM03.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Clinical Information Resource Network | 1 | RGDRM01 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(ARRAY) | ; Entry point
|
|
MRGCMOR | ; If the 'FROM' record has a CMOR and the 'TO' record does not, set the
; field in the 'TO' record and delete the field in the 'FROM' record. ; The CMOR score will be recalculated for the TO record when ; merge completes. |
|
DEL | ; Delete field in 'FROM' record
|
|
EXIT | ;
|
|
GETSCR(DFN) | ; Get CMOR score and calculation date given IEN (DFN) of patient file (#2)
|
|
EXIT2 | ;
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | MRGCMOR+4, MRGCMOR+7, DEL+1, DEL+4, GETSCR+3 |
Name | Line Occurrences |
---|---|
EXIT2 | GETSCR+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | EN~, EN+1, EN+2, EN+3, EN+4, EN+13, EN+14 |
DA | MRGCMOR+5*, MRGCMOR+6!, DEL+2*, DEL+3!, GETSCR+4*, GETSCR+5! |
DFN | GETSCR~, GETSCR+1, GETSCR+3, GETSCR+4, GETSCR+6, GETSCR+7 |
>> DFNFRM | EN+1*, EN+2, EN+3, EN+4, EN+5, EN+7, EN+8, EN+13, EN+14, DEL+1 , DEL+2, DEL+4 |
>> DFNTO | EN+2*, EN+3, EN+4, EN+5, EN+7, EN+8, EN+10, EN+13, EN+14, MRGCMOR+4 , MRGCMOR+5, MRGCMOR+7 |
DIC | GETSCR+4*, GETSCR+5! |
DIE | MRGCMOR+5*, MRGCMOR+6!, DEL+2*, DEL+3! |
DIQ | GETSCR+4*, GETSCR+5! |
DIQ(0 | GETSCR+4* |
DR | MRGCMOR+5*, MRGCMOR+6!, DEL+2*, DEL+3!, GETSCR+4*, GETSCR+5! |
>> HLMTIEN | EN+10 |
IEN | EN+12*, EN+13*, EN+14, EN+16! |
IENFRM | EN+3*, EN+4, EN+13, EN+16! |
IENTO | EN+4*, EN+13, EN+16! |
RETURN | EN+5*, EN+6, EN+9, EN+10, EXIT+1, GETSCR+2~, GETSCR+3*, GETSCR+8*, EXIT2+1 |
SCORE | GETSCR+2~, GETSCR+6*, GETSCR+8 |
SCOREDT | GETSCR+2~, GETSCR+7*, GETSCR+8 |
SCR | GETSCR+2~ |
SCR(2 | GETSCR+6, GETSCR+7 |