HLFNC ;AISC/SAW/OAK-OIFO/RBN-Routine of Functions and Other Calls Used for HL7 Messages ;03/26/2008 11:34
Source file <HLFNC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
HLNAME(X,HLECDE) | ;Convert a name in DHCP format to HL7 format
; INPUT: X - Name in DHCP format ; Optional - HLECDE - HL7 encoding chars |
|
FMNAME(X,HLECDE) | ;Convert a name in HL7 format to DHCP format
; INPUT: X - Name in HL7 format ; Optional - HLECDE - HL7 encoding chars |
|
HLDATE(X,Y) | ;Convert date, date/time or time only in FM format to HL7 format
|
|
FMDATE(X) | ; Convert a date, date/time or time only in HL7 format to FM format
|
|
M10(X,HLECDE) | ; M10 check digit scheme
; INPUT : X - ID number ; Optional HLECDE - Encoding chars |
|
M11(X,HLECDE) | ; M11 check digit scheme
; INPUT : X - ID number ; Optional HLECDE - Encoding chars |
|
OLDM10(X,HLECDE) | ;Calculate M10 checksum
; INPUT : X - String to calc checksum ; Optional HLECDE - Encoding chars |
|
OLDM11(X,HLECDE) | ;Calculate M11 checksum
; INPUT : X - String to calc checksum ; Optional HLECDE - Encoding chars |
|
UPPER(X) | ;Convert lowercase letters to uppercase
|
|
HLPHONE(X,B,C) | ;Convert DHCP Phone Number to HL7 Format
|
|
HLADDR(AD,GL,HLECDE) | ;Convert DHCP address fields to HL7 address format
|
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(5 - [#5] | HLADDR+28 |
Name | Field # of Occurrence |
---|---|
^(0 | HLADDR+28 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | HLNAME+11~, HLNAME+12*, FMNAME+11~*, FMNAME+12, FMNAME+14, FMNAME+15, HLDATE+9~, HLDATE+10, HLDATE+11*, HLDATE+13 , HLDATE+14*, HLDATE+16*, HLDATE+17, FMDATE+2~, FMDATE+3*, FMDATE+4, OLDM10+11~, OLDM10+12*, OLDM11+11~* |
AD | HLADDR~, HLADDR+20, HLADDR+30 |
B | HLPHONE~, HLPHONE+9*, HLPHONE+30, HLPHONE+31, HLPHONE+32 |
C | HLPHONE~, HLPHONE+9*, HLPHONE+30, HLPHONE+31, HLPHONE+32 |
CH | HLPHONE+13~, HLPHONE+16*, HLPHONE+19, HLPHONE+20 |
GL | HLADDR~, HLADDR+20, HLADDR+26*, HLADDR+27*, HLADDR+28*, HLADDR+29 |
HLCNT | M10+9~, M10+19*, M10+22*, M10+25*, M11+9~, M11+19*, M11+21 |
HLDIGIT | M10+9~, M10+24*, M10+25*, M10+26*, M10+27, M11+9~, M11+18*, M11+21*, M11+23*, M11+24* , M11+25*, M11+26 |
HLECDE | HLNAME~, HLNAME+8, HLNAME+9, FMNAME~, FMNAME+8, FMNAME+9, M10~, M10+11, M11~, M11+11 , OLDM10~, OLDM10+8, OLDM10+9, OLDM11~, OLDM11+8, OLDM11+9, HLADDR~, HLADDR+21, HLADDR+22 |
HLECH | HLNAME+8, HLNAME+9~*, HLNAME+10, HLNAME+12, FMNAME+8, FMNAME+9~*, FMNAME+10, FMNAME+11, FMNAME+12, FMNAME+14 , FMNAME+15, M10+11~*, M10+13, M10+15, M10+27, M11+11~*, M11+13, M11+15, M11+26, OLDM10+8 , OLDM10+9~*, OLDM10+10, OLDM10+13, OLDM11+8, OLDM11+9~*, OLDM11+10, OLDM11+12, HLADDR+21, HLADDR+22~*, HLADDR+23 , HLADDR+29, HLADDR+33, HLADDR+34, HLADDR+35, HLADDR+36 |
HLEVEN | M10+9~, M10+21*, M10+22*, M10+23 |
HLODD | M10+9~, M10+18*, M10+19*, M10+20*, M10+23 |
HLWT | M11+9~, M11+18*, M11+20*, M11+21, M11+22* |
HLX1 | M10+9~, M10+17*, M10+19, M10+22, M10+23*, M10+25, M11+9~, M11+17*, M11+19, M11+21 |
I | HLPHONE+9~, HLPHONE+15*, HLPHONE+16, HLADDR+25~, HLADDR+30* |
X | HLNAME~, HLNAME+7, HLNAME+12, FMNAME~, FMNAME+7, FMNAME+11, FMNAME+12, FMNAME+14, FMNAME+15, HLDATE~ , HLDATE+7, HLDATE+10, HLDATE+11, HLDATE+14, HLDATE+16, FMDATE~, FMDATE+1, FMDATE+3, FMDATE+4, FMDATE+5 , M10~, M10+10, M10+13, M10+15, M10+17, M10+27, M11~, M11+10, M11+13, M11+15 , M11+17, M11+26, OLDM10~, OLDM10+7, OLDM10+12, OLDM10+13, OLDM11~, OLDM11+7, OLDM11+11, OLDM11+12 , UPPER~, UPPER+1, UPPER+2, HLPHONE~, HLPHONE+8, HLPHONE+15, HLPHONE+16, HLADDR+25~, HLADDR+27*, HLADDR+28* , HLADDR+30*, HLADDR+31*, HLADDR+33, HLADDR+34, HLADDR+35, HLADDR+36 |
X1 | HLNAME+11~, HLNAME+12*, FMNAME+11~* |
X2 | HLNAME+11~, HLNAME+12* |
>> XRT0 | HLADDR+32 |
>> XRTL | HLADDR+24 |
>> XRTN | HLADDR+32* |
Y | HLNAME+11~, HLNAME+12*, HLNAME+13, FMNAME+11*, FMNAME+14*, FMNAME+15*, FMNAME+16, HLDATE~, HLDATE+8*, HLDATE+13 , HLDATE+17, OLDM10+11~, OLDM10+12*, OLDM10+13, OLDM11+11~*, OLDM11+12, HLPHONE+9~, HLPHONE+14*, HLPHONE+19*, HLPHONE+23* , HLPHONE+26, HLPHONE+27*, HLPHONE+28*, HLPHONE+29*, HLPHONE+30, HLPHONE+31, HLPHONE+32, HLADDR+25~, HLADDR+29*, HLADDR+33 , HLADDR+34, HLADDR+35, HLADDR+36 |
Y1 | HLPHONE+9~, HLPHONE+27*, HLPHONE+30, HLPHONE+31, HLPHONE+32 |
Z | HLDATE+9~, HLPHONE+9~, HLPHONE+19, HLPHONE+20* |