1: PACKAGE BODY hr_h2pi_upload AS
2: /* $Header: hrh2piul.pkb 120.0 2005/05/31 00:41:59 appldev noship $*/
3:
4: g_package VARCHAR2(33) := ' hr_h2pi_upload.';
5: --
1: PACKAGE BODY hr_h2pi_upload AS
2: /* $Header: hrh2piul.pkb 120.0 2005/05/31 00:41:59 appldev noship $*/
3:
4: g_package VARCHAR2(33) := ' hr_h2pi_upload.';
5: --
6: -- --------------------------------------------------------------------------------
7: -- Description: Procedure to upload data into a H2PI data tables using
8: -- XML to SQL Utility (XSU).
64: BEGIN
65: hr_utility.set_location('Entering:'|| l_proc, 10);
66: l_from_business_group_id := hr_h2pi_map.get_from_id
67: (p_table_name => 'HR_ALL_ORGANIZATION_UNITS',
68: p_to_id => hr_h2pi_upload.g_to_business_group_id);
69: IF l_from_business_group_id = -1 THEN
70: hr_utility.set_location(l_proc, 20);
71: hr_h2pi_error.data_error
72: (p_from_id => hr_h2pi_upload.g_to_business_group_id,
68: p_to_id => hr_h2pi_upload.g_to_business_group_id);
69: IF l_from_business_group_id = -1 THEN
70: hr_utility.set_location(l_proc, 20);
71: hr_h2pi_error.data_error
72: (p_from_id => hr_h2pi_upload.g_to_business_group_id,
73: p_table_name => 'HR_H2PI_BG_AND_GRE',
74: p_message_level => 'FATAL',
75: p_message_name => 'HR_289241_MAPPING_ID_MISSING');
76: END IF;
81: */
82:
83: FUNCTION get_from_client_id RETURN NUMBER IS
84:
85: g_package VARCHAR2(33) := ' hr_h2pi_upload.';
86: l_from_client_id VARCHAR2(60);
87: l_proc VARCHAR2(72) := g_package||'get_from_client_id';
88:
89: BEGIN
90: hr_utility.set_location('Entering:'|| l_proc, 10);
91: -- special case of getting from client id
92: l_from_client_id := hr_h2pi_map.get_from_id
93: (p_table_name => 'CLIENT_ID',
94: p_to_id => hr_h2pi_upload.g_to_business_group_id);
95: IF l_from_client_id = -1 THEN
96: hr_utility.set_location(l_proc, 20);
97: hr_h2pi_error.data_error
98: (p_from_id => hr_h2pi_upload.g_to_business_group_id,
94: p_to_id => hr_h2pi_upload.g_to_business_group_id);
95: IF l_from_client_id = -1 THEN
96: hr_utility.set_location(l_proc, 20);
97: hr_h2pi_error.data_error
98: (p_from_id => hr_h2pi_upload.g_to_business_group_id,
99: p_table_name => 'HR_H2PI_BG_AND_GRE',
100: p_message_level => 'FATAL',
101: p_message_name => 'HR_289241_MAPPING_ID_MISSING');
102: END IF;
836: fnd_message.raise_error;
837:
838: END upload;
839:
840: END hr_h2pi_upload ;