PACKAGE BODY: APPS.HXC_MAP_UPLOAD_PKG

Source

1 PACKAGE BODY hxc_map_upload_pkg AS
2 /* $Header: hxcmapupl.pkb 115.5 2002/06/10 00:37:46 pkm ship      $ */
3 
4 PROCEDURE load_mapping_row (
5           p_name                IN VARCHAR2
6 	, p_owner		IN VARCHAR2
7 	, p_custom_mode		IN VARCHAR2 ) IS
8 
9 l_mapping_id		hxc_mappings.mapping_id%TYPE;
10 l_ovn			hxc_mappings.object_version_number%TYPE;
11 l_owner			VARCHAR2(6);
12 
13 BEGIN
14 
15 	SELECT	mapping_id
16 	,	object_version_number
17 	,	DECODE( NVL(last_updated_by,-1), 1, 'SEED', 'CUSTOM')
18 	INTO	l_mapping_id
19 	,	l_ovn
20 	,	l_owner
21 	FROM	hxc_mappings
22 	WHERE	name	= P_NAME;
23 
24 -- NOTE - there is no update section since there is nothing to update
25 
26 EXCEPTION WHEN NO_DATA_FOUND
27 THEN
28 
29 	hxc_map_ins.ins( p_mapping_id            => l_mapping_id
30 	,		 p_object_version_number => l_ovn
31 	,		 p_name                  => p_name );
32 
33 END load_mapping_row;
34 
35 END hxc_map_upload_pkg;