GMRCHL7I ;DAL/PHH - PROCESS HL7 RRI^I13 MESSAGES FROM HCPS ;8/7/14
Source file <GMRCHL7I.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Entry point for routine
|
|
COPYMSG(Y) | ; Copy HL7 Message to array Y (by reference)
; Based on HL*1.6*56 VISTA HL7 Site Manager & Developer Manual ; Paragraph 9.7, page 9-4 |
|
CHKMSG(Y) | ; Check Message for all required segments
|
|
PROCMSG(Y) | ; Process message
|
|
RF1(RF1SEG,RETVAL) | ; Process RF1 Segment
|
|
PID(PIDSEG,RETVAL) | ; Process PID Segment
|
|
OBR(OBRSEG,RETVAL) | ; Process OBR Segment
|
|
NTE(NTESEG,RETVAL) | ; Process NTE Segment
|
|
ADDCMT(GMRCIEN,NTEARY) | ; Add comment to file #123
|
|
TIUTXT(NTEARY,RETVAL) | ; Return TIU-formatted Text
|
|
UPDUSRS(GMRCTIU,GMRCATIU) | ; Update Users on Addendums
|
|
DEESCAPE(TXTSTR) | ; De-escape delimiters
; (assuming "\" is the escape character): ; - field separator (de-escape from \F\) ; - component separator (de-escape from \S\) ; - repetition separator (de-escape from \R\) ; - escape character (de-escape from \E\) ; - subcomponent separator (de-escape from \T\) ; \F\ will be de-escaped only if the length of FS is 1. |
|
SNDALRT(GMRCIEN,GMRCRJT) | ; Send Alert
; GMRCRJT is optional, and is only set to 1 for a rejection status |
|
ACK(STAT,MID,SID,SEG,FLD,CD,TXT,ACKTYP) | ; Creates ACKs for HL7 Message
|
HL7 Protocol Name | Call Tags |
---|---|
GMRC HCP RRI-I13 CLIENT | EN |
FileNo | Call Tags |
---|---|
123.02 | WP^DIE |
^TIU(8925 - [#8925] | Classic Fileman Calls |