DBA Data[Home] [Help]

APPS.AHL_UMP_FORECAST_REQ_PVT dependencies on FND_MSG_PUB

Line 191: FND_MSG_PUB.Initialize;

187: SAVEPOINT Process_Mrl_Req_Forecast;
188:
189: -- Initialize message list if p_init_msg_list is set to TRUE
190: IF FND_API.To_Boolean( p_init_msg_list) THEN
191: FND_MSG_PUB.Initialize;
192: END IF;
193:
194: -- Initialize API return status to success
195: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 524: x_msg_count := FND_MSG_PUB.count_msg;

520: 'Have succesfully finished forecasting'
521: );
522: END IF;
523: -- Check Error Message stack.
524: x_msg_count := FND_MSG_PUB.count_msg;
525: IF x_msg_count > 0 THEN
526: RAISE FND_API.G_EXC_ERROR;
527: END IF;
528:

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

543: EXCEPTION
544: WHEN FND_API.G_EXC_ERROR THEN
545: x_return_status := FND_API.G_RET_STS_ERROR;
546: ROLLBACK TO Process_Mrl_Req_Forecast;
547: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
548: p_data => x_msg_data,
549: p_encoded => fnd_api.g_false);
550:
551:

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

551:
552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554: ROLLBACK TO Process_Mrl_Req_Forecast;
555: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
556: p_data => x_msg_data,
557: p_encoded => fnd_api.g_false);
558:
559:

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

559:
560: WHEN OTHERS THEN
561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
562: ROLLBACK TO Process_Mrl_Req_Forecast;
563: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
564: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
565: p_procedure_name => 'Process_Mrl_Req_Forecast',
566: p_error_text => SUBSTR(SQLERRM,1,500));
567: END IF;

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

560: WHEN OTHERS THEN
561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
562: ROLLBACK TO Process_Mrl_Req_Forecast;
563: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
564: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
565: p_procedure_name => 'Process_Mrl_Req_Forecast',
566: p_error_text => SUBSTR(SQLERRM,1,500));
567: END IF;
568: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

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

564: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
565: p_procedure_name => 'Process_Mrl_Req_Forecast',
566: p_error_text => SUBSTR(SQLERRM,1,500));
567: END IF;
568: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
569: p_data => x_msg_data,
570: p_encoded => fnd_api.g_false);
571:
572: END Process_Mrl_Req_Forecast;

Line 684: FND_MSG_PUB.ADD;

680: FETCH csi_item_instances_csr INTO l_instance_number, l_active_end_date;
681: IF (csi_item_instances_csr%NOTFOUND) THEN
682: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INSTID_NOTFOUND');
683: FND_MESSAGE.Set_Token('INST_ID', p_item_instance_id);
684: FND_MSG_PUB.ADD;
685: CLOSE csi_item_instances_csr;
686: --dbms_output.put_line('Instance not found');
687: errbuf := FND_MSG_PUB.GET;
688: retcode := 2;

Line 687: errbuf := FND_MSG_PUB.GET;

683: FND_MESSAGE.Set_Token('INST_ID', p_item_instance_id);
684: FND_MSG_PUB.ADD;
685: CLOSE csi_item_instances_csr;
686: --dbms_output.put_line('Instance not found');
687: errbuf := FND_MSG_PUB.GET;
688: retcode := 2;
689: ELSIF (trunc(l_active_end_date) < trunc(sysdate)) THEN
690: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INST_EXPIRED');
691: FND_MESSAGE.Set_Token('NUMBER', l_instance_number);

Line 692: FND_MSG_PUB.ADD;

688: retcode := 2;
689: ELSIF (trunc(l_active_end_date) < trunc(sysdate)) THEN
690: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INST_EXPIRED');
691: FND_MESSAGE.Set_Token('NUMBER', l_instance_number);
692: FND_MSG_PUB.ADD;
693: --dbms_output.put_line('Instance has expired');
694: errbuf := FND_MSG_PUB.GET;
695: retcode := 2;
696: ELSE

Line 694: errbuf := FND_MSG_PUB.GET;

690: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_INST_EXPIRED');
691: FND_MESSAGE.Set_Token('NUMBER', l_instance_number);
692: FND_MSG_PUB.ADD;
693: --dbms_output.put_line('Instance has expired');
694: errbuf := FND_MSG_PUB.GET;
695: retcode := 2;
696: ELSE
697: l_csi_item_instance_id := p_item_instance_id;
698:

Line 709: FND_MSG_PUB.ADD;

705: IF (ahl_unit_config_header_csr%FOUND) THEN
706: IF (l_config_status_code = 'DRAFT') THEN
707: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_STATUS_INVALID');
708: FND_MESSAGE.Set_Token('NAME',l_name);
709: FND_MSG_PUB.ADD;
710: errbuf := FND_MSG_PUB.GET;
711: retcode := 2;
712: END IF;
713: ELSE

Line 710: errbuf := FND_MSG_PUB.GET;

706: IF (l_config_status_code = 'DRAFT') THEN
707: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_STATUS_INVALID');
708: FND_MESSAGE.Set_Token('NAME',l_name);
709: FND_MSG_PUB.ADD;
710: errbuf := FND_MSG_PUB.GET;
711: retcode := 2;
712: END IF;
713: ELSE
714: l_master_config_id := NULL;

Line 731: FND_MSG_PUB.ADD;

727: l_config_status_code ;
728: IF (ahl_unit_config_headers_csr%NOTFOUND) THEN
729: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_UNIT_NOTFOUND');
730: FND_MESSAGE.Set_Token('UNIT_ID',p_unit_config_hdr_id);
731: FND_MSG_PUB.ADD;
732: errbuf := FND_MSG_PUB.GET;
733: retcode := 2;
734: --dbms_output.put_line('Unit not found');
735: ELSE

Line 732: errbuf := FND_MSG_PUB.GET;

728: IF (ahl_unit_config_headers_csr%NOTFOUND) THEN
729: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_UNIT_NOTFOUND');
730: FND_MESSAGE.Set_Token('UNIT_ID',p_unit_config_hdr_id);
731: FND_MSG_PUB.ADD;
732: errbuf := FND_MSG_PUB.GET;
733: retcode := 2;
734: --dbms_output.put_line('Unit not found');
735: ELSE
736: IF (l_config_status_code = 'DRAFT') THEN

Line 739: FND_MSG_PUB.ADD;

735: ELSE
736: IF (l_config_status_code = 'DRAFT') THEN
737: FND_MESSAGE.Set_Name('AHL','AHL_UMP_PUE_STATUS_INVALID');
738: FND_MESSAGE.Set_Token('NAME',l_name);
739: FND_MSG_PUB.ADD;
740: CLOSE ahl_unit_config_headers_csr;
741:
742: errbuf := FND_MSG_PUB.GET;
743: retcode := 2;

Line 742: errbuf := FND_MSG_PUB.GET;

738: FND_MESSAGE.Set_Token('NAME',l_name);
739: FND_MSG_PUB.ADD;
740: CLOSE ahl_unit_config_headers_csr;
741:
742: errbuf := FND_MSG_PUB.GET;
743: retcode := 2;
744: END IF;
745: END IF;
746: END IF; -- p_unit_config_hdr_id

Line 776: l_msg_count := FND_MSG_PUB.Count_Msg;

772: x_msg_data => l_msg_data,
773: p_applicable_instances_tbl => l_config_node_tbl
774: );
775:
776: l_msg_count := FND_MSG_PUB.Count_Msg;
777: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
778: THEN
779: retcode := 2; -- error based only on return status
780: ELSIF (l_msg_count > 0 AND l_return_status = FND_API.G_RET_STS_SUCCESS)

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

866: WHEN OTHERS THEN
867: ROLLBACK TO Build_Mrl_Forecast_Stream_s;
868: retcode := 2;
869: log_error_messages;
870: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
871: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
872: p_procedure_name => 'Build_Mrl_Forecast_Stream',
873: p_error_text => SUBSTR(SQLERRM,1,500));
874: END IF;

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

867: ROLLBACK TO Build_Mrl_Forecast_Stream_s;
868: retcode := 2;
869: log_error_messages;
870: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
871: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
872: p_procedure_name => 'Build_Mrl_Forecast_Stream',
873: p_error_text => SUBSTR(SQLERRM,1,500));
874: END IF;
875:

Line 1295: l_msg_count := FND_MSG_PUB.Count_Msg;

1291: 'Start log error messages');
1292: END IF;
1293:
1294: -- Standard call to get message count.
1295: l_msg_count := FND_MSG_PUB.Count_Msg;
1296:
1297: FOR i IN 1..l_msg_count LOOP
1298: FND_MSG_PUB.get (
1299: p_msg_index => i,

Line 1298: FND_MSG_PUB.get (

1294: -- Standard call to get message count.
1295: l_msg_count := FND_MSG_PUB.Count_Msg;
1296:
1297: FOR i IN 1..l_msg_count LOOP
1298: FND_MSG_PUB.get (
1299: p_msg_index => i,
1300: p_encoded => FND_API.G_FALSE,
1301: p_data => l_msg_data,
1302: p_msg_index_out => l_msg_index_out );