Re: Is there ROUND OFF Function in RPG/400?

prakash subramanian wrote:
> 
> Sir,
> 
> I've got a program wherein, I want to calculate the rounded money value
> to the nearest currency(Rupee in India) value. Without much coding, is
> there any readily available opcode or utility for doing round off to the
> nearest value? Please help me, as I want to complete this application.

In RPG/400 place an H in Column 53 on the instruction you want to
round.  H means half adjust.  If you are prompting it, it will be the
field between the decimal positions and the Hi indicator.  It is marked
by H/N/P.

In RPGLE Place an H in parenthesis after the instruction.  For a
multiply instruction it would look like this.
 

     C     ABC           MULT(H)   DEF           GHI                    
 

-- 
___________________________________________________________
Jerry R. Keppler      Pattonville School District
Computer Programmer   11097 St. Charles Rock Road
(314) 213-8045 Voice  St. Ann, MO 63074-1509
(314) 213-8650 Fax    mailto:kepplerj@pattonville.k12.mo.us
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---