440: error_code := null;
441: error_expl := null;
442: if ( (fm_org_id IS NULL ) OR (src_type_id IS NULL)
443: OR (action_id IS NULL ) ) then
444: fnd_message.set_name('INV','INV_DATA_ERROR');
445: fnd_message.set_token('ENTITY', 'populate_project_info');
446: translated_mesg := fnd_message.get ;
447: error_code := '';
448: error_expl := substr(translated_mesg,1,240) ;
441: error_expl := null;
442: if ( (fm_org_id IS NULL ) OR (src_type_id IS NULL)
443: OR (action_id IS NULL ) ) then
444: fnd_message.set_name('INV','INV_DATA_ERROR');
445: fnd_message.set_token('ENTITY', 'populate_project_info');
446: translated_mesg := fnd_message.get ;
447: error_code := '';
448: error_expl := substr(translated_mesg,1,240) ;
449: return ;
442: if ( (fm_org_id IS NULL ) OR (src_type_id IS NULL)
443: OR (action_id IS NULL ) ) then
444: fnd_message.set_name('INV','INV_DATA_ERROR');
445: fnd_message.set_token('ENTITY', 'populate_project_info');
446: translated_mesg := fnd_message.get ;
447: error_code := '';
448: error_expl := substr(translated_mesg,1,240) ;
449: return ;
450: end if;
549:
550: End If;
551: If X_return_status <> FND_API.G_RET_STS_SUCCESS
552: Then
553: translated_mesg := fnd_message.get ;
554: error_code := '';
555: error_expl := substr(translated_mesg,1,240) ;
556: End If;
557: Return;
595:
596: EXCEPTION
597: WHEN OTHERS then
598:
599: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
600: fnd_message.set_token('ENTITY1', 'populate_project_info');
601: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
602: fnd_message.set_token('ENTITY2', v_buffer);
603: translated_mesg := fnd_message.get ;
596: EXCEPTION
597: WHEN OTHERS then
598:
599: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
600: fnd_message.set_token('ENTITY1', 'populate_project_info');
601: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
602: fnd_message.set_token('ENTITY2', v_buffer);
603: translated_mesg := fnd_message.get ;
604: translated_mesg := substr(translated_mesg,1,230) ;
598:
599: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
600: fnd_message.set_token('ENTITY1', 'populate_project_info');
601: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
602: fnd_message.set_token('ENTITY2', v_buffer);
603: translated_mesg := fnd_message.get ;
604: translated_mesg := substr(translated_mesg,1,230) ;
605: error_expl := translated_mesg ;
606:
599: fnd_message.set_name('INV','INV_UNHANDLED_ERR');
600: fnd_message.set_token('ENTITY1', 'populate_project_info');
601: v_buffer := to_char(SQLCODE) || ' '|| substr(SQLERRM,1,150);
602: fnd_message.set_token('ENTITY2', v_buffer);
603: translated_mesg := fnd_message.get ;
604: translated_mesg := substr(translated_mesg,1,230) ;
605: error_expl := translated_mesg ;
606:
607: END populate_project_info;
668: original_task_id := v_task_id ;
669: original_source_task_id := v_source_task_id ;
670: original_to_task_id := v_to_task_id ;
671: if ( v_org_id IS NULL ) then
672: fnd_message.set_name('INV','INV_DATA_ERROR');
673: fnd_message.set_token('ENTITY', 'call_customer_validation');
674: translated_mesg := fnd_message.get ;
675: v_error_mesg := substr(translated_mesg,1,240) ;
676: v_success_flag := -1 ;
669: original_source_task_id := v_source_task_id ;
670: original_to_task_id := v_to_task_id ;
671: if ( v_org_id IS NULL ) then
672: fnd_message.set_name('INV','INV_DATA_ERROR');
673: fnd_message.set_token('ENTITY', 'call_customer_validation');
674: translated_mesg := fnd_message.get ;
675: v_error_mesg := substr(translated_mesg,1,240) ;
676: v_success_flag := -1 ;
677: return ;
670: original_to_task_id := v_to_task_id ;
671: if ( v_org_id IS NULL ) then
672: fnd_message.set_name('INV','INV_DATA_ERROR');
673: fnd_message.set_token('ENTITY', 'call_customer_validation');
674: translated_mesg := fnd_message.get ;
675: v_error_mesg := substr(translated_mesg,1,240) ;
676: v_success_flag := -1 ;
677: return ;
678: end if;
676: v_success_flag := -1 ;
677: return ;
678: end if;
679: if ( (v_txn_action_id = 3) AND v_xfr_org_id IS NULL ) then
680: fnd_message.set_name('INV','INV_DATA_ERROR');
681: fnd_message.set_token('ENTITY', 'call_customer_validation');
682: translated_mesg := fnd_message.get ;
683: v_error_mesg := substr(translated_mesg,1,240) ;
684: v_success_flag := -1 ;
677: return ;
678: end if;
679: if ( (v_txn_action_id = 3) AND v_xfr_org_id IS NULL ) then
680: fnd_message.set_name('INV','INV_DATA_ERROR');
681: fnd_message.set_token('ENTITY', 'call_customer_validation');
682: translated_mesg := fnd_message.get ;
683: v_error_mesg := substr(translated_mesg,1,240) ;
684: v_success_flag := -1 ;
685: return ;
678: end if;
679: if ( (v_txn_action_id = 3) AND v_xfr_org_id IS NULL ) then
680: fnd_message.set_name('INV','INV_DATA_ERROR');
681: fnd_message.set_token('ENTITY', 'call_customer_validation');
682: translated_mesg := fnd_message.get ;
683: v_error_mesg := substr(translated_mesg,1,240) ;
684: v_success_flag := -1 ;
685: return ;
686: end if;