Index: Scheduling/trunk/m/BSDX26.m
===================================================================
--- Scheduling/trunk/m/BSDX26.m	(revision 1479)
+++ Scheduling/trunk/m/BSDX26.m	(revision 1480)
@@ -1,3 +1,3 @@
-BSDX26	 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/9/12 2:19pm
+BSDX26	 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/10/12 10:27am
 	;;1.7T1;BSDX;;Jul 06, 2012;Build 18
 	; Licensed under LGPL
@@ -71,4 +71,5 @@
 	M ^TMP($J,"BEFORE","BSDXAPPT")=^BSDXAPPT(BSDXAPTID)
 	;
+	; Update note in BSDX APPOINTMENT
 	I $D(BSDXNOTE(.5)) D
 	. D WP^DIE(9002018.4,BSDXAPTID_",",1,"","BSDXNOTE","BSDXMSG")
@@ -86,5 +87,5 @@
 	; If we get an error (denoted by -1 in BSDXRES), return error to client
 	; AND restore the original note
-	I BSDXRES<0 D ERR(BSDXI,"4~BSDX26: BSDXAPI reports an error: "_BSDXRES),ROLLBACK(BSDXAPTID) QUIT
+	I BSDXRES D ERR(BSDXI,"4~BSDX26: BSDXAPI reports an error: "_BSDXRES),ROLLBACK(BSDXAPTID) QUIT
 	;
 	;Return Recordset indicating success
Index: Scheduling/trunk/m/BSDX31.m
===================================================================
--- Scheduling/trunk/m/BSDX31.m	(revision 1479)
+++ Scheduling/trunk/m/BSDX31.m	(revision 1480)
@@ -1,3 +1,3 @@
-BSDX31	 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/9/12 12:57pm
+BSDX31	 ; IHS/OIT/HMW - WINDOWS SCHEDULING RPCS ; 7/10/12 10:39am
 	;;1.7T1;BSDX;;Jul 06, 2012;Build 18
 	; Licensed under LGPL
@@ -201,5 +201,4 @@
 	D ^%ZTER
 	;
-	I $G(BSDXAPTID),$D(BSDXNS) N % S %=$$BSDXNOS(BSDXAPTID,'BSDXNS) ; Reverse No-Show status (whatever it was)
 	; Send to client
 	I '$D(BSDXI) N BSDXI S BSDXI=0
Index: Scheduling/trunk/m/BSDXAPI.m
===================================================================
--- Scheduling/trunk/m/BSDXAPI.m	(revision 1479)
+++ Scheduling/trunk/m/BSDXAPI.m	(revision 1480)
@@ -1,3 +1,3 @@
-BSDXAPI	; IHS/LJF,HMW,MAW & VEN/SMH - SCHEDULING APIs ; 7/9/12 4:00pm
+BSDXAPI	; IHS/LJF,HMW,MAW & VEN/SMH - SCHEDULING APIs ; 7/10/12 5:58pm
 	;;1.7T1;BSDX;;Jul 06, 2012;Build 18
 	; Licensed under LGPL  
@@ -155,5 +155,5 @@
 	; If previous data exists, which caused an error, it's destroyed.
 	; NB: ^DIK stops for nobody
-	; TODO: If Patient Appointment previously existed as cancelled, it's removed.
+	; NB: If Patient Appointment previously existed as cancelled, it's removed.
 	; How can I tell if one previously existed when data is in an intermediate
 	; State? Can I restore it if the other file failed? Restoration can cause
@@ -420,5 +420,4 @@
 APPLEN(PAT,CLINIC,DATE)	; $$ PEP; returns an appointment's length
 	; Get either the appointment length or zero
-	; TODO: Test
 	N SCIEN S SCIEN=$$SCIEN(PAT,CLINIC,DATE)
 	Q:SCIEN $P(^SC(CLINIC,"S",DATE,1,SCIEN,0),U,2)
