TIUCCRHL7P3 ; CCRA/PB - TIUHL7 Msg Processing; March 23, 2005
Source file <TIUCCRHL7P3.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 9 | SEND^TIUALRT (ACK,ANAK)^TIUCCHL7UT (MAKE,SIGNDOC)^TIUCCRHL7P2 ($$CANEDIT,$$GETDIV,$$MEMBEROF,AUDIT,SIGNDOC)^TIUHL7U1 (DOCPRM,MAKEADD)^TIUHL7U2 $$CHKSUM^TIULC DELTEXT^TIUPUTPN FILE^TIUSRVP SETTEXT^TIUSRVPT |
| Consult Request Tracking | 1 | CMT^GMRCGUIB |
| Health Level Seven | 1 | $$FMDATE^HLFNC |
| Kernel | 1 | ($$FMTE,$$NOW)^XLFDT |
| MailMan | 1 | ^XMD |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
|---|---|---|
| CONTINUE | ;
|
|
| MAKEADD | ;
; validate CONSULT title ; set appropriate DOCUMENT STATUS from document parameters |
|
| MESSAGE(MSGID,VNUM,MSGTEXT) | ; Send a MailMan Message with the errors
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | MAKEADD+49 |
| CMT^GMRCGUIB | MAKEADD+30 |
| $$FMDATE^HLFNC | MESSAGE+2 |
| SEND^TIUALRT | MAKEADD+61 |
| ACK^TIUCCHL7UT | CONTINUE+4, MAKEADD+32, MAKEADD+46, MAKEADD+51, MAKEADD+60 |
| ANAK^TIUCCHL7UT | MAKEADD+26, MAKEADD+39, MAKEADD+42, MAKEADD+53 |
| MAKE^TIUCCRHL7P2 | MAKEADD+50 |
| SIGNDOC^TIUCCRHL7P2 | MAKEADD+51 |
| $$CANEDIT^TIUHL7U1 | MAKEADD+21, MAKEADD+35 |
| $$GETDIV^TIUHL7U1 | MAKEADD+3 |
| $$MEMBEROF^TIUHL7U1 | MAKEADD+57 |
| AUDIT^TIUHL7U1 | MAKEADD+62 |
| SIGNDOC^TIUHL7U1 | MAKEADD+32, MAKEADD+45 |
| DOCPRM^TIUHL7U2 | CONTINUE+3 |
| MAKEADD^TIUHL7U2 | MAKEADD+24 |
| $$CHKSUM^TIULC | MAKEADD+62 |
| DELTEXT^TIUPUTPN | MAKEADD+37 |
| FILE^TIUSRVP | MAKEADD+41 |
| SETTEXT^TIUSRVPT | MAKEADD+38 |
| $$FMTE^XLFDT | MESSAGE+2 |
| $$NOW^XLFDT | MAKEADD+7, MAKEADD+8, MAKEADD+29, MAKEADD+55 |
| ^XMD | MESSAGE+13 |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> CFNOTE | MAKEADD+29 |
| COMMENT | MAKEADD+28~, MAKEADD+30 |
| COMMENT(1 | MAKEADD+29* |
| >> CONSULTID | MAKEADD+26, MAKEADD+29, MAKEADD+39, MAKEADD+42, MAKEADD+49, MAKEADD+53 |
| DATE | MESSAGE+1~, MESSAGE+2*, MESSAGE+7 |
| >> DFN | MAKEADD+50 |
| DIFROM | MESSAGE+1~ |
| DUZ | MAKEADD+3*, MAKEADD+30, MESSAGE+1~ |
| DUZ(2 | MAKEADD+3* |
| FLG1 | MESSAGE+1~ |
| >> GMRCDA | MAKEADD+29*, MAKEADD+30 |
| >> HL("DTM" | MESSAGE+2 |
| >> HL("MID" | CONTINUE+4, MAKEADD+32, MAKEADD+46, MAKEADD+51, MAKEADD+60 |
| J | MESSAGE+1~ |
| MID | MESSAGE+1~ |
| MSGID | MAKEADD+26, MAKEADD+39, MAKEADD+42, MAKEADD+53, MESSAGE~, MESSAGE+8 |
| MSGTEXT | MAKEADD+26*, MAKEADD+39*, MAKEADD+42*, MAKEADD+53*, MESSAGE~, MESSAGE+6 |
| MSGTEXT(1 | MESSAGE+4* |
| MSGTEXT(2 | MESSAGE+5* |
| MSGTEXT(3 | MESSAGE+6* |
| MSGTEXT(4 | MESSAGE+7* |
| MSGTEXT(5 | MESSAGE+8* |
| NOTEDT | MAKEADD+28~, MAKEADD+29*, MAKEADD+30 |
| ORIGSTAT | MAKEADD+48~, MAKEADD+49* |
| PERSON | MAKEADD+22~, MAKEADD+23* |
| SDCNT | MAKEADD+48~ |
| >> STOP | MAKEADD+26*, MAKEADD+27, MAKEADD+39*, MAKEADD+40, MAKEADD+42*, MAKEADD+43 |
| SUCCESS | MAKEADD+22~, MAKEADD+24, MAKEADD+26, MAKEADD+31, MAKEADD+32, MAKEADD+36~, MAKEADD+38, MAKEADD+39, MAKEADD+41, MAKEADD+42 , MAKEADD+44, MAKEADD+45 |
| >> TIU("AUDA" | MAKEADD+3, MAKEADD+9, MAKEADD+10, MAKEADD+16, MAKEADD+23, MAKEADD+31, MAKEADD+44, MAKEADD+54 |
| >> TIU("CSDA" | MAKEADD+11 |
| >> TIU("DICDT" | MAKEADD+17 |
| >> TIU("DIVISION" | MAKEADD+3*, MAKEADD+14 |
| >> TIU("EBDA" | MAKEADD+16*, MAKEADD+31, MAKEADD+44, MAKEADD+54 |
| >> TIU("EC" | CONTINUE+4, MAKEADD+21, MAKEADD+32, MAKEADD+35, MAKEADD+45, MAKEADD+46, MAKEADD+51 |
| >> TIU("EPDT" | MAKEADD+7, MAKEADD+55 |
| >> TIU("RFDT" | MAKEADD+7, MAKEADD+15, MAKEADD+55 |
| >> TIU("SUB" | MAKEADD+18 |
| >> TIU("TDA" | CONTINUE+3, MAKEADD+50 |
| >> TIU("TITLE" | MAKEADD+57 |
| >> TIU("VSTR" | MAKEADD+50 |
| >> TIUDA | CONTINUE+1*, MAKEADD+21, MAKEADD+24, MAKEADD+35, MAKEADD+37, MAKEADD+38, MAKEADD+41, MAKEADD+50, MAKEADD+51, MAKEADD+53 , MAKEADD+54, MAKEADD+55, MAKEADD+58, MAKEADD+60, MAKEADD+61, MAKEADD+62 |
| TIUDIV1 | MAKEADD+48~ |
| >> TIUDPRM | CONTINUE+3 |
| >> TIUDPRM(0 | MAKEADD+4, MAKEADD+5 |
| TIUFPRIV | MAKEADD+48~ |
| >> TIUIEN | CONTINUE+1 |
| >> TIUNAME | CONTINUE+4, MAKEADD+32, MAKEADD+46, MAKEADD+51, MAKEADD+60 |
| TIUPRM0 | MAKEADD+48~ |
| TIUPRM1 | MAKEADD+48~ |
| TIUSTAT | MAKEADD+58~*, MAKEADD+59* |
| >> TIUZ | MAKEADD+24, MAKEADD+38, MAKEADD+41, MAKEADD+50 |
| >> TIUZ( | MAKEADD+4*, MAKEADD+5*, MAKEADD+6*, MAKEADD+7* |
| >> TIUZ("HDR" | MAKEADD+38*! |
| >> TIUZ("TEXT" | MAKEADD+38! |
| >> TIUZ(1201 | MAKEADD+8* |
| >> TIUZ(1202 | MAKEADD+9* |
| >> TIUZ(1204 | MAKEADD+10* |
| >> TIUZ(1205 | MAKEADD+12* |
| >> TIUZ(1208 | MAKEADD+11* |
| >> TIUZ(1211 | MAKEADD+13* |
| >> TIUZ(1212 | MAKEADD+14* |
| >> TIUZ(1301 | MAKEADD+15* |
| >> TIUZ(1302 | MAKEADD+16* |
| >> TIUZ(1307 | MAKEADD+17* |
| >> TIUZ(1701 | MAKEADD+18* |
| U | MAKEADD+4, MAKEADD+5, MAKEADD+26, MAKEADD+31, MAKEADD+39, MAKEADD+42, MAKEADD+44, MAKEADD+53, MAKEADD+54, MAKEADD+55 , MAKEADD+58 |
| >> VLOC | MAKEADD+12, MAKEADD+13 |
| VNUM | MESSAGE~, MESSAGE+3, MESSAGE+5 |
| XMDUZ | MESSAGE+1~, MESSAGE+10*, MESSAGE+11* |
| XMMG | MESSAGE+1~ |
| XMROU | MESSAGE+1~ |
| XMSTRIP | MESSAGE+1~ |
| XMSUB | MESSAGE+1~, MESSAGE+3* |
| XMTEXT | MESSAGE+1~, MESSAGE+9* |
| XMY | MESSAGE+1~ |
| XMY("G.TIU HS | RM CONSULT HL7 MESSAGES" , MESSAGE+12* |
| XMYBLOB | MESSAGE+1~ |
| XMZ | MESSAGE+1~ |