LOCAL acr : SET  OF  assembly_component_usage := input \ assembly_component_armx . occurrence_contexts ; pvd : SET OF product_view_definition := [ ] ; END_LOCAL ; REPEAT i := 1 TO HIINDEX ( acr ) BY 1 ; IF NOT ( 'component_grouping_xim.' + 'assembly_group_component_armx' IN TYPEOF ( acr [ i ] \ product_definition_relationship . relating_product_definition ) ) THEN pvd := pvd + acr [ i ] \ product_definition_relationship . relating_product_definition ; ELSE pvd := pvd + get_assemblies ( acr [ i ] \ product_definition_relationship . relating_product_definition ) ; END_IF ; END_REPEAT ; RETURN ( pvd ) ;