DBA Data[Home] [Help]

APPS.AHL_FMP_MR_HEADER_PVT dependencies on FND_MESSAGE

Line 688: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_NULL');

684: x_return_status:=FND_API.G_RET_STS_SUCCESS;
685:
686: IF p_x_mr_header_rec.PROGRAM_TYPE IS NULL OR p_x_mr_header_rec.PROGRAM_TYPE=FND_API.G_MISS_CHAR
687: THEN
688: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_NULL');
689: FND_MSG_PUB.ADD;
690: l_check_flag:='N';
691: END IF;
692:

Line 700: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_INVALID');

696: OPEN get_lookup_meaning_to_code('AHL_FMP_MR_PROGRAM_TYPE',p_x_mr_header_rec.PROGRAM_TYPE);
697: FETCH get_lookup_meaning_to_code INTO l_lookup_code;
698: IF get_lookup_meaning_to_code%NOTFOUND
699: THEN
700: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_INVALID');
701: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PROGRAM_TYPE,false);
702: FND_MSG_PUB.ADD;
703: l_check_flag:='N';
704: ELSE

Line 701: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PROGRAM_TYPE,false);

697: FETCH get_lookup_meaning_to_code INTO l_lookup_code;
698: IF get_lookup_meaning_to_code%NOTFOUND
699: THEN
700: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_INVALID');
701: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PROGRAM_TYPE,false);
702: FND_MSG_PUB.ADD;
703: l_check_flag:='N';
704: ELSE
705: l_program_type_code_ind:='N';

Line 730: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGSUBTYPE_INVALID');

726: FETCH get_lookup_meaning_to_code INTO l_lookup_code;
727:
728: IF get_lookup_meaning_to_code%NOTFOUND
729: THEN
730: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGSUBTYPE_INVALID');
731: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);
732: FND_MSG_PUB.ADD;
733: ELSE
734: p_x_mr_header_rec.PROGRAM_SUBTYPE_CODE:=l_lookup_code;

Line 731: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);

727:
728: IF get_lookup_meaning_to_code%NOTFOUND
729: THEN
730: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGSUBTYPE_INVALID');
731: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);
732: FND_MSG_PUB.ADD;
733: ELSE
734: p_x_mr_header_rec.PROGRAM_SUBTYPE_CODE:=l_lookup_code;
735: END IF;

Line 757: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_BITEM');

753: FETCH get_mrItemId INTO p_x_mr_header_rec.BILLING_ITEM_ID;
754:
755: IF get_mrItemId%NOTFOUND
756: THEN
757: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_BITEM');
758: FND_MESSAGE.SET_TOKEN('BILLING_ITEM',p_x_mr_header_rec.BILLING_ITEM,false);
759: FND_MSG_PUB.ADD;
760: END IF;
761:

Line 758: FND_MESSAGE.SET_TOKEN('BILLING_ITEM',p_x_mr_header_rec.BILLING_ITEM,false);

754:
755: IF get_mrItemId%NOTFOUND
756: THEN
757: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_BITEM');
758: FND_MESSAGE.SET_TOKEN('BILLING_ITEM',p_x_mr_header_rec.BILLING_ITEM,false);
759: FND_MSG_PUB.ADD;
760: END IF;
761:
762: CLOSE get_mrItemId;

Line 781: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_QA_INSP');

777: FETCH get_qainspection_type_code INTO p_x_mr_header_rec.QA_INSPECTION_TYPE_CODE;
778:
779: IF get_qainspection_type_code%NOTFOUND
780: THEN
781: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_QA_INSP');
782: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.QA_INSPECTION_TYPE,false);
783: FND_MSG_PUB.ADD;
784: /* Commented the Qa inspection type depedency on IMPLEMENTAT_STATUS_CODE as per ER#3822674
785: ELSE

Line 782: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.QA_INSPECTION_TYPE,false);

778:
779: IF get_qainspection_type_code%NOTFOUND
780: THEN
781: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_QA_INSP');
782: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.QA_INSPECTION_TYPE,false);
783: FND_MSG_PUB.ADD;
784: /* Commented the Qa inspection type depedency on IMPLEMENTAT_STATUS_CODE as per ER#3822674
785: ELSE
786: IF p_x_mr_header_rec.IMPLEMENT_STATUS_CODE IS NOT NULL

Line 793: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_IMPL_QA');

789: IF p_x_mr_header_rec.IMPLEMENT_STATUS_CODE = 'OPTIONAL_DO_NOT_IMPLEMENT'
790: AND (p_x_mr_header_rec.qa_inspection_type IS NOT NULL
791: OR p_x_mr_header_rec.qa_inspection_type <>FND_API.G_MISS_CHAR)
792: THEN
793: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_IMPL_QA');
794: FND_MSG_PUB.ADD;
795: END IF;
796: End if;
797: */

Line 809: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_IMPL_AND_PROGRAM_TYPE');

805:
806: IF p_x_mr_header_rec.PROGRAM_TYPE_CODE= 'NON-ROUTINE' AND
807: p_x_mr_header_rec.IMPLEMENT_STATUS_CODE <> 'OPTIONAL_DO_NOT_IMPLEMENT'
808: THEN
809: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_IMPL_AND_PROGRAM_TYPE');
810: FND_MSG_PUB.ADD;
811: END IF;
812:
813: IF p_x_mr_header_rec.implement_status_code <> 'OPTIONAL_DO_NOT_IMPLEMENT' AND

Line 830: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_VTYPE_EXIST');

826: WHERE MR_HEADER_ID=p_x_mr_header_rec.MR_HEADER_ID;
827:
828: IF nvl(l_check_impl_status,0) >0
829: THEN
830: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_VTYPE_EXIST');
831: FND_MSG_PUB.ADD;
832: -- Cannot modify if implementation status from unplanned/optional do not implement to some thing else if visit types are defined.
833: END IF;
834: END IF;

Line 851: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');

847: THEN
848: IF G_DEBUG='Y' THEN
849: AHL_DEBUG_PUB.debug( 'PRECEDING MR_TITLE COUNTER');
850: END IF;
851: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
852: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);
853: FND_MSG_PUB.ADD;
854: ELSIF nvl(l_title_counter,0)=1
855: THEN

Line 852: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);

848: IF G_DEBUG='Y' THEN
849: AHL_DEBUG_PUB.debug( 'PRECEDING MR_TITLE COUNTER');
850: END IF;
851: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
852: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);
853: FND_MSG_PUB.ADD;
854: ELSIF nvl(l_title_counter,0)=1
855: THEN
856: OPEN get_mr_header(p_x_mr_header_rec.PRECEDING_MR_TITLE);

Line 865: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');

861: THEN
862: IF G_DEBUG='Y' THEN
863: AHL_DEBUG_PUB.debug(' Preceding MRHEADER_ID NOT FOUND2','+HEADERS+');
864: END IF;
865: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
866: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);
867: FND_MSG_PUB.ADD;
868: END IF;
869: Close get_mr_header;

Line 866: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);

862: IF G_DEBUG='Y' THEN
863: AHL_DEBUG_PUB.debug(' Preceding MRHEADER_ID NOT FOUND2','+HEADERS+');
864: END IF;
865: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
866: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);
867: FND_MSG_PUB.ADD;
868: END IF;
869: Close get_mr_header;
870: ELSIF NVL(l_title_counter,0)>1

Line 885: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');

881: IF G_DEBUG='Y' THEN
882: AHL_DEBUG_PUB.debug('Preceding mr title err','+HEADERS+');
883: END IF;
884:
885: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
886: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);
887: FND_MSG_PUB.ADD;
888:
889: ELSIF (l_prec_mr_info.title<>p_x_mr_header_rec.PRECEDING_MR_TITLE

Line 886: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);

882: AHL_DEBUG_PUB.debug('Preceding mr title err','+HEADERS+');
883: END IF;
884:
885: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
886: FND_MESSAGE.SET_TOKEN('FIELD',p_x_mr_header_rec.PRECEDING_MR_TITLE,false);
887: FND_MSG_PUB.ADD;
888:
889: ELSIF (l_prec_mr_info.title<>p_x_mr_header_rec.PRECEDING_MR_TITLE
890: and l_prec_mr_info.REVISION<>p_x_mr_header_rec.PRECEDING_MR_REVISION)

Line 892: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PREC_MR_ID_SELECT_LOV');

888:
889: ELSIF (l_prec_mr_info.title<>p_x_mr_header_rec.PRECEDING_MR_TITLE
890: and l_prec_mr_info.REVISION<>p_x_mr_header_rec.PRECEDING_MR_REVISION)
891: THEN
892: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PREC_MR_ID_SELECT_LOV');
893: FND_MSG_PUB.ADD;
894: END IF;
895:
896: Close get_prec_mrheader_info;

Line 899: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');

895:
896: Close get_prec_mrheader_info;
897: ELSIF NVL(l_title_counter,0)=0
898: THEN
899: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
900: FND_MSG_PUB.ADD;
901: END IF;
902: END IF;
903:

Line 942: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');

938: OPEN GetMrDet(p_mr_header_rec.MR_HEADER_ID);
939: FETCH GetMrDet into l_mr_rec;
940: IF GetMrDet%NOTFOUND
941: THEN
942: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
943: FND_MSG_PUB.ADD;
944: ELSE
945:
946: IF p_mr_header_rec.TYPE_CODE<>l_mr_rec.type_code

Line 953: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_REL_SHOULDNOT_EXIST');

949: FROM AHL_MR_RELATIONSHIPS
950: WHERE MR_HEADER_ID=p_mr_header_rec.MR_HEADER_ID;
951: IF l_counter >0
952: THEN
953: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_REL_SHOULDNOT_EXIST');
954: FND_MSG_PUB.ADD;
955: END IF;
956:
957: SELECT COUNT(*) INTO l_counter

Line 966: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_EFF_SHOULDNOT_EXIST');

962:
963:
964: IF l_counter >0
965: THEN
966: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_EFF_SHOULDNOT_EXIST');
967: FND_MSG_PUB.ADD;
968: END IF;
969:
970: SELECT COUNT(B.MR_INTERVAL_ID) INTO l_counter

Line 977: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_INT_SHOULDNOT_EXIST');

973: AND A.MR_EFFECTIVITY_ID=B.MR_EFFECTIVITY_ID;
974:
975: IF l_counter >0
976: THEN
977: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_INT_SHOULDNOT_EXIST');
978: FND_MSG_PUB.ADD;
979: END IF;
980: END IF;
981:

Line 990: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ROUTS_SHOULDNOT_EXIST');

986: WHERE MR_HEADER_ID=p_mr_header_rec.MR_HEADER_ID;
987:
988: IF l_counter >0
989: THEN
990: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ROUTS_SHOULDNOT_EXIST');
991: FND_MSG_PUB.ADD;
992: END IF;
993:
994: SELECT COUNT(*) INTO l_counter

Line 999: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ACTNS_SHOULDNOT_EXIST');

995: FROM AHL_MR_ACTIONS_B
996: WHERE MR_HEADER_ID=p_mr_header_rec.MR_HEADER_ID;
997: IF l_counter >0
998: THEN
999: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ACTNS_SHOULDNOT_EXIST');
1000: FND_MSG_PUB.ADD;
1001: END IF;
1002:
1003: SELECT COUNT(*) INTO l_counter

Line 1010: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_DOC_SHOULDNOT_EXIST');

1006: AND ASO_OBJECT_TYPE_CODE='MR';
1007:
1008: IF l_counter >0
1009: THEN
1010: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_DOC_SHOULDNOT_EXIST');
1011: FND_MSG_PUB.ADD;
1012: END IF;
1013: END IF;
1014: END IF;

Line 1175: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');

1171: END IF;
1172:
1173: IF G_APPLN_USAGE IS NULL
1174: THEN
1175: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
1176: FND_MSG_PUB.ADD;
1177: RETURN;
1178: END IF;
1179:

Line 1183: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_NULL');

1179:
1180: IF p_mr_header_rec.PROGRAM_TYPE_CODE IS NULL OR
1181: p_mr_header_rec.PROGRAM_TYPE_CODE=FND_API.G_MISS_CHAR
1182: THEN
1183: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPE_NULL');
1184: FND_MSG_PUB.ADD;
1185: l_check_flag:='N';
1186: END IF;
1187:

Line 1191: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_AUTOSIGNOFF_INVALID');

1187:
1188: IF p_mr_header_rec.AUTO_SIGNOFF_FLAG<>'Y' AND
1189: nvl(p_mr_header_rec.AUTO_SIGNOFF_FLAG,'N')<>'N'
1190: THEN
1191: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_AUTOSIGNOFF_INVALID');
1192: FND_MSG_PUB.ADD;
1193: l_check_flag:='N';
1194: END IF;
1195:

Line 1201: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TYPE_CODE_NULL');

1197: IF G_APPLN_USAGE='PM'
1198: THEN
1199: IF p_mr_header_rec.TYPE_CODE IS NULL OR p_mr_header_rec.TYPE_CODE=FND_API.G_MISS_CHAR
1200: THEN
1201: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TYPE_CODE_NULL');
1202: FND_MSG_PUB.ADD;
1203: l_check_flag:='N';
1204: END IF;
1205: END IF;

Line 1219: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPESUBTYPE_INV');

1215: OPEN check_prog_subtype(p_mr_header_rec.PROGRAM_TYPE_CODE,p_mr_header_rec.PROGRAM_SUBTYPE_CODE);
1216: FETCH check_prog_subtype INTO l_counter;
1217: IF check_prog_subtype%FOUND and l_counter=0
1218: THEN
1219: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPESUBTYPE_INV');
1220: FND_MESSAGE.SET_TOKEN('FIELD1',p_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);
1221: FND_MESSAGE.SET_TOKEN('FIELD2',p_mr_header_rec.PROGRAM_TYPE_CODE,false);
1222: FND_MSG_PUB.ADD;
1223: END IF;

Line 1220: FND_MESSAGE.SET_TOKEN('FIELD1',p_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);

1216: FETCH check_prog_subtype INTO l_counter;
1217: IF check_prog_subtype%FOUND and l_counter=0
1218: THEN
1219: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPESUBTYPE_INV');
1220: FND_MESSAGE.SET_TOKEN('FIELD1',p_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);
1221: FND_MESSAGE.SET_TOKEN('FIELD2',p_mr_header_rec.PROGRAM_TYPE_CODE,false);
1222: FND_MSG_PUB.ADD;
1223: END IF;
1224: CLOSE check_prog_subtype;

Line 1221: FND_MESSAGE.SET_TOKEN('FIELD2',p_mr_header_rec.PROGRAM_TYPE_CODE,false);

1217: IF check_prog_subtype%FOUND and l_counter=0
1218: THEN
1219: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PROGTYPESUBTYPE_INV');
1220: FND_MESSAGE.SET_TOKEN('FIELD1',p_mr_header_rec.PROGRAM_SUBTYPE_CODE,false);
1221: FND_MESSAGE.SET_TOKEN('FIELD2',p_mr_header_rec.PROGRAM_TYPE_CODE,false);
1222: FND_MSG_PUB.ADD;
1223: END IF;
1224: CLOSE check_prog_subtype;
1225: END IF;

Line 1242: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SERVICE_INVALID');

1238: p_lookup_TYPE =>'AHL_FMP_MR_SERVICE_TYPE'
1239: );
1240: IF l_return_status<>'S'
1241: THEN
1242: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SERVICE_INVALID');
1243: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.service_type_code,false);
1244: FND_MSG_PUB.ADD;
1245: END IF;
1246: END IF;

Line 1243: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.service_type_code,false);

1239: );
1240: IF l_return_status<>'S'
1241: THEN
1242: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SERVICE_INVALID');
1243: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.service_type_code,false);
1244: FND_MSG_PUB.ADD;
1245: END IF;
1246: END IF;
1247:

Line 1258: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_UOM_CODE_INV');

1254: p_lookup_TYPE =>'AHL_FMP_PM_DOWNTIME_UOM'
1255: );
1256: IF l_return_status<>'S'
1257: THEN
1258: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_UOM_CODE_INV');
1259: FND_MSG_PUB.ADD;
1260: END IF;
1261: END IF;
1262:

Line 1274: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_IMPLMNTSTAT_INVALID');

1270: p_lookup_TYPE =>'AHL_FMP_MR_IMPLEMENT_STATUS'
1271: );
1272: IF l_return_status<>'S'
1273: THEN
1274: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_IMPLMNTSTAT_INVALID');
1275: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.implement_status_code,false);
1276: FND_MSG_PUB.ADD;
1277: END IF;
1278:

Line 1275: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.implement_status_code,false);

1271: );
1272: IF l_return_status<>'S'
1273: THEN
1274: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_IMPLMNTSTAT_INVALID');
1275: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.implement_status_code,false);
1276: FND_MSG_PUB.ADD;
1277: END IF;
1278:
1279: -- Qa Inspection type and autosignoff

Line 1290: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_AUTSIGNOFF_QA_INV');

1286: THEN
1287: IF G_DEBUG='Y' THEN
1288: AHL_DEBUG_PUB.debug('Error at AHL_FMP_AUTSIGNOFF_QA_INV');
1289: END IF;
1290: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_AUTSIGNOFF_QA_INV');
1291: FND_MSG_PUB.ADD;
1292: END IF;
1293: END IF;
1294:

Line 1305: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_IMPL_QA');

1301: IF p_mr_header_rec.implement_status_code = 'OPTIONAL_DO_NOT_IMPLEMENT'
1302: AND (p_mr_header_rec.qa_inspection_type IS NOT NULL
1303: AND p_mr_header_rec.qa_inspection_type <>FND_API.G_MISS_CHAR)
1304: THEN
1305: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_IMPL_QA');
1306: FND_MSG_PUB.ADD;
1307: END IF;
1308: END IF;
1309: */

Line 1320: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPETITIVE_INVALID');

1316: );
1317:
1318: IF l_return_status<>'S'
1319: THEN
1320: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPETITIVE_INVALID');
1321: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.repetitive_flag,false);
1322: FND_MSG_PUB.ADD;
1323: ELSE
1324: IF p_mr_header_rec.repetitive_flag ='N'

Line 1321: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.repetitive_flag,false);

1317:
1318: IF l_return_status<>'S'
1319: THEN
1320: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPETITIVE_INVALID');
1321: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.repetitive_flag,false);
1322: FND_MSG_PUB.ADD;
1323: ELSE
1324: IF p_mr_header_rec.repetitive_flag ='N'
1325: and (p_mr_header_rec.SHOW_REPETITIVE_CODE IS NOT NULL OR p_mr_header_rec.SHOW_REPETITIVE_CODE<>FND_API.G_MISS_CHAR)

Line 1329: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPITITVE_NO');

1325: and (p_mr_header_rec.SHOW_REPETITIVE_CODE IS NOT NULL OR p_mr_header_rec.SHOW_REPETITIVE_CODE<>FND_API.G_MISS_CHAR)
1326: THEN
1327: IF p_mr_header_rec.SHOW_REPETITIVE_CODE<>'NEXT'
1328: THEN
1329: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPITITVE_NO');
1330: FND_MSG_PUB.ADD;
1331: END IF;
1332: END IF;
1333:

Line 1350: FND_MESSAGE.SET_NAME('AHL',l_msg_data1);

1346: );
1347:
1348: IF l_return_Status<>FND_API.G_RET_STS_SUCCESS
1349: THEN
1350: FND_MESSAGE.SET_NAME('AHL',l_msg_data1);
1351: FND_MSG_PUB.ADD;
1352: END IF;
1353: END IF;
1354: end if;

Line 1367: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_WHICHEVER_INVALID');

1363: );
1364:
1365: IF l_return_status<>'S'
1366: THEN
1367: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_WHICHEVER_INVALID');
1368: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.whichever_first_code,false);
1369: FND_MSG_PUB.ADD;
1370: END IF;
1371:

Line 1368: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.whichever_first_code,false);

1364:
1365: IF l_return_status<>'S'
1366: THEN
1367: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_WHICHEVER_INVALID');
1368: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.whichever_first_code,false);
1369: FND_MSG_PUB.ADD;
1370: END IF;
1371:
1372: --Space Category

Line 1385: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_VISIT_CATEGORY');

1381: );
1382:
1383: IF l_return_status<>'S'
1384: THEN
1385: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_VISIT_CATEGORY');
1386: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.space_category_code,false);
1387: FND_MSG_PUB.ADD;
1388: END IF;
1389: END IF;

Line 1386: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.space_category_code,false);

1382:
1383: IF l_return_status<>'S'
1384: THEN
1385: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_VISIT_CATEGORY');
1386: FND_MESSAGE.SET_TOKEN('FIELD',p_mr_header_rec.space_category_code,false);
1387: FND_MSG_PUB.ADD;
1388: END IF;
1389: END IF;
1390:

Line 1400: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFECTIVE_FROM_NULL');

1396: IF l_mr_header_rec.MR_STATUS_CODE='DRAFT' -- AND nvl(l_mr_header_rec.SUPERUSER_ROLE,'N')='N'
1397: THEN
1398: IF p_mr_header_rec.effective_from is null or p_mr_header_rec.effective_from=fnd_api.g_miss_date
1399: THEN
1400: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFECTIVE_FROM_NULL');
1401: FND_MSG_PUB.ADD;
1402: ELSIF TRUNC(p_mr_header_rec.effective_from) 1403: THEN
1404: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFE_FROM_INVALID');

Line 1404: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFE_FROM_INVALID');

1400: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFECTIVE_FROM_NULL');
1401: FND_MSG_PUB.ADD;
1402: ELSIF TRUNC(p_mr_header_rec.effective_from) 1403: THEN
1404: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_EFFE_FROM_INVALID');
1405: FND_MSG_PUB.ADD;
1406: END IF;
1407: END IF;
1408: IF P_MR_HEADER_REC.DML_OPERATION='U'

Line 1425: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ST_DATE_LESSER');

1421: THEN
1422:
1423: IF trunc(l_mr_Rec.effective_from) < trunc(l_mr_Rec1.effective_from)
1424: THEN
1425: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ST_DATE_LESSER');
1426: FND_MESSAGE.SET_TOKEN('FIELD',l_mr_Rec.effective_from,false);
1427: FND_MSG_PUB.ADD;
1428: END IF;
1429: END IF;

Line 1426: FND_MESSAGE.SET_TOKEN('FIELD',l_mr_Rec.effective_from,false);

1422:
1423: IF trunc(l_mr_Rec.effective_from) < trunc(l_mr_Rec1.effective_from)
1424: THEN
1425: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ST_DATE_LESSER');
1426: FND_MESSAGE.SET_TOKEN('FIELD',l_mr_Rec.effective_from,false);
1427: FND_MSG_PUB.ADD;
1428: END IF;
1429: END IF;
1430: close GetHeaderInfo1;

Line 1444: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_EDIT');

1440: AHL_DEBUG_PUB.debug('billing item :'||nvl(p_mr_header_rec.mr_header_id,0));
1441: END IF;
1442: IF l_mr_header_rec.MR_STATUS_CODE='COMPLETE' AND nvl(l_mr_header_rec.SUPERUSER_ROLE,'N')='N'
1443: THEN
1444: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_EDIT');
1445: FND_MSG_PUB.ADD;
1446: ELSIF l_mr_header_rec.MR_STATUS_CODE='COMPLETE' AND l_mr_header_rec.SUPERUSER_ROLE='Y'
1447: THEN
1448:

Line 1476: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SUPER_NONEDIT_COLS');

1472: or nvl(l_rec.space_category_code,'X')<>nvl(P_mr_header_rec.space_category_code,'X')
1473: or NVL(l_rec.DOWN_TIME,0)<>NVL(p_mr_header_rec.DOWN_TIME,0)
1474: or nvl(l_rec.UOM_CODE,'X')<>nvl(p_mr_header_rec.uom_code,'X')
1475: THEN
1476: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SUPER_NONEDIT_COLS');
1477: FND_MSG_PUB.ADD;
1478: AHL_DEBUG_PUB.debug('SUPERUSER NONEDIT:'||L_MR_HEADER_REC.SUPERUSER_ROLE);
1479: l_check_flag:='N';
1480: END IF;

Line 1488: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPETITIVE_INVALID');

1484: -- Validating null items
1485:
1486: IF p_mr_header_rec.SHOW_REPETITIVE_CODE IS NULL OR p_mr_header_rec.SHOW_REPETITIVE_CODE=FND_API.G_MISS_char
1487: THEN
1488: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REPETITIVE_INVALID');
1489: FND_MSG_PUB.ADD;
1490: END IF;
1491:
1492: IF p_mr_header_rec.COPY_ACCOMPLISHMENT_FLAG IS NULL

Line 1495: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACCMPLSHMNT_NULL');

1491:
1492: IF p_mr_header_rec.COPY_ACCOMPLISHMENT_FLAG IS NULL
1493: OR p_mr_header_rec.COPY_ACCOMPLISHMENT_FLAG=FND_API.G_MISS_CHAR
1494: THEN
1495: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_ACCMPLSHMNT_NULL');
1496: FND_MSG_PUB.ADD;
1497: END IF;
1498:
1499: IF p_mr_header_rec.CATEGORY_CODE IS NULL

Line 1502: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CATEGORY_NULL');

1498:
1499: IF p_mr_header_rec.CATEGORY_CODE IS NULL
1500: OR p_mr_header_rec.CATEGORY_CODE=FND_API.G_MISS_CHAR
1501: THEN
1502: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CATEGORY_NULL');
1503: FND_MSG_PUB.ADD;
1504: END IF;
1505:
1506: IF G_APPLN_USAGE='PM'

Line 1511: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_TYPECODE_NULL');

1507: THEN
1508: IF p_mr_header_rec.TYPE_CODE IS NULL
1509: OR p_mr_header_rec.TYPE_CODE=FND_API.G_MISS_CHAR
1510: THEN
1511: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_TYPECODE_NULL');
1512: FND_MSG_PUB.ADD;
1513: ELSE
1514: CHECK_LOOKUP_CODE
1515: (

Line 1522: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_TYPE_CODE_INVALID');

1518: p_lookup_TYPE =>'AHL_FMP_MR_TYPE'
1519: );
1520: IF l_return_status<>'S'
1521: THEN
1522: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_TYPE_CODE_INVALID');
1523: FND_MSG_PUB.ADD;
1524: END IF;
1525: END IF;
1526:

Line 1531: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_DOWNTIME_ZERO');

1527:
1528: IF NVL(p_mr_header_rec.TYPE_CODE,'X')='PROGRAM'
1529: and NVL(p_mr_header_rec.DOWN_TIME,0)>0
1530: THEN
1531: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_DOWNTIME_ZERO');
1532: FND_MSG_PUB.ADD;
1533: ELSIF NVL(p_mr_header_rec.TYPE_CODE,'X')<>'PROGRAM'
1534: and NVL(p_mr_header_rec.DOWN_TIME,0)=0
1535: THEN

Line 1536: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_DOWNTIME_NO_Z');

1532: FND_MSG_PUB.ADD;
1533: ELSIF NVL(p_mr_header_rec.TYPE_CODE,'X')<>'PROGRAM'
1534: and NVL(p_mr_header_rec.DOWN_TIME,0)=0
1535: THEN
1536: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_DOWNTIME_NO_Z');
1537: FND_MSG_PUB.ADD;
1538: END IF;
1539:
1540: IF NVL(p_mr_header_rec.TYPE_CODE,'X')='PROGRAM'

Line 1543: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_SRVREQ_TEMPLT');

1539:
1540: IF NVL(p_mr_header_rec.TYPE_CODE,'X')='PROGRAM'
1541: and NVL(p_mr_header_rec.SERVICE_REQUEST_TEMPLATE_ID,0)>0
1542: THEN
1543: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_SRVREQ_TEMPLT');
1544: FND_MSG_PUB.ADD;
1545: END IF;
1546:
1547: IF p_mr_header_rec.DML_OPERATION='U'

Line 1563: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_DOWNTIME_NO_Z');

1559: p_mr_header_rec.DOWN_TIME<>FND_API.G_MISS_NUM)
1560: AND p_mr_header_rec.DOWN_TIME <=0
1561: THEN
1562: -- FOR CMRO MODE
1563: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_DOWNTIME_NO_Z');
1564: FND_MSG_PUB.ADD;
1565: END IF;
1566:
1567: END IF;

Line 1574: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MR_MOPROC_IMPL_INV');

1570: IF (p_mr_header_rec.dml_operation <> 'D')
1571: THEN
1572: IF (p_mr_header_rec.program_type_code = 'MO_PROC' AND p_mr_header_rec.implement_status_code <> 'OPTIONAL_DO_NOT_IMPLEMENT')
1573: THEN
1574: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MR_MOPROC_IMPL_INV');
1575: -- Maintenance Requirements of (M) and (O) procedure program type must be unplanned.
1576: FND_MSG_PUB.ADD;
1577: END IF;
1578: END IF;

Line 1586: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_NULL');

1582:
1583: IF p_mr_header_rec.dml_operation='C' THEN
1584: IF p_mr_header_rec.title is null or p_mr_header_rec.title=fnd_api.g_miss_char
1585: THEN
1586: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_NULL');
1587: FND_MSG_PUB.ADD;
1588: ELSIF p_mr_header_rec.title is not null or p_mr_header_rec.title<>fnd_api.g_miss_char
1589: THEN
1590:

Line 1597: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_INVALID');

1593: SELECT COUNT(*) INTO l_title_counter
1594: FROM AHL_MR_HEADERS_APP_V
1595: WHERE upper(ltrim(rtrim(TITLE)))=upper(ltrim(rtrim(l_mr_header_rec.title)));
1596: IF l_title_counter >0 then
1597: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_INVALID');
1598: FND_MSG_PUB.ADD;
1599: END IF;
1600: END IF;
1601:

Line 1605: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_NULL');

1601:
1602: ELSIF p_mr_header_rec.dml_operation<>'U' THEN
1603: IF p_mr_header_rec.title is null or p_mr_header_rec.title=fnd_api.g_miss_char
1604: THEN
1605: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_NULL');
1606: FND_MSG_PUB.ADD;
1607: END IF;
1608: IF p_mr_header_rec.PRECEDING_MR_HEADER_ID=p_mr_header_rec.MR_HEADER_ID
1609: THEN

Line 1610: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');

1606: FND_MSG_PUB.ADD;
1607: END IF;
1608: IF p_mr_header_rec.PRECEDING_MR_HEADER_ID=p_mr_header_rec.MR_HEADER_ID
1609: THEN
1610: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_ID_INVALID');
1611: FND_MSG_PUB.ADD;
1612: END IF;
1613:
1614: IF p_mr_header_rec.mr_header_id is null or p_mr_header_rec.mr_header_id=fnd_api.g_miss_num

Line 1616: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');

1612: END IF;
1613:
1614: IF p_mr_header_rec.mr_header_id is null or p_mr_header_rec.mr_header_id=fnd_api.g_miss_num
1615: THEN
1616: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');
1617: FND_MSG_PUB.ADD;
1618: END IF;
1619:
1620: IF p_mr_header_rec.SERVICE_TYPE_CODE IS NULL OR p_mr_header_rec.SERVICE_TYPE_CODE=FND_API.G_MISS_char

Line 1624: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SERVICE_NULL');

1620: IF p_mr_header_rec.SERVICE_TYPE_CODE IS NULL OR p_mr_header_rec.SERVICE_TYPE_CODE=FND_API.G_MISS_char
1621: THEN
1622: IF G_APPLN_USAGE<>'PM'
1623: THEN
1624: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_SERVICE_NULL');
1625: FND_MSG_PUB.ADD;
1626: END IF;
1627: ELSE
1628: OPEN get_mr_title(p_mr_header_rec.mr_header_id);

Line 1633: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');

1629: FETCH get_mr_title INTO l_title,l_object_version_number;
1630:
1631: IF get_mr_title%NOTFOUND
1632: THEN
1633: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');
1634: FND_MSG_PUB.ADD;
1635: END IF;
1636:
1637: IF p_mr_header_rec.object_version_number <> l_object_version_number or l_object_version_number is null or l_object_version_number=fnd_api.g_miss_num

Line 1639: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');

1635: END IF;
1636:
1637: IF p_mr_header_rec.object_version_number <> l_object_version_number or l_object_version_number is null or l_object_version_number=fnd_api.g_miss_num
1638: THEN
1639: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
1640: FND_MSG_PUB.ADD;
1641: END IF;
1642: IF p_mr_header_rec.title <> l_title
1643: THEN

Line 1644: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_NOT_EDITABLE');

1640: FND_MSG_PUB.ADD;
1641: END IF;
1642: IF p_mr_header_rec.title <> l_title
1643: THEN
1644: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TITLE_NOT_EDITABLE');
1645: FND_MSG_PUB.ADD;
1646: END IF;
1647: CLOSE get_mr_title;
1648: END IF;

Line 1660: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MR_TYPE_ROUTE_INV');

1656: OPEN check_route_mo_proc(p_mr_header_rec.mr_header_id);
1657: FETCH check_route_mo_proc INTO l_dummy_char;
1658: IF (check_route_mo_proc%FOUND)
1659: THEN
1660: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MR_TYPE_ROUTE_INV');
1661: -- Cannot modify program type to (M) and (O) procedure since routes of non (M), (O) procedure type are already associated.
1662: FND_MSG_PUB.ADD;
1663: END IF;
1664: CLOSE check_route_mo_proc;

Line 1674: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MR_TYPE_EFF_INV');

1670: OPEN check_eff_exists(p_mr_header_rec.mr_header_id);
1671: FETCH check_eff_exists INTO l_dummy_char;
1672: IF (check_eff_exists%FOUND)
1673: THEN
1674: FND_MESSAGE.SET_NAME('AHL', 'AHL_FMP_MR_TYPE_EFF_INV');
1675: -- Cannot modify program type to / from(M) and (O) procedure since effectivities already exist.
1676: FND_MSG_PUB.ADD;
1677: END IF;
1678: CLOSE check_eff_exists;

Line 1719: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_H_ID_CYCLIC');

1715: CONNECT BY PRIOR MR_HEADER_ID=PRECEDING_MR_HEADER_ID;
1716:
1717: EXCEPTION
1718: WHEN l_cyclic_loop THEN
1719: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_H_ID_CYCLIC');
1720: FND_MESSAGE.SET_TOKEN('FIELD',P_RELATED_MR_TITLE,false);
1721: FND_MSG_PUB.ADD;
1722: x_return_status := FND_API.G_RET_STS_ERROR;
1723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1720: FND_MESSAGE.SET_TOKEN('FIELD',P_RELATED_MR_TITLE,false);

1716:
1717: EXCEPTION
1718: WHEN l_cyclic_loop THEN
1719: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_PREC_MR_H_ID_CYCLIC');
1720: FND_MESSAGE.SET_TOKEN('FIELD',P_RELATED_MR_TITLE,false);
1721: FND_MSG_PUB.ADD;
1722: x_return_status := FND_API.G_RET_STS_ERROR;
1723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1724: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2283: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');

2279: BEGIN
2280:
2281: IF G_APPLN_USAGE IS NULL
2282: THEN
2283: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
2284: FND_MSG_PUB.ADD;
2285: RETURN;
2286: END IF;
2287:

Line 2290: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');

2286: END IF;
2287:
2288: IF P_MR_HEADER_ID IS NULL OR P_MR_HEADER_ID=FND_API.G_MISS_NUM
2289: THEN
2290: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_NULL');
2291: FND_MSG_PUB.ADD;
2292: L_ERR_FLAG:=1;
2293: END IF;
2294:

Line 2297: FND_MESSAGE.SET_NAME('AHL','AHL_COM_OBJECT_VERS_NUM_NULL');

2293: END IF;
2294:
2295: IF P_OBJECT_VERSION_NUMBER IS NULL OR P_OBJECT_VERSION_NUMBER=FND_API.G_MISS_NUM
2296: THEN
2297: FND_MESSAGE.SET_NAME('AHL','AHL_COM_OBJECT_VERS_NUM_NULL');
2298: FND_MSG_PUB.ADD;
2299: L_ERR_FLAG:=1;
2300: END IF;
2301:

Line 2309: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');

2305: END IF;
2306: Open GetHeaderDet(P_MR_HEADER_ID,P_OBJECT_VERSION_NUMBER);
2307: Fetch GetHeaderDet into l_rec;
2308: If GetHeaderDet%NotFound Then
2309: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');
2310: FND_MSG_PUB.ADD;
2311: Elsif GetHeaderDet%Found and (l_rec.mr_status_code<>'DRAFT' AND
2312: l_rec.mr_status_code<>'APPROVAL_REJECTED')
2313: Then

Line 2314: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_INVALID_MR_STATUS');

2310: FND_MSG_PUB.ADD;
2311: Elsif GetHeaderDet%Found and (l_rec.mr_status_code<>'DRAFT' AND
2312: l_rec.mr_status_code<>'APPROVAL_REJECTED')
2313: Then
2314: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_INVALID_MR_STATUS');
2315: FND_MSG_PUB.ADD;
2316: End if;
2317: Close GetHeaderDet;
2318: END;