x

HCNVRT(datetime, '(format)', length, output)

donde:

datetime

Fecha-hora

Es el valor de fecha-hora que se va a convertir, el nombre del campo fecha-hora que contiene el valor o una expresión que devuelve el valor.

format

Alfanumérico

Es el formato del campo fecha-hora, entre paréntesis y comillas simples. Debe estar en formato de fecha-hora (datos de tipo H, hasta H23).

length

Número entero

Es el número de caracteres en el campo alfanumérico devuelto. Puede proporcionar el valor en sí, el nombre de un campo numérico que contenga el valor o una expresión que devuelva el valor. Si length es inferior al número de caracteres necesarios para mostrar el campo alfanumérico, la función devuelve un espacio en blanco.

output

Alfanumérico

Es el campo que contiene el resultado o el formato del valor de salida, entre comillas simples. El campo debe estar en formato alfanumérico y ser lo suficientemente largo como para incluir todos los caracteres devueltos.

Principio de página

Ejemplo: Cómo convertir un campo fecha-hora al formato alfanumérico (Lenguaje de informes)

HCNVRT convierte el campo TRANSDATE al formato alfanumérico. La primera función no incluye las opciones de visualización fecha-hora del campo; la segunda función lo hace para fines de lectura. Además, especifica la visualización de segundos en el campo de entrada.

TABLE FILE VIDEOTR2
PRINT CUSTID TRANSDATE AS 'DATE-TIME' AND COMPUTE
ALPHA_DATE_TIME1/A20 = HCNVRT(TRANSDATE, '(H17)', 17, 'A20');
ALPHA_DATE_TIME2/A20 = HCNVRT(TRANSDATE, '(HYYMDS)', 20, 'A20');
WHERE DATE EQ 2000
END

La salida es:

CUSTID  DATE-TIME         ALPHA_DATE_TIME1      ALPHA_DATE_TIME2
------  ---------         ----------------      ----------------
1237    2000/02/05 03:30  20000205033000000     2000/02/05 03:30:00
1118    2000/06/26 05:45  20000626054500000     2000/06/26 05:45:00

Principio de página

Ejemplo: Cómo convertir un campo fecha-hora al formato alfanumérico (Maintain)

HCNVRT convierte el campo DT1 al formato alfanumérico:

MAINTAIN FILE DATETIME
FOR ALL NEXT ID INTO STK;
COMPUTE
RESULT_HCNVRT/A20 = HCNVRT(STK.DT1,'(HYYMDH)',20, RESULT_HCNVRT);
TYPE "STK(1).DT1 = "STK(1).DT1;
TYPE "RESULT_HCNVRT = " RESULT_HCNVRT;
END