iSharkFly-Open
/
VistA-Scheduling
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added LGPL license to routines

This commit is contained in:
sam 2011-05-03 08:28:05 +00:00
parent 10c72f2c7f
commit 1805b0ee4b
37 changed files with 108 additions and 73 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
m/BSDX01.m
View File

@ -1,5 +1,6 @@
BSDX01 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 3/16/11 7:08am
BSDX01 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:14am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
SUINFOD(BSDXY,BSDXDUZ) ;EP Debugging entry point
;D DEBUG^%Serenji("SUINFO^BSDX01(.BSDXY,BSDXDUZ)")

8
m/BSDX02.m
View File

@ -1,8 +1,8 @@
BSDX02 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 3/21/11 11:49am
BSDX02 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:14am
;;1.5;BSDX;;Apr 28, 2011
;
; Change Log
; July 15 2010: UJO/SMH - Pass FM dates in instead of US dates for i18n
;Licensed under LGPL
; Change Log
; July 15 2010: UJO/SMH - Pass FM dates in instead of US dates for i18n
; March 21 2011: UJO/SMH (v 1.5) - Return new fields: Patient SEX, PID, and DOB
;
;

3
m/BSDX03.m
View File

@ -1,5 +1,6 @@
BSDX03 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX03 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:14am
;;1.5;BSDX;;Apr 28, 2011
;Licensed under LGPL
;
;
Q

3
m/BSDX04.m
View File

@ -1,5 +1,6 @@
BSDX04 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 2/27/11 6:32am
BSDX04 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 4/28/11 10:15am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
; Change Log:
; July 11 2010: Pass BSDXSTART and END as FM dates rather than US formatted dates
; for i18n

3
m/BSDX05.m
View File

@ -1,5 +1,6 @@
BSDX05 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 12/6/10 5:36pm
BSDX05 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:16am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
; Change Log:
; UJO/SMH - July 11 2010: pass FM Dates for Start and End rather than US Dates

9
m/BSDX06.m
View File

@ -1,8 +1,9 @@
BSDX06 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 4:51pm
BSDX06 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:16am
;;1.5;BSDX;;Apr 28, 2011
; Change Log:
; UJO/SMH: July 15 2010: Change in BSDXSTART and BSDXEND: get
; dates in FM format for i18n
; Licensed under LGPL
; Change Log:
; UJO/SMH: July 15 2010: Change in BSDXSTART and BSDXEND: get
; dates in FM format for i18n
;
;
TPBLKOV(BSDXY,BSDXSTART,BSDXEND,BSDXRES) ;EP

3
m/BSDX07.m
View File

@ -1,5 +1,6 @@
BSDX07 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 3/15/11 11:50am
BSDX07 ; VW/UJO/SMH - WINDOWS SCHEDULING RPCS ; 4/28/11 10:17am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
; Change Log:
; UJO/SMH

2
m/BSDX08.m
View File

@ -1,4 +1,4 @@
BSDX08 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 1/25/11 12:39pm
BSDX08 ; VW/UJO/SMH - WINDOWS SCHEDULING RPCS ; 4/28/11 10:17am
;;1.5;BSDX;;Apr 28, 2011
;
; Original by HMW. New Written by Sam Habiel. Licensed under LGPL.

9
m/BSDX09.m
View File

@ -1,5 +1,6 @@
BSDX09 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 10/20/10 4:16pm
BSDX09 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 4/28/11 10:18am
;;1.5;BSDX;;Apr 28, 2011;Build 7
; Licensed under LGPL
;
; Change Log:
; UJO/TH - v 1.3 on 3100714 - Extra Demographics:
@ -10,11 +11,11 @@ BSDX09 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 10/20/10 4:16pm
;
; UJO/TH - v 1.3 on 3100715 - Change SSN to PID and get PID field instead
;
; UJO/TH - v 1.42 on 3101020 - Add Sex field.
;
; UJO/TH - v 1.42 on 3101020 - Add Sex field.
;
GETREGA(BSDXRET,BSDXPAT) ;EP
;
; See below for the returned fields
; See below for the returned fields
;
;For patient with ien BSDXPAT
;K ^BSDXTMP($J)

3
m/BSDX11.m
View File

@ -1,5 +1,6 @@
BSDX11 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX11 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:18am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
ENV0100 ;EP Version 1.0 Environment check
I '$G(IOM) D HOME^%ZIS

11
m/BSDX12.m
View File

@ -1,9 +1,10 @@
BSDX12 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:14pm
BSDX12 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:18am
;;1.5;BSDX;;Apr 28, 2011
;
; Change Log:
; v 1.3 - i18n support - 3100718
; BSDXSTART and BSDXEND passed in FM Dates, not US dates
; Licensed under LGPL
;
; Change Log:
; v 1.3 - i18n support - 3100718
; BSDXSTART and BSDXEND passed in FM Dates, not US dates
;
;
AVADD(BSDXY,BSDXSTART,BSDXEND,BSDXTYPID,BSDXRES,BSDXSLOTS,BSDXNOTE) ;EP

9
m/BSDX13.m
View File

@ -1,8 +1,9 @@
BSDX13 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 12/6/10 6:05pm
BSDX13 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:19am
;;1.5;BSDX;;Apr 28, 2011
;
; Change Log:
; V 1.3 - i18n support - Dates passed to Routine as FM Date - WV/SMH
; Licensed under LGPL
;
; Change Log:
; V 1.3 - i18n support - Dates passed to Routine as FM Date - WV/SMH
Q
AVDELDTD(BSDXY,BSDXRESD,BSDXSTART,BSDXEND) ;EP
;Entry point for debugging

3
m/BSDX14.m
View File

@ -1,5 +1,6 @@
BSDX14 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX14 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:19am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
ACCTYPD(BSDXY,BSDXVAL) ;EP

3
m/BSDX15.m
View File

@ -1,5 +1,6 @@
BSDX15 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX15 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:19am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
GRPTYP(BSDXY) ;EP

3
m/BSDX16.m
View File

@ -1,5 +1,6 @@
BSDX16 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX16 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; ; 4/28/11 10:20am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
RSRCD(BSDXY,BSDXVAL) ;EP

3
m/BSDX17.m
View File

@ -1,5 +1,6 @@
BSDX17 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX17 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:20am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
SCHUSRD(BSDXY) ;EP

3
m/BSDX18.m
View File

@ -1,5 +1,6 @@
BSDX18 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX18 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:20am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
DELRUD(BSDXY,BSDXIEN) ;EP

3
m/BSDX19.m
View File

@ -1,5 +1,6 @@
BSDX19 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX19 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:21am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
ADDRGD(BSDXY,BSDXVAL) ;EP

3
m/BSDX20.m
View File

@ -1,5 +1,6 @@
BSDX20 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX20 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:21am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
DELRGID(BSDXY,BSDXIEN) ;EP

3
m/BSDX21.m
View File

@ -1,5 +1,6 @@
BSDX21 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 5/21/10 9:42pm
BSDX21 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:22am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
ADDAGD(BSDXY,BSDXVAL) ;EP

3
m/BSDX22.m
View File

@ -1,5 +1,6 @@
BSDX22 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX22 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:22am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
DELAGID(BSDXY,BSDXIEN,BSDXIEN1) ;EP

3
m/BSDX23.m
View File

@ -1,5 +1,6 @@
BSDX23 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX23 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:22am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
EVENT(BSDXEVENT,BSDXPARAM,BSDXSIP,BSDXSPT) ;EP

3
m/BSDX24.m
View File

@ -1,5 +1,6 @@
BSDX24 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX24 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:22am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
Q

3
m/BSDX25.m
View File

@ -1,5 +1,6 @@
BSDX25 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 3/16/11 2:21am
BSDX25 ; VW/UJO/SMH - WINDOWS SCHEDULING RPCS ; 4/28/11 10:24am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
; Change Log:
; 3110106: SMH -> Changed Check-in EP - Removed unused paramters. Will change C#

3
m/BSDX26.m
View File

@ -1,5 +1,6 @@
BSDX26 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 12/6/10 12:38pm
BSDX26 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:24am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
; Change History:
; 3101023 - UJO/SMH - Addition of restartable transaction; relocation of tx.
; --> Thanks to Zach Gonzalez and Rick Marshall

3
m/BSDX27.m
View File

@ -1,5 +1,6 @@
BSDX27 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 12/6/10 4:52pm
BSDX27 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:24am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
; Change Log: July 15, 2010
; UJO/SMH - i18n: FM Dates passed into routine for Clinic Letters - CLDISP ta

14
m/BSDX28.m
View File

@ -1,12 +1,12 @@
BSDX28 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/18/10 2:30pm
BSDX28 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:25am
;;1.5;BSDX;;Apr 28, 2011
;
; Change Log:
; Licensed under LGPL
; Change Log:
; HMW 3050721 Added test for inactivated record
; V1.3 WV/SMH 3100714
; - add PID search
; - return PID instead of SSN (change header and logic)
; - Change Error trap to new style.
; V1.3 WV/SMH 3100714
; - add PID search
; - return PID instead of SSN (change header and logic)
; - Change Error trap to new style.
;
PTLOOKRS(BSDXY,BSDXP,BSDXC) ;EP Patient Lookup
;

11
m/BSDX29.m
View File

@ -1,13 +1,14 @@
BSDX29 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 12/6/10 12:39pm
BSDX29 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:25am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
; Change Log:
; v1.3 by WV/SMH on 3100713
; - Beginning and Ending dates passed as FM Dates
; v1.42 by WV/SMH on 3101023
; - Transaction moved; now restartable too.
; --> Thanks to Zach Gonzalez and Rick Marshall.
; - Refactoring of major portions of routine
; v1.42 by WV/SMH on 3101023
; - Transaction moved; now restartable too.
; --> Thanks to Zach Gonzalez and Rick Marshall.
; - Refactoring of major portions of routine
;
BSDXCPD(BSDXY,BSDXRES,BSDX44,BSDXBEG,BSDXEND) ;EP
;Entry point for debugging

3
m/BSDX2E.m
View File

@ -1,5 +1,6 @@
BSDX2E ;IHS/OIT/MJL - ENVIRONMENT CHECK FOR WINDOWS SCHEDULING [3/16/11 9:54am]
BSDX2E ;IHS/OIT/MJL - ENVIRONMENT CHECK FOR WINDOWS SCHEDULING [4/28/11 10:28am]
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
S LINE="",$P(LINE,"*",81)=""
S XPDNOQUE="NO QUE" ;NO QUEUING ALLOWED

3
m/BSDX30.m
View File

@ -1,5 +1,6 @@
BSDX30 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; [ 09/12/2007 1:54 PM ]
BSDX30 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; [4/28/11 10:28am]
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
SPACED(BSDXY,BSDXDIC,BSDXVAL) ;EP

3
m/BSDX31.m
View File

@ -1,5 +1,6 @@
BSDX31 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 12/6/10 12:39pm
BSDX31 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:28am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
; Change Log:
; v1.42 Oct 23 2010 WV/SMH
; - Change transaction to restartable. Thanks to Zach Gonzalez

3
m/BSDX32.m
View File

@ -1,5 +1,6 @@
BSDX32 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 9/29/10 10:21am
BSDX32 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:28am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
ERROR ;

17
m/BSDX33.m
View File

@ -1,12 +1,13 @@
BSDX33 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:33pm
BSDX33 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:29am
;;1.5;BSDX;;Apr 28, 2011
; Mods by WV/STAR
;
; Change Log:
; July 13, 2010
; v 1.3 adds fixes Rebooking behavior in application (see RBNEXT)
; also adds i18 support - Dates passed in FM format from application
; in tag SETRBK and RBNEXT
; Licensed under LGPL
; Mods by WV/STAR
;
; Change Log:
; July 13, 2010
; v 1.3 adds fixes Rebooking behavior in application (see RBNEXT)
; also adds i18 support - Dates passed in FM format from application
; in tag SETRBK and RBNEXT
;
;
Q

9
m/BSDX34.m
View File

@ -1,8 +1,9 @@
BSDX34 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/15/10 12:37pm
BSDX34 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:29am
;;1.5;BSDX;;Apr 28, 2011
;
; Change Log:
; July 10 2010:
; Licensed under LGPL
;
; Change Log:
; July 10 2010:
; CANCLIN AND RBCLIN: Dates passed in FM format for i18n
;
Q

3
m/BSDX35.m
View File

@ -1,5 +1,6 @@
BSDX35 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ;
BSDX35 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 4/28/11 10:29am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
Q

4
m/BSDXAPI.m
View File

@ -1,5 +1,7 @@
BSDXAPI ; IHS/ANMC/LJF - SCHEDULING APIs ; 1/26/11 11:47am
BSDXAPI ; IHS/ANMC/LJF & VW/SMH - SCHEDULING APIs ; 4/28/11 10:30am
;;1.5;BSDX;;Apr 28, 2011;Build 7
; Licensed under LGPL
;
;Orignal routine is BSDAPI by IHS/LJF, HMW, and MAW
;local mods (many) by WV/SMH
;Move to BSDX namespace as BSDXAPI from BSDAPI by WV/SMH

3
m/BSDXGPRV.m
View File

@ -1,5 +1,6 @@
BSDXGPRV ; WV/SMH - WINDOWS SCHEDULING RPCS ; 11/2/10 4:27pm
BSDXGPRV ; WV/SMH - WINDOWS SCHEDULING RPCS ; 4/28/11 10:31am
;;1.5;BSDX;;Apr 28, 2011
; Licensed under LGPL
;
;
ERROR ;