FUNCTION limdwpcd_get_ac
(input : SET [0:?] OF structured_layout_component_sub_assembly_relationship) : SET [0:?] OF area_component_armx;
LOCAL sspc : SET OF Stratum_feature_template_component_armx := []; --this gives us access TO the information base slcsar : SET OF Structured_layout_component_sub_assembly_relationship := (QUERY(inp <* input | ('LAYERED_INTERCONNECT_MODULE_DESIGN_XIM.AREA_COMPONENT_ARMX' IN TYPEOF(inp.related_view)) AND NOT ('LAND_XIM.LAND_ARMX' IN TYPEOF(inp.related_view)) AND NOT ('LAYERED_INTERCONNECT_MODULE_DESIGN_XIM.CONDUCTIVE_INTERCONNECT_ELEMENT_WITH_PRE_DEFINED_TRANSITIONS_ARMX' IN TYPEOF(inp.related_product_definition)) AND NOT ('LAYERED_INTERCONNECT_MODULE_DESIGN_XIM.INTERFACE_ACCESS_STRATUM_FEATURE_TEMPLATE_COMPONENT_ARMX' IN TYPEOF(inp.related_product_definition)) )); END_LOCAL;
REPEAT i := 1 TO SIZEOF(slcsar) BY 1; sspc := sspc + slcsar[i]\Structured_layout_component_sub_assembly_relationship.related_product_definition; END_REPEAT;
RETURN(sspc); END_FUNCTION; -- limdwpcd_get_ac
|