x

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

dove:

datetime

Data-ora

Il valore data-ora da convertire, il nome di un campo data-ora che contiene il valore, o una espressione che restituisce il valore.

formato

Alfanumerico

Formato del campo data-ora racchiuso tra virgolette singole e paremtesi. Deve essere un formato data-ora (tipo dati H, fino a H23).

length

Valore intero

Numero di caratteri nel campo alfanumerico che è restituito. È possibile fornire il valore effettivo, il nome del campo numerico che contiene il valore o un'espressione che restituisce il valore. Se la lunghezza è inferiore del numero di caratteri necessari per visualizzare un campo alfanumerico, la funzione restituisce uno spazio vuoto.

emissione

Alfanumerico

Campo che contiene il risultato o formato del valore di emissione racchiuso tra virgolette singole. Questo campo deve essere in formato alfanuemrico e deve essere abbastanza lungo per contenere tutti i caratteri restituiti.

Inizio pagina

Esempio: Conversione di un valore data-ora in formato alfanumerico (Reporting)

HCNVRT converte il campo TRANSDATE in formato alfanumercio. La prima funzione non include le opzioni di visualizzazione data-ora per il campo; la seconda funzione esegue la leggibilità. Specifica inoltre la visualizzazione in secondi nel campo d'immissione.

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

L'emissione è:

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

Inizio pagina

Esempio: Conversione di un valore data-ora in formato alfanumerico (Maintain)

HCNVRT converte il campo DT1 in formato alfanumercio.

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