Boa tarde professor!
Eu sou coboleira a 3 anos já e sempre apanho nessa questão de mascara e número decimal.
Queria tirar uma duvida com você. Vou colocar um número para exemplificar.
Segue o valor 000006789123456. Como posso escrever a variável para que seja retirado os 0 e colocar os dois ultimos números como decimais? Ele está assim: 000006789123456 e eu quero que fique assim 67.891.234,56.
Obrigada professor.
Boa tarde Érylin. Não tenho certeza se funciona. Precisaria fazer um teste:
Na WORKING-STOREAGE:
77 WRK-MEU-VALOR PIC 9(15) VALUE 000006789123456.
77 WRK-MASCARA PIC Z.ZZZ.ZZZ.ZZZ,99.Na PROCEDURE:
MOVE WRK-MEU-VALOR TO WRK-MASCARA.
DISPLAY 'MEU VALOR SEM MASCARA: ' WRK-MEU-VALOR.
DISPLAY 'VALOR MASCARADO: ' WRK-MASCARA.Espero que funcione! Ricardo.