× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



The address for the new fifth parameter will be passed between caller and
called. The fifth parameter should be fine.
Testing should confirm this.

Yours truly,

Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Cell: (416) 317-3144

---

On Fri, 3 Jun 2022 at 12:14, Greg Wilburn <gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>
wrote:

While looking to modify our ERP software, I encountered a situation where
parameter definitions vary between programs.
To explain...

OE049 is called from quite a few different programs. The CALL is as
follows:
c call 'OE049'
c parm psc000
c parm psc001
c parm psc002
c parm totals

All parameters are data structures.
My question is around the last parameter TOTALS.

In OE049 it is defined as length 204
d totals ds
d wontt$ 01 13 2
d wofrt$ 14 26 2
d wotxt$ 27 39 4
d wottt$ 40 52 2
d wonts$ 53 65 2
d wofrs$ 66 78 2
d wotxs$ 79 91 4
d wotts$ 92 104 2
d wontb$ 105 117 2
d wofrb$ 118 130 2
d wotxb$ 131 143 4
d wottb$ 144 156 2
d wstxc1 157 159
d wstxc2 160 162
d wstxc3 163 165
d wotxt1 166 178 4
d wotxt2 179 191 4
d wotxt3 192 204 4

In some of the calling programs it varies from 156 to 165 to 204

How can this be? Could this cause problems?

I ask because I'm about to add a 5th (optional) parameter to the call to
OE049.

Greg
[Logo]<https://www.totalbizfulfillment.com/> Greg Wilburn
Director of IT
301.895.3792 ext. 1231
301.895.3895 direct
gwilburn@xxxxxxxxxxxxxxxxxxxxxxx<mailto:gwilburn@xxxxxxxxxxxxxxxxxxxxxxx>
1 Corporate Dr
Grantsville, MD 21536
www.totalbizfulfillment.com<http://www.totalbizfulfillment.com>
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 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.