Como fazer comparação no s7 300 entre string

Si lo que queremos comparar son dos strings como tal, Step 7 proporciona de origen un FC con el que poder comparar cadenas de caracteres en forma de string. Se trata del bloque FC 10 EQ_STRNG que puedes encontrar desde el editor en Librerias-> Standard Library -> IEC Function Blocks.

Bien. Lo lógico es usar esta función o cualquier otra de las que te ofrece Step 7 si se ajusta a tus necesidades.

Pero lo que vamos a realizar hoy es poder comparar cualquier cadena de bytes de dos DB y ver si son iguales o no. Da igual el tipo de datos que tengamos en ese área de memoria.

La idea es simple: poder comparar dos areas de memoria consecutiva de dos DB (o del mismo) y saber si ambas áreas son iguales.

¿Para qué sirve eso?

Pues por ejemplo si tienes una comunicación en la cual envias X bytes a otro PLC, Scada o lo que sea y quieres saber que realmente lo que envias y lo que el interlocutor está leyendo es lo mismo por ejemplo para activar una orden de actuación.

Entonces, la forma de operar es que un PLC escribe en un DB digamos DB1 y el interlocutor copia ese DB a un DB2 que te lo envía de vuelta.

La forma de saber que lo que uno escribe, el otro lo recibe es comparando ambos DB, cosa que puede ser muy simple si intercambias digamos un DW, pero bastante engorrosa si estás intercambiando 100 bytes.

¿Qué necesitaremos para comparar las cadenas de caracteres en Step 7?

Pues vamos a necesitar tener ciertos conocimientos de:

Como ves, nada que no hayamos visto con anterioridad en el blog.

¿Y cómo vamos a hacer la comparación de las cadenas de caracteres en step7?

Básicamente vamos a realizar un FC donde pasaremos como variables de entrada:

• Los números de los DB
• Los números de byte de origen de los datos de ambos DB
• La longitud a comparar en bytes

Por otra parte, y como salida del FC, obtendremos una salida booleana indicativa de si ambas cadenas son iguales o no.

En cuanto a el programa en sí, y como referencia, la idea sería la siguiente:

• Poner una marca booeana a cero indicando inicialmente que ambas cadenas originalmente son iguales
• Hacer un FOR-NEXT con el número de bytes a comparar
• Crear los punteros correspondientes a cada posición
• Comparar cada byte entre ambos DB haciendo un XOR
• Si el resultado se mayor que cero, hacer un SET de la booleana indicando que no son iguales
• Si el resultado es cero, no hacemos nada.
• Continuamos con el FOR
• Finalmente igualamos la booleana a la salida del bloque.

Seguidamente te dejo con el código fuente del FC para que le vayas echando un vistazo:

FUNCTION «Comparador de cadenas» : VOID TITLE = VERSION : 0.1 VAR_INPUT NumDB1 : INT ; //Número del primer DB a comparar NumDB2 : INT ; //Número del segundo DB a comparar Byte1 : INT ; //Número del primer byte de la cadena del DB1 Byte2 : INT ; //Número del primer byte de la cadena el DB2 Longitud : INT ; //Longitud de bytes a comparar END_VAR VAR_OUTPUT Resultado : BOOL ; //Resultado final de la comparación. END_VAR VAR_TEMP Comparacion : BOOL ; //Resultado temporal de la comparación IndiceForNext : INT ; PunteroOffSet : DWORD ; DBNum1 : INT ; DBNum2 : INT ; ResultadoXOW : INT ; END_VAR BEGIN NETWORK TITLE = //Inicializamos la variable Comparacion SET ; R #Comparacion; // Transferimos los valores de los DB a las variables. // Hay que hacerlo así porque no se puede leer directamente como IN L #NumDB1; T #DBNum1; L #NumDB2; T #DBNum2; NETWORK TITLE = //Hacemos un for-next con el número de bytes de longitud ya que vamos a comparar //byte a byte. L #Longitud;

NEXT: T #IndiceForNext;