FUNCTION get_assemblies
(input : Assembly_component) : SET [0:?] OF Product_view_definition;
LOCAL acr : SET OF Assembly_component_relationship := input\Assembly_component.occurrence_contexts; pvd : SET OF Product_view_definition := []; END_LOCAL;
REPEAT i := 1 TO HIINDEX(acr) BY 1; IF NOT('LAYERED_INTERCONNECT_MODULE_DESIGN_ARM.' + 'STRUCTURED_LAYOUT_COMPONENT' IN TYPEOF(acr[i]\Product_occurrence_definition_relationship.relating_view)) THEN pvd := pvd + acr[i]\Product_occurrence_definition_relationship.relating_view; ELSE pvd := pvd + get_assemblies(acr[i]\Product_occurrence_definition_relationship.relating_view); END_IF; END_REPEAT;
RETURN (pvd); END_FUNCTION; -- get_assemblies
|