435: error_code := null;
436: error_expl := null;
437: if ( (fm_org_id IS NULL ) OR (src_type_id IS NULL)
438: OR (action_id IS NULL ) ) then
439: fnd_message.set_name('INV','INV_DATA_ERROR');
440: fnd_message.set_token('ENTITY', 'populate_project_info');
441: translated_mesg := fnd_message.get ;
442: error_code := '';
443: error_expl := substr(translated_mesg,1,240) ;
436: error_expl := null;
437: if ( (fm_org_id IS NULL ) OR (src_type_id IS NULL)
438: OR (action_id IS NULL ) ) then
439: fnd_message.set_name('INV','INV_DATA_ERROR');
440: fnd_message.set_token('ENTITY', 'populate_project_info');
441: translated_mesg := fnd_message.get ;
442: error_code := '';
443: error_expl := substr(translated_mesg,1,240) ;
444: return ;
437: if ( (fm_org_id IS NULL ) OR (src_type_id IS NULL)
438: OR (action_id IS NULL ) ) then
439: fnd_message.set_name('INV','INV_DATA_ERROR');
440: fnd_message.set_token('ENTITY', 'populate_project_info');
441: translated_mesg := fnd_message.get ;
442: error_code := '';
443: error_expl := substr(translated_mesg,1,240) ;
444: return ;
445: end if;
544:
545: End If;
546: If X_return_status <> FND_API.G_RET_STS_SUCCESS
547: Then
548: translated_mesg := fnd_message.get ;
549: error_code := '';
550: error_expl := substr(translated_mesg,1,240) ;
551: End If;
552: Return;
590:
591: EXCEPTION
592: WHEN OTHERS then
593:
594: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
595: fnd_message.set_token('ENTITY1', 'populate_project_info');
596: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
597: fnd_message.set_token('ENTITY2', v_buffer);
598: translated_mesg := fnd_message.get ;
591: EXCEPTION
592: WHEN OTHERS then
593:
594: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
595: fnd_message.set_token('ENTITY1', 'populate_project_info');
596: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
597: fnd_message.set_token('ENTITY2', v_buffer);
598: translated_mesg := fnd_message.get ;
599: translated_mesg := substr(translated_mesg,1,230) ;
593:
594: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
595: fnd_message.set_token('ENTITY1', 'populate_project_info');
596: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
597: fnd_message.set_token('ENTITY2', v_buffer);
598: translated_mesg := fnd_message.get ;
599: translated_mesg := substr(translated_mesg,1,230) ;
600: error_expl := translated_mesg ;
601:
594: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
595: fnd_message.set_token('ENTITY1', 'populate_project_info');
596: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
597: fnd_message.set_token('ENTITY2', v_buffer);
598: translated_mesg := fnd_message.get ;
599: translated_mesg := substr(translated_mesg,1,230) ;
600: error_expl := translated_mesg ;
601:
602: END populate_project_info;
663: original_task_id := v_task_id ;
664: original_source_task_id := v_source_task_id ;
665: original_to_task_id := v_to_task_id ;
666: if ( v_org_id IS NULL ) then
667: fnd_message.set_name('INV','INV_DATA_ERROR');
668: fnd_message.set_token('ENTITY', 'call_customer_validation');
669: translated_mesg := fnd_message.get ;
670: v_error_mesg := substr(translated_mesg,1,240) ;
671: v_success_flag := -1 ;
664: original_source_task_id := v_source_task_id ;
665: original_to_task_id := v_to_task_id ;
666: if ( v_org_id IS NULL ) then
667: fnd_message.set_name('INV','INV_DATA_ERROR');
668: fnd_message.set_token('ENTITY', 'call_customer_validation');
669: translated_mesg := fnd_message.get ;
670: v_error_mesg := substr(translated_mesg,1,240) ;
671: v_success_flag := -1 ;
672: return ;
665: original_to_task_id := v_to_task_id ;
666: if ( v_org_id IS NULL ) then
667: fnd_message.set_name('INV','INV_DATA_ERROR');
668: fnd_message.set_token('ENTITY', 'call_customer_validation');
669: translated_mesg := fnd_message.get ;
670: v_error_mesg := substr(translated_mesg,1,240) ;
671: v_success_flag := -1 ;
672: return ;
673: end if;
671: v_success_flag := -1 ;
672: return ;
673: end if;
674: if ( (v_txn_action_id = 3) AND v_xfr_org_id IS NULL ) then
675: fnd_message.set_name('INV','INV_DATA_ERROR');
676: fnd_message.set_token('ENTITY', 'call_customer_validation');
677: translated_mesg := fnd_message.get ;
678: v_error_mesg := substr(translated_mesg,1,240) ;
679: v_success_flag := -1 ;
672: return ;
673: end if;
674: if ( (v_txn_action_id = 3) AND v_xfr_org_id IS NULL ) then
675: fnd_message.set_name('INV','INV_DATA_ERROR');
676: fnd_message.set_token('ENTITY', 'call_customer_validation');
677: translated_mesg := fnd_message.get ;
678: v_error_mesg := substr(translated_mesg,1,240) ;
679: v_success_flag := -1 ;
680: return ;
673: end if;
674: if ( (v_txn_action_id = 3) AND v_xfr_org_id IS NULL ) then
675: fnd_message.set_name('INV','INV_DATA_ERROR');
676: fnd_message.set_token('ENTITY', 'call_customer_validation');
677: translated_mesg := fnd_message.get ;
678: v_error_mesg := substr(translated_mesg,1,240) ;
679: v_success_flag := -1 ;
680: return ;
681: end if;