Cobol help calculate a remainder

[AFPBoy]

How can you calculate a remainder in Cobol

ex.

1197/103 = 11 remainder 67

 

[MKuiper]

The easy way:
DIVIDE <1> BY <2> GIVING <3> REMAINDER <4>.
<1> and <2> are numeric fields or literals
<3> and <4> are numeric fields

The other easy way:
COMPUTE <4> = <1> - (( <1> / <2> ) * <2> )


Marcel

 

[MKuiper]

After I send my post, I found the real reason for your question: The remainder of 1197 divided by 103 is 64 and not 67 :-(

Good you asked this forum. Marcel

 

[MarcLodge]

Also, depending upon your compiler you can
COMPUTE WS-REMAINDER = FUNCTION MOD ( 1197, 103)
but Marcel is right, the remainder is 64!
Marc

 

[AFPBoy]

thank you all