Checking with Knowledge Language and Correcting Function with VB Script

This task explains how to create a check and use a VB correction method to make the invalid features fulfill the check.
  1. Open the KwxUseCase1.CATPart document. 
    This document is a draft built from a rectangular pad. Three holes are evenly distributed along the draft length.

  2. Right-click Hole.1 and select Properties. In the Update Status frame, check the Deactivated check box. Click OK to close the window.

  3. Access the Knowledge Expert workbench, then click the icon. In the dialog box which is displayed, select KWE language, enter a check name and a comment, and then click OK. The check editor is displayed.

  4. Select the Condition tab and enter the check below:

    (for all) H:Hole
    H.Activity == true
  5. In the Correction tab, select VB Script as correction method and enter the script below into the edition box:

    Dim oPart1 As Part
    Set oPart1 = H.Parent.Parent.Parent.Parent

    oPart1.Activate H
       oPart1.Update
  6. Select the Report tab and enter the text below into the Help Message edition box:

    Checks that all the document holes are activated
  7. Click OK to add the check to the rule base, then click the icon to solve the rule base. In the specification tree, the check icon is red indicating that not all the part holes are activated.

  8. Right-click Hole.1 and select Correct Function. The Correct Function is executed and the hole's activity is changed .The check icon is now green.