DBA Data[Home] [Help]

PACKAGE: APPS.MSC_PURGE_LID

Source


1 PACKAGE  MSC_PURGE_LID AS
2 /*$Header: MSCPPURS.pls 120.1 2007/04/12 08:05:23 rsyadav ship $ */
3 -- ================== CONSTANTS =====================
4   G_ST_EMPTY 			                   CONSTANT NUMBER:= 0;
5   G_ST_PULLING                       CONSTANT NUMBER:= 1;
6   G_ST_READY                         CONSTANT NUMBER:= 2;
7   G_ST_COLLECTING                    CONSTANT NUMBER:= 3;
8   G_ST_PURGING                       CONSTANT NUMBER:= 4;
9   G_ST_PRE_PROCESSING                CONSTANT NUMBER:= 5;
10   G_INS_OTHER                        CONSTANT NUMBER:= 3;
11   G_INS_EXCH                         CONSTANT NUMBER:= 5;
12 
13   G_ERROR                            CONSTANT NUMBER:= 2;
14   G_SUCCESS                          CONSTANT NUMBER:= 0;
15 
16   ----- CONSTANTS --------------------------------------------------------
17   SYS_YES                           CONSTANT NUMBER := 1;
18   SYS_NO                            CONSTANT NUMBER := 2;
19 
20 
21 
22 --  ================= Procedures ====================
23   PROCEDURE PURGE_LID_TABLES(ERRBUF              OUT NOCOPY VARCHAR2,
24                              RETCODE             OUT NOCOPY NUMBER,
25                              p_instance_id       IN  NUMBER,
26                              p_complete_refresh  IN  NUMBER     DEFAULT SYS_NO,
27                              p_date              IN  VARCHAR2,
28                              p_supply_flag       IN  NUMBER     DEFAULT SYS_NO,
29                              p_demand_flag       IN  NUMBER     DEFAULT SYS_NO);
30 
31 
32 PROCEDURE PURGE_ODS_TABLES_DEL( p_instance_id     IN  NUMBER);
33 
34 -- Added for purge_instance_plan_data, purge_instance_data and purge_plan_data
35 
36   TYPE tblTyp IS TABLE OF NUMBER;
37 
38   PROCEDURE PURGE_INSTANCE_DATA(  ERRBUF        OUT NOCOPY VARCHAR2,
39 
40                                   RETCODE       OUT NOCOPY NUMBER,
41 
42                                   pInstList     tblTyp);
43 
44 
45 
46   PROCEDURE PURGE_PLAN_DATA(  ERRBUF        OUT NOCOPY VARCHAR2,
47 
48                               RETCODE       OUT NOCOPY NUMBER,
49 
50                              pPlanList     tblTyp);
51 
52 
53 
54   PROCEDURE PURGE_INSTANCE_PLAN_DATA( ERRBUF        OUT NOCOPY VARCHAR2,
55 
56                                     RETCODE       OUT NOCOPY NUMBER,
57 
58                                     pInstanceId   NUMBER,
59 
60                                     pPlanId       NUMBER) ;
61 
62 
63 END MSC_PURGE_LID;