Routine: LR7OU0

Information

LR7OU0 ;slc/dcm - HL7 Utilities/Conversions ;8/11/97

Source file <LR7OU0.m>

Package	Total	Call Graph
Kernel	1	($$FMTHL7,$$HL7TFM)^XLFDT

Package	Total	Caller Graph
Lab Service	7	LR7OB0 LR7OB3 LR7OF0 LR7OF2 LR7OF3 LR7OFA3 LR7OV0
VueCentric RPMS Support	2	CIAZPLBB CIAZPLCH

Name	Comments	DBIA/ICR reference
SAMP(SAMPLE,SPECIMEN)	; EP - File 62,61 -> HL7 Source of Specimen code
PID(LRDPF)	; EP - PID segment
EN	;
LRACTCOD(TYPE)	;EP - HL7 Specimen Action Code -> Lab Collection type
LRSAMP(SAMPLE)	;EP - HL7 -> File 62 sample format
LRSPEC(SAMPLE)	;EP - HL7 -> File 61 Specimen format
LRURG(URGENCY)	;EP - HL7 Priority -> Lab Urgency
ACTCODE(TYPE)	;EP - Lab Collection type -> HL7 Specimen Action Code
PV1(LOC,ROOMBED,VISIT)	; EP - PV1 segment
NMSPACE(PKG)	; EP - Returns pkg namespace
FLAG(FLAG)	; EP - Return HL7 Flag code
MSH(TYPE)	; EP - Build MSH segment
URG(URGENCY)	;EP - Lab Urgency -> HL7 Priority code
FMDATE(DATE)	; EP - HL7 -> FM format
HL7DT(DATE)	; FM -> HL7 format
UVID(X,SPEC,NID,NSEC,NNAME,MSG,SS)	; EP - Set Universal ID

Name	Field # of Occurrence
$$FMTHL7^XLFDT	HL7DT+1
$$HL7TFM^XLFDT	FMDATE+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	NMSPACE+1
^LAB(60 - [#60]	UVID+9
^LAB(61 - [#61]	SAMP+4, LRSPEC+4
^LAB(62 - [#62]	SAMP+5, LRSPEC+5
^LAB(62.05 - [#62.05]	URG+4
^SC - [#44]	PV1+6

Name	Field # of Occurrence
^(0	UVID+9, URG+4

Name	Field # of Occurrence
DATE	HL7DT~, HL7DT+1, FMDATE~, FMDATE+1
>> DFN	PID+2
DUZ(2	MSH+3
FLAG	FLAG~, FLAG+3
>> I	UVID+11*
LOC	PV1~, PV1+6, PV1+7
LRDPF	PID~, PID+2
MSG	UVID~, UVID+10, UVID+11, UVID+12
MSG(	UVID+11, UVID+12
MSH	MSH+2~, MSH+3*, MSH+4
NID	UVID~, UVID+13
NNAME	UVID~, UVID+13
NSEC	UVID~, UVID+13
>> ORCMSG	UVID+12
PID	PID+1~, PID+2*, PID+3
PKG	NMSPACE~, NMSPACE+1
PV1	PV1+5~, PV1+7*, PV1+8
ROOMBED	PV1~, PV1+7
SAMPLE	SAMP~, SAMP+5, LRSAMP~, LRSAMP+3, LRSPEC~, LRSPEC+3, LRSPEC+4, LRSPEC+5
SPEC	UVID~
SPECIMEN	SAMP~, SAMP+4, SAMP+5
SS	UVID~, UVID+12
TYPE	MSH~, MSH+3, PV1+5~, PV1+6*, PV1+7, ACTCODE~, ACTCODE+3, LRACTCOD~, LRACTCOD+3
URGENCY	URG~, URG+4, LRURG~, LRURG+3
VISIT	PV1~, PV1+7
X	NMSPACE+1~, NMSPACE+2, UVID~, UVID+9, UVID+13, UVID+14, SAMP+3~, SAMP+4, SAMP+5, SAMP+6 , LRSAMP+2~, LRSAMP+3, LRSAMP+4, LRSPEC+2~, LRSPEC+3, LRSPEC+4, LRSPEC+5, LRSPEC+6, ACTCODE+2~, ACTCODE+3* , ACTCODE+4, LRACTCOD+2~, LRACTCOD+3, LRACTCOD+4, URG+3~, URG+4, URG+5, LRURG+2~, LRURG+3, LRURG+4 , FLAG+2~, FLAG+3, FLAG+4
X1	UVID+8~, UVID+9*, UVID+10
X3	UVID+8~, UVID+9, UVID+10, UVID+13
X4	UVID+8~, UVID+9*, UVID+13
X6	UVID+8~, UVID+12*
XX	UVID+8~, UVID+12*