MDCUTL ;HINES OIFO/DP/BJ/TJ - HL7 Message Utilities;07 June 2007
Source file <MDCUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MOREDLMS | ;; maintain HL7 delimiters based on prev. HL7 INIT for the protocol
|
|
| EMPTY(SEG,ERR,HLQFLAG,STFIELD,ENDFIELD) | ;
|
|
| EMPTYERR(NAME) | ;Error message module
|
|
| ESC(FIELD) | ;
|
|
| REP(STR,REM,REP) | ; remove all occurrences of REM from STR and replace with REP
|
|
| REMQQ(STR) | ; removes two double quotes surrounded by HL7 delimiters from STR
|
|
| MAKESEG(RAWARAY,SEGARAY,SEGNUM,SEGID) | ;Make segment using obtained fields
|
|
| RETRANS | ; Retransmit ADT from file 704.005
; Get the entry from file 704.005 |
| FileNo | Call Tags |
|---|---|
| ^MDC(704.005 - [#704.005] | GET1^DIQ |
