PACKAGE BODY: APPS.RLM_CUM_UPGRADE_SV

Source

1 PACKAGE BODY RLM_CUM_UPGRADE_SV AS
2 /* $Header: RLMCMUPB.pls 120.0 2005/05/26 17:13:34 appldev noship $ */
3 
4 --
5 l_DEBUG NUMBER := NVL(fnd_profile.value('RLM_DEBUG_MODE'),-1);
6 --
7 /*=============================================================================
8 
9 PACKAGE NAME: 		rlm_cum_upgrade_sv
10 
11 
12 DESCRIPTION:		Upgrade API
13 
14 CLIENT/SERVER:		Server
15 
16 LIBRARY NAME:		None
17 
18 OWNER:			MPAREKH
19 
20 PROCEDURE/FUNCTION: 	UpgradeCumHistory
21 
22 
23 =============================================================================*/
24 
25 
26 
27 /*=============================================================================
28 
29 PROCEDURE NAME: UpgradeCumHistory
30 
31 DESCRIPTION:
32 
33 
34 PARAMETERS:
35 =============================================================================*/
36 
37 -- Procedure UpgradeCumHistory
38 
39 PROCEDURE UpgradeCumHistory
40  IS
41 
42 v_ReturnStatus BOOLEAN;
43 
44 
45 BEGIN
46 
47   IF (l_debug <> -1) THEN
48      rlm_core_sv.start_debug;
49      rlm_core_sv.dpush(C_SDEBUG,'UpgradeCumHistory');
50      rlm_core_sv.dpop(C_DEBUG,'Reset cum completed');
51      rlm_core_sv.stop_debug;
52   END IF;
53 
54 END UpgradeCumHistory;
55 
56 END RLM_CUM_UPGRADE_SV;