476: x_return_status :='S';
477: x_msg_data := null;
478: x_msg_count := 0;
479:
480: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
481: Fnd_Msg_Pub.Initialize;
482: END IF;
483:
484: x_return_status :=Fnd_Api.G_Ret_Sts_Success;
480: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
481: Fnd_Msg_Pub.Initialize;
482: END IF;
483:
484: x_return_status :=Fnd_Api.G_Ret_Sts_Success;
485: x_msg_data := null;
486: x_msg_count := 0;
487:
488: IF (fv_install.enabled) AND (p_format_complete_status = 'SUMMARY_FORMAT_SUCCESS') THEN
491: Set summary_schedule_flag = 'Y'
492: Where payment_instruction_id = p_payment_instruction_id;
493: END IF;
494:
495: IF Fnd_Api.To_Boolean(p_commit) THEN
496: COMMIT;
497: END IF;
498:
499: EXCEPTION
497: END IF;
498:
499: EXCEPTION
500: WHEN others THEN
501: x_return_status := Fnd_Api.G_Ret_Sts_Unexp_Error;
502: Fnd_Msg_Pub.Add_Exc_Msg(
503: p_pkg_name => 'FV_FEDERAL_PAYMENT_FIELDS_PKG',
504: p_procedure_name => 'SUMMARY_FORMAT_PROG_COMPLETED');
505: Fnd_Msg_Pub.Count_And_Get(
502: Fnd_Msg_Pub.Add_Exc_Msg(
503: p_pkg_name => 'FV_FEDERAL_PAYMENT_FIELDS_PKG',
504: p_procedure_name => 'SUMMARY_FORMAT_PROG_COMPLETED');
505: Fnd_Msg_Pub.Count_And_Get(
506: p_encoded => Fnd_Api.G_False,
507: p_count => x_msg_count,
508: p_data => x_msg_data);
509:
510:
526: IS
527: l_api_name CONSTANT varchar2(30) := 'submit_pay_instr_ts_report';
528: l_org_id NUMBER;
529: BEGIN
530: IF FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
531: FND_MSG_PUB.initialize;
532: END IF;
533:
534: x_return_status := FND_API.G_RET_STS_SUCCESS;
530: IF FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
531: FND_MSG_PUB.initialize;
532: END IF;
533:
534: x_return_status := FND_API.G_RET_STS_SUCCESS;
535: x_msg_count := 0;
536: x_msg_data := NULL;
537: l_org_id := MO_GLOBAL.get_current_org_id;
538:
540: fnd_request.set_org_id(l_org_id);
541: x_request_id := FND_REQUEST.submit_request('FV','FVIBYTSL',NULL,NULL,FALSE,p_payment_instruction_id);
542:
543: IF (x_request_id = 0) THEN
544: x_return_status := FND_API.G_RET_STS_ERROR;
545: FND_MESSAGE.set_name('FV', 'FV_TSL_REQUEST_FAILED');
546: FND_MSG_PUB.add;
547: ELSE
548: FND_MESSAGE.set_name('FV', 'FV_TSL_REQUEST_SUBMITTED');
555: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
556: p_data => x_msg_data );
557: EXCEPTION
558: WHEN OTHERS THEN
559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
560: FND_MSG_PUB.add_exc_msg( G_PKG_NAME,
561: l_api_name );
562: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
563: p_data => x_msg_data );
581:
582: l_api_name CONSTANT varchar2(30) := 'submit_cash_pos_report';
583:
584: begin
585: IF FND_API.to_Boolean( nvl(p_init_msg_list,FND_API.G_FALSE) ) THEN
586: FND_MSG_PUB.initialize;
587: END IF;
588:
589: x_return_status := FND_API.G_RET_STS_SUCCESS;
585: IF FND_API.to_Boolean( nvl(p_init_msg_list,FND_API.G_FALSE) ) THEN
586: FND_MSG_PUB.initialize;
587: END IF;
588:
589: x_return_status := FND_API.G_RET_STS_SUCCESS;
590: x_msg_count := 0;
591: x_msg_data := null;
592: if ((fv_install.enabled) AND (FND_PROFILE.VALUE('FV_ENABLE_CASH_POSITION_DETAIL_OPTION') = 'Y')) then
593:
593:
594: x_request_id := FND_REQUEST.SUBMIT_REQUEST('FV', 'FVAPCPDP', NULL, NULL, FALSE,p_checkrun_id,p_org_id);
595:
596: if (x_request_id = 0) then
597: x_return_status := FND_API.G_RET_STS_ERROR ;
598: end if;
599: end if;
600: FND_MSG_PUB.Count_And_Get
601: (
603: p_data => x_msg_data
604: );
605: exception
606: when others then
607: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
608: FND_MSG_PUB.Add_Exc_Msg
609: ( G_PKG_NAME,
610: l_api_name
611: );