DBA Data[Home] [Help]

APPS.CSM_DEBRIEF_HEADERS_PKG dependencies on FND_API

Line 110: x_return_status := FND_API.G_RET_STS_SUCCESS;

106: l_profile_value varchar2(240);
107:
108: BEGIN
109:
110: x_return_status := FND_API.G_RET_STS_SUCCESS;
111:
112: -- Start with some initialization.
113: -- We need to know if a debrief header record has been made
114: -- form this task_assignment_id. In that case we have to

Line 168: , p_init_msg_list => FND_API.G_TRUE

164: l_deb_rec.TRAVEL_DISTANCE_IN_KM := p_record.TRAVEL_DISTANCE_IN_KM;
165: -- Create a debrief header.
166: csf_debrief_pub.create_debrief
167: ( p_api_version_number => 1.0
168: , p_init_msg_list => FND_API.G_TRUE
169: , p_commit => FND_API.G_FALSE
170: , p_debrief_rec => l_deb_rec
171: , p_debrief_line_tbl => l_line_tbl
172: , x_debrief_header_id => l_debrief_header_id

Line 169: , p_commit => FND_API.G_FALSE

165: -- Create a debrief header.
166: csf_debrief_pub.create_debrief
167: ( p_api_version_number => 1.0
168: , p_init_msg_list => FND_API.G_TRUE
169: , p_commit => FND_API.G_FALSE
170: , p_debrief_rec => l_deb_rec
171: , p_debrief_line_tbl => l_line_tbl
172: , x_debrief_header_id => l_debrief_header_id
173: , x_return_status => x_return_status

Line 179: if x_return_status <> FND_API.G_RET_STS_SUCCESS

175: , x_msg_data => l_msg_data
176: );
177:
178: -- This could have failed, so we need to check.
179: if x_return_status <> FND_API.G_RET_STS_SUCCESS
180: then
181: /*** exception occurred in API -> return errmsg ***/
182: p_error_msg := CSM_UTIL_PKG.GET_ERROR_MESSAGE_TEXT
183: (

Line 189: x_return_status := FND_API.G_RET_STS_ERROR;

185: );
186: CSM_UTIL_PKG.log( 'Error in ' || g_object_name || '.APPLY_INSERT:'
187: || ' ROOT ERROR: csf_debrief_pub.create_debrief'
188: || ' for PK ' || p_record.DEBRIEF_HEADER_ID,'CSM_DEBRIEF_HEADERS_PKG.APPLY_INSERT',FND_LOG.LEVEL_ERROR);
189: x_return_status := FND_API.G_RET_STS_ERROR;
190: return;
191: ELSE
192: -- successful insert...need to reject the record on client
193: -- as debrief_header_id and debrief_number are generated by the API

Line 211: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

207: l_msg_data,
208: x_return_status
209: );
210:
211: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
212: /*** Reject successful ***/
213: CSM_UTIL_PKG.LOG
214: ( 'Debrief Header record rejected ' || ' for PK '
215: || p_record.debrief_header_id

Line 226: x_return_status := FND_API.G_RET_STS_ERROR;

222: || p_record.debrief_header_id
223: ,'CSM_DEBRIEF_HEADERS_PKG.APPLY_INSERT'
224: ,FND_LOG.LEVEL_PROCEDURE); -- put PK column here
225:
226: x_return_status := FND_API.G_RET_STS_ERROR;
227: return;
228: END IF;
229: end if;
230: ELSE

Line 250: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

246: l_msg_data,
247: x_return_status
248: );
249:
250: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
251: /*** Reject successful ***/
252: CSM_UTIL_PKG.LOG
253: ( 'Debrief Header record rejected ' || ' for PK '
254: || p_record.debrief_header_id

Line 265: x_return_status := FND_API.G_RET_STS_ERROR;

261: || p_record.debrief_header_id
262: ,'CSM_DEBRIEF_HEADERS_PKG.APPLY_INSERT'
263: ,FND_LOG.LEVEL_PROCEDURE); -- put PK column here
264:
265: x_return_status := FND_API.G_RET_STS_ERROR;
266: return;
267: END IF;
268:
269: -- check for conflict detection

Line 274: ASG_DEFER.IS_DEFERRED(p_record.clid$$cs, p_record.tranid$$,g_pub_name, p_record.seqno$$) <> FND_API.G_TRUE THEN

270: l_profile_value := fnd_profile.value(csm_profile_pkg.g_JTM_APPL_CONFLICT_RULE);
271:
272: -- SERVER_WINS profile value
273: IF(l_profile_value = csm_profile_pkg.g_SERVER_WINS) AND
274: ASG_DEFER.IS_DEFERRED(p_record.clid$$cs, p_record.tranid$$,g_pub_name, p_record.seqno$$) <> FND_API.G_TRUE THEN
275: IF(r_deb_head.last_update_date <> p_record.server_last_update_date AND r_deb_head.last_updated_by <> NVL(p_record.last_updated_by,asg_base.get_user_id(p_record.clid$$cs))) THEN --12.1
276: p_error_msg := 'UPWARD SYNC CONFLICT: CLIENT LOST For CSF_DEBRIEF_HEADERS: CSM_DEBRIEF_HEADERS_PKG.APPLY_UPDATE: P_KEY = '
277: || p_record.debrief_header_id;
278: x_return_status := FND_API.G_RET_STS_ERROR;

Line 278: x_return_status := FND_API.G_RET_STS_ERROR;

274: ASG_DEFER.IS_DEFERRED(p_record.clid$$cs, p_record.tranid$$,g_pub_name, p_record.seqno$$) <> FND_API.G_TRUE THEN
275: IF(r_deb_head.last_update_date <> p_record.server_last_update_date AND r_deb_head.last_updated_by <> NVL(p_record.last_updated_by,asg_base.get_user_id(p_record.clid$$cs))) THEN --12.1
276: p_error_msg := 'UPWARD SYNC CONFLICT: CLIENT LOST For CSF_DEBRIEF_HEADERS: CSM_DEBRIEF_HEADERS_PKG.APPLY_UPDATE: P_KEY = '
277: || p_record.debrief_header_id;
278: x_return_status := FND_API.G_RET_STS_ERROR;
279: csm_util_pkg.log(p_error_msg, g_object_name || '.APPLY_UPDATE', FND_LOG.LEVEL_ERROR);
280: RETURN;
281: END IF;
282: ELSE -- client wins

Line 321: p_init_msg_list => FND_API.G_TRUE,

317:
318: -- update the debrief line
319: csf_debrief_pub.Update_debrief(
320: p_api_version_number => 1.0,
321: p_init_msg_list => FND_API.G_TRUE,
322: p_commit => FND_API.G_FALSE,
323: p_debrief_rec => l_deb_rec,
324: X_Return_Status => x_return_status,
325: X_Msg_Count => l_msg_count,

Line 322: p_commit => FND_API.G_FALSE,

318: -- update the debrief line
319: csf_debrief_pub.Update_debrief(
320: p_api_version_number => 1.0,
321: p_init_msg_list => FND_API.G_TRUE,
322: p_commit => FND_API.G_FALSE,
323: p_debrief_rec => l_deb_rec,
324: X_Return_Status => x_return_status,
325: X_Msg_Count => l_msg_count,
326: X_Msg_Data => l_msg_data

Line 330: if x_return_status <> FND_API.G_RET_STS_SUCCESS

326: X_Msg_Data => l_msg_data
327: );
328:
329: -- This could have failed, so we need to check.
330: if x_return_status <> FND_API.G_RET_STS_SUCCESS
331: then
332: /*** exception occurred in API -> return errmsg ***/
333: p_error_msg := CSM_UTIL_PKG.GET_ERROR_MESSAGE_TEXT
334: (

Line 340: x_return_status := FND_API.G_RET_STS_ERROR;

336: );
337: CSM_UTIL_PKG.log( 'Error in ' || g_object_name || '.APPLY_INSERT:'
338: || ' ROOT ERROR: csf_debrief_pub.create_debrief'
339: || ' for PK ' || r_deb_head.DEBRIEF_HEADER_ID,'CSM_DEBRIEF_HEADERS_PKG.APPLY_INSERT',FND_LOG.LEVEL_ERROR);
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: return;
342: end if;
343: END IF;
344: END IF;

Line 347: x_return_status := FND_API.G_RET_STS_SUCCESS;

343: END IF;
344: END IF;
345:
346: -- success
347: x_return_status := FND_API.G_RET_STS_SUCCESS;
348:
349: exception
350: when others then
351: fnd_msg_pub.Add_Exc_Msg( g_object_name, 'APPLY_INSERT', sqlerrm);

Line 359: x_return_status := FND_API.G_RET_STS_ERROR;

355: );
356:
357: CSM_UTIL_PKG.log( 'Exception in ' || g_object_name || '.APPLY_INSERT:'
358: || ' for PK ' || p_record.DEBRIEF_HEADER_ID,'CSM_DEBRIEF_HEADERS_PKG.APPLY_INSERT',FND_LOG.LEVEL_EXCEPTION );
359: x_return_status := FND_API.G_RET_STS_ERROR;
360: END APPLY_INSERT;
361:
362:
363: PROCEDURE APPLY_UPDATE

Line 402: ASG_DEFER.IS_DEFERRED(p_record.clid$$cs, p_record.tranid$$,g_pub_name, p_record.seqno$$) <> FND_API.G_TRUE THEN

398: BEGIN
399: l_profile_value := fnd_profile.value('JTM_APPL_CONFLICT_RULE');
400:
401: IF l_profile_value = 'SERVER_WINS' AND
402: ASG_DEFER.IS_DEFERRED(p_record.clid$$cs, p_record.tranid$$,g_pub_name, p_record.seqno$$) <> FND_API.G_TRUE THEN
403: OPEN c_debrief_header(b_debrief_header_id => p_record.debrief_header_id, b_task_assignment_id => p_record.task_assignment_id);
404: FETCH c_debrief_header INTO r_debrief_header;
405: IF c_debrief_header%FOUND THEN
406: IF (r_debrief_header.last_update_date <> p_record.server_last_update_date AND r_debrief_header.last_updated_by <> NVL(p_record.last_updated_by,asg_base.get_user_id(p_record.clid$$cs))) THEN --12.1

Line 417: x_return_status := FND_API.G_RET_STS_ERROR;

413: ( 'JTM'
414: , 'JTM_STALE_DATA'
415: );
416: fnd_msg_pub.ADD;
417: x_return_status := FND_API.G_RET_STS_ERROR;
418: RETURN;
419: END IF;
420: ELSE
421: CSM_UTIL_PKG.log( 'No record found in Apps Database in ' || g_object_name || '.APPLY_UPDATE:',

Line 468: p_init_msg_list => FND_API.G_TRUE,

464:
465: -- update the debrief line
466: csf_debrief_pub.Update_debrief(
467: p_api_version_number => 1.0,
468: p_init_msg_list => FND_API.G_TRUE,
469: p_commit => FND_API.G_FALSE,
470: p_debrief_rec => l_deb_rec,
471: X_Return_Status => x_return_status,
472: X_Msg_Count => l_msg_count,

Line 469: p_commit => FND_API.G_FALSE,

465: -- update the debrief line
466: csf_debrief_pub.Update_debrief(
467: p_api_version_number => 1.0,
468: p_init_msg_list => FND_API.G_TRUE,
469: p_commit => FND_API.G_FALSE,
470: p_debrief_rec => l_deb_rec,
471: X_Return_Status => x_return_status,
472: X_Msg_Count => l_msg_count,
473: X_Msg_Data => l_msg_data

Line 477: IF x_return_status <> FND_API.G_RET_STS_SUCCESS

473: X_Msg_Data => l_msg_data
474: );
475:
476: -- This could have failed, so we need to check.
477: IF x_return_status <> FND_API.G_RET_STS_SUCCESS
478: THEN
479: /*** exception occurred in API -> return errmsg ***/
480: p_error_msg := CSM_UTIL_PKG.GET_ERROR_MESSAGE_TEXT
481: (

Line 487: x_return_status := FND_API.G_RET_STS_ERROR;

483: );
484: CSM_UTIL_PKG.log( 'Error in ' || g_object_name || '.APPLY_UPDATE:'
485: || ' ROOT ERROR: csf_debrief_pub.update_debrief'
486: || ' for PK ' || p_record.DEBRIEF_HEADER_ID,'CSM_DEBRIEF_HEADERS_PKG.APPLY_UPDATE',FND_LOG.LEVEL_ERROR);
487: x_return_status := FND_API.G_RET_STS_ERROR;
488: RETURN;
489: END IF;
490:
491: -- success

Line 492: x_return_status := FND_API.G_RET_STS_SUCCESS;

488: RETURN;
489: END IF;
490:
491: -- success
492: x_return_status := FND_API.G_RET_STS_SUCCESS;
493:
494: EXCEPTION
495: WHEN others THEN
496: CSM_UTIL_PKG.log( 'Exception in ' || g_object_name || '.APPLY_UPDATE:'

Line 501: x_return_status := FND_API.G_RET_STS_ERROR;

497: || ' for PK ' || p_record.debrief_header_id,
498: g_object_name || '.APPLY_UPDATE',
499: FND_LOG.LEVEL_EXCEPTION );
500:
501: x_return_status := FND_API.G_RET_STS_ERROR;
502:
503: END APPLY_UPDATE;
504:
505: /***

Line 516: x_return_status := FND_API.G_RET_STS_SUCCESS;

512: x_return_status IN out nocopy VARCHAR2
513: ) IS
514: BEGIN
515: /*** initialize return status and message list ***/
516: x_return_status := FND_API.G_RET_STS_SUCCESS;
517: FND_MSG_PUB.INITIALIZE;
518:
519: IF p_record.dmltype$$='I' THEN
520: -- Process insert

Line 548: x_return_status := FND_API.G_RET_STS_ERROR;

544: , p_token_name1 => 'DML'
545: , p_token_value1 => p_record.dmltype$$
546: );
547:
548: x_return_status := FND_API.G_RET_STS_ERROR;
549: END IF;
550:
551: EXCEPTION WHEN OTHERS THEN
552: /*** defer record when any process exception occurs ***/

Line 563: x_return_status := FND_API.G_RET_STS_ERROR;

559: (
560: p_api_error => TRUE
561: );
562:
563: x_return_status := FND_API.G_RET_STS_ERROR;
564: END APPLY_RECORD;
565:
566: /***
567: This procedure is called by CSM_UTIL_PKG when publication item

Line 585: x_return_status := FND_API.G_RET_STS_SUCCESS;

581: l_debrief_header_id csf_debrief_headers.debrief_header_id%TYPE;
582:
583: BEGIN
584: g_debug_level := p_debug_level;
585: x_return_status := FND_API.G_RET_STS_SUCCESS;
586:
587: /*** loop through debrief parts records in inqueue ***/
588: FOR r_debrief_headers IN c_debrief_headers( p_user_name, p_tranid) LOOP
589:

Line 601: IF l_process_status = FND_API.G_RET_STS_SUCCESS THEN

597: , l_process_status
598: );
599:
600: /*** was record processed successfully? ***/
601: IF l_process_status = FND_API.G_RET_STS_SUCCESS THEN
602: -- check to see if any notes exist for the debrief_header
603: -- if exists update source_object_id column to new value for debrief_header_id
604:
605: OPEN c_debrief(r_debrief_headers.task_assignment_id);

Line 638: IF l_process_status <> FND_API.G_RET_STS_SUCCESS THEN

634: l_process_status
635: );
636:
637: /*** was delete successful? ***/
638: IF l_process_status <> FND_API.G_RET_STS_SUCCESS THEN
639: /*** no -> rollback ***/
640: CSM_UTIL_PKG.LOG
641: ( 'Deleting from inqueue failed, rolling back to savepoint'
642: || ' for PK ' || r_debrief_headers.debrief_header_id,'CSM_DEBRIEF_HEADERS_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR ); -- put PK column here

Line 644: x_return_status := FND_API.G_RET_STS_ERROR;

640: CSM_UTIL_PKG.LOG
641: ( 'Deleting from inqueue failed, rolling back to savepoint'
642: || ' for PK ' || r_debrief_headers.debrief_header_id,'CSM_DEBRIEF_HEADERS_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR ); -- put PK column here
643: ROLLBACK TO save_rec;
644: x_return_status := FND_API.G_RET_STS_ERROR;
645: END IF;
646: END IF;
647:
648: IF l_process_Status <> FND_API.G_RET_STS_SUCCESS THEN

Line 648: IF l_process_Status <> FND_API.G_RET_STS_SUCCESS THEN

644: x_return_status := FND_API.G_RET_STS_ERROR;
645: END IF;
646: END IF;
647:
648: IF l_process_Status <> FND_API.G_RET_STS_SUCCESS THEN
649: OPEN c_debrief(r_debrief_headers.task_assignment_id);
650: FETCH c_debrief INTO l_debrief_header_id;
651: IF c_debrief%FOUND THEN
652: FOR r_debrief_notes IN c_debrief_notes(r_debrief_headers.debrief_header_id, r_debrief_headers.clid$$cs, r_debrief_headers.tranid$$) LOOP

Line 685: IF l_process_status <> FND_API.G_RET_STS_SUCCESS THEN

681: , r_debrief_headers.dmltype$$
682: );
683:
684: /*** Was defer successful? ***/
685: IF l_process_status <> FND_API.G_RET_STS_SUCCESS THEN
686: /*** no -> rollback ***/
687: CSM_UTIL_PKG.LOG
688: ( 'Defer record failed, rolling back to savepoint'
689: || ' for PK ' || r_debrief_headers.debrief_header_id ,'CSM_DEBRIEF_HEADERS_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR); -- put PK column here

Line 691: x_return_status := FND_API.G_RET_STS_ERROR;

687: CSM_UTIL_PKG.LOG
688: ( 'Defer record failed, rolling back to savepoint'
689: || ' for PK ' || r_debrief_headers.debrief_header_id ,'CSM_DEBRIEF_HEADERS_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_ERROR); -- put PK column here
690: ROLLBACK TO save_rec;
691: x_return_status := FND_API.G_RET_STS_ERROR;
692: END IF;
693: END IF;
694:
695: END LOOP;

Line 702: x_return_status := FND_API.G_RET_STS_ERROR;

698: /*** catch and log exceptions ***/
699: CSM_UTIL_PKG.LOG
700: ( 'Exception occurred in APPLY_CLIENT_CHANGES:' || ' ' || sqlerrm
701: ,'CSM_DEBRIEF_HEADERS_PKG.APPLY_CLIENT_CHANGES',FND_LOG.LEVEL_EXCEPTION);
702: x_return_status := FND_API.G_RET_STS_ERROR;
703: END APPLY_CLIENT_CHANGES;
704:
705: FUNCTION CONFLICT_RESOLUTION_METHOD (p_user_name IN VARCHAR2,
706: p_tran_id IN NUMBER,