RE: Variable Passing to procedure problem

["Bob Cozzi" <cozzi@xxxxxxxxx>]

Quotes!

#Error('The+ITEM+has a problem');

Should be:

#Error('The ' + %Char(ITEM) + ' has a problem');

If ITEM is NOT numeric, you can leave off the %CHAR() built-in.

Bob Cozzi

-----Original Message-----
From: rpg400-l-bounces@midrange.com [mailto:rpg400-l-bounces@midrange.com]
On Behalf Of Justin Houchin
Sent: Wednesday, January 22, 2003 1:45 PM
To: rpg400-l@midrange.com
Subject: Variable Passing to procedure problem


I have this situation...

 

D #Error          PR                      ExtPgm('PC0901CLMS') //uses SNDMSG

D  ErrorMsg                    510A   Const

 

D ITEM  S             30A   INZ('P41800')

 

I can currently do this...

 

#Error('Update of our items has begun, please be patient!');

 

I want to do this...

 

#Error('The+ITEM+has a problem'); //substitute ITEM for P41800,

later on I will get the ITEM value from my Item master file

 

 

This is not working, can someone point me in the right direction.

 

Thanks.

Justin Houchin

Programmer and Web Developer

www.reliatek.com

justin@reliatek.com

 

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com To subscribe, unsubscribe, or
change list options,
visit: http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.