Intrinsic functions - Enterprise COBOL for z/OS 6.3.0
A função "FUNCTION VARIANCE" retorna um valor numérico que é, aproximadamente, A variância de seus argumentos.
- argument-1
- é um argumento numérico
Regras:
- Os argumento devem ser numéricos.
- O valor retornado é definido como o quadrado do desvio-padrão dos argumentos especificados.
- Se houver somente um argumento, o valor retornado será zero (0).
Exemplo:
*-----------------------------------------------------------------
WORKING-STORAGE SECIOTN.
*-----------------------------------------------------------------
01 WS-AUXILIARES.
05 WS-ENTRADA PIC X(021) VALUE SPACES.
05 WS-RESULTADO PIC 9(005)V9(005).
*-----------------------------------------------------------------
PROCEDURE DIVISION.
*-----------------------------------------------------------------
* sintaxe do comando
COMPUTE WS-RESULTADO = FUNCTION VARIANCE (4 7 9 13)
DISPLAY 'FUNCTION VARIANCE - ' WSS-RESULTADO
* Resultado: FUNCTION VARIANCE - 00003,26917
COMPUTE WS-RESULTADO = FUNCTION VARIANCE (1 2 12)
DISPLAY 'FUNCTION VARIANCE - ' WSS-RESULTADO
* Resultado: FUNCTION VARIANCE - 00004,96655
MOVE '123.456.123,567890 ' TO WS-ENTRADA
COMPUTE WS-RESULTADO = FUNCTION VARIANCE (3 5 9)
DISPLAY 'FUNCTION VARIANCE - ' WSS-RESULTADO
* Resultado: FUNCTION VARIANCE - 00002,49444
© Copyright IBM Corp.