RGDRM01 ;BAY/ALS-MPI/PD AWARE DUPLICATE RECORD MERGE ;02/22/00
Source file <RGDRM01.m>
| Package | Total | Call Graph |
|---|---|---|
| Master Patient Index VistA | 2 | ($$GETICN,$$GETVCCI,$$IFLOCAL)^MPIF001 $$A40^MPIFA40 |
| VA FileMan | 2 | ^DIE ^DIK |
| Clinical Information Resource Network | 1 | (DEL,MRGCMOR)^RGDRM03 |
| Registration | 1 | $$SITE^VASITE |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CKICNS(DFNFRM,DFNTO) | ;Check ICN's and CMORs of FROM and TO records of
; duplicate record pair |
|
| EXIT | ;
|
|
| MRGICN | ;Set ICN and ICN Checksum in TO record to values in FROM record
|
|
| DEL | ;Delete ICN, ICN Checksum and Locally Assigned ICN fields in FROM record
|
|
| DELEXC | ;Delete exceptions on file for patient record being removed.
|
|
| QUIT | ||
| DELE | ;Delete exception
|
| Name | Field # of Occurrence |
|---|---|
| ^DIE | MRGICN+7, MRGICN+14, MRGICN+20, DEL+6 |
| ^DIK | DELEXC+12, DELE+4 |
| $$GETICN^MPIF001 | CKICNS+7, CKICNS+8, MRGICN+9 |
| $$GETVCCI^MPIF001 | CKICNS+5, CKICNS+6 |
| $$IFLOCAL^MPIF001 | CKICNS+9, CKICNS+10 |
| $$A40^MPIFA40 | CKICNS+17 |
| DEL^RGDRM03 | CKICNS+20, CKICNS+23, CKICNS+25, CKICNS+32 |
| MRGCMOR^RGDRM03 | CKICNS+27, CKICNS+30 |
| $$SITE^VASITE | CKICNS+11 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| ^RGHL7(991.1 - [#991.1] | Classic Fileman Calls |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CKSUM | MRGICN+1~, MRGICN+3* |
| CMORFRM | CKICNS+2~, CKICNS+5* |
| CMORTO | CKICNS+2~, CKICNS+6* |
| DA | MRGICN+6*, MRGICN+7!, MRGICN+13*, MRGICN+14!, MRGICN+19*, MRGICN+20!, DEL+5*, DEL+6!, DELEXC+11*, DELEXC+12! , DELE+2*, DELE+4! |
| DA(1 | DELE+2*, DELE+3 |
| DFNFRM | CKICNS~, CKICNS+4, CKICNS+5, CKICNS+7, CKICNS+9, CKICNS+17, CKICNS+18, DEL+3, DEL+5, DEL+7 , DEL+8, DELEXC+3, DELEXC+5, DELEXC+7 |
| DFNTO | CKICNS~, CKICNS+4, CKICNS+6, CKICNS+8, CKICNS+10, CKICNS+17, CKICNS+18, MRGICN+4, MRGICN+6, MRGICN+8 , MRGICN+9, MRGICN+12, MRGICN+13, MRGICN+15, MRGICN+18, MRGICN+19, MRGICN+21 |
| DIE | MRGICN+6*, MRGICN+7!, MRGICN+13*, MRGICN+14!, MRGICN+19*, MRGICN+20!, DEL+5*, DEL+6! |
| DIK | DELEXC+11*, DELEXC+12!, DELE+3*, DELE+4! |
| DIQUIET | MRGICN+1~, MRGICN+2*, DEL+1~, DEL+2* |
| DR | MRGICN+6*, MRGICN+7!, MRGICN+13*, MRGICN+14!, MRGICN+19*, MRGICN+20!, DEL+5*, DEL+6! |
| ERR | CKICNS+2~, CKICNS+17*, CKICNS+18 |
| EXCT | DELEXC+1*, DELEXC+2*, DELEXC+3, DELEXC+5, DELEXC+7, DELEXC+15! |
| >> HOME | CKICNS+11*, CKICNS+13, CKICNS+15, CKICNS+22, CKICNS+29, MRGICN+11, MRGICN+17 |
| ICN | CKICNS+20*, CKICNS+23*, CKICNS+25*, CKICNS+32*, MRGICN+1~, MRGICN+3*, DEL+7 |
| ICNFRM | CKICNS+2~, CKICNS+7*, CKICNS+15, CKICNS+20, CKICNS+22, CKICNS+23, CKICNS+25, CKICNS+29, CKICNS+32, MRGICN+3 |
| ICNTO | CKICNS+2~, CKICNS+8*, CKICNS+12, CKICNS+13, CKICNS+22, CKICNS+27, CKICNS+30, CKICNS+32, MRGICN+9*, MRGICN+11 , MRGICN+17 |
| IEN | DELEXC+4*, DELEXC+5*, DELEXC+7, DELEXC+8, DELEXC+10, DELEXC+11, DELEXC+13, DELEXC+15!, DELE+1, DELE+2 , DELE+5 |
| IEN2 | DELEXC+6*, DELEXC+7*, DELEXC+15!, DELE+2 |
| LOCFRM | CKICNS+2~, CKICNS+9*, CKICNS+20, CKICNS+25, CKICNS+27, CKICNS+32 |
| LOCTO | CKICNS+2~, CKICNS+10*, CKICNS+20, CKICNS+25, CKICNS+30, CKICNS+32 |
| NUM | DELEXC+8*, DELEXC+9, DELEXC+14, DELEXC+15! |
| PICN | CKICNS+2~, CKICNS+12*, CKICNS+15*, CKICNS+17 |
| RETURN | CKICNS+2~, CKICNS+3*, CKICNS+4*, CKICNS+18*, EXIT+1 |
| RGRSICN | MRGICN+1~, MRGICN+2*, DEL+1~, DEL+2* |
