[Home] [Help]
62: IF ( p_workorder_id IS NULL OR
63: p_workorder_id = FND_API.G_MISS_NUM OR
64: p_object_version_no IS NULL OR
65: p_object_version_no = FND_API.G_MISS_NUM ) THEN
66: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_WO_INPUTS' );
67: FND_MSG_PUB.add;
68: RETURN FND_API.G_RET_STS_ERROR;
69: END IF;
70:
144: x_operation_rec.actual_end_date,
145: x_operation_rec.status_code,
146: x_operation_rec.status;
147: IF(get_op_details%NOTFOUND)THEN
148: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_OP_NOT_FOUND' );
149: FND_MSG_PUB.add;
150: CLOSE get_op_details;
151: RETURN FND_API.G_RET_STS_ERROR;
152: END IF;
155:
156: IF ( p_object_version_no IS NOT NULL AND
157: p_object_version_no <> FND_API.G_MISS_NUM ) THEN
158: IF ( x_operation_rec.object_version_number <> p_object_version_no ) THEN
159: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
160: FND_MSG_PUB.add;
161: RETURN FND_API.G_RET_STS_ERROR;
162: END IF;
163: END IF;
355: x_workorder_rec.completion_locator_id,
356: l_visit_id,
357: l_visit_task_id;
358: IF(get_wo_dtls_csr%NOTFOUND)THEN
359: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
360: FND_MSG_PUB.add;
361: CLOSE get_wo_dtls_csr;
362: RETURN FND_API.G_RET_STS_ERROR;
363: END IF;
365:
366: IF ( p_object_version_no IS NOT NULL AND
367: p_object_version_no <> FND_API.G_MISS_NUM ) THEN
368: IF ( x_workorder_rec.object_version_number <> p_object_version_no ) THEN
369: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
370: FND_MSG_PUB.add;
371: RETURN FND_API.G_RET_STS_ERROR;
372: END IF;
373: END IF;
410:
411: RETURN FND_API.G_RET_STS_SUCCESS;
412: EXCEPTION
413: WHEN OTHERS THEN
414: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_NOT_FOUND' );
415: FND_MSG_PUB.add;
416: RETURN FND_API.G_RET_STS_ERROR;
417:
418: END get_workorder_rec;
427: BEGIN
428:
429: IF ( p_actual_start_date IS NULL OR
430: p_actual_end_date IS NULL ) THEN
431: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ACTUAL_DTS_MISSING' );
432: FND_MSG_PUB.add;
433: RETURN FND_API.G_RET_STS_ERROR;
434: END IF;
435:
433: RETURN FND_API.G_RET_STS_ERROR;
434: END IF;
435:
436: IF ( p_actual_start_date > p_actual_end_date ) THEN
437: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ST_DT_END_DT' );
438: FND_MSG_PUB.add;
439: RETURN FND_API.G_RET_STS_ERROR;
440: END IF;
441:
439: RETURN FND_API.G_RET_STS_ERROR;
440: END IF;
441:
442: IF ( p_actual_end_date > SYSDATE ) THEN
443: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_END_DT_SYSDATE' );
444: FND_MSG_PUB.add;
445: RETURN FND_API.G_RET_STS_ERROR;
446: END IF;
447:
481: FETCH get_min_period
482: INTO l_period_start_date;
483:
484: IF ( get_min_period%NOTFOUND ) THEN
485: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NO_OPEN_ACCT_PERIOD' );
486: FND_MSG_PUB.add;
487: CLOSE get_min_period;
488: RETURN FND_API.G_RET_STS_ERROR;
489: END IF;
488: RETURN FND_API.G_RET_STS_ERROR;
489: END IF;
490:
491: IF ( l_period_start_date > p_actual_start_date ) THEN
492: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ST_DT_LESS_ACCT_PERIOD' );
493: FND_MSG_PUB.add;
494: CLOSE get_min_period;
495: RETURN FND_API.G_RET_STS_ERROR;
496: END IF;
501: FETCH get_max_period
502: INTO l_schedule_close_date;
503:
504: IF ( get_max_period%NOTFOUND ) THEN
505: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NO_OPEN_ACT_PERIOD' );
506: FND_MSG_PUB.add;
507: CLOSE get_max_period;
508: RETURN FND_API.G_RET_STS_ERROR;
509: END IF;
508: RETURN FND_API.G_RET_STS_ERROR;
509: END IF;
510:
511: IF ( l_schedule_close_date < p_actual_end_date ) THEN
512: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_END_DT_LESS_ACT_PERIOD' );
513: FND_MSG_PUB.add;
514: CLOSE get_max_period;
515: RETURN FND_API.G_RET_STS_ERROR;
516: END IF;
572: -- Operation status
573: IF ( p_char_id = 125 AND
574: ( l_result_column_value IS NULL OR
575: l_result_column_value <> G_OP_STATUS_COMPLETE ) ) THEN
576: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_QA_STAT_NOT_COMPL' );
577: FND_MSG_PUB.add;
578: RETURN FND_API.G_RET_STS_ERROR;
579:
580: -- Workorder status
580: -- Workorder status
581: ELSIF ( p_char_id = 98 AND
582: ( l_result_column_value IS NULL OR
583: l_result_column_value <> G_JOB_STATUS_COMPLETE ) ) THEN
584: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_QA_STAT_NOT_COMPL' );
585: FND_MSG_PUB.add;
586: RETURN FND_API.G_RET_STS_ERROR;
587: END IF;
588: END IF;
615:
616: IF ( get_ahl_txn_rec%FOUND ) THEN
617: -- Ensure that the Actual End date is greater than the last Transaction Date
618: IF ( l_transaction_date > p_actual_end_date ) THEN
619: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ENDDT_TXNDT' );
620: FND_MSG_PUB.add;
621: CLOSE get_ahl_txn_rec;
622: RETURN FND_API.G_RET_STS_ERROR;
623: END IF;
661: IF ( get_eam_txn_rec%FOUND ) THEN
662:
663: -- Ensure that the Transaction Type is not COMPLETE.
664: IF ( l_transaction_type = 1 ) THEN
665: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_COMP_IN_EAM' );
666: FND_MSG_PUB.add;
667: CLOSE get_eam_txn_rec;
668: RETURN FND_API.G_RET_STS_ERROR;
669: END IF;
669: END IF;
670:
671: IF (NVL(p_validate_date, FND_API.G_TRUE) = FND_API.G_TRUE) THEN
672: IF ( l_transaction_date > p_actual_end_date ) THEN
673: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ENDDT_EAM_TXNDT' );
674: FND_MSG_PUB.add;
675: CLOSE get_eam_txn_rec;
676: RETURN FND_API.G_RET_STS_ERROR;
677: END IF;
838:
839: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
840:
841: IF ( l_msg_data IS NULL ) THEN
842: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EAM_WO_CMPL_ERROR' );
843: FND_MSG_PUB.add;
844: ELSE
845: -- Parse the Encoded message returned by the EAM API
846: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
842: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EAM_WO_CMPL_ERROR' );
843: FND_MSG_PUB.add;
844: ELSE
845: -- Parse the Encoded message returned by the EAM API
846: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
847: FND_MESSAGE.set_name( l_app_name, l_msg_name );
848: FND_MSG_PUB.add;
849: END IF;
850:
843: FND_MSG_PUB.add;
844: ELSE
845: -- Parse the Encoded message returned by the EAM API
846: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
847: FND_MESSAGE.set_name( l_app_name, l_msg_name );
848: FND_MSG_PUB.add;
849: END IF;
850:
851: RETURN FND_API.G_RET_STS_ERROR;
850:
851: RETURN FND_API.G_RET_STS_ERROR;
852:
853: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
854: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EAM_WO_CMPL_ERROR' );
855: FND_MSG_PUB.add;
856: RETURN FND_API.G_RET_STS_ERROR;
857: END IF;
858:
937: WHERE workorder_id = p_workorder_rec.workorder_id
938: AND object_version_number = p_workorder_rec.object_version_number;
939:
940: IF ( SQL%ROWCOUNT = 0 ) THEN
941: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_NOT_FOUND' );
942: FND_MSG_PUB.add;
943: RETURN FND_API.G_RET_STS_ERROR;
944: END IF;
945:
979: IF ( p_workorder_operation_id IS NULL OR
980: p_workorder_operation_id = FND_API.G_MISS_NUM OR
981: p_object_version_no IS NULL OR
982: p_object_version_no = FND_API.G_MISS_NUM ) THEN
983: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_COP_INPUTS' );
984: FND_MSG_PUB.add;
985: RETURN FND_API.G_RET_STS_ERROR;
986: END IF;
987:
1012: IF ( get_ahl_txn_rec%FOUND ) THEN
1013:
1014: -- Ensure that the Actual End date is greater than the last Transaction Date
1015: IF ( l_transaction_date > p_actual_end_date ) THEN
1016: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ENDDT_TXNDT' );
1017: FND_MSG_PUB.add;
1018: CLOSE get_ahl_txn_rec;
1019: RETURN FND_API.G_RET_STS_ERROR;
1020: END IF;
1060: IF ( get_eam_txn_rec%FOUND ) THEN
1061:
1062: -- Ensure that the Transaction Type is not COMPLETE.
1063: IF ( l_transaction_type = 1 ) THEN
1064: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_OP_COMP_IN_EAM' );
1065: FND_MSG_PUB.add;
1066: CLOSE get_eam_txn_rec;
1067: RETURN FND_API.G_RET_STS_ERROR;
1068: END IF;
1068: END IF;
1069:
1070: IF (NVL(p_validate_date, FND_API.G_TRUE) = FND_API.G_TRUE) THEN
1071: IF ( l_transaction_date > p_actual_end_date ) THEN
1072: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ENDDT_EAM_TXNDT' );
1073: FND_MSG_PUB.add;
1074: CLOSE get_eam_txn_rec;
1075: RETURN FND_API.G_RET_STS_ERROR;
1076: END IF;
1096:
1097: BEGIN
1098:
1099: IF ( p_operation_rec.description IS NULL ) THEN
1100: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_DESC_NULL' );
1101: FND_MSG_PUB.add;
1102: RETURN FND_API.G_RET_STS_ERROR;
1103: END IF;
1104:
1106: -- ACL Changes
1107: IF p_check_unit = FND_API.G_TRUE THEN
1108: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_operation_rec.workorder_id, NULL, NULL, NULL);
1109: IF l_return_status = FND_API.G_TRUE THEN
1110: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_OP_COMP_UNTLCKD');
1111: --FND_MESSAGE.Set_Token('WO_NAME', p_workorder_rec.workorder_name);
1112: FND_MSG_PUB.ADD;
1113: RETURN FND_API.G_RET_STS_ERROR;
1114: END IF;
1107: IF p_check_unit = FND_API.G_TRUE THEN
1108: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_operation_rec.workorder_id, NULL, NULL, NULL);
1109: IF l_return_status = FND_API.G_TRUE THEN
1110: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_OP_COMP_UNTLCKD');
1111: --FND_MESSAGE.Set_Token('WO_NAME', p_workorder_rec.workorder_name);
1112: FND_MSG_PUB.ADD;
1113: RETURN FND_API.G_RET_STS_ERROR;
1114: END IF;
1115: END IF;
1145: WHERE lookup_type = 'AHL_OPERATION_STATUS'
1146: AND lookup_code = p_operation_rec.status_code;
1147: */
1148: --
1149: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_OP_STATUS' );
1150: FND_MESSAGE.set_token( 'STATUS', l_op_status_meaning );
1151: FND_MSG_PUB.add;
1152: RETURN FND_API.G_RET_STS_ERROR;
1153: END IF;
1146: AND lookup_code = p_operation_rec.status_code;
1147: */
1148: --
1149: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_OP_STATUS' );
1150: FND_MESSAGE.set_token( 'STATUS', l_op_status_meaning );
1151: FND_MSG_PUB.add;
1152: RETURN FND_API.G_RET_STS_ERROR;
1153: END IF;
1154:
1153: END IF;
1154:
1155: IF (NVL(p_validate_date, FND_API.G_TRUE) = FND_API.G_TRUE) THEN
1156: IF ( p_operation_rec.actual_start_date < p_workorder_rec.actual_start_date ) THEN
1157: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_WO_ST_DT' );
1158: FND_MSG_PUB.add;
1159: RETURN FND_API.G_RET_STS_ERROR;
1160: END IF;
1161:
1159: RETURN FND_API.G_RET_STS_ERROR;
1160: END IF;
1161:
1162: IF ( p_operation_rec.actual_end_date > p_workorder_rec.actual_end_date ) THEN
1163: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_WO_END_DT' );
1164: FND_MSG_PUB.add;
1165: RETURN FND_API.G_RET_STS_ERROR;
1166: END IF;
1167: END IF;
1183: WHERE lookup_type = 'AHL_JOB_STATUS'
1184: AND lookup_code = p_workorder_rec.status_code;
1185: */
1186:
1187: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_OP_WO_STATUS' );
1188: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
1189: FND_MSG_PUB.add;
1190: RETURN FND_API.G_RET_STS_ERROR;
1191: END IF;
1184: AND lookup_code = p_workorder_rec.status_code;
1185: */
1186:
1187: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_OP_WO_STATUS' );
1188: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
1189: FND_MSG_PUB.add;
1190: RETURN FND_API.G_RET_STS_ERROR;
1191: END IF;
1192:
1207: */
1208:
1209: IF ( p_operation_rec.plan_id IS NOT NULL AND
1210: p_operation_rec.collection_id IS NULL ) THEN
1211: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_NO_QA_RESULTS' );
1212: FND_MSG_PUB.add;
1213: RETURN FND_API.G_RET_STS_ERROR;
1214: END IF;
1215:
1284: );
1285:
1286: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1287: IF ( l_msg_data IS NOT NULL ) THEN
1288: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
1289: FND_MESSAGE.set_name( l_app_name, l_msg_name );
1290: FND_MSG_PUB.add;
1291: END IF;
1292: RETURN FND_API.G_RET_STS_ERROR;
1285:
1286: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
1287: IF ( l_msg_data IS NOT NULL ) THEN
1288: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
1289: FND_MESSAGE.set_name( l_app_name, l_msg_name );
1290: FND_MSG_PUB.add;
1291: END IF;
1292: RETURN FND_API.G_RET_STS_ERROR;
1293: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1290: FND_MSG_PUB.add;
1291: END IF;
1292: RETURN FND_API.G_RET_STS_ERROR;
1293: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
1294: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EAM_WO_OP_CMPL_ERROR' );
1295: FND_MSG_PUB.add;
1296: RETURN FND_API.G_RET_STS_ERROR;
1297: END IF;
1298:
1364: WHERE workorder_operation_id = p_operation_rec.workorder_operation_id
1365: AND object_version_number = p_operation_rec.object_version_number;
1366:
1367: IF ( SQL%ROWCOUNT = 0 ) THEN
1368: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_OP_NOT_FOUND' );
1369: FND_MSG_PUB.add;
1370: RETURN FND_API.G_RET_STS_ERROR;
1371: END IF;
1372:
1414: END LOOP;
1415:
1416: /*
1417: IF ( x_operation_tbl.COUNT = 0 ) THEN
1418: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NO_WO_OPERATIONS' );
1419: FND_MSG_PUB.add;
1420: RETURN FND_API.G_RET_STS_ERROR;
1421: END IF;
1422: */
1465: -- bug no 3942950
1466:
1467: /*IF ( p_workorder_rec.plan_id IS NOT NULL AND
1468: p_workorder_rec.collection_id IS NULL ) THEN
1469: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_NO_QA_RESULTS' );
1470: FND_MSG_PUB.add;
1471: RETURN FND_API.G_RET_STS_ERROR;
1472: END IF;
1473: */
1525: -- ACL Changes
1526: IF p_check_unit = FND_API.G_TRUE THEN
1527: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_rec.workorder_id, NULL, NULL, NULL);
1528: IF l_return_status = FND_API.G_TRUE THEN
1529: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_WO_COMP_UNTLCKD');
1530: FND_MESSAGE.Set_Token('WO_NAME', p_workorder_rec.workorder_name);
1531: FND_MSG_PUB.ADD;
1532: RETURN FND_API.G_RET_STS_ERROR;
1533: END IF;
1526: IF p_check_unit = FND_API.G_TRUE THEN
1527: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_rec.workorder_id, NULL, NULL, NULL);
1528: IF l_return_status = FND_API.G_TRUE THEN
1529: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_WO_COMP_UNTLCKD');
1530: FND_MESSAGE.Set_Token('WO_NAME', p_workorder_rec.workorder_name);
1531: FND_MSG_PUB.ADD;
1532: RETURN FND_API.G_RET_STS_ERROR;
1533: END IF;
1534: END IF;
1546: -- this validation is not required for deferral
1547: -- bug no 3942950
1548: IF ( p_workorder_rec.plan_id IS NOT NULL AND
1549: p_workorder_rec.collection_id IS NULL ) THEN
1550: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_NO_QA_RESULTS' );
1551: FND_MSG_PUB.add;
1552: RETURN FND_API.G_RET_STS_ERROR;
1553: END IF;
1554:
1566: FROM fnd_lookup_values_vl
1567: WHERE lookup_type = 'AHL_JOB_STATUS'
1568: AND lookup_code = p_workorder_rec.status_code;
1569: */
1570: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_WO_STATUS' );
1571: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
1572: FND_MSG_PUB.add;
1573: RETURN FND_API.G_RET_STS_ERROR;
1574: END IF;
1567: WHERE lookup_type = 'AHL_JOB_STATUS'
1568: AND lookup_code = p_workorder_rec.status_code;
1569: */
1570: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_WO_STATUS' );
1571: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
1572: FND_MSG_PUB.add;
1573: RETURN FND_API.G_RET_STS_ERROR;
1574: END IF;
1575:
1576: IF ( p_operation_tbl.COUNT > 0 ) THEN
1577: FOR i IN 1..p_operation_tbl.COUNT LOOP
1578: IF (NVL(p_validate_date, FND_API.G_TRUE) = FND_API.G_TRUE) THEN
1579: IF ( p_workorder_rec.actual_start_date > p_operation_tbl(i).actual_start_date ) THEN
1580: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_OP_ST_DT' );
1581: FND_MSG_PUB.add;
1582: RETURN FND_API.G_RET_STS_ERROR;
1583: END IF;
1584:
1582: RETURN FND_API.G_RET_STS_ERROR;
1583: END IF;
1584:
1585: IF ( p_workorder_rec.actual_end_date < p_operation_tbl(i).actual_end_date ) THEN
1586: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_OP_END_DT' );
1587: FND_MSG_PUB.add;
1588: RETURN FND_API.G_RET_STS_ERROR;
1589: END IF;
1590: END IF;
1589: END IF;
1590: END IF;
1591:
1592: IF ( p_operation_tbl(i).status_code <> G_OP_STATUS_COMPLETE ) THEN
1593: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_WO_OP_STATUS' );
1594: FND_MSG_PUB.add;
1595: RETURN FND_API.G_RET_STS_ERROR;
1596: END IF;
1597:
1613: IF ( parent_csr.status_code <> G_JOB_STATUS_COMPLETE AND
1614: parent_csr.status_code <> G_JOB_STATUS_COMPLETE_NC AND
1615: parent_csr.status_code <> G_JOB_STATUS_CLOSED AND
1616: parent_csr.status_code <> G_JOB_STATUS_CANCELLED ) THEN
1617: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_PRIOR_WO_NOT_COMPLETE' );
1618: FND_MESSAGE.set_token( 'WO_NAME', parent_csr.workorder_name );
1619: FND_MSG_PUB.add;
1620: RETURN FND_API.G_RET_STS_ERROR;
1621: END IF;
1614: parent_csr.status_code <> G_JOB_STATUS_COMPLETE_NC AND
1615: parent_csr.status_code <> G_JOB_STATUS_CLOSED AND
1616: parent_csr.status_code <> G_JOB_STATUS_CANCELLED ) THEN
1617: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_PRIOR_WO_NOT_COMPLETE' );
1618: FND_MESSAGE.set_token( 'WO_NAME', parent_csr.workorder_name );
1619: FND_MSG_PUB.add;
1620: RETURN FND_API.G_RET_STS_ERROR;
1621: END IF;
1622: END LOOP;
1638: --rroy
1639: -- ACL Changes
1640: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(p_workorder_rec.workorder_id, NULL, NULL, NULL);
1641: IF l_return_status = FND_API.G_TRUE THEN
1642: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_WO_DEFF_UNTLCKD');
1643: FND_MSG_PUB.ADD;
1644: RETURN FND_API.G_RET_STS_ERROR;
1645: END IF;
1646: --rroy
1668: FROM fnd_lookup_values_vl
1669: WHERE lookup_type = 'AHL_JOB_STATUS'
1670: AND lookup_code = p_workorder_rec.status_code;
1671: */
1672: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_WO_STATUS' );
1673: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
1674: FND_MSG_PUB.add;
1675: RETURN FND_API.G_RET_STS_ERROR;
1676: END IF;
1669: WHERE lookup_type = 'AHL_JOB_STATUS'
1670: AND lookup_code = p_workorder_rec.status_code;
1671: */
1672: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_WO_STATUS' );
1673: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
1674: FND_MSG_PUB.add;
1675: RETURN FND_API.G_RET_STS_ERROR;
1676: END IF;
1677:
1698: p_mr_rec.unit_effectivity_id IS NULL OR
1699: p_mr_rec.ue_object_version_no = FND_API.G_MISS_NUM OR
1700: p_mr_rec.ue_object_version_no IS NULL
1701: ) THEN
1702: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_CMRI_INPUTS' );
1703: FND_MSG_PUB.add;
1704: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
1705: END IF;
1706: RETURN FND_API.G_RET_STS_SUCCESS;
1835:
1836: BEGIN
1837:
1838: IF (p_mr_status_code <> G_MR_STATUS_JOBS_COMPLETE) THEN
1839: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
1840: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1841: FND_MESSAGE.set_token( 'STATUS', p_mr_status);
1842: FND_MSG_PUB.add;
1843: RETURN FND_API.G_RET_STS_ERROR;
1836: BEGIN
1837:
1838: IF (p_mr_status_code <> G_MR_STATUS_JOBS_COMPLETE) THEN
1839: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
1840: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1841: FND_MESSAGE.set_token( 'STATUS', p_mr_status);
1842: FND_MSG_PUB.add;
1843: RETURN FND_API.G_RET_STS_ERROR;
1844: END IF;
1837:
1838: IF (p_mr_status_code <> G_MR_STATUS_JOBS_COMPLETE) THEN
1839: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
1840: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1841: FND_MESSAGE.set_token( 'STATUS', p_mr_status);
1842: FND_MSG_PUB.add;
1843: RETURN FND_API.G_RET_STS_ERROR;
1844: END IF;
1845:
1864: BEGIN
1865:
1866: -- Validate Status
1867: IF p_status_code = G_MR_STATUS_DEFERRAL_PENDING THEN
1868: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
1869: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title );
1870: FND_MESSAGE.set_token( 'STATUS', NVL( p_status, p_status_code ) );
1871: FND_MSG_PUB.add;
1872: END IF;
1865:
1866: -- Validate Status
1867: IF p_status_code = G_MR_STATUS_DEFERRAL_PENDING THEN
1868: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
1869: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title );
1870: FND_MESSAGE.set_token( 'STATUS', NVL( p_status, p_status_code ) );
1871: FND_MSG_PUB.add;
1872: END IF;
1873:
1866: -- Validate Status
1867: IF p_status_code = G_MR_STATUS_DEFERRAL_PENDING THEN
1868: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
1869: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title );
1870: FND_MESSAGE.set_token( 'STATUS', NVL( p_status, p_status_code ) );
1871: FND_MSG_PUB.add;
1872: END IF;
1873:
1874: -- Check if inspection type is not null then plan id is also not null
1881: AND p_status_code <> G_MR_STATUS_TERMINATED
1882: AND p_status_code <> G_MR_STATUS_CANCELLED
1883: ) THEN
1884: IF (p_qa_plan_id IS NULL) THEN
1885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_QA_PLAN_ID_NULL' );
1886: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1887: FND_MESSAGE.set_token( 'INSP_TYPE', p_qa_inspection_type );
1888: FND_MSG_PUB.add;
1889: RETURN FND_API.G_RET_STS_ERROR;
1882: AND p_status_code <> G_MR_STATUS_CANCELLED
1883: ) THEN
1884: IF (p_qa_plan_id IS NULL) THEN
1885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_QA_PLAN_ID_NULL' );
1886: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1887: FND_MESSAGE.set_token( 'INSP_TYPE', p_qa_inspection_type );
1888: FND_MSG_PUB.add;
1889: RETURN FND_API.G_RET_STS_ERROR;
1890: END IF;
1883: ) THEN
1884: IF (p_qa_plan_id IS NULL) THEN
1885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_QA_PLAN_ID_NULL' );
1886: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1887: FND_MESSAGE.set_token( 'INSP_TYPE', p_qa_inspection_type );
1888: FND_MSG_PUB.add;
1889: RETURN FND_API.G_RET_STS_ERROR;
1890: END IF;
1891: END IF;
1898: AND p_status_code <> G_MR_STATUS_TERMINATED
1899: AND p_status_code <> G_MR_STATUS_CANCELLED
1900: ) THEN
1901: IF (p_qa_collection_id IS NULL) THEN
1902: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_QA_COL_ID_NULL' );
1903: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1904: FND_MSG_PUB.add;
1905: RETURN FND_API.G_RET_STS_ERROR;
1906: END IF;
1899: AND p_status_code <> G_MR_STATUS_CANCELLED
1900: ) THEN
1901: IF (p_qa_collection_id IS NULL) THEN
1902: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_QA_COL_ID_NULL' );
1903: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_title);
1904: FND_MSG_PUB.add;
1905: RETURN FND_API.G_RET_STS_ERROR;
1906: END IF;
1907: END IF;
1962: mr_cursor.status_code <> G_MR_STATUS_DEFERRED AND
1963: mr_cursor.status_code <> G_MR_STATUS_TERMINATED AND
1964: mr_cursor.status_code <> G_MR_STATUS_CANCELLED
1965: ) THEN
1966: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CHILD_MRS_NOT_COMPL' );
1967: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_rec.mr_title);
1968: FND_MSG_PUB.add;
1969: RETURN FND_API.G_RET_STS_ERROR;
1970: END IF;
1963: mr_cursor.status_code <> G_MR_STATUS_TERMINATED AND
1964: mr_cursor.status_code <> G_MR_STATUS_CANCELLED
1965: ) THEN
1966: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CHILD_MRS_NOT_COMPL' );
1967: FND_MESSAGE.set_token( 'MAINT_REQ', p_mr_rec.mr_title);
1968: FND_MSG_PUB.add;
1969: RETURN FND_API.G_RET_STS_ERROR;
1970: END IF;
1971:
2111: END LOOP;
2112:
2113: /* Removed for Bug 3310304
2114: IF ( x_counter_tbl.COUNT < 1 ) THEN
2115: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NO_CTRS_FOR_MR' );
2116: FND_MSG_PUB.add;
2117: RETURN FND_API.G_RET_STS_ERROR;
2118: END IF;
2119: */
2309: IF (get_readings%NOTFOUND) THEN
2310:
2311: -- Bug # 6750836 -- start
2312: --x_counter_tbl( l_ctr_count ).counter_reading := 0;
2313: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CN_RESET_ERROR' );
2314: FND_MSG_PUB.add;
2315: RETURN FND_API.G_RET_STS_ERROR;
2316: -- Bug # 6750836 -- end
2317:
2421: x_msg_data => l_msg_data
2422: );
2423: EXCEPTION
2424: WHEN OTHERS THEN
2425: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CTR_RESET_API_ERROR' );
2426: FND_MSG_PUB.add;
2427: RETURN FND_API.G_RET_STS_ERROR;
2428: END;
2429:
2428: END;
2429:
2430: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2431: IF ( l_msg_data IS NULL ) THEN
2432: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CTR_RESET_API_ERROR' );
2433: FND_MSG_PUB.add;
2434: ELSE
2435: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
2436: FND_MESSAGE.set_name( l_app_name, l_msg_name );
2431: IF ( l_msg_data IS NULL ) THEN
2432: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CTR_RESET_API_ERROR' );
2433: FND_MSG_PUB.add;
2434: ELSE
2435: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
2436: FND_MESSAGE.set_name( l_app_name, l_msg_name );
2437: FND_MSG_PUB.add;
2438: END IF;
2439: RETURN FND_API.G_RET_STS_ERROR;
2432: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CTR_RESET_API_ERROR' );
2433: FND_MSG_PUB.add;
2434: ELSE
2435: FND_MESSAGE.parse_encoded( l_msg_data, l_app_name, l_msg_name );
2436: FND_MESSAGE.set_name( l_app_name, l_msg_name );
2437: FND_MSG_PUB.add;
2438: END IF;
2439: RETURN FND_API.G_RET_STS_ERROR;
2440: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
2437: FND_MSG_PUB.add;
2438: END IF;
2439: RETURN FND_API.G_RET_STS_ERROR;
2440: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
2441: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CTR_RESET_API_ERROR' );
2442: FND_MSG_PUB.add;
2443: RETURN FND_API.G_RET_STS_ERROR;
2444: END IF;
2445:
2504: );
2505:
2506: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
2507: IF ( l_msg_data IS NULL ) THEN
2508: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_UMP_API_ERROR' );
2509: FND_MSG_PUB.add;
2510: ELSE
2511: x_msg_count := l_msg_count;
2512: x_msg_data := l_msg_data;
2513: END IF;
2514: RETURN FND_API.G_RET_STS_ERROR;
2515: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
2516: IF ( l_msg_data IS NULL ) THEN
2517: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_UMP_API_ERROR' );
2518: FND_MSG_PUB.add;
2519: ELSE
2520: x_msg_count := l_msg_count;
2521: x_msg_data := l_msg_data;
2783: OPEN get_op_details(p_workorder_operation_id);
2784: FETCH get_op_details INTO l_workorder_id, l_operation_seq_num, l_actual_start_date, l_actual_end_date;
2785: IF get_op_details%NOTFOUND THEN
2786: CLOSE get_op_details;
2787: FND_MESSAGE.set_name('AHL', 'AHL_PRD_OP_DEF_ERROR');
2788: FND_MSG_PUB.add;
2789: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2790: END IF;
2791: CLOSE get_op_details;
2797: x_msg_count => l_msg_count,
2798: x_msg_data => l_msg_data,
2799: p_x_operation_tbl => l_operation_tbl);
2800: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2801: FND_MESSAGE.set_name('AHL', 'AHL_PRD_OP_DEF_ERROR');
2802: FND_MSG_PUB.add;
2803: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2804: END IF;
2805:
2811: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
2812: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
2813: WHERE WORKORDER_OPERATION_ID = p_workorder_operation_id;
2814: IF SQL%ROWCOUNT = 0 THEN
2815: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_DEF_ERROR' );
2816: FND_MSG_PUB.add;
2817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2818: END IF;
2819: END IF; -- IF l_actual_start_date IS NULL THEN
2824: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
2825: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
2826: WHERE WORKORDER_OPERATION_ID = p_workorder_operation_id;
2827: IF SQL%ROWCOUNT = 0 THEN
2828: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_DEF_ERROR' );
2829: FND_MSG_PUB.add;
2830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2831: END IF;
2832: END IF; -- IF l_actual_end_date IS NULL THEN
3206: OPEN get_wo_dates(p_workorder_id);
3207: FETCH get_wo_dates INTO l_actual_start_date, l_actual_end_date, l_wo_name;
3208: IF get_wo_dates%NOTFOUND THEN
3209: CLOSE get_wo_dates;
3210: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_DEF_ERROR' );
3211: -- Error defaulting the actual dates for workorder WO_NAME before completion.
3212: -- Do we raise an error for this or just ignore the error since this is defaulting code?
3213: -- Check during UTs
3214: FND_MSG_PUB.add;
3220: x_return_status => l_return_status,
3221: x_actual_start_date => l_def_actual_start_date,
3222: x_actual_end_date => l_def_actual_end_date);
3223: IF l_return_status <> FND_API. G_RET_STS_SUCCESS THEN
3224: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_DEF_ERROR' );
3225: FND_MSG_PUB.add;
3226: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3227: END IF;
3228: /* Start ER # 4757222 */
3271: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
3272: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
3273: WHERE WORKORDER_ID = p_workorder_id;
3274: IF SQL%ROWCOUNT = 0 THEN
3275: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_DEF_ERROR' );
3276: FND_MSG_PUB.add;
3277: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3278: END IF;
3279: END IF;-- IF l_actual_start_date IS NULL THEN
3286: LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
3287: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
3288: WHERE WORKORDER_ID = p_workorder_id;
3289: IF SQL%ROWCOUNT = 0 THEN
3290: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_DEF_ERROR' );
3291: FND_MSG_PUB.add;
3292: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3293: END IF;
3294: END IF; -- IF l_actual_end_date IS NULL THEN
4231: q_msg_data => l_msg_data
4232: );
4233:
4234: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
4235: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_QA_ACTION_ERROR' );
4236: FND_MESSAGE.set_token( 'MAINT_REQ', p_x_mr_rec.mr_title);
4237: FND_MSG_PUB.add;
4238: RAISE FND_API.G_EXC_ERROR;
4239: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
4232: );
4233:
4234: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
4235: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_QA_ACTION_ERROR' );
4236: FND_MESSAGE.set_token( 'MAINT_REQ', p_x_mr_rec.mr_title);
4237: FND_MSG_PUB.add;
4238: RAISE FND_API.G_EXC_ERROR;
4239: ELSIF ( l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
4240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4813: IF ( p_signoff_mr_rec.unit_effectivity_id = FND_API.G_MISS_NUM OR
4814: p_signoff_mr_rec.unit_effectivity_id IS NULL OR
4815: p_signoff_mr_rec.object_version_number = FND_API.G_MISS_NUM OR
4816: p_signoff_mr_rec.object_version_number IS NULL ) THEN
4817: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_SMRI_INPUTS' );
4818: FND_MSG_PUB.add;
4819: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4820: END IF;
4821:
4822: IF ( p_signoff_mr_rec.signoff_child_mrs_flag IS NULL OR
4823: p_signoff_mr_rec.signoff_child_mrs_flag = FND_API.G_MISS_CHAR OR
4824: ( p_signoff_mr_rec.signoff_child_mrs_flag <> 'Y' AND
4825: p_signoff_mr_rec.signoff_child_mrs_flag <> 'N' ) ) THEN
4826: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_SIGNOFF_CHILD_MR_FLAG' );
4827: FND_MSG_PUB.add;
4828: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4829: END IF;
4830:
4831: IF ( p_signoff_mr_rec.complete_job_ops_flag IS NULL OR
4832: p_signoff_mr_rec.complete_job_ops_flag = FND_API.G_MISS_CHAR OR
4833: ( p_signoff_mr_rec.complete_job_ops_flag <> 'Y' AND
4834: p_signoff_mr_rec.complete_job_ops_flag <> 'N' ) ) THEN
4835: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CMPL_JOB_OPS_FLAG' );
4836: FND_MSG_PUB.add;
4837: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4838: END IF;
4839:
4840: IF ( p_signoff_mr_rec.transact_resource_flag IS NULL OR
4841: p_signoff_mr_rec.transact_resource_flag = FND_API.G_MISS_CHAR OR
4842: ( p_signoff_mr_rec.transact_resource_flag <> 'Y' AND
4843: p_signoff_mr_rec.transact_resource_flag <> 'N' ) ) THEN
4844: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_TRANSACT_RES_FLAG' );
4845: FND_MSG_PUB.add;
4846: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4847: END IF;
4848:
4850: ( p_signoff_mr_rec.default_actual_dates_flag IS NULL OR
4851: p_signoff_mr_rec.default_actual_dates_flag = FND_API.G_MISS_CHAR OR
4852: ( p_signoff_mr_rec.default_actual_dates_flag <> 'Y' AND
4853: p_signoff_mr_rec.default_actual_dates_flag <> 'N' ) ) ) THEN
4854: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_DEFAULT_ACT_DTS_FLAG' );
4855: FND_MSG_PUB.add;
4856: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4857: END IF;
4858:
4860: ( p_signoff_mr_rec.employee_number IS NULL OR
4861: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) AND
4862: ( p_signoff_mr_rec.serial_number IS NULL OR
4863: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
4864: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_TRANSACT_RES_INPUTS' );
4865: FND_MSG_PUB.add;
4866: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4867: END IF;
4868:
4871: ( p_signoff_mr_rec.actual_start_date IS NULL OR
4872: p_signoff_mr_rec.actual_start_date = FND_API.G_MISS_DATE OR
4873: p_signoff_mr_rec.actual_end_date IS NULL OR
4874: p_signoff_mr_rec.actual_end_date = FND_API.G_MISS_DATE ) ) THEN
4875: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ACTUAL_DTS_MISSING' );
4876: FND_MSG_PUB.add;
4877: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4878: END IF;
4879:
4879:
4880: IF ( p_signoff_mr_rec.complete_job_ops_flag = 'Y' AND
4881: p_signoff_mr_rec.default_actual_dates_flag = 'N' AND
4882: p_signoff_mr_rec.actual_end_date < p_signoff_mr_rec.actual_start_date ) THEN
4883: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ST_DT_END_DT' );
4884: FND_MSG_PUB.add;
4885: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4886: END IF;
4887:
4887:
4888: IF ( p_signoff_mr_rec.complete_job_ops_flag = 'Y' AND
4889: p_signoff_mr_rec.default_actual_dates_flag = 'N' AND
4890: p_signoff_mr_rec.actual_end_date > SYSDATE ) THEN
4891: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_END_DT_SYSDATE' );
4892: FND_MSG_PUB.add;
4893: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4894: END IF;
4895:
4934: IF ( p_close_visit_rec.visit_id = FND_API.G_MISS_NUM OR
4935: p_close_visit_rec.visit_id IS NULL OR
4936: p_close_visit_rec.object_version_number = FND_API.G_MISS_NUM OR
4937: p_close_visit_rec.object_version_number IS NULL ) THEN
4938: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_CV_INPUTS' );
4939: FND_MSG_PUB.add;
4940: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4941: END IF;
4942:
4947: IF l_return_status = FND_API.G_TRUE THEN
4948: OPEN get_ue_title(wo_details.workorder_id);
4949: FETCH get_ue_title INTO l_ue_title;
4950: CLOSE get_ue_title;
4951: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_CV_UNTLCKD');
4952: FND_MESSAGE.Set_Token('MR_TITLE', l_ue_title);
4953: FND_MSG_PUB.ADD;
4954: RETURN FND_API.G_RET_STS_ERROR;
4955: END IF;
4948: OPEN get_ue_title(wo_details.workorder_id);
4949: FETCH get_ue_title INTO l_ue_title;
4950: CLOSE get_ue_title;
4951: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_CV_UNTLCKD');
4952: FND_MESSAGE.Set_Token('MR_TITLE', l_ue_title);
4953: FND_MSG_PUB.ADD;
4954: RETURN FND_API.G_RET_STS_ERROR;
4955: END IF;
4956: END LOOP;
4961: IF ( p_close_visit_rec.signoff_mrs_flag IS NULL OR
4962: p_close_visit_rec.signoff_mrs_flag = FND_API.G_MISS_CHAR OR
4963: ( p_close_visit_rec.signoff_mrs_flag <> 'Y' AND
4964: p_close_visit_rec.signoff_mrs_flag <> 'N' ) ) THEN
4965: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_SIGNOFF_CHILD_MR_FLAG' );
4966: FND_MSG_PUB.add;
4967: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4968: END IF;
4969:
4970: IF ( p_close_visit_rec.complete_job_ops_flag IS NULL OR
4971: p_close_visit_rec.complete_job_ops_flag = FND_API.G_MISS_CHAR OR
4972: ( p_close_visit_rec.complete_job_ops_flag <> 'Y' AND
4973: p_close_visit_rec.complete_job_ops_flag <> 'N' ) ) THEN
4974: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CMPL_JOB_OPS_FLAG' );
4975: FND_MSG_PUB.add;
4976: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4977: END IF;
4978:
4979: IF ( p_close_visit_rec.transact_resource_flag IS NULL OR
4980: p_close_visit_rec.transact_resource_flag = FND_API.G_MISS_CHAR OR
4981: ( p_close_visit_rec.transact_resource_flag <> 'Y' AND
4982: p_close_visit_rec.transact_resource_flag <> 'N' ) ) THEN
4983: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_TRANSACT_RES_FLAG' );
4984: FND_MSG_PUB.add;
4985: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4986: END IF;
4987:
4989: ( p_close_visit_rec.default_actual_dates_flag IS NULL OR
4990: p_close_visit_rec.default_actual_dates_flag = FND_API.G_MISS_CHAR OR
4991: ( p_close_visit_rec.default_actual_dates_flag <> 'Y' AND
4992: p_close_visit_rec.default_actual_dates_flag <> 'N' ) ) ) THEN
4993: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_DEFAULT_ACT_DTS_FLAG' );
4994: FND_MSG_PUB.add;
4995: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
4996: END IF;
4997:
4999: ( p_close_visit_rec.employee_number IS NULL OR
5000: p_close_visit_rec.employee_number = FND_API.G_MISS_CHAR ) AND
5001: ( p_close_visit_rec.serial_number IS NULL OR
5002: p_close_visit_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
5003: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_TRANSACT_RES_INPUTS' );
5004: FND_MSG_PUB.add;
5005: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
5006: END IF;
5007:
5010: ( p_close_visit_rec.actual_start_date IS NULL OR
5011: p_close_visit_rec.actual_start_date = FND_API.G_MISS_DATE OR
5012: p_close_visit_rec.actual_end_date IS NULL OR
5013: p_close_visit_rec.actual_end_date = FND_API.G_MISS_DATE ) ) THEN
5014: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ACTUAL_DTS_MISSING' );
5015: FND_MSG_PUB.add;
5016: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
5017: END IF;
5018:
5018:
5019: IF ( p_close_visit_rec.complete_job_ops_flag = 'Y' AND
5020: p_close_visit_rec.default_actual_dates_flag = 'N' AND
5021: p_close_visit_rec.actual_end_date < p_close_visit_rec.actual_start_date ) THEN
5022: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_ST_DT_END_DT' );
5023: FND_MSG_PUB.add;
5024: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
5025: END IF;
5026:
5026:
5027: IF ( p_close_visit_rec.complete_job_ops_flag = 'Y' AND
5028: p_close_visit_rec.default_actual_dates_flag = 'N' AND
5029: p_close_visit_rec.actual_end_date > SYSDATE ) THEN
5030: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_END_DT_SYSDATE' );
5031: FND_MSG_PUB.add;
5032: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
5033: END IF;
5034:
5137: -- Ensure that the actual start date entered is less than the Master Wo
5138: /*Start ER # 4757222
5139: IF ( p_actual_start_date IS NOT NULL AND
5140: l_workorder_tbl(l_ctr).actual_start_date < p_actual_start_date ) THEN
5141: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
5142: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
5143: FND_MESSAGE.set_token( 'START_DT',
5144: TO_CHAR( l_workorder_tbl(l_ctr).actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
5145: FND_MSG_PUB.add;
5138: /*Start ER # 4757222
5139: IF ( p_actual_start_date IS NOT NULL AND
5140: l_workorder_tbl(l_ctr).actual_start_date < p_actual_start_date ) THEN
5141: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
5142: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
5143: FND_MESSAGE.set_token( 'START_DT',
5144: TO_CHAR( l_workorder_tbl(l_ctr).actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
5145: FND_MSG_PUB.add;
5146: RAISE FND_API.G_EXC_ERROR;
5139: IF ( p_actual_start_date IS NOT NULL AND
5140: l_workorder_tbl(l_ctr).actual_start_date < p_actual_start_date ) THEN
5141: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
5142: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
5143: FND_MESSAGE.set_token( 'START_DT',
5144: TO_CHAR( l_workorder_tbl(l_ctr).actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
5145: FND_MSG_PUB.add;
5146: RAISE FND_API.G_EXC_ERROR;
5147: END IF;
5148:
5149: -- Ensure the actual end date entered is greater than the Master Wo
5150: IF ( p_actual_end_date IS NOT NULL AND
5151: l_workorder_tbl(l_ctr).actual_end_date > p_actual_end_date ) THEN
5152: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
5153: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
5154: FND_MESSAGE.set_token( 'END_DT',
5155: TO_CHAR( l_workorder_tbl(l_ctr).actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
5156: FND_MSG_PUB.add;
5149: -- Ensure the actual end date entered is greater than the Master Wo
5150: IF ( p_actual_end_date IS NOT NULL AND
5151: l_workorder_tbl(l_ctr).actual_end_date > p_actual_end_date ) THEN
5152: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
5153: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
5154: FND_MESSAGE.set_token( 'END_DT',
5155: TO_CHAR( l_workorder_tbl(l_ctr).actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
5156: FND_MSG_PUB.add;
5157: RAISE FND_API.G_EXC_ERROR;
5150: IF ( p_actual_end_date IS NOT NULL AND
5151: l_workorder_tbl(l_ctr).actual_end_date > p_actual_end_date ) THEN
5152: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
5153: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
5154: FND_MESSAGE.set_token( 'END_DT',
5155: TO_CHAR( l_workorder_tbl(l_ctr).actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
5156: FND_MSG_PUB.add;
5157: RAISE FND_API.G_EXC_ERROR;
5158: END IF;
5176: WHERE workorder_id = wo_csr.workorder_id
5177: AND object_version_number = wo_csr.object_version_number;
5178:
5179: IF ( SQL%ROWCOUNT = 0 ) THEN
5180: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
5181: FND_MSG_PUB.add;
5182: RETURN FND_API.G_RET_STS_ERROR;
5183: END IF;
5184: EXCEPTION
5182: RETURN FND_API.G_RET_STS_ERROR;
5183: END IF;
5184: EXCEPTION
5185: WHEN OTHERS THEN
5186: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
5187: FND_MSG_PUB.add;
5188: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
5189: END;
5190:
5426: ELSE
5427:
5428: -- Error out since the Visit or the MR cannot be completed
5429: -- as the Parent is outside the Hierarchy
5430: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_PARENT_WO_NOT_CMPL' );
5431: FND_MESSAGE.set_token( 'WO', p_x_workorder_tbl(i).workorder_name );
5432: FND_MESSAGE.set_token( 'PARENT_WO', l_parent_wo_tbl(j).parent_wo_name );
5433: FND_MSG_PUB.add;
5434: RETURN FND_API.G_RET_STS_ERROR;
5427:
5428: -- Error out since the Visit or the MR cannot be completed
5429: -- as the Parent is outside the Hierarchy
5430: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_PARENT_WO_NOT_CMPL' );
5431: FND_MESSAGE.set_token( 'WO', p_x_workorder_tbl(i).workorder_name );
5432: FND_MESSAGE.set_token( 'PARENT_WO', l_parent_wo_tbl(j).parent_wo_name );
5433: FND_MSG_PUB.add;
5434: RETURN FND_API.G_RET_STS_ERROR;
5435: END IF; -- Hierarchy check
5428: -- Error out since the Visit or the MR cannot be completed
5429: -- as the Parent is outside the Hierarchy
5430: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_PARENT_WO_NOT_CMPL' );
5431: FND_MESSAGE.set_token( 'WO', p_x_workorder_tbl(i).workorder_name );
5432: FND_MESSAGE.set_token( 'PARENT_WO', l_parent_wo_tbl(j).parent_wo_name );
5433: FND_MSG_PUB.add;
5434: RETURN FND_API.G_RET_STS_ERROR;
5435: END IF; -- Hierarchy check
5436: END IF; -- First Iteration
6034: CLOSE get_qa_plan_id_csr2;
6035: END IF;
6036:
6037: IF ( get_ue_details%NOTFOUND ) THEN
6038: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_REC_NOT_FOUND' );
6039: FND_MSG_PUB.add;
6040: CLOSE get_ue_details;
6041: RAISE FND_API.G_EXC_ERROR;
6042: END IF;
6044: CLOSE get_ue_details;
6045:
6046: -- Validate Object Version Number
6047: IF ( l_mr_rec.ue_object_version_number <> p_signoff_mr_rec.object_version_number ) THEN
6048: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
6049: FND_MSG_PUB.add;
6050: RAISE FND_API.G_EXC_ERROR;
6051: END IF;
6052:
6051: END IF;
6052:
6053: -- Check if this MR is already signed off
6054: IF ( l_mr_rec.ue_status_code = G_MR_STATUS_SIGNED_OFF ) THEN
6055: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
6056: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title );
6057: -- replacing with call to get_status function
6058: -- so no exceptions are thrown if the
6059: -- lookup does not exist
6052:
6053: -- Check if this MR is already signed off
6054: IF ( l_mr_rec.ue_status_code = G_MR_STATUS_SIGNED_OFF ) THEN
6055: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
6056: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title );
6057: -- replacing with call to get_status function
6058: -- so no exceptions are thrown if the
6059: -- lookup does not exist
6060: l_status_meaning := get_status(l_mr_rec.ue_status_code,
6065: WHERE lookup_type = 'AHL_PRD_MR_STATUS'
6066: AND LOOKUP_CODE = l_mr_rec.ue_status_code;
6067: */
6068:
6069: FND_MESSAGE.set_token( 'STATUS', l_status_meaning );
6070: FND_MSG_PUB.add;
6071: END IF;
6072:
6073: -- Check if the UE is complete
6205: l_child_ue_tbl(l_ue_count).ump_status_code <> G_MR_STATUS_CANCELLED AND
6206: l_child_ue_tbl(l_ue_count).ump_status_code <> G_MR_STATUS_TERMINATED
6207: )
6208: ) THEN
6209: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CHILD_MRS_NOT_COMPL' );
6210: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6211: FND_MSG_PUB.add;
6212: RAISE FND_API.G_EXC_ERROR;
6213: END IF;
6206: l_child_ue_tbl(l_ue_count).ump_status_code <> G_MR_STATUS_TERMINATED
6207: )
6208: ) THEN
6209: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_CHILD_MRS_NOT_COMPL' );
6210: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6211: FND_MSG_PUB.add;
6212: RAISE FND_API.G_EXC_ERROR;
6213: END IF;
6214: END IF;
6239:
6240: -- Validate if the actual start dates entered is less than any WO
6241: IF ( wo_csr.actual_start_date IS NOT NULL AND
6242: wo_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6243: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
6244: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6245: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( wo_csr.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
6246: FND_MSG_PUB.add;
6247: RAISE FND_API.G_EXC_ERROR;
6240: -- Validate if the actual start dates entered is less than any WO
6241: IF ( wo_csr.actual_start_date IS NOT NULL AND
6242: wo_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6243: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
6244: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6245: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( wo_csr.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
6246: FND_MSG_PUB.add;
6247: RAISE FND_API.G_EXC_ERROR;
6248: END IF;
6241: IF ( wo_csr.actual_start_date IS NOT NULL AND
6242: wo_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6243: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
6244: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6245: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( wo_csr.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
6246: FND_MSG_PUB.add;
6247: RAISE FND_API.G_EXC_ERROR;
6248: END IF;
6249:
6249:
6250: -- Validate if the actual end dates entered is greater than any WO
6251: IF ( wo_csr.actual_end_date IS NOT NULL AND
6252: wo_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6253: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
6254: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6255: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
6256: FND_MSG_PUB.add;
6257: RAISE FND_API.G_EXC_ERROR;
6250: -- Validate if the actual end dates entered is greater than any WO
6251: IF ( wo_csr.actual_end_date IS NOT NULL AND
6252: wo_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6253: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
6254: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6255: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
6256: FND_MSG_PUB.add;
6257: RAISE FND_API.G_EXC_ERROR;
6258: END IF;
6251: IF ( wo_csr.actual_end_date IS NOT NULL AND
6252: wo_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6253: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
6254: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6255: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
6256: FND_MSG_PUB.add;
6257: RAISE FND_API.G_EXC_ERROR;
6258: END IF;
6259:
6268: -- rroy
6269: -- ACL Changes
6270: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(wo_csr.workorder_id, NULL, NULL, NULL);
6271: IF l_return_status = FND_API.G_TRUE THEN
6272: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_SM_UNTLCKD');
6273: FND_MESSAGE.Set_Token('MR_TITLE', l_mr_rec.ue_title);
6274: FND_MSG_PUB.ADD;
6275: RAISE FND_API.G_EXC_ERROR;
6276: END IF;
6269: -- ACL Changes
6270: l_return_status := AHL_PRD_UTIL_PKG.Is_Unit_Locked(wo_csr.workorder_id, NULL, NULL, NULL);
6271: IF l_return_status = FND_API.G_TRUE THEN
6272: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_SM_UNTLCKD');
6273: FND_MESSAGE.Set_Token('MR_TITLE', l_mr_rec.ue_title);
6274: FND_MSG_PUB.ADD;
6275: RAISE FND_API.G_EXC_ERROR;
6276: END IF;
6277: --nsikka
6296: FROM fnd_lookup_values_vl
6297: WHERE lookup_type = 'AHL_JOB_STATUS'
6298: AND lookup_code = wo_csr.status_code;
6299: */
6300: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NOT_ALL_WOS_OPEN' );
6301: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6302: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
6303: FND_MSG_PUB.add;
6304: RAISE FND_API.G_EXC_ERROR;
6297: WHERE lookup_type = 'AHL_JOB_STATUS'
6298: AND lookup_code = wo_csr.status_code;
6299: */
6300: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NOT_ALL_WOS_OPEN' );
6301: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6302: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
6303: FND_MSG_PUB.add;
6304: RAISE FND_API.G_EXC_ERROR;
6305: END IF;
6298: AND lookup_code = wo_csr.status_code;
6299: */
6300: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NOT_ALL_WOS_OPEN' );
6301: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6302: FND_MESSAGE.set_token( 'STATUS', l_job_status_meaning );
6303: FND_MSG_PUB.add;
6304: RAISE FND_API.G_EXC_ERROR;
6305: END IF;
6306:
6306:
6307: -- Validate whether Quality Results are Submitted
6308: IF ( wo_csr.plan_id IS NOT NULL AND
6309: wo_csr.collection_id IS NULL ) THEN
6310: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
6311: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6312: FND_MSG_PUB.add;
6313: RAISE FND_API.G_EXC_ERROR;
6314: END IF;
6307: -- Validate whether Quality Results are Submitted
6308: IF ( wo_csr.plan_id IS NOT NULL AND
6309: wo_csr.collection_id IS NULL ) THEN
6310: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
6311: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6312: FND_MSG_PUB.add;
6313: RAISE FND_API.G_EXC_ERROR;
6314: END IF;
6315:
6417: wo_csr.status_code <> G_JOB_STATUS_COMPLETE_NC AND
6418: wo_csr.status_code <> G_JOB_STATUS_CLOSED AND
6419: wo_csr.status_code <> G_JOB_STATUS_CANCELLED AND
6420: wo_csr.master_workorder_flag = 'N') THEN
6421: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_NOT_CMPL' );
6422: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6423: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6424: FND_MSG_PUB.add;
6425: RAISE FND_API.G_EXC_ERROR;
6418: wo_csr.status_code <> G_JOB_STATUS_CLOSED AND
6419: wo_csr.status_code <> G_JOB_STATUS_CANCELLED AND
6420: wo_csr.master_workorder_flag = 'N') THEN
6421: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_NOT_CMPL' );
6422: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6423: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6424: FND_MSG_PUB.add;
6425: RAISE FND_API.G_EXC_ERROR;
6426: END IF;
6419: wo_csr.status_code <> G_JOB_STATUS_CANCELLED AND
6420: wo_csr.master_workorder_flag = 'N') THEN
6421: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_NOT_CMPL' );
6422: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6423: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
6424: FND_MSG_PUB.add;
6425: RAISE FND_API.G_EXC_ERROR;
6426: END IF;
6427: END IF; -- Check Complete Workorder Flag
6440:
6441: -- Validate Whether Quality Results are submitted for WO
6442: IF ( l_mr_rec.wo_plan_id IS NOT NULL AND
6443: l_mr_rec.wo_collection_id IS NULL ) THEN
6444: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
6445: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6446: FND_MSG_PUB.add;
6447: RAISE FND_API.G_EXC_ERROR;
6448: END IF;
6441: -- Validate Whether Quality Results are submitted for WO
6442: IF ( l_mr_rec.wo_plan_id IS NOT NULL AND
6443: l_mr_rec.wo_collection_id IS NULL ) THEN
6444: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
6445: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6446: FND_MSG_PUB.add;
6447: RAISE FND_API.G_EXC_ERROR;
6448: END IF;
6449:
6467:
6468: -- Validate if the actual start dates entered is less than any WO
6469: IF ( l_mr_rec.actual_start_date IS NOT NULL AND
6470: l_mr_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6471: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
6472: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6473: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_mr_rec.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
6474: FND_MSG_PUB.add;
6475: RAISE FND_API.G_EXC_ERROR;
6468: -- Validate if the actual start dates entered is less than any WO
6469: IF ( l_mr_rec.actual_start_date IS NOT NULL AND
6470: l_mr_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6471: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
6472: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6473: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_mr_rec.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
6474: FND_MSG_PUB.add;
6475: RAISE FND_API.G_EXC_ERROR;
6476: END IF;
6469: IF ( l_mr_rec.actual_start_date IS NOT NULL AND
6470: l_mr_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6471: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
6472: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6473: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_mr_rec.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
6474: FND_MSG_PUB.add;
6475: RAISE FND_API.G_EXC_ERROR;
6476: END IF;
6477:
6477:
6478: -- Validate if the actual end dates entered is greater than any WO
6479: IF ( l_mr_rec.actual_end_date IS NOT NULL AND
6480: l_mr_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6481: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
6482: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6483: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_mr_rec.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
6484: FND_MSG_PUB.add;
6485: RAISE FND_API.G_EXC_ERROR;
6478: -- Validate if the actual end dates entered is greater than any WO
6479: IF ( l_mr_rec.actual_end_date IS NOT NULL AND
6480: l_mr_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6481: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
6482: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6483: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_mr_rec.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
6484: FND_MSG_PUB.add;
6485: RAISE FND_API.G_EXC_ERROR;
6486: END IF;
6479: IF ( l_mr_rec.actual_end_date IS NOT NULL AND
6480: l_mr_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6481: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
6482: FND_MESSAGE.set_token( 'WO_NAME', l_mr_rec.workorder_name );
6483: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_mr_rec.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
6484: FND_MSG_PUB.add;
6485: RAISE FND_API.G_EXC_ERROR;
6486: END IF;
6487:
6561: -- Validate if Equipment is entered for Machine Type Resource
6562: IF ( res_csr.resource_type = 1 AND
6563: ( p_signoff_mr_rec.serial_number IS NULL OR
6564: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6565: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6566: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6567: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6568: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6569: FND_MSG_PUB.add;
6562: IF ( res_csr.resource_type = 1 AND
6563: ( p_signoff_mr_rec.serial_number IS NULL OR
6564: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6565: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6566: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6567: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6568: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6569: FND_MSG_PUB.add;
6570: RAISE FND_API.G_EXC_ERROR;
6563: ( p_signoff_mr_rec.serial_number IS NULL OR
6564: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6565: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6566: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6567: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6568: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6569: FND_MSG_PUB.add;
6570: RAISE FND_API.G_EXC_ERROR;
6571: END IF;
6564: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6565: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6566: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6567: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6568: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6569: FND_MSG_PUB.add;
6570: RAISE FND_API.G_EXC_ERROR;
6571: END IF;
6572:
6573: -- Validate if Technicain is entered for Person Type Resource
6574: IF ( res_csr.resource_type = 2 AND
6575: ( p_signoff_mr_rec.employee_number IS NULL OR
6576: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6577: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6578: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6579: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6580: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6581: FND_MSG_PUB.add;
6574: IF ( res_csr.resource_type = 2 AND
6575: ( p_signoff_mr_rec.employee_number IS NULL OR
6576: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6577: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6578: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6579: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6580: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6581: FND_MSG_PUB.add;
6582: RAISE FND_API.G_EXC_ERROR;
6575: ( p_signoff_mr_rec.employee_number IS NULL OR
6576: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6577: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6578: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6579: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6580: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6581: FND_MSG_PUB.add;
6582: RAISE FND_API.G_EXC_ERROR;
6583: END IF;
6576: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6577: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6578: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
6579: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
6580: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
6581: FND_MSG_PUB.add;
6582: RAISE FND_API.G_EXC_ERROR;
6583: END IF;
6584:
6614: -- Validate if Equipment is entered for Machine Type Resource
6615: IF ( unass_res_csr.resource_type = 1 AND
6616: ( p_signoff_mr_rec.serial_number IS NULL OR
6617: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6618: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6619: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6620: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6621: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6622: FND_MSG_PUB.add;
6615: IF ( unass_res_csr.resource_type = 1 AND
6616: ( p_signoff_mr_rec.serial_number IS NULL OR
6617: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6618: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6619: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6620: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6621: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6622: FND_MSG_PUB.add;
6623: RAISE FND_API.G_EXC_ERROR;
6616: ( p_signoff_mr_rec.serial_number IS NULL OR
6617: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6618: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6619: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6620: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6621: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6622: FND_MSG_PUB.add;
6623: RAISE FND_API.G_EXC_ERROR;
6624: END IF;
6617: p_signoff_mr_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
6618: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
6619: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6620: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6621: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6622: FND_MSG_PUB.add;
6623: RAISE FND_API.G_EXC_ERROR;
6624: END IF;
6625:
6626: -- Validate if Technicain is entered for Person Type Resource
6627: IF ( unass_res_csr.resource_type = 2 AND
6628: ( p_signoff_mr_rec.employee_number IS NULL OR
6629: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6630: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6631: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6632: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6633: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6634: FND_MSG_PUB.add;
6627: IF ( unass_res_csr.resource_type = 2 AND
6628: ( p_signoff_mr_rec.employee_number IS NULL OR
6629: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6630: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6631: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6632: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6633: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6634: FND_MSG_PUB.add;
6635: RAISE FND_API.G_EXC_ERROR;
6628: ( p_signoff_mr_rec.employee_number IS NULL OR
6629: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6630: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6631: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6632: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6633: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6634: FND_MSG_PUB.add;
6635: RAISE FND_API.G_EXC_ERROR;
6636: END IF;
6629: p_signoff_mr_rec.employee_number = FND_API.G_MISS_CHAR ) ) THEN
6630: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
6631: FND_MESSAGE.set_token( 'WO_NAME', unass_res_csr.workorder_name );
6632: FND_MESSAGE.set_token( 'OP_SEQ', unass_res_csr.operation_seq_num );
6633: FND_MESSAGE.set_token( 'RES_SEQ', unass_res_csr.resource_seq_num );
6634: FND_MSG_PUB.add;
6635: RAISE FND_API.G_EXC_ERROR;
6636: END IF;
6637:
6681: AND employee_num = p_signoff_mr_rec.employee_number
6682: AND rownum = 1;
6683: EXCEPTION
6684: WHEN no_data_found THEN
6685: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
6686: FND_MESSAGE.set_token( 'EMP_NUM', p_signoff_mr_rec.employee_number );
6687: FND_MSG_PUB.add;
6688: RAISE FND_API.G_EXC_ERROR;
6689: END;
6682: AND rownum = 1;
6683: EXCEPTION
6684: WHEN no_data_found THEN
6685: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
6686: FND_MESSAGE.set_token( 'EMP_NUM', p_signoff_mr_rec.employee_number );
6687: FND_MSG_PUB.add;
6688: RAISE FND_API.G_EXC_ERROR;
6689: END;
6690:
6688: RAISE FND_API.G_EXC_ERROR;
6689: END;
6690:
6691: /*IF ( SQL%NOTFOUND ) THEN
6692: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
6693: FND_MESSAGE.set_token( 'EMP_NUM', p_signoff_mr_rec.employee_number );
6694: FND_MSG_PUB.add;
6695: RAISE FND_API.G_EXC_ERROR;
6696: END IF;*/
6689: END;
6690:
6691: /*IF ( SQL%NOTFOUND ) THEN
6692: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
6693: FND_MESSAGE.set_token( 'EMP_NUM', p_signoff_mr_rec.employee_number );
6694: FND_MSG_PUB.add;
6695: RAISE FND_API.G_EXC_ERROR;
6696: END IF;*/
6697:
6870:
6871: -- Validate if the actual start dates entered is less than any WO Op
6872: IF ( op_csr.actual_start_date IS NOT NULL AND
6873: op_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6874: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
6875: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6876: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6877: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
6878: FND_MSG_PUB.add;
6871: -- Validate if the actual start dates entered is less than any WO Op
6872: IF ( op_csr.actual_start_date IS NOT NULL AND
6873: op_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6874: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
6875: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6876: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6877: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
6878: FND_MSG_PUB.add;
6879: RAISE FND_API.G_EXC_ERROR;
6872: IF ( op_csr.actual_start_date IS NOT NULL AND
6873: op_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6874: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
6875: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6876: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6877: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
6878: FND_MSG_PUB.add;
6879: RAISE FND_API.G_EXC_ERROR;
6880: END IF;
6873: op_csr.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
6874: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
6875: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6876: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6877: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
6878: FND_MSG_PUB.add;
6879: RAISE FND_API.G_EXC_ERROR;
6880: END IF;
6881:
6881:
6882: -- Validate if the actual end dates entered is greater than any WO Op
6883: IF ( op_csr.actual_end_date IS NOT NULL AND
6884: op_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
6886: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6887: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6888: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
6889: FND_MSG_PUB.add;
6882: -- Validate if the actual end dates entered is greater than any WO Op
6883: IF ( op_csr.actual_end_date IS NOT NULL AND
6884: op_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
6886: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6887: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6888: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
6889: FND_MSG_PUB.add;
6890: RAISE FND_API.G_EXC_ERROR;
6883: IF ( op_csr.actual_end_date IS NOT NULL AND
6884: op_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
6886: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6887: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6888: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
6889: FND_MSG_PUB.add;
6890: RAISE FND_API.G_EXC_ERROR;
6891: END IF;
6884: op_csr.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
6885: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
6886: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6887: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6888: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
6889: FND_MSG_PUB.add;
6890: RAISE FND_API.G_EXC_ERROR;
6891: END IF;
6892:
6896:
6897: -- Validate whether Quality Results are Submitted
6898: IF ( op_csr.plan_id IS NOT NULL AND
6899: op_csr.collection_id IS NULL ) THEN
6900: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
6901: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6902: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6903: FND_MSG_PUB.add;
6904: RAISE FND_API.G_EXC_ERROR;
6897: -- Validate whether Quality Results are Submitted
6898: IF ( op_csr.plan_id IS NOT NULL AND
6899: op_csr.collection_id IS NULL ) THEN
6900: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
6901: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6902: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6903: FND_MSG_PUB.add;
6904: RAISE FND_API.G_EXC_ERROR;
6905: END IF;
6898: IF ( op_csr.plan_id IS NOT NULL AND
6899: op_csr.collection_id IS NULL ) THEN
6900: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
6901: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6902: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6903: FND_MSG_PUB.add;
6904: RAISE FND_API.G_EXC_ERROR;
6905: END IF;
6906:
6926:
6927: IF (l_def_actual_start_date IS NULL OR
6928: l_def_actual_end_date IS NULL )
6929: THEN
6930: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
6931: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6932: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6933: FND_MSG_PUB.add;
6934: RAISE FND_API.G_EXC_ERROR;
6927: IF (l_def_actual_start_date IS NULL OR
6928: l_def_actual_end_date IS NULL )
6929: THEN
6930: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
6931: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6932: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6933: FND_MSG_PUB.add;
6934: RAISE FND_API.G_EXC_ERROR;
6935: END IF;
6928: l_def_actual_end_date IS NULL )
6929: THEN
6930: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
6931: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6932: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6933: FND_MSG_PUB.add;
6934: RAISE FND_API.G_EXC_ERROR;
6935: END IF;
6936: END IF;
6989:
6990: -- Since Operations are not required to be completed
6991: -- Validate to ensure that the Workorder Ops are already completed
6992: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
6993: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
6994: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6995: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6996: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6997: FND_MSG_PUB.add;
6990: -- Since Operations are not required to be completed
6991: -- Validate to ensure that the Workorder Ops are already completed
6992: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
6993: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
6994: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6995: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6996: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6997: FND_MSG_PUB.add;
6998: RAISE FND_API.G_EXC_ERROR;
6991: -- Validate to ensure that the Workorder Ops are already completed
6992: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
6993: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
6994: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6995: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6996: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6997: FND_MSG_PUB.add;
6998: RAISE FND_API.G_EXC_ERROR;
6999: END IF;
6992: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
6993: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
6994: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
6995: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
6996: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
6997: FND_MSG_PUB.add;
6998: RAISE FND_API.G_EXC_ERROR;
6999: END IF;
7000: END IF; -- Check Complete Operations
7044:
7045: -- Validate if the actual start dates entered is less than any WO Op
7046: IF ( l_unassoc_ue_op_rec.actual_start_date IS NOT NULL AND
7047: l_unassoc_ue_op_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
7048: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
7049: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7050: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7051: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
7052: FND_MSG_PUB.add;
7045: -- Validate if the actual start dates entered is less than any WO Op
7046: IF ( l_unassoc_ue_op_rec.actual_start_date IS NOT NULL AND
7047: l_unassoc_ue_op_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
7048: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
7049: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7050: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7051: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
7052: FND_MSG_PUB.add;
7053: RAISE FND_API.G_EXC_ERROR;
7046: IF ( l_unassoc_ue_op_rec.actual_start_date IS NOT NULL AND
7047: l_unassoc_ue_op_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
7048: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
7049: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7050: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7051: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
7052: FND_MSG_PUB.add;
7053: RAISE FND_API.G_EXC_ERROR;
7054: END IF;
7047: l_unassoc_ue_op_rec.actual_start_date < p_signoff_mr_rec.actual_start_date ) THEN
7048: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
7049: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7050: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7051: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
7052: FND_MSG_PUB.add;
7053: RAISE FND_API.G_EXC_ERROR;
7054: END IF;
7055:
7055:
7056: -- Validate if the actual end dates entered is greater than any WO Op
7057: IF ( l_unassoc_ue_op_rec.actual_end_date IS NOT NULL AND
7058: l_unassoc_ue_op_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
7059: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
7060: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7061: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7062: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
7063: FND_MSG_PUB.add;
7056: -- Validate if the actual end dates entered is greater than any WO Op
7057: IF ( l_unassoc_ue_op_rec.actual_end_date IS NOT NULL AND
7058: l_unassoc_ue_op_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
7059: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
7060: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7061: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7062: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
7063: FND_MSG_PUB.add;
7064: RAISE FND_API.G_EXC_ERROR;
7057: IF ( l_unassoc_ue_op_rec.actual_end_date IS NOT NULL AND
7058: l_unassoc_ue_op_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
7059: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
7060: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7061: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7062: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
7063: FND_MSG_PUB.add;
7064: RAISE FND_API.G_EXC_ERROR;
7065: END IF;
7058: l_unassoc_ue_op_rec.actual_end_date > p_signoff_mr_rec.actual_end_date ) THEN
7059: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
7060: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7061: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7062: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_unassoc_ue_op_rec.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
7063: FND_MSG_PUB.add;
7064: RAISE FND_API.G_EXC_ERROR;
7065: END IF;
7066: END IF; */
7069:
7070: -- Validate whether Quality Results are Submitted
7071: IF ( l_unassoc_ue_op_rec.plan_id IS NOT NULL AND
7072: l_unassoc_ue_op_rec.collection_id IS NULL ) THEN
7073: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
7074: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7075: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7076: FND_MSG_PUB.add;
7077: RAISE FND_API.G_EXC_ERROR;
7070: -- Validate whether Quality Results are Submitted
7071: IF ( l_unassoc_ue_op_rec.plan_id IS NOT NULL AND
7072: l_unassoc_ue_op_rec.collection_id IS NULL ) THEN
7073: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
7074: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7075: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7076: FND_MSG_PUB.add;
7077: RAISE FND_API.G_EXC_ERROR;
7078: END IF;
7071: IF ( l_unassoc_ue_op_rec.plan_id IS NOT NULL AND
7072: l_unassoc_ue_op_rec.collection_id IS NULL ) THEN
7073: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
7074: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7075: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7076: FND_MSG_PUB.add;
7077: RAISE FND_API.G_EXC_ERROR;
7078: END IF;
7079:
7098: );
7099:
7100: IF (l_def_actual_start_date IS NULL OR l_def_actual_end_date IS NULL )
7101: THEN
7102: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
7103: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7104: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7105: FND_MSG_PUB.add;
7106: RAISE FND_API.G_EXC_ERROR;
7099:
7100: IF (l_def_actual_start_date IS NULL OR l_def_actual_end_date IS NULL )
7101: THEN
7102: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
7103: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7104: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7105: FND_MSG_PUB.add;
7106: RAISE FND_API.G_EXC_ERROR;
7107: END IF;
7100: IF (l_def_actual_start_date IS NULL OR l_def_actual_end_date IS NULL )
7101: THEN
7102: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
7103: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7104: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7105: FND_MSG_PUB.add;
7106: RAISE FND_API.G_EXC_ERROR;
7107: END IF;
7108: END IF;
7160:
7161: -- Since Operations are not required to be completed
7162: -- Validate to ensure that the Workorder Ops are already completed
7163: IF ( l_unassoc_ue_op_rec.status_code <> G_OP_STATUS_COMPLETE ) THEN
7164: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
7165: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
7166: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7167: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7168: FND_MSG_PUB.add;
7161: -- Since Operations are not required to be completed
7162: -- Validate to ensure that the Workorder Ops are already completed
7163: IF ( l_unassoc_ue_op_rec.status_code <> G_OP_STATUS_COMPLETE ) THEN
7164: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
7165: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
7166: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7167: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7168: FND_MSG_PUB.add;
7169: RAISE FND_API.G_EXC_ERROR;
7162: -- Validate to ensure that the Workorder Ops are already completed
7163: IF ( l_unassoc_ue_op_rec.status_code <> G_OP_STATUS_COMPLETE ) THEN
7164: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
7165: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
7166: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7167: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7168: FND_MSG_PUB.add;
7169: RAISE FND_API.G_EXC_ERROR;
7170: END IF;
7163: IF ( l_unassoc_ue_op_rec.status_code <> G_OP_STATUS_COMPLETE ) THEN
7164: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MR_WO_OP_NOT_CMPL' );
7165: FND_MESSAGE.set_token( 'MAINT_REQ', l_mr_rec.ue_title);
7166: FND_MESSAGE.set_token( 'WO_NAME', l_unassoc_ue_op_rec.workorder_name );
7167: FND_MESSAGE.set_token( 'OP_SEQ', l_unassoc_ue_op_rec.operation_seq_num );
7168: FND_MSG_PUB.add;
7169: RAISE FND_API.G_EXC_ERROR;
7170: END IF;
7171: END IF; -- complete_job_ops_flag
7200: WHERE workorder_operation_id = l_operation_tbl(i).workorder_operation_id
7201: AND object_version_number = l_operation_tbl(i).object_version_number;
7202:
7203: IF ( SQL%ROWCOUNT = 0 ) THEN
7204: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
7205: FND_MSG_PUB.add;
7206: RAISE FND_API.G_EXC_ERROR;
7207: END IF;
7208:
7287: OPEN get_wo_dates(l_workorder_tbl(i).workorder_id);
7288: FETCH get_wo_dates INTO l_wo_actual_start_date, l_wo_actual_end_date, l_wo_name;
7289: IF get_wo_dates%NOTFOUND THEN
7290: CLOSE get_wo_dates;
7291: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_DEF_ERROR' );
7292: -- Error defaulting the actual dates for workorder WO_NAME before completion.
7293: -- Do we raise an error for this or just ignore the error since this is defaulting code?
7294: -- Check during UTs
7295: FND_MSG_PUB.add;
7302: x_actual_start_date => l_def_actual_start_date,
7303: x_actual_end_date => l_def_actual_end_date
7304: );
7305: IF l_return_status <> FND_API. G_RET_STS_SUCCESS THEN
7306: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_DEF_ERROR' );
7307: FND_MSG_PUB.add;
7308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7309: END IF;
7310:
7318: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
7319: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
7320: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
7321: IF SQL%ROWCOUNT = 0 THEN
7322: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
7323: FND_MESSAGE.set_token('WO_NAME', l_wo_name);
7324: FND_MSG_PUB.add;
7325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7326: END IF;
7319: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
7320: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
7321: IF SQL%ROWCOUNT = 0 THEN
7322: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
7323: FND_MESSAGE.set_token('WO_NAME', l_wo_name);
7324: FND_MSG_PUB.add;
7325: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7326: END IF;
7327: l_workorder_tbl(i).object_version_number := l_workorder_tbl(i).object_version_number + 1;
7337: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
7338: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
7339: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
7340: IF SQL%ROWCOUNT = 0 THEN
7341: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
7342: FND_MESSAGE.set_token('WO_NAME', l_wo_name);
7343: FND_MSG_PUB.add;
7344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7345: END IF;
7338: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
7339: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
7340: IF SQL%ROWCOUNT = 0 THEN
7341: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
7342: FND_MESSAGE.set_token('WO_NAME', l_wo_name);
7343: FND_MSG_PUB.add;
7344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7345: END IF;
7346: l_workorder_tbl(i).object_version_number := l_workorder_tbl(i).object_version_number + 1;
7357: WHERE workorder_id = l_workorder_tbl(i).workorder_id
7358: AND object_version_number = l_workorder_tbl(i).object_version_number;
7359:
7360: IF ( SQL%ROWCOUNT = 0 ) THEN
7361: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
7362: FND_MSG_PUB.add;
7363: RAISE FND_API.G_EXC_ERROR;
7364: END IF;
7365:
7431: l_ue_status_code := get_mr_status( l_child_mr_tbl(i).unit_effectivity_id );
7432: IF ( l_ue_status_code <> G_MR_STATUS_SIGNED_OFF ) THEN
7433:
7434: IF ( l_ue_status_code <> G_MR_STATUS_JOBS_COMPLETE ) THEN
7435: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
7436: FND_MESSAGE.set_token( 'MAINT_REQ', l_child_mr_tbl(i).mr_title);
7437: -- replacing with call to get_status function
7438: -- so no exceptions are thrown if the
7439: -- lookup does not exist
7432: IF ( l_ue_status_code <> G_MR_STATUS_SIGNED_OFF ) THEN
7433:
7434: IF ( l_ue_status_code <> G_MR_STATUS_JOBS_COMPLETE ) THEN
7435: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
7436: FND_MESSAGE.set_token( 'MAINT_REQ', l_child_mr_tbl(i).mr_title);
7437: -- replacing with call to get_status function
7438: -- so no exceptions are thrown if the
7439: -- lookup does not exist
7440: l_status_meaning := get_status(l_ue_status_code,
7445: FROM fnd_lookup_values_vl
7446: WHERE lookup_type = 'AHL_PRD_MR_STATUS'
7447: AND LOOKUP_CODE = l_ue_status_code;
7448: */
7449: FND_MESSAGE.set_token( 'STATUS', l_status_meaning );
7450: FND_MSG_PUB.add;
7451: RAISE FND_API.G_EXC_ERROR;
7452: END IF;
7453:
8137: FETCH get_visit_details
8138: INTO l_visit_rec;
8139:
8140: IF ( get_visit_details%NOTFOUND ) THEN
8141: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_REC_NOT_FOUND' );
8142: FND_MSG_PUB.add;
8143: CLOSE get_visit_details;
8144: RAISE FND_API.G_EXC_ERROR;
8145: END IF;
8147: CLOSE get_visit_details;
8148:
8149: -- Validate Object Version Number
8150: IF ( l_visit_rec.object_version_number <> p_close_visit_rec.object_version_number ) THEN
8151: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
8152: FND_MSG_PUB.add;
8153: RAISE FND_API.G_EXC_ERROR;
8154: END IF;
8155:
8154: END IF;
8155:
8156: -- Validate the status of the Visit for Top-down Closure
8157: IF ( l_visit_rec.status_code <> G_VISIT_STATUS_RELEASED ) THEN
8158: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_CLOSE_STATUS');
8159: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8160: FND_MESSAGE.set_token( 'STATUS', l_visit_rec.status_code );
8161: FND_MSG_PUB.add;
8162: END IF;
8155:
8156: -- Validate the status of the Visit for Top-down Closure
8157: IF ( l_visit_rec.status_code <> G_VISIT_STATUS_RELEASED ) THEN
8158: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_CLOSE_STATUS');
8159: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8160: FND_MESSAGE.set_token( 'STATUS', l_visit_rec.status_code );
8161: FND_MSG_PUB.add;
8162: END IF;
8163:
8156: -- Validate the status of the Visit for Top-down Closure
8157: IF ( l_visit_rec.status_code <> G_VISIT_STATUS_RELEASED ) THEN
8158: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_CLOSE_STATUS');
8159: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8160: FND_MESSAGE.set_token( 'STATUS', l_visit_rec.status_code );
8161: FND_MSG_PUB.add;
8162: END IF;
8163:
8164: IF ( G_DEBUG = 'Y' ) THEN
8329: mr_csr.ump_status_code <> G_MR_STATUS_TERMINATED AND
8330: mr_csr.ump_status_code <> G_MR_STATUS_CANCELLED
8331: )
8332: ) THEN
8333: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_MRS_NOT_CMPL' );
8334: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8335: FND_MESSAGE.set_token( 'MAINT_REQ', mr_csr.title );
8336: FND_MSG_PUB.add;
8337: RAISE FND_API.G_EXC_ERROR;
8330: mr_csr.ump_status_code <> G_MR_STATUS_CANCELLED
8331: )
8332: ) THEN
8333: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_MRS_NOT_CMPL' );
8334: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8335: FND_MESSAGE.set_token( 'MAINT_REQ', mr_csr.title );
8336: FND_MSG_PUB.add;
8337: RAISE FND_API.G_EXC_ERROR;
8338: END IF;
8331: )
8332: ) THEN
8333: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_MRS_NOT_CMPL' );
8334: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8335: FND_MESSAGE.set_token( 'MAINT_REQ', mr_csr.title );
8336: FND_MSG_PUB.add;
8337: RAISE FND_API.G_EXC_ERROR;
8338: END IF;
8339: END IF;
8357:
8358: -- Ensure that the actual start date entered is less than any WO
8359: IF ( wo_csr.actual_start_date IS NOT NULL AND
8360: wo_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8361: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
8362: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8363: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( wo_csr.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
8364: FND_MSG_PUB.add;
8365: RAISE FND_API.G_EXC_ERROR;
8358: -- Ensure that the actual start date entered is less than any WO
8359: IF ( wo_csr.actual_start_date IS NOT NULL AND
8360: wo_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8361: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
8362: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8363: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( wo_csr.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
8364: FND_MSG_PUB.add;
8365: RAISE FND_API.G_EXC_ERROR;
8366: END IF;
8359: IF ( wo_csr.actual_start_date IS NOT NULL AND
8360: wo_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8361: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
8362: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8363: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( wo_csr.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
8364: FND_MSG_PUB.add;
8365: RAISE FND_API.G_EXC_ERROR;
8366: END IF;
8367:
8367:
8368: -- Ensure that the actual end date entered is greater than any WO
8369: IF ( wo_csr.actual_end_date IS NOT NULL AND
8370: wo_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8371: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8372: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8373: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8374: FND_MESSAGE.set_token( 'END_DT', wo_csr.actual_end_date );
8375: FND_MSG_PUB.add;
8368: -- Ensure that the actual end date entered is greater than any WO
8369: IF ( wo_csr.actual_end_date IS NOT NULL AND
8370: wo_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8371: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8372: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8373: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8374: FND_MESSAGE.set_token( 'END_DT', wo_csr.actual_end_date );
8375: FND_MSG_PUB.add;
8376: RAISE FND_API.G_EXC_ERROR;
8369: IF ( wo_csr.actual_end_date IS NOT NULL AND
8370: wo_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8371: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8372: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8373: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8374: FND_MESSAGE.set_token( 'END_DT', wo_csr.actual_end_date );
8375: FND_MSG_PUB.add;
8376: RAISE FND_API.G_EXC_ERROR;
8377: END IF;
8370: wo_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8371: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8372: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8373: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( wo_csr.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8374: FND_MESSAGE.set_token( 'END_DT', wo_csr.actual_end_date );
8375: FND_MSG_PUB.add;
8376: RAISE FND_API.G_EXC_ERROR;
8377: END IF;
8378: END IF;
8399: IF ( wo_csr.status_code = G_JOB_STATUS_UNRELEASED OR
8400: wo_csr.status_code = G_JOB_STATUS_ON_HOLD OR
8401: wo_csr.status_code = G_JOB_STATUS_PARTS_HOLD OR
8402: wo_csr.status_code = G_JOB_STATUS_DEFERRAL_PENDING ) THEN
8403: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NOT_ALL_WOS_OPEN' );
8404: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8405: FND_MESSAGE.set_token( 'STATUS', l_status_meaning );
8406: FND_MSG_PUB.add;
8407: RAISE FND_API.G_EXC_ERROR;
8400: wo_csr.status_code = G_JOB_STATUS_ON_HOLD OR
8401: wo_csr.status_code = G_JOB_STATUS_PARTS_HOLD OR
8402: wo_csr.status_code = G_JOB_STATUS_DEFERRAL_PENDING ) THEN
8403: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NOT_ALL_WOS_OPEN' );
8404: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8405: FND_MESSAGE.set_token( 'STATUS', l_status_meaning );
8406: FND_MSG_PUB.add;
8407: RAISE FND_API.G_EXC_ERROR;
8408: END IF;
8401: wo_csr.status_code = G_JOB_STATUS_PARTS_HOLD OR
8402: wo_csr.status_code = G_JOB_STATUS_DEFERRAL_PENDING ) THEN
8403: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_NOT_ALL_WOS_OPEN' );
8404: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8405: FND_MESSAGE.set_token( 'STATUS', l_status_meaning );
8406: FND_MSG_PUB.add;
8407: RAISE FND_API.G_EXC_ERROR;
8408: END IF;
8409:
8409:
8410: -- Validate whether Quality Results are Submitted
8411: IF ( wo_csr.plan_id IS NOT NULL AND
8412: wo_csr.collection_id IS NULL ) THEN
8413: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
8414: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8415: FND_MSG_PUB.add;
8416: RAISE FND_API.G_EXC_ERROR;
8417: END IF;
8410: -- Validate whether Quality Results are Submitted
8411: IF ( wo_csr.plan_id IS NOT NULL AND
8412: wo_csr.collection_id IS NULL ) THEN
8413: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
8414: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8415: FND_MSG_PUB.add;
8416: RAISE FND_API.G_EXC_ERROR;
8417: END IF;
8418:
8526: wo_csr.status_code <> G_JOB_STATUS_COMPLETE_NC AND
8527: wo_csr.status_code <> G_JOB_STATUS_CLOSED AND
8528: wo_csr.status_code <> G_JOB_STATUS_CANCELLED AND
8529: wo_csr.master_workorder_flag = 'N') THEN
8530: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_NOT_CMPL' );
8531: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8532: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8533: FND_MSG_PUB.add;
8534: RAISE FND_API.G_EXC_ERROR;
8527: wo_csr.status_code <> G_JOB_STATUS_CLOSED AND
8528: wo_csr.status_code <> G_JOB_STATUS_CANCELLED AND
8529: wo_csr.master_workorder_flag = 'N') THEN
8530: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_NOT_CMPL' );
8531: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8532: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8533: FND_MSG_PUB.add;
8534: RAISE FND_API.G_EXC_ERROR;
8535: END IF;
8528: wo_csr.status_code <> G_JOB_STATUS_CANCELLED AND
8529: wo_csr.master_workorder_flag = 'N') THEN
8530: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_NOT_CMPL' );
8531: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
8532: FND_MESSAGE.set_token( 'WO_NAME', wo_csr.workorder_name );
8533: FND_MSG_PUB.add;
8534: RAISE FND_API.G_EXC_ERROR;
8535: END IF;
8536: END IF;
8551:
8552: -- Validate Whether Quality Results are submitted for WO
8553: IF ( l_visit_rec.wo_plan_id IS NOT NULL AND
8554: l_visit_rec.wo_collection_id IS NULL ) THEN
8555: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
8556: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8557: FND_MSG_PUB.add;
8558: RAISE FND_API.G_EXC_ERROR;
8559: END IF;
8552: -- Validate Whether Quality Results are submitted for WO
8553: IF ( l_visit_rec.wo_plan_id IS NOT NULL AND
8554: l_visit_rec.wo_collection_id IS NULL ) THEN
8555: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_QA_PENDING' );
8556: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8557: FND_MSG_PUB.add;
8558: RAISE FND_API.G_EXC_ERROR;
8559: END IF;
8560:
8564: -- Validate if the actual start dates entered is less than any WO
8565:
8566: IF ( l_visit_rec.actual_start_date IS NOT NULL AND
8567: l_visit_rec.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8568: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
8569: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8570: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_visit_rec.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
8571: FND_MSG_PUB.add;
8572: RAISE FND_API.G_EXC_ERROR;
8565:
8566: IF ( l_visit_rec.actual_start_date IS NOT NULL AND
8567: l_visit_rec.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8568: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
8569: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8570: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_visit_rec.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
8571: FND_MSG_PUB.add;
8572: RAISE FND_API.G_EXC_ERROR;
8573: END IF;
8566: IF ( l_visit_rec.actual_start_date IS NOT NULL AND
8567: l_visit_rec.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8568: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_ST_DATE_LESS' );
8569: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8570: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( l_visit_rec.actual_start_date , 'DD-MON-YYYY HH24:MI' ) );
8571: FND_MSG_PUB.add;
8572: RAISE FND_API.G_EXC_ERROR;
8573: END IF;
8574:
8574:
8575: -- Validate if the actual end dates entered is greater than any WO
8576: IF ( l_visit_rec.actual_end_date IS NOT NULL AND
8577: l_visit_rec.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8578: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8579: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8580: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_visit_rec.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8581: FND_MSG_PUB.add;
8582: RAISE FND_API.G_EXC_ERROR;
8575: -- Validate if the actual end dates entered is greater than any WO
8576: IF ( l_visit_rec.actual_end_date IS NOT NULL AND
8577: l_visit_rec.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8578: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8579: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8580: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_visit_rec.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8581: FND_MSG_PUB.add;
8582: RAISE FND_API.G_EXC_ERROR;
8583: END IF;
8576: IF ( l_visit_rec.actual_end_date IS NOT NULL AND
8577: l_visit_rec.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8578: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_WO_ACT_END_DATE_GT' );
8579: FND_MESSAGE.set_token( 'WO_NAME', l_visit_rec.workorder_name );
8580: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( l_visit_rec.actual_end_date , 'DD-MON-YYYY HH24:MI' ) );
8581: FND_MSG_PUB.add;
8582: RAISE FND_API.G_EXC_ERROR;
8583: END IF;
8584: END IF;
8616: -- Check if Serial Number is entered for Machine Type Resource
8617: IF ( res_csr.resource_type = 1 AND
8618: ( p_close_visit_rec.serial_number IS NULL OR
8619: p_close_visit_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
8620: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
8621: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8622: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8623: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8624: FND_MSG_PUB.add;
8617: IF ( res_csr.resource_type = 1 AND
8618: ( p_close_visit_rec.serial_number IS NULL OR
8619: p_close_visit_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
8620: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
8621: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8622: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8623: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8624: FND_MSG_PUB.add;
8625: RAISE FND_API.G_EXC_ERROR;
8618: ( p_close_visit_rec.serial_number IS NULL OR
8619: p_close_visit_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
8620: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
8621: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8622: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8623: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8624: FND_MSG_PUB.add;
8625: RAISE FND_API.G_EXC_ERROR;
8626: END IF;
8619: p_close_visit_rec.serial_number = FND_API.G_MISS_CHAR ) ) THEN
8620: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_MACH_RES_REQD' );
8621: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8622: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8623: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8624: FND_MSG_PUB.add;
8625: RAISE FND_API.G_EXC_ERROR;
8626: END IF;
8627:
8628: -- Check if Employee Number is entered for Machine Type Resource
8629: IF ( res_csr.resource_type = 2 AND
8630: ( p_close_visit_rec.employee_number IS NULL OR
8631: p_close_visit_rec.employee_number = FND_API.G_MISS_NUM ) ) THEN
8632: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
8633: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8634: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8635: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8636: FND_MSG_PUB.add;
8629: IF ( res_csr.resource_type = 2 AND
8630: ( p_close_visit_rec.employee_number IS NULL OR
8631: p_close_visit_rec.employee_number = FND_API.G_MISS_NUM ) ) THEN
8632: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
8633: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8634: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8635: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8636: FND_MSG_PUB.add;
8637: RAISE FND_API.G_EXC_ERROR;
8630: ( p_close_visit_rec.employee_number IS NULL OR
8631: p_close_visit_rec.employee_number = FND_API.G_MISS_NUM ) ) THEN
8632: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
8633: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8634: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8635: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8636: FND_MSG_PUB.add;
8637: RAISE FND_API.G_EXC_ERROR;
8638: END IF;
8631: p_close_visit_rec.employee_number = FND_API.G_MISS_NUM ) ) THEN
8632: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMP_RES_REQD' );
8633: FND_MESSAGE.set_token( 'WO_NAME', res_csr.workorder_name );
8634: FND_MESSAGE.set_token( 'OP_SEQ', res_csr.operation_seq_num );
8635: FND_MESSAGE.set_token( 'RES_SEQ', res_csr.resource_seq_num );
8636: FND_MSG_PUB.add;
8637: RAISE FND_API.G_EXC_ERROR;
8638: END IF;
8639:
8668: AND rownum = 1;
8669:
8670:
8671: IF ( SQL%NOTFOUND ) THEN
8672: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
8673: FND_MESSAGE.set_token( 'EMP_NUM', p_close_visit_rec.employee_number );
8674: FND_MSG_PUB.add;
8675: RAISE FND_API.G_EXC_ERROR;
8676: END IF;
8669:
8670:
8671: IF ( SQL%NOTFOUND ) THEN
8672: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
8673: FND_MESSAGE.set_token( 'EMP_NUM', p_close_visit_rec.employee_number );
8674: FND_MSG_PUB.add;
8675: RAISE FND_API.G_EXC_ERROR;
8676: END IF;
8677: */
8686: AND rownum = 1;
8687:
8688: EXCEPTION
8689: WHEN no_data_found THEN
8690: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
8691: FND_MESSAGE.set_token( 'EMP_NUM', p_close_visit_rec.employee_number );
8692: FND_MSG_PUB.add;
8693: RAISE FND_API.G_EXC_ERROR;
8694: END;
8687:
8688: EXCEPTION
8689: WHEN no_data_found THEN
8690: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_EMPLOYEE_NOT_FOUND' );
8691: FND_MESSAGE.set_token( 'EMP_NUM', p_close_visit_rec.employee_number );
8692: FND_MSG_PUB.add;
8693: RAISE FND_API.G_EXC_ERROR;
8694: END;
8695:
8848:
8849: -- Validate if the actual start dates entered is less than any WO Op
8850: IF ( op_csr.actual_start_date IS NOT NULL AND
8851: op_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8852: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
8853: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8854: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8855: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
8856: FND_MSG_PUB.add;
8849: -- Validate if the actual start dates entered is less than any WO Op
8850: IF ( op_csr.actual_start_date IS NOT NULL AND
8851: op_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8852: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
8853: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8854: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8855: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
8856: FND_MSG_PUB.add;
8857: RAISE FND_API.G_EXC_ERROR;
8850: IF ( op_csr.actual_start_date IS NOT NULL AND
8851: op_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8852: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
8853: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8854: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8855: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
8856: FND_MSG_PUB.add;
8857: RAISE FND_API.G_EXC_ERROR;
8858: END IF;
8851: op_csr.actual_start_date < p_close_visit_rec.actual_start_date ) THEN
8852: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_ST_DATE_LESS' );
8853: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8854: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8855: FND_MESSAGE.set_token( 'START_DT', TO_CHAR( op_csr.actual_start_date, 'DD-MON-YYYY HH24:MI' ) );
8856: FND_MSG_PUB.add;
8857: RAISE FND_API.G_EXC_ERROR;
8858: END IF;
8859:
8859:
8860: -- Validate if the actual end dates entered is greater than any WO Op
8861: IF ( op_csr.actual_end_date IS NOT NULL AND
8862: op_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8863: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
8864: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8865: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8866: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
8867: FND_MSG_PUB.add;
8860: -- Validate if the actual end dates entered is greater than any WO Op
8861: IF ( op_csr.actual_end_date IS NOT NULL AND
8862: op_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8863: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
8864: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8865: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8866: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
8867: FND_MSG_PUB.add;
8868: RAISE FND_API.G_EXC_ERROR;
8861: IF ( op_csr.actual_end_date IS NOT NULL AND
8862: op_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8863: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
8864: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8865: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8866: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
8867: FND_MSG_PUB.add;
8868: RAISE FND_API.G_EXC_ERROR;
8869: END IF;
8862: op_csr.actual_end_date > p_close_visit_rec.actual_end_date ) THEN
8863: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_ACT_END_DATE_GT' );
8864: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8865: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8866: FND_MESSAGE.set_token( 'END_DT', TO_CHAR( op_csr.actual_end_date, 'DD-MON-YYYY HH24:MI' ) );
8867: FND_MSG_PUB.add;
8868: RAISE FND_API.G_EXC_ERROR;
8869: END IF;
8870:
8873: /*End ER # 4757222*/
8874: -- Validate whether Quality Results are Submitted
8875: IF ( op_csr.plan_id IS NOT NULL AND
8876: op_csr.collection_id IS NULL ) THEN
8877: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
8878: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8879: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8880: FND_MSG_PUB.add;
8881: RAISE FND_API.G_EXC_ERROR;
8874: -- Validate whether Quality Results are Submitted
8875: IF ( op_csr.plan_id IS NOT NULL AND
8876: op_csr.collection_id IS NULL ) THEN
8877: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
8878: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8879: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8880: FND_MSG_PUB.add;
8881: RAISE FND_API.G_EXC_ERROR;
8882: END IF;
8875: IF ( op_csr.plan_id IS NOT NULL AND
8876: op_csr.collection_id IS NULL ) THEN
8877: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_OP_QA_PENDING' );
8878: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8879: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8880: FND_MSG_PUB.add;
8881: RAISE FND_API.G_EXC_ERROR;
8882: END IF;
8883:
8900: );
8901:
8902: IF (l_def_actual_start_date IS NULL OR l_def_actual_end_date IS NULL )
8903: THEN
8904: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
8905: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8906: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8907: FND_MSG_PUB.add;
8908: RAISE FND_API.G_EXC_ERROR;
8901:
8902: IF (l_def_actual_start_date IS NULL OR l_def_actual_end_date IS NULL )
8903: THEN
8904: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
8905: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8906: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8907: FND_MSG_PUB.add;
8908: RAISE FND_API.G_EXC_ERROR;
8909: END IF;
8902: IF (l_def_actual_start_date IS NULL OR l_def_actual_end_date IS NULL )
8903: THEN
8904: FND_MESSAGE.set_name( 'AHL', 'AHL_OP_DEF_NO_RES_TXN' );
8905: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
8906: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
8907: FND_MSG_PUB.add;
8908: RAISE FND_API.G_EXC_ERROR;
8909: END IF;
8910: END IF;
9013: END IF;
9014: ELSE
9015: -- Validate to ensure that the Workorder Ops are already completed
9016: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
9017: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_OP_NOT_CMPL' );
9018: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
9019: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
9020: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
9021: FND_MSG_PUB.add;
9014: ELSE
9015: -- Validate to ensure that the Workorder Ops are already completed
9016: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
9017: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_OP_NOT_CMPL' );
9018: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
9019: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
9020: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
9021: FND_MSG_PUB.add;
9022: RAISE FND_API.G_EXC_ERROR;
9015: -- Validate to ensure that the Workorder Ops are already completed
9016: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
9017: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_OP_NOT_CMPL' );
9018: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
9019: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
9020: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
9021: FND_MSG_PUB.add;
9022: RAISE FND_API.G_EXC_ERROR;
9023: END IF;
9016: IF ( op_csr.status_code <> G_OP_STATUS_COMPLETE ) THEN
9017: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_VST_WO_OP_NOT_CMPL' );
9018: FND_MESSAGE.set_token( 'VISIT_NUM', l_visit_rec.visit_number );
9019: FND_MESSAGE.set_token( 'WO_NAME', op_csr.workorder_name );
9020: FND_MESSAGE.set_token( 'OP_SEQ', op_csr.operation_seq_num );
9021: FND_MSG_PUB.add;
9022: RAISE FND_API.G_EXC_ERROR;
9023: END IF;
9024: END IF;
9049: WHERE workorder_operation_id = l_operation_tbl(i).workorder_operation_id
9050: AND object_version_number = l_operation_tbl(i).object_version_number;
9051:
9052: IF ( SQL%ROWCOUNT = 0 ) THEN
9053: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
9054: FND_MSG_PUB.add;
9055: RAISE FND_API.G_EXC_ERROR;
9056: END IF;
9057:
9122: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
9123: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
9124: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
9125: IF SQL%ROWCOUNT = 0 THEN
9126: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
9127: FND_MESSAGE.set_token('WO_NAME', l_workorder_tbl(i).workorder_name);
9128: FND_MSG_PUB.add;
9129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9130: END IF;
9123: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
9124: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
9125: IF SQL%ROWCOUNT = 0 THEN
9126: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
9127: FND_MESSAGE.set_token('WO_NAME', l_workorder_tbl(i).workorder_name);
9128: FND_MSG_PUB.add;
9129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9130: END IF;
9131: l_workorder_tbl(i).object_version_number := l_workorder_tbl(i).object_version_number + 1;
9141: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
9142: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
9143: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
9144: IF SQL%ROWCOUNT = 0 THEN
9145: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
9146: FND_MESSAGE.set_token('WO_NAME', l_workorder_tbl(i).workorder_name);
9147: FND_MSG_PUB.add;
9148: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9149: END IF;
9142: WHERE WORKORDER_ID = l_workorder_tbl(i).workorder_id
9143: AND OBJECT_VERSION_NUMBER = l_workorder_tbl(i).object_version_number;
9144: IF SQL%ROWCOUNT = 0 THEN
9145: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
9146: FND_MESSAGE.set_token('WO_NAME', l_workorder_tbl(i).workorder_name);
9147: FND_MSG_PUB.add;
9148: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9149: END IF;
9150: l_workorder_tbl(i).object_version_number := l_workorder_tbl(i).object_version_number + 1;
9162: WHERE workorder_id = l_workorder_tbl(i).workorder_id
9163: AND object_version_number = l_workorder_tbl(i).object_version_number;
9164:
9165: IF ( SQL%ROWCOUNT = 0 ) THEN
9166: FND_MESSAGE.set_name( 'AHL', 'AHL_COM_RECORD_CHANGED' );
9167: FND_MSG_PUB.add;
9168: RAISE FND_API.G_EXC_ERROR;
9169: END IF;
9170:
9245:
9246: ) THEN
9247:
9248: IF ( l_ue_status_code <> G_MR_STATUS_JOBS_COMPLETE ) THEN
9249: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
9250: FND_MESSAGE.set_token( 'MAINT_REQ', l_child_mr_tbl(i).mr_title);
9251: -- to be changed
9252: -- write a global function later
9253: -- replacing with call to get_status function
9246: ) THEN
9247:
9248: IF ( l_ue_status_code <> G_MR_STATUS_JOBS_COMPLETE ) THEN
9249: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INV_SIGNOFF_STATUS');
9250: FND_MESSAGE.set_token( 'MAINT_REQ', l_child_mr_tbl(i).mr_title);
9251: -- to be changed
9252: -- write a global function later
9253: -- replacing with call to get_status function
9254: -- so no exceptions are thrown if the
9260: FROM fnd_lookup_values_vl
9261: WHERE lookup_type = 'AHL_PRD_MR_STATUS'
9262: AND LOOKUP_CODE = l_ue_status_code;
9263: */
9264: FND_MESSAGE.set_token( 'STATUS', l_status_meaning );
9265: FND_MSG_PUB.add;
9266: RAISE FND_API.G_EXC_ERROR;
9267: END IF;
9268: complete_mr_instance
9956: OPEN c_get_op_details(p_x_operation_tbl (i).workorder_id, p_x_operation_tbl (i).operation_sequence_num);
9957: FETCH c_get_op_details INTO l_workorder_operation_id, l_ovn, l_scheduled_start_date, l_scheduled_end_date, p_x_operation_tbl(i).actual_start_date, p_x_operation_tbl(i).actual_end_date;
9958: IF c_get_op_details%NOTFOUND THEN
9959: CLOSE c_get_op_details;
9960: FND_MESSAGE.set_name('AHL', 'AHL_PRD_WO_OP_NOT_FND');
9961: FND_MSG_PUB.add;
9962: x_return_status := FND_API.G_RET_STS_ERROR;
9963: RETURN;
9964: --RAISE FND_API.G_RET_STS_ERROR;
9968: OPEN c_get_wo_details(p_x_operation_tbl (i).workorder_id);
9969: FETCH c_get_wo_details INTO l_wip_entity_id;
9970: IF c_get_wo_details%NOTFOUND THEN
9971: CLOSE c_get_wo_details;
9972: FND_MESSAGE.set_name('AHL', 'AHL_PRD_WO_NOT_FND');
9973: FND_MSG_PUB.add;
9974: X_return_status := FND_API.G_RET_STS_ERROR;
9975: RETURN;
9976: --RAISE FND_API.G_RET_STS_ERROR;
10074: OPEN c_get_op_details(p_x_operation_tbl (i).workorder_id, p_x_operation_tbl (i).operation_sequence_num);
10075: FETCH c_get_op_details INTO p_x_operation_tbl(i).actual_start_date, p_x_operation_tbl(i).actual_end_date, p_x_operation_tbl(i).WORKORDER_OPERATION_ID;
10076: IF c_get_op_details%NOTFOUND THEN
10077: CLOSE c_get_op_details;
10078: FND_MESSAGE.set_name('AHL', 'AHL_PRD_WO_OP_NOT_FND');
10079: FND_MSG_PUB.add;
10080: x_return_status := FND_API.G_RET_STS_ERROR;
10081: RETURN;
10082: --RAISE FND_API.G_RET_STS_ERROR;
10281: l_workorder_id := p_workorder_id;
10282: ELSE
10283: -- All three input params are null
10284: -- throw an error
10285: FND_MESSAGE.set_name('AHL','AHL_PRD_WRONG_ARGUMENTS');
10286: FND_MESSAGE.set_token('PROC_NAME', l_api_name);
10287: FND_MSG_PUB.add;
10288: RETURN FND_API.G_RET_STS_ERROR;
10289: END IF;
10282: ELSE
10283: -- All three input params are null
10284: -- throw an error
10285: FND_MESSAGE.set_name('AHL','AHL_PRD_WRONG_ARGUMENTS');
10286: FND_MESSAGE.set_token('PROC_NAME', l_api_name);
10287: FND_MSG_PUB.add;
10288: RETURN FND_API.G_RET_STS_ERROR;
10289: END IF;
10290:
10374: );
10375:
10376: --RETURN l_return_status;
10377: ELSE
10378: FND_MESSAGE.SET_NAME('AHL', 'AHL_PP_WORKORDER_NOT_EXISTS');
10379: FND_MSG_PUB.ADD;
10380: --RETURN FND_API.G_RET_STS_ERROR;
10381: l_return_status := FND_API.G_RET_STS_ERROR;
10382:
10621:
10622:
10623: IF l_return_status = FND_API.G_TRUE THEN
10624:
10625: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_LGN_UNTLCKD');
10626: FND_MESSAGE.set_token('WO_NUM', l_workorder_name_tbl(l_index));
10627: FND_MSG_PUB.ADD;
10628:
10629: l_valid_for_close_tbl(l_index) := 'N';
10622:
10623: IF l_return_status = FND_API.G_TRUE THEN
10624:
10625: FND_MESSAGE.Set_Name('AHL', 'AHL_PRD_LGN_UNTLCKD');
10626: FND_MESSAGE.set_token('WO_NUM', l_workorder_name_tbl(l_index));
10627: FND_MSG_PUB.ADD;
10628:
10629: l_valid_for_close_tbl(l_index) := 'N';
10630:
10726: sql%bulk_exceptions(j).error_index || ', ' ||
10727: Sqlerrm(-sql%bulk_exceptions(j).error_code) );
10728: END LOOP;
10729:
10730: FND_MESSAGE.set_name('AHL', 'AHL_PRD_WO_CANNOT_CLOSE');
10731: FND_MSG_PUB.add;
10732: errbuf := FND_MSG_PUB.Get;
10733:
10734: retcode := 2; -- error!!
10852: sql%bulk_exceptions(j).error_index || ', ' ||
10853: Sqlerrm(-sql%bulk_exceptions(j).error_code) );
10854: END LOOP;
10855:
10856: FND_MESSAGE.set_name('AHL', 'AHL_PRD_WO_CANNOT_CLOSE');
10857: FND_MSG_PUB.add;
10858: errbuf := FND_MSG_PUB.Get;
10859:
10860: retcode := 2; -- error!!