1 package IBU_HOME_PAGE_PVT
2 /* $Header: ibuhvhps.pls 120.0 2005/10/06 09:42:49 ktma noship $ */
3 AUTHID CURRENT_USER as
4 -- ---------------------------------------------------------
5 -- Declare Global Variables
6 -- --------------------------------------------------
7 G_ADMIN_PROFILE_NAME CONSTANT VARCHAR2(30) := 'IBU_A_PROFILE00';
8 G_MANDATORY_LAYOUT_DATA_NAME CONSTANT VARCHAR2(30) := 'IBU_MANDATORY_LAYOUT';
9 G_USER_LAYOUT_DATA_NAME CONSTANT VARCHAR2(30) := 'IBU_USER_LAYOUT';
10 G_LAYOUT_DATA_TYPE CONSTANT VARCHAR2(30) := 'IBU_LAYOUT';
11
12 -- ---------------------------------------------------------
13 -- Declare Data Types
14 -- --------------------------------------------------
15 TYPE IBU_STR_ARR IS VARRAY(20) OF VARCHAR2(80);
16
17 TYPE Bin_Data_Type IS RECORD (
18 bin_id NUMBER := 0,
19 package_name VARCHAR2(300) := null,
20 mandatory_flag VARCHAR2(1) := null,
21 disabled_flag VARCHAR2(1) := null,
22 MES_cat_ID NUMBER := null,
23 row_number NUMBER := -1
24 );
25
26
27 TYPE Account_Data_Type IS RECORD (
28 account_id NUMBER := null,
29 account_number VARCHAR2(30) := null
30 );
31 TYPE Account_List_Type is table of Account_Data_Type;
32
33 type Filter_Data_Type IS RECORD (
34 name VARCHAR2(60) := '',
35 value VARCHAR2(240) := ''
36 );
37 type Filter_Data_List_Type is table of Filter_Data_Type;
38
39 -- ---------------------------------------------------------
40 -- Common Context Info APIs
41 -- --------------------------------------------------
42 function is_rollout_enabled return VARCHAR;
43 function is_country_contract_enabled return VARCHAR;
44
45 function get_user_id return NUMBER;
46 function get_user_name return VARCHAR2;
47 function get_app_id return NUMBER;
48 function get_resp_id return NUMBER;
49 function get_customer_id return NUMBER;
50 function get_employee_id return NUMBER;
51 function get_company_id return NUMBER;
52 function get_company_name return VARCHAR2;
53 function get_account_id return NUMBER;
54 function get_lang_code return VARCHAR2;
55 function get_date_format return VARCHAR2;
56
57 function get_resp_id_from_user(p_user_id IN NUMBER) return NUMBER;
58 function get_customer_id_from_user(p_user_id IN NUMBER) return NUMBER;
59 function get_employee_id_from_user(p_user_id IN NUMBER) return NUMBER;
60 function get_party_type_from_user(p_user_id IN NUMBER, x_party_id OUT NOCOPY NUMBER) return VARCHAR2;
61 function get_company_id_from_user(p_user_id IN NUMBER) return NUMBER;
62 function get_company_name_from_user(p_user_id IN NUMBER) return VARCHAR2;
63 function get_account_id_from_user(p_user_id IN NUMBER) return NUMBER;
64 function get_accounts_from_user(p_user_id IN NUMBER) return Account_List_Type;
65 function get_date_format_from_user(p_user_id IN NUMBER) return VARCHAR2;
66 function get_long_language_from_user(p_user_id IN NUMBER) return VARCHAR2;
67
68
69 -- ---------------------------------------------------------
70 -- Unit functions for homepage
71 -- --------------------------------------------------
72 function get_close_bin_url(p_bin_id IN NUMBER,
73 p_cookie_url IN VARCHAR2)
74 return VARCHAR2;
75
76 function get_edit_bin_url(p_bin_id IN NUMBER,
77 p_jsp_file_name IN VARCHAR2,
78 p_filter_string IN VARCHAR2,
79 p_cookie_url IN VARCHAR2)
80 return VARCHAR2;
81
82 function get_bin_header_html(p_bin_name IN VARCHAR2,
83 p_bin_link_url IN VARCHAR2,
84 p_edit_url IN VARCHAR2,
85 p_close_url IN VARCHAR2)
86 return VARCHAR2;
87
88 procedure get_bin_info(
89 p_api_version_number IN NUMBER,
90 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
91 p_commit IN VARCHAR := FND_API.G_FALSE,
92 x_return_status OUT NOCOPY VARCHAR2,
93 x_msg_count OUT NOCOPY NUMBER,
94 x_msg_data OUT NOCOPY VARCHAR2,
95 p_bin_id IN NUMBER,
96 x_bin_info OUT NOCOPY Bin_Data_Type);
97
98 function get_formatted_date(p_date in DATE, p_format in VARCHAR2)
99 return VARCHAR2;
100
101 procedure get_ak_region_items(p_region_code IN VARCHAR2,
102 p_prompts OUT NOCOPY IBU_STR_ARR);
103 function get_ak_bin_prompt(p_region_item_name IN VARCHAR2)
104 return VARCHAR2;
105
106 procedure get_ak_region_items_from_user(p_user_id IN NUMBER,
107 p_region_code IN VARCHAR2,
108 p_prompts OUT NOCOPY IBU_STR_ARR);
109
110 procedure get_filter_list(p_api_version IN NUMBER,
111 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
112 p_commit IN VARCHAR := FND_API.G_FALSE,
113 p_user_id IN NUMBER,
114 p_bin_id In NUMBER,
115 x_return_status OUT NOCOPY VARCHAR2,
116 x_msg_count OUT NOCOPY NUMBER,
117 x_msg_data OUT NOCOPY VARCHAR2,
118 x_filter_list OUT NOCOPY Filter_Data_List_Type,
119 x_filter_string OUT NOCOPY VARCHAR2);
120
121 procedure get_perz_data_attrib(
122 p_api_version_number IN NUMBER,
123 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
124 p_commit IN VARCHAR := FND_API.G_FALSE,
125 x_return_status OUT NOCOPY VARCHAR2,
126 x_msg_count OUT NOCOPY NUMBER,
127 x_msg_data OUT NOCOPY VARCHAR2,
128 p_user_id IN NUMBER := 0,
129 p_prof_name IN VARCHAR2 := NULL,
130 p_pd_id IN NUMBER,
131 p_pd_name IN VARCHAR2,
132 p_pd_type IN VARCHAR2,
133 p_one_attrib IN VARCHAR2 := FND_API.G_TRUE,
134 p_pd_attrib_name IN VARCHAR2 := NULL,
135 x_pd_attrib_value OUT NOCOPY VARCHAR2,
136 x_pd_attrib_tbl OUT NOCOPY JTF_PERZ_DATA_PUB.DATA_ATTRIB_TBL_TYPE
137 );
138 end IBU_HOME_PAGE_PVT;