[Oorexx-svn] SF.net SVN: oorexx-code-0:[9408] ooDialog/trunk/examples/userGuide/ exercises/Exercise08/Order/OrderFormView.rex

[<os...@us...>]

Revision: 9408
          http://sourceforge.net/p/oorexx/code-0/9408
Author:   osims
Date:     2013-09-03 10:16:17 +0000 (Tue, 03 Sep 2013)
Log Message:
-----------
Two "say" debug instructions commented out.

Modified Paths:
--------------
    ooDialog/trunk/examples/userGuide/exercises/Exercise08/Order/OrderFormView.rex

Modified: ooDialog/trunk/examples/userGuide/exercises/Exercise08/Order/OrderFormView.rex
===================================================================
--- ooDialog/trunk/examples/userGuide/exercises/Exercise08/Order/OrderFormView.rex	2013-09-03 10:15:40 UTC (rev 9407)
+++ ooDialog/trunk/examples/userGuide/exercises/Exercise08/Order/OrderFormView.rex	2013-09-03 10:16:17 UTC (rev 9408)
@@ -600,7 +600,7 @@
     -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - */
   ::METHOD CustNumGotFocus UNGUARDED 
     expose pbFindCust
-    say "CustomerDetailsDlg-CustNumGotFocus-01."
+    --say "CustomerDetailsDlg-CustNumGotFocus-01."
     pbFindCust~style = "DEFPUSHBUTTON"
     pbFindCust~enable
     --self~focusControl("IDC_CUSTDTLS_FIND")
@@ -613,10 +613,10 @@
     -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - */
   ::METHOD findCustomer UNGUARDED
     expose ecCustNum ecCustName ecCustAddr ecCustDisc pbFindCust objectMgr dlgOrderForm
-    say "CustomerDetailsDlg-findCust-01."
+    --say "CustomerDetailsDlg-findCust-01."
     custNo = ecCustNum~getLine(1) 
     idCust = objectMgr~getComponentId("CustomerModel",custNo)
-    say "OrderFormView/CustomerDetailsDlg-findCustomer-01: idCustNo =" idCust
+    --say "OrderFormView/CustomerDetailsDlg-findCustomer-01: idCustNo =" idCust
     if idCust = .false then do
       r = ErrorDialog(.HRSofv~noCust)
       pbFindCust~disable