1 PACKAGE FII_BUDGET_FORECAST_C AS
2 /* $Header: FIIBUUPS.pls 120.5 2005/10/30 05:07:41 appldev noship $ */
3
4 --
5 -- PUBLIC VARIABLES
6 --
7 FIIBUUP_PRIM_CURR_CODE VARCHAR2(15) := NULL;
8 FIIBUUP_SEC_CURR_CODE VARCHAR2(15) := NULL;
9 FIIBUUP_PRIM_CURR_MAU NUMBER := NULL;
10 FIIBUUP_SEC_CURR_MAU NUMBER := NULL;
11 FIIBUUP_BUDGET_TIME_UNIT VARCHAR2(1) := NULL;
12 FIIBUUP_FORECAST_TIME_UNIT VARCHAR2(1) := NULL;
13 FIIBUUP_USER_ID NUMBER(15) := NULL;
14 FIIBUUP_LOGIN_ID NUMBER(15) := NULL;
15 FIIBUUP_REQ_ID NUMBER(15) := NULL;
16 FIIBUUP_DEBUG BOOLEAN := FALSE;
17 FIIBUUP_PURGE_PLAN_TYPE VARCHAR2(1) := NULL;
18 FIIBUUP_PURGE_TIME_UNIT VARCHAR2(1) := NULL;
19 FIIBUUP_PURGE_DATE DATE := NULL;
20 FIIBUUP_PURGE_EFF_DATE DATE := NULL;
21 FIIBUUP_PURGE_TIME_PERIOD VARCHAR2(100):= NULL;
22 FIIBUUP_GLOBAL_START_DATE DATE := NULL;
23 FIIBUUP_UNASSIGNED_UDD_ID NUMBER(15) := NULL;
24
25 --
26 -- PUBLIC PROCEDURES
27
28 --
29 -- Procedure
30 -- Main
31 -- Purpose
32 -- This is the main routine of the DBI budget upload program
33 -- History
34 -- 05-03-02 S Kung Created
35 -- Arguments
36 -- X_Mode: Mode of Operation. Either U (Upload) or P (Purge)
37 -- X_Plan_Type : Plan type to operate on. Either B (Budget),
38 -- F (Forecast) or A (Both). Used only in Purge.
39 -- X_Time_Unit : Either D (Daily), P (Period), Q (Quarter) or Y (Year).
40 -- Used only in Purge.
41 -- X_Date : Purge date
42 -- X_Time_Period : Purge time period (other than date)
43 -- X_Debug : Debug mode indicator
44 -- Example
45 -- result := FII_BUDGET_FORECAST_C.Main;
46 -- Notes
47 --
48 PROCEDURE Main( X_Mode IN VARCHAR2,
49 X_Plan_Type IN VARCHAR2 DEFAULT NULL,
50 X_Time_Unit IN VARCHAR2 DEFAULT NULL,
51 X_Purge_Date IN VARCHAR2 DEFAULT NULL,
52 X_Purge_Time_Period IN VARCHAR2 DEFAULT NULL,
53 X_Purge_Eff_Date IN VARCHAR2 DEFAULT NULL,
54 X_Debug IN VARCHAR2 DEFAULT NULL);
55
56 --
57 -- Procedure
58 -- Upload
59 -- Purpose
60 -- This is the concurrent job version of the Upload program. This will
61 -- be used when submitting the program through forms.
62 -- History
63 -- 05-03-02 S Kung Created
64 -- Arguments
65 -- X_Debug: Debug Mode indicator
66 -- Example
67 -- result := FII_BUDGET_FORECAST_C.Upload(errbuf, retcode);
68 -- Notes
69 --
70 PROCEDURE Upload(errbuf OUT NOCOPY VARCHAR2,
71 retcode OUT NOCOPY VARCHAR2,
72 X_Debug IN VARCHAR2 DEFAULT NULL);
73
74
75 --
76 -- Procedure
77 -- Purge
78 -- Purpose
79 -- This is the concurrent job version of the Purge program. This will be
80 -- used when submitting the program through forms.
81 -- History
82 -- 05-03-02 S Kung Created
83 -- Arguments
84 -- X_Plan_Type : Plan type to operate on. Either B (Budget)
85 -- or F (Forecast). Used only in Purge.
86 -- X_Time_Unit : Either D (Daily), P (Period), Q (Quarter), Y (Year),
87 -- or A (All). Used only in Purge.
88 -- X_Date : Purge date
89 -- X_Time_Period : Purge time period (other than date)
90 -- X_Debug : Debug mode indicator
91 -- Example
92 -- result := FII_BUDGET_FORECAST_C.Purge
93 -- (errbuf, retcode, 'B', 'P', 'Jan-01');
94 -- Notes
95 --
96 PROCEDURE Purge(errbuf OUT NOCOPY VARCHAR2,
97 retcode OUT NOCOPY VARCHAR2,
98 X_Plan_Type IN VARCHAR2 DEFAULT NULL,
99 X_Time_Unit IN VARCHAR2 DEFAULT NULL,
100 X_Purge_Date IN VARCHAR2 DEFAULT NULL,
101 X_Purge_Time_Period IN VARCHAR2 DEFAULT NULL,
102 X_Purge_Eff_Date IN VARCHAR2 DEFAULT NULL,
103 X_Debug IN VARCHAR2 DEFAULT NULL);
104
105
106 END FII_BUDGET_FORECAST_C;
107