RE: The target for a numeric operation is too small to hold the r esul t (C G D F)

what if you do a div by 1
1234567.8901 div 1  = ?

Untested... Just a thought..

Tim



> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [SMTP:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Eduard Sluis
> Sent: Monday, July 26, 2004 11:31 AM
> To:   RPG programming on the AS400 / iSeries
> Subject:      Re: The target for a numeric operation is too small to hold
> the resul t (C G D F)
> 
> Rob,
>  
> Now you try to make it ridicule.
> But the question was not if you gonna lose something when you do a thing
> like that.
> The question was how to be able to do so.
> MOVE will definitely MOVE the field....  Agree?
> If you do not want to lose a possible first digit??? You will not simply
> code one line!
>  
> Regards,
> Eduard.
> 
> rob@xxxxxxxxx wrote:
> 
> 
> So Eduard if I MOVE a 11,4 number like 1234567.8901 into a 10,4 field
> wouldn't I get 234567.8901?  And you boss wouldn't mind the dropping of
> $1,000,000?  I'd like to know the boss who that $1,000,000 was 'old
> fashioned' and not needed.
> 
> Rob Berendt
> --
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
> 
> 
> Hi,
> 
> Ok, I know, I'm old fashioned.
> I just use 'MOVE'  (and have no problems).
> 
> Regards,
> Eduard.
> 
> Scott Klement wrote:
> Hi Ted,
> 
> > I have a similar situation where I have two different database fields.
> > The result field is 10, 4 and the other is 11,4. Obviously too small,
> > but what if you don't want to go around changing all of the database
> > fields? Is there a routine anyone knows of to handle getting the result
> > you want without having to change the db?
> 
> Are you asking for a routine that will allow you to fit an 11-digit number
> into a 10-digit field? If so, there's no routine for that...
> 
> If not, what would you like to happen when you try to assign an 11-digit
> number to a 10-digit field? I'm not clear on what the desired result is.
> --
> 
> 
> 
> Implement-It,
> Pos Cabai OfficePark unit 2,
> Willemstad, Curaçao,
> Netherlands Antilles.
> 
> Cell: 5999 5618980 Tel: 5999 7372031 Fax 5999 7372048 
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
This e-mail message, including any attachments, is for the sole use of the
intended recipient(s) and may contain confidential or privileged
information.  Any unauthorized review, use, disclosure or distribution is
prohibited.  If you are not the intended recipient, please contact the
sender by reply e-mail and destroy the message.