Copiar caracteres a partir de la posición central
MID copia L caracteres de la cadena IN comenzando en la posición P, donde 1 indica el primer carácter de la cadena. El resultado se guarda en la variable de salida.
Entrada
Primera cadena
Número de caracteres a copiar
Posición inicial de la cadena de entrada que se va a copiar, donde 1 es el primer carácter de la cadena
Salida
Caracteres copiados
Si esta instrucción se utiliza con caracteres UTF-8, consultar las notas relativas a los caracteres UTF-8 en el tipo de datos STRING.
La suma de la posición inicial y del número de caracteres a copiar no debe ser mayor que la cadena de entrada. Por ejemplo, para copiar 5 caracteres de una cadena de longitud 10, empezando por la posición 7, solamente se podrán copiar los 4 últimos caracteres.
Si la cadena a copiar en la salida es más larga que la longitud definida para la variable de salida en el campo Tipo, solo se copian tantos caracteres como quepan en la variable de salida.Se activa la variable del sistema sys_bIsCarry.
si una cadena aplicada en la entrada o la salida es una cadena no válida.
si una cadena aplicada en la entrada o la salida es una cadena no válida.
si la cadena de salida es más larga que la longitud definida para la variable de salida en el campo "Tipo".
Todas las variables de entrada y de salida utilizadas para la programación de esta función han sido declaradas en la Cabecera de la POU. Se utiliza la misma cabecera de la POU para todos los lenguajes de programación.
VAR
sInputString: STRING[32]:='A better life. A better world.';
(*sample string*)
iNumberOfCharacters: INT:=15;
(*characters to be delivered*)
iStartPos: INT:=16;
(*position to start copying*)
sResultString: STRING[15]:='';
(*result here: 'A better world.'*)
END_VAR
En este ejemplo se han declarado las variables de entrada (sInputString, iNumberOfCharacters y iStartPos). También se puede introducir directamente en la función, la cadena, el número de caracteres a copiar y la posición del primer carácter a copiar. La cadena de caracteres debe ir entre comillas simples, tanto en la cabecera de la POU como en la función.
Se copian en la salida sResultString el número de caracteres iNumberOfCharacters (15 en este caso) de la cadena (sInputString) a partir de la posición iStartPos (16 en este caso).
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 5 ;
NETWORK_BODY
B(B_F,MID!,,22,0,27,5,,?DIN?DL?DP?C);
B(B_VARIN,,sInputString,20,1,22,3,);
B(B_VARIN,,iNumberOfCharacters,20,2,22,4,);
B(B_VARIN,,iStartPos,20,3,22,5,);
B(B_VAROUT,,sResultString,27,1,29,3,);
L(1,0,1,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
sResultString:=MID(IN:=sInputString, L:=iNumberOfCharacters, P:=iStartPos);