DBA Data[Home] [Help]

PACKAGE: APPS.FEM_GENDEFAULTS_ENG_PKG

Source


1 PACKAGE FEM_GENDEFAULTS_ENG_PKG AUTHID CURRENT_USER AS
2 --$Header: fem_gendflt_eng.pls 120.0 2006/07/11 18:01:02 rflippo ship $
3 /*==========================================================================+
4  |    Copyright (c) 1997 Oracle Corporation, Redwood Shores, CA, USA        |
5  |                         All rights reserved.                             |
6  +==========================================================================+
7  | FILENAME
8  |
9  |    fem_gendflt_eng.pls
10  |
11  | NAME fem_gendefaults_eng_pkg
12  |
13  | DESCRIPTION
14  |
15  |   Package Spec for the FEM Generate Defaults Engine
16  |      The purpose of this package is to create rapid prototype data for EPF.
17  |      The engine creates the following:
18  |        1)  A starter Cal Period member and Cal Period hierarchy
19  |        2)  A starter Ledger
20  |        3)  A "Default" member for every empty dimension in the database
21  |
22  | FUNCTIONS/PROCEDURES
23  |
24  |  Main
25  | errbuf                       OUT NOCOPY     VARCHAR2
26  | retcode                      OUT NOCOPY     VARCHAR2
27  | NOTES
28  |
29  |
30  | HISTORY
31  |
32  |    07-JUL-06  RFlippo Created
33 +=========================================================================*/
34 
35 ---------------------------------------------
36 --  Package Constants
37 ---------------------------------------------
38    c_block  CONSTANT  VARCHAR2(80) := 'fem.plsql.fem_gendefaults_eng_pkg';
39    c_fem    CONSTANT  VARCHAR2(3)  := 'FEM';
40    c_user_id CONSTANT NUMBER := FND_GLOBAL.USER_ID;
41 
42    c_false        CONSTANT  VARCHAR2(1)      := FND_API.G_FALSE;
43    c_true         CONSTANT  VARCHAR2(1)      := FND_API.G_TRUE;
44    c_success      CONSTANT  VARCHAR2(1)      := FND_API.G_RET_STS_SUCCESS;
45    c_error        CONSTANT  VARCHAR2(1)      := FND_API.G_RET_STS_ERROR;
46    c_unexp        CONSTANT  VARCHAR2(1)      := FND_API.G_RET_STS_UNEXP_ERROR;
47    c_api_version  CONSTANT  NUMBER           := 1.0;
48    c_fetch_limit  CONSTANT  NUMBER           := 99999;
49 
50 
51    c_proc_name CONSTANT VARCHAR2(30) := 'Main';
52 
53    gv_request_id  NUMBER;
54    gv_apps_user_id  CONSTANT NUMBER := FND_GLOBAL.User_Id;
55    gv_login_id   CONSTANT NUMBER   := FND_GLOBAL.Login_Id;
56    gv_pgm_id      CONSTANT NUMBER  := FND_GLOBAL.Conc_Program_Id;
57    gv_pgm_app_id  CONSTANT NUMBER  := FND_GLOBAL.Prog_Appl_ID;
58 
59 
60    gv_concurrent_status BOOLEAN;
61 
62 
63 ---------Message Constants--------------
64 
65 
66 ---------------------------------------
67 ------------------------
68 -- Declare Exceptions --
69 ------------------------
70 
71 ---------------------------------------
72 
73 ---------------------------------------------
74 --  Package Types
75 ---------------------------------------------
76 
77 
78 
79 PROCEDURE Main (
80    errbuf                       OUT NOCOPY     VARCHAR2
81   ,retcode                      OUT NOCOPY     VARCHAR2
82 );
83 
84 
85 
86 END FEM_GENDEFAULTS_ENG_PKG;
87