RULE reference_document_requires_subcategorization

(* SCHEMA step_merged_ap_schema; *)

-- IN AP232
RULE reference_document_requires_subcategorization FOR (product_related_product_category );
   LOCAL
      prpc : SET OF product_related_product_category;
      pcr : BAG OF product_category_relationship;
      result : BOOLEAN := TRUE;
   END_LOCAL;
      prpc := QUERY (v <* product_related_product_category| v\product_category.name = 'reference document');
      REPEAT i := 1 TO SIZEOF(prpc) BY 1;
         pcr := USEDIN(prpc[i], 'STEP_MERGED_AP_SCHEMA.' + 'PRODUCT_CATEGORY_RELATIONSHIP.CATEGORY');
         IF SIZEOF(pcr) < 1 THEN
            result := FALSE;
         END_IF;
      END_REPEAT;
   WHERE
      wr1:
         result;
END_RULE;

Generated by STEP Tools® EXPRESS to HTML Converter
2020-07-28T17:02:20-04:00