FUNCTION find_shape_representation_of_product_definition

(* SCHEMA step_merged_ap_schema; *)

-- IN AP242
FUNCTION find_shape_representation_of_product_definition
      (item : product_definition ) : SET OF shape_representation;
   LOCAL
      local_p_d_s : SET OF product_definition_shape := [];
      local_p_d_s2 : BAG OF product_definition_shape := [];
      local_s_d_r : SET OF shape_definition_representation := [];
      local_s_d_r2 : BAG OF shape_definition_representation := [];
      local_s_r : SET OF shape_representation := [];
      i : INTEGER;
   END_LOCAL;
      local_p_d_s2 := local_p_d_s2 + QUERY (pd <* USEDIN(item, 'STEP_MERGED_AP_SCHEMA.PROPERTY_DEFINITION.DEFINITION')| ('STEP_MERGED_AP_SCHEMA.PRODUCT_DEFINITION_SHAPE' IN TYPEOF(pd)));
      local_p_d_s := bag_to_set(local_p_d_s2);
      REPEAT i := 1 TO HIINDEX(local_p_d_s);
         local_s_d_r2 := local_s_d_r2 + QUERY (pdr <* USEDIN(local_p_d_s[i], 'STEP_MERGED_AP_SCHEMA.PROPERTY_DEFINITION_REPRESENTATION.DEFINITION')| ('STEP_MERGED_AP_SCHEMA.SHAPE_DEFINITION_REPRESENTATION' IN TYPEOF(pdr)));
      END_REPEAT;
      local_s_d_r := bag_to_set(local_s_d_r2);
      REPEAT i := 1 TO HIINDEX(local_s_d_r);
         IF 'STEP_MERGED_AP_SCHEMA.SHAPE_REPRESENTATION' IN TYPEOF(local_s_d_r[i].used_representation) THEN
            local_s_r := local_s_r + local_s_d_r[i].used_representation;
         END_IF;
      END_REPEAT;
      RETURN (local_s_r);
END_FUNCTION;

Referenced By

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