1 PACKAGE BODY mo_global_server AS
2 /* $Header: AFMOGBWB.pls 120.2 2006/10/21 00:15:15 sryu noship $ */
3
4 -- Name
5 -- set_policy_context
6 PROCEDURE set_policy_context_server(p_access_mode VARCHAR2,
7 p_org_id NUMBER) IS
8 BEGIN
9 mo_global.set_policy_context(p_access_mode, p_org_id);
10 END set_policy_context_server;
11 --
12 -- Name
13 -- get_current_org_id
14 FUNCTION get_current_org_id_server RETURN NUMBER
15 IS
16 BEGIN
17 RETURN (mo_global.get_current_org_id);
18 END get_current_org_id_server;
19 --
20 --
21 FUNCTION is_mo_init_done_server RETURN VARCHAR2 IS
22 BEGIN
23 RETURN(mo_global.is_mo_init_done);
24 END is_mo_init_done_server;
25 --
26 --
27 FUNCTION check_access_server(p_org_id NUMBER) RETURN VARCHAR2 IS
28 BEGIN
29 RETURN(mo_global.check_access(p_org_id));
30 END check_access_server;
31 --
32 --
33 FUNCTION get_ou_name_server(p_org_id NUMBER) RETURN VARCHAR2 IS
34 BEGIN
35 RETURN(mo_global.get_ou_name(p_org_id));
36 END get_ou_name_server;
37 --
38 --
39 PROCEDURE init_server(p_appl_short_name VARCHAR2) IS
40 BEGIN
41 mo_global.init(p_appl_short_name);
42 END init_server;
43 --
44 --
45 PROCEDURE set_org_context_server(p_org_id_char VARCHAR2,
46 p_sp_id_char VARCHAR2,
47 p_appl_short_name VARCHAR2) IS
48 BEGIN
49 mo_global.set_org_context(p_org_id_char,p_sp_id_char,p_appl_short_name);
50 END set_org_context_server;
51 --
52 --
53 FUNCTION check_valid_org_server(p_org_id NUMBER) RETURN VARCHAR2 IS
54 BEGIN
55 RETURN(mo_global.check_valid_org(p_org_id));
56 END check_valid_org_server;
57 --
58 --
59 FUNCTION get_access_mode_server RETURN VARCHAR2 IS
60 BEGIN
61 RETURN(mo_global.get_access_mode);
62 END get_access_mode_server;
63 --
64 --
65 FUNCTION is_multi_org_enabled_server RETURN VARCHAR2 IS
66 BEGIN
67 RETURN(mo_global.is_multi_org_enabled);
68 END is_multi_org_enabled_server;
69 --
70 --
71 FUNCTION get_ou_count_server RETURN NUMBER IS
72 BEGIN
73 RETURN(mo_global.get_ou_count);
74 END get_ou_count_server;
75 --
76 --
77 FUNCTION get_valid_org_server(p_org_id NUMBER) RETURN NUMBER IS
78 BEGIN
79 RETURN(mo_global.get_valid_org(p_org_id));
80 END get_valid_org_server;
81 --
82 --
83 PROCEDURE validate_orgid_pub_api_server(org_id IN OUT NOCOPY NUMBER,
84 error_mesg_suppr IN VARCHAR2,
85 status OUT NOCOPY VARCHAR2) IS
86 BEGIN
87 mo_global.validate_orgid_pub_api(org_id, error_mesg_suppr, status);
88 END validate_orgid_pub_api_server;
89
90 --
91 -- The following are cover for MO_UTILS
92 FUNCTION get_set_of_books_name_server (p_operating_unit IN NUMBER) RETURN VARCHAR2 IS
93 BEGIN
94 RETURN(mo_utils.get_set_of_books_name(p_operating_unit));
95 END get_set_of_books_name_server;
96 --
97 PROCEDURE get_set_of_books_info_server(p_operating_unit IN NUMBER,
98 p_sob_id OUT NOCOPY NUMBER,
99 p_sob_name OUT NOCOPY VARCHAR2) IS
100 BEGIN
101 mo_utils.get_set_of_books_info(p_operating_unit,p_sob_id,p_sob_name);
102 END get_set_of_books_info_server;
103 --
104 FUNCTION get_ledger_name_server (p_operating_unit IN NUMBER) RETURN VARCHAR2 IS
105 BEGIN
106 RETURN(mo_utils.get_ledger_name(p_operating_unit));
107 END get_ledger_name_server;
108 --
109 PROCEDURE get_ledger_info_server (p_operating_unit IN NUMBER,
110 p_ledger_id OUT NOCOPY NUMBER,
111 p_ledger_name OUT NOCOPY VARCHAR2) IS
112 BEGIN
113 mo_utils.get_ledger_info(p_operating_unit, p_ledger_id, p_ledger_name);
114 END get_ledger_info_server;
115 --
116 PROCEDURE get_default_ou_server ( p_default_org_id OUT NOCOPY NUMBER
117 , p_default_ou_name OUT NOCOPY VARCHAR2
118 , p_ou_count OUT NOCOPY NUMBER) IS
119 BEGIN
120 mo_utils.get_default_ou(p_default_org_id, p_default_ou_name, p_ou_count);
121 END get_default_ou_server;
122 --
123 FUNCTION get_multi_org_flag_server RETURN VARCHAR2 IS
124 BEGIN
125 RETURN(mo_utils.get_multi_org_flag);
126 END get_multi_org_flag_server;
127 --
128 FUNCTION get_child_tab_orgs_server (p_table_name IN VARCHAR2, p_where IN VARCHAR2) RETURN VARCHAR2 IS
129 BEGIN
130 RETURN(mo_utils.get_child_tab_orgs(p_table_name,p_where));
131 END get_child_tab_orgs_server;
132 --
133 FUNCTION check_org_in_sp_server (p_org_id IN NUMBER, p_org_class IN VARCHAR2) RETURN VARCHAR2 IS
134 BEGIN
135 RETURN(mo_utils.check_org_in_sp(p_org_id,p_org_class));
136 END check_org_in_sp_server;
137 --
138 FUNCTION check_ledger_in_sp_server (p_ledger_id IN NUMBER) RETURN VARCHAR2 IS
139 BEGIN
140 RETURN(mo_utils.check_ledger_in_sp(p_ledger_id));
141 END check_ledger_in_sp_server;
142 --
143 FUNCTION get_org_name_server(p_org_id IN NUMBER) RETURN VARCHAR2 IS
144 BEGIN
145 RETURN(mo_utils.get_org_name(p_org_id));
146 END get_org_name_server;
147 --
148
149
150 END mo_global_server;