RULE applied_document_usage_constraint_assignment_restriction

(* SCHEMA step_merged_ap_schema; *)

-- IN AP232
RULE applied_document_usage_constraint_assignment_restriction FOR (document_file, externally_defined_symbol_and_placement );
   LOCAL
      exds : SET OF externally_defined_symbol_and_placement;
      aduca : BAG OF applied_document_usage_constraint_assignment;
      df : SET OF document_file;
      result : BOOLEAN := TRUE;
   END_LOCAL;
      df := document_file;
      REPEAT i := 1 TO SIZEOF(df) BY 1;
         aduca := USEDIN(df[i], 'STEP_MERGED_AP_SCHEMA.' + 'APPLIED_DOCUMENT_USAGE_CONSTRAINT_ASSIGNMENT.ITEMS');
         IF SIZEOF(aduca) > 0 THEN
            result := FALSE;
         END_IF;
      END_REPEAT;
      exds := externally_defined_symbol_and_placement;
      REPEAT i := 1 TO SIZEOF(exds) BY 1;
         aduca := USEDIN(exds[i], 'STEP_MERGED_AP_SCHEMA.' + 'APPLIED_DOCUMENT_USAGE_CONSTRAINT_ASSIGNMENT.ITEMS');
         IF SIZEOF(aduca) > 0 THEN
            result := FALSE;
         END_IF;
      END_REPEAT;
   WHERE
      wr1:
         result;
END_RULE;

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