Context Navigation

← Previous Change
Next Change →

Changeset 951 for Scheduling

Timestamp:

Sep 20, 2010, 8:16:53 AM (15 years ago)

Author:

Sam Habiel

Message:

Change version to 1.4 on all routines
BSDX08 has fix for drag and drop because it referenced a non existent cancellation reason

Location:

Scheduling/trunk/m

Files:

: 37 edited

BSDX01.m (modified) (2 diffs)
BSDX02.m (modified) (1 diff)
BSDX03.m (modified) (1 diff)
BSDX04.m (modified) (1 diff)
BSDX05.m (modified) (1 diff)
BSDX06.m (modified) (1 diff)
BSDX07.m (modified) (1 diff)
BSDX08.m (modified) (2 diffs)
BSDX09.m (modified) (2 diffs)
BSDX11.m (modified) (1 diff)
BSDX12.m (modified) (1 diff)
BSDX13.m (modified) (1 diff)
BSDX14.m (modified) (1 diff)
BSDX15.m (modified) (1 diff)
BSDX16.m (modified) (1 diff)
BSDX17.m (modified) (1 diff)
BSDX18.m (modified) (1 diff)
BSDX19.m (modified) (1 diff)
BSDX20.m (modified) (1 diff)
BSDX21.m (modified) (1 diff)
BSDX22.m (modified) (1 diff)
BSDX23.m (modified) (1 diff)
BSDX24.m (modified) (1 diff)
BSDX25.m (modified) (1 diff)
BSDX26.m (modified) (1 diff)
BSDX27.m (modified) (1 diff)
BSDX28.m (modified) (1 diff)
BSDX29.m (modified) (1 diff)
BSDX2E.m (modified) (1 diff)
BSDX30.m (modified) (1 diff)
BSDX31.m (modified) (1 diff)
BSDX32.m (modified) (1 diff)
BSDX33.m (modified) (1 diff)
BSDX34.m (modified) (1 diff)
BSDX35.m (modified) (1 diff)
BSDXAPI.m (modified) (1 diff)
BSDXGPRV.m (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

Scheduling/trunk/m/BSDX01.m

-              r888
+              r951
 BSDX01  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:04pm
         ;;1.3T1;BSDX;;Jul 18, 2010
+BSDX01  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/15/10 9:09pm
+        ;;1.4;BSDX;;Sep 07, 2010
+        ;
+        ;
 …
         . Q:'$D(^BSDXRES(BSDXRES,0))
         . S BSDXRNOD=^BSDXRES(BSDXRES,0)
+        . ;Q:$P(BSDXRNOD,U,2)=1  ;Inactive resources not filtered
+        . N BSDXSC S BSDXSC=$P(BSDXRNOD,U,4)  ; Hospital Location
+    . ; super line... if tied to hospital location,
+    . ; Hosp location exists, AND 4th piece isn't the same as
+    . ; DUZ(2), quit. Filters based on Divisions.
+    . ; . I +BSDXSC,$D(^SC(BSDXSC,0)),$P(^SC(BSDXSC,0),U,4)'=DUZ(2) QUIT
+    . ;Q:$P(BSDXRNOD,U,2)=1  ;Inactive resources not filtered
         . ;S BSDXRDAT=$P(BSDXRNOD,U,1,4)
         . K BSDXRDAT

Scheduling/trunk/m/BSDX02.m

r888	r951
1	1	BSDX02 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:25pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log

Scheduling/trunk/m/BSDX03.m

r888	r951
1	1	BSDX03 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX04.m

r888	r951
1	1	BSDX04 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 7/15/10 12:44pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	; Change Log:
4	4	; July 11 2010: Pass BSDXSTART and END as FM dates rather than US formatted dates

Scheduling/trunk/m/BSDX05.m

r888	r951
1	1	BSDX05 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:51pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX06.m

r888	r951
1	1	BSDX06 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 4:51pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	; Change Log:
4	4	; UJO/SMH: July 15 2010: Change in BSDXSTART and BSDXEND: get

Scheduling/trunk/m/BSDX07.m

r888	r951
1	1	BSDX07 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 7/18/10 2:11pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX08.m

-              r888
+              r951
 BSDX08  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
         ;;1.3T1;BSDX;;Jul 18, 2010
+BSDX08  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/15/10 8:21pm
+        ;;1.4;BSDX;;Sep 07, 2010
+        ;
+        ;
 …
         S BSDXC("CDT")=X+%
         S BSDXC("NOT")=BSDXNOT
         S:'+$G(BSDXCR) BSDXCR=14 ;UNKNOWN REASON
+        S:'+$G(BSDXCR) BSDXCR=11 ;Other
         S BSDXC("CR")=BSDXCR
         S BSDXC("USR")=DUZ

Scheduling/trunk/m/BSDX09.m

r912	r951
1	1	BSDX09 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 8/16/10 4:28pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:
…	…
13	13	GETREGA(BSDXRET,BSDXPAT) ;EP
14	14	;
15		; See below for the returned fields
	15	; See below for the returned fields
16	16	;
17	17	;For patient with ien BSDXPAT

Scheduling/trunk/m/BSDX11.m

r888	r951
1	1	BSDX11 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	ENV0100 ;EP Version 1.0 Environment check

Scheduling/trunk/m/BSDX12.m

r888	r951
1	1	BSDX12 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:14pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX13.m

r888	r951
1	1	BSDX13 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:17pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX14.m

r888	r951
1	1	BSDX14 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX15.m

r888	r951
1	1	BSDX15 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX16.m

r888	r951
1	1	BSDX16 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX17.m

r888	r951
1	1	BSDX17 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX18.m

r888	r951
1	1	BSDX18 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX19.m

r888	r951
1	1	BSDX19 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX20.m

r888	r951
1	1	BSDX20 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX21.m

r888	r951
1	1	BSDX21 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 5/21/10 9:42pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX22.m

r888	r951
1	1	BSDX22 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX23.m

r888	r951
1	1	BSDX23 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX24.m

r888	r951
1	1	BSDX24 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX25.m

r888	r951
1	1	BSDX25 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX26.m

r888	r951
1	1	BSDX26 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX27.m

r888	r951
1	1	BSDX27 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:22pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log: July 15, 2010

Scheduling/trunk/m/BSDX28.m

r888	r951
1	1	BSDX28 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:30pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX29.m

r888	r951
1	1	BSDX29 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:03pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX2E.m

r888	r951
1	1	BSDX2E ;IHS/OIT/MJL - ENVIRONMENT CHECK FOR WINDOWS SCHEDULING [7/18/10 4:30pm]
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	S LINE="",$P(LINE,"*",81)=""

Scheduling/trunk/m/BSDX30.m

r888	r951
1	1	BSDX30 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; [ 09/12/2007 1:54 PM ]
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX31.m

r888	r951
1	1	BSDX31 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX32.m

r888	r951
1	1	BSDX32 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDX33.m

r888	r951
1	1	BSDX33 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:33pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	; Mods by WV/STAR
4	4	;

Scheduling/trunk/m/BSDX34.m

r888	r951
1	1	BSDX34 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:37pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	; Change Log:

Scheduling/trunk/m/BSDX35.m

r888	r951
1	1	BSDX35 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Scheduling/trunk/m/BSDXAPI.m

r888	r951
1	1	BSDXAPI ; IHS/ANMC/LJF - SCHEDULING APIs ; 4/29/10 9:42pm
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;Orignal routine is BSDAPI by IHS/LJF, HMW, and MAW
4	4	;local mods (many) by WV/SMH

Scheduling/trunk/m/BSDXGPRV.m

r888	r951
1		BSDXGPRV ; WV/SMH - WINDOWS SCHEDULING RPCS ; ~~6/10/10 9:01p~~m
2		;;1.~~3T1;BSDX;;Jul 18~~, 2010
	1	BSDXGPRV ; WV/SMH - WINDOWS SCHEDULING RPCS ; 9/7/10 7:59am
	2	;;1.4;BSDX;;Sep 07, 2010
3	3	;
4	4	;

Note: See TracChangeset for help on using the changeset viewer.

Context Navigation

Changeset 951 for Scheduling

Legend:

Download in other formats: