A função "FUNCTION SUM" retorna um valor que é a soma de todos os argumentos fornecidos ou o resultado da operação matemática desejada.

argument-1

arg é um inteiro ou argumento numérico

Regras:

• 1. O tipo desta função depende dos argumentos/variáveis, tais como:
• a. Inteiro (todos os argumentos ex.: 1 2 3 4):
• b. Numerico (todas as variaveis devem conter caracteres numéricos):
• 2. O valor retornado é a soma de todos os argumentos fornecidos.

      *-----------------------------------------------------------------
       WORKING-STORAGE SECIOTN.
      *-----------------------------------------------------------------

       01  WS-AUXILIARES. 
           05  WS-VARIAVEL-1             PIC 9(001) VALUE 1.  
           05  WS-VARIAVEL-2             PIC 9(001) VALUE 2.  
           05  WS-VARIAVEL-3             PIC 9(001) VALUE 3.  
           05  WS-RESULTADO              PIC 9(006) VALUE ZEROES. 
  
      *-----------------------------------------------------------------
       PROCEDURE DIVISION. 
      *-----------------------------------------------------------------

       * exemplo 01:

           COMPUTE WSS-RESULTADO = FUNCTION SUM (+4, -2, +2)
           DISPLAY 'FUNCTION SUM ........ - ' WSS-RESULTADO    
      * Resultado: FUNCTION SUM ........ - 000004

      * exemplo 02:

           COMPUTE WSS-RESULTADO = FUNCTION SUM (WS-VARIAVEL-1 ,
                                                 WS-VARIAVEL-2 ,
                                                 WS-VARIAVEL-3)
           DISPLAY 'FUNCTION SUM ........ - ' WSS-RESULTADO    
      * Resultado: FUNCTION SUM ........ - 000006

      * exemplo 03:

           COMPUTE WSS-RESULTADO = FUNCTION SUM (4 * 2)    
           DISPLAY 'FUNCTION SUM * ...... - ' WSS-RESULTADO
      * Resultado: FUNCTION SUM ........ - 000008

      * exemplo 04:   

           COMPUTE WSS-RESULTADO = FUNCTION SUM (4 / 2)    
           DISPLAY 'FUNCTION SUM / ...... - ' WSS-RESULTADO
      * Resultado: FUNCTION SUM ........ - 000002