©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BPMMRG ; IHS/OIT/LJF - IHS CODE CALLED BY MERGE FUNCTION
Source file <BPMMRG.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 5 | ^DIC ^DIE (,ENALL)^DIK $$GET1^DIQ ^DIR |
| IHS Patient | 2 | KILL^AUPNPAT MOD^AUPNVSIT |
| Kernel | 2 | HOME^%ZIS ^%ZISC |
| Health Summary | 1 | ENX^GMTSDVR |
| IHS Patient Merge | 1 | ($$READ,PAUSE,ZIS)^BPMU |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Patient Merge | 3 | BPM PRINT HS VERIFIED BPM RESET LOST MERGE BPMXDRV |
| Toolkit | 1 | XDRMERG |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DWAUD(ARRAY) | ;EP; remove DW Audit entries for all FROM patients in batch
; called by DQ^XDRMERG0 |
|
| FIX | ;EP; clean up process stopped by error
|
|
| UPD(DA) | ;IHS/PAO/AEF
|
|
| ENDMRG(XDRFR,BPMTO,I) | ;EP; perform end of merge steps
; called by CLOSEIT^XDRMERG |
|
| HSQUE | ;EP; loop thru pair and print health summaries (VA type)
; Called by HSUM^BPMMRG (see above) ; variables BPMREC1, BPMREC2 & BPMHST set by ZTLOAD if queued |
|
| HSUM | ;EP; print health summaries for verified or merged pairs
; Called by option BPM HS PRINT VERIFIED |
|
| VISITS(BPMRY) | ;EP ; flag all visits to be repointed before merge runs
; insures visits are re-exported with new patient pointer ; called by EN^BPMXDRV |
|
| PKG | ;EP; check to make sure Package file is clean before merge runs
; Called by XDRMERG0 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(15 - [#15] | GET1^DIQ |
| ^VA(15.2 - [#15.2] | Classic Fileman Calls |
| ^DIC(9.4 - [#9.4] | Classic Fileman Calls, GET1^DIQ |
| ^AUPNPAT - [#9000001] | Classic Fileman Calls |
| ^AUPNDWAF - [#9000003.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNDWAF - [#9000003.3] | ENDMRG+11* |
| ^AUPNDWAF("B" | ENDMRG+12* |
| ^AUPNPAT - [#9000001] | ENDMRG+6*, ENDMRG+7* |
| ^AUPNVSIT("AC" | VISITS+5 |
| ^DIC(9.4 - [#9.4] | PKG+4, PKG+6!, PKG+9!, PKG+12 |
| ^GMT(142 - [#142] | HSUM+3 |
| ^VA(15.2 - [#15.2] | FIX+3, FIX+5 |
| Name | Line Occurrences |
|---|---|
| UPD | ENDMRG+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | FIX+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | DWAUD~, DWAUD+3 |
| AUPNLK | HSUM+15~ |
| AUPNLK("ALL" | HSUM+15* |
| AUPNVSIT | VISITS+3~, VISITS+6* |
| BPMC | FIX+2~, FIX+3*, FIX+4*, FIX+9 |
| BPMHST | HSUM+2~, HSUM+3*, HSUM+4, HSQUE+4 |
| BPMI | HSQUE+3~, HSQUE+4*, FIX+2~, FIX+3*, FIX+5, FIX+7 |
| BPMREC1 | HSUM+2~, HSUM+17*, HSQUE+4 |
| BPMREC2 | HSUM+2~, HSUM+18*, HSQUE+4 |
| BPMRY | VISITS~, VISITS+4 |
| BPMSTAT | HSUM+2~, HSUM+8*, HSUM+9, HSUM+10, HSUM+11, HSUM+12 |
| BPMTO | ENDMRG~, ENDMRG+3, ENDMRG+7 |
| DA | PKG+2~, DWAUD+2~, DWAUD+4*, UPD~, FIX+2~, FIX+7* |
| DA(1 | PKG+11*, PKG+12* |
| DIC | HSUM+2~, HSUM+16* |
| DIC("A" | HSUM+16* |
| DIC("S" | HSUM+16* |
| DIC(0 | HSUM+16* |
| DIE | UPD+2~, UPD+3*, FIX+2~, FIX+7*, FIX+8! |
| DIK | PKG+2~, PKG+10~*, DWAUD+2~, DWAUD+4* |
| DIK(1 | PKG+10* |
| DIR | UPD+2~, FIX+2~, FIX+6! |
| DIR("A" | FIX+5* |
| DIR(0 | FIX+5* |
| DR | UPD+4*, FIX+2~, FIX+7*, FIX+8! |
| DT | ENDMRG+11, UPD+4 |
| DUZ | UPD+4 |
| FROM | DWAUD+2~, DWAUD+3*, DWAUD+4, VISITS+3~, VISITS+4*, VISITS+5 |
| HRCN | HSQUE+5! |
| I | ENDMRG~, ENDMRG+5 |
| IEN | PKG+2~, PKG+3*, PKG+4*, PKG+5, PKG+6 |
| SCREEN | HSUM+2~, HSUM+10*, HSUM+11*, HSUM+12*, HSUM+16 |
| U | ENDMRG+11, FIX+3, FIX+5 |
| VST | VISITS+3~, VISITS+5*, VISITS+6 |
| X | UPD+2~, HSUM+2~ |
| XDRFR | ENDMRG~, ENDMRG+6, ENDMRG+7, ENDMRG+11, ENDMRG+12 |
| Y | UPD+2~, HSUM+2~, HSUM+16, HSUM+17, HSUM+18, FIX+6 |