INT %GetRPCCallerProcess()
; Calling with transmission of HOBJ of calling process INT _hbj _hbj := %GetParentProcessHBJ() CALL [E.Service] Service(1, _hbj)
; ***************************************** ; _callerProcess - HOBJ of calling process RPC PROCEDURE Service (IN INT _anyParams, IN INT _callerProcess) END Service
; Calling without transmission of HOBJ by means of parameter CALL [E.Service] Service(1)
; RPC PROCEDURE Service (IN INT _anyParams, IN INT _callerProcess) INT _callerProcess _callerProcess := %GetRPCCallerProcess() END Service
Pridať komentár