How To Modify a Rule's Table to Which It Belongs in VFP 5.0

Last reviewed: October 28, 1996
Article ID: Q158255
The information in this article applies to:
  • Microsoft Visual FoxPro for Windows, version 5.0

SUMMARY

In Visual FoxPro 5.0, the field validation rules and the record validation rules can now modify the table to which they belong. This is not possible in Visual FoxPro 3.0.

MORE INFORMATION

For example, suppose you want to track when each update was made to a record, check a maximum order amount, and capitalize entries in a certain field. The following steps illustrate how this might be done.

  1. Create a new DBC called "mydbc."

  2. Issue the following command to create a table:

          CREATE TABLE cust(custname c(10),chg_date D, order N(5), ;
          max N(5), limit L)
    

  3. Enter some records in the table.

  4. Modify the table, and in the record validation rule type rec_valid().

  5. In the field validation rule for custname type fld_valid().

  6. Enter the following in the stored procedures:

          PROCEDURE rec_valid
    
             REPLACE chg_date WITH DATE()
             IF order > max
                REPLACE limit With .t.
             ELSE
                REPLACE limit with .f.
             ENDIF
          ENDPROCEDURE
    
          PROCEDURE fld_valid
            IF !EMPTY(ALLTRIM(custname)) AND ;
               ALLTRIM(PROPER(custname))<>ALLTRIM(custname)
                REPLACE custname WITH PROPER(custname)
            ENDIF
          ENDPROCEDURE
    
    

  7. Browse the table, add new records, and edit existing records.

Notice the chg_date is modified for each new record and for any existing record that is edited. The limit field is set to true each time the order field exceeds the max field. The first letter of custname is always capitalized regardless of how the name is entered or changed.


KBCategory: kbprg kbhowto
KBSubcategory: FxprgTable
Additional reference words: 5.00 VFoxWin kbdse



THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: October 28, 1996
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.