FUNCTION IfcUniquePropertySetNames
(* SCHEMA IFC4; *)
FUNCTION IfcUniquePropertySetNames
(Properties : SET [1:?] OF IfcPropertySetDefinition)
:LOGICAL;
LOCAL
Names : SET OF IfcLabel := [];
Unnamed : INTEGER := 0;
END_LOCAL;
REPEAT i:=1 TO HIINDEX(Properties);
IF 'IFC4.IFCPROPERTYSET' IN TYPEOF(Properties[i]) THEN
Names := Names + Properties[i]\IfcRoot.Name;
ELSE
Unnamed := Unnamed + 1;
END_IF;
END_REPEAT;
RETURN (SIZEOF(Names) + Unnamed = SIZEOF(Properties));
END_FUNCTION;
Referenced By
Defintion IfcUniquePropertySetNames is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2024-07-11T21:39:05-04:00