|
FUNCTION get_product_definitions (c_def_instance : product) : SET [0:?] OF product_definition; LOCAL pd_set : SET OF product_definition_formation := [ ] ; pdr_set : SET OF product_definition := [ ] ; END_LOCAL ; pd_set := bag_to_set ( USEDIN ( c_def_instance , 'product_definition_schema.product_definition_formation.of_product' ) ) ; IF ( SIZEOF ( pd_set ) < 1 ) THEN RETURN ( pdr_set ) ; END_IF ; REPEAT i := 1 TO HIINDEX ( pd_set ) ; pdr_set := pdr_set + bag_to_set ( USEDIN ( pd_set [ i ] , 'product_definition_schema.product_definition.formation' ) ) ; END_REPEAT ; RETURN ( pdr_set ) ; END_FUNCTION; -- get_product_definitions |
|
public class FGet_product_definitions public static Value run(SdaiContext _context, Value c_def_instance) |