LA7VHLU4 ;DALOI/JMC - HL7 segment builder utility ;03/15/11 12:28
Source file <LA7VHLU4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INST(LA74,LA7FS,LA7ECH) | ; Build institution 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 |
|
| XAD(LA7FN,LA7DA,LA7DT,LA7FS,LA7ECH) | ; Build extended 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 |
|
| XON(LA7FN,LA7DA,LA7TYP,LA7FS,LA7ECH) | ; Build extended composite name/id for organization
; Call with LA7FN = Source File number - presently #4 (INSTITUTION) ; LA7DA = Entry in source file ; LA7TYP = type of identifier (0/null=station #, 1=CLIA) ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
| XCNTFM(LA7X,LA7ECH) | ; Resolve XCN data type to FileMan (last name, first name, mi [id])
; Call with LA7X = HL7 field containing name ; LA7ECH = HL7 encoding characters |
|
| PLTFM(LA7PL,LA7FS,LA7ECH) | ; Resolve location from PL (person location) data type.
; Call with LA7PL = HL7 field containing person location ; LA7FS = HL field separator ; LA7ECH = HL7 encoding characters |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SC - [#44] | FIND1^DIC, GET1^DIQ |
