eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.CS_COST_DETAILS_PUB

Source


1 PACKAGE BODY CS_Cost_Details_PUB AS
2 /* $Header: csxpcstb.pls 120.1 2008/01/18 07:02:28 bkanimoz noship $ */
3 G_PKG_NAME CONSTANT VARCHAR2(30):='CS_Cost_Details_PUB' ;
4 
5 
6 /**************************************************
7 Public Procedure Body Create_Cost_Details
8 **************************************************/
9 
10 PROCEDURE Create_cost_details
11 	(
12 	p_api_version IN NUMBER,
13 	p_init_msg_list IN VARCHAR2       := FND_API.G_FALSE,
14 	p_commit IN VARCHAR2              := FND_API.G_FALSE,
15 	p_validation_level IN NUMBER      := FND_API.G_VALID_LEVEL_FULL,
16 	x_return_status OUT NOCOPY VARCHAR2,
17 	x_msg_count OUT NOCOPY NUMBER,
18 	x_object_version_number OUT NOCOPY NUMBER,
19 	x_msg_data OUT NOCOPY VARCHAR2,
20 	x_cost_id OUT NOCOPY NUMBER,
21 	p_resp_appl_id IN NUMBER          := FND_GLOBAL.RESP_APPL_ID,
22 	p_resp_id IN NUMBER               := FND_GLOBAL.RESP_ID,
23 	p_user_id IN NUMBER               := FND_GLOBAL.USER_ID,
24 	p_login_id IN NUMBER              := NULL,
25 	p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
26 	p_Cost_Rec IN Cost_Rec_Type       :=G_MISS_COST_REC
27 
28 	) IS
29 
30 
31 	l_api_name CONSTANT VARCHAR2(30)      :='Create_Cost_Details`' ;
32 	l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME ||'.'|| l_api_name ;
33 	l_log_module    CONSTANT VARCHAR2(255):='csxpcstb.pls.'|| l_api_name_full ||'.';
34 	l_api_version   CONSTANT NUMBER       :=1.0 ;
35 	l_resp_appl_id  NUMBER                := p_resp_appl_id;
36 	l_resp_id       NUMBER                := p_resp_id;
37 	l_user_id       NUMBER                := p_user_id;
38 	l_login_id      NUMBER                := p_login_id;
39 	l_return_status VARCHAR2(1) ;
40 	l_Cost_Rec      Cost_Rec_Type ;
41 
42 
43 BEGIN
44 
45 	--  Standard Start of API Savepoint
46 
47 	IF FND_API.To_Boolean(p_transaction_control) THEN
48 	SAVEPOINT Create_Cost_Details_PUB ;
49 	END IF ;
50 
51 	-- Standard Call to check API compatibility
52 	IF NOT FND_API.Compatible_API_Call( l_api_version,
53 										p_api_version,
54 										l_api_name,
55 										G_PKG_NAME) THEN
56 
57 	RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
58 	END IF ;
59 
60 	-- Initialize the message list  if p_msg_list is set to TRUE
61 
62 	IF FND_API.To_Boolean(p_init_msg_list) THEN
63 	FND_MSG_PUB.initialize ;
64 	END IF ;
65 
66 	-- Initialize the API Return Success to True
67 	x_return_status := FND_API.G_RET_STS_SUCCESS ;
68 
69 
70 
71 	----------------------- FND Logging -----------------------------------
72 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
73 	FND_LOG.String
74 	( FND_LOG.level_procedure , L_LOG_MODULE ||'start',
75 	'Inside '|| L_API_NAME_FULL ||', called with parameters below:'
76 	);
77 	FND_LOG.String
78 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
79 	'p_api_version:'|| p_api_version
80 	);
81 	FND_LOG.String
82 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
83 	'p_init_msg_list:'|| p_init_msg_list
84 	);
85 	FND_LOG.String
86 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
87 	'p_commit:'|| p_commit
88 	);
89 	FND_LOG.String
90 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
91 	'p_validation_level:'|| p_validation_level
92 	);
93 	FND_LOG.String
94 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
95 	'p_resp_appl_id:'|| p_resp_appl_id
96 	);
97 	FND_LOG.String
98 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
99 	'p_resp_id:'|| p_resp_id
100 	);
101 	FND_LOG.String
102 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
103 	'p_user_id:'|| p_user_id
104 	);
105 	FND_LOG.String
106 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
107 	'p_login_id:'|| p_login_id
108 	);
109 	FND_LOG.String
110 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
111 	'p_transaction_control:'|| p_transaction_control
112 	);
113 
114 	-- --------------------------------------------------------------------------
115 	-- This procedure Logs the Cost record paramters.
116 	-- --------------------------------------------------------------------------
117 	Log_Cost_Rec_Parameters
118 	( p_cost_rec_in => p_cost_rec);
119 
120 
121 	END IF;
122 
123 	--Convert the IN Parameters from FND_API.G_MISS_XXXX to NULL
124 	--if no calue is passed then return NULL otherwise return the value passed
125 
126 	-- TO_NULL (p_cost_Rec, l_cost_Rec) ;  --do this in the cost pvt api
127 
128 
129 
130 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
131 	FND_LOG.String
132 	( FND_LOG.level_procedure ,
133 	L_LOG_MODULE,
134 	'Before calling the Costing Private API'
135 	);
136 	END IF;
137 
138 	--call to the costing private api
139 	CS_COST_DETAILS_PVT.CREATE_COST_DETAILS
140 	(
141 	p_api_version            =>1.0,
142 	p_init_msg_list          => p_init_msg_list ,
143 	p_commit                 => p_commit ,
144 	p_validation_level       => FND_API.G_VALID_LEVEL_FULL,
145 	x_return_status          => l_return_status,
146 	x_msg_count              => x_msg_count,
147 	x_object_version_number  => x_object_version_number,
148 	x_msg_data               => x_msg_data,
149 	x_cost_id                => x_cost_id,
150 	p_resp_appl_id           => l_resp_appl_id,
151 	p_resp_id                => l_resp_id,
152 	p_user_id                => l_user_id,
153 	p_login_id               => l_login_id,
154 	p_transaction_control    => p_transaction_control,
155 	p_Cost_Rec               => p_cost_rec ,
156 	p_cost_creation_override =>'N'
157 	);
158 
159 
160 
161 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
162 	FND_LOG.String
163 	( FND_LOG.level_procedure ,
164 	L_LOG_MODULE ||'',
165 	'After calling the costing Private API '||l_return_status
166 	);
167 	END IF;
168 
169 
170 
171 	IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
172 	RAISE FND_API.G_EXC_ERROR;
173 	ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
174 	RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
175 	END IF;
176 
177 
178 	--standard Check of p_commit bharahti
179 	IF FND_API.To_Boolean( p_commit ) THEN
180 	COMMIT WORK ;
181 	END IF ;
182 
183 	--Standard call to get  message count and if count is 1 , get message info
184 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
185 							p_data    => x_msg_data,
186 							p_encoded => FND_API.G_FALSE) ;
187 
188 
189 	--Begin Exception Handling
190 
191 EXCEPTION
192 
193 	WHEN FND_API.G_EXC_ERROR THEN
194 
195 
196 	IF FND_API.To_Boolean( p_transaction_control ) THEN
197 	ROLLBACK TO Create_Cost_Details_PUB;
198 	END IF ;
199 
200 	x_return_status := FND_API.G_RET_STS_ERROR ;
201 
202 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
203 							p_data    => x_msg_data,
204 							p_encoded => FND_API.G_FALSE) ;
205 
206 	WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
207 
208 
209 	IF FND_API.To_Boolean( p_transaction_control ) THEN
210 	ROLLBACK TO Create_Cost_Details_PUB;
211 	END IF ;
212 
213 	x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
214 
215 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
216 							p_data    => x_msg_data,
217 							p_encoded => FND_API.G_FALSE) ;
218 	WHEN OTHERS THEN
219 
220 
221 	IF FND_API.To_Boolean( p_transaction_control ) THEN
222 	ROLLBACK TO Create_Cost_Details_PUB ;
223 	END IF ;
224 
225 	x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
226 
227 	IF FND_MSG_PUB.Check_Msg_Level
228 	(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
229 	FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
230 	END IF ;
231 
232 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
233 							p_data    => x_msg_data,
234 							p_encoded => FND_API.G_FALSE) ;
235 
236 END Create_cost_details;
237 
238 /**************************************************
239 Public Procedure Body Update_Cost_Details
240 **************************************************/
241 
242 
243 PROCEDURE Update_Cost_Details
244 	(
245 	p_api_version IN NUMBER,
246 	p_init_msg_list IN VARCHAR2       := FND_API.G_FALSE,
247 	p_commit IN VARCHAR2              := FND_API.G_FALSE,
248 	p_validation_level IN NUMBER      := FND_API.G_VALID_LEVEL_FULL,
249 	x_return_status OUT NOCOPY VARCHAR2,
250 	x_msg_count OUT NOCOPY NUMBER,
251 	x_object_version_number OUT NOCOPY NUMBER,
252 	x_msg_data OUT NOCOPY VARCHAR2,
253 	p_resp_appl_id IN NUMBER          := FND_GLOBAL.RESP_APPL_ID,
254 	p_resp_id IN NUMBER               := FND_GLOBAL.RESP_ID,
255 	p_user_id IN NUMBER               := FND_GLOBAL.USER_ID,
256 	p_login_id IN NUMBER              := NULL,
257 	p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
258 	p_Cost_Rec IN Cost_Rec_Type       :=G_MISS_COST_REC
259 
260 	) IS
261 
262 	l_api_name CONSTANT VARCHAR2(30)      :='Update_Cost_Details' ;
263 	l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME ||'.'|| l_api_name ;
264 	l_log_module    CONSTANT VARCHAR2(255):='csxpcstb.pls.'|| l_api_name_full ||'.';
265 	l_api_version   CONSTANT NUMBER       :=1.0 ;
266 
267 	l_resp_appl_id  NUMBER ;
268 	l_resp_id       NUMBER ;
269 	l_user_id       NUMBER ;
270 	l_login_id      NUMBER ;
271 	l_return_status VARCHAR2(1) ;
272 
273 
274 	l_cost_estimate_detail_id NUMBER;
275 	l_cost_id                 NUMBER;
276 
277 
278 
279 BEGIN
280 
281 	IF FND_API.To_Boolean( p_transaction_control ) THEN
282 	SAVEPOINT update_cost_details_pub ;
283 	END IF ;
284 
285 	--Standard Call to check API compatibility
286 	IF NOT FND_API.Compatible_API_Call(l_api_version,
287 									p_api_version,
288 									l_api_name,
289 									G_PKG_NAME )THEN
290 	RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
291 	END IF ;
292 
293 	--   Initialize the message list  if p_msg_list is set to TRUE
294 	IF FND_API.To_Boolean(p_init_msg_list) THEN
295 	FND_MSG_PUB.initialize ;
296 	END IF ;
297 
298 
299 	--Initialize the API Return Success to True
300 	x_return_status := FND_API.G_RET_STS_SUCCESS ;
301 
302 
303 	----------------------- FND Logging -----------------------------------
304 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
305 	FND_LOG.String
306 	( FND_LOG.level_procedure , L_LOG_MODULE ||'start',
307 	'Inside '|| L_API_NAME_FULL ||', called with parameters below:'
308 	);
309 	FND_LOG.String
310 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
311 	'p_api_version:'|| p_api_version
312 	);
313 	FND_LOG.String
314 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
315 	'p_init_msg_list:'|| p_init_msg_list
316 	);
317 	FND_LOG.String
318 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
319 	'p_commit:'|| p_commit
320 	);
321 	FND_LOG.String
322 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
323 	'p_validation_level:'|| p_validation_level
324 	);
325 	FND_LOG.String
326 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
327 	'p_resp_appl_id:'|| p_resp_appl_id
328 	);
329 	FND_LOG.String
330 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
331 	'p_resp_id:'|| p_resp_id
332 	);
333 	FND_LOG.String
334 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
335 	'p_user_id:'|| p_user_id
336 	);
337 	FND_LOG.String
338 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
339 	'p_login_id:'|| p_login_id
340 	);
341 	FND_LOG.String
342 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
343 	'p_transaction_control:'|| p_transaction_control
344 	);
345 
346 	-- --------------------------------------------------------------------------
347 	-- This procedure Logs the charges record paramters.
348 	-- --------------------------------------------------------------------------
349 	Log_Cost_Rec_Parameters
350 	( p_cost_rec_in => p_Cost_rec
351 	);
352 
353 	END IF;
354 
355 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
356 	FND_LOG.String
357 	( FND_LOG.level_procedure ,
358 	L_LOG_MODULE ||'',
359 	'BEfore calling the costing Private API '||l_return_status
360 	);
361 	END IF;
362 
363 	--call to the costing private api
364 	CS_COST_DETAILS_PVT.UPDATE_COST_DETAILS
365 	(
366 	p_api_version          =>1.0,
367 	p_init_msg_list        => p_init_msg_list,
368 	p_commit               => p_commit ,
369 	p_validation_level     => FND_API.G_VALID_LEVEL_FULL,
370 	x_return_status        => l_return_status,
371 	x_msg_count            => x_msg_count,
372 	x_object_version_number=> x_object_version_number,
373 	x_msg_data             => x_msg_data,
374 	p_resp_appl_id         => l_resp_appl_id,
375 	p_resp_id              => l_resp_id,
376 	p_user_id              => l_user_id,
377 	p_login_id             => l_login_id,
378 	p_transaction_control  => p_transaction_control,
379 	p_Cost_Rec             => p_cost_rec
380 	);
381 
382 
383 	IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
384 	RAISE FND_API.G_EXC_ERROR;
385 	ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
386 	RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387 	END IF;
388 
389 
390 
391 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
392 	FND_LOG.String
393 	( FND_LOG.level_procedure ,
394 	L_LOG_MODULE ||'',
395 	'After calling the costing Private API '||l_return_status
396 	);
397 	END IF;
398 
399 
400 	--standard Check of p_commit
401 	IF FND_API.To_Boolean( p_commit ) THEN
402 	COMMIT WORK ;
403 	END IF ;
404 
405 	--Standard call to get  message count and if count is 1 , get message info
406 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
407 							p_data    => x_msg_data,
408 							p_encoded => FND_API.G_FALSE) ;
409 
410 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
411 	FND_LOG.String
412 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
413 	'After calling the update_cost_details'||l_return_status
414 	);
415 	END IF;
416 	--Begin Exception Handling
417 
418 EXCEPTION
419 
420 	WHEN FND_API.G_EXC_ERROR THEN
421 
422 	IF FND_API.To_Boolean( p_transaction_control ) THEN
423 	ROLLBACK TO update_cost_details_pub;
424 	END IF ;
425 
426 	x_return_status := FND_API.G_RET_STS_ERROR ;
427 
428 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
429 							p_data    => x_msg_data,
430 							p_encoded => FND_API.G_FALSE) ;
431 
432 	WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
433 
434 	IF FND_API.To_Boolean( p_transaction_control ) THEN
435 	ROLLBACK TO update_cost_details_pub;
436 	END IF ;
437 
438 	x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
439 
440 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
441 							p_data    => x_msg_data,
442 							p_encoded => FND_API.G_FALSE) ;
443 	WHEN OTHERS THEN
444 
445 	IF FND_API.To_Boolean( p_transaction_control ) THEN
446 	ROLLBACK TO update_cost_details_pub;
447 	END IF ;
448 
449 	x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
450 
451 	IF FND_MSG_PUB.Check_Msg_Level
452 	(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
453 	FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
454 	END IF ;
455 
456 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
457 							p_data    => x_msg_data,
458 							p_encoded => FND_API.G_FALSE) ;
459 
460 END Update_Cost_Details;
461 
462 
463 /**************************************************
464 Public Procedure Body Delete_Cost_Details
465 **************************************************/
466 PROCEDURE Delete_Cost_details
467 	(
468 	p_api_version IN NUMBER,
469 	p_init_msg_list IN VARCHAR2       := FND_API.G_FALSE,
470 	p_commit IN VARCHAR2              := FND_API.G_FALSE,
471 	p_validation_level IN NUMBER      := FND_API.G_VALID_LEVEL_FULL,
472 	x_return_status OUT NOCOPY VARCHAR2,
473 	x_msg_count OUT NOCOPY NUMBER,
474 	x_msg_data OUT NOCOPY VARCHAR2,
475 	p_transaction_control IN VARCHAR2 := FND_API.G_TRUE,
479 	l_api_name CONSTANT VARCHAR2(30)      :='Delete_Cost_Details Public API' ;
476 	p_cost_id IN NUMBER               := NULL
477 	) IS
478 
480 	l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME ||'.'|| l_api_name ;
481 	l_log_module    CONSTANT VARCHAR2(255):='csxpcstb.sql.'|| l_api_name_full ||'.';
482 	l_api_version   CONSTANT NUMBER       :=1.0 ;
483 
484 	l_resp_appl_id  NUMBER ;
485 	l_resp_id       NUMBER ;
486 	l_user_id       NUMBER ;
487 	l_login_id      NUMBER ;
488 	l_return_status VARCHAR2(1) ;
489 
490 
491 
492 BEGIN
493 	-- Standard Start of API Savepoint
494 	IF FND_API.To_Boolean( p_transaction_control ) THEN
495 	SAVEPOINT Delete_Cost_Details_PUB ;
496 	END IF ;
497 
498 	-- Standard Call to check API compatibility
499 	IF NOT FND_API.Compatible_API_Call(l_api_version,
500 									p_api_version,
501 									l_api_name,
502 									G_PKG_NAME ) THEN
503 	RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
504 	END IF ;
505 
506 	-- Initialize the message list  if p_msg_list is set to TRUE
507 	IF FND_API.To_Boolean(p_init_msg_list) THEN
508 	FND_MSG_PUB.initialize ;
509 	END IF ;
510 
511 
512 	-- Initialize the API Return Success to True
513 	x_return_status := FND_API.G_RET_STS_SUCCESS ;
514 
515 	----------------------- FND Logging -----------------------------------
516 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
517 	FND_LOG.String
518 	( FND_LOG.level_procedure , L_LOG_MODULE ||'start',
519 	'Inside '|| L_API_NAME_FULL ||', called with parameters below:'
520 	);
521 	FND_LOG.String
522 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
523 	'p_api_version:'|| p_api_version
524 	);
525 	FND_LOG.String
526 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
527 	'p_init_msg_list:'|| p_init_msg_list
528 	);
529 	FND_LOG.String
530 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
531 	'p_commit:'|| p_commit
532 	);
533 	FND_LOG.String
534 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
535 	'p_validation_level:'|| p_validation_level
536 	);
537 	FND_LOG.String
538 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
539 	'p_transaction_control:'|| p_transaction_control
540 	);
541 	FND_LOG.String
542 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
543 	'p_cost_id'|| p_cost_id
544 	);
545 
546 
547 	FND_LOG.String
548 	( FND_LOG.level_procedure ,
549 	L_LOG_MODULE ||'',
550 	'Before  calling the costing Private API '||l_return_status
551 	);
552 	END IF;
553 
554 
555 	--call to the costing private api
556 	CS_COST_DETAILS_PVT.DELETE_COST_DETAILS
557 	(
558 	p_api_version         =>1.0,
559 	p_init_msg_list       => p_init_msg_list,
560 	p_commit              => p_commit,
561 	p_validation_level    => FND_API.G_VALID_LEVEL_FULL,
562 	x_return_status       => l_return_status,
563 	x_msg_count           => x_msg_count,
564 	x_msg_data            => x_msg_data,
565 	p_transaction_control => p_transaction_control,
566 	p_cost_id             => p_cost_id
567 	);
568 
569 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
570 	FND_LOG.String
571 	( FND_LOG.level_procedure ,
572 	L_LOG_MODULE ||'',
573 	'After calling the costing Private API '||l_return_status
574 	);
575 	END IF;
576 
577 	IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
578 
579 	RAISE FND_API.G_EXC_ERROR;
580 	ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
581 	RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
582 	END IF;
583 
584 
585 	--standard Check of p_commit
586 	IF FND_API.To_Boolean( p_commit ) THEN
587 	COMMIT ;
588 	END IF ;
589 
590 	--Standard call to get  message count and if count is 1 , get message info
591 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
592 							p_data    => x_msg_data,
593 							p_encoded => FND_API.G_FALSE) ;
594 
595 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
596 	FND_LOG.String
597 	( FND_LOG.level_procedure , L_LOG_MODULE ||'',
598 	'After calling the Delete_cost_details'||l_return_status
599 	);
600 	END IF;
601 
602 
603 
604 	--Begin Exception Handling
605 
606 EXCEPTION
607 
608 	WHEN FND_API.G_EXC_ERROR THEN
609 
610 	IF FND_API.To_Boolean( p_transaction_control ) THEN
611 	ROLLBACK TO Delete_Cost_Details_PUB;
612 	END IF ;
613 
614 	x_return_status := FND_API.G_RET_STS_ERROR ;
615 
616 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
617 							p_data    => x_msg_data,
618 							p_encoded => FND_API.G_FALSE) ;
619 
620 	WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
621 
622 	IF FND_API.To_Boolean( p_transaction_control ) THEN
623 	ROLLBACK TO Delete_Cost_Details_PUB;
624 	END IF ;
625 
626 	x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
627 
628 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
629 							p_data    => x_msg_data,
630 							p_encoded => FND_API.G_FALSE) ;
631 	WHEN OTHERS THEN
632 
633 	IF FND_API.To_Boolean( p_transaction_control ) THEN
634 	ROLLBACK TO Delete_Cost_Details_PUB;
635 	END IF ;
636 
637 	x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
638 
639 	IF FND_MSG_PUB.Check_Msg_Level
640 	(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
641 	FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
642 	END IF ;
643 
644 	FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
645 							p_data    => x_msg_data,
646 							p_encoded => FND_API.G_FALSE) ;
647 
648 
649 END Delete_Cost_details;
650 
651 
652 
656 **************************************************/
653 /**************************************************
654 Procedure Body Log_Cost_Rec_Parameters
655 This Procedure is used for Logging the cost record paramters.
657 
658 PROCEDURE Log_Cost_Rec_Parameters
659 	(
660 	p_Cost_Rec_in IN cost_rec_type
661 	) IS
662 	l_api_name      CONSTANT VARCHAR2(30) :='Log_Cost_Rec_Parameters';
663 	l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||l_api_name;
664 	l_log_module    CONSTANT VARCHAR2(255):='csxpcstb.pls.'|| l_api_name_full ||'.';
665 BEGIN
666 
667 	IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level THEN
668 	FND_LOG.String
669 	( FND_LOG.level_procedure , l_log_module ||'',
670 	' cost_id                  	 :'|| p_cost_rec_in.estimate_detail_id
671 	);
672 	FND_LOG.String
673 	( FND_LOG.level_procedure , l_log_module ||'',
674 	' estimate_detail_id                  	 :'|| p_cost_rec_in.estimate_detail_id
675 	);
676 	FND_LOG.String
677 	( FND_LOG.level_procedure , l_log_module ||'',
678 	' incident_id                         	 :'|| p_cost_rec_in.incident_id
679 	);
680 	FND_LOG.String
681 	( FND_LOG.level_procedure , l_log_module ||'',
682 	' charge_line_type                    	 :'|| p_cost_rec_in.charge_line_type
683 	);
684 
685 	FND_LOG.String
686 	( FND_LOG.level_procedure , l_log_module ||'',
687 	' txn_billing_type_id                 	 :'|| p_cost_rec_in.txn_billing_type_id
688 	);
689 	FND_LOG.String
690 	( FND_LOG.level_procedure , l_log_module ||'',
691 	' transaction_type_id                 	 :'|| p_cost_rec_in.transaction_type_id
692 	);
693 	FND_LOG.String
694 	( FND_LOG.level_procedure , l_log_module ||'',
695 	' inventory_item_id                	 :'|| p_cost_rec_in.inventory_item_id
696 	);
697 	FND_LOG.String
698 	( FND_LOG.level_procedure , l_log_module ||'',
699 	' unit_of_measure_code                       	 :'|| p_cost_rec_in.unit_of_measure_code
700 	);
701 	FND_LOG.String
702 	( FND_LOG.level_procedure , l_log_module ||'',
703 	' currency_code                        	 :'|| p_cost_rec_in.currency_code
704 	);
705 
706 	FND_LOG.String
707 	( FND_LOG.level_procedure , l_log_module ||'',
708 	' source_id                         	 :'|| p_cost_rec_in.source_id
709 	);
710 
711 	FND_LOG.String
712 	( FND_LOG.level_procedure , l_log_module ||'',
713 	' source_code                        	 :'|| p_cost_rec_in.source_code
714 	);
715 	FND_LOG.String
716 	( FND_LOG.level_procedure , l_log_module ||'',
717 	' source_id                         	 :'|| p_cost_rec_in.source_id
718 	);
719 	FND_LOG.String
720 	( FND_LOG.level_procedure , l_log_module ||'',
721 	' org_id                           	 :'|| p_cost_rec_in.org_id
722 	);
723 	FND_LOG.String
724 	( FND_LOG.level_procedure , l_log_module ||'',
725 	' inventory_org_id                         	 :'|| p_cost_rec_in.inventory_org_id
726 	);
727 
728 	FND_LOG.String
729 	( FND_LOG.level_procedure , l_log_module ||'',
730 	' extended_cost                          	 :'|| p_cost_rec_in.extended_cost
731 	);
732 
733 	FND_LOG.String
734 	( FND_LOG.level_procedure , l_log_module ||'',
735 	' attribute1                         	 :'|| p_cost_rec_in.attribute1
736 	);
737 	FND_LOG.String
738 	( FND_LOG.level_procedure , l_log_module ||'',
739 	' attribute2                         	 :'|| p_cost_rec_in.attribute2
740 	);
741 	FND_LOG.String
742 	( FND_LOG.level_procedure , l_log_module ||'',
743 	' attribute3                         	 :'|| p_cost_rec_in.attribute3
744 	);
745 
746 	FND_LOG.String
747 	( FND_LOG.level_procedure , l_log_module ||'',
748 	' attribute4                         	 :'|| p_cost_rec_in.attribute4
749 	);
750 
751 	FND_LOG.String
752 	( FND_LOG.level_procedure , l_log_module ||'',
753 	' attribute5                         	 :'|| p_cost_rec_in.attribute5
754 	);
755 
756 	FND_LOG.String
757 	( FND_LOG.level_procedure , l_log_module ||'',
758 	' attribute6                         	 :'|| p_cost_rec_in.attribute6
759 	);
760 
761 	FND_LOG.String
762 	( FND_LOG.level_procedure , l_log_module ||'',
763 	' attribute7                         	 :'|| p_cost_rec_in.attribute7
764 	);
765 
766 	FND_LOG.String
767 	( FND_LOG.level_procedure , l_log_module ||'',
768 	' attribute8                         	 :'|| p_cost_rec_in.attribute8
769 	);
770 
771 	FND_LOG.String
772 	( FND_LOG.level_procedure , l_log_module ||'',
773 	' attribute9                         	 :'|| p_cost_rec_in.attribute9
774 	);
775 
776 	FND_LOG.String
777 	( FND_LOG.level_procedure , l_log_module ||'',
778 	' attribute10                         	 :'|| p_cost_rec_in.attribute10
779 	);
780 
781 	FND_LOG.String
782 	( FND_LOG.level_procedure , l_log_module ||'',
783 	' attribute11                        	 :'|| p_cost_rec_in.attribute11
784 	);
785 
786 	FND_LOG.String
787 	( FND_LOG.level_procedure , l_log_module ||'',
788 	' attribute12                         	 :'|| p_cost_rec_in.attribute12
789 	);
790 
791 	FND_LOG.String
792 	( FND_LOG.level_procedure , l_log_module ||'',
793 	' attribute13                         	 :'|| p_cost_rec_in.attribute13
794 	);
795 
796 	FND_LOG.String
797 	( FND_LOG.level_procedure , l_log_module ||'',
798 	' attribute14                        	 :'|| p_cost_rec_in.attribute14
799 	);
800 	FND_LOG.String
801 	( FND_LOG.level_procedure , l_log_module ||'',
802 	' attribute15                         	 :'|| p_cost_rec_in.attribute15
803 	);
804 
805 	END IF;
806 
807 END Log_Cost_Rec_Parameters;
808 
809 END CS_Cost_Details_PUB;
810 --end of the package
811