LA7VHLU9 ;DALOI/JMC - HL7 segment builder utility ;09/08/15 15:44
Source file <LA7VHLU9.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
XCN(LA7DUZ,LA7DIV,LA7FS,LA7ECH,LA7DMT,LA7IDTYP) | ; Build composite ID and name for person
; Call with LA7DUZ = DUZ of person ; If not pointer to #200, then use as literal ; LA7DIV = Institution of user ; LA7FS = HL field separator ; LA7ECH = HL encoding characters ; LA7DMT = flag to indicate delimiters should be demoted ; LA7IDTYP = id type to return (0:DUZ 1:VPID 2:NPI) |
|
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 |
|
XTN(LA7FN,LA7DA,LA7FLDSEQ,LA7MAXREP,LA7DT,LA7FS,LA7ECH) | ; Build extended telecommunication number ;**88
; Call with LA7FN = Source File number ; Presently file #2 (PATIENT), #4 (INSTITUTION) or #200 (NEW PERSON) ; LA7DA = Entry in source file ; LA7FLDSEQ = List of file #200 fields and sequence to build in field separate by ";" e.g. ".138;.137;" ; LA7MAXREP = Maximum # of contact numbers to build in field. ; LA7DT = As of date in FileMan format ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DID, GETS^DIQ |
^DIC(4 - [#4] | GET1^DIQ |