Divide una variable tipo TIME por un REAL
DIV_TIME_REAL divide el valor de la primera variable de entrada de tipo TIME por la segunda variable de entrada de tipo REAL. El valor REAL se redondea al valor entero más próximo. El resultado se guarda en la variable de salida.
Entrada
Primera entrada: dividendo
Segunda entrada: divisor
Salida
Resultado
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
input_time: TIME:=T#10s;
input_real: REAL:=2.4;
div_result: TIME:=T#0s;
END_VAR
El valor de la variable input_time se divide por el valor de la variable input_real. El resultado se escribe en div_result. En este ejemplo, se han declarado las variables en la cabecera de la POU. También se pueden introducir constantes directamente en las entradas de 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 := 5 ;
NETWORK_BODY
B(B_F,DIV_TIME_REAL!,Instance,9,0,18,4,,?D@'Time'?D@'Real'?C);
B(B_VARIN,,input_time,7,1,9,3,);
B(B_VARIN,,input_real,7,2,9,4,);
B(B_VAROUT,,div_result,18,1,20,3,);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
div_result:=DIV_TIME_REAL(input_time, input_real);