|
#1
|
|||
|
|||
Otra manera de hacerlo
data: lv_car_permitidos type char100. concatenate sy-abcde '*' '/' '0' '1' '2' '3' ... '9' into lv_car_permitidos. if parametro CO lv_car_permitidos. La cadena parametro es correcta else. la cadena parametro es incorrecta endif. |
#2
|
|||
|
|||
Muchas gracias por las propuestas.
En el caso de la comparación 'CO', no me funciona... La verdad es que no he llegado a entender porqué. Al final como lo he solucionado es de la siguiente manera: DATA: l_string(39) TYPE c VALUE 'ABCDEFGHIJKLMNÑOPQRSTUVWXYZ0123456789*/', "caracteres correctos l_indice TYPE sy-index. DO 5 TIMES. "le pongo un 5 porque el campo tiene esa longitud l_indice = sy-index - 1. SEARCH l_string FOR gs_zja_tr_t_0009-zzpappre+l_indice(1). IF sy-subrc <> 0. IF gs_zja_tr_t_0009-zzpappre+l_indice(1) <> '*' AND gs_zja_tr_t_0009-zzpappre+l_indice(1) <> ' '. MESSAGE e068(zja_tr_ms_01). "Caractétes de Patrones incorrecto. ENDIF. ENDIF. ENDDO. |
#3
|
|||
|
|||
Herramientas | Buscar en Tema |
Desplegado | |
|
|