Funções intrínsecas - VARIANCE

	FUNCTION VARIANCE

	A função "FUNCTION VARIANCE" retorna um valor numérico que é, aproximadamente, A variância de seus argumentos.

	Formato geral: FUNCTION VARIANCE (arg1 arg2 ......) arg é um argumento numérico

	Regras:
	1. Os argumento devem ser numéricos.
	2. O valor retornado é definido como o quadrado do desvio-padrão dos argumentos especificados.
	3. Se houver somente um argumento, o valor retornado será zero (0). Veja a função STANDARD-DEVIATION.

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
   
        Primeiro exemplo

           COMPUTE WS-RESULTADO = FUNCTION VARIANCE (4 7 9 13)              
           DISPLAY 'FUNCTION VARIANCE  - ' WSS-RESULTADO  
   
      * Resultado: FUNCTION VARIANCE   -   00003,26917 

   

        Segundo exemplo

           COMPUTE WS-RESULTADO = FUNCTION VARIANCE (1 2 12)              
           DISPLAY 'FUNCTION VARIANCE  - ' WSS-RESULTADO  
   
      * Resultado: FUNCTION VARIANCE   -   00004,96655 

   

        Terceiro exemplo

           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