Leave approvals without ESS

Question

Hi Experts
How can i do Leave approvals without ESS.is it passible to do  please help me.

Answer 1

hi,
try to code...
emp number 26 is a dummy value here
data: ACTOR_AGENT type ref to CA_PT_REQ_ACTOR.
CALL METHOD ACTOR_AGENT->CREATE_ACTOR
EXPORTING
IM_ACTOR_TYPE = 'P'
IM_PLVAR =
IM_OTYPE = 'P'
IM_OBJID = '00000026'
IMPORTING
EX_ACTOR = ex_responsible_actor
EXCEPTIONS
MISSING_PARAMETER = 1
PERNR_NOT_EXISTING = 2
APPLICATION_ERROR = 3
others = 4
IF SY-SUBRC 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
but the application has been dumping for a while.
The error message in st22 is as follows
An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_REF_IS_INITIAL', was not
caught in
procedure "IF_EX_PT_GEN_REQ~FIND_RESP_AND_DEFAULT_NEXT_PRC" "(METHOD)", nor was
it propagated by a RAISING clause.
Since the caller of the procedure could not have anticipated that the
exception would occur, the current program is terminated.
The reason for the exception is:
You attempted to use a 'NULL' object reference (points to 'nothing')
access a component (variable: "ACTOR_AGENT").
An object reference must point to an object (an instance of a class)
before it can be used to access components.
Either the reference was never set or it was set to 'NULL' using the
CLEAR statement.
by
parthi