DBA Data[Home] [Help]

PACKAGE: APPS.FEM_REFRESH_ENG_PKG

Source


1 PACKAGE FEM_REFRESH_ENG_PKG AUTHID CURRENT_USER AS
2 --$Header: fem_refresh_eng.pls 120.0 2005/06/06 19:23:42 appldev noship $
3 /*==========================================================================+
4  |    Copyright (c) 1997 Oracle Corporation, Redwood Shores, CA, USA        |
5  |                         All rights reserved.                             |
6  +==========================================================================+
7  | FILENAME
8  |
9  |    fem_refresh_eng.pls
10  |
11  | NAME fem_refresh_eng_pkg
12  |
13  | DESCRIPTION
14  |
15  |   Package Spec for the FEM Refresh Engine
16  |      The purpose of this package is to return an FEM database
17  |      (which includes tables owned by other teams such as RCM, PFT, etc)
18  |      to the original install state.
19  |
20  | FUNCTIONS/PROCEDURES
21  |
22  |  Main
23  | errbuf                       OUT NOCOPY     VARCHAR2
24  | retcode                      OUT NOCOPY     VARCHAR2
25  | NOTES
26  |
27  |
28  | HISTORY
29  |
30  |    02-MAY-05  RFlippo Created
31 +=========================================================================*/
32 
33 ---------------------------------------------
34 --  Package Constants
35 ---------------------------------------------
36    c_block  CONSTANT  VARCHAR2(80) := 'fem.plsql.fem_refresh_eng_pkg';
37    c_fem    CONSTANT  VARCHAR2(3)  := 'FEM';
38    c_user_id CONSTANT NUMBER := FND_GLOBAL.USER_ID;
39 
40    c_false        CONSTANT  VARCHAR2(1)      := FND_API.G_FALSE;
41    c_true         CONSTANT  VARCHAR2(1)      := FND_API.G_TRUE;
42    c_success      CONSTANT  VARCHAR2(1)      := FND_API.G_RET_STS_SUCCESS;
43    c_error        CONSTANT  VARCHAR2(1)      := FND_API.G_RET_STS_ERROR;
44    c_unexp        CONSTANT  VARCHAR2(1)      := FND_API.G_RET_STS_UNEXP_ERROR;
45    c_api_version  CONSTANT  NUMBER           := 1.0;
46    c_fetch_limit  CONSTANT  NUMBER           := 99999;
47 
48    c_FNDLOAD      CONSTANT  VARCHAR2(30)     := 'FEM_RFSH_FNDLOAD';
49    c_test_lct     CONSTANT  VARCHAR2(100)    := '/patch/115/import/fem_dim.lct';
50    c_test_ldt     CONSTANT  VARCHAR2(100)    := '/patch/115/import/US/fem_dim.ldt';
51 
52    c_proc_name CONSTANT VARCHAR2(30) := 'Main';
53    c_object_id CONSTANT NUMBER := 1350;
54    c_object_definition_id CONSTANT NUMBER := 1350;
55 
56    gv_request_id  NUMBER;
57    gv_apps_user_id  CONSTANT NUMBER := FND_GLOBAL.User_Id;
58    gv_login_id   CONSTANT NUMBER   := FND_GLOBAL.Login_Id;
59    gv_pgm_id      CONSTANT NUMBER  := FND_GLOBAL.Conc_Program_Id;
60    gv_pgm_app_id  CONSTANT NUMBER  := FND_GLOBAL.Prog_Appl_ID;
61 
62 
63    gv_concurrent_status BOOLEAN;
64 
65 
66 ---------Message Constants--------------
67 G_EXEC_LOCK_EXISTS CONSTANT VARCHAR2(30)       := 'FEM_PL_OBJ_EXECLOCK_EXISTS_ERR';
68 G_INVALID_OBJ_DEF CONSTANT VARCHAR2(30)        := 'FEM_DATAX_LDR_BAD_OBJ_ERR';
69 G_EXT_LDR_POST_PROC_ERR CONSTANT VARCHAR2(30)  := 'FEM_EXT_LDR_POST_PROC_ERR';
70 G_EXT_LDR_EXEC_STATUS   CONSTANT VARCHAR2(30)  := 'FEM_EXT_LDR_EXEC_STATUS';
71 G_PL_REG_REQUEST_ERR CONSTANT VARCHAR2(30)     := 'FEM_PL_REG_REQUEST_ERR';
72 G_PL_OBJ_EXEC_LOCK_ERR CONSTANT VARCHAR2(30)  := 'FEM_PL_OBJ_EXEC_LOCK_ERR';
73 
74 
75 ---------------------------------------
76 ------------------------
77 -- Declare Exceptions --
78 ------------------------
79 
80 ---------------------------------------
81 
82 ---------------------------------------------
83 --  Package Types
84 ---------------------------------------------
85 
86 
87 
88 PROCEDURE Main (
89    errbuf                       OUT NOCOPY     VARCHAR2
90   ,retcode                      OUT NOCOPY     VARCHAR2
91 );
92 
93 
94 
95 END FEM_REFRESH_ENG_PKG;
96