TIUHL7U1 ; SLC/AJB - TIUHL7 Utilities; March 23, 2005
Source file <TIUHL7U1.m>
Package | Total | Call Graph |
---|---|---|
Text Integration Utility | 7 | $$LU^TIUHL7U1 ES^TIUHL7U2 $$NOW^TIULC $$CANDO^TIULP $$ISA^TIULX ES^TIURS DELETE^TIUSRVP |
Kernel | 5 | ($$FMADD,$$FMDIFF,$$FMTE,$$NOW)^XLFDT ($$LOW,$$REPLACE,$$UP)^XLFSTR $$BASE^XLFUTL $$SETUP1^XQALERT DIV4^XUSER |
Health Level Seven | 4 | $$GETAPP^HLCS2 INIT^HLFNC2 GENERATE^HLMA GENACK^HLMA1 |
VA Fileman | 3 | (,$$FIND1)^DIC ^DIE $$GET1^DIQ |
Order Entry Results Reporting | 2 | VST1^ORWCV ADMITLST^ORWPT |
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 4 | TIUHL7P1 TIUHL7P2 TIUHL7P3 TIUHL7U1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETDIV(USER) | ;
|
|
MEMBEROF(TITLE,CLASS) | ;
|
|
GETVISIT(DFN,TIUDT) | ;
|
|
CLASS(CLNAME) | ;
|
|
GETADMIT(DFN,TIUDT) | ;
|
|
AUDIT(TIUDA,TIUCKSM0,TIUCKSM1) | ; Update audit trail
|
|
CANEDIT(DA) | ; check whether or not document is released
|
|
LU(FILE,NAME,FLAGS,SCREEN,INDEXES) | ;
|
|
PNAME(NAME) | ;
|
|
SIGNDOC(TIUDA) | ;
|
|
DELDOC(TIUDA) | ;
|
|
REMESC(TIUSTR) | ;
; Remove Escape Characters from HL7 Message Text ; Escape Sequence codes: ; F = field separator (TIUFS) ; S = component separator (TIUCS) ; R = repitition separator (TIURS) ; E = escape character (TIUES) ; T = subcomponent separator (TIUSS) |
|
CLEAN | ; removes messages older than 7 days
|
|
ERR(TIUSEG,TIUP,TIUNUM,TIUTXT) | ;
|
|
ACK(CODE,ERLOC,TIUDA) | ;
|
|
COMPARE(NAME1,NAME2) | ; compare first and last names only
|
|
SNDALRT(MSG) | ;
|
Name | Field # of Occurrence |
---|---|
^DIC | AUDIT+2 |
$$FIND1^DIC | LU+1 |
^DIE | AUDIT+4 |
$$GET1^DIQ | ACK+19, GETDIV+3, SIGNDOC+9, SIGNDOC+17 |
$$GETAPP^HLCS2 | SNDALRT+2 |
INIT^HLFNC2 | ACK+20 |
GENERATE^HLMA | ACK+23 |
GENACK^HLMA1 | ACK+24 |
VST1^ORWCV | GETVISIT+4 |
ADMITLST^ORWPT | GETADMIT+3 |
$$LU^TIUHL7U1 | ACK+14, ACK+15, ACK+17 |
ES^TIUHL7U2 | SIGNDOC+10 |
$$NOW^TIULC | AUDIT+3 |
$$CANDO^TIULP | SIGNDOC+6, SIGNDOC+14 |
$$ISA^TIULX | MEMBEROF+4 |
ES^TIURS | SIGNDOC+18 |
DELETE^TIUSRVP | DELDOC+2 |
$$FMADD^XLFDT | GETVISIT+4 |
$$FMDIFF^XLFDT | CLEAN+4 |
$$FMTE^XLFDT | GETADMIT+6 |
$$NOW^XLFDT | CLEAN+4 |
$$LOW^XLFSTR | ACK+17 |
$$REPLACE^XLFSTR | REMESC+10 |
$$UP^XLFSTR | ACK+17, REMESC+15 |
$$BASE^XLFUTL | REMESC+15 |
$$SETUP1^XQALERT | SNDALRT+7 |
DIV4^XUSER | GETDIV+2 |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^HLCS(870 - [#870] | GET1^DIQ |
^XTV(8989.3 - [#8989.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TIU(8925 - [#8925] | CANEDIT+1, SIGNDOC+11, SIGNDOC+19 |
^TIU(8925.1 - [#8925.1] | CLASS+1, CLASS+2 |
^XTMP("TIUHL7" | CLEAN+3, CLEAN+4! |
Name | Line Occurrences |
---|---|
$$CLASS | MEMBEROF+2 |
$$LU | MEMBEROF+3 |
DELDOC | SIGNDOC+4, SIGNDOC+21 |
ERR | GETADMIT+6, SIGNDOC+4, SIGNDOC+7, SIGNDOC+8, SIGNDOC+12, SIGNDOC+15, SIGNDOC+16, SIGNDOC+20 |
SNDALRT | ACK+7, ACK+14, ACK+15, ACK+18 |
Name | Field # of Occurrence |
---|---|
^(0 | CLASS+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CLASS | MEMBEROF~, MEMBEROF+2*, MEMBEROF+4 |
CLNAME | CLASS~, CLASS+1 |
CODE | ACK~, ACK+2, ACK+4, ACK+8 |
DA | AUDIT+1~, AUDIT+4*, CANEDIT~, CANEDIT+1 |
DFN | GETADMIT~, GETADMIT+3, GETVISIT~, GETVISIT+4 |
DIC | AUDIT+1~, AUDIT+2*, AUDIT+3 |
DIC(0 | AUDIT+2* |
DIE | AUDIT+1~, AUDIT+3* |
DLAYGO | AUDIT+1~, AUDIT+2* |
DR | AUDIT+1~, AUDIT+3* |
ERLOC | ACK~, ACK+6 |
ERR | DELDOC+1~, DELDOC+2 |
FILE | LU~, LU+1 |
FIRST | PNAME+1~, PNAME+2*, PNAME+3 |
FLAGS | LU~, LU+1 |
HL | ACK+11~, ACK+20 |
HL("EID" | ACK+24 |
HL("EIDS" | ACK+24 |
HL("FS" | ACK+2 |
HL("MID" | ACK+2, ACK+3 |
HL("RAN" | ACK+2, ACK+3 |
HL("SAN" | ACK+2, ACK+3, ACK+10 |
HLA | ACK+1~ |
HLA("HLA" | ACK+2*, ACK+6*, ACK+9*, ACK+12!, ACK+25 |
HLA("HLS" | ACK+10, ACK+12* |
HLL | ACK+11~ |
HLL("LINKS" | ACK+22* |
>> HLMTIENS | ACK+24 |
HLP | ACK+11~, ACK+23 |
HLP("SUBSCRIBER" | ACK+21* |
I1 | REMESC+8~, REMESC+11*, REMESC+17 |
I2 | REMESC+8~, REMESC+12*, REMESC+13, REMESC+14 |
INDEXES | LU~, LU+1 |
J1 | REMESC+8~, REMESC+13*, REMESC+15 |
J2 | REMESC+8~, REMESC+14*, REMESC+17 |
K | REMESC+8~, REMESC+16*, REMESC+17 |
LAST | PNAME+1~, PNAME+2*, PNAME+3 |
MSG | SNDALRT~, SNDALRT+6 |
MSG("RECEIVER" | SNDALRT+2*, SNDALRT+3, SNDALRT+4 |
MSG("SENDER" | SNDALRT+2*, SNDALRT+3, SNDALRT+5 |
NAME | COMPARE+1~, LU~, LU+1, PNAME~, PNAME+2 |
NAME("F1" | COMPARE+4*, COMPARE+6 |
NAME("F2" | COMPARE+5*, COMPARE+6 |
NAME("L1" | COMPARE+4*, COMPARE+6 |
NAME("L2" | COMPARE+5*, COMPARE+6 |
NAME1 | COMPARE~, COMPARE+3, COMPARE+4 |
NAME2 | COMPARE~, COMPARE+3, COMPARE+5 |
RESULT | ACK+1~ |
SCREEN | LU~, LU+1 |
TITLE | MEMBEROF~, MEMBEROF+3*, MEMBEROF+4 |
>> TIU("AUDA" | SIGNDOC+6, SIGNDOC+9, SIGNDOC+10 |
>> TIU("AVAIL" | GETVISIT+7, GETVISIT+9, SIGNDOC+4, SIGNDOC+7, SIGNDOC+11, SIGNDOC+15, SIGNDOC+19 |
>> TIU("COMP" | SIGNDOC+2 |
>> TIU("CSDA" | SIGNDOC+14, SIGNDOC+17, SIGNDOC+18 |
>> TIU("CSIGNED" | SIGNDOC+3, SIGNDOC+13 |
>> TIU("EBDA" | AUDIT+3 |
>> TIU("EC" | ERR+1*, ERR+2, SIGNDOC+2 |
>> TIU("HLOC" | GETADMIT+8, GETADMIT+9, GETVISIT+8, GETVISIT+9 |
>> TIU("SIGNED" | SIGNDOC+3, SIGNDOC+5 |
>> TIU("SSN" | ACK+7 |
>> TIU("VSTR" | GETADMIT+7*, GETADMIT+9*, GETVISIT+7*, GETVISIT+9* |
>> TIU("XTMP" | ACK+10, ACK+25 |
TIUACT | SIGNDOC+6~*, SIGNDOC+14~* |
TIUAUTH | SIGNDOC+6~*, SIGNDOC+7, SIGNDOC+14~*, SIGNDOC+15 |
TIUCHR | REMESC+8~, REMESC+9* |
TIUCKSM0 | AUDIT~, AUDIT+3 |
TIUCKSM1 | AUDIT~, AUDIT+3 |
TIUCNT | ACK+5~, ACK+6*, GETADMIT+1~*, GETADMIT+5*, GETADMIT+6, GETADMIT+7, GETVISIT+1~, GETVISIT+2*, GETVISIT+6*, GETVISIT+7 |
TIUCNT( | GETADMIT+5*, GETADMIT+7, GETADMIT+9, GETVISIT+6*, GETVISIT+7, GETVISIT+9 |
>> TIUCS | ACK+9, ACK+16, ERR+2, REMESC+9 |
TIUDA | ACK~, ACK+9, AUDIT~, AUDIT+2, DELDOC~, DELDOC+2, SIGNDOC~, SIGNDOC+4, SIGNDOC+6, SIGNDOC+10 , SIGNDOC+11, SIGNDOC+14, SIGNDOC+18, SIGNDOC+19, SIGNDOC+21 |
TIUDEL | SIGNDOC+1~, SIGNDOC+8*, SIGNDOC+9, SIGNDOC+10, SIGNDOC+11, SIGNDOC+12*, SIGNDOC+16*, SIGNDOC+17, SIGNDOC+18, SIGNDOC+19 , SIGNDOC+20*, SIGNDOC+21 |
TIUDNS | ACK+11~, ACK+16*, ACK+17 |
TIUDT | CLEAN+1~, CLEAN+2*, CLEAN+3*, CLEAN+4, GETADMIT~, GETADMIT+2, GETADMIT+5, GETADMIT+6, GETVISIT~, GETVISIT+3 , GETVISIT+4, GETVISIT+6 |
TIUES | REMESC+9, REMESC+11, REMESC+12, REMESC+13, REMESC+14, SIGNDOC+6~, SIGNDOC+9*, SIGNDOC+10, SIGNDOC+14~, SIGNDOC+17* , SIGNDOC+18 |
TIUEVT | ACK+11~, ACK+13*, ACK+14, ACK+20, ACK+23 |
TIUFAC | ACK+11~, ACK+16*, ACK+21 |
>> TIUFS | ACK+9, ACK+16, ERR+2, REMESC+9 |
TIULIST | GETADMIT+1~, GETADMIT+3, GETADMIT+4, GETADMIT+5*, GETADMIT+7*, GETADMIT+9*, GETVISIT+1~, GETVISIT+4, GETVISIT+5, GETVISIT+6* , GETVISIT+7*, GETVISIT+9* |
TIULIST( | GETADMIT+5, GETADMIT+7, GETVISIT+6, GETVISIT+7, GETVISIT+9 |
TIULLNK | ACK+11~, ACK+18*, ACK+19*, ACK+22 |
TIULLNK(1 | ACK+17*, ACK+18 |
TIULLNK(2 | ACK+17*, ACK+18 |
TIUMID | ACK+1~, ACK+3*, ACK+7 |
>> TIUMSG(1 | ACK+16 |
>> TIUNAME | ERR+2 |
TIUNUM | ERR~, ERR+2 |
TIUP | ERR~, ERR+2 |
TIUREC | ACK+1~, ACK+3*, SNDALRT+2 |
TIUREP | REMESC+8~, REMESC+10 |
TIUREP( | REMESC+9* |
>> TIURS | REMESC+9 |
>> TIURSLT | ACK+23, ACK+24 |
TIUSEG | ERR~, ERR+2 |
TIUSND | ACK+1~, ACK+3*, ACK+7, ACK+14, ACK+15, ACK+18, SNDALRT+2 |
>> TIUSS | REMESC+9 |
TIUSTAT | SIGNDOC+6~, SIGNDOC+11*, SIGNDOC+14~, SIGNDOC+19* |
TIUSTR | REMESC~, REMESC+10*, REMESC+11, REMESC+12, REMESC+17*, REMESC+18 |
TIUSUB | ACK+11~, ACK+13*, ACK+15, ACK+22 |
TIUTXT | ERR~, ERR+2 |
TIUX | COMPARE+1~ |
TIUY | CLASS+1~*, CLASS+2*, CLASS+3, COMPARE+1~, COMPARE+2*, COMPARE+3*, COMPARE+6*, COMPARE+7, GETADMIT+1~*, GETADMIT+2 , GETADMIT+7*, GETADMIT+9*, GETADMIT+10, GETDIV+1~, GETDIV+2*, GETDIV+3*, GETDIV+4, GETVISIT+1~, GETVISIT+2*, GETVISIT+3 , GETVISIT+7*, GETVISIT+9*, GETVISIT+10, MEMBEROF+1~*, MEMBEROF+2, MEMBEROF+3, MEMBEROF+4*, MEMBEROF+5 |
TIUY( | GETDIV+2 |
U | ACK+22, SNDALRT+2, CANEDIT+1, CLASS+2, GETADMIT+5, GETADMIT+7, GETADMIT+9, GETVISIT+6, GETVISIT+7, GETVISIT+9 , SIGNDOC+7, SIGNDOC+9, SIGNDOC+11, SIGNDOC+15, SIGNDOC+17, SIGNDOC+19 |
USER | GETDIV~, GETDIV+2 |
VALUE | REMESC+8~, REMESC+15*, REMESC+16 |
X | AUDIT+1~, AUDIT+2* |
XQA | SNDALRT+1~ |
XQA("G." | SNDALRT+4*, SNDALRT+5* |
XQAMSG | SNDALRT+1~, SNDALRT+6* |
Y | AUDIT+1~, AUDIT+2, AUDIT+4 |