Changeset 965 for Scheduling/trunk/m/BSDX32.m

Timestamp:

Sep 29, 2010, 3:05:19 AM (14 years ago)

Author:

Sam Habiel

Message:

Rollback for yesterday's changes

File:

• Scheduling/trunk/m/BSDX32.m (modified) (3 diffs)

Scheduling/trunk/m/BSDX32.m

@@ -1 @@
-BSDX32  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
+BSDX32  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/29/10 10:21am
         ;;1.4;BSDX;;Sep 07, 2010
         ;
@@ -20 +20 @@
 HOSPLOC(BSDXY)  ;EP
         ;Called by BSDX HOSPITAL LOCATION
-    ;Returns all hospital locations that are active AND in the same division as the user
+    ;Returns all hospital locations that are active 
         ;
         N BSDXI,BSDXIEN,BSDXNOD,BSDXNAM,BSDXINA,BSDXREA,BSDXSCOD
@@ -34 +34 @@
         . Q:'+BSDXIEN>0
         . Q:'$D(^SC(+BSDXIEN,0))
-    . Q:'$$INDIV^BSDX01(+BSDXIEN)  ; if not in the same division, quit
+    . ;Q:'$$INDIV^BSDX01(+BSDXIEN)  ; if not in the same division, quit
         . S BSDXINA=$$GET1^DIQ(44,BSDXIEN_",",2505) ;INACTIVATE
         . S BSDXREA=$$GET1^DIQ(44,BSDXIEN_",",2506) ;REACTIVATE