©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
BEHODC7 ;MSC/IND/MGH - TIU Dictation Support ;20-Mar-2007 13:48;DKM
Source file <BEHODC7.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Electronic Health Record | 3 | (KIL,PID)^BEHODC6 GETOBX^BEHODC7 (BOTH,GENACK)^BEHODC8 |
| Text Integration Utility | 3 | SEND^TIUALRT $$UPPER^TIULS (UPDATE,UPDSTAT)^TIUSRVP |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Electronic Health Record | 2 | BEHODC6 BEHODC7 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PROCESS | ;EP - Get message one line at a time
|
|
| UPDATE | ;End of text; call routine to file data
|
|
| NEXT | ||
| OBX | ; Process OBX
|
|
| KIL | ; Kill Variables
|
|
| AGTEXT() | ; EP
|
|
| OBR | ; Check OBR
|
|
| ORC | ; Check ORC
|
|
| GETOBX | ;EP - Get the OBX data to store
|
| Name | Field # of Occurrence |
|---|---|
| KIL^BEHODC6 | PROCESS+6, ORC+3, OBR+11, OBR+14, OBR+16, OBR+22, OBR+24, OBR+35, OBR+46, OBR+48 , OBR+49, OBX+4, NEXT+3, UPDATE+11, KIL+1 |
| PID^BEHODC6 | PROCESS+8 |
| GETOBX^BEHODC7 | NEXT+2 |
| BOTH^BEHODC8 | PROCESS+6, ORC+3, OBR+11, OBR+14, OBR+16, OBR+22, OBR+24, OBR+35, OBR+46, OBR+48 , OBR+49, OBR+51, OBX+4, NEXT+3, UPDATE+11 |
| GENACK^BEHODC8 | UPDATE+12 |
| SEND^TIUALRT | UPDATE+10 |
| $$UPPER^TIULS | OBR+34 |
| UPDATE^TIUSRVP | UPDATE+5 |
| UPDSTAT^TIUSRVP | UPDATE+9 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | OBR+41, OBR+42, OBR+44, OBR+47, UPDATE+8 |
| ^TIU(8925.1 - [#8925.1] | OBR+34 |
| ^VA(200 - [#200] | OBR+22, OBR+24 |
| ^XTV(8989.3 - [#8989.3] | AGTEXT+1 |
| Name | Line Occurrences |
|---|---|
| $$AGTEXT | OBR+22, OBR+24 |
| GETOBX | OBX+6 |
| KIL | UPDATE+13 |
| NEXT | GETOBX+7 |
| ORC | PROCESS+12 |
| UPDATE | NEXT+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | PROCESS+2~, OBR+30*, OBR+33 |
| BEHCASE | PROCESS+3~ |
| BEHDATE | PROCESS+3~ |
| BEHDOC | PROCESS+1~ |
| BEHDOCID | PROCESS+1~, OBR+21*, OBR+22, OBR+25 |
| BEHEXAM | PROCESS+2~, OBR+30*, OBR+31, OBR+33 |
| BEHFILER | PROCESS+3~, OBR+7~, OBR+17* |
| BEHI | PROCESS+3~, OBX+1*, OBX+5*, GETOBX+3, GETOBX+5, GETOBX+6* |
| BEHID | PROCESS+2~, ORC+4* |
| BEHLOC | PROCESS+3~ |
| BEHNEW | OBR+7~, OBR+8* |
| >> BEHNUM | PROCESS+6, PROCESS+10*, PROCESS+11, ORC+2, ORC+5*, OBR+9, OBR+50*, OBX+2, NEXT*, NEXT+1 , NEXT+2, GETOBX+1, GETOBX+2 |
| BEHORIFN | PROCESS+1~ |
| BEHPLACE | PROCESS+3~, OBR+7~, OBR+17* |
| BEHREC | PROCESS+3~ |
| BEHSDOC | OBR+7~ |
| BEHSIGN | OBR+7~, OBR+21* |
| BEHSTAT | PROCESS+2~, OBR+7~, OBR+12*, OBR+14 |
| BEHSTORE | PROCESS+3~ |
| BEHTEMP | PROCESS+1~ |
| BEHTYPE | PROCESS+2~ |
| BEHUTHID | OBR+7~, OBR+23*, OBR+24, OBR+26, OBR+49 |
| BEHUTHOR | OBR+7~, OBR+23* |
| DATE | PROCESS+1~ |
| >> DFN | PROCESS+9, ORC+3, OBR+11, OBR+14, OBR+16, OBR+22, OBR+24, OBR+35, OBR+46, OBR+48 , OBR+49, OBR+51, OBX+4, NEXT+3, UPDATE+11 |
| DTO | PROCESS+1~ |
| ERRTX | PROCESS+1~, PROCESS+5*, PROCESS+6*, ORC+3*, OBR+11*, OBR+14*, OBR+16*, OBR+22*, OBR+24*, OBR+35* , OBR+46*, OBR+48*, OBR+49*, OBR+51, OBX+4*, NEXT+3*, UPDATE+11* |
| >> EVNDT | PROCESS+6, ORC+3, OBR+11, OBR+14, OBR+16, OBR+22, OBR+24, OBR+35, OBR+46, OBR+48 , OBR+49, OBR+51, OBX+4, NEXT+3, UPDATE+11 |
| >> HLCOMP | OBR+31, OBR+33 |
| >> HLFS | ORC+4, OBR+12, OBR+15, OBR+17, OBR+21, OBR+23, OBR+30, GETOBX+1, GETOBX+2 |
| HLMG | PROCESS+2~, UPDATE+7* |
| >> HLSUB | OBR+21, OBR+23 |
| J | PROCESS+1~ |
| LINE | PROCESS+1~, GETOBX+2*, GETOBX+4*, GETOBX+5 |
| >> MSG( | PROCESS+6, PROCESS+11, ORC+2, OBR+9, OBX+2, NEXT+1, NEXT+2, GETOBX+1, GETOBX+2 |
| NEXT | PROCESS+2~ |
| >> SEG("OBR" | OBR+10* |
| >> SEG("OBX" | OBX+3* |
| SEP | PROCESS+1~ |
| SEQ | PROCESS+4~, GETOBX+1*, GETOBX+3 |
| SET | PROCESS+2~ |
| SUCCESS | PROCESS+2~, UPDATE+5, UPDATE+6, UPDATE+7, UPDATE+8, UPDATE+9, UPDATE+10, UPDATE+11 |
| TITLE | PROCESS+4~ |
| >> TIUAUTH | OBR+47*, OBR+49 |
| >> TIUD0 | UPDATE+8*, UPDATE+9 |
| >> TIUDA | OBR+15*, OBR+16, OBR+41, OBR+42, OBR+44, OBR+47, UPDATE+5 |
| TIUDOC | PROCESS+4~, OBR+44*, OBR+46 |
| >> TIUEXAM | OBR+31*, OBR+34*, OBR+45, OBR+46 |
| TIUPT | PROCESS+4~, OBR+42*, OBR+48 |
| >> TIUTITLE | OBR+33*, OBR+34*, OBR+35 |
| >> TIUX | UPDATE+5 |
| >> TIUX( | OBR+41* |
| >> TIUX("TEXT" | GETOBX+5* |
| >> TIUX(1202 | OBR+25* |
| >> TIUX(1204 | OBR+26* |
| U | OBR+41, OBR+42, OBR+44, OBR+47, UPDATE+9, AGTEXT+1 |
| X | PROCESS+1~, PROCESS+6*, ORC+2*, ORC+3, ORC+4, OBR+9*, OBR+10, OBR+11, OBR+12, OBR+15 , OBR+17, OBR+21, OBR+23, OBR+30, OBX+2*, OBX+3, OBX+4 |
| Y | PROCESS+1~ |