Come: |
Lingue disponibili: reporting, Maintain
La funzione ITOZ converte un numero da formato numerico in formato decimale compresso. Sebbene una richiesta non è in grado di elaborare numeri a zona, è in grado di scrivere campi a zona in un file a estrazione per uso da parte di un programma esterno.
ITOZ(length, in_value, output)
dove:
Valore intero
Lunghezza di in_value in byte. Il numero massimo di byte è 15. L'ultimo byte include il segno.
Numerico
Il numero da convertire, o il campo che contiene il numero. Il numero è troncato su un numero intero prima della conversione.
Alfanumerico
Nome del campo che contiene il risultato o formato del valore di emissione racchiuso tra virgolette singole.
La seguente richiesta crea un file di estrazione contenente l'ID e lo stipendio dipendente in formato con zonature per un programma COBOL:
DEFINE FILE EMPLOYEE
ZONE_SAL/A8 = ITOZ(8, CURR_SAL, ZONE_SAL);
END
TABLE FILE EMPLOYEE PRINT CURR_SAL ZONE_SAL BY EMP_ID ON TABLE SAVE AS SALARIES END
Il file di estrazione risultante è:
NUMBER OF RECORDS IN TABLE= 12 LINES= 12 ALPHANUMERIC RECORD NAMED SALARIES FIELDNAME ALIAS FORMAT LENGTH EMP_ID EID A9 9 CURR_SAL CSAL D12.2M 12 ZONE_SAL A8 8 TOTAL 29
WebFOCUS |