Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping
Routine: XHDLSITE

XHDLSITE.m

Go to the documentation of this file.

XHDLSITE        ; TLH/SLOIFO - Site Library Calls; 07-JUL-2003 11:14 ; 25 Jul 2003  9:42 AM

 ;;1.0;HEALTHEVET DESKTOP;;Jul 15, 2003

SITE(XHDY)      ; Get Site Name

 S XHDY=$$SITE^VASITE_U_$$NAME^VASITE(DT)

INTNAME(XHDY)   ; Get Integration Name

 S XHDY=$$NAME^VASITE(DT)

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXHDLSITE   285     printed  Dec 13, 2024@01:57:14                                                                                                                                                                                                     Page 2

XHDLSITE  ; TLH/SLOIFO - Site Library Calls; 07-JUL-2003 11:14 ; 25 Jul 2003  9:42 AM

 +1       ;;1.0;HEALTHEVET DESKTOP;;Jul 15, 2003

SITE(XHDY) ; Get Site Name

 +1        SET XHDY=$$SITE^VASITE_U_$$NAME^VASITE(DT)

 +2        QUIT

INTNAME(XHDY) ; Get Integration Name

 +1        SET XHDY=$$NAME^VASITE(DT)

 +2        QUIT