Olá,
Utilize a função ROUND, o número é arredondado para cima ou para baixo durante a conversão.
Os diferentes formatos de ROUND são:
ROUND <r> : Os campos do tipo P são multiplicados por 10**(-r) e então arredondados.
Exemplo:
DATA pack TYPE p VALUE '123.456'
DECIMALS 3.
WRITE pack DECIMALS 2.
WRITE: / pack ROUND -2,
/ pack ROUND -1,
/ pack ROUND 1,
/ pack ROUND 2.
Resultado:
123,46
12.345,600
1.234,560
12,346
1,235
Obrigado
Madhavi