Lingue disponibili: reporting

La funzione EDIT converte un campo alfanumerico che contiene caratteri numerici in un formato numerico, o converte un campo numerico in un formato alfanumerico.

Questa funzione è utile per la manipolazione di un campo in una espressione che esegue una operazione che richiede operandi in un formato specifico.

Quando EDIT assegna un valore convertito ad un nuovo campo, il formato del nuovo campo deve corrispondere al formato del valore restituito. Per esempio, se EDIT converte un campo numerico in un formato alfanumerico, è necessario dare al nuovo campo un formato alfanumerico:

DEFINE ALPHAPRICE/A6 = EDIT(PRICE);

EDIT gestisce un simbolo nel modo seguente:

• Quando si converte un campo alfanumerico in un formato numerico, un simbolo o un punto decimale del campo viene memorizzato nel campo numerico.

  Qualsiasi altro carattere non numerico risulta invalido e EDIT restitutisce il valore di zero.

• Quando si converte un campo decimale-compresso o virgola-mobile in un formato alfanumerico, EDIT rimuove il simbolo, il punto decimale e qualsiasi numero a destra del punto decimale. Quindi, EDIT giustifica a destra le cifre restanti e aggiunge zeri finali per raggiungere la lunghezza campo specificata. La conversione di un numero con più di nove cifre significative nel formato decimale-compresso o virgola-mobile potrebbe produrre un risultato scorretto.

EDIT(fieldname);

TABLE FILE EMPLOYEE
PRINT HIRE_DATE AND COMPUTE
ALPHA_HIRE/A17 = EDIT(HIRE_DATE); NOPRINT AND COMPUTE
HIRE_MDY/A17 = CHGDAT('YMD', 'MDYYX', ALPHA_HIRE, 'A17');
BY LAST_NAME BY FIRST_NAME
WHERE DEPARTMENT EQ 'MIS';
END

LAST_NAME  FIRST_NAME  HIRE_DATE  HIRE_MDY 
---------  ----------  ---------  -------- 
BLACKWOOD  ROSEMARIE   82/04/01   APRIL 01 1982 
CROSS      BARBARA     81/11/02   NOVEMBER 02 1981 
GREENSPAN  MARY        82/04/01   APRIL 01 1982 
JONES      DIANE       82/05/01   MAY 01 1982 
MCCOY      JOHN        81/07/01   JULY 01 1981 
SMITH      MARY        81/07/01   JULY 01 1981