Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: LA7VOBX

Package: Automated Lab Instruments

Routine: LA7VOBX


Information

LA7VOBX ;DALOI/JMC - LAB OBX Segment message builder;Jan 7, 2008

Source Information

Source file <LA7VOBX.m>

Entry Points

Name Comments DBIA/ICR reference
OBX(LRDFN,LRSS,LRIDT,LRSB,LA7ARRAY,LA7OBXSN,LA7FS,LA7ECH,LA7NVAF) ; Observation/Result segment for Lab Results.
; Call with LRDFN = ien of entry in file #63
; LRSS = file #63 subscript
; LRIDT = inverse date/time of specimen
; LRSB = ien of dataname if "CH" subscript or global subscript for others
; LA7ARRAY = array to return OBX segment, pass by reference
; LA7OBXSN = OBX segment sequence number, pass by reference
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
; LA7NVAF = flag indicating type of receiving facility (see NVAF^LA7VHLU2)
OBX1(LA7OBXSN) ; Build OBX-1 sequence - Set ID (sequence number)
; Call with LA7OBXSN = sequence number (pass by reference)
OBX2(LA7FILE,LA7FIELD) ; Build OBX-2 sequence - Value type
; Call with LA7FILE = FileMan DD file/subfield number
; LA7FIELD = Fileman DD field number
OBX3(LA7NLT,LA7953,LA7ALT,LA7FS,LA7ECH,LA7INTYP) ; Build OBX-3 sequence - Observation identifier field
; Call with LA7NLT = NLT code.
; LA7953 = LOINC code
; LA7ALT = alternate code - local/non-VA (code^text^system^local code^local text^99VAnn)
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
; LA7INTYP = type of interface from 62.48
OBX4(LA7VAL,LA7FS,LA7ECH) ; Build OBX-4 sequence - Observation sub-ID
; Call with LA7VAL = value of the observation
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
OBX5(LA7VAL,LA7OBX2,LA7FS,LA7ECH) ; Build OBX-5 sequence - Observation value
; Call with LA7VAL = value of the observation
; LA7OBX2 = value type
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
OBX5M(LA7FN,LA7IENS,LA7FLD,LA7WP,LA7FS,LA7ECH) ; Build OBX-5 sequence - Observation value - multi-line textual result
; Call with LA7FN = File number or subfile
; LA7IENS = Standard FileMan IENS indicating internal entry numbers
; LA7FLD = Field number
; LA7WP = array passed by reference to return text
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
OBX5R(LA7VAL,LA7OBX2,LA7FS,LA7ECH) ; Build OBX-5 sequence with repetition - Observation value
; Call with LA7VAL = array passed by reference
; LA7OBX2 = value type
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
OBX6(LA7VAL,LA764061,LA7FS,LA7ECH,LA7INTYP) ; Build OBX-6 sequence - Units
; Call with LA7VAL = Units if in external format
; LA764061 = ien of units in #64.061
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
; LA7INTYP = type of interface from 62.48
; Returns units
OBX7(LA7LOW,LA7HIGH,LA7FS,LA7ECH) ; Build OBX-7 sequence - Reference range
; Call with LA7LOW = lower limit
; LA7HIGH = upper limit
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
; Returns reference range
OBX8(LA7FLAG) ; Build OBX-8 sequence - Abnormal flags
; Call with LA7FLAG = DHCP Lab normalcy flag
; Returns abnormal flags based on HL7 table 0078
OBX11(LA7FLAG) ; Build OBX-11 sequence - Observation result status
; Call with LA7FLAG = DHCP Lab status flag
; Returns result status based on HL7 table 0085
OBX13(LA7VAL,LA7SRC,LA7FS,LA7ECH) ; Build OBX-13 sequence - User defined access checks
; Call with LA7VAL = access screen to expand
; LA7SRC = source of access screen
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
OBX14(LA7DT) ; Build OBX-14 sequence - date/time of observation
; Call with LA7DT = FileMan date/time
; Returns OBX-14 sequence
OBX15(LA74,LA7FS,LA7ECH) ; Build OBX-15 sequence - Producer's ID field
; Call with LA74 = ien of institution in file #4
; if null/undefined then use Kernel Site file.
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
OBX16(LA7DUZ,LA7DIV,LA7FS,LA7ECH) ; Build OBX-16 sequence - Responsible observer field
; Call with LA7DUZ = DUZ of verifying user
; LA7DIV = Institution of user
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
;
; Returns OBX-16 sequence
OBX17(LA7VAL,LA7NLT,LA7FS,LA7ECH) ; Build OBX-17 sequence - Observation method field
; Call with LA7VAL = WKLD SUFFIX CODES #64.2 with leading decimal
; LA7NLT = Result NLT code
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
;
; Returns LA7Y = OBX-17 sequence
OBX18(LA7VAL,LA7FS,LA7ECH) ; Build OBX-18 sequence - Equipment entity identifier field
; Call with LA7VAL = Equipment entity identifier
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
;
; Returns LA7X = OBX-18 sequence
OBX19(LA7DT) ; Build OBX-19 sequence - date/time of the analysis
; Call with LA7DT = FileMan date/time
; Returns OBX-19 sequence
OBX23(LA7FN,LA7DA,LA7FS,LA7ECH) ; Build OBX-23 sequence - Performing organization name
; Call with LA7FN = Source File number
; Presently #4 (INSTITUTION)
; LA7DA = Entry in source file
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
;
; Returns OBX-23 sequence
OBX24(LA7FN,LA7DA,LA7DT,LA7FS,LA7ECH) ; Build OBX-24 sequence - Performing organization address
; Call with LA7FN = Source File number
; Presently file #2 (PATIENT), #4 (INSTITUTION) or #200 (NEW PERSON)
; LA7DA = Entry in source file
; LA7DT = As of date in FileMan format
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
;
; Returns OBX-24 sequence
OBX25(LA7DUZ,LA7DIV,LA7FS,LA7ECH) ; Build OBX-25 sequence - Performing organization medical director
; Call with LA7DUZ = DUZ of medical director
; LA7DIV = Institution of user
; LA7FS = HL field separator
; LA7ECH = HL encoding characters
;
; Returns OBX-25 sequence
Info |  Source |  Entry Points