Cobol - Obtener el resto

Queria saber si existe alguna manera de calcular el resto de una division, facilmente o que no sea tan complicado.
Por favor, gracias

Si, hay dos maneras de hacerlo, la primera es simple matematica. Para que una división de resto ambos operandos deben ser enteros.
77 dividendo pic 99.
77 divisor pic 99.
77 resto pic 99.
77 resultado pic 99.
procedure division.
...
compute resultado = dividendo / divisor.
compute resto = dividendo - (resultado * divisor).

pero COBOL ofrese una sentencia para simplificar esto:
DIVIDE divisor INTO dividendo GIVING resultado REMINDER resto.

Diego no se si te habrás equivocado al escribirlo o si REMINDER tambien funciona (la verdad nunca lo he probado), pero yo utilizo la sentencia REMAINDER.

Efectivamente, fue un error de tipeo, la palabra reservada es REMAINDER y no la gansada que puse yo :).

tutu11:

Este es muy simple:

1 w-variables.
3 w-importe pic 9(16)v9(02).
3 w-fraccion pic 9(16)v9(02).
3 w-enteros pic 9(18).
3 w-resto pic 9(16)v9(02).

divide w-importe by w-fraccion
giving w-enteros
remainder w-resto
end-divide

if w-resto <> zero
*> HA QUEDADO EL RESTO en W-RESTO
end-if

Saludos
Agustin Zabala