EXPORT/IMPORT was RE: Static vs. Dynamic storage (was Activation groups forbeginne rs )

[rob@xxxxxxxxx]

On variables or subprocedures?

I use it all the time for subprocedures in a service program.  In fact any
subprocedure in a service program which you want to access outside of that
service program needs to be EXPORTed.  The subprocedures do not need to be
IMPORTed.

So far the only variable I IMPORT is
      * Execute Command (system) Subprocedure Variables
     D System          PR            10I 0 ExtProc('system')
     D  CmdText                        *   Value Options(*String)
Command text string

     D ErrorCPF        S              7A   Import('_EXCP_MSGID')
Error number
I've not EXPORTed any variables, yet.


Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin



                    "Nicolay, Paul"
                    <paul_nicolay@mer       To:     "'rpg400-l@midrange.com'" 
<rpg400-l@midrange.com>
                    ck.com>                 cc:
                    Sent by:                Fax to:
                    rpg400-l-admin@mi       Subject:     RE: Static vs. Dynamic 
storage (was Activation groups for
                    drange.com               beginne     rs )


                    03/08/2002 03:18
                    AM
                    Please respond to
                    rpg400-l






Hi,

BTW... is anybody using IMPORT/EXPORT ?

Kind regards,
Paul

-----Original Message-----
From: Jon Paris [mailto:Jon.Paris@Partner400.com]
Sent: 08 March, 2002 0:02
To: rpg400-l@midrange.com
Subject: Static vs. Dynamic storage (was Activation groups for beginners
)


 > I guess I'm not clear on how static storage is "shared".

It is not shared at all.  "static" is what you probably think of as
"normal"
variable storage in an RPG program.  The notion of designating storage as
static came about because in subprocedures the default is dynamic.  By this
we mean that the storage is allocated when the subprocedure is entered, and
deallocated when the subprocedure returns.  If you want to have storage in
a
subprocedure behave like "normal" storage, then you have to designate the
variable(s) as STATIC.

For sharing of storage between modules the variables have to be designated
as Export(ed) by the owning program/service program and Import(ed) by all
those that wish to share that storage.

Jon Paris
Partner400


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.