Calcular los números totales y la media en la tabla de datos de números INT
Esta función FP calcula la suma y la media aritmética de los números INT positivos y negativos de la tabla de datos especificada para s1_Start y s2_End. La suma de todos los elementos de la tabla se devuelve en d1_Sum y la media aritmética en d2_Mean. La media aritmética se redondea a un número entero.
Entrada
Área inicial de la tabla de datos
Área final de la tabla de datos
Salida
Suma de todos los elementos de la tabla especificada
Media de todos los elementos de la tabla especificada
si el área especificada utilizando el modificador índice supera el límite.
si s1_Start>s2_End
Si s1_Start y s2_End pertenecen a diferentes áreas de datos
si el área especificada utilizando el modificador índice supera el límite.
si s1_Start>s2_End
Si s1_Start y s2_End pertenecen a diferentes áreas de datos
Instrucciones F correspondientes: F275_MEAN, F276_DMEAN, F352_FMEAN
Todas las variables de entrada y de salida utilizadas para la programación de esta función han sido declaradas en la Cabecera de la POU.Se utiliza la misma cabecera de la POU para todos los lenguajes de programación.
VAR
bStart: BOOL:=FALSE;
(*activates the function*)
aiDataField: ARRAY [0..4] OF INT:=[2,3,6,-3,1];
diSum: DINT:=0;
(*the sum of all elements of
data_array; here: 9*)
iMean: INT:=0;
(*the arithmetic mean of all
elements of data_array;
here: 1*)
END_VAR
Cuando la variable bStart se encuentra a TRUE, se ejecuta la función.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_CONTACT,,bStart,6,2,8,4,);
B(B_VARIN,,aiDataField[0],10,3,12,5,);
B(B_VARIN,,aiDataField[4],10,4,12,6,);
B(B_VAROUT,,diSum,25,3,27,5,);
B(B_VAROUT,,iMean,25,4,27,6,);
B(B_F,FP_DATA_MEAN_SUM_INT!,,12,1,25,6,,?DEN?Ds1_Start?Ds2_End?AENO?Cd1_Sum?Cd2_Mean);
L(8,3,12,3);
L(1,3,6,3);
L(1,0,1,6);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF bStart then
FP_DATA_MEAN_SUM_INT(s1_Start := aiDataField[0],
s2_End := aiDataField[4],
d1_Sum => diSum,
d2_Mean => iMean);
END_IF;