Variable Passing to procedure problem -- RPG400-L

Subject: Variable Passing to procedure problem
From: Justin Houchin <justin@xxxxxxxxxxxx>
Date: Wed, 22 Jan 2003 13:45:19 -0600
Importance: Normal
List-archive: <http://archive.midrange.com/rpg400-l>
List-help: <mailto:rpg400-l-request@midrange.com?subject=help>
List-id: RPG programming on the AS400 / iSeries <rpg400-l.midrange.com>
List-post: <mailto:rpg400-l@midrange.com>
List-subscribe: <http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l>,<mailto:rpg400-l-request@midrange.com?subject=subscribe>
List-unsubscribe: <http://lists.midrange.com/mailman/listinfo.cgi/rpg400-l>,<mailto:rpg400-l-request@midrange.com?subject=unsubscribe>

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

As an Amazon Associate we earn from qualifying purchases.

Follow-Ups:

RE: Variable Passing to procedure problem , Bob Cozzi
Re: Variable Passing to procedure problem , Jason
RE: Variable Passing to procedure problem , Reeve Fritchman

This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.