From within an internal procedure: A handle
to the procedure file mentioned, explicitly or implicitly, by the
original RUN statement that invoked (perhaps through a chain of
super procedures) the current internal procedure.
From within
a user-defined function: A handle to the procedure file mentioned,
explicitly or implicitly, by the original function invocation that invoked
(perhaps through a chain of super versions of functions) the current user-defined
function.
Syntax
TARGET-PROCEDURE [ :attribute | :method ]
|
-
attribute
- An attribute of the TARGET-PROCEDURE handle.
-
method
- A method of the TARGET-PROCEDURE handle.
Attributes
The
TARGET-PROCEDURE handle supports all the attributes of the procedure
object handle. For a list of these attributes, see the reference
entry for the Procedure object handle in this section.
Methods
The
TARGET-PROCEDURE handle supports all the methods of the procedure
object handle. For a list of these methods, see the reference entry
for the Procedure object handle in this section.
Examples
The
following scenarios illustrate using TARGET-PROCEDURE without procedure
overriding, with procedure overriding, and with super and non-super
RUNs:
Scenario 1: Using TARGET-PROCEDURE without procedure
overriding
The following scenario uses TARGET-PROCEDURE
without procedure overriding:
- A and B are handles of
procedure files running persistently.
- proc1 is an internal procedure that resides in B.
- A says "RUN proc1 IN B," which runs B's proc1.
In
this scenario:
- The original RUN statement for proc1 occurs
in Step 3.
- Within proc1 (and any proc1 that runs as a result its original
RUN statement), the value of TARGET-PROCEDURE is B.
Scenario
2: Using TARGET-PROCEDURE with procedure overriding
The
following scenario uses TARGET-PROCEDURE with procedure overriding:
- A, B, and C, and X are handles of procedure files running persistently.
- B is a super procedure of A, and C is a super procedure of B.
- proc1 is an internal procedure, different versions of which
reside in A, B, and C.
Note: This is an example of
procedure overriding.
- X says "RUN proc1 in A," which runs A's proc1.
- A's proc1 says "RUN SUPER," which runs B's proc1.
- B's proc1 says "RUN SUPER," which runs C's proc1.
In
this scenario:
- The original RUN statement for proc1 occurs
in Step 4.
- Within any version of proc1 that runs as a result of the original
RUN statement, the value of TARGET-PROCEDURE is A.
Scenario 3: With procedure overriding and additional complications
The
following scenario uses TARGET-PROCEDURE with procedure overriding:
- A, B, and C, and X are handles of procedure files running persistently.
- B is a super procedure of A, and C is a super procedure of B.
- proc1 is an internal procedure, different versions of which
reside in B and C.
Note: proc1 does not reside in A.
- X says "RUN proc1 in A," which runs B's proc1 (since A has no
proc1 and B is a super procedure of A).
- B's proc1 says "RUN SUPER," which runs C's proc1.
In
this scenario:
- The original RUN statement for proc1 occurs
in Step 4.
- Within any version of proc1 that runs as a result of its original
RUN statement, the value of TARGET-PROCEDURE is A.
Scenario
4: With SUPER and non-SUPER RUNs
The following scenario
shows how the value of TARGET-PROCEDURE changes when a non-super
RUN occurs:
- A, B, and C are handles of procedure files
running persistently.
- B is a super procedure of A, and C is a super procedure of B.
- proc1 is an internal procedure different versions of which reside
in A, B, and C.
- proc2 is an internal procedure different versions of which reside
in A, B, and C.
- A says "RUN proc1," which runs A's proc1.
- A's proc1 says "RUN SUPER," which runs B's proc1.
Note: At
this point, within any version of proc1 that runs as a result of
its original RUN statement, the value of TARGET-PROCEDURE is A.
- B's proc1 says "RUN proc2," which runs B's proc2.
Note: This
is a non-super RUN.
In this scenario:
- The
original RUN statement for proc2 occurs in Step 7.
- Within any proc2 that runs as a result of its original RUN statement, the
value of TARGET-PROCEDURE is B.
For a sample program that uses TARGET-PROCEDURE, see the reference entry for the RUN SUPER statement.
Notes
- You
can use TARGET-PROCEDURE in applications that do not use super procedures.
- The value of TARGET-PROCEDURE becomes THIS-PROCEDURE in the
following places:
- Within the main block of a procedure file.
- Within an internal procedure that is not a super version of another
internal procedure.
- Within a user-defined function that is not a super version of another
user-defined function.