DBA Data[Home] [Help]

APPS.AHL_UMP_SR_PVT dependencies on FND_MSG_PUB

Line 279: -- FND_MSG_PUB.Initialize;

275: END IF;
276:
277: -- Initialize message list
278: --AMSRINIV. Bug 5470730. Removing message initialization.
279: -- FND_MSG_PUB.Initialize;
280:
281: -- Initialize API return status to success
282: x_return_status := FND_API.G_RET_STS_SUCCESS;
283:

Line 316: FND_MSG_PUB.add;

312: --Raising an error if the request id null
313: IF (l_request_id IS NULL OR l_request_id = FND_API.G_MISS_NUM) THEN
314: x_return_status := FND_API.G_RET_STS_ERROR;
315: FND_MESSAGE.set_name('AHL', 'AHL_UMP_MISSING_REQUEST_ID');
316: FND_MSG_PUB.add;
317: RAISE FND_API.G_EXC_ERROR;
318: END IF;
319:
320: --Opening cursor to validate incident id

Line 328: FND_MSG_PUB.add;

324: --Raise an error if the incident id is not valid.
325: IF (validate_incident_id%NOTFOUND) THEN
326: fnd_message.set_name('AHL', 'AHL_UMP_INVALID_INCIDENT_ID');
327: fnd_message.set_token('INCIDENT_ID', l_request_id, false);
328: FND_MSG_PUB.add;
329: CLOSE validate_instance;
330: RAISE FND_API.G_EXC_ERROR;
331: END IF;
332:

Line 364: FND_MSG_PUB.add;

360: --Set the return status to an error and raise an error message if the return status is an error.
361: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
362: x_return_status := FND_API.G_RET_STS_ERROR;
363: FND_MESSAGE.set_name('AHL', 'AHL_COM_APPL_USG_PROF_NOT_SET');
364: FND_MSG_PUB.add;
365: RAISE FND_API.G_EXC_ERROR;
366: END IF;
367:
368: --Set the return status to an error and raise an error message if the application code returned is not AHL

Line 373: FND_MSG_PUB.add;

369: IF (l_appln_code <> 'AHL') THEN
370: x_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MESSAGE.set_name('AHL', 'AHL_COM_APPL_USG_MODE_INVALID');
372: FND_MESSAGE.set_token('TASK', l_name, false);
373: FND_MSG_PUB.add;
374: RAISE FND_API.G_EXC_ERROR;
375: END IF;
376:
377: --******************************

Line 384: FND_MSG_PUB.add;

380: -- JR: Modified on 10/29/2003 (Using Status Id instead of Status Code)
381: -- Raise an error if the status is PLANNED.
382: IF (l_status_id = G_SR_PLANNED_STATUS_ID) THEN
383: FND_MESSAGE.set_name('AHL', 'AHL_UMP_INVALID_STATUS_CODE');
384: FND_MSG_PUB.add;
385: RAISE FND_API.G_EXC_ERROR;
386: END IF;
387:
388: --******************************

Line 395: FND_MSG_PUB.add;

391: --Raise an error if the item instance id null
392: IF (l_customer_product_id IS NULL OR l_customer_product_id = FND_API.G_MISS_NUM) THEN
393: x_return_status := FND_API.G_RET_STS_ERROR;
394: FND_MESSAGE.set_name('AHL', 'AHL_UMP_INSTANCE_MANDATORY');
395: FND_MSG_PUB.add;
396: RAISE FND_API.G_EXC_ERROR;
397: END IF;
398:
399: --Ensuring that the instance exists in csi_item_instances.

Line 406: FND_MSG_PUB.add;

402: --Raise an error if the instance is not a valid CSI Instance
403: IF (validate_instance%NOTFOUND) THEN
404: fnd_message.set_name('AHL', 'AHL_UMP_INVALID_CSI_INSTANCE');
405: fnd_message.set_token('CSI_INSTANCE_ID', l_customer_product_id, false);
406: FND_MSG_PUB.add;
407: CLOSE validate_instance;
408: RAISE FND_API.G_EXC_ERROR;
409: END IF;
410:

Line 415: FND_MSG_PUB.add;

411: --Raise an error if the instance is inactive.
412: IF ( l_active_end_date IS NOT NULL AND l_active_end_date <= SYSDATE ) THEN
413: fnd_message.set_name('AHL', 'AHL_UMP_INACTIVE_INSTANCE');
414: fnd_message.set_token('INSTANCE_NUMBER', l_instance_number, false);
415: FND_MSG_PUB.add;
416: CLOSE validate_instance;
417: RAISE FND_API.G_EXC_ERROR;
418: END IF;
419:

Line 441: FND_MSG_PUB.ADD;

437: l_uc_status_code := ahl_util_uc_pkg.get_uc_status_code(l_uc_hdr_id);
438: IF (l_uc_status_code IN ('QUARANTINE', 'DEACTIVATE_QUARANTINE'))
439: THEN
440: FND_MESSAGE.SET_NAME('AHL', 'AHL_UMP_NR_UNIT_QUAR_INV');
441: FND_MSG_PUB.ADD;
442: RAISE FND_API.G_EXC_ERROR;
443: ELSIF (l_uc_status_code NOT IN ('COMPLETE', 'INCOMPLETE'))
444: THEN
445: l_uc_hdr_id := null;

Line 552: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' Error: Msg Count:' || fnd_msg_pub.count_msg);

548: ROLLBACK TO Create_SR_Unit_Effectivity_Pvt;
549: x_return_status := FND_API.G_RET_STS_ERROR;
550: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
551: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' Error: Return Status:' || x_return_status);
552: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' Error: Msg Count:' || fnd_msg_pub.count_msg);
553: END IF;
554:
555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
556: ROLLBACK TO Create_SR_Unit_Effectivity_Pvt;

Line 560: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' UnExpError: Msg Count:' || fnd_msg_pub.count_msg);

556: ROLLBACK TO Create_SR_Unit_Effectivity_Pvt;
557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
558: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
559: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' UnExpError: Return Status:' || x_return_status);
560: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY , ' UnExpError: Msg Count:' || fnd_msg_pub.count_msg);
561: END IF;
562:
563: WHEN OTHERS THEN
564: ROLLBACK TO Create_SR_Unit_Effectivity_Pvt;

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

562:
563: WHEN OTHERS THEN
564: ROLLBACK TO Create_SR_Unit_Effectivity_Pvt;
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
567: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
568: p_procedure_name => 'Create_SR_Unit_Effectivity',
569: p_error_text => SUBSTRB(SQLERRM,1,240));
570: END IF;

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

563: WHEN OTHERS THEN
564: ROLLBACK TO Create_SR_Unit_Effectivity_Pvt;
565: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
566: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
567: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
568: p_procedure_name => 'Create_SR_Unit_Effectivity',
569: p_error_text => SUBSTRB(SQLERRM,1,240));
570: END IF;
571:

Line 629: --FND_MSG_PUB.Initialize;

625: x_return_status := FND_API.G_RET_STS_SUCCESS;
626:
627: -- Initialize message list
628: --AMSRINIV. Bug 5470730. Removing message initialization.
629: --FND_MSG_PUB.Initialize;
630:
631: -- Begin Processing
632: IF NOT (NVL(CS_SERVICEREQUEST_PVT.USER_HOOKS_REC.old_type_cmro_flag, G_NO_FLAG) = G_YES_FLAG OR
633: NVL(CS_SERVICEREQUEST_PVT.USER_HOOKS_REC.new_type_cmro_flag, G_NO_FLAG)= G_YES_FLAG) THEN

Line 655: FND_MSG_PUB.ADD;

651: x_return_status => x_return_status);
652:
653: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
654: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_APP_USAGE_NOT_SET');
655: FND_MSG_PUB.ADD;
656: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
657: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
658: END IF;
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 662: FND_MSG_PUB.ADD;

658: END IF;
659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
660: ELSIF(l_appln_code IS NULL OR (l_appln_code <> G_APP_MODULE)) THEN
661: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_APP_USAGE_INVALID');
662: FND_MSG_PUB.ADD;
663: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
664: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
665: END IF;
666: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

703:
704: WHEN OTHERS THEN
705: ROLLBACK TO Process_SR_Updates_Pvt;
706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
707: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
708: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
709: p_procedure_name => 'Process_SR_Updates',
710: p_error_text => SUBSTRB(SQLERRM,1,240));
711: END IF;

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

704: WHEN OTHERS THEN
705: ROLLBACK TO Process_SR_Updates_Pvt;
706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
707: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
708: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
709: p_procedure_name => 'Process_SR_Updates',
710: p_error_text => SUBSTRB(SQLERRM,1,240));
711: END IF;
712:

Line 797: FND_MSG_PUB.Initialize;

793: END IF;
794:
795: -- Initialize message list if p_init_msg_list is set to TRUE
796: IF FND_API.To_Boolean(p_init_msg_list) THEN
797: FND_MSG_PUB.Initialize;
798: END IF;
799:
800: -- Initialize API return status to success
801: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 815: FND_MSG_PUB.ADD;

811: x_return_status => x_return_status);
812:
813: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
814: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_APP_USAGE_NOT_SET');
815: FND_MSG_PUB.ADD;
816: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
817: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
818: END IF;
819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 822: FND_MSG_PUB.ADD;

818: END IF;
819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
820: ELSIF(l_appln_code IS NULL OR (l_appln_code <> G_APP_MODULE)) THEN
821: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_APP_USAGE_INVALID');
822: FND_MSG_PUB.ADD;
823: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
824: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
825: END IF;
826: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 846: FND_MSG_PUB.ADD;

842: END IF;
843:
844: IF (p_x_sr_mr_association_tbl.COUNT = 0) THEN
845: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MR_SR_TBL_EMPTY');
846: FND_MSG_PUB.ADD;
847: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
848: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
849: END IF;
850: RAISE FND_API.G_EXC_ERROR;

Line 859: IF (FND_MSG_PUB.Count_Msg > 0) THEN

855: p_sr_ue_id => l_sr_ue_id,
856: p_sr_instance_id => l_sr_instance_id,
857: p_x_sr_mr_association_tbl => p_x_sr_mr_association_tbl);
858:
859: IF (FND_MSG_PUB.Count_Msg > 0) THEN
860: -- There are validation errors: No need to process further
861: RAISE FND_API.G_EXC_ERROR;
862: END IF;
863:

Line 877: IF (FND_MSG_PUB.Count_Msg > 0) THEN

873: p_user_id => p_user_id,
874: p_login_id => p_login_id,
875: p_x_sr_mr_association_tbl => p_x_sr_mr_association_tbl);
876:
877: IF (FND_MSG_PUB.Count_Msg > 0) THEN
878: -- There are validation errors from Process_New_Associations: Raise error
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881:

Line 891: FND_MSG_PUB.Count_And_Get

887: COMMIT WORK;
888: END IF;
889:
890: -- Standard call to get message count and if count is 1, get message info
891: FND_MSG_PUB.Count_And_Get
892: ( p_count => x_msg_count,
893: p_data => x_msg_data,
894: p_encoded => fnd_api.g_false
895: );

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

901: EXCEPTION
902: WHEN FND_API.G_EXC_ERROR THEN
903: ROLLBACK TO Process_SR_MR_Associations_pvt;
904: x_return_status := FND_API.G_RET_STS_ERROR;
905: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
906: p_data => x_msg_data,
907: p_encoded => fnd_api.g_false);
908: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
909:

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

909:
910: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
911: ROLLBACK TO Process_SR_MR_Associations_pvt;
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
914: p_data => x_msg_data,
915: p_encoded => fnd_api.g_false);
916: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
917:

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

917:
918: WHEN OTHERS THEN
919: ROLLBACK TO Process_SR_MR_Associations_pvt;
920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
921: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
922: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
923: p_procedure_name => 'Process_SR_MR_Associations',
924: p_error_text => SUBSTRB(SQLERRM,1,240));
925: END IF;

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

918: WHEN OTHERS THEN
919: ROLLBACK TO Process_SR_MR_Associations_pvt;
920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
921: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
922: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
923: p_procedure_name => 'Process_SR_MR_Associations',
924: p_error_text => SUBSTRB(SQLERRM,1,240));
925: END IF;
926: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

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

922: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
923: p_procedure_name => 'Process_SR_MR_Associations',
924: p_error_text => SUBSTRB(SQLERRM,1,240));
925: END IF;
926: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
927: p_data => x_msg_data,
928: p_encoded => fnd_api.g_false);
929: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
930:

Line 992: FND_MSG_PUB.ADD;

988: END IF;
989:
990: IF(p_x_request_id IS NULL AND p_request_number IS NULL) THEN
991: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_ID_NUM_NULL');
992: FND_MSG_PUB.ADD;
993: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
994: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
995: END IF;
996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 999: FND_MSG_PUB.ADD;

995: END IF;
996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
997: ELSIF (p_object_version_number IS NULL) THEN
998: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_OVN_NULL');
999: FND_MSG_PUB.ADD;
1000: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1001: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1002: END IF;
1003: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1017: FND_MSG_PUB.ADD;

1013: IF get_request_dtls_csr%NOTFOUND THEN
1014: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_OVN_INVALID');
1015: FND_MESSAGE.Set_Token('ID', p_x_request_id);
1016: FND_MESSAGE.Set_Token('OVN', p_object_version_number);
1017: FND_MSG_PUB.ADD;
1018: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1019: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1020: END IF;
1021: CLOSE get_request_dtls_csr;

Line 1029: FND_MSG_PUB.ADD;

1025: END IF;
1026:
1027: IF(l_closed_flag = G_YES_FLAG) THEN
1028: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_CLOSED');
1029: FND_MSG_PUB.ADD;
1030: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1031: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1032: END IF;
1033: RAISE FND_API.G_EXC_ERROR;

Line 1044: FND_MSG_PUB.ADD;

1040:
1041: -- JR: Modified on 10/29/2003 (Using Status Id instead of Status Code)
1042: IF (l_sr_status_id = G_SR_PLANNED_STATUS_ID) THEN
1043: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_PLANNED');
1044: FND_MSG_PUB.ADD;
1045: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1046: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1047: END IF;
1048: RAISE FND_API.G_EXC_ERROR;

Line 1056: FND_MSG_PUB.ADD;

1052: FETCH get_ue_dtls_csr INTO x_sr_ue_id; -- OUT Parameter
1053: IF (get_ue_dtls_csr%NOTFOUND) THEN
1054: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_NO_UE_FOR_REQ');
1055: FND_MESSAGE.Set_Token('ID', p_x_request_id);
1056: FND_MSG_PUB.ADD;
1057: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1058: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1059: END IF;
1060: CLOSE get_ue_dtls_csr;

Line 1074: FND_MSG_PUB.ADD;

1070: OPEN get_tasks_for_ue_csr(p_ue_id => x_sr_ue_id);
1071: FETCH get_tasks_for_ue_csr INTO l_dummy;
1072: IF (get_tasks_for_ue_csr%FOUND) THEN
1073: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_ASGND_TO_VISIT');
1074: FND_MSG_PUB.ADD;
1075: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1076: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1077: END IF;
1078: CLOSE get_tasks_for_ue_csr;

Line 1164: FND_MSG_PUB.ADD;

1160: IF (p_x_sr_mr_association_tbl(i).OPERATION_FLAG NOT IN (G_OPR_CREATE, G_OPR_DELETE)) THEN
1161: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_OPR_INVALID');
1162: FND_MESSAGE.Set_Token('OPR_FLAG', p_x_sr_mr_association_tbl(i).OPERATION_FLAG);
1163: FND_MESSAGE.Set_Token('INDEX', i);
1164: FND_MSG_PUB.ADD;
1165: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1166: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1167: END IF;
1168: l_valid := false;

Line 1176: FND_MSG_PUB.ADD;

1172: p_x_sr_mr_association_rec => p_x_sr_mr_association_tbl(i));
1173: IF (p_x_sr_mr_association_tbl(i).UNIT_EFFECTIVITY_ID IS NULL) THEN
1174: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_UE_ID_NULL');
1175: FND_MESSAGE.Set_Token('INDEX', i);
1176: FND_MSG_PUB.ADD;
1177: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1178: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1179: END IF;
1180: l_valid := false;

Line 1184: FND_MSG_PUB.ADD;

1180: l_valid := false;
1181: ELSIF (p_x_sr_mr_association_tbl(i).OBJECT_VERSION_NUMBER IS NULL) THEN
1182: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_UE_OVN_NULL');
1183: FND_MESSAGE.Set_Token('INDEX', i);
1184: FND_MSG_PUB.ADD;
1185: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1186: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1187: END IF;
1188: l_valid := false;

Line 1199: FND_MSG_PUB.ADD;

1195: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_UE_OVN_INVALID');
1196: FND_MESSAGE.Set_Token('UE_ID', p_x_sr_mr_association_tbl(i).UNIT_EFFECTIVITY_ID);
1197: FND_MESSAGE.Set_Token('OVN', p_x_sr_mr_association_tbl(i).OBJECT_VERSION_NUMBER);
1198: FND_MESSAGE.Set_Token('INDEX', i);
1199: FND_MSG_PUB.ADD;
1200: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1201: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1202: END IF;
1203: l_valid := false;

Line 1224: FND_MSG_PUB.ADD;

1220: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MR_DTLS_INVALID');
1221: FND_MESSAGE.Set_Token('TITLE', p_x_sr_mr_association_tbl(i).MR_TITLE);
1222: FND_MESSAGE.Set_Token('VERSION', p_x_sr_mr_association_tbl(i).MR_VERSION);
1223: FND_MESSAGE.Set_Token('INDEX', i);
1224: FND_MSG_PUB.ADD;
1225: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1226: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1227: END IF;
1228: l_valid := false;

Line 1233: FND_MSG_PUB.ADD;

1229: ELSIF (p_x_sr_mr_association_tbl(i).CSI_INSTANCE_ID IS NULL) THEN
1230: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_NUM_INVALID');
1231: FND_MESSAGE.Set_Token('INST_NUM', p_x_sr_mr_association_tbl(i).CSI_INSTANCE_NUMBER);
1232: FND_MESSAGE.Set_Token('INDEX', i);
1233: FND_MSG_PUB.ADD;
1234: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1235: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1236: END IF;
1237: l_valid := false;

Line 1247: FND_MSG_PUB.ADD;

1243: CLOSE validate_mr_id_csr;
1244: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MR_ID_INVALID');
1245: FND_MESSAGE.Set_Token('MR_ID', p_x_sr_mr_association_tbl(i).MR_HEADER_ID);
1246: FND_MESSAGE.Set_Token('INDEX', i);
1247: FND_MSG_PUB.ADD;
1248: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1249: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1250: END IF;
1251: l_valid := false;

Line 1262: FND_MSG_PUB.ADD;

1258: CLOSE validate_instance_id_csr;
1259: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_ID_INVALID');
1260: FND_MESSAGE.Set_Token('INST_ID', p_x_sr_mr_association_tbl(i).CSI_INSTANCE_ID);
1261: FND_MESSAGE.Set_Token('INDEX', i);
1262: FND_MSG_PUB.ADD;
1263: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1264: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1265: END IF;
1266: l_valid := false;

Line 1279: FND_MSG_PUB.ADD;

1275: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MR_DTLS_INVALID');
1276: FND_MESSAGE.Set_Token('TITLE', p_x_sr_mr_association_tbl(i).MR_TITLE);
1277: FND_MESSAGE.Set_Token('VERSION', p_x_sr_mr_association_tbl(i).MR_VERSION);
1278: FND_MESSAGE.Set_Token('INDEX', i);
1279: FND_MSG_PUB.ADD;
1280: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1281: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1282: END IF;
1283: l_valid := false;

Line 1299: FND_MSG_PUB.ADD;

1295: x_applicable_mr_tbl => l_applicable_mr_tbl);
1296: IF (l_temp_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1297: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MR_DTLS_FAILED');
1298: FND_MESSAGE.Set_Token('INDEX', i);
1299: FND_MSG_PUB.ADD;
1300: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1301: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1302: END IF;
1303: l_valid := false;

Line 1318: FND_MSG_PUB.ADD;

1314: END IF; -- Table Count > 0
1315: IF (l_mr_applicable = false) THEN
1316: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MR_NOT_APPLCBL');
1317: FND_MESSAGE.Set_Token('MR_TITLE', Get_MR_Title_From_MR_Id(p_x_sr_mr_association_tbl(i).MR_HEADER_ID));
1318: FND_MSG_PUB.ADD;
1319: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1320: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1321: END IF;
1322: l_valid := false;

Line 1519: FND_MSG_PUB.ADD;

1515: p_x_sr_mr_association_tbl(i).CSI_INSTANCE_ID || ' is a Duplicate.');
1516: END IF;
1517: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_DUPLICATE_MR');
1518: FND_MESSAGE.Set_Token('MR_TITLE', Get_MR_Title_From_MR_Id(p_x_sr_mr_association_tbl(i).MR_HEADER_ID));
1519: FND_MSG_PUB.ADD;
1520: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1521: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1522: END IF;
1523: ELSE

Line 1535: FND_MSG_PUB.ADD;

1531: FETCH Chk_UE_Init_Due INTO l_dummy;
1532: IF (Chk_UE_Init_Due%FOUND) THEN
1533: FND_MESSAGE.SET_NAME('AHL', 'AHL_UMP_CANNOT_ADD_MRS');
1534: FND_MESSAGE.SET_TOKEN('MR_TITLE',p_x_sr_mr_association_tbl(i).MR_TITLE);
1535: FND_MSG_PUB.ADD;
1536: END IF;
1537: CLOSE Chk_UE_Init_Due;
1538:
1539: -- bachandr Bug # 13916897 - start

Line 1632: Fnd_Msg_Pub.ADD;

1628: EXCEPTION
1629:
1630: WHEN OTHERS THEN
1631: FND_MESSAGE.SET_NAME ('AHL','AHL_PRD_ORIGINWO_UPD_FAILED');
1632: Fnd_Msg_Pub.ADD;
1633: END;
1634: END IF;
1635: -- End Changes ER # 6123671
1636:

Line 2057: FND_MSG_PUB.ADD;

2053: p_x_valid_flag := false;
2054: l_curr_mr_title := Get_MR_Title_From_MR_Id(p_mr_header_id);
2055: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_GRP_MR_FAILED');
2056: FND_MESSAGE.Set_Token('MR_TITLE', l_curr_mr_title);
2057: FND_MSG_PUB.ADD;
2058: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2059: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2060: END IF;
2061: RETURN; -- No need to process this Group MR further

Line 2101: FND_MSG_PUB.ADD;

2097: l_curr_mr_title := Get_MR_Title_From_MR_Id(p_mr_header_id);
2098: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_GROUP_DUP_MR');
2099: FND_MESSAGE.Set_Token('NEW_MR', l_curr_mr_title);
2100: FND_MESSAGE.Set_Token('DUP_MR', l_dup_mr_title);
2101: FND_MSG_PUB.ADD;
2102: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2103: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2104: END IF;
2105: p_x_valid_flag := false;

Line 2130: FND_MSG_PUB.ADD;

2126: WHERE mr_header_id = mr_rel_rec.RELATED_MR_HEADER_ID;
2127:
2128: FND_MESSAGE.SET_NAME('AHL', 'AHL_UMP_CANNOT_ADD_MRS');
2129: FND_MESSAGE.SET_TOKEN('MR_TITLE',l_mr_title);
2130: FND_MSG_PUB.ADD;
2131: p_x_valid_flag := false;
2132: CLOSE Chk_UE_Init_Due;
2133: RETURN; -- No need to process this Group MR further
2134: END IF;

Line 2561: FND_MSG_PUB.ADD;

2557:
2558: -- Ensure that request id is not null
2559: IF(CS_SERVICEREQUEST_PVT.user_hooks_rec.request_id IS NULL) THEN
2560: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_ID_NULL');
2561: FND_MSG_PUB.ADD;
2562: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2563: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2564: END IF;
2565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2575: FND_MSG_PUB.ADD;

2571: IF(check_request_exists_csr%NOTFOUND) THEN
2572: CLOSE check_request_exists_csr;
2573: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_ID_INVALID');
2574: FND_MESSAGE.Set_Token('REQ_ID', CS_SERVICEREQUEST_PVT.user_hooks_rec.request_id);
2575: FND_MSG_PUB.ADD;
2576: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2577: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2578: END IF;
2579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2592: FND_MSG_PUB.ADD;

2588: IF (get_ue_dtls_csr%NOTFOUND) THEN
2589: CLOSE get_ue_dtls_csr;
2590: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_ID_INVALID');
2591: FND_MESSAGE.Set_Token('REQ_ID', CS_SERVICEREQUEST_PVT.user_hooks_rec.request_id);
2592: FND_MSG_PUB.ADD;
2593: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2594: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2595: END IF;
2596: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2642: FND_MSG_PUB.ADD;

2638:
2639: -- Ensure that the SR is not closed
2640: IF (CS_SERVICEREQUEST_PVT.user_hooks_rec.status_flag = G_SR_CLOSED_FLAG) THEN
2641: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_CLOSED');
2642: FND_MSG_PUB.ADD;
2643: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2644: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2645: END IF;
2646: RAISE FND_API.G_EXC_ERROR;

Line 2660: FND_MSG_PUB.ADD;

2656: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2657: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UE was deferred.');
2658: END IF;
2659: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_DEFERRED');
2660: FND_MSG_PUB.ADD;
2661: RAISE FND_API.G_EXC_ERROR;
2662: END IF;
2663: -- apattark end changes for bug #9166304
2664: -- JR: Modified on 10/29/2003 (Using Status Id instead of Status Code)

Line 2670: FND_MSG_PUB.ADD;

2666: OPEN get_tasks_for_ue_csr;
2667: FETCH get_tasks_for_ue_csr INTO l_dummy;
2668: IF (get_tasks_for_ue_csr%FOUND) THEN
2669: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_ASGND_TO_VISIT');
2670: FND_MSG_PUB.ADD;
2671: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2672: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2673: END IF;
2674: ELSE

Line 2681: FND_MSG_PUB.ADD;

2677: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2678: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Odd case of originally CMRO type SR in Planned status but not assigned to a visit');
2679: END IF;
2680: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_PLANNED');
2681: FND_MSG_PUB.ADD;
2682: END IF; -- tasks found
2683: CLOSE get_tasks_for_ue_csr;
2684: RAISE FND_API.G_EXC_ERROR;
2685: ELSE

Line 2714: FND_MSG_PUB.ADD;

2710: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Non-CMRO to CMRO type conversion');
2711: END IF;
2712: IF (CS_SERVICEREQUEST_PVT.user_hooks_rec.status_id = G_SR_PLANNED_STATUS_ID) THEN
2713: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_REQ_PLANNED');
2714: FND_MSG_PUB.ADD;
2715: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2716: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2717: END IF;
2718: RAISE FND_API.G_EXC_ERROR;

Line 2934: FND_MSG_PUB.ADD;

2930:
2931: IF (l_new_instance_id IS NULL) THEN
2932: p_x_valid_flag := false;
2933: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_NULL');
2934: FND_MSG_PUB.ADD;
2935: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2936: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2937: END IF;
2938: ELSIF (l_new_instance_id <> p_old_instance_id) THEN

Line 2944: FND_MSG_PUB.ADD;

2940: --apattark begin changes for bug #9166304
2941: IF (p_defer_from_ue_id IS NOT NULL) THEN
2942: p_x_valid_flag := false;
2943: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_CHG_DEFERRED');
2944: FND_MSG_PUB.ADD;
2945: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2946: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2947: END IF;
2948: END IF;

Line 2953: FND_MSG_PUB.ADD;

2949: --apattark end changes for bug #9166304
2950: IF (CS_SERVICEREQUEST_PVT.USER_HOOKS_REC.status_flag = G_SR_CLOSED_FLAG) THEN
2951: p_x_valid_flag := false;
2952: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_CHG_CLOSED');
2953: FND_MSG_PUB.ADD;
2954: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2955: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2956: END IF;
2957:

Line 2961: FND_MSG_PUB.ADD;

2957:
2958: ELSIF (CS_SERVICEREQUEST_PVT.user_hooks_rec.status_id = G_SR_PLANNED_STATUS_ID) THEN
2959: p_x_valid_flag := false;
2960: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_CHG_PLANNED');
2961: FND_MSG_PUB.ADD;
2962: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2963: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2964: END IF;
2965: ELSE

Line 2972: FND_MSG_PUB.ADD;

2968: CLOSE get_rel_count_csr;
2969: IF (l_temp_count > 0) THEN
2970: p_x_valid_flag := false;
2971: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_INST_CHG_HAS_MRS');
2972: FND_MSG_PUB.ADD;
2973: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2974: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
2975: END IF;
2976: ELSE

Line 3033: FND_MSG_PUB.ADD;

3029: IF (p_old_ue_status IS NULL OR (p_old_ue_status NOT IN (G_UMP_ACCOMPLISHED_STATUS, G_UMP_TERMINATED_STATUS, G_UMP_MR_TERMINATE_STATUS))) THEN
3030: -- UE Neither accomplished nor terminated
3031: p_x_valid_flag := false;
3032: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_TASK_NOT_ACC');
3033: FND_MSG_PUB.ADD;
3034: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3035: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3036: END IF;
3037: ELSE

Line 3050: FND_MSG_PUB.ADD;

3046: IF (l_temp_count > 0) THEN
3047: -- SR has associated MRs, but the SR UE has not been assigned to any visit.
3048: p_x_valid_flag := false;
3049: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_MRS_NOT_ACC');
3050: FND_MSG_PUB.ADD;
3051: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3052: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3053: END IF;
3054: ELSE

Line 3074: FND_MSG_PUB.ADD;

3070: IF (p_old_ue_status = G_UMP_SR_CLOSED_STATUS) THEN
3071: -- Attempting to open an SR whose UE is already SR_CLOSED.
3072: p_x_valid_flag := false;
3073: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_UE_SR_CLSD');
3074: FND_MSG_PUB.ADD;
3075: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3076: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3077: END IF;
3078: ELSE

Line 3092: FND_MSG_PUB.ADD;

3088: IF (l_assigned = false) THEN
3089: -- SR is being moved to Planned status without assigning SR UE to any visit
3090: p_x_valid_flag := false;
3091: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_NOT_ASSND');
3092: FND_MSG_PUB.ADD;
3093: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3094: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3095: END IF;
3096: END IF; -- Not assigned

Line 3102: FND_MSG_PUB.ADD;

3098: IF (l_assigned = true) THEN
3099: -- SR is being moved to a not-planned status while SR UE has already been assigned to a visit
3100: p_x_valid_flag := false;
3101: FND_MESSAGE.Set_Name('AHL', 'AHL_UMP_SR_ALREADY_ASSND');
3102: FND_MSG_PUB.ADD;
3103: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3104: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3105: END IF;
3106: END IF; -- Already Assigned