Changeset 636 for FOIAVistA/tag/r/RPC_BROKER-XWB/XWBDLOG.m

Timestamp:

Dec 4, 2009, 8:26:01 PM (14 years ago)

Author:

George Lilly

Message:

WorldVistAEHR overlayed on FOIAVistA

Location:

FOIAVistA/tag/r

Files:

• . (copied) (copied from FOIAVistA/trunk/r )
• RPC_BROKER-XWB/XWBDLOG.m (modified) (2 diffs)

FOIAVistA/tag/r/RPC_BROKER-XWB/XWBDLOG.m

@@ -1 @@
-XWBDLOG ;ISF/RWF - Debug Logging for Broker ;12/08/2004  08:54
+XWBDLOG ;ISF/RWF - Debug Logging for Broker ;08/04/2004  13:56
  ;;1.1;RPC BROKER;**35**;Mar 28, 1997
  Q
@@ -5 +5 @@
  ;Setup the log, Clear the log location.
 LOGSTART(RTN) ;Clear the debug log
- Q:'$G(XWBDEBUG)
  K ^XTMP("XWBLOG"_$J)
  S ^XTMP("XWBLOG"_$J,0)=$$HTFM^XLFDT($$HADD^XLFDT($H,7))_"^"_$$DT^XLFDT