Buenos días. Adelanto el programa. en la linea N011 esta la parte del modulo de expansión.


Saludos

Encontré lo siguiente. Configuro el PLC, luego le corto el suministro de energia, largo el suministro de energia y no funciona apreto reset del botón que este en el 8091 y comienza a funcionar, pero si se corta la energía cuando arranca debo apretar reset nuevamente sino no funciona.

Ing. Boris envío el programa para ver si  nota algo raro lo hago ejecutar en el programa inicio lo que es el calendario luego la salida en la de principal. Lo hice todo de nuevo y con el lengua Pawn para ya tener todos los tiempos.

Esteban

Ing. Boris realice la prueba con una de las pc y funcion excelente. Mucha gracias.

Aprovecho para consultarle ya que para hacer esa prueba como programo el ladder agregue un componente para colocar el código pawn y me surgió la duda ya que utilizo mucho los TIME ALARM SET EVENT pero solo puedo colocar hasta cinco.

Y lo que quiero hacer es agregar mas. Lo que hice es agregar en codigo pawn:

if(CurrentFlow)
{
   if(TimeAlarm1SetEvent(7, 55, 0, TIMEALARM_REPEAT_MF, 0) < 0) CurrentFlow = 0
}


ahora bien el TimeAlarm1 lo cambie por el numero que sigue que es TimeAlarm6 ya que llegaba hasta el cinco.

Pero el problema es que despues no puedo agregar el archivo con OnTimeAlarm6.sld. Si me deja repetir el numero y al copilar no me dice nada.


Yo lo único que debo hacer cuando cumple ese evento es hacer un set a una marca.

Saludos.


Esteban

Hola el sistema esta funcionando correcto. Ahora en el otro proyecto que se utiliza VB.net pero en plataforma web asp.net ejecuta todo correcto sin errores pero no activa el relay y el firewall esta configurado ya que cuando lo ejecutas por primera vez te pide aceptar el pedido.


Saludos.

Esteban

Buenos dias.

Con la placa 8060-A2 que distancia máxima puedo tener entre el PLC y el modulo?


Gracias.

Buenas noches

No me activa el relay

Con el siguiente código:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



        ' Variable para retorno de estado del PLC.
        Dim OnUdpRxStat As UdpRxCmdStat

        ' Variable para almacenar el estado de una conexion para enviar comando a el dispositivo.
        Dim CmdStat As SendStat

        ' Crear array de bytes a enviar (dos bytes).
        Dim DataBytes(2) As Byte


        ' Especificar el primer byte el valor "1", para activar RELAY1 / DOUT1.
        DataBytes(0) = 1

        ' Especificar el segundo byte un valor cualquiera.
        DataBytes(1) = 55

        ' Enviar bytes UDP al script con el metodo "Send".
        ' Nota: El valor retornado en OnUdpRxStat no es comprobado por cuestiones didacticas, pero deberia hacerlo.
        CmdStat = PioBoard.Cmd.Udp.Send(DataBytes, 2, OnUdpRxStat)

        ' Comprobar retorno del comando.
        If Not (CmdStat = SendStat.Success) Then

            ' Error: Mostrar cartel con descripcion.
            MessageBox.Show(CmdStat.ToString(), "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

            ' Retornar.
            Return

        End If






        If (CmdStat = SendStat.Success) Then

            MessageBox.Show("Codigo de Error:\n" + CmdStat.ToString(), "Error al enviar commando (UdpRx) ...", MessageBoxButtons.OK, MessageBoxIcon.Error)

        End If

        ' Comprobar respuesta del PLC al ejecutar la operacion "UdpRx" (buffer
        'del PLC lleno o no leido, demasiados bytes, etc.)
        If (OnUdpRxStat = UdpRxCmdStat.OK) Then

            Dim ErrorCod = "Codigo de Error:\n" + OnUdpRxStat.ToString()
            MessageBox.Show(ErrorCod, "Error al ejecutar operacion (UdpRx) ...", MessageBoxButtons.OK, MessageBoxIcon.Error)


        End If


Primero me da el error : "nSucess" luego "nOK" y no me activa el relay 1. Adjunto diagrama lagger  por las dudas.



Esteban

Buenas tardes

Abría posibilidad que me lo pasaras a ladder para hacer la prueba con el código que ya tengo programado en ladder. Lo unico que necesito es comandar relay y leer las entrada digital, con eso ya me las arreglo con el prototipo.

Disculpa las molestias.

Gracias

Esteban