[Home] [Help]
PACKAGE BODY: APPS.CS_CHARGE_DETAILS_PUB
Source
1 PACKAGE BODY CS_Charge_Details_PUB AS
2 /* $Header: csxpestb.pls 120.12.12020000.3 2013/01/30 08:58:42 bkanimoz ship $ */
3
4
5 -- Global Variables
6 G_PKG_NAME CONSTANT VARCHAR2(30) := 'CS_Charge_Details_PUB' ;
7
8
9 --local Procedures and Functions
10
11 FUNCTION Check_For_Miss ( p_param IN NUMBER ) RETURN NUMBER ;
12 FUNCTION Check_For_Miss ( p_param IN VARCHAR2 ) RETURN VARCHAR2 ;
13 FUNCTION Check_For_Miss ( p_param IN DATE ) RETURN DATE ;
14
15 PROCEDURE TO_NULL(p_charges_rec_in IN Charges_Rec_Type,
16 p_charges_rec_out OUT NOCOPY Charges_Rec_Type);
17
18
19 /**************************************************
20 Public Procedure Body Create_Charge_Details
21 **************************************************/
22
23 PROCEDURE Create_Charge_Details(
24 p_api_version IN NUMBER,
25 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
26 p_commit IN VARCHAR2 := FND_API.G_FALSE,
27 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
28 x_return_status OUT NOCOPY VARCHAR2,
29 x_msg_count OUT NOCOPY NUMBER,
30 x_object_version_number OUT NOCOPY NUMBER,
31 x_msg_data OUT NOCOPY VARCHAR2,
32 x_estimate_detail_id OUT NOCOPY NUMBER,
33 x_line_number OUT NOCOPY NUMBER,
34 p_resp_appl_id IN NUMBER := FND_GLOBAL.RESP_APPL_ID,
35 p_resp_id IN NUMBER := FND_GLOBAL.RESP_ID,
36 p_user_id IN NUMBER := FND_GLOBAL.USER_ID,
37 p_login_id IN NUMBER := NULL,
38 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
39 p_Charges_Rec IN Charges_Rec_Type := G_MISS_CHRG_REC
40 ) IS
41
42 x_cost_id NUMBER;
43
44 BEGIN
45
46 Create_Charge_Details(
47 p_api_version => p_api_version,
48 p_init_msg_list => p_init_msg_list,
49 p_commit => p_commit,
50 p_validation_level => p_validation_level,
51 x_return_status => x_return_status,
52 x_msg_count => x_msg_count,
53 x_object_version_number => x_object_version_number,
54 x_msg_data => x_msg_data,
55 x_estimate_detail_id => x_estimate_detail_id,
56 x_line_number => x_line_number,
57 p_resp_appl_id => p_resp_appl_id,
58 p_resp_id => p_resp_id,
59 p_user_id => p_user_id,
60 p_login_id => p_login_id,
61 p_transaction_control => p_transaction_control,
62 p_Charges_Rec => p_Charges_Rec,
63 p_create_cost_detail => 'N',
64 x_cost_id => x_cost_id
65 );
66
67 END;
68
69
70 PROCEDURE Create_Charge_Details(
71 p_api_version IN NUMBER,
72 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
73 p_commit IN VARCHAR2 := FND_API.G_FALSE,
74 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
75 x_return_status OUT NOCOPY VARCHAR2,
76 x_msg_count OUT NOCOPY NUMBER,
77 x_object_version_number OUT NOCOPY NUMBER,
78 x_msg_data OUT NOCOPY VARCHAR2,
79 x_estimate_detail_id OUT NOCOPY NUMBER,
80 x_line_number OUT NOCOPY NUMBER,
81 p_resp_appl_id IN NUMBER := FND_GLOBAL.RESP_APPL_ID,
82 p_resp_id IN NUMBER := FND_GLOBAL.RESP_ID,
83 p_user_id IN NUMBER := FND_GLOBAL.USER_ID,
84 p_login_id IN NUMBER := NULL,
85 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
86 p_Charges_Rec IN Charges_Rec_Type := G_MISS_CHRG_REC,
87 p_create_cost_detail IN VARCHAR2 ,--Costing
88 x_cost_id OUT NOCOPY NUMBER --Costing
89 ) IS
90
91 l_api_name CONSTANT VARCHAR2(30) := 'Create_Charge_Details' ;
92 l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME || '.' || l_api_name ;
93 l_log_module CONSTANT VARCHAR2(255) := 'csxpestb.plsql.' || l_api_name_full || '.';
94 l_api_version CONSTANT NUMBER := 1.0 ;
95 l_resp_appl_id NUMBER := p_resp_appl_id;
96 l_resp_id NUMBER := p_resp_id;
97 l_user_id NUMBER := p_user_id;
98 l_login_id NUMBER := p_login_id;
99 l_return_status VARCHAR2(1) ;
100 l_Charges_Rec Charges_Rec_Type ;
101
102 l_cost_rec cs_cost_details_pub.cost_rec_type;--Costing
103
104
105 BEGIN
106
107 -- Standard Start of API Savepoint
108 IF FND_API.To_Boolean( p_transaction_control ) THEN
109 SAVEPOINT Create_Charge_Details_PUB ;
110 END IF ;
111
112 -- Standard Call to check API compatibility
113 IF NOT FND_API.Compatible_API_Call( l_api_version,
114 p_api_version,
115 l_api_name,
116 G_PKG_NAME) THEN
117
118 RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
119 END IF ;
120
121 -- Initialize the message list if p_msg_list is set to TRUE
122 IF FND_API.To_Boolean(p_init_msg_list) THEN
123 FND_MSG_PUB.initialize ;
124 END IF ;
125
126 -- Initialize the API Return Success to True
127 x_return_status := FND_API.G_RET_STS_SUCCESS ;
128
129 ----------------------- FND Logging -----------------------------------
130 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
131 THEN
132 FND_LOG.String
133 ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
134 , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
135 );
136 FND_LOG.String
137 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
138 , 'p_api_version:' || p_api_version
139 );
140 FND_LOG.String
141 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
142 , 'p_init_msg_list:' || p_init_msg_list
143 );
144 FND_LOG.String
145 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
146 , 'p_commit:' || p_commit
147 );
148 FND_LOG.String
149 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
150 , 'p_validation_level:' || p_validation_level
151 );
152 FND_LOG.String
153 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
154 , 'p_resp_appl_id:' || p_resp_appl_id
155 );
156 FND_LOG.String
157 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
158 , 'p_resp_id:' || p_resp_id
159 );
160 FND_LOG.String
161 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
162 , 'p_user_id:' || p_user_id
163 );
164 FND_LOG.String
165 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
166 , 'p_login_id:' || p_login_id
167 );
168 FND_LOG.String
169 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
170 , 'p_transaction_control:' || p_transaction_control
171 );
172
173 FND_LOG.String
174 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
175 , 'p_create_cost_detail:' || p_create_cost_detail
176 );
177 -- --------------------------------------------------------------------------
178 -- This procedure Logs the charges record paramters.
179 -- --------------------------------------------------------------------------
180 Log_Charges_Rec_Parameters
181 ( p_Charges_Rec => p_Charges_Rec
182 );
183
184 END IF;
185
186 --Convert the IN Parameters from FND_API.G_MISS_XXXX to NULL
187 TO_NULL (p_Charges_Rec, l_Charges_Rec) ;
188
189 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
190 THEN
191
192 FND_LOG.String
193 ( FND_LOG.level_procedure ,
194 L_LOG_MODULE || '',
195 'Before calling Create Charge Details PVT API:'||'l_return_status :'||l_return_status
196 );
197 END IF ;
198
199
200 BEGIN
201
202 --Call the private API Create_Charge_Details
203 CS_Charge_Details_PVT.Create_Charge_Details
204 (
205 p_api_version => 1.0 ,
206 p_init_msg_list => FND_API.G_FALSE ,
207 p_commit => p_commit ,
208 p_validation_level => p_validation_level,
209 x_return_status => l_return_status,
210 x_msg_count => x_msg_count,
211 x_object_version_number => x_object_version_number,
212 x_estimate_detail_id => x_estimate_detail_id,
213 x_line_number => x_line_number,
214 x_msg_data => x_msg_data,
215 p_resp_appl_id => l_resp_appl_id,
216 p_resp_id => l_resp_id,
217 p_user_id => l_user_id,
218 p_login_id => l_login_id,
219 p_transaction_control => p_transaction_control,
220 p_est_detail_rec => l_charges_rec
221 ) ;
222
223
224 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
225 RAISE FND_API.G_EXC_ERROR;
226 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
227 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
228 END IF;
229
230 --End of API Body
231 --standard Check of p_commit
232 IF FND_API.To_Boolean( p_commit ) THEN
233 COMMIT WORK ;
234 END IF ;
235
236 --Standard call to get message count and if count is 1 , get message info
237 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
238 p_data => x_msg_data,
239 p_encoded => FND_API.G_FALSE) ;
240 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
241 THEN
242
243 FND_LOG.String
244 ( FND_LOG.level_procedure ,
245 L_LOG_MODULE || '',
246 'After calling Create Charge Details PVT API:'||'l_return_status :'||l_return_status
247 );
248 END IF ;
249
250
251 --Begin Exception Handling
252
253 EXCEPTION
254
255 WHEN FND_API.G_EXC_ERROR THEN
256 IF FND_API.To_Boolean( p_transaction_control ) THEN
257 ROLLBACK TO Create_Charge_Details_PUB;
258 END IF ;
259
260 x_return_status := FND_API.G_RET_STS_ERROR ;
261
262 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
263 p_data => x_msg_data,
264 p_encoded => FND_API.G_FALSE) ;
265
266 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
267 IF FND_API.To_Boolean( p_transaction_control ) THEN
268 ROLLBACK TO Create_Charge_Details_PUB;
269 END IF ;
270
271 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
272
273 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
274 p_data => x_msg_data,
275 p_encoded => FND_API.G_FALSE) ;
276 WHEN OTHERS THEN
277 IF FND_API.To_Boolean( p_transaction_control ) THEN
278 ROLLBACK TO Create_Charge_Details_PUB ;
279 END IF ;
280
281 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
282
283 IF FND_MSG_PUB.Check_Msg_Level
284 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
285 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
286 END IF ;
287
288 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
292
289 p_data => x_msg_data,
290 p_encoded => FND_API.G_FALSE) ;
291
293 END;
294
295 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
296 THEN
297 FND_LOG.String
298 ( FND_LOG.level_procedure ,
299 L_LOG_MODULE || '',
300 'Before calling Create Cost Details PVT API:'||'l_return_status :'||l_return_status||'x_estimate_detail_id : '||x_estimate_detail_id
301 );
302 END IF ;
303 --Added by bkanimoz on 15-dec-2007 for Service Costing
304 --start
305
306 --Create Cost record only if charge line has been successfully created.
307
308 BEGIN
309
310 IF l_return_status = FND_API.G_RET_STS_SUCCESS
311 and p_create_cost_detail ='Y'
312 and x_estimate_detail_id IS NOT NULL
313 THEN
314
315 IF FND_API.To_Boolean( p_transaction_control ) THEN
316 --iF there are any errors in the costing api then rollback will happen to this point
317 SAVEPOINT Create_Charge_Cost_Details_PUB ;
318
319 END IF ;
320
321 l_cost_rec.estimate_detail_id := x_estimate_detail_id;
322 l_cost_rec.transaction_date := sysdate;
323
324 --call the costing PVT api with NO Validation ,since the data has already been validated by the charge api
325
326
327 CS_COST_DETAILS_PVT.CREATE_COST_DETAILS
328 (
329 p_api_version => 1.0 ,
330 p_init_msg_list => p_init_msg_list,
331 p_commit => p_commit ,
332 p_validation_level => FND_API.G_VALID_LEVEL_NONE,
333 x_return_status => l_return_status,
334 x_msg_count => x_msg_count,
335 x_object_version_number => x_object_version_number,
336 x_msg_data => x_msg_data,
337 x_cost_id => x_cost_id,
338 p_resp_appl_id => l_resp_appl_id,
339 p_resp_id => l_resp_id,
340 p_user_id => l_user_id,
341 p_login_id => l_login_id,
342 p_transaction_control => p_transaction_control,
343 p_Cost_Rec => l_cost_rec
344 );
345
346
347 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
348 RAISE FND_API.G_EXC_ERROR;
349 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
350 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
351 END IF;
352
353 --End of API Body
354 --standard Check of p_commit
355 IF FND_API.To_Boolean( p_commit ) THEN
356 COMMIT WORK ;
357 END IF ;
358
359 --Standard call to get message count and if count is 1 , get message info
360 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
361 p_data => x_msg_data,
362 p_encoded => FND_API.G_FALSE) ;
363
364 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
365 THEN
366
367 FND_LOG.String
368 ( FND_LOG.level_procedure ,
369 L_LOG_MODULE || '',
370 'After calling Create Cost Details PVT API:'||'l_return_status :'||l_return_status
371 );
372 END IF ;
373 END IF;
374
375
376 --Begin Exception Handling for the cost section
377
378
379 EXCEPTION
380
381 WHEN FND_API.G_EXC_ERROR THEN
382 IF FND_API.To_Boolean( p_transaction_control ) THEN
383 ROLLBACK TO Create_Charge_cost_Details_PUB;
384 END IF ;
385
386 x_return_status := FND_API.G_RET_STS_ERROR ;
387
388 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
389 p_data => x_msg_data,
390 p_encoded => FND_API.G_FALSE) ;
391
392 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
393 IF FND_API.To_Boolean( p_transaction_control ) THEN
394 ROLLBACK TO Create_Charge_cost_Details_PUB;
395 END IF ;
396
397 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
398
399 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
400 p_data => x_msg_data,
401 p_encoded => FND_API.G_FALSE) ;
402 WHEN OTHERS THEN
403 IF FND_API.To_Boolean( p_transaction_control ) THEN
404 ROLLBACK TO Create_Charge_cost_Details_PUB;
405 END IF ;
406
407 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
408
409 IF FND_MSG_PUB.Check_Msg_Level
410 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
411 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
412 END IF ;
413
414 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
415 p_data => x_msg_data,
416 p_encoded => FND_API.G_FALSE) ;
417
418 END ;
419
420
421 END Create_Charge_Details; -- End of Procedure Create Charge Details
422
423 --This is added for backward compatibility
424
425 PROCEDURE Update_Charge_Details(
426 p_api_version IN NUMBER,
427 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
428 p_commit IN VARCHAR2 := FND_API.G_FALSE,
429 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
430 x_return_status OUT NOCOPY VARCHAR2,
431 x_msg_count OUT NOCOPY NUMBER,
432 x_object_version_number OUT NOCOPY NUMBER,
433 x_msg_data OUT NOCOPY VARCHAR2,
434 p_resp_appl_id IN NUMBER := FND_GLOBAL.RESP_APPL_ID,
435 p_resp_id IN NUMBER := FND_GLOBAL.RESP_ID,
436 p_user_id IN NUMBER := FND_GLOBAL.USER_ID,
437 p_login_id IN NUMBER := NULL,
441 ) AS
438 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
439 p_Charges_Rec IN Charges_Rec_Type := G_MISS_CHRG_REC
440
442 BEGIN
443
444 Update_Charge_Details
445 (
446 p_api_version => p_api_version,
447 p_init_msg_list => p_init_msg_list,
448 p_commit => p_commit,
449 p_validation_level => p_validation_level,
450 x_return_status => x_return_status,
451 x_msg_count => x_msg_count,
452 x_object_version_number => x_object_version_number,
453 x_msg_data => x_msg_data,
454 p_resp_appl_id => p_resp_appl_id,
455 p_resp_id => p_resp_id,
456 p_user_id => p_user_id,
457 p_login_id => p_login_id,
458 p_transaction_control => p_transaction_control,
459 p_Charges_Rec => p_Charges_Rec,
460 p_update_cost_detail => 'N'
461 );
462
463 END;
464
465
466
467
468 /**************************************************
469 Public Procedure Body Update_Charge_Details
470 **************************************************/
471
472 PROCEDURE Update_Charge_Details(
473 p_api_version IN NUMBER,
474 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
475 p_commit IN VARCHAR2 := FND_API.G_FALSE,
476 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
477 x_return_status OUT NOCOPY VARCHAR2,
478 x_msg_count OUT NOCOPY NUMBER,
479 x_object_version_number OUT NOCOPY NUMBER,
480 x_msg_data OUT NOCOPY VARCHAR2,
481 --x_estimate_detail_id OUT NOCOPY NUMBER,
482 --x_line_number OUT NOCOPY NUMBER,
483 p_resp_appl_id IN NUMBER := FND_GLOBAL.RESP_APPL_ID,
484 p_resp_id IN NUMBER := FND_GLOBAL.RESP_ID,
485 p_user_id IN NUMBER := FND_GLOBAL.USER_ID,
486 --p_login_id IN NUMBER := FND_API.G_MISS_NUM,
487 p_login_id IN NUMBER := NULL,
488 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
489 p_Charges_Rec IN Charges_Rec_Type := G_MISS_CHRG_REC,
490 p_update_cost_detail IN VARCHAR2 --service costing
491
492 ) AS
493
494 l_api_name CONSTANT VARCHAR2(30) := 'Update_Charge_Details' ;
495 l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME || '.' || l_api_name ;
496 l_log_module CONSTANT VARCHAR2(255) := 'csxpestb.plsql.' || l_api_name_full || '.';
497 l_api_version CONSTANT NUMBER := 1.0 ;
498 l_resp_appl_id NUMBER := p_resp_appl_id;
499 l_resp_id NUMBER := p_resp_id ;
500 l_user_id NUMBER := p_user_id ;
501 l_login_id NUMBER := p_login_id ;
502 l_charges_rec Charges_Rec_Type;
503 l_cost_rec cs_cost_details_pub.cost_rec_type;--bkc
504 -- l_cost_id NUMBER;
505 l_return_status VARCHAR2(1) ;
506
507 BEGIN
508
509 -- Standard Start of API Savepoint
510 IF FND_API.To_Boolean( p_transaction_control ) THEN
511 SAVEPOINT Update_Charge_Details_PUB ;
512 END IF ;
513
514 --Standard Call to check API compatibility
515 IF NOT FND_API.Compatible_API_Call(l_api_version,
516 p_api_version,
517 l_api_name,
518 G_PKG_NAME )THEN
519 RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
520 END IF ;
521
522 -- Initialize the message list if p_msg_list is set to TRUE
523 IF FND_API.To_Boolean(p_init_msg_list) THEN
524 FND_MSG_PUB.initialize ;
525 END IF ;
526
527
528 --Initialize the API Return Success to True
529 x_return_status := FND_API.G_RET_STS_SUCCESS ;
530
531 ----------------------- FND Logging -----------------------------------
532 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
533 THEN
534 FND_LOG.String
535 ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
536 , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
537 );
538 FND_LOG.String
539 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
540 , 'p_api_version:' || p_api_version
541 );
542 FND_LOG.String
543 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
544 , 'p_init_msg_list:' || p_init_msg_list
545 );
546 FND_LOG.String
547 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
548 , 'p_commit:' || p_commit
549 );
550 FND_LOG.String
551 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
552 , 'p_validation_level:' || p_validation_level
553 );
554 FND_LOG.String
555 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
556 , 'p_resp_appl_id:' || p_resp_appl_id
557 );
558 FND_LOG.String
559 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
560 , 'p_resp_id:' || p_resp_id
561 );
562 FND_LOG.String
563 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
564 , 'p_user_id:' || p_user_id
565 );
566 FND_LOG.String
567 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
568 , 'p_login_id:' || p_login_id
569 );
570 FND_LOG.String
571 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
572 , 'p_transaction_control:' || p_transaction_control
576 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
573 );
574
575 FND_LOG.String
577 , 'p_update_cost_detail: ' || p_update_cost_detail
578 );
579 -- --------------------------------------------------------------------------
580 -- This procedure Logs the charges record paramters.
581 -- --------------------------------------------------------------------------
582 Log_Charges_Rec_Parameters
583 ( p_Charges_Rec => p_Charges_Rec
584 );
585
586 END IF;
587
588 --Resolve Bug # 3078244
589
590 --Convert the IN Parameters from FND_API.G_MISS_XXXX to NULL
591 --TO_NULL (p_Charges_Rec, l_Charges_Rec) ;
592
593
594 BEGIN
595 -- Call the PVT API for the update
596 CS_Charge_Details_PVT.Update_Charge_Details
597 (
598 p_api_version => 1.0 ,
599 p_init_msg_list => FND_API.G_FALSE ,
600 p_commit => p_commit ,
601 p_validation_level => p_validation_level,
602 x_return_status => l_return_status ,
603 x_msg_count => x_msg_count ,
604 x_object_version_number => x_object_version_number,
605 x_msg_data => x_msg_data ,
606 p_resp_appl_id => l_resp_appl_id ,
607 p_resp_id => l_resp_id ,
608 p_user_id => l_user_id ,
609 p_login_id => l_login_id ,
610 p_transaction_control => p_transaction_control ,
611 p_EST_DETAIL_rec => p_Charges_Rec
612 ) ;
613
614 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
615 RAISE FND_API.G_EXC_ERROR;
616 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
617 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
618 END IF;
619
620 --End of API Body
621 --Standard Check of p_commit
622 IF FND_API.To_Boolean( p_commit ) THEN
623 COMMIT WORK ;
624 END IF ;
625
626 --Standard call to get message count and if count is 1 , get message info
627 FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
628 p_data => x_msg_data) ;
629
630 --Begin Exception Handling
631
632 EXCEPTION
633
634 WHEN FND_API.G_EXC_ERROR THEN
635 IF FND_API.To_Boolean( p_transaction_control ) THEN
636 ROLLBACK TO Update_Charge_Details_PUB;
637 END IF ;
638
639 x_return_status := FND_API.G_RET_STS_ERROR ;
640
641 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
642 p_data => x_msg_data,
643 p_encoded => FND_API.G_FALSE) ;
644
645
646 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
647 IF FND_API.To_Boolean( p_transaction_control ) THEN
648 ROLLBACK TO Update_Charge_Details_PUB;
649 END IF ;
650
651 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
652
653 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
654 p_data => x_msg_data,
655 p_encoded => FND_API.G_FALSE) ;
656 WHEN OTHERS THEN
657 IF FND_API.To_Boolean( p_transaction_control ) THEN
658 ROLLBACK TO Update_Charge_Details_PUB;
659 END IF ;
660
661 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
662
663 IF FND_MSG_PUB.Check_Msg_Level
664 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
665 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
666 END IF ;
667
668 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
669 p_data => x_msg_data,
670 p_encoded => FND_API.G_FALSE) ;
671 END ;
672
673 --added by bkanimoz on 15-dec-2007 for service costing
674 --start
675
676 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
677 THEN
678 FND_LOG.String
679 ( FND_LOG.level_procedure ,
680 L_LOG_MODULE || '',
681 'Before call To cost Update Pvt API ' ||'l_return_status :'||l_return_status||'p_Charges_Rec.estimate_Detail_id :'||p_Charges_Rec.estimate_Detail_id
682 );
683 END IF ;
684
685
686 BEGIN
687 --Update Cost record only if charge line has been successfully updated
688
689 IF l_return_status =FND_API.G_RET_STS_SUCCESS
690 and p_update_cost_detail ='Y'
691 and p_Charges_Rec.estimate_Detail_id IS NOT NULL then
692
693 -- Standard Start of API Savepoint
694 IF FND_API.To_Boolean( p_transaction_control ) THEN
695 SAVEPOINT Update_Charge_Cost_Details_PUB ;
696 END IF ;
697
698
699
700 l_cost_rec.estimate_detail_id :=p_Charges_Rec.estimate_Detail_id;
701 -- l_cost_rec.source_code:='SR';
702
703 l_cost_rec.estimate_detail_id := p_Charges_Rec.estimate_Detail_id;
704 l_cost_rec.transaction_date := sysdate;
705
706 --call the costing PVT api with NO Validation ,since the data has already been validated by the charge api
707
708 CS_COST_DETAILS_PVT.UPDATE_COST_DETAILS
709 (
710 p_api_version => 1.0 ,
711 p_init_msg_list => p_init_msg_list ,
712 p_commit => p_commit ,
713 p_validation_level => FND_API.G_VALID_LEVEL_NONE,
714 x_return_status => l_return_status,
715 x_msg_count => x_msg_count,
716 x_object_version_number => x_object_version_number,
717 x_msg_data => x_msg_data,
718 p_resp_appl_id => l_resp_appl_id,
722 p_transaction_control => p_transaction_control,
719 p_resp_id => l_resp_id,
720 p_user_id => l_user_id,
721 p_login_id => l_login_id,
723 p_Cost_Rec => l_cost_rec
724 );
725
726
727 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
728 RAISE FND_API.G_EXC_ERROR;
729 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
730 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731 END IF;
732
733 --End of API Body
734 --standard Check of p_commit
735 IF FND_API.To_Boolean( p_commit ) THEN
736 COMMIT WORK ;
737 END IF ;
738
739 --Standard call to get message count and if count is 1 , get message info
740 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
741 p_data => x_msg_data,
742 p_encoded => FND_API.G_FALSE) ;
743 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
744 THEN
745 FND_LOG.String
746 ( FND_LOG.level_procedure ,
747 L_LOG_MODULE || '',
748 'After call To cost Update Pvt API ' ||'l_return_status :'||l_return_status
749 );
750 END IF ;
751
752
753 END IF;
754
755 EXCEPTION
756
757 WHEN FND_API.G_EXC_ERROR THEN
758 IF FND_API.To_Boolean( p_transaction_control ) THEN
759 ROLLBACK TO Update_Charge_Cost_Details_PUB;
760 END IF ;
761
762 x_return_status := FND_API.G_RET_STS_ERROR ;
763
764 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
765 p_data => x_msg_data,
766 p_encoded => FND_API.G_FALSE) ;
767
768
769 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
770 IF FND_API.To_Boolean( p_transaction_control ) THEN
771 ROLLBACK TO Update_Charge_Cost_Details_PUB;
772 END IF ;
773
774 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
775
776 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
777 p_data => x_msg_data,
778 p_encoded => FND_API.G_FALSE) ;
779 WHEN OTHERS THEN
780 IF FND_API.To_Boolean( p_transaction_control ) THEN
781 ROLLBACK TO Update_Charge_Cost_Details_PUB;
782 END IF ;
783
784 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
785
786 IF FND_MSG_PUB.Check_Msg_Level
787 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
788 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
789 END IF ;
790
791 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
792 p_data => x_msg_data,
793 p_encoded => FND_API.G_FALSE) ;
794
795
796
797
798 END;
799 --end;
800
801
802 END Update_Charge_Details; -- End of Procedure Update Charge Details
803
804
805 --This is added for backward compatibility
806
807 Procedure Delete_Charge_Details
808 (
809 p_api_version IN NUMBER,
810 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
811 p_commit IN VARCHAR2 := FND_API.G_FALSE,
812 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
813 x_return_status OUT NOCOPY VARCHAR2,
814 x_msg_count OUT NOCOPY NUMBER,
815 x_msg_data OUT NOCOPY VARCHAR2,
816 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
817 p_estimate_detail_id IN NUMBER := NULL
818 )
819 AS
820
821 BEGIN
822
823 Delete_Charge_Details
824 (
825
826 p_api_version => p_api_version,
827 p_init_msg_list => p_init_msg_list,
828 p_commit => p_commit,
829 p_validation_level => p_validation_level,
830 x_return_status => x_return_status,
831 x_msg_count => x_msg_count,
832 x_msg_data => x_msg_data,
833 p_transaction_control => p_transaction_control,
834 p_estimate_detail_id => p_estimate_detail_id,
835 p_delete_cost_detail => 'N'
836
837 );
838
839 END;
840
841 /**************************************************
842 Public Procedure Body Delete_Charge_Details
843 **************************************************/
844
845 Procedure Delete_Charge_Details
846 (
847 p_api_version IN NUMBER,
848 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
849 p_commit IN VARCHAR2 := FND_API.G_FALSE,
850 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
851 x_return_status OUT NOCOPY VARCHAR2,
852 x_msg_count OUT NOCOPY NUMBER,
853 x_msg_data OUT NOCOPY VARCHAR2,
854 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
855 p_estimate_detail_id IN NUMBER := NULL,
856 p_delete_cost_detail IN VARCHAR2--new parameter for service costing
857 ) AS
858
859 l_api_name CONSTANT VARCHAR2(30) := 'Delete_Charge_Details' ;
860 l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME || '.' || l_api_name ;
861 l_log_module CONSTANT VARCHAR2(255) := 'csxpestb.plsql.' || l_api_name_full || '.';
862 l_api_version CONSTANT NUMBER := 1.0 ;
863
864 l_resp_appl_id NUMBER ;
865 l_resp_id NUMBER ;
866 l_user_id NUMBER ;
867 l_login_id NUMBER ;
868 l_return_status VARCHAR2(1) ;
869
873 BEGIN
870 l_estimate_detail_id NUMBER := p_estimate_detail_id ;
871 l_cost_id NUMBER;
872
874
875 -- Standard Start of API Savepoint
876 IF FND_API.To_Boolean( p_transaction_control ) THEN
877 SAVEPOINT Delete_Charge_Details_PUB ;
878 END IF ;
879
880 -- Standard Call to check API compatibility
881 IF NOT FND_API.Compatible_API_Call(l_api_version,
882 p_api_version,
883 l_api_name,
884 G_PKG_NAME ) THEN
885 RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
886 END IF ;
887
888 -- Initialize the message list if p_msg_list is set to TRUE
889 IF FND_API.To_Boolean(p_init_msg_list) THEN
890 FND_MSG_PUB.initialize ;
891 END IF ;
892
893
894 -- Initialize the API Return Success to True
895 x_return_status := FND_API.G_RET_STS_SUCCESS ;
896
897 ----------------------- FND Logging -----------------------------------
898 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
899 THEN
900 FND_LOG.String
901 ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
902 , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
903 );
904 FND_LOG.String
905 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
906 , 'p_api_version:' || p_api_version
907 );
908 FND_LOG.String
909 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
910 , 'p_init_msg_list:' || p_init_msg_list
911 );
912 FND_LOG.String
913 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
914 , 'p_commit:' || p_commit
915 );
916 FND_LOG.String
917 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
918 , 'p_validation_level:' || p_validation_level
919 );
920 FND_LOG.String
921 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
922 , 'p_transaction_control:' || p_transaction_control
923 );
924 FND_LOG.String
925 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
926 , 'p_estimate_detail_id:' || p_estimate_detail_id
927 );
928 FND_LOG.String
929 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
930 , 'p_delete_cost_detail:' || p_delete_cost_detail
931 );
932 END IF;
933
934 --need to call pvt API
935 BEGIN
936 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
937 THEN
938 FND_LOG.String
939 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
940 , 'Before callin Charges Delete Pvt API'
941 );
942 END IF ;
943
944 CS_CHARGE_DETAILS_PVT.DELETE_CHARGE_DETAILS
945 (
946 p_api_version => 1.0 ,
947 p_init_msg_list => FND_API.G_FALSE,
948 p_commit => p_commit,
949 p_validation_level => p_validation_level,
950 x_return_status => l_return_status,
951 x_msg_count => x_msg_count,
952 x_msg_data => x_msg_data,
953 p_transaction_control => p_transaction_control,
954 p_estimate_detail_id => p_estimate_detail_id
955 ) ;
956
957 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
958 RAISE FND_API.G_EXC_ERROR;
959 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
960 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
961 END IF;
962
963 -- End of API Body
964 -- Standard Check of p_commit
965 IF FND_API.To_Boolean( p_commit ) THEN
966 COMMIT WORK ;
967 END IF ;
968
969 --Standard call to get message count and if count is 1 , get message info
970 FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
971 p_data => x_msg_data) ;
972
973 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
974 THEN
975 FND_LOG.String
976 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
977 , 'After callin Charges Delete Pvt API: '||l_return_status||x_msg_data
978 );
979 END IF ;
980 EXCEPTION
981
982 WHEN FND_API.G_EXC_ERROR THEN
983 IF FND_API.To_Boolean( p_transaction_control ) THEN
984 ROLLBACK TO Delete_Charge_Details_PUB;
985 END IF ;
986
987 x_return_status := FND_API.G_RET_STS_ERROR ;
988
989 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
990 p_data => x_msg_data,
991 p_encoded => FND_API.G_FALSE) ;
992
993 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
994 IF FND_API.To_Boolean( p_transaction_control ) THEN
995 ROLLBACK TO Delete_Charge_Details_PUB;
996 END IF ;
997
998 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
999
1000 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1001 p_data => x_msg_data,
1002 p_encoded => FND_API.G_FALSE) ;
1003
1004 WHEN OTHERS THEN
1005 IF FND_API.To_Boolean( p_transaction_control ) THEN
1006 ROLLBACK TO Delete_Charge_Details_PUB;
1007 END IF ;
1008
1009 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1010
1011 IF FND_MSG_PUB.Check_Msg_Level
1012 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1013 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
1014 END IF ;
1015
1016 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1017 p_data => x_msg_data,
1018 p_encoded => FND_API.G_FALSE) ;
1019 END;
1020 --added by bkanimoz on 15-dec-2007 for service costing
1021 --start
1022
1023
1027
1024
1025 BEGIN
1026 --If charge line has been deleted successfully then call the costing api to delete the cost record
1028
1029
1030 IF l_return_status = FND_API.G_RET_STS_SUCCESS then
1031 -- Standard Start of API Savepoint
1032 IF FND_API.To_Boolean( p_transaction_control ) THEN
1033 SAVEPOINT Delete_Charge_Cost_Details_PUB ;
1034 END IF ;
1035
1036 begin
1037 select cost_id
1038 into l_cost_id
1039 from cs_cost_details csd
1040 where csd.estimate_Detail_id = p_estimate_detail_id;
1041 exception
1042 when no_data_found then
1043 l_cost_id:=null;
1044 when others then
1045 l_cost_id:=null;
1046 end;
1047 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1048 THEN
1049 FND_LOG.String
1050 ( FND_LOG.level_procedure ,
1051 L_LOG_MODULE || '',
1052 'l_cost_id' ||l_cost_id
1053 );
1054
1055 FND_LOG.String
1056 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1057 , 'Before callin Cost Delete Pvt API:l_cost_id : '||l_cost_id
1058 );
1059 END IF ;
1060 if l_cost_id is not null then
1061 CS_COST_DETAILS_PVT.DELETE_COST_DETAILS
1062 (
1063 p_api_version => 1.0 ,
1064 p_init_msg_list => p_init_msg_list,
1065 p_commit => p_commit,
1066 p_validation_level => FND_API.G_VALID_LEVEL_NONE,
1067 x_return_status => l_return_status,
1068 x_msg_count => x_msg_count,
1069 x_msg_data => x_msg_data,
1070 p_transaction_control => p_transaction_control,
1071 p_cost_id => l_cost_id
1072 );
1073
1074 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1075 RAISE FND_API.G_EXC_ERROR;
1076 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1077 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1078 END IF;
1079
1080
1081 end if;
1082
1083
1084 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1085 THEN
1086 FND_LOG.String
1087 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1088 , 'After callin Cost Delete Pvt API:l_cost_id : '||l_return_status
1089 );
1090 END IF ;
1091
1092 END IF;
1093 --Begin Exception Handling
1094
1095 EXCEPTION
1096
1097 WHEN FND_API.G_EXC_ERROR THEN
1098 IF FND_API.To_Boolean( p_transaction_control ) THEN
1099 ROLLBACK TO Delete_Charge_Cost_Details_PUB ;
1100 END IF ;
1101
1102 x_return_status := FND_API.G_RET_STS_ERROR ;
1103
1104 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1105 p_data => x_msg_data,
1106 p_encoded => FND_API.G_FALSE) ;
1107
1108 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1109 IF FND_API.To_Boolean( p_transaction_control ) THEN
1110 ROLLBACK TO Delete_Charge_Cost_Details_PUB ;
1111 END IF ;
1112
1113 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1114
1115 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1116 p_data => x_msg_data,
1117 p_encoded => FND_API.G_FALSE) ;
1118
1119 WHEN OTHERS THEN
1120 IF FND_API.To_Boolean( p_transaction_control ) THEN
1121 ROLLBACK TO Delete_Charge_Cost_Details_PUB ;
1122 END IF ;
1123
1124 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1125
1126 IF FND_MSG_PUB.Check_Msg_Level
1127 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1128 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
1129 END IF ;
1130
1131 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1132 p_data => x_msg_data,
1133 p_encoded => FND_API.G_FALSE) ;
1134 END;
1135
1136 END Delete_Charge_Details; -- End of Procedure Delete Charge Details
1137
1138
1139 /**************************************************
1140 Public Procedure Body Copy_Estimate
1141 **************************************************/
1142
1143 Procedure Copy_Estimate(
1144 p_api_version IN NUMBER,
1145 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1146 p_commit IN VARCHAR2 := FND_API.G_FALSE,
1147 p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
1148 p_estimate_detail_id IN NUMBER := NULL,
1149 x_estimate_detail_id OUT NOCOPY NUMBER,
1150 x_return_status OUT NOCOPY VARCHAR2,
1151 x_msg_count OUT NOCOPY NUMBER,
1152 x_msg_data OUT NOCOPY VARCHAR2) AS
1153
1154 l_api_name CONSTANT VARCHAR2(30) := 'Copy_Estimate' ;
1155 l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME || '.' || l_api_name ;
1156 l_log_module CONSTANT VARCHAR2(255) := 'csxpestb.plsql.' || l_api_name_full || '.';
1157 l_api_version CONSTANT NUMBER := 1.0 ;
1158
1159 l_return_status VARCHAR2(1) ;
1160
1161 BEGIN
1162
1163 --DBMS_OUTPUT.PUT_LINE('in Public API');
1164
1165 -- Standard Start of API Savepoint
1166 IF FND_API.To_Boolean( p_transaction_control ) THEN
1167 SAVEPOINT Copy_Estimates_PUB ;
1168 END IF ;
1169
1170 -- Standard Call to check API compatibility
1171 IF NOT FND_API.Compatible_API_Call(l_api_version,
1172 p_api_version,
1173 l_api_name,
1174 G_PKG_NAME ) THEN
1175 RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1176 END IF ;
1177
1178 -- Initialize the message list if p_msg_list is set to TRUE
1182
1179 IF FND_API.To_Boolean(p_init_msg_list) THEN
1180 FND_MSG_PUB.initialize ;
1181 END IF ;
1183
1184 -- Initialize the API Return Success to True
1185 x_return_status := FND_API.G_RET_STS_SUCCESS ;
1186
1187 ----------------------- FND Logging -----------------------------------
1188 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1189 THEN
1190 FND_LOG.String
1191 ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
1192 , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1193 );
1194 FND_LOG.String
1195 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1196 , 'p_api_version:' || p_api_version
1197 );
1198 FND_LOG.String
1199 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1200 , 'p_init_msg_list:' || p_init_msg_list
1201 );
1202 FND_LOG.String
1203 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1204 , 'p_commit:' || p_commit
1205 );
1206 FND_LOG.String
1207 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1208 , 'p_transaction_control:' || p_transaction_control
1209 );
1210 FND_LOG.String
1211 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1212 , 'p_estimate_detail_id:' || p_estimate_detail_id
1213 );
1214 END IF;
1215
1216 --need to call pvt API
1217
1218 --DBMS_OUTPUT.PUT_LINE('Call Private API');
1219
1220 CS_Charge_Details_PVT.Copy_Estimate(
1221 p_api_version => l_api_version,
1222 p_init_msg_list => FND_API.G_FALSE,
1223 p_commit => FND_API.G_FALSE,
1224 p_transaction_control => FND_API.G_FALSE,
1225 p_estimate_detail_id => p_estimate_detail_id,
1226 x_estimate_detail_id => x_estimate_detail_id,
1227 x_return_status => l_return_status,
1228 x_msg_count => x_msg_count,
1229 x_msg_data => x_msg_data) ;
1230
1231
1232 --DBMS_OUTPUT.PUT_LINE('return status is '||l_return_status);
1233
1234 IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1235 RAISE FND_API.G_EXC_ERROR;
1236 ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1237 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1238 END IF;
1239
1240
1241 -- End of API Body
1242 -- Standard Check of p_commit
1243 IF FND_API.To_Boolean( p_commit ) THEN
1244 COMMIT WORK ;
1245 END IF ;
1246
1247 --Standard call to get message count and if count is 1 , get message info
1248 FND_MSG_PUB.Count_And_Get(p_count =>x_msg_count,
1249 p_data => x_msg_data) ;
1250
1251 --Begin Exception Handling
1252
1253 EXCEPTION
1254
1255 WHEN FND_API.G_EXC_ERROR THEN
1256 IF FND_API.To_Boolean( p_transaction_control ) THEN
1257 ROLLBACK TO Copy_Estimates_PUB;
1258 END IF ;
1259
1260 x_return_status := FND_API.G_RET_STS_ERROR ;
1261
1262 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1263 p_data => x_msg_data,
1264 p_encoded => FND_API.G_FALSE) ;
1265
1266 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1267 IF FND_API.To_Boolean( p_transaction_control ) THEN
1268 ROLLBACK TO Copy_Estimates_PUB;
1269 END IF ;
1270
1271 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1272
1273 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1274 p_data => x_msg_data,
1275 p_encoded => FND_API.G_FALSE) ;
1276
1277 WHEN OTHERS THEN
1278 IF FND_API.To_Boolean( p_transaction_control ) THEN
1279 ROLLBACK TO Copy_Estimates_PUB;
1280 END IF ;
1281
1282 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1283
1284 IF FND_MSG_PUB.Check_Msg_Level
1285 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1286 FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
1287 END IF ;
1288
1289 FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1290 p_data => x_msg_data,
1291 p_encoded => FND_API.G_FALSE) ;
1292
1293 END Copy_Estimate; -- End of Procedure Copy_Estimate
1294
1295 /**************************************************
1296 Private Procedure Body TO_NULL
1297 **************************************************/
1298
1299 PROCEDURE TO_NULL(p_charges_rec_in IN Charges_Rec_Type,
1300 p_charges_rec_out OUT NOCOPY Charges_Rec_Type) IS
1301 BEGIN
1302 p_charges_rec_out.estimate_detail_id := Check_For_Miss(p_charges_rec_in.estimate_detail_id) ;
1303 p_charges_rec_out.incident_id := Check_For_Miss(p_charges_rec_in.incident_id ) ;
1304 p_charges_rec_out.charge_line_type := Check_For_Miss(p_charges_rec_in.charge_line_type);
1305 p_charges_rec_out.line_number := Check_For_Miss(p_charges_rec_in.line_number );
1306 p_charges_rec_out.business_process_id := Check_For_Miss(p_charges_rec_in.business_process_id ) ;
1307 p_charges_rec_out.transaction_type_id := Check_For_Miss(p_charges_rec_in.transaction_type_id);
1308 p_charges_rec_out.inventory_item_id_in := Check_For_Miss(p_charges_rec_in.inventory_item_id_in ) ;
1309 p_charges_rec_out.item_revision := Check_For_Miss(p_charges_rec_in.item_revision ) ;
1310 p_charges_rec_out.billing_flag := Check_For_Miss(p_charges_rec_in.billing_flag);
1311 p_charges_rec_out.txn_billing_type_id := Check_For_Miss(p_charges_rec_in.txn_billing_type_id ) ;
1312 p_charges_rec_out.unit_of_measure_code := Check_For_Miss(p_charges_rec_in.unit_of_measure_code ) ;
1313 p_charges_rec_out.quantity_required := Check_For_Miss(p_charges_rec_in.quantity_required ) ;
1317 p_charges_rec_out.installed_cp_return_by_date := Check_For_Miss(p_charges_rec_in.installed_cp_return_by_date ) ;
1314 p_charges_rec_out.return_reason_code := Check_For_Miss(p_charges_rec_in.return_reason_code ) ;
1315 p_charges_rec_out.customer_product_id := Check_For_Miss(p_charges_rec_in.customer_product_id ) ;
1316 p_charges_rec_out.serial_number := Check_For_Miss(p_charges_rec_in.serial_number ) ;
1318 p_charges_rec_out.new_cp_return_by_date := Check_For_Miss(p_charges_rec_in.new_cp_return_by_date ) ;
1319 p_charges_rec_out.sold_to_party_id := Check_For_Miss(p_charges_rec_in.sold_to_party_id);
1320 p_charges_rec_out.bill_to_party_id := Check_For_Miss(p_charges_rec_in.bill_to_party_id);
1321 p_charges_rec_out.bill_to_account_id := Check_For_Miss(p_charges_rec_in.bill_to_account_id);
1322 p_charges_rec_out.bill_to_contact_id := Check_For_Miss(p_charges_rec_in.bill_to_contact_id);
1323 p_charges_rec_out.invoice_to_org_id := Check_For_Miss(p_charges_rec_in.invoice_to_org_id ) ;
1324 p_charges_rec_out.ship_to_party_id := Check_For_Miss(p_charges_rec_in.ship_to_party_id);
1325 p_charges_rec_out.ship_to_account_id := Check_For_Miss(p_charges_rec_in.ship_to_account_id);
1326 p_charges_rec_out.ship_to_contact_id := Check_For_Miss(p_charges_rec_in.ship_to_contact_id);
1327 p_charges_rec_out.contract_line_id := Check_For_Miss(p_charges_rec_in.contract_line_id);
1328 p_charges_rec_out.rate_type_code := Check_For_Miss(p_charges_rec_in.rate_type_code);
1329 p_charges_rec_out.contract_id := Check_For_Miss(p_charges_rec_in.contract_id ) ;
1330 p_charges_rec_out.ship_to_org_id := Check_For_Miss(p_charges_rec_in.ship_to_org_id ) ;
1331 p_charges_rec_out.coverage_id := Check_For_Miss(p_charges_rec_in.coverage_id ) ;
1332 p_charges_rec_out.coverage_txn_group_id := Check_For_Miss(p_charges_rec_in.coverage_txn_group_id ) ;
1333 p_charges_rec_out.coverage_bill_rate_id := Check_For_Miss(p_charges_rec_in.coverage_bill_rate_id ) ;
1334 p_charges_rec_out.coverage_billing_type_id := Check_For_Miss(p_charges_rec_in.coverage_billing_type_id );
1335 p_charges_rec_out.price_list_id := Check_For_Miss(p_charges_rec_in.price_list_id ) ;
1336 p_charges_rec_out.currency_code := Check_For_Miss(p_charges_rec_in.currency_code ) ;
1337 p_charges_rec_out.purchase_order_num := Check_For_Miss(p_charges_rec_in.purchase_order_num ) ;
1338 p_charges_rec_out.list_price := Check_For_Miss(p_charges_rec_in.list_price);
1339 p_charges_rec_out.con_pct_over_list_price := Check_For_Miss(p_charges_rec_in.con_pct_over_list_price );
1340 p_charges_rec_out.selling_price := Check_For_Miss(p_charges_rec_in.selling_price ) ;
1341 p_charges_rec_out.contract_discount_amount := Check_For_Miss(p_charges_rec_in.contract_discount_amount);
1342 p_charges_rec_out.apply_contract_discount := Check_For_Miss(p_charges_rec_in.apply_contract_discount );
1343 p_charges_rec_out.after_warranty_cost := Check_For_Miss(p_charges_rec_in.after_warranty_cost ) ;
1344 p_charges_rec_out.transaction_inventory_org := Check_For_Miss(p_charges_rec_in.transaction_inventory_org);
1345 p_charges_rec_out.transaction_sub_inventory := Check_For_Miss(p_charges_rec_in.transaction_sub_inventory);
1346 p_charges_rec_out.rollup_flag := Check_For_Miss(p_charges_rec_in.rollup_flag ) ;
1347 p_charges_rec_out.add_to_order_flag := Check_For_Miss(p_charges_rec_in.add_to_order_flag ) ;
1348 p_charges_rec_out.order_header_id := Check_For_Miss(p_charges_rec_in.order_header_id ) ;
1349 p_charges_rec_out.interface_to_oe_flag := Check_For_Miss(p_charges_rec_in.interface_to_oe_flag ) ;
1350 p_charges_rec_out.no_charge_flag := Check_For_Miss(p_charges_rec_in.no_charge_flag ) ;
1351 p_charges_rec_out.line_category_code := Check_For_Miss(p_charges_rec_in.line_category_code ) ;
1352 p_charges_rec_out.line_type_id := Check_For_Miss(p_charges_rec_in.line_type_id );
1353 p_charges_rec_out.order_line_id := Check_For_Miss(p_charges_rec_in.order_line_id );
1354 p_charges_rec_out.conversion_rate := Check_For_Miss(p_charges_rec_in.conversion_rate );
1355 p_charges_rec_out.conversion_type_code := Check_For_Miss(p_charges_rec_in.conversion_type_code );
1356 p_charges_rec_out.conversion_rate_date := Check_For_Miss(p_charges_rec_in.conversion_rate_date );
1357 p_charges_rec_out.original_source_id := Check_For_Miss(p_charges_rec_in.original_source_id ) ;
1358 p_charges_rec_out.original_source_code := Check_For_Miss(p_charges_rec_in.original_source_code) ;
1359 p_charges_rec_out.source_id := Check_For_Miss(p_charges_rec_in.source_id ) ;
1360 p_charges_rec_out.source_code := Check_For_Miss(p_charges_rec_in.source_code) ;
1361 p_charges_rec_out.activity_start_time := Check_For_Miss(p_charges_rec_in.activity_start_time);
1362 p_charges_rec_out.activity_end_time := Check_For_Miss(p_charges_rec_in.activity_end_time);
1363 p_charges_rec_out.generated_by_bca_engine := Check_For_Miss(p_charges_rec_in.generated_by_bca_engine);
1364 p_charges_rec_out.org_id := Check_For_Miss(p_charges_rec_in.org_id);
1365 p_charges_rec_out.submit_restriction_message := Check_For_Miss(p_charges_rec_in.submit_restriction_message);
1366 p_charges_rec_out.submit_error_message := Check_For_Miss(p_charges_rec_in.submit_error_message);
1367 p_charges_rec_out.submit_from_system := Check_For_Miss(p_charges_rec_in.submit_from_system);
1368 p_charges_rec_out.line_submitted_flag := Check_For_Miss(p_charges_rec_in.line_submitted_flag);
1369 p_charges_rec_out.context := Check_For_Miss(p_charges_rec_in.context) ;
1370 p_charges_rec_out.attribute1 := Check_For_Miss(p_charges_rec_in.attribute1) ;
1371 p_charges_rec_out.attribute2 := Check_For_Miss(p_charges_rec_in.attribute2) ;
1372 p_charges_rec_out.attribute3 := Check_For_Miss(p_charges_rec_in.attribute3) ;
1373 p_charges_rec_out.attribute4 := Check_For_Miss(p_charges_rec_in.attribute4) ;
1374 p_charges_rec_out.attribute5 := Check_For_Miss(p_charges_rec_in.attribute5) ;
1378 p_charges_rec_out.attribute9 := Check_For_Miss(p_charges_rec_in.attribute9) ;
1375 p_charges_rec_out.attribute6 := Check_For_Miss(p_charges_rec_in.attribute6) ;
1376 p_charges_rec_out.attribute7 := Check_For_Miss(p_charges_rec_in.attribute7) ;
1377 p_charges_rec_out.attribute8 := Check_For_Miss(p_charges_rec_in.attribute8) ;
1379 p_charges_rec_out.attribute10 := Check_For_Miss(p_charges_rec_in.attribute10) ;
1380 p_charges_rec_out.attribute11 := Check_For_Miss(p_charges_rec_in.attribute11) ;
1381 p_charges_rec_out.attribute12 := Check_For_Miss(p_charges_rec_in.attribute12) ;
1382 p_charges_rec_out.attribute13 := Check_For_Miss(p_charges_rec_in.attribute13) ;
1383 p_charges_rec_out.attribute14 := Check_For_Miss(p_charges_rec_in.attribute14) ;
1384 p_charges_rec_out.attribute15 := Check_For_Miss(p_charges_rec_in.attribute15) ;
1385 p_charges_rec_out.pricing_context := Check_For_Miss(p_charges_rec_in.pricing_context) ;
1386 p_charges_rec_out.pricing_attribute1 := Check_For_Miss(p_charges_rec_in.pricing_attribute1) ;
1387 p_charges_rec_out.pricing_attribute2 := Check_For_Miss(p_charges_rec_in.pricing_attribute2) ;
1388 p_charges_rec_out.pricing_attribute3 := Check_For_Miss(p_charges_rec_in.pricing_attribute3) ;
1389 p_charges_rec_out.pricing_attribute4 := Check_For_Miss(p_charges_rec_in.pricing_attribute4) ;
1390 p_charges_rec_out.pricing_attribute5 := Check_For_Miss(p_charges_rec_in.pricing_attribute5) ;
1391 p_charges_rec_out.pricing_attribute6 := Check_For_Miss(p_charges_rec_in.pricing_attribute6) ;
1392 p_charges_rec_out.pricing_attribute7 := Check_For_Miss(p_charges_rec_in.pricing_attribute7) ;
1393 p_charges_rec_out.pricing_attribute8 := Check_For_Miss(p_charges_rec_in.pricing_attribute8) ;
1394 p_charges_rec_out.pricing_attribute9 := Check_For_Miss(p_charges_rec_in.pricing_attribute9) ;
1395 p_charges_rec_out.pricing_attribute10 := Check_For_Miss(p_charges_rec_in.pricing_attribute10) ;
1396 p_charges_rec_out.pricing_attribute11 := Check_For_Miss(p_charges_rec_in.pricing_attribute11) ;
1397 p_charges_rec_out.pricing_attribute12 := Check_For_Miss(p_charges_rec_in.pricing_attribute12) ;
1398 p_charges_rec_out.pricing_attribute13 := Check_For_Miss(p_charges_rec_in.pricing_attribute13) ;
1399 p_charges_rec_out.pricing_attribute14 := Check_For_Miss(p_charges_rec_in.pricing_attribute14) ;
1400 p_charges_rec_out.pricing_attribute15 := Check_For_Miss(p_charges_rec_in.pricing_attribute15) ;
1401 p_charges_rec_out.pricing_attribute16 := Check_For_Miss(p_charges_rec_in.pricing_attribute16) ;
1402 p_charges_rec_out.pricing_attribute17 := Check_For_Miss(p_charges_rec_in.pricing_attribute17) ;
1403 p_charges_rec_out.pricing_attribute18 := Check_For_Miss(p_charges_rec_in.pricing_attribute18) ;
1404 p_charges_rec_out.pricing_attribute19 := Check_For_Miss(p_charges_rec_in.pricing_attribute19) ;
1405 p_charges_rec_out.pricing_attribute20 := Check_For_Miss(p_charges_rec_in.pricing_attribute20) ;
1406 p_charges_rec_out.pricing_attribute21 := Check_For_Miss(p_charges_rec_in.pricing_attribute21) ;
1407 p_charges_rec_out.pricing_attribute22 := Check_For_Miss(p_charges_rec_in.pricing_attribute22) ;
1408 p_charges_rec_out.pricing_attribute23 := Check_For_Miss(p_charges_rec_in.pricing_attribute23) ;
1409 p_charges_rec_out.pricing_attribute24 := Check_For_Miss(p_charges_rec_in.pricing_attribute24) ;
1410 p_charges_rec_out.pricing_attribute25 := Check_For_Miss(p_charges_rec_in.pricing_attribute25) ;
1411 p_charges_rec_out.pricing_attribute26 := Check_For_Miss(p_charges_rec_in.pricing_attribute26) ;
1412 p_charges_rec_out.pricing_attribute27 := Check_For_Miss(p_charges_rec_in.pricing_attribute27) ;
1413 p_charges_rec_out.pricing_attribute28 := Check_For_Miss(p_charges_rec_in.pricing_attribute28) ;
1414 p_charges_rec_out.pricing_attribute29 := Check_For_Miss(p_charges_rec_in.pricing_attribute29) ;
1415 p_charges_rec_out.pricing_attribute30 := Check_For_Miss(p_charges_rec_in.pricing_attribute30) ;
1416 p_charges_rec_out.pricing_attribute31 := Check_For_Miss(p_charges_rec_in.pricing_attribute31) ;
1417 p_charges_rec_out.pricing_attribute32 := Check_For_Miss(p_charges_rec_in.pricing_attribute32) ;
1418 p_charges_rec_out.pricing_attribute33 := Check_For_Miss(p_charges_rec_in.pricing_attribute33) ;
1419 p_charges_rec_out.pricing_attribute34 := Check_For_Miss(p_charges_rec_in.pricing_attribute34) ;
1420 p_charges_rec_out.pricing_attribute35 := Check_For_Miss(p_charges_rec_in.pricing_attribute35) ;
1421 p_charges_rec_out.pricing_attribute36 := Check_For_Miss(p_charges_rec_in.pricing_attribute36) ;
1422 p_charges_rec_out.pricing_attribute37 := Check_For_Miss(p_charges_rec_in.pricing_attribute37) ;
1423 p_charges_rec_out.pricing_attribute38 := Check_For_Miss(p_charges_rec_in.pricing_attribute38) ;
1424 p_charges_rec_out.pricing_attribute39 := Check_For_Miss(p_charges_rec_in.pricing_attribute39) ;
1425 p_charges_rec_out.pricing_attribute40 := Check_For_Miss(p_charges_rec_in.pricing_attribute40) ;
1426 p_charges_rec_out.pricing_attribute41 := Check_For_Miss(p_charges_rec_in.pricing_attribute41) ;
1427 p_charges_rec_out.pricing_attribute42 := Check_For_Miss(p_charges_rec_in.pricing_attribute42) ;
1428 p_charges_rec_out.pricing_attribute43 := Check_For_Miss(p_charges_rec_in.pricing_attribute43) ;
1429 p_charges_rec_out.pricing_attribute44 := Check_For_Miss(p_charges_rec_in.pricing_attribute44) ;
1430 p_charges_rec_out.pricing_attribute45 := Check_For_Miss(p_charges_rec_in.pricing_attribute45) ;
1431 p_charges_rec_out.pricing_attribute46 := Check_For_Miss(p_charges_rec_in.pricing_attribute46) ;
1432 p_charges_rec_out.pricing_attribute47 := Check_For_Miss(p_charges_rec_in.pricing_attribute47) ;
1433 p_charges_rec_out.pricing_attribute48 := Check_For_Miss(p_charges_rec_in.pricing_attribute48) ;
1434 p_charges_rec_out.pricing_attribute49 := Check_For_Miss(p_charges_rec_in.pricing_attribute49) ;
1435 p_charges_rec_out.pricing_attribute50 := Check_For_Miss(p_charges_rec_in.pricing_attribute50) ;
1439 p_charges_rec_out.pricing_attribute54 := Check_For_Miss(p_charges_rec_in.pricing_attribute54) ;
1436 p_charges_rec_out.pricing_attribute51 := Check_For_Miss(p_charges_rec_in.pricing_attribute51) ;
1437 p_charges_rec_out.pricing_attribute52 := Check_For_Miss(p_charges_rec_in.pricing_attribute52) ;
1438 p_charges_rec_out.pricing_attribute53 := Check_For_Miss(p_charges_rec_in.pricing_attribute53) ;
1440 p_charges_rec_out.pricing_attribute55 := Check_For_Miss(p_charges_rec_in.pricing_attribute55) ;
1441 p_charges_rec_out.pricing_attribute56 := Check_For_Miss(p_charges_rec_in.pricing_attribute56) ;
1442 p_charges_rec_out.pricing_attribute57 := Check_For_Miss(p_charges_rec_in.pricing_attribute57) ;
1443 p_charges_rec_out.pricing_attribute58 := Check_For_Miss(p_charges_rec_in.pricing_attribute58) ;
1444 p_charges_rec_out.pricing_attribute59 := Check_For_Miss(p_charges_rec_in.pricing_attribute59) ;
1445 p_charges_rec_out.pricing_attribute60 := Check_For_Miss(p_charges_rec_in.pricing_attribute60) ;
1446 p_charges_rec_out.pricing_attribute61 := Check_For_Miss(p_charges_rec_in.pricing_attribute61) ;
1447 p_charges_rec_out.pricing_attribute62 := Check_For_Miss(p_charges_rec_in.pricing_attribute62) ;
1448 p_charges_rec_out.pricing_attribute63 := Check_For_Miss(p_charges_rec_in.pricing_attribute63) ;
1449 p_charges_rec_out.pricing_attribute64 := Check_For_Miss(p_charges_rec_in.pricing_attribute64) ;
1450 p_charges_rec_out.pricing_attribute65 := Check_For_Miss(p_charges_rec_in.pricing_attribute65) ;
1451 p_charges_rec_out.pricing_attribute66 := Check_For_Miss(p_charges_rec_in.pricing_attribute66) ;
1452 p_charges_rec_out.pricing_attribute67 := Check_For_Miss(p_charges_rec_in.pricing_attribute67) ;
1453 p_charges_rec_out.pricing_attribute68 := Check_For_Miss(p_charges_rec_in.pricing_attribute68) ;
1454 p_charges_rec_out.pricing_attribute69 := Check_For_Miss(p_charges_rec_in.pricing_attribute69) ;
1455 p_charges_rec_out.pricing_attribute70 := Check_For_Miss(p_charges_rec_in.pricing_attribute70) ;
1456 p_charges_rec_out.pricing_attribute71 := Check_For_Miss(p_charges_rec_in.pricing_attribute71) ;
1457 p_charges_rec_out.pricing_attribute72 := Check_For_Miss(p_charges_rec_in.pricing_attribute72) ;
1458 p_charges_rec_out.pricing_attribute73 := Check_For_Miss(p_charges_rec_in.pricing_attribute73) ;
1459 p_charges_rec_out.pricing_attribute74 := Check_For_Miss(p_charges_rec_in.pricing_attribute74) ;
1460 p_charges_rec_out.pricing_attribute75 := Check_For_Miss(p_charges_rec_in.pricing_attribute75) ;
1461 p_charges_rec_out.pricing_attribute76 := Check_For_Miss(p_charges_rec_in.pricing_attribute76) ;
1462 p_charges_rec_out.pricing_attribute77 := Check_For_Miss(p_charges_rec_in.pricing_attribute77) ;
1463 p_charges_rec_out.pricing_attribute78 := Check_For_Miss(p_charges_rec_in.pricing_attribute78) ;
1464 p_charges_rec_out.pricing_attribute79 := Check_For_Miss(p_charges_rec_in.pricing_attribute79) ;
1465 p_charges_rec_out.pricing_attribute80 := Check_For_Miss(p_charges_rec_in.pricing_attribute80) ;
1466 p_charges_rec_out.pricing_attribute81 := Check_For_Miss(p_charges_rec_in.pricing_attribute81) ;
1467 p_charges_rec_out.pricing_attribute82 := Check_For_Miss(p_charges_rec_in.pricing_attribute82) ;
1468 p_charges_rec_out.pricing_attribute83 := Check_For_Miss(p_charges_rec_in.pricing_attribute83) ;
1469 p_charges_rec_out.pricing_attribute84 := Check_For_Miss(p_charges_rec_in.pricing_attribute84) ;
1470 p_charges_rec_out.pricing_attribute85 := Check_For_Miss(p_charges_rec_in.pricing_attribute85) ;
1471 p_charges_rec_out.pricing_attribute86 := Check_For_Miss(p_charges_rec_in.pricing_attribute86) ;
1472 p_charges_rec_out.pricing_attribute87 := Check_For_Miss(p_charges_rec_in.pricing_attribute87) ;
1473 p_charges_rec_out.pricing_attribute88 := Check_For_Miss(p_charges_rec_in.pricing_attribute88) ;
1474 p_charges_rec_out.pricing_attribute89 := Check_For_Miss(p_charges_rec_in.pricing_attribute89) ;
1475 p_charges_rec_out.pricing_attribute90 := Check_For_Miss(p_charges_rec_in.pricing_attribute90) ;
1476 p_charges_rec_out.pricing_attribute91 := Check_For_Miss(p_charges_rec_in.pricing_attribute91) ;
1477 p_charges_rec_out.pricing_attribute92 := Check_For_Miss(p_charges_rec_in.pricing_attribute92) ;
1478 p_charges_rec_out.pricing_attribute93 := Check_For_Miss(p_charges_rec_in.pricing_attribute93) ;
1479 p_charges_rec_out.pricing_attribute94 := Check_For_Miss(p_charges_rec_in.pricing_attribute94) ;
1480 p_charges_rec_out.pricing_attribute95 := Check_For_Miss(p_charges_rec_in.pricing_attribute95) ;
1481 p_charges_rec_out.pricing_attribute96 := Check_For_Miss(p_charges_rec_in.pricing_attribute96) ;
1482 p_charges_rec_out.pricing_attribute97 := Check_For_Miss(p_charges_rec_in.pricing_attribute97) ;
1483 p_charges_rec_out.pricing_attribute98 := Check_For_Miss(p_charges_rec_in.pricing_attribute98) ;
1484 p_charges_rec_out.pricing_attribute99 := Check_For_Miss(p_charges_rec_in.pricing_attribute99) ;
1485 p_charges_rec_out.pricing_attribute100 := Check_For_Miss(p_charges_rec_in.pricing_attribute100);
1486
1487 --obsoleted columns/columns not used/Columns left for backward compatibility
1488 p_charges_rec_out.original_source_number := Check_For_Miss(p_charges_rec_in.original_source_number );
1489 p_charges_rec_out.source_number := Check_For_Miss(p_charges_rec_in.source_number );
1490 p_charges_rec_out.reference_number := Check_For_Miss(p_charges_rec_in.reference_number );
1491 p_charges_rec_out.original_system_reference := Check_For_Miss(p_charges_rec_in.original_system_reference );
1492 p_charges_rec_out.inventory_item_id_out := Check_For_Miss(p_charges_rec_in.inventory_item_id_out );
1493 p_charges_rec_out.serial_number_out := Check_For_Miss(p_charges_rec_in.serial_number_out );
1494 p_charges_rec_out.exception_coverage_used := Check_For_Miss(p_charges_rec_in.exception_coverage_used );
1495 /*Credit Card 9358401 */
1496 p_charges_rec_out.instrument_payment_use_id := p_charges_rec_in.instrument_payment_use_id ;
1497 -- 12.1.3 Charges Logistics Project
1501 p_charges_rec_out.parent_instance_id := Check_For_Miss(p_charges_rec_in.parent_instance_id);
1498 p_charges_rec_out.shipping_method := Check_For_Miss(p_charges_rec_in.shipping_method) ;
1499 p_charges_rec_out.arrival_date_time := Check_For_Miss(p_charges_rec_in.arrival_date_time) ;
1500 p_charges_rec_out.return_type := Check_For_Miss(p_charges_rec_in.return_type) ;
1502 -- 12.1.3+ Charges MED
1503 p_charges_rec_out.distance := Check_For_Miss(p_charges_rec_in.distance) ;
1504 p_charges_rec_out.need_by_date := Check_For_Miss(p_charges_rec_in.need_by_date) ;
1505 -- 12.2.2 Service Projects Integration
1506 p_charges_rec_out.project_id := Check_For_Miss(p_charges_rec_in.project_id) ;
1507 p_charges_rec_out.project_task_id := Check_For_Miss(p_charges_rec_in.project_task_id) ;
1508 p_charges_rec_out.expenditure_org_id := Check_For_Miss(p_charges_rec_in.expenditure_org_id) ;
1509 END TO_NULL ;
1510
1511 /**************************************************
1512 Procedure Body Log_Charges_Rec_Parameters
1513 This Procedure is used for Logging the charges record paramters.
1514 **************************************************/
1515
1516 PROCEDURE Log_Charges_Rec_Parameters
1517 ( p_Charges_Rec IN Charges_Rec_Type
1518 )
1519 IS
1520 l_api_name CONSTANT VARCHAR2(30) := 'Log_Charges_Rec_Parameters';
1521 l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||l_api_name;
1522 l_log_module CONSTANT VARCHAR2(255) := 'cs.plsql.' || l_api_name_full || '.';
1523 BEGIN
1524
1525 IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1526 THEN
1527 FND_LOG.String
1528 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1529 ,' estimate_detail_id :' || p_Charges_Rec.estimate_detail_id
1530 );
1531 FND_LOG.String
1532 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1533 ,' incident_id :' || p_Charges_Rec.incident_id
1534 );
1535 FND_LOG.String
1536 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1537 ,' charge_line_type :' || p_Charges_Rec.charge_line_type
1538 );
1539 FND_LOG.String
1540 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1541 ,' line_number :' || p_Charges_Rec.line_number
1542 );
1543 FND_LOG.String
1544 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1545 ,' business_process_id :' || p_Charges_Rec.business_process_id
1546 );
1547 FND_LOG.String
1548 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1549 ,' transaction_type_id :' || p_Charges_Rec.transaction_type_id
1550 );
1551 FND_LOG.String
1552 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1553 ,' inventory_item_id_in :' || p_Charges_Rec.inventory_item_id_in
1554 );
1555 FND_LOG.String
1556 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1557 ,' item_revision :' || p_Charges_Rec.item_revision
1558 );
1559 FND_LOG.String
1560 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1561 ,' billing_flag :' || p_Charges_Rec.billing_flag
1562 );
1563 FND_LOG.String
1564 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1565 ,' txn_billing_type_id :' || p_Charges_Rec.txn_billing_type_id
1566 );
1567 FND_LOG.String
1568 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1569 ,' unit_of_measure_code :' || p_Charges_Rec.unit_of_measure_code
1570 );
1571 FND_LOG.String
1572 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1573 ,' quantity_required :' || p_Charges_Rec.quantity_required
1574 );
1575 FND_LOG.String
1576 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1577 ,' return_reason_code :' || p_Charges_Rec.return_reason_code
1578 );
1579 FND_LOG.String
1580 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1581 ,' customer_product_id :' || p_Charges_Rec.customer_product_id
1582 );
1583 FND_LOG.String
1584 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1585 ,' serial_number :' || p_Charges_Rec.serial_number
1586 );
1587 FND_LOG.String
1588 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1589 ,' installed_cp_return_by_date :' || p_Charges_Rec.installed_cp_return_by_date
1590 );
1591 FND_LOG.String
1592 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1593 ,' new_cp_return_by_date :' || p_Charges_Rec.new_cp_return_by_date
1594 );
1595 FND_LOG.String
1596 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1597 ,' sold_to_party_id :' || p_Charges_Rec.sold_to_party_id
1598 );
1599 FND_LOG.String
1600 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1601 ,' bill_to_party_id :' || p_Charges_Rec.bill_to_party_id
1602 );
1603 FND_LOG.String
1604 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1605 ,' bill_to_account_id :' || p_Charges_Rec.bill_to_account_id
1606 );
1607 FND_LOG.String
1608 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1609 ,' bill_to_contact_id :' || p_Charges_Rec.bill_to_contact_id
1610 );
1611 FND_LOG.String
1612 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1613 ,' invoice_to_org_id :' || p_Charges_Rec.invoice_to_org_id
1614 );
1615 FND_LOG.String
1616 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1617 ,' ship_to_party_id :' || p_Charges_Rec.ship_to_party_id
1618 );
1619 FND_LOG.String
1620 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1621 ,' ship_to_account_id :' || p_Charges_Rec.ship_to_account_id
1622 );
1623 FND_LOG.String
1624 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1625 ,' ship_to_contact_id :' || p_Charges_Rec.ship_to_contact_id
1626 );
1630 );
1627 FND_LOG.String
1628 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1629 ,' ship_to_org_id :' || p_Charges_Rec.ship_to_org_id
1631 FND_LOG.String
1632 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1633 ,' contract_line_id :' || p_Charges_Rec.contract_line_id
1634 );
1635 FND_LOG.String
1636 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1637 ,' rate_type_code :' || p_Charges_Rec.rate_type_code
1638 );
1639 FND_LOG.String
1640 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1641 ,' contract_id :' || p_Charges_Rec.contract_id
1642 );
1643 FND_LOG.String
1644 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1645 ,' coverage_id :' || p_Charges_Rec.coverage_id
1646 );
1647 FND_LOG.String
1648 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1649 ,' coverage_txn_group_id :' || p_Charges_Rec.coverage_txn_group_id
1650 );
1651 FND_LOG.String
1652 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1653 ,' coverage_bill_rate_id :' || p_Charges_Rec.coverage_bill_rate_id
1654 );
1655 FND_LOG.String
1656 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1657 ,' coverage_billing_type_id :' || p_Charges_Rec.coverage_billing_type_id
1658 );
1659 FND_LOG.String
1660 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1661 ,' price_list_id :' || p_Charges_Rec.price_list_id
1662 );
1663 FND_LOG.String
1664 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1665 ,' currency_code :' || p_Charges_Rec.currency_code
1666 );
1667 FND_LOG.String
1668 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1669 ,' purchase_order_num :' || p_Charges_Rec.purchase_order_num
1670 );
1671 FND_LOG.String
1672 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1673 ,' list_price :' || p_Charges_Rec.list_price
1674 );
1675 FND_LOG.String
1676 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1677 ,' con_pct_over_list_price :' || p_Charges_Rec.con_pct_over_list_price
1678 );
1679 FND_LOG.String
1680 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1681 ,' selling_price :' || p_Charges_Rec.selling_price
1682 );
1683 FND_LOG.String
1684 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1685 ,' contract_discount_amount :' || p_Charges_Rec.contract_discount_amount
1686 );
1687 FND_LOG.String
1688 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1689 ,' apply_contract_discount :' || p_Charges_Rec.apply_contract_discount
1690 );
1691 FND_LOG.String
1692 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1693 ,' after_warranty_cost :' || p_Charges_Rec.after_warranty_cost
1694 );
1695 FND_LOG.String
1696 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1697 ,' transaction_inventory_org :' || p_Charges_Rec.transaction_inventory_org
1698 );
1699 FND_LOG.String
1700 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1701 ,' transaction_sub_inventory :' || p_Charges_Rec.transaction_sub_inventory
1702 );
1703 FND_LOG.String
1704 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1705 ,' rollup_flag :' || p_Charges_Rec.rollup_flag
1706 );
1707 FND_LOG.String
1708 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1709 ,' add_to_order_flag :' || p_Charges_Rec.add_to_order_flag
1710 );
1711 FND_LOG.String
1712 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1713 ,' order_header_id :' || p_Charges_Rec.order_header_id
1714 );
1715 FND_LOG.String
1716 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1717 ,' interface_to_oe_flag :' || p_Charges_Rec.interface_to_oe_flag
1718 );
1719 FND_LOG.String
1720 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1721 ,' no_charge_flag :' || p_Charges_Rec.no_charge_flag
1722 );
1723 FND_LOG.String
1724 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1725 ,' line_category_code :' || p_Charges_Rec.line_category_code
1726 );
1727 FND_LOG.String
1728 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1729 ,' line_type_id :' || p_Charges_Rec.line_type_id
1730 );
1731 FND_LOG.String
1732 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1733 ,' order_line_id :' || p_Charges_Rec.order_line_id
1734 );
1735 FND_LOG.String
1736 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1737 ,' conversion_rate :' || p_Charges_Rec.conversion_rate
1738 );
1739 FND_LOG.String
1740 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1741 ,' conversion_type_code :' || p_Charges_Rec.conversion_type_code
1742 );
1743 FND_LOG.String
1744 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1745 ,' conversion_rate_date :' || p_Charges_Rec.conversion_rate_date
1746 );
1747 FND_LOG.String
1748 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1749 ,' original_source_id :' || p_Charges_Rec.original_source_id
1750 );
1751 FND_LOG.String
1752 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1753 ,' original_source_code :' || p_Charges_Rec.original_source_code
1754 );
1755 FND_LOG.String
1756 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1757 ,' source_id :' || p_Charges_Rec.source_id
1758 );
1759 FND_LOG.String
1760 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1761 ,' source_code :' || p_Charges_Rec.source_code
1762 );
1763 FND_LOG.String
1767 FND_LOG.String
1764 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1765 ,' org_id :' || p_Charges_Rec.org_id
1766 );
1768 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1769 ,' submit_restriction_message :' || p_Charges_Rec.submit_restriction_message
1770 );
1771 FND_LOG.String
1772 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1773 ,' submit_error_message :' || p_Charges_Rec.submit_error_message
1774 );
1775 FND_LOG.String
1776 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1777 ,' submit_from_system :' || p_Charges_Rec.submit_from_system
1778 );
1779 FND_LOG.String
1780 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1781 ,' line_submitted_flag :' || p_Charges_Rec.line_submitted_flag
1782 );
1783 FND_LOG.String
1784 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1785 ,' activity_start_time :' || p_Charges_Rec.activity_start_time
1786 );
1787 FND_LOG.String
1788 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1789 ,' activity_end_time :' || p_Charges_Rec.activity_end_time
1790 );
1791 FND_LOG.String
1792 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1793 ,' generated_by_bca_engine :' || p_Charges_Rec.generated_by_bca_engine
1794 );
1795 FND_LOG.String
1796 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1797 ,' attribute1 :' || p_Charges_Rec.attribute1
1798 );
1799 FND_LOG.String
1800 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1801 ,' attribute2 :' || p_Charges_Rec.attribute2
1802 );
1803 FND_LOG.String
1804 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1805 ,' attribute3 :' || p_Charges_Rec.attribute3
1806 );
1807 FND_LOG.String
1808 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1809 ,' attribute4 :' || p_Charges_Rec.attribute4
1810 );
1811 FND_LOG.String
1812 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1813 ,' attribute5 :' || p_Charges_Rec.attribute5
1814 );
1815 FND_LOG.String
1816 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1817 ,' attribute6 :' || p_Charges_Rec.attribute6
1818 );
1819 FND_LOG.String
1820 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1821 ,' attribute7 :' || p_Charges_Rec.attribute7
1822 );
1823 FND_LOG.String
1824 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1825 ,' attribute8 :' || p_Charges_Rec.attribute8
1826 );
1827 FND_LOG.String
1828 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1829 ,' attribute9 :' || p_Charges_Rec.attribute9
1830 );
1831 FND_LOG.String
1832 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1833 ,' attribute10 :' || p_Charges_Rec.attribute10
1834 );
1835 FND_LOG.String
1836 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1837 ,' attribute11 :' || p_Charges_Rec.attribute11
1838 );
1839 FND_LOG.String
1840 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1841 ,' attribute12 :' || p_Charges_Rec.attribute12
1842 );
1843 FND_LOG.String
1844 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1845 ,' attribute13 :' || p_Charges_Rec.attribute13
1846 );
1847 FND_LOG.String
1848 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1849 ,' attribute14 :' || p_Charges_Rec.attribute14
1850 );
1851 FND_LOG.String
1852 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1853 ,' attribute15 :' || p_Charges_Rec.attribute15
1854 );
1855 FND_LOG.String
1856 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1857 ,' context :' || p_Charges_Rec.context
1858 );
1859 FND_LOG.String
1860 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1861 ,' pricing_context :' || p_Charges_Rec.pricing_context
1862 );
1863 FND_LOG.String
1864 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1865 ,' pricing_attribute1 :' || p_Charges_Rec.pricing_attribute1
1866 );
1867 FND_LOG.String
1868 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1869 ,' pricing_attribute2 :' || p_Charges_Rec.pricing_attribute2
1870 );
1871 FND_LOG.String
1872 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1873 ,' pricing_attribute3 :' || p_Charges_Rec.pricing_attribute3
1874 );
1875 FND_LOG.String
1876 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1877 ,' pricing_attribute4 :' || p_Charges_Rec.pricing_attribute4
1878 );
1879 FND_LOG.String
1880 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1881 ,' pricing_attribute5 :' || p_Charges_Rec.pricing_attribute5
1882 );
1883 FND_LOG.String
1884 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1885 ,' pricing_attribute6 :' || p_Charges_Rec.pricing_attribute6
1886 );
1887 FND_LOG.String
1888 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1889 ,' pricing_attribute7 :' || p_Charges_Rec.pricing_attribute7
1890 );
1891 FND_LOG.String
1892 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1893 ,' pricing_attribute8 :' || p_Charges_Rec.pricing_attribute8
1894 );
1895 FND_LOG.String
1896 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1897 ,' pricing_attribute9 :' || p_Charges_Rec.pricing_attribute9
1898 );
1899 FND_LOG.String
1900 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1901 ,' pricing_attribute10 :' || p_Charges_Rec.pricing_attribute10
1905 ,' pricing_attribute11 :' || p_Charges_Rec.pricing_attribute11
1902 );
1903 FND_LOG.String
1904 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1906 );
1907 FND_LOG.String
1908 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1909 ,' pricing_attribute12 :' || p_Charges_Rec.pricing_attribute12
1910 );
1911 FND_LOG.String
1912 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1913 ,' pricing_attribute13 :' || p_Charges_Rec.pricing_attribute13
1914 );
1915 FND_LOG.String
1916 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1917 ,' pricing_attribute14 :' || p_Charges_Rec.pricing_attribute14
1918 );
1919 FND_LOG.String
1920 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1921 ,' pricing_attribute15 :' || p_Charges_Rec.pricing_attribute15
1922 );
1923 FND_LOG.String
1924 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1925 ,' pricing_attribute16 :' || p_Charges_Rec.pricing_attribute16
1926 );
1927 FND_LOG.String
1928 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1929 ,' pricing_attribute17 :' || p_Charges_Rec.pricing_attribute17
1930 );
1931 FND_LOG.String
1932 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1933 ,' pricing_attribute18 :' || p_Charges_Rec.pricing_attribute18
1934 );
1935 FND_LOG.String
1936 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1937 ,' pricing_attribute19 :' || p_Charges_Rec.pricing_attribute19
1938 );
1939 FND_LOG.String
1940 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1941 ,' pricing_attribute20 :' || p_Charges_Rec.pricing_attribute20
1942 );
1943 FND_LOG.String
1944 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1945 ,' pricing_attribute21 :' || p_Charges_Rec.pricing_attribute21
1946 );
1947 FND_LOG.String
1948 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1949 ,' pricing_attribute22 :' || p_Charges_Rec.pricing_attribute22
1950 );
1951 FND_LOG.String
1952 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1953 ,' pricing_attribute23 :' || p_Charges_Rec.pricing_attribute23
1954 );
1955 FND_LOG.String
1956 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1957 ,' pricing_attribute24 :' || p_Charges_Rec.pricing_attribute24
1958 );
1959 FND_LOG.String
1960 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1961 ,' pricing_attribute25 :' || p_Charges_Rec.pricing_attribute25
1962 );
1963 FND_LOG.String
1964 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1965 ,' pricing_attribute26 :' || p_Charges_Rec.pricing_attribute26
1966 );
1967 FND_LOG.String
1968 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1969 ,' pricing_attribute27 :' || p_Charges_Rec.pricing_attribute27
1970 );
1971 FND_LOG.String
1972 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1973 ,' pricing_attribute28 :' || p_Charges_Rec.pricing_attribute28
1974 );
1975 FND_LOG.String
1976 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1977 ,' pricing_attribute29 :' || p_Charges_Rec.pricing_attribute29
1978 );
1979 FND_LOG.String
1980 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1981 ,' pricing_attribute30 :' || p_Charges_Rec.pricing_attribute30
1982 );
1983 FND_LOG.String
1984 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1985 ,' pricing_attribute31 :' || p_Charges_Rec.pricing_attribute31
1986 );
1987 FND_LOG.String
1988 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1989 ,' pricing_attribute32 :' || p_Charges_Rec.pricing_attribute32
1990 );
1991 FND_LOG.String
1992 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1993 ,' pricing_attribute33 :' || p_Charges_Rec.pricing_attribute33
1994 );
1995 FND_LOG.String
1996 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1997 ,' pricing_attribute34 :' || p_Charges_Rec.pricing_attribute34
1998 );
1999 FND_LOG.String
2000 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2001 ,' pricing_attribute35 :' || p_Charges_Rec.pricing_attribute35
2002 );
2003 FND_LOG.String
2004 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2005 ,' pricing_attribute36 :' || p_Charges_Rec.pricing_attribute36
2006 );
2007 FND_LOG.String
2008 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2009 ,' pricing_attribute37 :' || p_Charges_Rec.pricing_attribute37
2010 );
2011 FND_LOG.String
2012 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2013 ,' pricing_attribute38 :' || p_Charges_Rec.pricing_attribute38
2014 );
2015 FND_LOG.String
2016 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2017 ,' pricing_attribute39 :' || p_Charges_Rec.pricing_attribute39
2018 );
2019 FND_LOG.String
2020 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2021 ,' pricing_attribute40 :' || p_Charges_Rec.pricing_attribute40
2022 );
2023 FND_LOG.String
2024 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2025 ,' pricing_attribute41 :' || p_Charges_Rec.pricing_attribute41
2026 );
2027 FND_LOG.String
2028 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2029 ,' pricing_attribute42 :' || p_Charges_Rec.pricing_attribute42
2030 );
2031 FND_LOG.String
2032 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2033 ,' pricing_attribute43 :' || p_Charges_Rec.pricing_attribute43
2034 );
2035 FND_LOG.String
2036 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2037 ,' pricing_attribute44 :' || p_Charges_Rec.pricing_attribute44
2041 ,' pricing_attribute45 :' || p_Charges_Rec.pricing_attribute45
2038 );
2039 FND_LOG.String
2040 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2042 );
2043 FND_LOG.String
2044 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2045 ,' pricing_attribute46 :' || p_Charges_Rec.pricing_attribute46
2046 );
2047 FND_LOG.String
2048 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2049 ,' pricing_attribute47 :' || p_Charges_Rec.pricing_attribute47
2050 );
2051 FND_LOG.String
2052 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2053 ,' pricing_attribute48 :' || p_Charges_Rec.pricing_attribute48
2054 );
2055 FND_LOG.String
2056 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2057 ,' pricing_attribute49 :' || p_Charges_Rec.pricing_attribute49
2058 );
2059 FND_LOG.String
2060 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2061 ,' pricing_attribute50 :' || p_Charges_Rec.pricing_attribute50
2062 );
2063 FND_LOG.String
2064 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2065 ,' pricing_attribute51 :' || p_Charges_Rec.pricing_attribute51
2066 );
2067 FND_LOG.String
2068 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2069 ,' pricing_attribute52 :' || p_Charges_Rec.pricing_attribute52
2070 );
2071 FND_LOG.String
2072 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2073 ,' pricing_attribute53 :' || p_Charges_Rec.pricing_attribute53
2074 );
2075 FND_LOG.String
2076 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2077 ,' pricing_attribute54 :' || p_Charges_Rec.pricing_attribute54
2078 );
2079 FND_LOG.String
2080 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2081 ,' pricing_attribute55 :' || p_Charges_Rec.pricing_attribute55
2082 );
2083 FND_LOG.String
2084 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2085 ,' pricing_attribute56 :' || p_Charges_Rec.pricing_attribute56
2086 );
2087 FND_LOG.String
2088 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2089 ,' pricing_attribute57 :' || p_Charges_Rec.pricing_attribute57
2090 );
2091 FND_LOG.String
2092 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2093 ,' pricing_attribute58 :' || p_Charges_Rec.pricing_attribute58
2094 );
2095 FND_LOG.String
2096 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2097 ,' pricing_attribute59 :' || p_Charges_Rec.pricing_attribute59
2098 );
2099 FND_LOG.String
2100 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2101 ,' pricing_attribute60 :' || p_Charges_Rec.pricing_attribute60
2102 );
2103 FND_LOG.String
2104 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2105 ,' pricing_attribute61 :' || p_Charges_Rec.pricing_attribute61
2106 );
2107 FND_LOG.String
2108 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2109 ,' pricing_attribute62 :' || p_Charges_Rec.pricing_attribute62
2110 );
2111 FND_LOG.String
2112 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2113 ,' pricing_attribute63 :' || p_Charges_Rec.pricing_attribute63
2114 );
2115 FND_LOG.String
2116 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2117 ,' pricing_attribute64 :' || p_Charges_Rec.pricing_attribute64
2118 );
2119 FND_LOG.String
2120 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2121 ,' pricing_attribute65 :' || p_Charges_Rec.pricing_attribute65
2122 );
2123 FND_LOG.String
2124 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2125 ,' pricing_attribute66 :' || p_Charges_Rec.pricing_attribute66
2126 );
2127 FND_LOG.String
2128 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2129 ,' pricing_attribute67 :' || p_Charges_Rec.pricing_attribute67
2130 );
2131 FND_LOG.String
2132 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2133 ,' pricing_attribute68 :' || p_Charges_Rec.pricing_attribute68
2134 );
2135 FND_LOG.String
2136 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2137 ,' pricing_attribute69 :' || p_Charges_Rec.pricing_attribute69
2138 );
2139 FND_LOG.String
2140 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2141 ,' pricing_attribute70 :' || p_Charges_Rec.pricing_attribute70
2142 );
2143 FND_LOG.String
2144 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2145 ,' pricing_attribute71 :' || p_Charges_Rec.pricing_attribute71
2146 );
2147 FND_LOG.String
2148 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2149 ,' pricing_attribute72 :' || p_Charges_Rec.pricing_attribute72
2150 );
2151 FND_LOG.String
2152 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2153 ,' pricing_attribute73 :' || p_Charges_Rec.pricing_attribute73
2154 );
2155 FND_LOG.String
2156 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2157 ,' pricing_attribute74 :' || p_Charges_Rec.pricing_attribute74
2158 );
2159 FND_LOG.String
2160 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2161 ,' pricing_attribute75 :' || p_Charges_Rec.pricing_attribute75
2162 );
2163 FND_LOG.String
2164 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2165 ,' pricing_attribute76 :' || p_Charges_Rec.pricing_attribute76
2166 );
2167 FND_LOG.String
2168 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2169 ,' pricing_attribute77 :' || p_Charges_Rec.pricing_attribute77
2170 );
2171 FND_LOG.String
2172 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2173 ,' pricing_attribute78 :' || p_Charges_Rec.pricing_attribute78
2177 ,' pricing_attribute79 :' || p_Charges_Rec.pricing_attribute79
2174 );
2175 FND_LOG.String
2176 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2178 );
2179 FND_LOG.String
2180 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2181 ,' pricing_attribute80 :' || p_Charges_Rec.pricing_attribute80
2182 );
2183 FND_LOG.String
2184 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2185 ,' pricing_attribute81 :' || p_Charges_Rec.pricing_attribute81
2186 );
2187 FND_LOG.String
2188 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2189 ,' pricing_attribute82 :' || p_Charges_Rec.pricing_attribute82
2190 );
2191 FND_LOG.String
2192 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2193 ,' pricing_attribute83 :' || p_Charges_Rec.pricing_attribute83
2194 );
2195 FND_LOG.String
2196 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2197 ,' pricing_attribute84 :' || p_Charges_Rec.pricing_attribute84
2198 );
2199 FND_LOG.String
2200 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2201 ,' pricing_attribute85 :' || p_Charges_Rec.pricing_attribute85
2202 );
2203 FND_LOG.String
2204 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2205 ,' pricing_attribute86 :' || p_Charges_Rec.pricing_attribute86
2206 );
2207 FND_LOG.String
2208 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2209 ,' pricing_attribute87 :' || p_Charges_Rec.pricing_attribute87
2210 );
2211 FND_LOG.String
2212 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2213 ,' pricing_attribute88 :' || p_Charges_Rec.pricing_attribute88
2214 );
2215 FND_LOG.String
2216 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2217 ,' pricing_attribute89 :' || p_Charges_Rec.pricing_attribute89
2218 );
2219 FND_LOG.String
2220 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2221 ,' pricing_attribute90 :' || p_Charges_Rec.pricing_attribute90
2222 );
2223 FND_LOG.String
2224 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2225 ,' pricing_attribute91 :' || p_Charges_Rec.pricing_attribute91
2226 );
2227 FND_LOG.String
2228 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2229 ,' pricing_attribute92 :' || p_Charges_Rec.pricing_attribute92
2230 );
2231 FND_LOG.String
2232 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2233 ,' pricing_attribute93 :' || p_Charges_Rec.pricing_attribute93
2234 );
2235 FND_LOG.String
2236 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2237 ,' pricing_attribute94 :' || p_Charges_Rec.pricing_attribute94
2238 );
2239 FND_LOG.String
2240 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2241 ,' pricing_attribute95 :' || p_Charges_Rec.pricing_attribute95
2242 );
2243 FND_LOG.String
2244 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2245 ,' pricing_attribute96 :' || p_Charges_Rec.pricing_attribute96
2246 );
2247 FND_LOG.String
2248 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2249 ,' pricing_attribute97 :' || p_Charges_Rec.pricing_attribute97
2250 );
2251 FND_LOG.String
2252 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2253 ,' pricing_attribute98 :' || p_Charges_Rec.pricing_attribute98
2254 );
2255 FND_LOG.String
2256 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2257 ,' pricing_attribute99 :' || p_Charges_Rec.pricing_attribute99
2258 );
2259 FND_LOG.String
2260 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2261 ,' pricing_attribute100 :' || p_Charges_Rec.pricing_attribute100
2262 );
2263 FND_LOG.String
2264 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2265 ,' original_source_number :' || p_Charges_Rec.original_source_number
2266 );
2267 FND_LOG.String
2268 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2269 ,' source_number :' || p_Charges_Rec.source_number
2270 );
2271 FND_LOG.String
2272 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2273 ,' reference_number :' || p_Charges_Rec.reference_number
2274 );
2275 FND_LOG.String
2276 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2277 ,' original_system_reference :' || p_Charges_Rec.original_system_reference
2278 );
2279 FND_LOG.String
2280 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2281 ,' inventory_item_id_out :' || p_Charges_Rec.inventory_item_id_out
2282 );
2283 FND_LOG.String
2284 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2285 ,' serial_number_out :' || p_Charges_Rec.serial_number_out
2286 );
2287 FND_LOG.String
2288 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2289 ,' exception_coverage_used :' || p_Charges_Rec.exception_coverage_used
2290 );
2291 /* Credit Card 9358401 */
2292 FND_LOG.String
2293 ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2294 ,' instrument_payment_use_id assignment id :' ||
2295 p_Charges_Rec.instrument_payment_use_id
2296 );
2297 END IF ;
2298
2299 END Log_Charges_Rec_Parameters;
2300
2301 /*************************************************
2302 Function Implementations
2303 **************************************************/
2304 FUNCTION Check_For_Miss ( p_param IN NUMBER ) RETURN NUMBER IS
2305 BEGIN
2306 IF p_param = FND_API.G_MISS_NUM THEN
2307 RETURN NULL ;
2308 ELSE
2309 RETURN p_param ;
2310 END IF ;
2311 END Check_For_Miss ;
2312
2313
2314 FUNCTION Check_For_Miss ( p_param IN VARCHAR2 ) RETURN VARCHAR2 IS
2315 BEGIN
2319 RETURN p_param ;
2316 IF p_param = FND_API.G_MISS_CHAR THEN
2317 RETURN NULL ;
2318 ELSE
2320 END IF ;
2321 END Check_For_Miss ;
2322
2323
2324 FUNCTION Check_For_Miss ( p_param IN DATE ) RETURN DATE IS
2325 BEGIN
2326 IF p_param = FND_API.G_MISS_DATE THEN
2327 RETURN NULL ;
2328 ELSE
2329 RETURN p_param ;
2330 END IF ;
2331 END Check_For_Miss ;
2332
2333 END CS_Charge_Details_PUB;