FUNCTION get_round_holes_for_composite_hole

(* SCHEMA step_merged_ap_schema; *)

-- IN AP214
FUNCTION get_round_holes_for_composite_hole
      (sar_instance_set : SET OF shape_aspect_relationship ) : SET OF round_hole;
   LOCAL
      rh_set : SET OF round_hole := [];
      pdr_set : SET OF property_definition_representation;
      pdr_set1 : SET OF property_definition_representation;
      ri_set : SET OF representation_item;
   END_LOCAL;
      REPEAT i := 1 TO HIINDEX(sar_instance_set);
         IF SIZEOF([ 'STEP_MERGED_AP_SCHEMA.INSTANCED_FEATURE', 'STEP_MERGED_AP_SCHEMA.ROUND_HOLE' ] * TYPEOF(sar_instance_set[i].related_shape_aspect)) >= 2 THEN
            rh_set := rh_set + sar_instance_set[i].related_shape_aspect\round_hole;
         END_IF;
         IF 'STEP_MERGED_AP_SCHEMA.PLACED_FEATURE' IN TYPEOF(sar_instance_set[i]) THEN
            pdr_set := get_shape_aspect_property_definition_representations(sar_instance_set[i].related_shape_aspect);
            REPEAT j := 1 TO HIINDEX(pdr_set);
               IF (pdr_set[j].used_representation.name = 'feature definition placement') AND ('STEP_MERGED_AP_SCHEMA.SHAPE_REPRESENTATION' IN TYPEOF(pdr_set[j].used_representation)) THEN
                  ri_set := pdr_set[j].used_representation.items;
                  REPEAT k := 1 TO HIINDEX(ri_set);
                     IF ('STEP_MERGED_AP_SCHEMA.MAPPED_ITEM' IN TYPEOF(ri_set[k])) AND ('STEP_MERGED_AP_SCHEMA.' + 'SHAPE_REPRESENTATION_WITH_PARAMETERS' IN TYPEOF(ri_set[k]\mapped_item.mapping_source.mapped_representation)) THEN
                        pdr_set1 := bag_to_set(USEDIN(ri_set[k]\mapped_item.mapping_source.mapped_representation, 'STEP_MERGED_AP_SCHEMA.PROPERTY_DEFINITION_REPRESENTATION.USED_REPRESENTATION'));
                        REPEAT l := 1 TO HIINDEX(pdr_set1);
                           IF 'STEP_MERGED_AP_SCHEMA.ROUND_HOLE' IN TYPEOF(pdr_set1[l].definition.definition) THEN
                              rh_set := rh_set + pdr_set1[l].definition.definition;
                           END_IF;
                        END_REPEAT;
                     END_IF;
                  END_REPEAT;
               END_IF;
            END_REPEAT;
         END_IF;
      END_REPEAT;
      RETURN (rh_set);
END_FUNCTION;

Referenced By

[Top Level Definitions] [Exit]

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