At 7.1, the /INCLUDE became available (
https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_71/cl/include.htm)
Steve Needles
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Rob Berendt
Sent: Friday, June 09, 2017 2:47 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: RE: Get a definition for a constant in a source member into a CL program
I don't think CL supports /copy or /include.
You'd have to translate and put the & in front of every variable.
Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
From: Steve Needles <Stephen.Needles@xxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Date: 06/09/2017 03:39 PM
Subject: RE: Get a definition for a constant in a source member
into a CL program
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>
Maintain them as you have, as RPG constants. And use this as the "Source
of Truth".
Now write a tool to parse the copybook above and translate it into another
copybook containing the CL DCL's. Now include the new copybook in your CL
programs and refresh it every time you update the RPG version.
Compile impacted programs as you currently do.
Best I can do on Friday afternoon.
Now if you'd go look at my currently open issue... :-)
Steve Needles
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
Jeff Crosby
Sent: Friday, June 09, 2017 2:30 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: Get a definition for a constant in a source member into a CL
program
Off the wall question for a Friday.
I've got a source member full of constant definitions that I copy into
hundreds of RPG programs. Here's a small sample:
* Active/deleted/suspended
D @Active C 'A'
D @Deleted C 'D'
D @Reinstate C 'R'
D @Suspended C 'S'
D @Update C 'U'
Makes code a lot more readable. I literally have hundreds of these
constants. If I want a change, all I have to do is change it here,
recompile any RPG programs that use the particular one I changed, and I'm
done.
I have a situation now where I'd like to use one in a CL program. I know
I could make an equivalent member for CL and copy _that_ into CL programs,
but that defeats the purpose of having a constant defined in one and
_only_ one place.
I'm not coming up with any slick way. Maybe there isn't any. Or else
it's above my pay grade. Any ideas jump out?
Thanks.
--
Jeff Crosby
VP Information Systems
UniPro FoodService/Dilgard
P.O. Box 13369
Ft. Wayne, IN 46868-3369
260-422-7531
www.dilgardfoods.com
The opinions expressed are my own and not necessarily the opinion of my
company. Unless I say so.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
http://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate
link:
http://amzn.to/2dEadiD
CONFIDENTIAL: The information contained in this email communication is
confidential information intended only for the use of the addressee.
Unauthorized use, disclosure or copying of this communication is strictly
prohibited and may be unlawful. If you have received this communication in
error, please notify us immediately by return email and destroy all copies
of this communication, including all attachments.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate
link:
http://amzn.to/2dEadiD
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
http://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD
CONFIDENTIAL: The information contained in this email communication is confidential information intended only for the use of the addressee. Unauthorized use, disclosure or copying of this communication is strictly prohibited and may be unlawful. If you have received this communication in error, please notify us immediately by return email and destroy all copies of this communication, including all attachments.
midrange.com
