chore: Actualizacion de comentarios. Actualizacion de interfaces. Se añaden elementos.

2026-07-24 09:01:20 +02:00
parent e8d73901e4
commit 0cfcfd4555
19 changed files with 643 additions and 48 deletions
@@ -0,0 +1,127 @@
+{
+    S7_Author := "ABH";
+    S7_BlockNumber := "5000";
+    S7_BlockTitle := "MLC_3jK";
+    S7_Family := "ZeusControl";
+    S7_Optimized := "TRUE";
+    S7_PreferredLanguage := "LAD";
+    S7_Version := "1.0"
+}
+FUNCTION "FC5000_GNR_ALM" : Void
+    { S7_Language := "SCL" }
+    NETWORK
+        (*
+        ###### (C)Copyright ZeusControl 2026 - 2026
+        
+        ---
+        ### Información del Sistema
+        | Hardware Compatible | Entorno de Ingeniería |
+        |---------------------|-----------------------|
+        | PLC serie 1200/1500 | TIA Portal 18         |
+        
+        ---
+        > **Restricciones:** Ninguna.
+        
+        ---
+        ### Descripción Funcional
+        
+        Función para la gestion de alarmas.
+        
+        En ella se realizan las siguientes acciones:
+        
+        - Gestion logica alarmas.
+        - Llamadas a gestor de alarmas.
+        
+        ---
+        ### Dependencias Requeridas
+        | Tipo | Elementos |
+        |------|-----------|
+        | FC   | - |
+        | FB   | - |
+        | DB   | - |
+        | UDT  | - |
+        
+        ---
+        ### Historial de Cambios
+        | Versión  | Fecha      | Técnico | Cambios |
+        |----------|------------|---------|---------|
+        | 01.00.00 | 22.07.2026 | (ABH)   | Primera version. |
+        *)
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkTitle := "MLC_ni"
+    }
+    NETWORK
+        RUNG wire#powerrail
+        END_RUNG
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkTitle := "MLC_49a"
+    }
+    NETWORK
+        RUNG wire#powerrail
+        END_RUNG
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkTitle := "MLC_3fz"
+    }
+    NETWORK
+        RUNG wire#powerrail
+            Contact( "DB1_SYS".OFF )
+            Coil( "DB5000_GNR_ALM".BalizaVerde )
+        END_RUNG
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkTitle := "MLC_3FM"
+    }
+    NETWORK
+        RUNG wire#powerrail
+            Contact( "DB1_SYS".OFF )
+            Coil( "DB5000_GNR_ALM".BalizaAmbar )
+        END_RUNG
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkComment := "MLC_3rY";
+        S7_NetworkTitle := "MLC_3VN"
+    }
+    NETWORK
+        RUNG wire#powerrail
+            Contact( "DB5000_GNR_ALM".AlgunaAlarma )
+            Coil( "DB5000_GNR_ALM".BalizaRoja )
+        END_RUNG
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkComment := "MLC_3jg";
+        S7_NetworkTitle := "MLC_3ej"
+    }
+    NETWORK
+        RUNG wire#powerrail
+            Contact( "DB5000_GNR_ALM".NuevaAlarma )
+            Contact( "DB1_SYS".FlipFlop1seg )
+            Coil( "DB5000_GNR_ALM".BalizaSonora )
+        END_RUNG
+    END_NETWORK
+    {
+        S7_Language := "LAD";
+        S7_NetworkTitle := "MLC_3ar"
+    }
+    NETWORK
+        RUNG wire#powerrail
+            "FC17_ZC_GEST_ALM"(
+                Pulso1Seg := "DB1_SYS".Pulso1seg,
+                Ack := "DB1_SYS".ACK,
+                AutoAck := FALSE,
+                ALM := "DB5000_GNR_ALM".ALM,
+                AlarmasHMI := "DB5000_GNR_ALM".AlarmasHMI,
+                NuevaAlarma := "DB5000_GNR_ALM".NuevaAlarma,
+                AlgunaAlarma := "DB5000_GNR_ALM".AlgunaAlarma
+            )
+        END_RUNG
+    END_NETWORK
+END_FUNCTION