[Home] [Help]
PACKAGE BODY: APPS.PON_SOURCING_USER_MANAGER_PKG
Source
1 PACKAGE BODY PON_SOURCING_USER_MANAGER_PKG as
2 /*$Header: PONSURMB.pls 120.1 2005/07/25 14:52:55 snatu noship $ */
3
4 PROCEDURE validate_user_data(p_username IN VARCHAR2, -- 1
5 x_dummy_data OUT NOCOPY VARCHAR2,-- 2
6 x_extra_info OUT NOCOPY VARCHAR2,-- 3
7 x_row_in_hr OUT NOCOPY VARCHAR2,-- 4
8 x_vendor_relationship OUT NOCOPY VARCHAR2,-- 5
9 x_enterprise_relationship OUT NOCOPY VARCHAR2,-- 6
10 x_status OUT NOCOPY VARCHAR2,-- 7
11 x_exception_msg OUT NOCOPY VARCHAR2 -- 8
12 ) IS
13
14 PRAGMA autonomous_transaction;
15
16 v_user_party_id NUMBER;
17 v_user_name_prefix VARCHAR2(50);
18 v_user_name_f VARCHAR2(50);
19 v_user_name_m VARCHAR2(50);
20 v_user_name_l VARCHAR2(50);
21 v_user_name_suffix VARCHAR2(50);
22 v_user_title VARCHAR2(50);
23 v_user_email VARCHAR2(50);
24 v_user_country_code VARCHAR2(50);
25 v_user_area_code VARCHAR2(50);
26 v_user_phone VARCHAR2(50);
27 v_user_extension VARCHAR2(50);
28 v_user_fax_country_code VARCHAR2(50);
29 v_user_fax_area_code VARCHAR2(50);
30 v_user_fax VARCHAR2(50);
31 v_user_fax_extension VARCHAR2(50);
32 v_user_encodingoption VARCHAR2(50);
33
34 BEGIN
35
36 pon_user_profile_pkg.retrieve_user_data(p_username,
37 v_user_party_id,
38 v_user_name_prefix,
39 v_user_name_f,
40 v_user_name_m,
41 v_user_name_l,
42 v_user_name_suffix,
43 v_user_title,
44 v_user_email,
45 v_user_country_code,
46 v_user_area_code,
47 v_user_phone,
48 v_user_extension,
49 v_user_fax_country_code,
50 v_user_fax_area_code,
51 v_user_fax,
52 v_user_fax_extension,
53 v_user_encodingoption,
54 x_dummy_data,
55 x_extra_info,
56 x_row_in_hr,
57 x_vendor_relationship,
58 x_enterprise_relationship,
59 x_status,
60 x_exception_msg);
61
62 COMMIT;
63
64 END validate_user_data;
65
66 END PON_SOURCING_USER_MANAGER_PKG;