1 PACKAGE BODY PA_DEINSTALL_DIM AS
2 /* $Header: PAADWDDB.pls 115.0 99/07/16 13:22:11 porting ship $ */
3
4 --- This procedure deinstalls Dimensions(dummy procedure for compiling paadwdim.fmb form
5 --- when oadw is not installed)
6
7 PROCEDURE deinstall_dimension(x_task_proj_flag Varchar2,
8 x_dimension_id Varchar2,
9 x_freeze_flag IN OUT Varchar2,
10 x_err_stage IN OUT varchar2,
11 x_err_stack IN OUT varchar2,
12 x_err_code IN OUT number)
13
14 IS
15 BEGIN
16 null;
17 EXCEPTION
18 WHEN OTHERS THEN
19 x_err_code := SQLCODE ;
20 RAISE ;
21 END;
22
23 END PA_DEINSTALL_DIM;