EASXDR1 ;ALB/BRM/PHH - CHECK RELATIONS DURING XDR PATIENT MERGE; ; 5/30/03 12:29pm
Source file <EASXDR1.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHKRELAT(DFNFR,DFNTO,SILENT) | ;can the relations on these 2 records be merged?
|
|
| LOOP | ;
|
|
| CHKACT() | ; ensure both records contain the same active flag for eff. date
|
|
| UPDATE(MRGTOIEN,FRDATA,MRGFRIEN) | ;
|
|
| DEL(ROOT,IEN) | ;delete entries
|
|
| MRGOTHR(MRGFRIEN,MRGTOIEN) | ;
|
|
| SUCCESS(MRGFRIEN,MRGTOIEN) | ;display message when merge is successful
|
|
| FAILED(MRGFRIEN,MRGTOIEN,MSG) | ;display message when merge fails
|
|
| REMOVE(MRGFRIEN,MRGTOIEN) | ;delete and/or repoint "old" entries
|
|
| SSNMATCH(FRIEN,TOIEN) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGPR(408.12 - [#408.12] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.21 - [#408.21] | REMOVE+9 |
| ^DGMT(408.22 - [#408.22] | REMOVE+11 |
| ^DGPR(408.12 - [#408.12] | CHKRELAT+14, CHKRELAT+15, CHKRELAT+28, CHKRELAT+29, CHKRELAT+30, CHKRELAT+38, LOOP+1, LOOP+9, LOOP+13, LOOP+16 , LOOP+33, LOOP+34, UPDATE+18, UPDATE+19, REMOVE+20, REMOVE+27 |
| ^TMP($J | CHKRELAT+21!, LOOP+1*, LOOP+13*, LOOP+15, LOOP+18, LOOP+19, LOOP+20, LOOP+32!, LOOP+33*, LOOP+34* , CHKACT+3, CHKACT+4, CHKACT+5, CHKACT+6, UPDATE+8, UPDATE+10, UPDATE+17!, UPDATE+18*, UPDATE+19*, MRGOTHR+3 , MRGOTHR+4, SUCCESS+2, SUCCESS+4, FAILED+3, FAILED+5, FAILED+13! |
| ^XTMP("EASXDR1" | CHKRELAT+22*, LOOP+25*, CHKACT+10*, DEL+5*, REMOVE+8*, REMOVE+14*, REMOVE+18*, REMOVE+30* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTIVFR | CHKRELAT+19~, CHKACT+5*, CHKACT+7 |
| ACTIVTO | CHKRELAT+19~, CHKACT+6*, CHKACT+7 |
| ACTOK | CHKRELAT+18~, LOOP+17* |
| ARYNAM | CHKRELAT+16~, CHKRELAT+26*, CHKRELAT+29, CHKRELAT+30, CHKRELAT+31, CHKRELAT+37 |
| ARYNAM2 | CHKRELAT+16~, CHKRELAT+27*, CHKRELAT+39 |
| DA | DEL+2~, DEL+6* |
| DFNFR | CHKRELAT~, CHKRELAT+12, CHKRELAT+14, LOOP+25, CHKACT+10, DEL+5, REMOVE+3~*, REMOVE+8, REMOVE+14, REMOVE+18 , REMOVE+30 |
| DFNTO | CHKRELAT~, CHKRELAT+13, CHKRELAT+15 |
| DIC | CHKRELAT+17~ |
| DIERR | UPDATE+2~, UPDATE+13 |
| DIK | DEL+2~, DEL+6* |
| EFFDT | CHKRELAT+18~, LOOP+14*, LOOP+15*, LOOP+16, LOOP+18, CHKACT+3, CHKACT+4, CHKACT+9, FAILED+9, FAILED+11 , FAILED+12* |
| EFFDT1 | FAILED+2~, FAILED+9*, FAILED+12 |
| ERR | CHKRELAT+16~ |
| ERRNUM | CHKRELAT+19~, CHKRELAT+41*, LOOP+23*, CHKACT+9* |
| ERROR | CHKRELAT+17~, LOOP+5!, LOOP+6, LOOP+8, LOOP+26, CHKACT+12, REMOVE+4~, REMOVE+9, REMOVE+11, REMOVE+13* , REMOVE+15, REMOVE+17*, REMOVE+19 |
| ERROR( | LOOP+7*, LOOP+10*, LOOP+11, LOOP+23*, CHKACT+9*, CHKACT+10, CHKACT+11 |
| FDA | UPDATE+2~ |
| FDA( | UPDATE+4*, UPDATE+5*, UPDATE+6*, UPDATE+7* |
| FILE | DEL+2~, DEL+3*, DEL+5 |
| FRDATA | CHKRELAT+17~, LOOP+20*, LOOP+21, UPDATE~, UPDATE+1, UPDATE+4, UPDATE+5, UPDATE+6, UPDATE+7 |
| FRIEN | SSNMATCH~, SSNMATCH+2 |
| IEN | DEL~, DEL+1, DEL+4, DEL+5, DEL+6 |
| IEN12FR | CHKRELAT+19~ |
| IEN12TO | CHKRELAT+18~ |
| IEN40812 | REMOVE+4~, REMOVE+6*, REMOVE+9, REMOVE+20, REMOVE+22, REMOVE+23 |
| IEN40813 | REMOVE+4~, REMOVE+21*, REMOVE+24, REMOVE+29, REMOVE+30 |
| IEN40821 | REMOVE+4~, REMOVE+7*, REMOVE+9*, REMOVE+11, REMOVE+16, REMOVE+17, REMOVE+18 |
| IEN40822 | REMOVE+4~, REMOVE+10*, REMOVE+11*, REMOVE+12, REMOVE+13, REMOVE+14 |
| IENROOT | UPDATE+2~, UPDATE+13 |
| IENS | UPDATE+2~, UPDATE+3*, UPDATE+4, UPDATE+5, UPDATE+6, UPDATE+7 |
| MRGARY | CHKRELAT+18~ |
| MRGFRIEN | CHKRELAT+17~, LOOP+2*, LOOP+3*, LOOP+4, LOOP+7, LOOP+8, LOOP+9, LOOP+10, LOOP+11, LOOP+13 , LOOP+15, LOOP+18, LOOP+19, LOOP+20, LOOP+21, LOOP+23, LOOP+25, LOOP+26, LOOP+28, LOOP+29 , LOOP+30, LOOP+31, LOOP+33, CHKACT+3, CHKACT+5, CHKACT+9, CHKACT+10, CHKACT+11, UPDATE~, UPDATE+8 , UPDATE+9, UPDATE+14, UPDATE+15, UPDATE+16, UPDATE+18, MRGOTHR~, MRGOTHR+1, MRGOTHR+3, SUCCESS~, SUCCESS+1 , SUCCESS+2, SUCCESS+3, SUCCESS+6, FAILED~, FAILED+1, FAILED+3, FAILED+4, FAILED+7, FAILED+11, REMOVE~ , REMOVE+1, REMOVE+6, REMOVE+8, REMOVE+14, REMOVE+18, REMOVE+24, REMOVE+28, REMOVE+30, REMOVE+32 |
| MRGROOT | CHKRELAT+18~, CHKRELAT+20*, CHKRELAT+42, CHKRELAT+44, LOOP+3, LOOP+7, LOOP+12, LOOP+29, LOOP+30, LOOP+31 , UPDATE+14, UPDATE+15, UPDATE+16 |
| MRGTOIEN | CHKRELAT+17~, CHKRELAT+43*, CHKRELAT+44*, LOOP+1, LOOP+4, LOOP+7, LOOP+8, LOOP+9, LOOP+11, LOOP+12 , LOOP+16, LOOP+21, LOOP+26, LOOP+28, LOOP+34, CHKACT+4, CHKACT+6, CHKACT+11, UPDATE~, UPDATE+1 , UPDATE+3, UPDATE+10, UPDATE+11, UPDATE+19, MRGOTHR~, MRGOTHR+1, MRGOTHR+4, SUCCESS~, SUCCESS+1, SUCCESS+4 , SUCCESS+5, SUCCESS+6, FAILED~, FAILED+1, FAILED+5, FAILED+6, FAILED+7, FAILED+11, FAILED+13, REMOVE~ , REMOVE+2~*, REMOVE+8, REMOVE+27 |
| MSG | CHKRELAT+17~, DEL+2~, DEL+4*, DEL+6*, DEL+7, FAILED~, FAILED+1, FAILED+8, FAILED+10 |
| MSG12 | REMOVE+5~, REMOVE+22*, REMOVE+23 |
| MSG13 | REMOVE+5~, REMOVE+29*, REMOVE+31 |
| MSG21 | REMOVE+4~, REMOVE+16*, REMOVE+17 |
| MSG22 | REMOVE+4~, REMOVE+12*, REMOVE+13 |
| MSGROOT | UPDATE+2~ |
| MSGROOT("DIERR" | UPDATE+20 |
| NAME | CHKRELAT+17~, CHKRELAT+35!, CHKRELAT+36*, CHKRELAT+37 |
| NAMEFR | UPDATE+2~, UPDATE+8*, UPDATE+9*, UPDATE+11*, MRGOTHR+2~, MRGOTHR+3*, MRGOTHR+5, SUCCESS+2*, SUCCESS+3*, SUCCESS+5* , SUCCESS+6, FAILED+3*, FAILED+4*, FAILED+6*, FAILED+7 |
| NAMETO | UPDATE+2~, UPDATE+10*, UPDATE+11, MRGOTHR+2~, MRGOTHR+4*, MRGOTHR+5, SUCCESS+4*, SUCCESS+5, SUCCESS+6, FAILED+5* , FAILED+6, FAILED+7 |
| NAMFIL | CHKRELAT+16~, CHKRELAT+32*, CHKRELAT+33*, CHKRELAT+34*, CHKRELAT+36 |
| NAMIEN | CHKRELAT+19~, CHKRELAT+32*, CHKRELAT+36 |
| NOMRGMSG | CHKRELAT+16~ |
| OK | CHKRELAT+18~, CHKRELAT+41*, CHKRELAT+45, LOOP+27*, CHKACT+1~, CHKACT+2*, CHKACT+7, CHKACT+8*, CHKACT+12*, CHKACT+13 |
| REASON | CHKRELAT+16~ |
| REL | CHKRELAT+16~, CHKRELAT+25*, CHKRELAT+28, CHKRELAT+29 |
| RELAT | CHKRELAT+16~, CHKRELAT+38*, CHKRELAT+39 |
| RELATE | CHKRELAT+18~, CHKRELAT+41*, CHKRELAT+42*, CHKRELAT+44, LOOP+3, LOOP+6, LOOP+7, LOOP+12, LOOP+29, LOOP+30 , LOOP+31, UPDATE+14, UPDATE+15, UPDATE+16, FAILED+13 |
| RELPNTR | CHKRELAT+17~, CHKRELAT+31*, CHKRELAT+32 |
| ROOT | DEL~, DEL+3, DEL+4, DEL+5, DEL+6 |
| SILENT | CHKRELAT~, LOOP+11, LOOP+28, CHKACT+11 |
| SSNFR | SSNMATCH+1~, SSNMATCH+2, SSNMATCH+3, SSNMATCH+4 |
| SSNTO | SSNMATCH+1~, SSNMATCH+2, SSNMATCH+3 |
| SUBIEN | CHKRELAT+18~, LOOP+18*, LOOP+19, LOOP+20, LOOP+23, LOOP+25 |
| SUBIENFR | CHKRELAT+19~, CHKACT+3*, CHKACT+5, CHKACT+9, CHKACT+10, CHKACT+11 |
| SUBIENTO | CHKRELAT+19~, CHKACT+4*, CHKACT+6 |
| TOIEN | SSNMATCH~, SSNMATCH+2 |
| U | CHKRELAT+22 |
| UPDMSG | CHKRELAT+18~, LOOP+21*, LOOP+22, LOOP+23, LOOP+24, LOOP+25 |
| VARPNT | REMOVE+4~, REMOVE+20*, REMOVE+21, REMOVE+28 |
| VARPNT2 | REMOVE+5~, REMOVE+25*, REMOVE+27*, REMOVE+28 |
| X | CHKRELAT+16~, CHKRELAT+24*, CHKRELAT+25, CHKRELAT+26, CHKRELAT+27, CHKRELAT+28, CHKRELAT+29, CHKRELAT+30, CHKRELAT+31, CHKRELAT+37 , CHKRELAT+38, CHKRELAT+39, DEL+2~ |
| Y | DEL+2~ |