RULE data_definition_exchange_categorized_as_document

(* SCHEMA step_merged_ap_schema; *)
-- IN AP232
RULE data_definition_exchange_categorized_as_document FOR (product_related_product_category );
   LOCAL
      prds : SET OF product := [];
      prpc : SET OF product_related_product_category;
      pc : SET OF product_category;
      pdf : BAG OF product_definition_formation;
      result : BOOLEAN := TRUE;
   END_LOCAL;
      prpc := QUERY (v <* product_related_product_category| v.name = 'data definition exchange');
      REPEAT i := 1 TO SIZEOF(prpc) BY 1;
         prds := prpc[i].products;
         REPEAT j := 1 TO SIZEOF(prds) BY 1;
            pdf := USEDIN(prds[j], 'STEP_MERGED_AP_SCHEMA.' + 'PRODUCT_DEFINITION_FORMATION.OF_PRODUCT');
            IF SIZEOF(pdf) > 0 THEN
               pc := product_category_graph_members(prpc[i]);
               IF SIZEOF(QUERY (v <* pc| (v.name = 'document'))) < 1 THEN
                  result := FALSE;
               END_IF;
            END_IF;
         END_REPEAT;
      END_REPEAT;
   WHERE
      wr1:
         result;
END_RULE;

[Top Level Definitions] [Exit]

Generated by STEP Tools® EXPRESS to HTML Converter
2017-01-19T11:17:24-05:00