1 PACKAGE PO_VENDORS_GRP AUTHID CURRENT_USER AS
2 /* $Header: POXGVENS.pls 120.1 2005/12/14 14:52:12 bao noship $ */
3
4 -- Read the profile option that enables/disables the debug log
5 g_fnd_debug CONSTANT VARCHAR2(1) :=
6 NVL (FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
7
8 -- define table type for supplier user list
9 TYPE external_user_tbl_type IS TABLE OF
10 fnd_user.user_name%TYPE
11 INDEX BY BINARY_INTEGER;
12
13 -- other
14 g_pkg_name CONSTANT VARCHAR2(30) := 'PO_VENDORS_GRP';
15 g_module_prefix CONSTANT VARCHAR2(50) := 'po.plsql.'||g_pkg_name||'.';
16
17 ---------------------------------------------------------------------------------
18 -- API to return supplier users for the given PO document.
19 ---------------------------------------------------------------------------------
20 PROCEDURE get_external_userlist
21 (p_api_version IN NUMBER
22 ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
23 ,p_document_id IN NUMBER
24 ,p_document_type IN VARCHAR2
25 ,p_external_contact_id IN NUMBER DEFAULT NULL
26 ,x_return_status OUT NOCOPY VARCHAR2
27 ,x_msg_count OUT NOCOPY NUMBER
28 ,x_msg_data OUT NOCOPY VARCHAR2
29 ,x_external_user_tbl OUT NOCOPY external_user_tbl_type);
30
31 ---------------------------------------------------------------------------------
32 -- Over loaded version of the procedure to return additional parameters.
33 ---------------------------------------------------------------------------------
34 PROCEDURE get_external_userlist
35 (p_api_version IN NUMBER
36 ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
37 ,p_document_id IN NUMBER
38 ,p_document_type IN VARCHAR2
39 ,p_external_contact_id IN NUMBER DEFAULT NULL
40 ,x_return_status OUT NOCOPY VARCHAR2
41 ,x_msg_count OUT NOCOPY NUMBER
42 ,x_msg_data OUT NOCOPY VARCHAR2
43 ,x_external_user_tbl OUT NOCOPY external_user_tbl_type
44 ,x_supplier_userlist OUT NOCOPY VARCHAR2
45 ,x_supplier_userlist_for_sql OUT NOCOPY VARCHAR2
46 ,x_num_users OUT NOCOPY NUMBER
47 ,x_vendor_id OUT NOCOPY NUMBER);
48
49 END PO_VENDORS_GRP;