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;