LOCAL middle : BAG [ 0 : ? ] OF general_property_relationship ; END_LOCAL ; middle := QUERY ( ipr <* ( USEDIN ( input , 'product_property_definition_schema.' + 'general_property_relationship.related_property' ) ) | ipr . name = 'decomposition' ) ; REPEAT i := 1 TO HIINDEX ( middle ) ; IF ( 'characteristic_xim.characteristic_data_table_header_armx' IN TYPEOF ( middle [ i ] . relating_property ) ) THEN RETURN  ( middle [ i ] . relating_property ) ; END_IF ; END_REPEAT ; RETURN ( ? ) ;