[Home] [Help]
PACKAGE: APPS.OKE_FUNDSOURCE_PVT
Source
1 package OKE_FUNDSOURCE_PVT as
2 /* $Header: OKEVKFDS.pls 120.0 2005/05/25 17:46:21 appldev noship $ */
3
4
5 --
6 -- Global variables
7 --
8
9 G_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
10 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKE_FUNDSOURCE_PVT';
11 G_APP_NAME CONSTANT VARCHAR2(3) := OKE_API.G_APP_NAME;
12 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
13 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
14 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKE_CONTRACTS_UNEXPECTED_ERROR';
15 G_OBJECT_TYPE CONSTANT VARCHAR2(30) := 'OKE_K_HEADERS';
16 G_PRODUCT_CODE CONSTANT VARCHAR2(3) := 'OKE';
17 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
18 G_RESOURCE_BUSY EXCEPTION;
19 PRAGMA EXCEPTION_INIT(G_RESOURCE_BUSY, -54);
20
21
22 --
23 -- Funding_Rec_In_Type
24 --
25
26 TYPE funding_rec_in_type is RECORD
27 (funding_source_id NUMBER := OKE_API.G_MISS_NUM ,
28 object_type VARCHAR(30) := OKE_API.G_MISS_CHAR ,
29 object_id NUMBER := OKE_API.G_MISS_NUM ,
30 pool_party_id NUMBER := OKE_API.G_MISS_NUM ,
31 k_party_id NUMBER := OKE_API.G_MISS_NUM ,
32 customer_id NUMBER := OKE_API.G_MISS_NUM ,
33 customer_number VARCHAR2(30) := OKE_API.G_MISS_CHAR ,
34 amount NUMBER := OKE_API.G_MISS_NUM ,
35 hard_limit NUMBER := OKE_API.G_MISS_NUM ,
36 funding_status VARCHAR2(30) := OKE_API.G_MISS_CHAR ,
37 currency_code VARCHAR2(15) := OKE_API.G_MISS_CHAR ,
38 k_conversion_type VARCHAR2(30) := OKE_API.G_MISS_CHAR ,
39 k_conversion_date DATE := OKE_API.G_MISS_DATE ,
40 k_conversion_rate NUMBER := OKE_API.G_MISS_NUM ,
41 start_date_active DATE := OKE_API.G_MISS_DATE ,
42 end_date_active DATE := OKE_API.G_MISS_DATE ,
43 -- agreement_flag VARCHAR2(1) := OKE_API.G_MISS_CHAR ,
44 agreement_number VARCHAR2(50) := OKE_API.G_MISS_CHAR ,
45 -- oke_desc_flex_name VARCHAR2(240) := OKE_API.G_MISS_CHAR ,
46 oke_attribute_category VARCHAR2(30) := OKE_API.G_MISS_CHAR ,
47 oke_attribute1 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
48 oke_attribute2 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
49 oke_attribute3 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
50 oke_attribute4 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
51 oke_attribute5 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
52 oke_attribute6 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
53 oke_attribute7 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
54 oke_attribute8 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
55 oke_attribute9 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
56 oke_attribute10 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
57 oke_attribute11 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
58 oke_attribute12 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
59 oke_attribute13 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
60 oke_attribute14 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
61 oke_attribute15 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
62 pa_attribute_category VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
63 pa_attribute1 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
64 pa_attribute2 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
65 pa_attribute3 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
66 pa_attribute4 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
67 pa_attribute5 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
68 pa_attribute6 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
69 pa_attribute7 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
70 pa_attribute8 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
71 pa_attribute9 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
72 pa_attribute10 VARCHAR2(150) := OKE_API.G_MISS_CHAR ,
73 revenue_hard_limit NUMBER := OKE_API.G_MISS_NUM ,
74 agreement_org_id NUMBER := OKE_API.G_MISS_NUM
75 );
76
77
78 --
79 -- Funding_Rec_Out_Type
80 --
81
82 TYPE funding_rec_out_type is RECORD
83 (funding_source_id NUMBER := OKE_API.G_MISS_NUM ,
84 return_status VARCHAR2(1) := OKE_API.G_MISS_CHAR
85 );
86
87
88 --
89 -- Procedure: create_funding
90 --
91 -- Description: This procedure is used to insert record in OKE_K_FUNDING_SOURCES table
92 --
93 --
94
95 PROCEDURE create_funding(p_api_version IN NUMBER ,
96 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
97 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
98 p_msg_count OUT NOCOPY NUMBER ,
99 p_msg_data OUT NOCOPY VARCHAR2 ,
100 p_funding_in_rec IN FUNDING_REC_IN_TYPE ,
101 p_funding_out_rec OUT NOCOPY FUNDING_REC_OUT_TYPE ,
102 p_return_status OUT NOCOPY VARCHAR2
103 );
104
105
106 --
107 -- Procedure: update_funding
108 --
109 -- Description: This procedure is used to update record in OKE_FUNDING_SOURCES table
110 --
111 --
112
113 PROCEDURE update_funding(p_api_version IN NUMBER ,
114 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
115 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
116 p_msg_count OUT NOCOPY NUMBER ,
117 p_msg_data OUT NOCOPY VARCHAR2 ,
118 p_funding_in_rec IN FUNDING_REC_IN_TYPE ,
119 p_funding_out_rec OUT NOCOPY FUNDING_REC_OUT_TYPE ,
120 p_return_status OUT NOCOPY VARCHAR2
121 );
122
123
124 --
125 -- Procedure: delete_funding
126 --
127 -- Description: This procedure is used to delete record in OKE_K_FUNDING_SOURCES and PA_PROJECT_FUNDINGS tables
128 --
129 --
130
131 PROCEDURE delete_funding(p_api_version IN NUMBER ,
132 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
133 p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
134 p_msg_count OUT NOCOPY NUMBER ,
135 p_msg_data OUT NOCOPY VARCHAR2 ,
136 p_funding_source_id IN NUMBER ,
137 -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
138 p_return_status OUT NOCOPY VARCHAR2
139 );
140
141
142 --
143 -- Procedure: fetch_create_funding
144 --
145 -- Description: This procedure is used to get the existing agreement record
146 -- and create a funding record in OKE
147 --
148 --
149
150 PROCEDURE fetch_create_funding(p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
151 p_api_version IN NUMBER ,
152 p_msg_count OUT NOCOPY NUMBER ,
153 p_msg_data OUT NOCOPY VARCHAR2 ,
154 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
155 p_pool_party_id IN NUMBER ,
156 p_customer_id IN NUMBER ,
157 p_customer_number IN VARCHAR2 ,
158 --p_pool_currency IN VARCHAR2 ,
159 --p_source_currency IN VARCHAR2 ,
160 p_party_id IN NUMBER ,
161 p_agreement_id IN NUMBER ,
162 p_org_id IN NUMBER ,
163 p_agreement_number IN VARCHAR2 ,
164 p_agreement_type IN VARCHAR2 ,
165 p_amount IN NUMBER ,
166 p_revenue_limit_flag IN VARCHAR2 ,
167 p_agreement_currency IN VARCHAR2 ,
168 p_expiration_date IN DATE ,
169 p_conversion_type IN VARCHAR2 ,
170 p_conversion_date IN DATE ,
171 p_conversion_rate IN NUMBER ,
172 --p_pa_conversion_type IN VARCHAR2 ,
173 --p_pa_conversion_date IN DATE ,
174 --p_pa_conversion_rate IN NUMBER ,
175 p_k_header_id IN NUMBER ,
176 p_pa_attribute_category IN VARCHAR2 ,
177 p_pa_attribute1 IN VARCHAR2 ,
178 p_pa_attribute2 IN VARCHAR2 ,
179 p_pa_attribute3 IN VARCHAR2 ,
180 p_pa_attribute4 IN VARCHAR2 ,
181 p_pa_attribute5 IN VARCHAR2 ,
182 p_pa_attribute6 IN VARCHAR2 ,
183 p_pa_attribute7 IN VARCHAR2 ,
184 p_pa_attribute8 IN VARCHAR2 ,
185 p_pa_attribute9 IN VARCHAR2 ,
186 p_pa_attribute10 IN VARCHAR2 ,
187 p_owning_organization_id IN NUMBER ,
188 p_invoice_limit_flag IN VARCHAR2 ,
189 -- p_functional_currency_code IN VARCHAR2 ,
190 -- p_allow_currency_update IN VARCHAR2 ,
191 p_funding_source_id OUT NOCOPY NUMBER ,
192 p_return_status OUT NOCOPY VARCHAR2
193 );
194
195
196 PROCEDURE fetch_create_funding(p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
197 p_api_version IN NUMBER ,
198 p_msg_count OUT NOCOPY NUMBER ,
199 p_msg_data OUT NOCOPY VARCHAR2 ,
200 p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
201 p_pool_party_id IN NUMBER ,
202 p_party_id IN NUMBER ,
203 -- p_source_currency IN VARCHAR2 ,
204 p_agreement_id IN NUMBER ,
205 p_conversion_type IN VARCHAR2 ,
206 p_conversion_date IN DATE ,
207 p_conversion_rate IN NUMBER ,
208 --p_pa_conversion_type IN VARCHAR2 ,
209 --p_pa_conversion_date IN DATE ,
210 -- p_pa_conversion_rate IN NUMBER ,
211 p_k_header_id IN NUMBER ,
212 p_funding_source_id OUT NOCOPY NUMBER ,
213 p_return_status OUT NOCOPY VARCHAR2
214 );
215
216
217 --
218 -- Function: get_funding_rec
219 --
220 -- Description: This function initializes a record of funding_rec_in_type
221 --
222
223 FUNCTION get_funding_rec RETURN FUNDING_REC_IN_TYPE;
224
225 end OKE_FUNDSOURCE_PVT;