DBA Data[Home] [Help]

PACKAGE: APPS.BUDGET_INQUIRY_PKG

Source


1 PACKAGE BUDGET_INQUIRY_PKG AS
2 /* $Header: gliiqbds.pls 120.2 2003/04/24 01:29:12 djogg ship $ */
3 --
4 -- Package
5 --   budget_inquiry_pkg
6 -- Purpose
7 --   Package procedures for Budget Inquiry form
8 --   This package contains several Set_xxxx(value) and
9 --   Get_xxxx(value) routines used to initialize and
10 --   retrieve certain database variables. The purpose
11 --   for these procedures and functions is to allow
12 --   outer joins in views from within SQL*Forms.
13 --
14 --   The variables being initialize correspond to the
15 --   selection criteria displayed in the first window
16 --   of the Budget Inquiry form. The user selects a budget
17 --   (budget_version_id), currency (currency_code),
18 --   summary template (template_id, optional), summary code
19 --   combination id (ccid) and units (factor). When the user
20 --   navigates to the balances window, these procedures are called
21 --   to first initialize the values, and then query the appropriate
22 --   rows.
23 -- History
24 --   18-OCT-94	E Wilson	Created
25 --
26   --
27   -- Procedure
28   --   Set_Criteria
29   -- Purpose
30   --   Set the Selection Criteria for Budget Inquiry form
31   -- Arguments
32   --   value    budget version id
33   --            template id
34   --            factor
35   --            code_combination_id
36   --            currency_code
37   --		functional currency code
38   -- Example
39   --   BUDGET_INQUIRY_PKG.Set_Bvid(budget_version_id,....)
40   -- Notes
41   --
42   PROCEDURE set_criteria (X_budget_version_id     NUMBER,
43                           X_template_id           NUMBER,
44                           X_factor                NUMBER,
45                           X_code_combination_id   NUMBER,
46                           X_currency_code         VARCHAR2,
47                           X_funct_curr            VARCHAR2);
48 
49   --
50   -- Procedure
51   --   Set_Ledger_Id
52   -- Purpose
53   --   Set the Selection Criteria for Budget Inquiry form
54   --   accounting_flexfield block
55   -- Arguments
56   --   value    ledger_id
57   -- Example
58   --   BUDGET_INQUIRY_PKG.Set_Ledger_Id(ledger_id,....)
59   -- Notes
60   --
61   PROCEDURE Set_Ledger_Id(X_ledger_id NUMBER);
62 
63   --
64   -- Function
65   --   Get_Ledger_Id
66   -- Purpose
67   --   Retrieve current value of ledger id
68   -- Arguments
69   --   none
70   -- Example
71   --   BUDGET_INQUIRY_PKG.Get_ledger_id;
72   -- Notes
73   --
74   FUNCTION  Get_Ledger_Id RETURN NUMBER;
75 
76   --
77   -- Function
78   --   Get_Bvid
79   -- Purpose
80   --   Retrieve current value of budget version id
81   -- Arguments
82   --   none
83   -- Example
84   --   BUDGET_INQUIRY_PKG.Get_Bvid;
85   -- Notes
86   --
87   FUNCTION  Get_Bvid RETURN NUMBER;
88 
89   --
90   -- Function
91   --   Get_Currency
92   -- Purpose
93   --   Retrieve current value of currency code
94   -- Arguments
95   --   none
96   -- Example
97   --   BUDGET_INQUIRY_PKG.Get_Currency;
98   -- Notes
99   --
100   FUNCTION  Get_Currency RETURN VARCHAR2;
101 
102   --
103   -- Function
104   --   Get_Template_Id
105   -- Purpose
106   --   Retrieve current value of template id
107   -- Arguments
108   --   none
109   -- Example
110   --   BUDGET_INQUIRY_PKG.Get_Template_Id;
111   -- Notes
112   --
113   FUNCTION  Get_Template_Id RETURN NUMBER;
114 
115   --
116   -- Function
117   --   Get_Factor
118   -- Purpose
119   --   Retrieve current value of factor
120   -- Arguments
121   --   none
122   -- Example
123   --   BUDGET_INQUIRY_PKG.Get_Factor;
124   -- Notes
125   --
126   FUNCTION  Get_Factor  RETURN NUMBER;
127 
128   --
129   -- Function
130   --   Get_Funct_Curr
131   -- Purpose
132   --   Retrieve current value of functional currency
133   -- Arguments
134   --   none
135   -- Example
136   --   BUDGET_INQUIRY_PKG.Get_Funct_Curr
137   -- Notes
138   --
139   FUNCTION  Get_Funct_Curr  RETURN VARCHAR2;
140 
141   --
142   -- Function
143   --   Get_Ccid
144   -- Purpose
145   --   Retrieve current value of code combination id
146   -- Arguments
147   --   none
148   -- Example
149   --   BUDGET_INQUIRY_PKG.Get_Ccid;
150   -- Notes
151   --
152   FUNCTION  Get_Ccid  RETURN NUMBER;
153 
154   --
155   -- Procedure
156   --   Check_Detail_Accounts
157   -- Purpose
158   --   Check to see if detail accounting flexfields exist for
159   --   a particular summary account
160   -- Arguments
161   --   X_Code_Combination_Id    Summary account code combination id
162   -- Example
163   --   BUDGET_INQUIRY_PKG.Check_Detail_Accounts(summary_code_combination_id)
164   -- Notes
165   --
166   PROCEDURE Check_Detail_Accounts(X_Code_Combination_Id  NUMBER);
167 
168   PRAGMA RESTRICT_REFERENCES(Set_Criteria, WNDS);
169   PRAGMA RESTRICT_REFERENCES(Set_Ledger_Id, WNDS);
170   PRAGMA RESTRICT_REFERENCES(Get_Ledger_Id, WNDS, WNPS);
171   PRAGMA RESTRICT_REFERENCES(Get_Bvid, WNDS, WNPS);
172   PRAGMA RESTRICT_REFERENCES(Get_Currency, WNDS, WNPS);
173   PRAGMA RESTRICT_REFERENCES(Get_Template_Id, WNDS, WNPS);
174   PRAGMA RESTRICT_REFERENCES(Get_Factor, WNDS, WNPS);
175   PRAGMA RESTRICT_REFERENCES(Get_Funct_Curr, WNDS, WNPS);
176   PRAGMA RESTRICT_REFERENCES(Get_Ccid, WNDS, WNPS);
177 
178 END BUDGET_INQUIRY_PKG;