©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
TIUHL7P3 ; SLC/AJB - TIUHL7 Msg Processing; March 23, 2005
Source file <TIUHL7P3.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 10 | (SEND,SENDADD)^TIUALRT $$EXIST^TIUEDI3 ($$CANEDIT,$$GETDIV,$$MEMBEROF,ACK,AUDIT,ERR,SIGNDOC)^TIUHL7U1 (DOCPRM,MAKEADD)^TIUHL7U2 $$CHKSUM^TIULC DELTEXT^TIUPUTPN ($$FINDCASE,$$GETSDA,FOLLOWUP)^TIUPUTS TIUVISIT^TIUSRVA (FILE,MAKE)^TIUSRVP SETTEXT^TIUSRVPT |
| Consult Request Tracking | 2 | $$CPPAT^GMRCCP GET^GMRCTIU |
| Kernel | 1 | ($$FMTE,$$NOW)^XLFDT |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CONTINUE | ;
|
|
| MAKEADD | ;
; validate CONSULT title |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | CONTINUE+29, CONTINUE+30, MAKEADD+4 |
| $$CPPAT^GMRCCP | MAKEADD+4 |
| GET^GMRCTIU | MAKEADD+70 |
| SEND^TIUALRT | MAKEADD+37, MAKEADD+50, MAKEADD+73 |
| SENDADD^TIUALRT | MAKEADD+37 |
| $$EXIST^TIUEDI3 | CONTINUE+4 |
| $$CANEDIT^TIUHL7U1 | CONTINUE+33, MAKEADD+29, MAKEADD+40 |
| $$GETDIV^TIUHL7U1 | MAKEADD+11 |
| $$MEMBEROF^TIUHL7U1 | CONTINUE+3, CONTINUE+10, CONTINUE+11, CONTINUE+18, MAKEADD+2, MAKEADD+67 |
| ACK^TIUHL7U1 | CONTINUE+15, CONTINUE+36, CONTINUE+39, CONTINUE+40, MAKEADD+7, MAKEADD+34, MAKEADD+36, MAKEADD+37, MAKEADD+47, MAKEADD+49 , MAKEADD+50, MAKEADD+52, MAKEADD+59, MAKEADD+64, MAKEADD+72 |
| AUDIT^TIUHL7U1 | MAKEADD+74 |
| ERR^TIUHL7U1 | CONTINUE+4, CONTINUE+12, CONTINUE+21, CONTINUE+22, CONTINUE+23, CONTINUE+24, CONTINUE+25, CONTINUE+29, CONTINUE+30, CONTINUE+31 , CONTINUE+35, MAKEADD+3, MAKEADD+4, MAKEADD+33, MAKEADD+44, MAKEADD+46, MAKEADD+59 |
| SIGNDOC^TIUHL7U1 | CONTINUE+39, MAKEADD+36, MAKEADD+49, MAKEADD+64 |
| DOCPRM^TIUHL7U2 | CONTINUE+7 |
| MAKEADD^TIUHL7U2 | MAKEADD+32 |
| $$CHKSUM^TIULC | MAKEADD+74 |
| DELTEXT^TIUPUTPN | MAKEADD+42 |
| $$FINDCASE^TIUPUTS | CONTINUE+22 |
| $$GETSDA^TIUPUTS | CONTINUE+23 |
| FOLLOWUP^TIUPUTS | CONTINUE+37 |
| TIUVISIT^TIUSRVA | CONTINUE+3 |
| FILE^TIUSRVP | MAKEADD+45 |
| MAKE^TIUSRVP | MAKEADD+56 |
| SETTEXT^TIUSRVPT | CONTINUE+34, MAKEADD+43 |
| $$FMTE^XLFDT | CONTINUE+22, CONTINUE+31 |
| $$NOW^XLFDT | MAKEADD+16, MAKEADD+17, MAKEADD+61 |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^DPT - [#2] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SRF - [#130] | CONTINUE+23, CONTINUE+27 |
| ^TIU(8925 - [#8925] | CONTINUE+27, CONTINUE+38*, MAKEADD+35*, MAKEADD+48*, MAKEADD+60*, MAKEADD+61*, MAKEADD+68 |
| Name | Line Occurrences |
|---|---|
| MAKEADD | CONTINUE+33 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | CONTINUE+3, CONTINUE+4, CONTINUE+22, CONTINUE+29, CONTINUE+30, MAKEADD+4, MAKEADD+56 |
| DUZ | MAKEADD+11* |
| DUZ(2 | MAKEADD+11* |
| PERSON | MAKEADD+30~, MAKEADD+31* |
| SDCNT | MAKEADD+55~ |
| SUCCESS | CONTINUE+19~, CONTINUE+34, CONTINUE+35, MAKEADD+30~, MAKEADD+32, MAKEADD+33, MAKEADD+35, MAKEADD+36, MAKEADD+37, MAKEADD+41~ , MAKEADD+43, MAKEADD+44, MAKEADD+45, MAKEADD+46, MAKEADD+48, MAKEADD+49 |
| >> TIU("AUDA" | CONTINUE+4, CONTINUE+38, MAKEADD+11, MAKEADD+18, MAKEADD+19, MAKEADD+23, MAKEADD+31, MAKEADD+35, MAKEADD+48, MAKEADD+60 , MAKEADD+70 |
| >> TIU("CNCN" | MAKEADD+3, MAKEADD+4, MAKEADD+5, MAKEADD+70 |
| >> TIU("CSDA" | MAKEADD+20 |
| >> TIU("DICDT" | MAKEADD+24 |
| >> TIU("DIVISION" | MAKEADD+11*, MAKEADD+21 |
| >> TIU("EBDA" | CONTINUE+38, MAKEADD+23*, MAKEADD+35, MAKEADD+48, MAKEADD+60 |
| >> TIU("EC" | CONTINUE+15, CONTINUE+26, CONTINUE+32, CONTINUE+33, CONTINUE+36, CONTINUE+39, MAKEADD+7, MAKEADD+29, MAKEADD+34, MAKEADD+36 , MAKEADD+40, MAKEADD+47, MAKEADD+49, MAKEADD+52, MAKEADD+64 |
| >> TIU("EPDT" | CONTINUE+20, CONTINUE+28*, MAKEADD+16, MAKEADD+61 |
| >> TIU("PTNAME" | MAKEADD+4 |
| >> TIU("RFDT" | MAKEADD+16, MAKEADD+22, MAKEADD+61 |
| >> TIU("SRCN" | CONTINUE+20 |
| >> TIU("SUB" | MAKEADD+25 |
| >> TIU("TDA" | CONTINUE+3, CONTINUE+4, CONTINUE+7, MAKEADD+56 |
| >> TIU("TITLE" | CONTINUE+3, CONTINUE+4, CONTINUE+10, CONTINUE+11, CONTINUE+12, CONTINUE+18, CONTINUE+23, CONTINUE+25, CONTINUE+30, MAKEADD+2 , MAKEADD+67 |
| >> TIU("VSTR" | CONTINUE+3, CONTINUE+4, MAKEADD+56 |
| TIUD0 | CONTINUE+19~, CONTINUE+27*, CONTINUE+30 |
| TIUDA | CONTINUE+4*, CONTINUE+19~, CONTINUE+20*, CONTINUE+23*, CONTINUE+25, CONTINUE+27, CONTINUE+33, CONTINUE+34, CONTINUE+37, CONTINUE+38 , CONTINUE+39, CONTINUE+40, MAKEADD+29, MAKEADD+32, MAKEADD+37, MAKEADD+40, MAKEADD+42, MAKEADD+43, MAKEADD+45, MAKEADD+50 , MAKEADD+56, MAKEADD+59, MAKEADD+60, MAKEADD+61, MAKEADD+64, MAKEADD+68, MAKEADD+70, MAKEADD+72, MAKEADD+73, MAKEADD+74 |
| TIUDAD | CONTINUE+19~ |
| TIUDIV1 | MAKEADD+55~ |
| >> TIUDPRM | CONTINUE+7 |
| >> TIUDPRM(0 | MAKEADD+12, MAKEADD+13 |
| TIUFPRIV | MAKEADD+55~ |
| >> TIUNAME | CONTINUE+15, CONTINUE+36, CONTINUE+39, CONTINUE+40, MAKEADD+7, MAKEADD+34, MAKEADD+36, MAKEADD+37, MAKEADD+47, MAKEADD+49 , MAKEADD+50, MAKEADD+52, MAKEADD+59, MAKEADD+64, MAKEADD+72 |
| TIUOPDT | CONTINUE+19~, CONTINUE+20*, CONTINUE+21, CONTINUE+22, CONTINUE+28*, CONTINUE+31 |
| TIUPRM0 | MAKEADD+55~ |
| TIUPRM1 | MAKEADD+55~ |
| TIUSR0 | CONTINUE+19~, CONTINUE+27*, CONTINUE+28, CONTINUE+29, CONTINUE+31 |
| TIUSRCN | CONTINUE+19~, CONTINUE+20*, CONTINUE+21, CONTINUE+22*, CONTINUE+23, CONTINUE+24, CONTINUE+25, CONTINUE+27, CONTINUE+29, CONTINUE+31 |
| TIUSTAT | CONTINUE+19~, MAKEADD+68~*, MAKEADD+69*, MAKEADD+70 |
| >> TIUTMP | CONTINUE+3 |
| >> TIUZ | CONTINUE+34, MAKEADD+32, MAKEADD+43, MAKEADD+45, MAKEADD+56 |
| >> TIUZ( | MAKEADD+12*, MAKEADD+13*, MAKEADD+14*, MAKEADD+16* |
| >> TIUZ("HDR" | CONTINUE+34*, MAKEADD+43*! |
| >> TIUZ("TEXT" | MAKEADD+43! |
| >> TIUZ(1201 | MAKEADD+17* |
| >> TIUZ(1202 | MAKEADD+18* |
| >> TIUZ(1204 | MAKEADD+19* |
| >> TIUZ(1208 | MAKEADD+20* |
| >> TIUZ(1212 | MAKEADD+21* |
| >> TIUZ(1301 | MAKEADD+22* |
| >> TIUZ(1302 | MAKEADD+23* |
| >> TIUZ(1307 | MAKEADD+24* |
| >> TIUZ(1405 | MAKEADD+5* |
| >> TIUZ(1701 | MAKEADD+25* |
| U | CONTINUE+28, CONTINUE+30, CONTINUE+31, CONTINUE+38, MAKEADD+12, MAKEADD+13, MAKEADD+33, MAKEADD+35, MAKEADD+44, MAKEADD+46 , MAKEADD+48, MAKEADD+59, MAKEADD+60, MAKEADD+61, MAKEADD+68 |