DBA Data[Home] [Help]

PACKAGE BODY: APPS.OTA_FINANCE_LINE_API

Source


1 PACKAGE BODY OTA_FINANCE_LINE_API as
2     /* $Header: ottflapi.pkb 120.1 2005/08/10 15:12:41 asud noship $ */
3 --
4 -- Package Variables
5 --
6 g_package  varchar2(33) := 'OTA_FINANCE_LINE_API.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-------------------------< CREATE_FINANCE_LINE >--------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure CREATE_FINANCE_LINE(
13 P_FINANCE_LINE_ID                   OUT NOCOPY  NUMBER,
14 P_FINANCE_HEADER_ID                 IN  NUMBER,
15 P_CANCELLED_FLAG                    IN  VARCHAR2,
16 P_DATE_RAISED                       IN OUT NOCOPY DATE,
17 P_LINE_TYPE                         IN  VARCHAR2,
18 P_OBJECT_VERSION_NUMBER             OUT NOCOPY  NUMBER,
19 P_SEQUENCE_NUMBER                   IN OUT NOCOPY NUMBER,
20 P_TRANSFER_STATUS                   IN  VARCHAR2,
21 P_COMMENTS                          IN  VARCHAR2,
22 P_CURRENCY_CODE                     IN  VARCHAR2,
23 P_MONEY_AMOUNT                      IN  NUMBER,
24 P_STANDARD_AMOUNT                   IN  NUMBER,
25 P_TRANS_INFORMATION_CATEGORY        IN  VARCHAR2,
26 P_TRANS_INFORMATION1                IN  VARCHAR2,
27 P_TRANS_INFORMATION10               IN  VARCHAR2,
28 P_TRANS_INFORMATION11               IN  VARCHAR2,
29 P_TRANS_INFORMATION12               IN  VARCHAR2,
30 P_TRANS_INFORMATION13               IN  VARCHAR2,
31 P_TRANS_INFORMATION14               IN  VARCHAR2,
32 P_TRANS_INFORMATION15               IN  VARCHAR2,
33 P_TRANS_INFORMATION16               IN  VARCHAR2,
34 P_TRANS_INFORMATION17               IN  VARCHAR2,
35 P_TRANS_INFORMATION18               IN  VARCHAR2,
36 P_TRANS_INFORMATION19               IN  VARCHAR2,
37 P_TRANS_INFORMATION2                IN  VARCHAR2,
38 P_TRANS_INFORMATION20               IN  VARCHAR2,
39 P_TRANS_INFORMATION3                IN  VARCHAR2,
40 P_TRANS_INFORMATION4                IN  VARCHAR2,
41 P_TRANS_INFORMATION5                IN  VARCHAR2,
42 P_TRANS_INFORMATION6                IN  VARCHAR2,
43 P_TRANS_INFORMATION7                IN  VARCHAR2,
44 P_TRANS_INFORMATION8                IN  VARCHAR2,
45 P_TRANS_INFORMATION9                IN  VARCHAR2,
46 P_TRANSFER_DATE                     IN  DATE  ,
47 P_TRANSFER_MESSAGE                  IN  VARCHAR2,
48 P_UNITARY_AMOUNT                    IN  NUMBER,
49 P_BOOKING_DEAL_ID                   IN  NUMBER,
50 P_BOOKING_ID                        IN  NUMBER,
51 P_RESOURCE_ALLOCATION_ID            IN  NUMBER,
52 P_RESOURCE_BOOKING_ID           IN  NUMBER,
53 P_LAST_UPDATE_DATE                  IN  DATE,
54 P_LAST_UPDATED_BY                   IN  NUMBER,
55 P_LAST_UPDATE_LOGIN                 IN  NUMBER,
56 P_CREATED_BY                        IN  NUMBER,
57 P_CREATION_DATE                     IN  DATE   ,
58 P_TFL_INFORMATION_CATEGORY          IN  VARCHAR2,
59 P_TFL_INFORMATION1                  IN  VARCHAR2,
60 P_TFL_INFORMATION2                  IN  VARCHAR2,
61 P_TFL_INFORMATION3                  IN  VARCHAR2,
62 P_TFL_INFORMATION4                  IN  VARCHAR2,
63 P_TFL_INFORMATION5                  IN  VARCHAR2,
64 P_TFL_INFORMATION6                  IN  VARCHAR2,
65 P_TFL_INFORMATION7                  IN  VARCHAR2,
66 P_TFL_INFORMATION8                  IN  VARCHAR2,
67 P_TFL_INFORMATION9                  IN  VARCHAR2,
68 P_TFL_INFORMATION10                 IN  VARCHAR2,
69 P_TFL_INFORMATION11                 IN  VARCHAR2,
70 P_TFL_INFORMATION12                 IN  VARCHAR2,
71 P_TFL_INFORMATION13                 IN  VARCHAR2,
72 P_TFL_INFORMATION14                 IN  VARCHAR2,
73 P_TFL_INFORMATION15                 IN  VARCHAR2,
74 P_TFL_INFORMATION16                 IN  VARCHAR2,
75 P_TFL_INFORMATION17                 IN  VARCHAR2,
76 P_TFL_INFORMATION18                 IN  VARCHAR2,
77 P_TFL_INFORMATION19                 IN  VARCHAR2,
78 P_TFL_INFORMATION20                 IN  VARCHAR2,
79 P_VALIDATE                          IN	boolean  default false,
80 P_EFFECTIVE_DATE                    IN  DATE
81   ) is
82   --
83   -- Declare cursors and local variables
84   --
85   l_proc                    varchar2(72) := g_package||' Create Finance Line';
86   l_finance_line_id number;
87   l_object_version_number   number;
88   l_effective_date          date;
89   l_name varchar2(80);
90 begin
91   hr_utility.set_location('Entering:'|| l_proc, 10);
92   --
93   -- Issue a savepoint
94   --
95   savepoint CREATE_FINANCE_LINE;
96   --
97   -- Truncate the time portion from all IN date parameters
98   --
99  l_effective_date := trunc(p_effective_date);
100   --
101   -- Call Before Process User Hook
102   --
103 
104   begin
105     OTA_FINANCE_LINE_BK1.CREATE_FINANCE_LINE_B
106   (
107 P_FINANCE_HEADER_ID               => 	 P_FINANCE_HEADER_ID,
108 P_CANCELLED_FLAG                  => 	 P_CANCELLED_FLAG,
109 P_DATE_RAISED                     => 	 P_DATE_RAISED,
110 P_LINE_TYPE                       => 	 P_LINE_TYPE,
111 P_SEQUENCE_NUMBER                 => 	 P_SEQUENCE_NUMBER,
112 P_TRANSFER_STATUS                 => 	 P_TRANSFER_STATUS,
113 P_COMMENTS                        => 	 P_COMMENTS,
114 P_CURRENCY_CODE                   => 	 P_CURRENCY_CODE,
115 P_MONEY_AMOUNT                    => 	 P_MONEY_AMOUNT,
116 P_STANDARD_AMOUNT                 => 	 P_STANDARD_AMOUNT,
117 P_TRANS_INFORMATION_CATEGORY      => 	 P_TRANS_INFORMATION_CATEGORY,
118 P_TRANS_INFORMATION1              => 	 P_TRANS_INFORMATION1,
119 P_TRANS_INFORMATION10             => 	 P_TRANS_INFORMATION10,
120 P_TRANS_INFORMATION11             => 	 P_TRANS_INFORMATION11,
121 P_TRANS_INFORMATION12             => 	 P_TRANS_INFORMATION12,
122 P_TRANS_INFORMATION13             => 	 P_TRANS_INFORMATION13,
123 P_TRANS_INFORMATION14             => 	 P_TRANS_INFORMATION14,
124 P_TRANS_INFORMATION15             => 	 P_TRANS_INFORMATION15,
125 P_TRANS_INFORMATION16             => 	 P_TRANS_INFORMATION16,
126 P_TRANS_INFORMATION17             => 	 P_TRANS_INFORMATION17,
127 P_TRANS_INFORMATION18             => 	 P_TRANS_INFORMATION18,
128 P_TRANS_INFORMATION19             => 	 P_TRANS_INFORMATION19,
129 P_TRANS_INFORMATION2              => 	 P_TRANS_INFORMATION2,
130 P_TRANS_INFORMATION20             => 	 P_TRANS_INFORMATION20,
131 P_TRANS_INFORMATION3              => 	 P_TRANS_INFORMATION3,
132 P_TRANS_INFORMATION4              => 	 P_TRANS_INFORMATION4,
133 P_TRANS_INFORMATION5              => 	 P_TRANS_INFORMATION5,
134 P_TRANS_INFORMATION6              => 	 P_TRANS_INFORMATION6,
135 P_TRANS_INFORMATION7              => 	 P_TRANS_INFORMATION7,
136 P_TRANS_INFORMATION8              => 	 P_TRANS_INFORMATION8,
137 P_TRANS_INFORMATION9              => 	 P_TRANS_INFORMATION9,
138 P_TRANSFER_DATE                   => 	 P_TRANSFER_DATE,
139 P_TRANSFER_MESSAGE                => 	 P_TRANSFER_MESSAGE,
140 P_UNITARY_AMOUNT                  => 	 P_UNITARY_AMOUNT,
141 P_BOOKING_DEAL_ID                 => 	 P_BOOKING_DEAL_ID,
142 P_BOOKING_ID                      => 	 P_BOOKING_ID,
143 P_RESOURCE_ALLOCATION_ID          => 	 P_RESOURCE_ALLOCATION_ID,
144 P_RESOURCE_BOOKING_ID         => 	 P_RESOURCE_BOOKING_ID,
145 	P_LAST_UPDATE_DATE                => 	 P_LAST_UPDATE_DATE,
146 	P_LAST_UPDATED_BY                 => 	 P_LAST_UPDATED_BY,
147 	P_LAST_UPDATE_LOGIN               => 	 P_LAST_UPDATE_LOGIN,
148 	P_CREATED_BY                      => 	 P_CREATED_BY,
149 	P_CREATION_DATE                   => 	 P_CREATION_DATE,
150 P_TFL_INFORMATION_CATEGORY        => 	 P_TFL_INFORMATION_CATEGORY,
151 P_TFL_INFORMATION1                => 	 P_TFL_INFORMATION1,
152 P_TFL_INFORMATION2                => 	 P_TFL_INFORMATION2,
153 P_TFL_INFORMATION3                => 	 P_TFL_INFORMATION3,
154 P_TFL_INFORMATION4                => 	 P_TFL_INFORMATION4,
155 P_TFL_INFORMATION5                => 	 P_TFL_INFORMATION5,
156 P_TFL_INFORMATION6                => 	 P_TFL_INFORMATION6,
157 P_TFL_INFORMATION7                => 	 P_TFL_INFORMATION7,
158 P_TFL_INFORMATION8                => 	 P_TFL_INFORMATION8,
159 P_TFL_INFORMATION9                => 	 P_TFL_INFORMATION9,
160 P_TFL_INFORMATION10               => 	 P_TFL_INFORMATION10,
161 P_TFL_INFORMATION11               => 	 P_TFL_INFORMATION11,
162 P_TFL_INFORMATION12               => 	 P_TFL_INFORMATION12,
163 P_TFL_INFORMATION13               => 	 P_TFL_INFORMATION13,
164 P_TFL_INFORMATION14               => 	 P_TFL_INFORMATION14,
165 P_TFL_INFORMATION15               => 	 P_TFL_INFORMATION15,
166 P_TFL_INFORMATION16               => 	 P_TFL_INFORMATION16,
167 P_TFL_INFORMATION17               => 	 P_TFL_INFORMATION17,
168 P_TFL_INFORMATION18               => 	 P_TFL_INFORMATION18,
169 P_TFL_INFORMATION19               => 	 P_TFL_INFORMATION19,
170 P_TFL_INFORMATION20               => 	 P_TFL_INFORMATION20,
171 P_EFFECTIVE_DATE                  => 	 P_EFFECTIVE_DATE
172 
173    );
174   exception
175     when hr_api.cannot_find_prog_unit then
176       hr_api.cannot_find_prog_unit_error
177         (p_module_name => 'CREATE_FINANCE_LINE'
178         ,p_hook_type   => 'BP'
179         );
180   end;
181 
182      ota_tfl_api_ins.ins
183        (
184         P_FINANCE_LINE_ID                => 	 P_FINANCE_LINE_ID,
185 	P_FINANCE_HEADER_ID               => 	 P_FINANCE_HEADER_ID,
186 	P_CANCELLED_FLAG                  => 	 P_CANCELLED_FLAG,
187 	P_DATE_RAISED                     => 	 P_DATE_RAISED,
188 	P_LINE_TYPE                       => 	 P_LINE_TYPE,
189 	P_OBJECT_VERSION_NUMBER           => 	 P_OBJECT_VERSION_NUMBER,
190 	P_SEQUENCE_NUMBER                 => 	 P_SEQUENCE_NUMBER,
191 	P_TRANSFER_STATUS                 => 	 P_TRANSFER_STATUS,
192 	P_COMMENTS                        => 	 P_COMMENTS,
193 	P_CURRENCY_CODE                   => 	 P_CURRENCY_CODE,
194 	P_MONEY_AMOUNT                    => 	 P_MONEY_AMOUNT,
195 	P_STANDARD_AMOUNT                 => 	 P_STANDARD_AMOUNT,
196 	P_TRANS_INFORMATION_CATEGORY      => 	 P_TRANS_INFORMATION_CATEGORY,
197 	P_TRANS_INFORMATION1              => 	 P_TRANS_INFORMATION1,
198 	P_TRANS_INFORMATION10             => 	 P_TRANS_INFORMATION10,
199 	P_TRANS_INFORMATION11             => 	 P_TRANS_INFORMATION11,
200 	P_TRANS_INFORMATION12             => 	 P_TRANS_INFORMATION12,
201 	P_TRANS_INFORMATION13             => 	 P_TRANS_INFORMATION13,
202 	P_TRANS_INFORMATION14             => 	 P_TRANS_INFORMATION14,
203 	P_TRANS_INFORMATION15             => 	 P_TRANS_INFORMATION15,
204 	P_TRANS_INFORMATION16             => 	 P_TRANS_INFORMATION16,
205 	P_TRANS_INFORMATION17             => 	 P_TRANS_INFORMATION17,
206 	P_TRANS_INFORMATION18             => 	 P_TRANS_INFORMATION18,
207 	P_TRANS_INFORMATION19             => 	 P_TRANS_INFORMATION19,
208 	P_TRANS_INFORMATION2              => 	 P_TRANS_INFORMATION2,
209 	P_TRANS_INFORMATION20             => 	 P_TRANS_INFORMATION20,
210 	P_TRANS_INFORMATION3              => 	 P_TRANS_INFORMATION3,
211 	P_TRANS_INFORMATION4              => 	 P_TRANS_INFORMATION4,
212 	P_TRANS_INFORMATION5              => 	 P_TRANS_INFORMATION5,
213 	P_TRANS_INFORMATION6              => 	 P_TRANS_INFORMATION6,
214 	P_TRANS_INFORMATION7              => 	 P_TRANS_INFORMATION7,
215 	P_TRANS_INFORMATION8              => 	 P_TRANS_INFORMATION8,
216 	P_TRANS_INFORMATION9              => 	 P_TRANS_INFORMATION9,
217 	P_TRANSFER_DATE                   => 	 P_TRANSFER_DATE,
218 	P_TRANSFER_MESSAGE                => 	 P_TRANSFER_MESSAGE,
219 	P_UNITARY_AMOUNT                  => 	 P_UNITARY_AMOUNT,
220 	P_BOOKING_DEAL_ID                 => 	 P_BOOKING_DEAL_ID,
221 	P_BOOKING_ID                      => 	 P_BOOKING_ID,
222 	P_RESOURCE_ALLOCATION_ID          => 	 P_RESOURCE_ALLOCATION_ID,
223 	P_RESOURCE_BOOKING_ID         => 	 P_RESOURCE_BOOKING_ID,
224 
225 	P_TFL_INFORMATION_CATEGORY        => 	 P_TFL_INFORMATION_CATEGORY,
226 	P_TFL_INFORMATION1                => 	 P_TFL_INFORMATION1,
227 	P_TFL_INFORMATION2                => 	 P_TFL_INFORMATION2,
228 	P_TFL_INFORMATION3                => 	 P_TFL_INFORMATION3,
229 	P_TFL_INFORMATION4                => 	 P_TFL_INFORMATION4,
230 	P_TFL_INFORMATION5                => 	 P_TFL_INFORMATION5,
231 	P_TFL_INFORMATION6                => 	 P_TFL_INFORMATION6,
232 	P_TFL_INFORMATION7                => 	 P_TFL_INFORMATION7,
233 	P_TFL_INFORMATION8                => 	 P_TFL_INFORMATION8,
234 	P_TFL_INFORMATION9                => 	 P_TFL_INFORMATION9,
235 	P_TFL_INFORMATION10               => 	 P_TFL_INFORMATION10,
236 	P_TFL_INFORMATION11               => 	 P_TFL_INFORMATION11,
237 	P_TFL_INFORMATION12               => 	 P_TFL_INFORMATION12,
238 	P_TFL_INFORMATION13               => 	 P_TFL_INFORMATION13,
239 	P_TFL_INFORMATION14               => 	 P_TFL_INFORMATION14,
240 	P_TFL_INFORMATION15               => 	 P_TFL_INFORMATION15,
241 	P_TFL_INFORMATION16               => 	 P_TFL_INFORMATION16,
242 	P_TFL_INFORMATION17               => 	 P_TFL_INFORMATION17,
243 	P_TFL_INFORMATION18               => 	 P_TFL_INFORMATION18,
244 	P_TFL_INFORMATION19               => 	 P_TFL_INFORMATION19,
245 	P_TFL_INFORMATION20               => 	 P_TFL_INFORMATION20,
246 	p_validate                  =>  false
247        ,P_transaction_type          =>  'INSERT'
248 );
249 
250   --
251   -- Call After Process User Hook
252   --
253 
254   begin
255   OTA_FINANCE_LINE_BK1.CREATE_FINANCE_LINE_A
256   (
257         P_FINANCE_LINE_ID                => 	 P_FINANCE_LINE_ID,
258 P_FINANCE_HEADER_ID               => 	 P_FINANCE_HEADER_ID,
259 P_CANCELLED_FLAG                  => 	 P_CANCELLED_FLAG,
260 P_DATE_RAISED                     => 	 P_DATE_RAISED,
261 P_LINE_TYPE                       => 	 P_LINE_TYPE,
265 P_CURRENCY_CODE                   => 	 P_CURRENCY_CODE,
262 P_SEQUENCE_NUMBER                 => 	 P_SEQUENCE_NUMBER,
263 P_TRANSFER_STATUS                 => 	 P_TRANSFER_STATUS,
264 P_COMMENTS                        => 	 P_COMMENTS,
266 P_MONEY_AMOUNT                    => 	 P_MONEY_AMOUNT,
267 P_STANDARD_AMOUNT                 => 	 P_STANDARD_AMOUNT,
268 P_TRANS_INFORMATION_CATEGORY      => 	 P_TRANS_INFORMATION_CATEGORY,
269 P_TRANS_INFORMATION1              => 	 P_TRANS_INFORMATION1,
270 P_TRANS_INFORMATION10             => 	 P_TRANS_INFORMATION10,
271 P_TRANS_INFORMATION11             => 	 P_TRANS_INFORMATION11,
272 P_TRANS_INFORMATION12             => 	 P_TRANS_INFORMATION12,
273 P_TRANS_INFORMATION13             => 	 P_TRANS_INFORMATION13,
274 P_TRANS_INFORMATION14             => 	 P_TRANS_INFORMATION14,
275 P_TRANS_INFORMATION15             => 	 P_TRANS_INFORMATION15,
276 P_TRANS_INFORMATION16             => 	 P_TRANS_INFORMATION16,
277 P_TRANS_INFORMATION17             => 	 P_TRANS_INFORMATION17,
278 P_TRANS_INFORMATION18             => 	 P_TRANS_INFORMATION18,
279 P_TRANS_INFORMATION19             => 	 P_TRANS_INFORMATION19,
280 P_TRANS_INFORMATION2              => 	 P_TRANS_INFORMATION2,
281 P_TRANS_INFORMATION20             => 	 P_TRANS_INFORMATION20,
282 P_TRANS_INFORMATION3              => 	 P_TRANS_INFORMATION3,
283 P_TRANS_INFORMATION4              => 	 P_TRANS_INFORMATION4,
284 P_TRANS_INFORMATION5              => 	 P_TRANS_INFORMATION5,
285 P_TRANS_INFORMATION6              => 	 P_TRANS_INFORMATION6,
286 P_TRANS_INFORMATION7              => 	 P_TRANS_INFORMATION7,
287 P_TRANS_INFORMATION8              => 	 P_TRANS_INFORMATION8,
288 P_TRANS_INFORMATION9              => 	 P_TRANS_INFORMATION9,
289 P_TRANSFER_DATE                   => 	 P_TRANSFER_DATE,
290 P_TRANSFER_MESSAGE                => 	 P_TRANSFER_MESSAGE,
291 P_UNITARY_AMOUNT                  => 	 P_UNITARY_AMOUNT,
292 P_BOOKING_DEAL_ID                 => 	 P_BOOKING_DEAL_ID,
293 P_BOOKING_ID                      => 	 P_BOOKING_ID,
294 P_RESOURCE_ALLOCATION_ID          => 	 P_RESOURCE_ALLOCATION_ID,
295 P_RESOURCE_BOOKING_ID         => 	 P_RESOURCE_BOOKING_ID,
296 P_LAST_UPDATE_DATE                => 	 P_LAST_UPDATE_DATE,
297 P_LAST_UPDATED_BY                 => 	 P_LAST_UPDATED_BY,
298 P_LAST_UPDATE_LOGIN               => 	 P_LAST_UPDATE_LOGIN,
299 P_CREATED_BY                      => 	 P_CREATED_BY,
300 P_CREATION_DATE                   => 	 P_CREATION_DATE,
301 P_TFL_INFORMATION_CATEGORY        => 	 P_TFL_INFORMATION_CATEGORY,
302 P_TFL_INFORMATION1                => 	 P_TFL_INFORMATION1,
303 P_TFL_INFORMATION2                => 	 P_TFL_INFORMATION2,
304 P_TFL_INFORMATION3                => 	 P_TFL_INFORMATION3,
305 P_TFL_INFORMATION4                => 	 P_TFL_INFORMATION4,
306 P_TFL_INFORMATION5                => 	 P_TFL_INFORMATION5,
307 P_TFL_INFORMATION6                => 	 P_TFL_INFORMATION6,
308 P_TFL_INFORMATION7                => 	 P_TFL_INFORMATION7,
309 P_TFL_INFORMATION8                => 	 P_TFL_INFORMATION8,
310 P_TFL_INFORMATION9                => 	 P_TFL_INFORMATION9,
311 P_TFL_INFORMATION10               => 	 P_TFL_INFORMATION10,
312 P_TFL_INFORMATION11               => 	 P_TFL_INFORMATION11,
313 P_TFL_INFORMATION12               => 	 P_TFL_INFORMATION12,
314 P_TFL_INFORMATION13               => 	 P_TFL_INFORMATION13,
315 P_TFL_INFORMATION14               => 	 P_TFL_INFORMATION14,
316 P_TFL_INFORMATION15               => 	 P_TFL_INFORMATION15,
317 P_TFL_INFORMATION16               => 	 P_TFL_INFORMATION16,
318 P_TFL_INFORMATION17               => 	 P_TFL_INFORMATION17,
319 P_TFL_INFORMATION18               => 	 P_TFL_INFORMATION18,
320 P_TFL_INFORMATION19               => 	 P_TFL_INFORMATION19,
321 P_TFL_INFORMATION20               => 	 P_TFL_INFORMATION20,
322 P_EFFECTIVE_DATE                  => 	 P_EFFECTIVE_DATE
323 
324   );
325   exception
326     when hr_api.cannot_find_prog_unit then
327       hr_api.cannot_find_prog_unit_error
328         (p_module_name => 'CREATE_FINANCE_LINE'
329         ,p_hook_type   => 'AP'
330         );
331   end;
332 
333   --
334   -- When in validation only mode raise the Validate_Enabled exception
335   --
336   if p_validate then
337     raise hr_api.validate_enabled;
338   end if;
339   --
340   -- Set all output arguments
341   --
342   p_finance_line_id        := l_finance_line_id;
343   p_object_version_number   := l_object_version_number;
344 
345 
346   hr_utility.set_location(' Leaving:'||l_proc, 70);
347 exception
348   when hr_api.validate_enabled then
349     --
350     -- As the Validate_Enabled exception has been raised
351     -- we must rollback to the savepoint
352     --
353     rollback to CREATE_FINANCE_LINE;
354     --
355     -- Only set output warning arguments
356     -- (Any key or derived arguments must be set to null
357     -- when validation only mode is being used.)
358     --
359     p_finance_line_id := null;
360     p_object_version_number   := null;
361     hr_utility.set_location(' Leaving:'||l_proc, 80);
362   when others then
363     --
364     -- A validation or unexpected error has occured
365     --
366     rollback to CREATE_FINANCE_LINE;
367     p_finance_line_id        := null;
368     p_object_version_number   := null;
369     hr_utility.set_location(' Leaving:'||l_proc, 90);
370     raise;
371 end create_FINANCE_LINE;
372 -- ----------------------------------------------------------------------------
373 -- |---------------------------< UPDATE_FINANCE_LINE >------------------------|
374 -- ----------------------------------------------------------------------------
375 --
376 procedure UPDATE_FINANCE_LINE
377   (
378   P_FINANCE_LINE_ID                   IN  NUMBER,
379   P_OBJECT_VERSION_NUMBER             IN OUT NOCOPY  NUMBER,
380   P_NEW_OBJECT_VERSION_NUMBER         OUT NOCOPY  NUMBER,
381   P_FINANCE_HEADER_ID                 IN  NUMBER,
385   P_SEQUENCE_NUMBER                   IN OUT NOCOPY NUMBER,
382   P_CANCELLED_FLAG                    IN  VARCHAR2,
383   P_DATE_RAISED                       IN OUT NOCOPY DATE,
384   P_LINE_TYPE                         IN  VARCHAR2,
386   P_TRANSFER_STATUS                   IN  VARCHAR2,
387   P_COMMENTS                          IN  VARCHAR2,
388   P_CURRENCY_CODE                     IN  VARCHAR2,
389   P_MONEY_AMOUNT                      IN  NUMBER,
390   P_STANDARD_AMOUNT                   IN  NUMBER,
391   P_TRANS_INFORMATION_CATEGORY        IN  VARCHAR2,
392   P_TRANS_INFORMATION1                IN  VARCHAR2,
393   P_TRANS_INFORMATION10               IN  VARCHAR2,
394   P_TRANS_INFORMATION11               IN  VARCHAR2,
395   P_TRANS_INFORMATION12               IN  VARCHAR2,
396   P_TRANS_INFORMATION13               IN  VARCHAR2,
397   P_TRANS_INFORMATION14               IN  VARCHAR2,
398   P_TRANS_INFORMATION15               IN  VARCHAR2,
399   P_TRANS_INFORMATION16               IN  VARCHAR2,
400   P_TRANS_INFORMATION17               IN  VARCHAR2,
401   P_TRANS_INFORMATION18               IN  VARCHAR2,
402   P_TRANS_INFORMATION19               IN  VARCHAR2,
403   P_TRANS_INFORMATION2                IN  VARCHAR2,
404   P_TRANS_INFORMATION20               IN  VARCHAR2,
405   P_TRANS_INFORMATION3                IN  VARCHAR2,
406   P_TRANS_INFORMATION4                IN  VARCHAR2,
407   P_TRANS_INFORMATION5                IN  VARCHAR2,
408   P_TRANS_INFORMATION6                IN  VARCHAR2,
409   P_TRANS_INFORMATION7                IN  VARCHAR2,
410   P_TRANS_INFORMATION8                IN  VARCHAR2,
411   P_TRANS_INFORMATION9                IN  VARCHAR2,
412   P_TRANSFER_DATE                     IN  DATE  ,
413   P_TRANSFER_MESSAGE                  IN  VARCHAR2,
414   P_UNITARY_AMOUNT                    IN  NUMBER,
415   P_BOOKING_DEAL_ID                   IN  NUMBER,
416   P_BOOKING_ID                        IN  NUMBER,
417   P_RESOURCE_ALLOCATION_ID            IN  NUMBER,
418   P_RESOURCE_BOOKING_ID           IN  NUMBER,
419   P_LAST_UPDATE_DATE                  IN  DATE,
420   P_LAST_UPDATED_BY                   IN  NUMBER,
421   P_LAST_UPDATE_LOGIN                 IN  NUMBER,
422   P_CREATED_BY                        IN  NUMBER,
423   P_CREATION_DATE                     IN  DATE   ,
424   P_TFL_INFORMATION_CATEGORY          IN  VARCHAR2,
425   P_TFL_INFORMATION1                  IN  VARCHAR2,
426   P_TFL_INFORMATION2                  IN  VARCHAR2,
427   P_TFL_INFORMATION3                  IN  VARCHAR2,
428   P_TFL_INFORMATION4                  IN  VARCHAR2,
429   P_TFL_INFORMATION5                  IN  VARCHAR2,
430   P_TFL_INFORMATION6                  IN  VARCHAR2,
431   P_TFL_INFORMATION7                  IN  VARCHAR2,
432   P_TFL_INFORMATION8                  IN  VARCHAR2,
433   P_TFL_INFORMATION9                  IN  VARCHAR2,
434   P_TFL_INFORMATION10                 IN  VARCHAR2,
435   P_TFL_INFORMATION11                 IN  VARCHAR2,
436   P_TFL_INFORMATION12                 IN  VARCHAR2,
437   P_TFL_INFORMATION13                 IN  VARCHAR2,
438   P_TFL_INFORMATION14                 IN  VARCHAR2,
439   P_TFL_INFORMATION15                 IN  VARCHAR2,
440   P_TFL_INFORMATION16                 IN  VARCHAR2,
441   P_TFL_INFORMATION17                 IN  VARCHAR2,
442   P_TFL_INFORMATION18                 IN  VARCHAR2,
443   P_TFL_INFORMATION19                 IN  VARCHAR2,
444   P_TFL_INFORMATION20                 IN  VARCHAR2,
445   P_VALIDATE                          IN  boolean  default false,
446   P_TRANSACTION_TYPE                  IN  VARCHAR2 default 'UPDATE',
447   P_EFFECTIVE_DATE                    IN  DATE
448   ) is
449   --
450   -- Declare cursors and local variables
451   --
452   l_proc                    varchar2(72) := g_package||' Update Finance Line';
453   l_effective_date          date;
454   l_object_version_number   number := p_object_version_number;
455   l_name varchar2(80);
456 begin
457   hr_utility.set_location('Entering:'|| l_proc, 10);
458   --
459   -- Issue a savepoint
460   --
461   savepoint UPDATE_FINANCE_LINE;
462   --
463   -- Truncate the time portion from all IN date parameters
464   --
465   l_effective_date := trunc(p_effective_date);
466   --
467   -- Call Before Process User Hook
468   --
469 
470   begin
471     OTA_FINANCE_LINE_BK2.UPDATE_FINANCE_LINE_B
472   (    P_FINANCE_LINE_ID                => 	 P_FINANCE_LINE_ID,
473 P_FINANCE_HEADER_ID               => 	 P_FINANCE_HEADER_ID,
474 P_CANCELLED_FLAG                  => 	 P_CANCELLED_FLAG,
475 P_DATE_RAISED                     => 	 P_DATE_RAISED,
476 P_LINE_TYPE                       => 	 P_LINE_TYPE,
477 P_SEQUENCE_NUMBER                 => 	 P_SEQUENCE_NUMBER,
478 P_TRANSFER_STATUS                 => 	 P_TRANSFER_STATUS,
479 P_COMMENTS                        => 	 P_COMMENTS,
480 P_CURRENCY_CODE                   => 	 P_CURRENCY_CODE,
481 P_MONEY_AMOUNT                    => 	 P_MONEY_AMOUNT,
482 P_STANDARD_AMOUNT                 => 	 P_STANDARD_AMOUNT,
483 P_TRANS_INFORMATION_CATEGORY      => 	 P_TRANS_INFORMATION_CATEGORY,
484 P_TRANS_INFORMATION1              => 	 P_TRANS_INFORMATION1,
485 P_TRANS_INFORMATION10             => 	 P_TRANS_INFORMATION10,
486 P_TRANS_INFORMATION11             => 	 P_TRANS_INFORMATION11,
487 P_TRANS_INFORMATION12             => 	 P_TRANS_INFORMATION12,
488 P_TRANS_INFORMATION13             => 	 P_TRANS_INFORMATION13,
489 P_TRANS_INFORMATION14             => 	 P_TRANS_INFORMATION14,
490 P_TRANS_INFORMATION15             => 	 P_TRANS_INFORMATION15,
491 P_TRANS_INFORMATION16             => 	 P_TRANS_INFORMATION16,
492 P_TRANS_INFORMATION17             => 	 P_TRANS_INFORMATION17,
493 P_TRANS_INFORMATION18             => 	 P_TRANS_INFORMATION18,
494 P_TRANS_INFORMATION19             => 	 P_TRANS_INFORMATION19,
495 P_TRANS_INFORMATION2              => 	 P_TRANS_INFORMATION2,
496 P_TRANS_INFORMATION20             => 	 P_TRANS_INFORMATION20,
500 P_TRANS_INFORMATION6              => 	 P_TRANS_INFORMATION6,
497 P_TRANS_INFORMATION3              => 	 P_TRANS_INFORMATION3,
498 P_TRANS_INFORMATION4              => 	 P_TRANS_INFORMATION4,
499 P_TRANS_INFORMATION5              => 	 P_TRANS_INFORMATION5,
501 P_TRANS_INFORMATION7              => 	 P_TRANS_INFORMATION7,
502 P_TRANS_INFORMATION8              => 	 P_TRANS_INFORMATION8,
503 P_TRANS_INFORMATION9              => 	 P_TRANS_INFORMATION9,
504 P_TRANSFER_DATE                   => 	 P_TRANSFER_DATE,
505 P_TRANSFER_MESSAGE                => 	 P_TRANSFER_MESSAGE,
506 P_UNITARY_AMOUNT                  => 	 P_UNITARY_AMOUNT,
507 P_BOOKING_DEAL_ID                 => 	 P_BOOKING_DEAL_ID,
508 P_BOOKING_ID                      => 	 P_BOOKING_ID,
509 P_RESOURCE_ALLOCATION_ID          => 	 P_RESOURCE_ALLOCATION_ID,
510 P_RESOURCE_BOOKING_ID         => 	 P_RESOURCE_BOOKING_ID,
511 P_LAST_UPDATE_DATE                => 	 P_LAST_UPDATE_DATE,
512 P_LAST_UPDATED_BY                 => 	 P_LAST_UPDATED_BY,
513 P_LAST_UPDATE_LOGIN               => 	 P_LAST_UPDATE_LOGIN,
514 P_CREATED_BY                      => 	 P_CREATED_BY,
515 P_CREATION_DATE                   => 	 P_CREATION_DATE,
516 P_TFL_INFORMATION_CATEGORY        => 	 P_TFL_INFORMATION_CATEGORY,
517 P_TFL_INFORMATION1                => 	 P_TFL_INFORMATION1,
518 P_TFL_INFORMATION2                => 	 P_TFL_INFORMATION2,
519 P_TFL_INFORMATION3                => 	 P_TFL_INFORMATION3,
520 P_TFL_INFORMATION4                => 	 P_TFL_INFORMATION4,
521 P_TFL_INFORMATION5                => 	 P_TFL_INFORMATION5,
522 P_TFL_INFORMATION6                => 	 P_TFL_INFORMATION6,
523 P_TFL_INFORMATION7                => 	 P_TFL_INFORMATION7,
524 P_TFL_INFORMATION8                => 	 P_TFL_INFORMATION8,
525 P_TFL_INFORMATION9                => 	 P_TFL_INFORMATION9,
526 P_TFL_INFORMATION10               => 	 P_TFL_INFORMATION10,
527 P_TFL_INFORMATION11               => 	 P_TFL_INFORMATION11,
528 P_TFL_INFORMATION12               => 	 P_TFL_INFORMATION12,
529 P_TFL_INFORMATION13               => 	 P_TFL_INFORMATION13,
530 P_TFL_INFORMATION14               => 	 P_TFL_INFORMATION14,
531 P_TFL_INFORMATION15               => 	 P_TFL_INFORMATION15,
532 P_TFL_INFORMATION16               => 	 P_TFL_INFORMATION16,
533 P_TFL_INFORMATION17               => 	 P_TFL_INFORMATION17,
534 P_TFL_INFORMATION18               => 	 P_TFL_INFORMATION18,
535 P_TFL_INFORMATION19               => 	 P_TFL_INFORMATION19,
536 P_TFL_INFORMATION20               => 	 P_TFL_INFORMATION20,
537 P_EFFECTIVE_DATE                  => 	 P_EFFECTIVE_DATE
538   );
539   exception
540     when hr_api.cannot_find_prog_unit then
541       hr_api.cannot_find_prog_unit_error
542         (p_module_name => 'UPDATE_FINANCE_LINE'
543         ,p_hook_type   => 'BP'
544         );
545   end;
546   --
547   -- Validation in addition to Row Handlers
548   --
549   --
550   -- Process Logic
551   --
552     ota_tfl_api_upd.Upd
553 
554        (
555         P_FINANCE_LINE_ID                => 	 P_FINANCE_LINE_ID,
556 	P_FINANCE_HEADER_ID               => 	 P_FINANCE_HEADER_ID,
557 	P_CANCELLED_FLAG                  => 	 P_CANCELLED_FLAG,
558 	P_DATE_RAISED                     => 	 P_DATE_RAISED,
559 	P_LINE_TYPE                       => 	 P_LINE_TYPE,
560 	P_OBJECT_VERSION_NUMBER           => 	 P_OBJECT_VERSION_NUMBER,
561 	P_SEQUENCE_NUMBER                 => 	 P_SEQUENCE_NUMBER,
562 	P_TRANSFER_STATUS                 => 	 P_TRANSFER_STATUS,
563 	P_COMMENTS                        => 	 P_COMMENTS,
564 	P_CURRENCY_CODE                   => 	 P_CURRENCY_CODE,
565 	P_MONEY_AMOUNT                    => 	 P_MONEY_AMOUNT,
566 	P_STANDARD_AMOUNT                 => 	 P_STANDARD_AMOUNT,
567 	P_TRANS_INFORMATION_CATEGORY      => 	 P_TRANS_INFORMATION_CATEGORY,
568 	P_TRANS_INFORMATION1              => 	 P_TRANS_INFORMATION1,
569 	P_TRANS_INFORMATION10             => 	 P_TRANS_INFORMATION10,
570 	P_TRANS_INFORMATION11             => 	 P_TRANS_INFORMATION11,
571 	P_TRANS_INFORMATION12             => 	 P_TRANS_INFORMATION12,
572 	P_TRANS_INFORMATION13             => 	 P_TRANS_INFORMATION13,
573 	P_TRANS_INFORMATION14             => 	 P_TRANS_INFORMATION14,
574 	P_TRANS_INFORMATION15             => 	 P_TRANS_INFORMATION15,
575 	P_TRANS_INFORMATION16             => 	 P_TRANS_INFORMATION16,
576 	P_TRANS_INFORMATION17             => 	 P_TRANS_INFORMATION17,
577 	P_TRANS_INFORMATION18             => 	 P_TRANS_INFORMATION18,
578 	P_TRANS_INFORMATION19             => 	 P_TRANS_INFORMATION19,
579 	P_TRANS_INFORMATION2              => 	 P_TRANS_INFORMATION2,
580 	P_TRANS_INFORMATION20             => 	 P_TRANS_INFORMATION20,
581 	P_TRANS_INFORMATION3              => 	 P_TRANS_INFORMATION3,
582 	P_TRANS_INFORMATION4              => 	 P_TRANS_INFORMATION4,
583 	P_TRANS_INFORMATION5              => 	 P_TRANS_INFORMATION5,
584 	P_TRANS_INFORMATION6              => 	 P_TRANS_INFORMATION6,
585 	P_TRANS_INFORMATION7              => 	 P_TRANS_INFORMATION7,
586 	P_TRANS_INFORMATION8              => 	 P_TRANS_INFORMATION8,
587 	P_TRANS_INFORMATION9              => 	 P_TRANS_INFORMATION9,
588 	P_TRANSFER_DATE                   => 	 P_TRANSFER_DATE,
589 	P_TRANSFER_MESSAGE                => 	 P_TRANSFER_MESSAGE,
590 	P_UNITARY_AMOUNT                  => 	 P_UNITARY_AMOUNT,
591 	P_BOOKING_DEAL_ID                 => 	 P_BOOKING_DEAL_ID,
592 	P_BOOKING_ID                      => 	 P_BOOKING_ID,
593 	P_RESOURCE_ALLOCATION_ID          => 	 P_RESOURCE_ALLOCATION_ID,
594 	P_RESOURCE_BOOKING_ID         => 	 P_RESOURCE_BOOKING_ID,
595 	P_TFL_INFORMATION_CATEGORY        => 	 P_TFL_INFORMATION_CATEGORY,
596 	P_TFL_INFORMATION1                => 	 P_TFL_INFORMATION1,
597 	P_TFL_INFORMATION2                => 	 P_TFL_INFORMATION2,
598 	P_TFL_INFORMATION3                => 	 P_TFL_INFORMATION3,
599 	P_TFL_INFORMATION4                => 	 P_TFL_INFORMATION4,
600 	P_TFL_INFORMATION5                => 	 P_TFL_INFORMATION5,
601 	P_TFL_INFORMATION6                => 	 P_TFL_INFORMATION6,
602 	P_TFL_INFORMATION7                => 	 P_TFL_INFORMATION7,
606 	P_TFL_INFORMATION11               => 	 P_TFL_INFORMATION11,
603 	P_TFL_INFORMATION8                => 	 P_TFL_INFORMATION8,
604 	P_TFL_INFORMATION9                => 	 P_TFL_INFORMATION9,
605 	P_TFL_INFORMATION10               => 	 P_TFL_INFORMATION10,
607 	P_TFL_INFORMATION12               => 	 P_TFL_INFORMATION12,
608 	P_TFL_INFORMATION13               => 	 P_TFL_INFORMATION13,
609 	P_TFL_INFORMATION14               => 	 P_TFL_INFORMATION14,
610 	P_TFL_INFORMATION15               => 	 P_TFL_INFORMATION15,
611 	P_TFL_INFORMATION16               => 	 P_TFL_INFORMATION16,
612 	P_TFL_INFORMATION17               => 	 P_TFL_INFORMATION17,
613 	P_TFL_INFORMATION18               => 	 P_TFL_INFORMATION18,
614 	P_TFL_INFORMATION19               => 	 P_TFL_INFORMATION19,
615 	P_TFL_INFORMATION20               => 	 P_TFL_INFORMATION20,
616         P_validate                        =>     false,
617         P_TRANSACTION_TYPE                =>	 P_TRANSACTION_TYPE
618        );
619 
620   begin
621   OTA_FINANCE_LINE_BK2.UPDATE_FINANCE_LINE_A
622   (     P_FINANCE_LINE_ID                => 	 P_FINANCE_LINE_ID,
623 P_FINANCE_HEADER_ID               => 	 P_FINANCE_HEADER_ID,
624 P_CANCELLED_FLAG                  => 	 P_CANCELLED_FLAG,
625 P_DATE_RAISED                     => 	 P_DATE_RAISED,
626 P_LINE_TYPE                       => 	 P_LINE_TYPE,
627 P_SEQUENCE_NUMBER                 => 	 P_SEQUENCE_NUMBER,
628 P_TRANSFER_STATUS                 => 	 P_TRANSFER_STATUS,
629 P_COMMENTS                        => 	 P_COMMENTS,
630 P_CURRENCY_CODE                   => 	 P_CURRENCY_CODE,
631 P_MONEY_AMOUNT                    => 	 P_MONEY_AMOUNT,
632 P_STANDARD_AMOUNT                 => 	 P_STANDARD_AMOUNT,
633 P_TRANS_INFORMATION_CATEGORY      => 	 P_TRANS_INFORMATION_CATEGORY,
634 P_TRANS_INFORMATION1              => 	 P_TRANS_INFORMATION1,
635 P_TRANS_INFORMATION10             => 	 P_TRANS_INFORMATION10,
636 P_TRANS_INFORMATION11             => 	 P_TRANS_INFORMATION11,
637 P_TRANS_INFORMATION12             => 	 P_TRANS_INFORMATION12,
638 P_TRANS_INFORMATION13             => 	 P_TRANS_INFORMATION13,
639 P_TRANS_INFORMATION14             => 	 P_TRANS_INFORMATION14,
640 P_TRANS_INFORMATION15             => 	 P_TRANS_INFORMATION15,
641 P_TRANS_INFORMATION16             => 	 P_TRANS_INFORMATION16,
642 P_TRANS_INFORMATION17             => 	 P_TRANS_INFORMATION17,
643 P_TRANS_INFORMATION18             => 	 P_TRANS_INFORMATION18,
644 P_TRANS_INFORMATION19             => 	 P_TRANS_INFORMATION19,
645 P_TRANS_INFORMATION2              => 	 P_TRANS_INFORMATION2,
646 P_TRANS_INFORMATION20             => 	 P_TRANS_INFORMATION20,
647 P_TRANS_INFORMATION3              => 	 P_TRANS_INFORMATION3,
648 P_TRANS_INFORMATION4              => 	 P_TRANS_INFORMATION4,
649 P_TRANS_INFORMATION5              => 	 P_TRANS_INFORMATION5,
650 P_TRANS_INFORMATION6              => 	 P_TRANS_INFORMATION6,
651 P_TRANS_INFORMATION7              => 	 P_TRANS_INFORMATION7,
652 P_TRANS_INFORMATION8              => 	 P_TRANS_INFORMATION8,
653 P_TRANS_INFORMATION9              => 	 P_TRANS_INFORMATION9,
654 P_TRANSFER_DATE                   => 	 P_TRANSFER_DATE,
655 P_TRANSFER_MESSAGE                => 	 P_TRANSFER_MESSAGE,
656 P_UNITARY_AMOUNT                  => 	 P_UNITARY_AMOUNT,
657 P_BOOKING_DEAL_ID                 => 	 P_BOOKING_DEAL_ID,
658 P_BOOKING_ID                      => 	 P_BOOKING_ID,
659 P_RESOURCE_ALLOCATION_ID          => 	 P_RESOURCE_ALLOCATION_ID,
660 P_RESOURCE_BOOKING_ID         => 	 P_RESOURCE_BOOKING_ID,
661 P_LAST_UPDATE_DATE                => 	 P_LAST_UPDATE_DATE,
662 P_LAST_UPDATED_BY                 => 	 P_LAST_UPDATED_BY,
663 P_LAST_UPDATE_LOGIN               => 	 P_LAST_UPDATE_LOGIN,
664 P_CREATED_BY                      => 	 P_CREATED_BY,
665 P_CREATION_DATE                   => 	 P_CREATION_DATE,
666 P_TFL_INFORMATION_CATEGORY        => 	 P_TFL_INFORMATION_CATEGORY,
667 P_TFL_INFORMATION1                => 	 P_TFL_INFORMATION1,
668 P_TFL_INFORMATION2                => 	 P_TFL_INFORMATION2,
669 P_TFL_INFORMATION3                => 	 P_TFL_INFORMATION3,
670 P_TFL_INFORMATION4                => 	 P_TFL_INFORMATION4,
671 P_TFL_INFORMATION5                => 	 P_TFL_INFORMATION5,
672 P_TFL_INFORMATION6                => 	 P_TFL_INFORMATION6,
673 P_TFL_INFORMATION7                => 	 P_TFL_INFORMATION7,
674 P_TFL_INFORMATION8                => 	 P_TFL_INFORMATION8,
675 P_TFL_INFORMATION9                => 	 P_TFL_INFORMATION9,
676 P_TFL_INFORMATION10               => 	 P_TFL_INFORMATION10,
677 P_TFL_INFORMATION11               => 	 P_TFL_INFORMATION11,
678 P_TFL_INFORMATION12               => 	 P_TFL_INFORMATION12,
679 P_TFL_INFORMATION13               => 	 P_TFL_INFORMATION13,
680 P_TFL_INFORMATION14               => 	 P_TFL_INFORMATION14,
681 P_TFL_INFORMATION15               => 	 P_TFL_INFORMATION15,
682 P_TFL_INFORMATION16               => 	 P_TFL_INFORMATION16,
683 P_TFL_INFORMATION17               => 	 P_TFL_INFORMATION17,
684 P_TFL_INFORMATION18               => 	 P_TFL_INFORMATION18,
685 P_TFL_INFORMATION19               => 	 P_TFL_INFORMATION19,
686 P_TFL_INFORMATION20               => 	 P_TFL_INFORMATION20,
687 P_EFFECTIVE_DATE                  => 	 P_EFFECTIVE_DATE
688   );
689   exception
690     when hr_api.cannot_find_prog_unit then
691       hr_api.cannot_find_prog_unit_error
692         (p_module_name => 'UPDATE_FINANCE_LINE'
693         ,p_hook_type   => 'AP'
694         );
695   end;
696 
697   --
698   -- When in validation only mode raise the Validate_Enabled exception
699   --
700   if p_validate then
701     raise hr_api.validate_enabled;
702   end if;
703   --
704   -- Set all output arguments
705   --
706   hr_utility.set_location(' Leaving:'||l_proc, 70);
707 exception
708   when hr_api.validate_enabled then
709     --
710     -- As the Validate_Enabled exception has been raised
711     -- we must rollback to the savepoint
712     --
713     rollback to UPDATE_FINANCE_LINE;
714     --
715     -- Only set output warning arguments
719     p_object_version_number  := null;
716     -- (Any key or derived arguments must be set to null
717     -- when validation only mode is being used.)
718     --
720     hr_utility.set_location(' Leaving:'||l_proc, 80);
721   when others then
722     --
723     -- A validation or unexpected error has occured
724     --
725     rollback to UPDATE_FINANCE_LINE;
726     p_object_version_number  := l_object_version_number;
727     hr_utility.set_location(' Leaving:'||l_proc, 90);
728     raise;
729 end update_FINANCE_LINE;
730 --
731 -- ----------------------------------------------------------------------------
732 -- |-------------------------< DELETE_FINANCE_LINE >--------------------------|
733 -- ----------------------------------------------------------------------------
734 --
735 procedure DELETE_FINANCE_LINE
736   (p_validate                      in     boolean  default false
737   ,p_finance_line_id               in     number
738   ,p_object_version_number         in     number
739   ) is
740   --
741   -- Declare cursors and local variables
742   --
743   l_proc                    varchar2(72) := g_package||' Delete Finance Line';
744   l_object_version_id       number;
745   --
746   --
747 begin
748   hr_utility.set_location('Entering:'|| l_proc, 10);
749   --
750   -- Issue a savepoint
751   --
752   savepoint DELETE_FINANCE_LINE;
753   --
754   -- Truncate the time portion from all IN date parameters
755   --
756   --
757 
758   -- Call Before Process User Hook
759   --
760   begin
761     OTA_FINANCE_LINE_BK3.DELETE_FINANCE_LINE_B
762   (p_finance_line_id            => p_finance_line_id
763   ,p_object_version_number       => p_object_version_number
764   );
765   exception
766     when hr_api.cannot_find_prog_unit then
767       hr_api.cannot_find_prog_unit_error
768         (p_module_name => 'DELETE_FINANCE_LINE'
769         ,p_hook_type   => 'BP'
770         );
771   end;
772   --
773   -- Validation in addition to Row Handlers
774   --
775   --
776   -- Process Logic
777   --
778   ota_tfl_api_del.del
779   (p_finance_line_id        => p_finance_line_id
780   ,p_object_version_number   => p_object_version_number
781   );
782 
783   --
784   -- Call After Process User Hook
785   --
786   begin
787   OTA_FINANCE_LINE_BK3.DELETE_FINANCE_LINE_A
788   (p_finance_line_id            => p_finance_line_id
789   ,p_object_version_number       => p_object_version_number
790   );
791   exception
792     when hr_api.cannot_find_prog_unit then
793       hr_api.cannot_find_prog_unit_error
794         (p_module_name => 'DELETE_FINANCE_LINE'
795         ,p_hook_type   => 'AP'
796         );
797   end;
798 
799   --
800   -- When in validation only mode raise the Validate_Enabled exception
801   --
802   if p_validate then
803     raise hr_api.validate_enabled;
804   end if;
805   --
806   -- Set all output arguments
807   --
808   --
809   hr_utility.set_location(' Leaving:'||l_proc, 170);
810 exception
811   when hr_api.validate_enabled then
812     --
813     -- As the Validate_Enabled exception has been raised
814     -- we must rollback to the savepoint
815     --
816     rollback to DELETE_FINANCE_LINE;
817     --
818     -- Only set output warning arguments
819     -- (Any key or derived arguments must be set to null
820     -- when validation only mode is being used.)
821     --
822     hr_utility.set_location(' Leaving:'||l_proc, 180);
823   when others then
824     --
825     -- A validation or unexpected error has occured
826     --
827     rollback to DELETE_FINANCE_LINE;
828     hr_utility.set_location(' Leaving:'||l_proc, 190);
829     raise;
830 end DELETE_FINANCE_LINE;
831 --
832 
833 
834 END OTA_FINANCE_LINE_API;