On Thu, Mar 16, 2017 at 3:11 PM, Farley, Peter x23353 <
[email protected]> wrote:

> Doesn't use of (add_entry) presume that you add to the table BEFORE you
> call (init_subr) or (init_subr_dp)?  What if initialization is set up to be
> done first, before any entries at all appear in the table?
>

​​I'm not 100% sure, but since you're supplying a "token", which you get
from the init_sub or init_subp call, I ​don't think you​ can do it BEFORE
one of the "init_" calls. Also, remember that COBOL is an LE language. And
it can do dynamic calls without knowing the name before hand. Looking at
one portion, it appears that the "add_entry" can do the z/OS LOAD for you:

"routine_entry (input/output)
The routine entry address that is added to the PreInit table. If
routine_entry is zero on input, routine_name is used as the load name. On
output, routine_entry is set to the load address of routine_name.

The high-order bit of the entry_point address must be set to indicate the
addressing mode for the routine. If the high-order bit is OFF, the routine
is called in 24 bit addressing mode and the address must be a valid 24 bit
address. If the high-order bit is ON, the routine is called in 31 bit
addressing mode and the address must be a valid 31 bit address.
"​



>
> Can initialization happen with a "dummy" LE-enabled subroutine in the
> table and then calls be made using (call_subr_addr) without any
> corresponding table entry for the module(s) to be called?
>

​You talking to me? [grin]. I have no idea, but from what I can read, I get
the impression that whatever CEEPIPI function you use to call a routine,
the name of that routine must be in the LE pre-init table.



>
> Peter
>
>




-- 
"Irrigation of the land with seawater desalinated by fusion power is
ancient. It's called 'rain'." -- Michael McClary, in alt.fusion

Maranatha! <><
John McKown

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to