Update FC50_MAIN.s7dcl

This commit is contained in:
2026-07-24 08:37:36 +02:00
parent 3526c8ce80
commit 5a2b6e6551
@@ -315,67 +315,16 @@ FUNCTION "FC50_MAIN" : Void
// ==========================================================================================================
REGION POST_PROGRAMA
// ==========================================================================================================
REGION ALARMAS_GENERALES
// Alarmas generales
"FC5000_GNR_ALM"();
// Gestion balizas
"FC60_GESTOR_BALIZAS"();
END_REGION ALARMAS_GENERALES
// ==========================================================================================================
REGION PARAMETROS_GENERALES
// Parametros reales generales
"FC15_ZC_GEST_PREAL"(PrimerCiclo := "DB1_SYS".ARRANQUE,
FechaHora := "DB1_SYS".FechaHoraActual,
Usuario := "DB1_SYS".Usuario.Actual,
PReal := "DB3000_GNR_PARAM".PReal,
IndexTraza := 1,
ValorAnterior := "DB3000_GNR_PARAM".Aux.PReal_ValorAnterior);
// Parametros enteros generales
"FC16_ZC_GEST_PINT"(PrimerCiclo := "DB1_SYS".ARRANQUE,
FechaHora := "DB1_SYS".FechaHoraActual,
Usuario := "DB1_SYS".Usuario.Actual,
PInt := "DB3000_GNR_PARAM".PInt,
IndexTraza := 1,
ValorAnterior := "DB3000_GNR_PARAM".Aux.PInt_ValorAnterior);
END_REGION PARAMETROS_GENERALES
// ==========================================================================================================
REGION TRAZABILIDAD
// Gestor trazabilidad
"FC7_ZC_TRZ_GESTOR"("DB1_SYS".Pulso1seg);
END_REGION TRAZABILIDAD
// ==========================================================================================================
REGION INFORMES
// Gestor informes
"FC11_ZC_INF_GESTOR"("DB1_SYS".Pulso1seg);
END_REGION INFORMES
// ==========================================================================================================
REGION COMUNICACIONES
// Gestor comunicaciones
"FC11000_GESTOR_COM"();
END_REGION COMUNICACIONES
// Alarmas generales
"FC5000_GEST_ALARMAS_GNR"();
// Parametros generales
"FC15_ZC_GEST_PREAL"(PrimerCiclo:="DB1_SYS".ARRANQUE,
FechaHora:="DB1_SYS".FechaHoraActual,
Usuario:="DB1_SYS".Usuario.Actual,
PReal:="DB3000_GNR_PREAL".PReal,
IndexTraza:=1,
ValorAnterior:="DB3000_GNR_PREAL".PReal);
END_REGION POST_PROGRAMA