RULE product_definition_relationship_with_definable_object

(* SCHEMA ship_structures_schema; *)

  RULE product_definition_relationship_with_definable_object FOR (
             product_definition_relationship, group, 
             applied_classification_assignment);

    LOCAL
      clfied_inst : SET OF classification_item := [];
    END_LOCAL;
    REPEAT i := 1 TO HIINDEX(applied_classification_assignment) BY 1;
      IF applied_classification_assignment[i].assigned_class.name = 
          'definable object' THEN
        clfied_inst := clfied_inst + applied_classification_assignment[i].
            items;
      END_IF;
    END_REPEAT;

  WHERE
    wr1: (SIZEOF(QUERY ( i <* clfied_inst | (NOT (i.id LIKE '*.*')) )) = 0);

  END_RULE; -- product_definition_relationship_with_definable_object

Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:17:03-04:00