RE: Sub-Procedures

If I'm understanding you correctly...

In the source of the standalone module...
You need the following.

an hspec specifying no main logic
H NOMAIN

And

the export keyword on the PSPEC begin line.


There may be others but that's all I usually do.




Michael Schutte
Admin Professional
Bob Evans Farms, Inc.
"The Secret's the Sauce! Enjoy our new Bob-B-Q Pulled Pork Knife & Fork
Sandwich!"


rpg400-l-bounces@xxxxxxxxxxxx wrote on 07/20/2007 11:17:23 AM:

That is what I am doing; maybe I am not wording this correctly. If I am
attempting to create (CODE) a sub-procedure module, I assume that the

actual

source has to be in a SPF member and typically I create these with the F6
key, enter the name and the source type. For a sub-procedure how do I
accomplish the same thing?


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx

[mailto:rpg400-l-bounces@xxxxxxxxxxxx]

On Behalf Of Wilt, Charles
Sent: Friday, July 20, 2007 10:13 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Sub-Procedures

Depends...

If "normally" use CRTBNDRPG then the answer is nope, not really. <grin>

You need to use CRTRPGMOD, which creates a *MODULE object.

Then you can use CRTPGM or CRTSRVPGM which create *PGM or *SRVPGM objects

by

binding together one or
more *MODULE objects.

Take a look at the ILE concepts manual.

HTH,
Charles

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Doug Palme
Sent: Friday, July 20, 2007 10:58 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: Sub-Procedures

This is probably a very rudimentary question about
sub-procedures ( have not used them in the past) and I am
going through the IBM Red Book, but as for setting up the
source physical file, am I correct in the assumption that a
sub-procedure, when it is a standalone module, is still
created as you would normally create an RPGLE program?



**************************************************************
**************
This transmission may contain information that is privileged,
Confidential and/or exempt from disclosure under applicable law.
If you are not the intended recipient, you are hereby
notified that any disclosure, copying, distribution, or use
of the information contained herein (including any reliance
thereon) is STRICTLY PROHIBITED. If you received this
transmission in error, please immediately contact the sender
and destroy the material in its entirety, whether in
electronic or hard copy format. Thank you.
**************************************************************
**************
--
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.

This e-mail transmission contains information that is intended to be
confidential and privileged. If you receive this e-mail and you are not

a

named addressee you are hereby notified that you are not authorized to

read,

print, retain, copy or disseminate this communication without the consent

of

the sender and that doing so is prohibited and may be unlawful. Please
reply to the message immediately by informing the sender that the message
was misdirected. After replying, please delete and otherwise erase it

and

any attachments from your computer system. Your assistance in correcting
this error is appreciated.

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

****************************************************************************

This transmission may contain information that is privileged,
Confidential and/or exempt from disclosure under applicable law.
If you are not the intended recipient, you are hereby notified that
any disclosure, copying, distribution, or use of the information
contained herein (including any reliance thereon) is STRICTLY
PROHIBITED. If you received this transmission in error, please
immediately contact the sender and destroy the material in its
entirety, whether in electronic or hard copy format. Thank you.

****************************************************************************

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