NECESSIDADE DA CRIAÇÃO DA VARIAVEL "TRANSITORIA"

Prezado,

Existe a necessidade de criar as duas variáveis de CPF ? No programa abaixo criei e utilizei uma unica já com a formatação. Foram criadas 2 para fins didáticos ou o que fiz pode dar algum problema ?

IDENTIFICATION DIVISION.
   PROGRAM-ID. PROGCOB1.

   ENVIRONMENT DIVISION.
   CONFIGURATION SECTION.
   SPECIAL-NAMES.
       DECIMAL-POINT IS COMMA.
   DATA DIVISION.

   WORKING-STORAGE SECTION.
   77 WS-NOME      PIC X(20)       VALUE SPACES.
   77 WS-CPF       PIC 999.999.999.99 VALUE ZEROS.
   77 WS-SALARIO-ED PIC $ZZZ.ZZ9,99 VALUE ZEROS.
   PROCEDURE DIVISION.
   MAIN-PROCEDURE.
        DISPLAY "ENTRE COM O NOME:".
        ACCEPT WS-NOME FROM CONSOLE.
        DISPLAY "ENTRE COM O SALARIO:"
        ACCEPT WS-SALARIO-ED FROM CONSOLE.
        DISPLAY "INFORME CPF: ".
        ACCEPT WS-CPF FROM CONSOLE.

        DISPLAY "NOME: " WS-NOME.
        DISPLAY "CPF FORMATADO: " WS-CPF.
        DISPLAY "SALARIO FORMATADO = " WS-SALARIO-ED.
        STOP RUN.


   END PROGRAM PROGCOB1.