CHKNUM: Cómo buscar un formato numérico en una cadena

Cómo:

La función CHKNUM comprueba la presencia del formato numérico en cadenas de caracteres. Si la cadena contiene un formato numérico válido, CHKNUM devuelve el valor 1. Si la cadena contiene caracteres que no son válidos en un número, CHKNUM devuelve un cero (0).

Principio de página
x
Sintaxis: Cómo Verificar el formato de una cadena de caracteres
CHKNUM(numchar, source_string, output)

donde:

numchar

Número entero

El número de caracteres en la cadena.

string

Alfanumérico

Es la cadena de caracteres que se va a comprobar, entre comillas simples, o un campo o variable que contenga la cadena de caracteres.

output

Numérico

Es el nombre del campo que contiene el resultado, o el formato del valor de salida puesto entre comillas solas.

Ejemplo: Cómo buscar un formato numérico en una cadena

CHKNUM examina la presencia del formato numérico en las cadenas STR1, STR2, y STR3. 

DEFINE FILE WF_RETAIL_LITE
STR1/A8 = '12345E01';
STR2/A8 = 'ABCDEFG';
STR3/A8 = '1234.567';
CHK1/I1= CHKNUM(8,STR1,CHK1);
CHK2/I1= CHKNUM(8,STR2,CHK2);
CHK3/I1= CHKNUM(8,STR3,CHK3);
END
TABLE FILE WF_RETAIL_LITE
PRINT STR1 IN 20 CHK1 STR2 CHK2 STR3 CHK3
BY PRODUCT_CATEGORY
WHERE PRODUCT_CATEGORY EQ 'Video Production'
ON  TABLE SET PAGE NOPAGE
ON TABLE PCHOLD FORMAT WP
END

La salida es:

  Product                                                                                                                         
  Category           STR1      CHK1  STR2      CHK2  STR3      CHK3                                                               
  --------           ----      ----  ----      ----  ----      ----                                                               
  Video Production   12345E01     1  ABCDEFG      0  1234.567     1
                     12345E01     1  ABCDEFG      0  1234.567     1
                     12345E01     1  ABCDEFG      0  1234.567     1
                     12345E01     1  ABCDEFG      0  1234.567     1
                     12345E01     1  ABCDEFG      0  1234.567     1
                     12345E01     1  ABCDEFG      0  1234.567     1
WebFOCUS