1 PACKAGE gl_security_pkg AS
2 /* $Header: gluoases.pls 120.10 2005/10/07 11:25:17 kkchopra ship $ */
3 --
4 -- Package
5 -- gl_bis_security_pkg
6 -- Purpose
7 -- To contain procedures for applying segment value security rules
8 -- History
9 -- 05-31-99 K Chang Created
10 --
11 -- Procedure
12 -- init
13 -- Purpose
14 -- Validate the calling session and call init_segval to
15 -- initialize, populate, and update GL_BIS_SEGVAL_INT interim table
16 -- according to segment value security rules
17 -- History
18 -- 05-31-99 K Chang Created
19 -- 09-03-02 K Chang Moved the logic which inits, populates,
20 -- and updates GL_BIS_SEGVAL_INT to
21 -- init_segval for gl standard reports
22 -- to use segment security API.
23 -- Arguments
24 -- none
25 -- Example
26 -- gl_bis_security_pkg.init;
27 -- Notes
28 --
29 PROCEDURE init;
30
31
32 --
33 -- Procedure
34 -- init_segval
35 -- Purpose
36 -- Initiliz, populate and update GL_BIS_SEGVAL_INT interim table
37 -- according to segment value security rules
38 -- History
39 -- 09-03-02 K Chang Created
40 -- Arguments
41 -- none
42 -- Example
43 -- gl_bis_security_pkg.init_segval;
44 -- Notes
45 --
46 PROCEDURE init_segval;
47
48
49
50 -- Function
51 -- validate_access
52 -- Purpose
53 -- Validate the given code combination id and ledger id
54 -- according to the rules stored in GL_BIS_SEGVAL_INT interim
55 -- table by gl_security_pkg.init.
56 -- History
57 -- 05-31-99 K Chang Created
58 -- 12-31-02 S Pandey Modified, S Pandey the led_id
59 -- now refers to the ledger id.
60 -- Arguments
61 -- led_id ledger ID
62 -- ccid code combination ID
63 -- Example
64 -- gl_security_pkg.validate_access(......)
65 --
66 -- Notes
67 --
68 FUNCTION validate_access
69 (
70 p_ledger_id IN NUMBER DEFAULT NULL,
71 ccid IN NUMBER DEFAULT NULL
72 ) RETURN VARCHAR2;
73 ---PRAGMA RESTRICT_REFERENCES ( validate_access, WNDS, WNPS) ;
74
75 -- Function
76 -- validate_segval
77 -- Purpose
78 -- Validate the given segment numbers and segment values
79 -- according to the rules stored in GL_BIS_SEGVAL_INT interim
80 -- table by gl_security_pkg.init.
81 -- History
82 -- 08-13-99 K Chang Created
83 -- 20-Jun-05 KK Chopra Added one more parameter for Ledger id.
84 -- Arguments
85 -- segnum1 Primary drilldown segment number
86 -- segnum2 Secondary drilldown segment number
87 -- segval1 Primary drilldown segment value
88 -- segval2 Secondary drilldown segment value
89 -- p_ledger_id Ledger id
90 -- Example
91 -- gl_security_pkg.validate_segval(......)
92 --
93 -- Notes
94 --
95 FUNCTION validate_segval
96 (
97 segnum1 IN NUMBER DEFAULT NULL,
98 segnum2 IN NUMBER DEFAULT NULL,
99 segval1 IN VARCHAR2 DEFAULT NULL,
100 segval2 IN VARCHAR2 DEFAULT NULL,
101 p_ledger_id IN NUMBER DEFAULT NULL
102 ) RETURN VARCHAR2;
103 --PRAGMA RESTRICT_REFERENCES ( validate_segval, WNDS, WNPS) ;
104
105
106
107 -- Function
108 -- login_led_id
109 -- Purpose
110 -- Returns the ledger id a user signed on with
111 -- History
112 -- 08-25-99 K Chang Created
113 -- Example
114 -- gl_security_pkg.login_led_id
115 --
116 -- Notes
117 --
118 FUNCTION login_led_id RETURN NUMBER;
119 --PRAGMA RESTRICT_REFERENCES ( login_led_id, WNDS, WNPS) ;
120
121 /* Parametrized version */
122 FUNCTION login_led_id (P_LEDGER_ID IN NUMBER) RETURN NUMBER;
123 --PRAGMA RESTRICT_REFERENCES ( login_led_id, WNDS, WNPS) ;
124
125
126 -- Function
127 -- login_access_id
128 -- Purpose
129 -- Returns the access id with which the user signed on
130 -- History
131 -- 19-Jun-05 KK Chopra Created
132 -- Example
133 -- gl_security_pkg.login_access_id
134 --
135 -- Notes
136 --
137 FUNCTION login_access_id RETURN NUMBER;
138 --PRAGMA RESTRICT_REFERENCES ( login_access_id, WNDS, WNPS);
139
140
141 END gl_security_pkg;