Greetings all,
I am new to using the SYSCALL environment, so the recent discussion was useful
to me.
I am looking to understand what I need to do to get something working but I am
hitting a silly error somewhere.
Here is my REXX routine. I am attempting to run this in my TSO session.
/* REXX */
x = SYSCALLS('ON')
if x > 3 then do
say 'No SYSCALL environment '||x
return
end
else say 'SYSCALLS set ok '||x
address SYSCALL
x = procinfo(1,'process')
if x <> '' then do
say bpxw_.EUID
say bpxw_.RUID
say bpxw_.SUID
end
else say 'No data'
return 0
The result I get is the following,
SYSCALLS set ok 0
11 +++ x = procinfo(1,'process')
IRX0043I Error running TESTSYSC, line 11: Routine not found
The routine does not even find the procinfo function.
I have tried inserting a call procinfo immediately after the address SYSCALL as
shown in the example at the end of this article,
https://www.ibm.com/docs/en/zos/2.5.0?topic=functions-procinfo
This makes no difference other than to fail to find the procinfo() function
earlier.
I feel I have missed something rather basic. What is it?
Lennie Dymoke-Bradshaw
https://rsclweb.com
‘Dance like no one is watching. Encrypt like everyone is.’
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
