©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
BDGPOST2 ; IHS/ANMC/LJF - ADT POSTINIT CONT. ; [ 04/17/2003 2:09 PM ]
Source file <BDGPOST2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | FILE^DICN ^DIE IXALL^DIK |
| Kernel | 2 | $$REPEAT^XLFSTR (BMES,MES)^XPDUTL |
| IHS Changes To Scheduling | 1 | EVENT^BSDPOST |
| Registration | 1 | ^DGPMDDCN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SIDNR | ;EP;delete all SI/DNR designations for patients not current inpatients
; PIMS will remove designation upon discharge; old version did not |
|
| PROT | ;; Protocols to add to event driver
|
|
| SCHVST | ;EP; copy Scheduled Visit entries to new file
; copy ^ADGAUTH -> ^BDGSV( ; old data will be kept until future patch |
|
| WARD | ;EP; copy IHS ward fields to new file
; ^DIC(42,IHS* -> ^BDGWD( ; will keep old data in file 42 until future patch |
|
| EVQ | ; call Scheduling event driver update
|
|
| DGPM | ;EP; moves fields around in file 405
; old admitting .08 now moved to 9999999.02 ; .08 now primary copied from attending .19 ; visit was 9999999.1 now .27 ; build AAP xref on field .19 attending provider ; Using //// to bypass input transforms to speed up process |
|
| EVENT | ;EP; build event driver menu based on protocols installed
; If you have the following installed, I will add them to event driver |
| Name | Field # of Occurrence |
|---|---|
| EVENT^BSDPOST | EVQ+1 |
| ^DGPMDDCN | DGPM+38 |
| FILE^DICN | EVENT+18 |
| ^DIE | DGPM+29 |
| IXALL^DIK | WARD+23, SCHVST+30 |
| $$REPEAT^XLFSTR | SIDNR+7, DGPM+40, WARD+24, SCHVST+31, EVENT+19 |
| BMES^XPDUTL | SIDNR+2, DGPM+7, WARD+5, SCHVST+5, EVENT+3 |
| MES^XPDUTL | SIDNR+7, DGPM+31, DGPM+34, DGPM+40, WARD+24, SCHVST+31, EVENT+19 |
| FileNo | Call Tags |
|---|---|
| ^DGPM - [#405] | Classic Fileman Calls |
| ^BDGWD - [#9009016.5] | Classic Fileman Calls |
| ^BDGSV - [#9009016.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ADGAUTH - [#9009013.1] | SCHVST+8, SCHVST+9, SCHVST+10, SCHVST+11 |
| ^AUPNVSIT - [#9000010] | DGPM+20, DGPM+21 |
| ^BDGSV - [#9009016.7] | SCHVST+14*, SCHVST+19*, SCHVST+21*, SCHVST+24*, SCHVST+27*, SCHVST+28* |
| ^BDGSV(0 | SCHVST+4, SCHVST+15* |
| ^BDGWD - [#9009016.5] | WARD+12*, WARD+13*, WARD+17*, WARD+18*, WARD+19*, WARD+21* |
| ^BDGWD(0 | WARD+4, WARD+14* |
| ^BDGX(11 | DGPM+6, DGPM+18*, DGPM+19*, DGPM+20*, DGPM+21*, DGPM+31 |
| ^DGPM - [#405] | DGPM+10, DGPM+11, DGPM+12, DGPM+13, DGPM+14 |
| ^DGPM("CN" | DGPM+36, DGPM+37 |
| ^DIC(42 - [#42] | WARD+8, WARD+9, WARD+12, WARD+17, WARD+20 |
| ^DPT - [#2] | SIDNR+6! |
| ^DPT("AS" | SIDNR+4, SIDNR+5, SIDNR+6! |
| ^ORD(101 - [#101] | EVENT+5, EVENT+10, EVENT+11, EVENT+12 |
| ^VA(200 - [#200] | DGPM+18, DGPM+19 |
| Name | Line Occurrences |
|---|---|
| EVQ | EVENT+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADM | DGPM+9~, DGPM+12*, DGPM+15, DGPM+19*, DGPM+24, DGPM+27 |
| ATT | DGPM+9~, DGPM+13*, DGPM+15, DGPM+18*, DGPM+23, DGPM+27 |
| BDGE | EVENT+4~, EVENT+5*, EVENT+12, EVENT+15, EVENT+16 |
| >> BDGI | EVENT+9* |
| COND | SIDNR+3~, SIDNR+4*, SIDNR+5, SIDNR+6 |
| DA | DGPM+9~, DGPM+29*, DGPM+35~, DGPM+38* |
| DA(1 | EVENT+16* |
| DATA | WARD+7~, WARD+20*, WARD+21, SCHVST+7~, SCHVST+11*, SCHVST+19, SCHVST+21, SCHVST+24 |
| DD | EVENT+18! |
| DFN | SCHVST+7~, SCHVST+9*, SCHVST+14 |
| DGPMDDF | DGPM+35~, DGPM+38* |
| DGPMDDT | DGPM+35~, DGPM+38* |
| >> DIC | EVENT+15* |
| >> DIC("DR" | EVENT+17* |
| >> DIC("P" | EVENT+16* |
| >> DIC(0 | EVENT+15* |
| DIE | DGPM+9~, DGPM+29* |
| DIK | DGPM+9~, WARD+7~, WARD+23*, SCHVST+7~, SCHVST+30* |
| >> DLAYGO | EVENT+15* |
| DO | EVENT+18! |
| DR | DGPM+9~, DGPM+23*, DGPM+24*, DGPM+27*, DGPM+28*, DGPM+29 |
| I | WARD+7~, WARD+21*, SCHVST+7~, SCHVST+18*, SCHVST+19, SCHVST+23*, SCHVST+24 |
| IEN | SIDNR+3~, SIDNR+5*, SIDNR+6, DGPM+9~, DGPM+10*, DGPM+11, DGPM+12, DGPM+13, DGPM+14, DGPM+18 , DGPM+19, DGPM+20, DGPM+21, DGPM+29, DGPM+35~, DGPM+37*, DGPM+38, EVENT+4~, EVENT+11*, EVENT+12 , EVENT+16 |
| INA | WARD+7~, WARD+9*, WARD+13 |
| ITEM | EVENT+4~, EVENT+9*, EVENT+10, EVENT+11 |
| NEW | SCHVST+7~, SCHVST+14*, SCHVST+15, SCHVST+19, SCHVST+21, SCHVST+24, SCHVST+27, SCHVST+28 |
| OLD | SCHVST+7~, SCHVST+8*, SCHVST+9, SCHVST+10, SCHVST+11 |
| OLD1 | SCHVST+7~, SCHVST+10*, SCHVST+11 |
| U | DGPM+12, DGPM+13, DGPM+14, DGPM+21, WARD+9, WARD+12, WARD+13, WARD+14, WARD+18, WARD+19 , WARD+21, SCHVST+15, SCHVST+19, SCHVST+21, SCHVST+24, SCHVST+27, SCHVST+28 |
| VST | DGPM+9~, DGPM+14*, DGPM+15, DGPM+20*, DGPM+21*, DGPM+28 |
| WARD | DGPM+35~, DGPM+36*, DGPM+37 |
| WRD | WARD+7~, WARD+8*, WARD+9, WARD+12, WARD+13, WARD+14, WARD+17, WARD+18, WARD+19, WARD+20 , WARD+21 |
| X | SIDNR+7!*, DGPM+31!*, DGPM+34!*, DGPM+40!*, WARD+19*, WARD+24!*, SCHVST+31!*, EVENT+16*, EVENT+19!* |
| Name | Field # of Occurrence |
|---|---|
| $T(PROT+BDGI | EVENT+9, EVENT+17 |