FUNCTION unique_in_product_definition

(* SCHEMA step_merged_ap_schema; *)
-- IN AP242
FUNCTION unique_in_product_definition
      (item : representative_shape_representation ) : BOOLEAN;
   LOCAL
      local_p_d : SET OF product_definition := [];
      local_s_r : SET OF shape_representation := [];
      i : INTEGER;
      j : INTEGER;
   END_LOCAL;
      local_p_d := using_product_definition_of_shape_representation(item);
      IF SIZEOF(local_p_d) <> 1 THEN
         RETURN (FALSE);
      ELSE
         REPEAT i := 1 TO HIINDEX(local_p_d) BY 1;
            local_s_r := find_shape_representation_of_product_definition(local_p_d[i]);
            REPEAT j := 1 TO HIINDEX(local_s_r) BY 1;
               IF ('STEP_MERGED_AP_SCHEMA.REPRESENTATIVE_SHAPE_REPRESENTATION' IN TYPEOF(local_s_r[j])) AND (local_s_r[j] :<>: item) THEN
                  RETURN (FALSE);
               END_IF;
            END_REPEAT;
         END_REPEAT;
      END_IF;
      RETURN (TRUE);
END_FUNCTION;

Referenced By

Defintion unique_in_product_definition is references by the following definitions:
DefinitionType
 representative_shape_representation ENTITY


[Top Level Definitions] [Exit]

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