PACKAGE BODY: APPS.IGC_CC_VERSION_VIEW_PKG

Source

1 PACKAGE BODY IGC_CC_VERSION_VIEW_PKG AS
2 /*$Header: IGCCVVWB.pls 120.2.12000000.1 2007/08/20 12:15:01 mbremkum ship $*/
3 
4 /*=======================================================================+
5  |                       PROCEDURE Initialize_View                       |
6  +=======================================================================*/
7 
8 PROCEDURE Initialize_View (p_version_num   IN NUMBER) IS
9 
10   BEGIN
11     g_version_num := p_version_num;
12   END Initialize_View;
13 
14 /*=======================================================================+
15  |                       PROCEDURE Get_Version_Num                       |
16  +=======================================================================*/
17 
18 FUNCTION Get_Version_Num RETURN NUMBER IS
19 
20   BEGIN
21      Return g_version_num;
22   END Get_Version_Num;
23 
24 /* ----------------------------------------------------------------------- */
25 
26 END IGC_CC_VERSION_VIEW_PKG;