Use varying on all the passed fields. This should ensure that you are only
looking at the current information.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [
mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Mike
Sent: Tuesday, June 19, 2007 10:27 AM
To: RPG programming on the AS400 / iSeries
Subject: That Darn Text Issue Pops Up Again...
I know about the issue of passing long text fields from one program to
another but I didn't think it would be a problem from a program to a
subprocedure. I have a command call an RPG program wrapper for a
subprocedure.
C *entry plist
C parm fromAddress
C parm toAddress
C parm ccAddress
C parm bccAddress
C parm subject
C parm body
//*************************************************************************
/free
SendEmail(%trim(fromAddress):
%trim(toAddress):
%trim(ccAddress):
%trim(bccAddress):
%trim(subject):
%trim(body));
*INLR = *On;
/end-free
P SendEmail B EXPORT
D SendEmail PI N
D fromAddress 100A CONST
D toAddress 32767A CONST
D ccAddress 32767A CONST
D bccAddress 32767A CONST
D subject 32767A CONST
D body 32767A CONST
I am getting text in ccAddress and bccAddress that doesn't belong. I need
ideas on how to fix this. I am fresh out of ideas. Any ideas?
--
Mike Wills
http://www.linkedin.com/in/mikewills
Blog -
http://mikewills.name
Podcasts -
http://podcastmike.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.
midrange.com
