Resta una FECHA de otra FECHA
SUB_DATE_DATE resta un valor de tipo DATE de otro valor DATE. El resultado se almacena en la variable de salida de tipo TIME.
Entrada
Primera entrada: minuendo
Segunda entrada: sustraendo
Salida
Resultado
El resultado TIME solamente es válido si la diferencia entre el minuendo y el sustraendo es menor o igual a la máxima duración de TIME permitida. En caso contrario se producirá un desbordamiento en la variable TIME y se activará la bandera CARRY.
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
DATE_value1: DATE:=D#2010-06-30;
DATE_value2: DATE:=D#2010-01-01;
TIME_result: TIME:=T#0s;
END_VAR
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,SUB_DATE_DATE!,Instance,17,1,26,4,,?D?D?C);
B(B_VARIN,,DATE_value1,15,1,17,3,);
B(B_VARIN,,DATE_value2,15,2,17,4,);
B(B_VAROUT,,TIME_result,26,1,28,3,);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
TIME_result := SUB_DATE_DATE(DATE_value1, DATE_value2);