Changeset 1116 for Scheduling/trunk/m/BSDX25.m

Timestamp:

Mar 28, 2011, 10:40:45 AM (13 years ago)

Author:

Sam Habiel

Message:

Alpha 3 version files

File:

• Scheduling/trunk/m/BSDX25.m (modified) (4 diffs)

Scheduling/trunk/m/BSDX25.m

@@ -1 +1 @@
 BSDX25  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 3/16/11 2:21am
-        ;;1.5V2;BSDX;;Mar 03, 2011
+        ;;1.5V3;BSDX;;Mar 16, 2011
         ;
         ; Change Log:
@@ -6 +6 @@
         ;
         ;
-UT ; Unit Tests
- ; Make appointment, checkin, then uncheckin
+UT      ; Unit Tests
+        ; Make appointment, checkin, then uncheckin
         N ZZZ
         N APPTTIME S APPTTIME=$E($$NOW^XLFDT(),1,12)
@@ -111 +111 @@
         Q
         ;
-RMCI(BSDXY,BSDXAPPTID) ; EP - Remove Check-in from BSDX APPT and 2/44
+RMCI(BSDXY,BSDXAPPTID)  ; EP - Remove Check-in from BSDX APPT and 2/44
         ; Called by RPC [Fill in later]
         ; 
@@ -224 +224 @@
 ERROR   ;
         S $ETRAP="D ^%ZTER HALT"  ; Emergency Error Trap for the wise
-    ; Rollback, otherwise ^XTER will be empty from future rollback
-    I $TL>0 TROLLBACK
-    D ^%ZTER
-    S $EC=""  ; Clear Error
-    ; Log error message and send to client
+           ; Rollback, otherwise ^XTER will be empty from future rollback
+           I $TL>0 TROLLBACK
+           D ^%ZTER
+           S $EC=""  ; Clear Error
+           ; Log error message and send to client
         D ERR("-20~Mumps Error")
         Q