David,
When you create your Binder Source, just don't add an EXPORT command for
procedure A. But make sure you include the EXPORT keyword on procedure A's P
spec so that the routines in the other module(s) can call A from within the
*SRVPGM.
Then use EXPORT(*SRCFILE) rather than EXPORT(*ALL) when you do a CRTSRVPGM.

-Bob Cozzi
www.RPGxTools.com
RPG xTools - Enjoy programming again.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of David Gibbs
Sent: Tuesday, November 01, 2005 1:23 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Limiting procedure visibility

Folks:

Anyone know if it's possible (in V5R1) to create a procedure with
limited visibility in a service program?

Basically, I want to create a procedure in a service program that is not
exported to other programs that bind that service program, but is
accessible to other modules that are in the same service program.

For instance: The service program consists of modules X & Y.  Procedures
A, B, and C, are in module X.  Procedure D in module Y wants to
reference procedure A, but I don't want any other programs to be able to
reference procedure A.

In Java I would define the method (procedure) as having 'package'
visibility ... so that other routines in the same package (service
program) can access the routine, but nobody else can.

Am I asking for the impossible here?

Thanks!

david

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-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.