AS/400 - Redondeo de cantidades en RPGLE

Buen Día:
Alguno de ustedes sabe como redondear cantidades en RPGLE, se que el camnio más fácil es validar el número como entreo pero también se que hay una opración que lo hace automáticamente, pudieran decirme cual es y como se utiliza??
Gracias!
Saludos
David Barrón

En RPG/400

C N30 ADD D12TOT XIMCO1 H
--------------------------------------------------------------------------
Lo mismo en ILRPG

C N30 ADD(H) D12TOT XIMCO1
--------------------------------------------------------------------------
Si te fijas es la H la que indica el redondeo.

Gracias Ros, voy a emperzar a trabajar con eso.
Saludos
DB

Ros:
Al estar debugendo el pgm me sigue aparciendo el valor tal cual, no como entero, lo tengo validado como 6,1 ya no es necesario o si??
Saludos
DB

Te lo explico, si tiene un campo de 6,1 el redondeo te lo hace al decimal que tienes
Si le dices por ejemplo que te redondee el numero 32’66 el hará lo siguiente 32’7
Si lo que quieres que te lo redondee a un entero lo tiene que pasar a un campo de 6,0 y te hará lo siguiente 33 si no le pones redondeo escribirá 32.

A ok muchas gracias, dejame corregirlo.
Saludos
DB