DBA Data[Home] [Help]

PACKAGE BODY: APPS.POS_INIT_SESSION_PKG

Source


1 PACKAGE BODY POS_INIT_SESSION_PKG AS
2 /* $Header: POSINSEB.pls 115.0 2001/10/29 17:18:54 pkm ship   $*/
3 
4 
5 PROCEDURE InitSession(p_resp_id VARCHAR2) IS
6 
7 BEGIN
8      -- we need to manually set the responsibility id
9      -- that is passed in from the function.
10      UPDATE ICX_SESSIONS
11         SET responsibility_id = to_number(p_resp_id),
12             RESPONSIBILITY_APPLICATION_ID = 178
13       WHERE session_id = icx_sec.getID(icx_sec.PV_SESSION_ID);
14      COMMIT;
15 
16      IF NOT icx_sec.validatesession THEN
17        RETURN;
18      END IF;
19 
20      UPDATE ICX_SESSIONS
21         SET ORG_ID = fnd_profile.value('ORG_ID')
22       WHERE session_id = icx_sec.getID(icx_sec.PV_SESSION_ID);
23      COMMIT;
24 
25 END InitSession;
26 
27 
28 END POS_INIT_SESSION_PKG;