DBA Data[Home] [Help]

APPS.AHL_UMP_FORECAST_REQ_PVT dependencies on FND_MSG_PUB

Line 199: FND_MSG_PUB.Initialize;

195: SAVEPOINT Process_Mrl_Req_Forecast;
196:
197: -- Initialize message list if p_init_msg_list is set to TRUE
198: IF FND_API.To_Boolean( p_init_msg_list) THEN
199: FND_MSG_PUB.Initialize;
200: END IF;
201:
202: -- Initialize API return status to success
203: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 544: x_msg_count := FND_MSG_PUB.count_msg;

540: 'Have succesfully finished forecasting'
541: );
542: END IF;
543: -- Check Error Message stack.
544: x_msg_count := FND_MSG_PUB.count_msg;
545: IF x_msg_count > 0 THEN
546: RAISE FND_API.G_EXC_ERROR;
547: END IF;
548:

Line 567: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

563: EXCEPTION
564: WHEN FND_API.G_EXC_ERROR THEN
565: x_return_status := FND_API.G_RET_STS_ERROR;
566: ROLLBACK TO Process_Mrl_Req_Forecast;
567: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
568: p_data => x_msg_data,
569: p_encoded => fnd_api.g_false);
570:
571:

Line 575: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

571:
572: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
573: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
574: ROLLBACK TO Process_Mrl_Req_Forecast;
575: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
576: p_data => x_msg_data,
577: p_encoded => fnd_api.g_false);
578:
579:

Line 583: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

579:
580: WHEN OTHERS THEN
581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
582: ROLLBACK TO Process_Mrl_Req_Forecast;
583: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
584: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
585: p_procedure_name => 'Process_Mrl_Req_Forecast',
586: p_error_text => SUBSTR(SQLERRM,1,500));
587: END IF;

Line 584: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

580: WHEN OTHERS THEN
581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
582: ROLLBACK TO Process_Mrl_Req_Forecast;
583: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
584: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
585: p_procedure_name => 'Process_Mrl_Req_Forecast',
586: p_error_text => SUBSTR(SQLERRM,1,500));
587: END IF;
588: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 588: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

584: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
585: p_procedure_name => 'Process_Mrl_Req_Forecast',
586: p_error_text => SUBSTR(SQLERRM,1,500));
587: END IF;
588: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
589: p_data => x_msg_data,
590: p_encoded => fnd_api.g_false);
591:
592: END Process_Mrl_Req_Forecast;

Line 707: FND_MSG_PUB.ADD;

703: FETCH csi_item_instances_csr INTO l_instance_number, l_active_end_date;
704: IF (csi_item_instances_csr%NOTFOUND) THEN
705: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INSTID_NOTFOUND');
706: FND_MESSAGE.Set_Token('INST_ID', p_item_instance_id);
707: FND_MSG_PUB.ADD;
708: CLOSE csi_item_instances_csr;
709: --dbms_output.put_line('Instance not found');
710: errbuf := FND_MSG_PUB.GET;
711: retcode := 2;

Line 710: errbuf := FND_MSG_PUB.GET;

706: FND_MESSAGE.Set_Token('INST_ID', p_item_instance_id);
707: FND_MSG_PUB.ADD;
708: CLOSE csi_item_instances_csr;
709: --dbms_output.put_line('Instance not found');
710: errbuf := FND_MSG_PUB.GET;
711: retcode := 2;
712: ELSIF (trunc(l_active_end_date) < trunc(sysdate)) THEN
713: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INST_EXPIRED');
714: FND_MESSAGE.Set_Token('NUMBER', l_instance_number);

Line 715: FND_MSG_PUB.ADD;

711: retcode := 2;
712: ELSIF (trunc(l_active_end_date) < trunc(sysdate)) THEN
713: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INST_EXPIRED');
714: FND_MESSAGE.Set_Token('NUMBER', l_instance_number);
715: FND_MSG_PUB.ADD;
716: --dbms_output.put_line('Instance has expired');
717: errbuf := FND_MSG_PUB.GET;
718: retcode := 2;
719: ELSE

Line 717: errbuf := FND_MSG_PUB.GET;

713: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INST_EXPIRED');
714: FND_MESSAGE.Set_Token('NUMBER', l_instance_number);
715: FND_MSG_PUB.ADD;
716: --dbms_output.put_line('Instance has expired');
717: errbuf := FND_MSG_PUB.GET;
718: retcode := 2;
719: ELSE
720: l_csi_item_instance_id := p_item_instance_id;
721:

Line 732: FND_MSG_PUB.ADD;

728: IF (ahl_unit_config_header_csr%FOUND) THEN
729: IF (l_config_status_code = 'DRAFT') THEN
730: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_STATUS_INVALID');
731: FND_MESSAGE.Set_Token('NAME',l_name);
732: FND_MSG_PUB.ADD;
733: errbuf := FND_MSG_PUB.GET;
734: retcode := 2;
735: END IF;
736: ELSE

Line 733: errbuf := FND_MSG_PUB.GET;

729: IF (l_config_status_code = 'DRAFT') THEN
730: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_STATUS_INVALID');
731: FND_MESSAGE.Set_Token('NAME',l_name);
732: FND_MSG_PUB.ADD;
733: errbuf := FND_MSG_PUB.GET;
734: retcode := 2;
735: END IF;
736: ELSE
737: l_master_config_id := NULL;

Line 754: FND_MSG_PUB.ADD;

750: l_config_status_code ;
751: IF (ahl_unit_config_headers_csr%NOTFOUND) THEN
752: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_UNIT_NOTFOUND');
753: FND_MESSAGE.Set_Token('UNIT_ID',p_unit_config_hdr_id);
754: FND_MSG_PUB.ADD;
755: errbuf := FND_MSG_PUB.GET;
756: retcode := 2;
757: --dbms_output.put_line('Unit not found');
758: ELSE

Line 755: errbuf := FND_MSG_PUB.GET;

751: IF (ahl_unit_config_headers_csr%NOTFOUND) THEN
752: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_UNIT_NOTFOUND');
753: FND_MESSAGE.Set_Token('UNIT_ID',p_unit_config_hdr_id);
754: FND_MSG_PUB.ADD;
755: errbuf := FND_MSG_PUB.GET;
756: retcode := 2;
757: --dbms_output.put_line('Unit not found');
758: ELSE
759: IF (l_config_status_code = 'DRAFT') THEN

Line 762: FND_MSG_PUB.ADD;

758: ELSE
759: IF (l_config_status_code = 'DRAFT') THEN
760: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_STATUS_INVALID');
761: FND_MESSAGE.Set_Token('NAME',l_name);
762: FND_MSG_PUB.ADD;
763: CLOSE ahl_unit_config_headers_csr;
764:
765: errbuf := FND_MSG_PUB.GET;
766: retcode := 2;

Line 765: errbuf := FND_MSG_PUB.GET;

761: FND_MESSAGE.Set_Token('NAME',l_name);
762: FND_MSG_PUB.ADD;
763: CLOSE ahl_unit_config_headers_csr;
764:
765: errbuf := FND_MSG_PUB.GET;
766: retcode := 2;
767: END IF;
768: END IF;
769: END IF; -- p_unit_config_hdr_id

Line 799: l_msg_count := FND_MSG_PUB.Count_Msg;

795: x_msg_data => l_msg_data,
796: p_applicable_instances_tbl => l_config_node_tbl
797: );
798:
799: l_msg_count := FND_MSG_PUB.Count_Msg;
800: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
801: THEN
802: retcode := 2; -- error based only on return status
803: ELSIF (l_msg_count > 0 AND l_return_status = FND_API.G_RET_STS_SUCCESS)

Line 893: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

889: WHEN OTHERS THEN
890: ROLLBACK TO Build_Mrl_Forecast_Stream_s;
891: retcode := 2;
892: log_error_messages;
893: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
894: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
895: p_procedure_name => 'Build_Mrl_Forecast_Stream',
896: p_error_text => SUBSTR(SQLERRM,1,500));
897: END IF;

Line 894: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

890: ROLLBACK TO Build_Mrl_Forecast_Stream_s;
891: retcode := 2;
892: log_error_messages;
893: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
894: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
895: p_procedure_name => 'Build_Mrl_Forecast_Stream',
896: p_error_text => SUBSTR(SQLERRM,1,500));
897: END IF;
898:

Line 1338: l_msg_count := FND_MSG_PUB.Count_Msg;

1334: 'Start log error messages');
1335: END IF;
1336:
1337: -- Standard call to get message count.
1338: l_msg_count := FND_MSG_PUB.Count_Msg;
1339:
1340: FOR i IN 1..l_msg_count LOOP
1341: FND_MSG_PUB.get (
1342: p_msg_index => i,

Line 1341: FND_MSG_PUB.get (

1337: -- Standard call to get message count.
1338: l_msg_count := FND_MSG_PUB.Count_Msg;
1339:
1340: FOR i IN 1..l_msg_count LOOP
1341: FND_MSG_PUB.get (
1342: p_msg_index => i,
1343: p_encoded => FND_API.G_FALSE,
1344: p_data => l_msg_data,
1345: p_msg_index_out => l_msg_index_out );