Changeset 951 for Scheduling/trunk/m


Ignore:
Timestamp:
Sep 20, 2010, 8:16:53 AM (14 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

Legend:

Unmodified
Added
Removed
  • Scheduling/trunk/m/BSDX01.m

    r888 r951  
    1 BSDX01  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:04pm
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     1BSDX01  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/15/10 9:09pm
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
     
    120120        . Q:'$D(^BSDXRES(BSDXRES,0))
    121121        . 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
    123128        . ;S BSDXRDAT=$P(BSDXRNOD,U,1,4)
    124129        . K BSDXRDAT
  • Scheduling/trunk/m/BSDX02.m

    r888 r951  
    11BSDX02  ; 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
    33           ;
    44           ; Change Log
  • Scheduling/trunk/m/BSDX03.m

    r888 r951  
    11BSDX03  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX04.m

    r888 r951  
    11BSDX04  ; 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
    33           ; Change Log:
    44           ; July 11 2010: Pass BSDXSTART and END as FM dates rather than US formatted dates
  • Scheduling/trunk/m/BSDX05.m

    r888 r951  
    11BSDX05  ; 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
    33        ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX06.m

    r888 r951  
    11BSDX06  ; 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
    33           ; Change Log:
    44           ; UJO/SMH: July 15 2010: Change in BSDXSTART and BSDXEND: get
  • Scheduling/trunk/m/BSDX07.m

    r888 r951  
    11BSDX07  ; 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
    33           ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX08.m

    r888 r951  
    1 BSDX08  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     1BSDX08  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/15/10 8:21pm
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
     
    101101        S BSDXC("CDT")=X+%
    102102        S BSDXC("NOT")=BSDXNOT
    103         S:'+$G(BSDXCR) BSDXCR=14 ;UNKNOWN REASON
     103        S:'+$G(BSDXCR) BSDXCR=11 ;Other
    104104        S BSDXC("CR")=BSDXCR
    105105        S BSDXC("USR")=DUZ
  • Scheduling/trunk/m/BSDX09.m

    r912 r951  
    11BSDX09  ; 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
    33        ;
    44           ; Change Log:
     
    1313GETREGA(BSDXRET,BSDXPAT)               ;EP
    1414        ;
    15     ; See below for the returned fields
     15           ; See below for the returned fields
    1616        ;
    1717        ;For patient with ien BSDXPAT
  • Scheduling/trunk/m/BSDX11.m

    r888 r951  
    11BSDX11  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44ENV0100 ;EP Version 1.0 Environment check
  • Scheduling/trunk/m/BSDX12.m

    r888 r951  
    11BSDX12  ; 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
    33           ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX13.m

    r888 r951  
    11BSDX13  ; 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
    33           ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX14.m

    r888 r951  
    11BSDX14  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX15.m

    r888 r951  
    11BSDX15  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX16.m

    r888 r951  
    11BSDX16  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX17.m

    r888 r951  
    11BSDX17  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX18.m

    r888 r951  
    11BSDX18  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX19.m

    r888 r951  
    11BSDX19  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX20.m

    r888 r951  
    11BSDX20  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX21.m

    r888 r951  
    11BSDX21  ; 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
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX22.m

    r888 r951  
    11BSDX22  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX23.m

    r888 r951  
    11BSDX23  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX24.m

    r888 r951  
    11BSDX24  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX25.m

    r888 r951  
    11BSDX25  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX26.m

    r888 r951  
    11BSDX26  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX27.m

    r888 r951  
    11BSDX27  ; 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
    33           ;
    44           ; Change Log: July 15, 2010
  • Scheduling/trunk/m/BSDX28.m

    r888 r951  
    11BSDX28  ; 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
    33        ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX29.m

    r888 r951  
    11BSDX29  ; 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
    33           ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX2E.m

    r888 r951  
    11BSDX2E  ;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
    33        ;
    44        S LINE="",$P(LINE,"*",81)=""
  • Scheduling/trunk/m/BSDX30.m

    r888 r951  
    11BSDX30  ; 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
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX31.m

    r888 r951  
    11BSDX31  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX32.m

    r888 r951  
    11BSDX32  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDX33.m

    r888 r951  
    11BSDX33  ; 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
    33           ; Mods by WV/STAR
    44           ;
  • Scheduling/trunk/m/BSDX34.m

    r888 r951  
    11BSDX34  ; 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
    33           ;
    44           ; Change Log:
  • Scheduling/trunk/m/BSDX35.m

    r888 r951  
    11BSDX35  ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
  • Scheduling/trunk/m/BSDXAPI.m

    r888 r951  
    11BSDXAPI ; IHS/ANMC/LJF - SCHEDULING APIs ; 4/29/10 9:42pm
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;Orignal routine is BSDAPI by IHS/LJF, HMW, and MAW
    44        ;local mods (many) by WV/SMH
  • Scheduling/trunk/m/BSDXGPRV.m

    r888 r951  
    1 BSDXGPRV        ; WV/SMH - WINDOWS SCHEDULING RPCS ; 6/10/10 9:01pm
    2         ;;1.3T1;BSDX;;Jul 18, 2010
     1BSDXGPRV        ; WV/SMH - WINDOWS SCHEDULING RPCS ; 9/7/10 7:59am
     2        ;;1.4;BSDX;;Sep 07, 2010
    33        ;
    44        ;
Note: See TracChangeset for help on using the changeset viewer.