Selección De Una Cadena Parcial De Caracteres - Siemens SINUMERIK 840D sl Manual De Programación

Programación flexible de CN
1.10 Operaciones con cadenas de caracteres
Ejemplo: dividir una entrada en nombre de directorio y nombre de módulo (bloque):
DEF INT PFADIDX, PROGIDX
DEF STRING[26] INTRODUCCIÓN
DEF INT LISTIDX
ENTRADA = "/_N_MPF_DIR/_N_EXECUTE_MPF"
LISTIDX = MINDEX (EINGABE, "M,N,O,P") + 1
PFADIDX = INDEX (INTRODUCCIÓN, "/") +1
PROGIDX = RINDEX (INTRODUCCIÓN, "/") +1
VARIABLE = SUBSTR (INTRODUCCIÓN, PFADIDX,
PROGIDX-PFADIDX-1)
VARIABLE = SUBSTR (INTRODUCCIÓN, PROGIDX)
1.10.7 Selección de una cadena parcial de caracteres
Funcionamiento
Con esta función se puede extraer una cadena parcial de caracteres de un string. Para ello
se indica el índice para la posición del primer carácter dentro del string, así como
eventualmente la cantidad de caracteres que se desean extraer. En el caso de que esta
última no se indique, se toma por defecto el resto de la cadena a partir de la posición inicial
indicada.
Programación
Sintaxis
STRING_ERG = SUBSTR (STRING,INT)
STRING_ERG = SUBSTR(STRING,INT, INT)
Semántica
En el primer caso se devuelve la cadena parcial de caracteres a partir de la posición indicada
en el primer parámetro hasta el final del string.
En el segundo caso la subcadena resultante queda limitada en su posición final por el valor
indicado en tercer parámetro.
En el caso de que la posición inicial indicada se encuentre por detrás de la posición final, se
devolverá el string vacío (" ").
Si la posición inicial o bien la longitud se introducen como valores negativos, el sistema emite
una alarma.
Ejemplo
DEF STRING [29] ERG
ERG = SUBSTR ("ACUSE: 10 a 99", 10, 2)
1-32
En LISTIDX se devuelve el valor 3; ya que
"N" es el primer carácter en el parámetro
INTRODUCCIÓN de la lista de selección,
comenzando desde el principio.
;Así rige: PFADIDX = 1
;Así rige: PROGIDX = 12
;Utilizando la función SUBSTR descrita a
;continuación se puede dividir la variable
;INTRODUCCIÓN en las componentes
;"Directorio" y "Módulo":
;Devuelve "_N_MPF_DIR"
;Devuelve "_N_EXECUTE_MPF"
Tipo de resultado: INT
Tipo de resultado: INT
;Así rige: ERG == "10"
Manual de programación, Edición 03/2006, 6FC5398-2BP10-1EA0
Preparación del trabajo