{ 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