Changeset 951 for Scheduling/trunk/m
- Timestamp:
- Sep 20, 2010, 8:16:53 AM (14 years ago)
- Location:
- Scheduling/trunk/m
- Files:
-
- 37 edited
Legend:
- Unmodified
- Added
- Removed
-
Scheduling/trunk/m/BSDX01.m
r888 r951 1 BSDX01 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:04pm2 ;;1. 3T1;BSDX;;Jul 18, 20101 BSDX01 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/15/10 9:09pm 2 ;;1.4;BSDX;;Sep 07, 2010 3 3 ; 4 4 ; … … 120 120 . Q:'$D(^BSDXRES(BSDXRES,0)) 121 121 . S BSDXRNOD=^BSDXRES(BSDXRES,0) 122 . ;Q:$P(BSDXRNOD,U,2)=1 ;Inactive resources not filtered 122 . N BSDXSC S BSDXSC=$P(BSDXRNOD,U,4) ; Hospital Location 123 . ; super line... if tied to hospital location, 124 . ; Hosp location exists, AND 4th piece isn't the same as 125 . ; DUZ(2), quit. Filters based on Divisions. 126 . ; . I +BSDXSC,$D(^SC(BSDXSC,0)),$P(^SC(BSDXSC,0),U,4)'=DUZ(2) QUIT 127 . ;Q:$P(BSDXRNOD,U,2)=1 ;Inactive resources not filtered 123 128 . ;S BSDXRDAT=$P(BSDXRNOD,U,1,4) 124 129 . 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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;1.4;BSDX;;Sep 07, 2010 3 3 ; 4 4 ; Change Log: -
Scheduling/trunk/m/BSDX08.m
r888 r951 1 BSDX08 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 2 ;;1. 3T1;BSDX;;Jul 18, 20101 BSDX08 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/15/10 8:21pm 2 ;;1.4;BSDX;;Sep 07, 2010 3 3 ; 4 4 ; … … 101 101 S BSDXC("CDT")=X+% 102 102 S BSDXC("NOT")=BSDXNOT 103 S:'+$G(BSDXCR) BSDXCR=1 4 ;UNKNOWN REASON103 S:'+$G(BSDXCR) BSDXCR=11 ;Other 104 104 S BSDXC("CR")=BSDXCR 105 105 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, 20102 ;;1.4;BSDX;;Sep 07, 2010 3 3 ; 4 4 ; Change Log: … … 13 13 GETREGA(BSDXRET,BSDXPAT) ;EP 14 14 ; 15 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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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, 20102 ;;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:01pm2 ;;1. 3T1;BSDX;;Jul 18, 20101 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.