Al - haven't seen your post to powerh-l yet -- but the turn around on that list sometimes seems to take forever. While you're waiting, try this: > define d-a num*12 = 82206 > define d-b num*12 = 41593 > define d-c num*12 & > = floor(round(d-a / d-b * 100) / 10) * 10 > define d-d num*12 & > = floor(round(d-a / d-b * 100) / 10) > report & > d-a pic "^^^^^^.^^" & > d-b pic "^^^^^^^^^" & > d-c pic "^^^^.^^^^" & > d-d pic "^^^^.^^^" > go I get these results: D-A D-B D-C D-D 822.06 41593 .0190 .019 Regards, JWP > -----Original Message----- > From: Karman, Al [SMTP:[log in to unmask]] > Sent: Monday, June 18, 2001 3:17 PM > To: [log in to unmask] > Subject: QUIZ rounding > > Greetings, -L > > This was posted to the powerh-l list earlier...I haven't heard anything, > so > forgive the cross/post..... > > It Must Be Monday....! > > I have these fields: > A num*12 pic '^^^^^^^^^.^^' = 82206 (dollar amount - $822.06) > B num*12 pic '^^^^^^^^^^^^' = 41593 (net weight in my applic) > C num*12 pic '^^^^^^^^.^^^^' = (A/B) > > The value of C, reported out scale 2 is .0198 (so far so good) > > My 'challenge'....to transform this value of C <.0198> > into <.019> > > Thanks In Advance!! > > Al Karman > IT Consultant > US Freightways > [log in to unmask] > 773.824.2284 > > * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *