NHINVTIU ;SLC/MKB -- TIU extract
Source file <NHINVTIU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(DFN,BEG,END,MAX,ID) | ; -- find patient's documents
|
|
EN1(IEN,DOC) | ; -- return a document in DOC("attribute")=value
; Expects DFN, NHX=IEN ^ $$RESOLVE^TIUSRVLO(IEN) |
|
VSTR(DA) | ; -- get visit string for document DA
; Expects DFN, NHX = IEN ^ $$RESOLVE^TIUSRVLO(IEN) |
|
SIG(X) | ; -- Return Signature Block Name_Title
|
|
RPT(NHY,IFN) | ; -- Return text of document in @NHY@(n)
|
|
TEXT(IFN) | ; -- Return document IFN as a text string
|
|
XML(DOC) | ; -- Return patient documents as XML
|
|
LOOP() | ; -- build sub-items string from NAMES and X
|
|
ADD(X) | ; Add a line @NHIN@(n)=X
|
FileNo | Call Tags |
---|---|
^TIU(8925 - [#8925] | GET1^DIQ, GETS^DIQ |