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 |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: VDEFEL

Package: VDEF

Routine: VDEFEL


Information

VDEFEL ;INTEGIC/YG & BPOIFO/JG- VDEF library functions; ; 21 Dec 2004 11:29 AM

Source Information

Source file <VDEFEL.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 $$TZ^XLFDT  $$HLNAME^XLFNAME  
VA FileMan 2 ^%DT  YMD^%DTC  
Health Level Seven 1 $$HLDATE^HLFNC  

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: 8

Package Total Caller Graph
Adverse Reaction Tracking 4 GMRAIAD1  GMRAIAD2  GMRAIAL1  GMRAIAL2  
Outpatient Pharmacy 2 PSOVDF1  PSOVDF2  
General Medical Record - Vitals 1 GMVVDEF1  
VDEF 1 VDEFVU  

Entry Points

Name Comments DBIA/ICR reference
SETDLMS ; Set HL7 delimiters from HL array if any or to std. HL7 ^~|\&
XCN200(VAL,SRC) ;
; Inputs: VAL - IEN from ^VA(200)
; SRC - Source for person (Optional)
; Return: VAL is converted to HL7 XCN name format
TS(VAL) ; Format VAL as valid HL7 TS date/time/time zone
TZ
TSEXIT
RTNVAL ; Validate entry for file #577, field # .3, EXTRACTION PROGRAM
; Entry must be either "INACTIVE" or the name of the M routine
; used to extract the VistA data and create the HL7 message.
; Used by input transform of file #577, field #.3 and by the KID
; post-install API in application domains's packages.

External References

Name Field # of Occurrence
^%DT TS+9
YMD^%DTC TS+14
$$HLDATE^HLFNC TS+17
$$TZ^XLFDT TZ
$$HLNAME^XLFNAME XCN200+6

Label References

Name Line Occurrences
TSEXIT TS+1, TS+4, TS+11, TS+17
TZ TS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% TS+1~, TS+14
%DT TS+1~, TS+9~*
%H TS+1~, TS+14*
>> HL("ECH" SETDLMS+2
>> HL("FS" SETDLMS+1
NM XCN200+5~, XCN200+6
NM("FIELD" XCN200+5*
NM("FILE" XCN200+5*
NM("IENS" XCN200+5*
OVAL TS+1~, TS+5*, TS+10*, TS+14*
>> SEPC SETDLMS+3*, XCN200+6, XCN200+7, XCN200+8
>> SEPE SETDLMS+3*
>> SEPF SETDLMS+1*
>> SEPR SETDLMS+3*
>> SEPS SETDLMS+3*
SRC XCN200~, XCN200+7
VAL XCN200~, XCN200+4, XCN200+5, XCN200+6*, XCN200+7*, XCN200+8*, XCN200+9, TS~, TS+1*, TS+4
, TS+5, TS+8, TS+9*, TS+10*, TS+11, TS+14*, TS+17*, TZ*, TSEXIT
X SETDLMS+1*, SETDLMS+2*, SETDLMS+3, TS+9~*, TS+14, RTNVAL+6!, RTNVAL+7!
Y TS+9~, TS+10

Marked Items

Name Field # of Occurrence
$T(@(3) RTNVAL+6, RTNVAL+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Label References |  Local Variables |  Marked Items  | All