[Home] [Help]
87: l_msg_count number;
88:
89: BEGIN
90:
91: CSM_UTIL_PKG.log( 'Entered APPLY_INSERT for debrief_line_id'|| p_record.DEBRIEF_LINE_ID,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_INSERT',FND_LOG.LEVEL_ERROR);
92:
93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94:
95: -- Start with some initialization.
152: p_api_error => TRUE
153: );
154: CSM_UTIL_PKG.log( 'Error in ' || g_object_name || '.APPLY_INSERT:'
155: || ' ROOT ERROR: csf_debrief_pub.create_debrief'
156: || ' for PK ' || p_record.DEBRIEF_LINE_ID,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_INSERT',FND_LOG.LEVEL_ERROR );
157: x_return_status := FND_API.G_RET_STS_ERROR;
158: return;
159: end if;
160: end if;
230: p_api_error => TRUE
231: );
232: CSM_UTIL_PKG.log( 'Error in ' || g_object_name || '.APPLY_INSERT:'
233: || ' ROOT ERROR: csf_debrief_pub.create_debrief_lines'
234: || ' for PK ' || p_record.DEBRIEF_LINE_ID ,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_INSERT',FND_LOG.LEVEL_ERROR);
235: x_return_status := FND_API.G_RET_STS_ERROR;
236: return;
237: end if;
238:
261: (
262: p_api_error => TRUE
263: );
264: CSM_UTIL_PKG.log( 'Exception in ' || g_object_name || '.APPLY_INSERT:'
265: || ' for PK ' || p_record.DEBRIEF_LINE_ID ,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_INSERT',FND_LOG.LEVEL_EXCEPTION);
266: x_return_status := FND_API.G_RET_STS_ERROR;
267: END APPLY_INSERT;
268:
269: /***
299:
300:
301: BEGIN
302:
303: CSM_UTIL_PKG.log( 'Entered APPLY_UPDATE for debrief_line_id'|| p_record.DEBRIEF_LINE_ID,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_INSERT',FND_LOG.LEVEL_ERROR);
304:
305: x_return_status := FND_API.G_RET_STS_SUCCESS;
306:
307: -- Lookup the debrief_header id. It must be there as this is an update
363: if(r_cdl.last_update_date <> p_record.server_last_update_date) then
364: x_return_status := FND_API.G_RET_STS_ERROR;
365: p_error_msg := 'UPWARD SYNC CONFLICT: CLIENT LOST: CSM_DEBRIEF_EXPENSES_PKG.APPLY_UPDATE: P_KEY = '
366: || p_record.debrief_line_id;
367: csm_util_pkg.log(p_error_msg,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_UPDATE',FND_LOG.LEVEL_ERROR);
368: return;
369: end if;
370: end if;
371:
390: );
391:
392: CSM_UTIL_PKG.log( 'Error in ' || g_object_name || '.APPLY_UPDATE:'
393: || ' ROOT ERROR: csf_debrief_pub.update_debrief_lines'
394: || ' for PK ' || p_record.DEBRIEF_LINE_ID,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_UPDATE',FND_LOG.LEVEL_ERROR );
395:
396: x_return_status := FND_API.G_RET_STS_ERROR;
397: return;
398: end if;
405: p_api_error => TRUE
406: );
407:
408: CSM_UTIL_PKG.log( 'Exception in ' || g_object_name || '.APPLY_UPDATE:'
409: || ' for PK ' || p_record.DEBRIEF_LINE_ID,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_UPDATE',FND_LOG.LEVEL_EXCEPTION );
410: x_return_status := FND_API.G_RET_STS_ERROR;
411: END APPLY_UPDATE;
412:
413:
445: ELSE
446: -- Process delete; not supported for this entity
447: CSM_UTIL_PKG.LOG
448: ( 'Delete is not supported for this entity'
449: || ' for PK ' || p_record.debrief_line_id ,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_RECORD',FND_LOG.LEVEL_ERROR);
450:
451: p_error_msg := CSM_UTIL_PKG.GET_ERROR_MESSAGE_TEXT
452: (
453: p_message => 'CSM_DML_OPERATION'
461: EXCEPTION WHEN OTHERS THEN
462: /*** defer record when any process exception occurs ***/
463: CSM_UTIL_PKG.LOG
464: ( 'Exception occurred in CSM_DEBRIEF_EXPENSES_PKG.APPLY_RECORD:' || ' ' || sqlerrm
465: || ' for PK ' || p_record.debrief_line_id ,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_RECORD',FND_LOG.LEVEL_EXCEPTION );
466:
467: fnd_msg_pub.Add_Exc_Msg( g_object_name, 'APPLY_RECORD', sqlerrm);
468: p_error_msg := CSM_UTIL_PKG.GET_ERROR_MESSAGE_TEXT
469: (
496: BEGIN
497: g_debug_level := p_debug_level;
498: x_return_status := FND_API.G_RET_STS_SUCCESS;
499:
500: csm_util_pkg.log('csm_debrief_expenses_pkg.apply_client_changes entered','CSM_DEBRIEF_EXPENSES_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR);
501:
502: /*** loop through debrief expenses records in inqueue ***/
503: IF p_task_assignment_id IS NULL THEN
504: OPEN c_cur FOR 'SELECT * FROM csf_m_debrief_expenses_inq inq WHERE tranid$$ = '||p_tranid||' AND clid$$cs = '''||p_user_name
543: IF l_process_status <> FND_API.G_RET_STS_SUCCESS THEN
544: /*** no -> rollback ***/
545: CSM_UTIL_PKG.LOG
546: ( 'Deleting from inqueue failed, rolling back to savepoint'
547: || ' for PK ' || r_debrief_expenses.debrief_line_id ,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR ); -- put PK column here
548: ROLLBACK TO save_rec;
549: x_return_status := FND_API.G_RET_STS_ERROR;
550: END IF;
551: END IF;
553: IF l_process_Status <> FND_API.G_RET_STS_SUCCESS THEN
554: /*** Record was not processed successfully or delete failed -> defer and reject record ***/
555: CSM_UTIL_PKG.LOG
556: ( 'Record not processed successfully, deferring and rejecting record'
557: || ' for PK ' || r_debrief_expenses.debrief_line_id,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR ); -- put PK column here
558:
559: CSM_UTIL_PKG.DEFER_RECORD
560: (
561: p_user_name
573: IF l_process_status <> FND_API.G_RET_STS_SUCCESS THEN
574: /*** no -> rollback ***/
575: CSM_UTIL_PKG.LOG
576: ( 'Defer record failed, rolling back to savepoint'
577: || ' for PK ' || r_debrief_expenses.debrief_line_id,'CSM_DEBRIEF_EXPENSES_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR ); -- put PK column here
578: ROLLBACK TO save_rec;
579: x_return_status := FND_API.G_RET_STS_ERROR;
580: END IF;
581: END IF;
586: EXCEPTION WHEN OTHERS THEN
587: /*** catch and log exceptions ***/
588: CSM_UTIL_PKG.LOG
589: ( 'Exception occurred in APPLY_CLIENT_CHANGES:' || ' ' || SQLERRM,
590: 'CSM_DEBRIEF_EXPENSES_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_EXCEPTION );
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: END APPLY_CLIENT_CHANGES;
593:
594: END CSM_DEBRIEF_EXPENSES_PKG;