1 PACKAGE BODY FII_CCID_CALLOUT AS
2 /* $Header: FIIGLUCB.pls 120.1 2005/10/30 05:13:38 appldev noship $ */
3 g_debug_mode VARCHAR2(1) := NVL(FND_PROFILE.value('FII_DEBUG_MODE'), 'N');
4
5
6 -- *******************************************************************
7 -- Procedure UPDATE_FC.
8 -- *******************************************************************
9
10 PROCEDURE UPDATE_FC (p_from_ccid IN NUMBER,
11 p_to_ccid IN NUMBER
12 ) IS
13
14 BEGIN
15
16 IF (g_debug_mode = 'Y') THEN
17 FII_MESSAGE.Func_Ent ('FII_CCID_CALLOUT.UPDATE_FC');
18 END IF;
19
20 -- Print the values of the parameters
21 IF (g_debug_mode = 'Y') THEN
22 FII_UTIL.Write_Log('Value of p_from_ccid : '||p_from_ccid);
23 FII_UTIL.Write_Log('Value of p_to_ccid : '||p_to_ccid);
24 end if;
25
26 -----------------------------------------------------------------
27 -- At this place the customised code will be put in place of NULL
28 -- This piece of code will update records with CCID between
29 -- p_from_ccid and p_to_ccid
30 -----------------------------------------------------------------
31
32 NULL;
33
34 IF (g_debug_mode = 'Y') THEN
35 FII_MESSAGE.Func_Succ(func_name => 'FII_CCID_CALLOUT.UPDATE_FC');
36 end if;
37
38 Exception
39 When others then
40 FII_UTIL.Write_Log ('Unexpected error when calling UPDATE_FC...');
41 FII_UTIL.Write_Log ('Error Message: '|| substr(sqlerrm,1,180));
42 raise;
43
44
45 END UPDATE_FC;
46
47 END FII_CCID_CALLOUT;