Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Local Variables |  Marked Items  | All
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>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Automated Lab Instruments 8 $$CHKDT^LA7VHLU1  $$CHKDATA^LA7VHLU3  ($$INST,$$XAD,$$XON)^LA7VHLU4  $$XCN^LA7VHLU9  CH^LA7VOBX1  AP^LA7VOBX2  MI^LA7VOBX3  (OBX17,OBX18,OBX2,OBX3,OBX5,OBX5M,OBX5R,OBX6,OBX7)^LA7VOBXA  
Kernel 2 $$FMTHL7^XLFDT  $$ID^XUAF4  
Health Data and Informatics 1 ($$LOSVUID,LOSVUID)^HDISVAP  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Automated Lab Instruments 9 LA7QRY1  LA7VOBX1  LA7VOBX2  LA7VOBX3  LA7VOBX4  LA7VOBXA  LA7VORM2  LA7VORU1  
LA7VORUA  

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

External References

Name Field # of Occurrence
$$LOSVUID^HDISVAP OBX13+14
LOSVUID^HDISVAP OBX13+14
$$CHKDT^LA7VHLU1 OBX14+4, OBX19+4
$$CHKDATA^LA7VHLU3 OBX4+9, OBX13+17
$$INST^LA7VHLU4 OBX15+9
$$XAD^LA7VHLU4 OBX24+10
$$XON^LA7VHLU4 OBX23+9
$$XCN^LA7VHLU9 OBX16+8, OBX25+8
CH^LA7VOBX1 OBX+22
AP^LA7VOBX2 OBX+28, OBX+31, OBX+34
MI^LA7VOBX3 OBX+25
OBX17^LA7VOBXA OBX17+10
OBX18^LA7VOBXA OBX18+9
OBX2^LA7VOBXA OBX2+8
OBX3^LA7VOBXA OBX3+10
OBX5^LA7VOBXA OBX5+8
OBX5M^LA7VOBXA OBX5M+13
OBX5R^LA7VOBXA OBX5R+8
OBX6^LA7VOBXA OBX6+10
OBX7^LA7VOBXA OBX7+9
$$FMTHL7^XLFDT OBX14+5, OBX19+5
$$ID^XUAF4 OBX15+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
LA74 OBX15~, OBX15+9, OBX15+12
LA764 OBX3+8~, OBX17+8~
LA764061 OBX6~
LA7953 OBX3~
LA7ALT OBX3~
LA7ARRAY OBX~
LA7DA OBX23~, OBX23+9, OBX24~, OBX24+10
LA7DIV OBX16~, OBX16+8, OBX25~, OBX25+8
LA7DT OBX14~, OBX14+4*, OBX14+5, OBX19~, OBX19+4*, OBX19+5, OBX24~, OBX24+10
LA7DUZ OBX16~, OBX16+8, OBX25~, OBX25+8
LA7ECH OBX~, OBX3~, OBX4~, OBX4+9, OBX5~, OBX5M~, OBX5R~, OBX6~, OBX7~, OBX13~
, OBX13+17, OBX15~, OBX15+9, OBX15+13, OBX16~, OBX16+8, OBX17~, OBX18~, OBX23~, OBX23+9
, OBX24~, OBX24+10, OBX25~, OBX25+8
LA7ERR OBX2+6~, OBX5M+11~
LA7FIELD OBX2~
LA7FILE OBX2~
LA7FLAG OBX8~, OBX8+6, OBX11~, OBX11+8, OBX11+9, OBX11+10, OBX11+11, OBX11+12, OBX11+13, OBX11+14
, OBX11+15
LA7FLD OBX5M~
LA7FN OBX5M~, OBX23~, OBX23+9, OBX24~, OBX24+10
LA7FS OBX~, OBX3~, OBX4~, OBX4+9, OBX5~, OBX5M~, OBX5R~, OBX6~, OBX7~, OBX13~
, OBX13+17, OBX15~, OBX15+9, OBX16~, OBX16+8, OBX17~, OBX18~, OBX23~, OBX23+9, OBX24~
, OBX24+10, OBX25~, OBX25+8
LA7HIGH OBX7~
LA7I OBX3+8~, OBX5M+11~, OBX5R+6~, OBX18+7~
LA7IENS OBX5M~
LA7INTYP OBX3~, OBX6~
LA7J OBX3+8~, OBX5M+11~, OBX18+7~
LA7LN OBX3+8~
LA7LOW OBX7~
LA7NLT OBX3~, OBX17~
LA7NVAF OBX~, OBX+19*
LA7OBX OBX+14~
LA7OBX2 OBX5~, OBX5R~
LA7OBXSN OBX~, OBX1~, OBX1+6*
LA7SRC OBX13~, OBX13+13, OBX13+14
LA7TYP OBX2+6~
LA7TYPE OBX5M+11~
LA7VAL OBX+14~, OBX2+6~, OBX2+10, OBX4~, OBX4+9, OBX5~, OBX5R~, OBX6~, OBX13~, OBX13+14
, OBX13+15, OBX17~, OBX18~
LA7WP OBX5M~
LA7X OBX+14~, OBX3+8~, OBX5M+11~, OBX15+8~, OBX15+12*, OBX15+13, OBX17+8~, OBX18+7~, OBX18+11
LA7Y OBX1+3~, OBX1+6*, OBX1+8, OBX3+8~, OBX3+12, OBX4+7~, OBX4+9*, OBX4+11, OBX5+6~, OBX5+10
, OBX5M+11~, OBX5R+6~, OBX5R+10, OBX6+8~, OBX6+12, OBX7+7~, OBX7+11, OBX8+4~, OBX8+6*, OBX8+7
, OBX11+4~, OBX11+6*, OBX11+8*, OBX11+9*, OBX11+10*, OBX11+11*, OBX11+12*, OBX11+13*, OBX11+14*, OBX11+15*
, OBX11+17, OBX13+8~, OBX13+9*, OBX13+14*, OBX13+15*, OBX13+17*, OBX13+19, OBX15+8~, OBX15+9*, OBX15+13*
, OBX15+15, OBX17+8~, OBX17+12, OBX18+7~
LA7Z OBX17+8~
LRDFN OBX~, OBX+17
LRIDT OBX~, OBX+17
LRSB OBX~
LRSS OBX~, OBX+17, OBX+22, OBX+25, OBX+28, OBX+31, OBX+34

Marked Items

Name Field # of Occurrence
$T(LOSVUID^HDISVAP OBX13+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Local Variables |  Marked Items  | All