RE: Prototyping for either character or numeric

But...you can use the old trick of passing numeric as character and then
casting it (MOVE or %Dec) into numeric.

On Thu, 10 Jun 2004 14:10:54 -0500, "Bob Cozzi" <cozzi@xxxxxxxxx> said:
> The short answer is "no".
> RPG IV does not support "overloading" of procedures, sadly, at this time.
> -Bob Cozzi
> 
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Ross Hartford
> Sent: Thursday, June 10, 2004 1:43 PM
> To: 'RPG programming on the AS400 / iSeries'
> Subject: Prototyping for either character or numeric
> 
> Is there a way to prototype a procedure call so that it can take either a
> character or numeric variable?  I know that I can pass a pointer and get
> the
> data from there, but I was hoping not to complicate the maintenance with
> that level of intricacy... 
> 
> 
> Ross Hartford
> Cothern Computer Systems, Inc.
> 1640 Lelia Drive, Suite 200
> Jackson, MS  39216
> 
> Phone:     601-718-0803
> Fax:       601-969-1184
> Support:   888-222-5577
> 
> email:     rossh@xxxxxxxxxxx
> website:   www.ccslink.com
>  
> 
> --
> 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 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.
> 
-- 
  
  michaelr_41@xxxxxxxxxxxxxx

-- 
http://www.fastmail.fm - Email service worth paying for. Try it for free