|
FUNCTION get_stack (input : SET [0:?] OF stratum_technology_occurrence_link_armx) : SET [0:?] OF stratum_technology_occurrence_armx; LOCAL sto : SET OF stratum_technology_occurrence_armx := [ ] ; i : INTEGER := 0 ; END_LOCAL ; REPEAT i := 1 TO SIZEOF ( input ) BY 1 ; sto := sto + input [ i ] . sto_1 + input [ i ] . sto_2 ; END_REPEAT ; RETURN ( sto ) ; END_FUNCTION; -- get_stack |
|
public class FGet_stack public static Value run(SdaiContext _context, Value input) |