DBA Data[Home] [Help]

APPS.ZX_SECURITY dependencies on ZX_SECURITY

Line 1: PACKAGE BODY zx_security AS

1: PACKAGE BODY zx_security AS
2: /* $Header: zxifdtaccsecpvtb.pls 120.36 2011/01/13 23:01:55 prigovin ship $ */
3:
4: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

Line 11: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_SECURITY.';

7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_SECURITY.';
12:
13:
14:
15: FUNCTION get_effective_date RETURN DATE

Line 269: IF ZX_SECURITY.G_FIRST_PARTY_ORG_ID is not null THEN

265: RETURN VARCHAR2
266: IS
267: D_predicate VARCHAR2 (2000);
268: BEGIN
269: IF ZX_SECURITY.G_FIRST_PARTY_ORG_ID is not null THEN
270: D_predicate := ' content_owner_id = SYS_CONTEXT(''my_ctx'',''FIRSTPTYORGID'')';
271: ELSE
272: D_predicate := null;
273: END IF;

Line 285: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'SET_SECURITY_CONTEXT.BEGIN','ZX_SECURITY: CHECK_WRITE_ACCESS()+');

281: IS
282: l_count NUMBER :=0;
283: BEGIN
284: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
285: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'SET_SECURITY_CONTEXT.BEGIN','ZX_SECURITY: CHECK_WRITE_ACCESS()+');
286: END IF;
287:
288: x_return_status := FND_API.G_RET_STS_SUCCESS;
289: IF fnd_profile.value('ZX_GCO_WRITE_ACCESS') = 'Y' then

Line 308: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'SET_SECURITY_CONTEXT.END','ZX_SECURITY: CHECK_WRITE_ACCESS()-');

304: and det.view_options_code = 'VFC';
305: END IF;
306:
307: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
308: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'SET_SECURITY_CONTEXT.END','ZX_SECURITY: CHECK_WRITE_ACCESS()-');
309: END IF;
310:
311: EXCEPTION
312: WHEN NO_DATA_FOUND THEN

Line 366: IF ZX_SECURITY.G_ICX_SESSION_ID is not null THEN

362: FUNCTION add_icx_session_id (D1 VARCHAR2, D2 VARCHAR2) RETURN VARCHAR2
363: IS
364: D_predicate VARCHAR2 (2000);
365: BEGIN
366: IF ZX_SECURITY.G_ICX_SESSION_ID is not null THEN
367: --dbms_session.set_context('my_ctx','SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));
368: --Bug 10200208
369: --D_predicate := 'icx_session_id = SYS_CONTEXT(''my_ctx'',''SESSIONID'') ';
370: D_predicate := 'NVL(icx_session_id,-999) = NVL(SYS_CONTEXT(''my_ctx'',''SESSIONID''),-999) ';

Line 367: --dbms_session.set_context('my_ctx','SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));

363: IS
364: D_predicate VARCHAR2 (2000);
365: BEGIN
366: IF ZX_SECURITY.G_ICX_SESSION_ID is not null THEN
367: --dbms_session.set_context('my_ctx','SESSIONID',to_char(ZX_SECURITY.G_ICX_SESSION_ID));
368: --Bug 10200208
369: --D_predicate := 'icx_session_id = SYS_CONTEXT(''my_ctx'',''SESSIONID'') ';
370: D_predicate := 'NVL(icx_session_id,-999) = NVL(SYS_CONTEXT(''my_ctx'',''SESSIONID''),-999) ';
371: ELSE

Line 399: 'ZX_SECURITY: SET_SECURITY_CONTEXT()+' ||

395:
396: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
397: FND_LOG.STRING(G_LEVEL_STATEMENT,
398: G_MODULE_NAME||'SET_SECURITY_CONTEXT.BEGIN',
399: 'ZX_SECURITY: SET_SECURITY_CONTEXT()+' ||
400: ', OU: '||to_char(p_internal_org_id)||' and LE: '||to_char(p_legal_entity_id));
401: END IF;
402:
403: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 445: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-'||

441:
442: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
443: FND_LOG.STRING(G_LEVEL_STATEMENT,
444: G_MODULE_NAME||'SET_SECURITY_CONTEXT.END',
445: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-'||
446: ', G_EFFECTIVE_DATE: '||to_char(G_EFFECTIVE_DATE) ||
447: ', G_FIRST_PARTY_ORG_ID: '||to_char(G_FIRST_PARTY_ORG_ID));
448: END IF;
449:

Line 467: 'ZX_SECURITY: SET_SECURITY_CONTEXT()+' ||

463:
464: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
465: FND_LOG.STRING(G_LEVEL_STATEMENT,
466: G_MODULE_NAME||'SET_SECURITY_CONTEXT.BEGIN',
467: 'ZX_SECURITY: SET_SECURITY_CONTEXT()+' ||
468: ', OU: '||to_char(p_internal_org_id)||' and LE: '||to_char(p_legal_entity_id));
469: END IF;
470:
471: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 487: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-' ||

483:
484: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
485: FND_LOG.STRING(G_LEVEL_STATEMENT,
486: G_MODULE_NAME||'SET_SECURITY_CONTEXT.END',
487: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-' ||
488: ', G_EFFECTIVE_DATE: '||nvl(SYS_CONTEXT('my_ctx','EFFECTIVEDATE'),sysdate) ||
489: ', G_FIRST_PARTY_ORG_ID:
490: '||to_char(nvl(SYS_CONTEXT('my_ctx','FIRSTPTYORGID'),-999)) );
491: END IF;

Line 524: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-'||

520:
521: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
522: FND_LOG.STRING(G_LEVEL_STATEMENT,
523: G_MODULE_NAME||'SET_SECURITY_CONTEXT.END',
524: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-'||
525: ', G_EFFECTIVE_DATE: '||to_char(G_EFFECTIVE_DATE) ||
526: ', G_FIRST_PARTY_ORG_ID: '||to_char(G_FIRST_PARTY_ORG_ID));
527: END IF;
528:

Line 544: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'SET_SECURITY_CONTEXT.BEGIN','ZX_SECURITY: SET_SECURITY_CONTEXT()+');

540:
541: BEGIN
542:
543: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
544: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'SET_SECURITY_CONTEXT.BEGIN','ZX_SECURITY: SET_SECURITY_CONTEXT()+');
545: END IF;
546:
547: x_return_status := FND_API.G_RET_STS_SUCCESS;
548:

Line 573: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-' ||

569:
570: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
571: FND_LOG.STRING(G_LEVEL_STATEMENT,
572: G_MODULE_NAME||'SET_SECURITY_CONTEXT.END',
573: 'ZX_SECURITY: SET_SECURITY_CONTEXT()-' ||
574: ', G_EFFECTIVE_DATE: '||to_char(G_EFFECTIVE_DATE) ||
575: ', G_FIRST_PARTY_ORG_ID: '||to_char(G_FIRST_PARTY_ORG_ID) );
576: END IF;
577:

Line 588: END zx_security;

584: dbms_session.set_context('my_ctx',name,value);
585:
586: END;
587:
588: END zx_security;