74: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
75: G_MODULE||l_api_name,
76: 'Invalid Contract Id: '|| p_source_contract_id);
77: END IF;
78: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
79: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
80: p_token1 => G_CONTRACT_ID_TOKEN,
81: p_token1_value => to_char(p_source_contract_id));
82: RAISE FND_API.G_EXC_ERROR;
118: 'OKC_DELIVERABLE_PROCESS_PVT.copy_deliverables return status is : '
119: || x_return_status);
120: END IF;
121: -----------------------------------------------------
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
119: || x_return_status);
120: END IF;
121: -----------------------------------------------------
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: --------------------------------------------------------
120: END IF;
121: -----------------------------------------------------
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: --------------------------------------------------------
128:
121: -----------------------------------------------------
122: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
123: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
124: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
125: RAISE OKC_API.G_EXCEPTION_ERROR;
126: END IF;
127: --------------------------------------------------------
128:
129: -- close open cursors
189: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
190: g_module || l_api_name,
191: 'Leaving copy_deliverables because of EXCEPTION: ' || sqlerrm);
192: END IF;
193: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
194: p_msg_name => G_UNEXPECTED_ERROR,
195: p_token1 => G_SQLCODE_TOKEN,
196: p_token1_value => sqlcode,
197: p_token2 => G_SQLERRM_TOKEN,
280: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
281: G_MODULE||l_api_name,
282: 'Invalid Contract Id: '|| p_contract_id);
283: END IF;
284: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
285: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
286: p_token1 => G_CONTRACT_ID_TOKEN,
287: p_token1_value => to_char(p_contract_id));
288: RAISE FND_API.G_EXC_ERROR;
302: 'OKC_REP_CONTRACT_IMP_PVT.create_new_contract_version return status is : '
303: || x_return_status);
304: END IF;
305: -----------------------------------------------------
306: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
308: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
309: RAISE OKC_API.G_EXCEPTION_ERROR;
310: END IF;
303: || x_return_status);
304: END IF;
305: -----------------------------------------------------
306: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
308: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
309: RAISE OKC_API.G_EXCEPTION_ERROR;
310: END IF;
311: --------------------------------------------------------
304: END IF;
305: -----------------------------------------------------
306: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
308: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
309: RAISE OKC_API.G_EXCEPTION_ERROR;
310: END IF;
311: --------------------------------------------------------
312:
305: -----------------------------------------------------
306: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
307: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
308: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
309: RAISE OKC_API.G_EXCEPTION_ERROR;
310: END IF;
311: --------------------------------------------------------
312:
313: -- close open cursors
374: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
375: g_module || l_api_name,
376: 'Leaving revise_checklist because of EXCEPTION: ' || sqlerrm);
377: END IF;
378: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
379: p_msg_name => G_UNEXPECTED_ERROR,
380: p_token1 => G_SQLCODE_TOKEN,
381: p_token1_value => sqlcode,
382: p_token2 => G_SQLERRM_TOKEN,
465: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
466: G_MODULE||l_api_name,
467: 'Invalid Contract Id: '|| p_contract_id);
468: END IF;
469: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
470: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
471: p_token1 => G_CONTRACT_ID_TOKEN,
472: p_token1_value => to_char(p_contract_id));
473: RAISE FND_API.G_EXC_ERROR;
487: 'OKC_REP_CONTRACT_IMP_PVT.Activate_tasks_closeout return status is : '
488: || x_return_status);
489: END IF;
490: -----------------------------------------------------
491: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
493: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
494: RAISE OKC_API.G_EXCEPTION_ERROR;
495: END IF;
488: || x_return_status);
489: END IF;
490: -----------------------------------------------------
491: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
493: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
494: RAISE OKC_API.G_EXCEPTION_ERROR;
495: END IF;
496: --------------------------------------------------------
489: END IF;
490: -----------------------------------------------------
491: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
493: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
494: RAISE OKC_API.G_EXCEPTION_ERROR;
495: END IF;
496: --------------------------------------------------------
497:
490: -----------------------------------------------------
491: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
493: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
494: RAISE OKC_API.G_EXCEPTION_ERROR;
495: END IF;
496: --------------------------------------------------------
497:
498: -- close open cursors
552: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
553: g_module || l_api_name,
554: 'Leaving freeze_checklist because of EXCEPTION: ' || sqlerrm);
555: END IF;
556: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
557: p_msg_name => G_UNEXPECTED_ERROR,
558: p_token1 => G_SQLCODE_TOKEN,
559: p_token1_value => sqlcode,
560: p_token2 => G_SQLERRM_TOKEN,
645: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
646: G_MODULE||l_api_name,
647: 'Invalid Contract Id: '|| p_contract_id);
648: END IF;
649: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
650: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
651: p_token1 => G_CONTRACT_ID_TOKEN,
652: p_token1_value => to_char(p_contract_id));
653: RAISE FND_API.G_EXC_ERROR;
674: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT , G_MODULE||l_api_name,
675: 'Completed OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa with returned status: ' || x_return_status);
676: END IF;
677:
678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
681: RAISE OKC_API.G_EXCEPTION_ERROR;
682: END IF;
675: 'Completed OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa with returned status: ' || x_return_status);
676: END IF;
677:
678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
681: RAISE OKC_API.G_EXCEPTION_ERROR;
682: END IF;
683:
676: END IF;
677:
678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
681: RAISE OKC_API.G_EXCEPTION_ERROR;
682: END IF;
683:
684: --------------------------------------------
677:
678: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
680: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
681: RAISE OKC_API.G_EXCEPTION_ERROR;
682: END IF;
683:
684: --------------------------------------------
685: -- VALIDATIONS are done for Deliverables.
802: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
803: g_module || l_api_name,
804: 'Leaving validate_closeout_tasks because of EXCEPTION: ' || sqlerrm);
805: END IF;
806: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
807: p_msg_name => G_UNEXPECTED_ERROR,
808: p_token1 => G_SQLCODE_TOKEN,
809: p_token1_value => sqlcode,
810: p_token2 => G_SQLERRM_TOKEN,
911: G_MODULE||l_api_name,
912: 'Invalid Business Document Id: '|| p_document_rec.business_document_id);
913:
914: END IF;
915: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
916: p_msg_name => G_INVALID_BUS_DOC_ID_MSG,
917: p_token1 => 'BUS_DOC_ID',
918: p_token1_value => to_char(p_document_rec.business_document_id));
919: RAISE FND_API.G_EXC_ERROR;
928: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
929: G_MODULE||l_api_name,
930: 'Invalid Contract Id: '|| l_contract_id);
931: END IF;
932: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
933: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
934: p_token1 => 'CONTRACT_ID',
935: p_token1_value => to_char(l_contract_id));
936: RAISE FND_API.G_EXC_ERROR;
955: || x_return_status);
956: END IF;
957:
958: -----------------------------------------------------
959: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
956: END IF;
957:
958: -----------------------------------------------------
959: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
964: -----------------------------------------------------
957:
958: -----------------------------------------------------
959: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
964: -----------------------------------------------------
965:
958: -----------------------------------------------------
959: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
960: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
961: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
962: RAISE OKC_API.G_EXCEPTION_ERROR;
963: END IF;
964: -----------------------------------------------------
965:
966: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
985: g_module || l_api_name,
986: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
987: END IF;
988: -----------------------------------------------------
989: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
991: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
992: RAISE OKC_API.G_EXCEPTION_ERROR;
993: END IF;
986: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || x_return_status);
987: END IF;
988: -----------------------------------------------------
989: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
991: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
992: RAISE OKC_API.G_EXCEPTION_ERROR;
993: END IF;
994: ------------------------------------------------------
987: END IF;
988: -----------------------------------------------------
989: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
991: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
992: RAISE OKC_API.G_EXCEPTION_ERROR;
993: END IF;
994: ------------------------------------------------------
995:
988: -----------------------------------------------------
989: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
991: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
992: RAISE OKC_API.G_EXCEPTION_ERROR;
993: END IF;
994: ------------------------------------------------------
995:
996: -- We need to first version the deliverables
1015: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
1016: || x_return_status);
1017: END IF;
1018: -----------------------------------------------------
1019: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1016: || x_return_status);
1017: END IF;
1018: -----------------------------------------------------
1019: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1024: --------------------------------------------------------
1017: END IF;
1018: -----------------------------------------------------
1019: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1024: --------------------------------------------------------
1025:
1018: -----------------------------------------------------
1019: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1020: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1021: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1022: RAISE OKC_API.G_EXCEPTION_ERROR;
1023: END IF;
1024: --------------------------------------------------------
1025:
1026: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1068: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
1069: || x_return_status);
1070: END IF;
1071: -----------------------------------------------------
1072: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1073: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1074: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1075: RAISE OKC_API.G_EXCEPTION_ERROR;
1076: END IF;
1069: || x_return_status);
1070: END IF;
1071: -----------------------------------------------------
1072: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1073: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1074: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1075: RAISE OKC_API.G_EXCEPTION_ERROR;
1076: END IF;
1077: --------------------------------------------------------
1070: END IF;
1071: -----------------------------------------------------
1072: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1073: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1074: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1075: RAISE OKC_API.G_EXCEPTION_ERROR;
1076: END IF;
1077: --------------------------------------------------------
1078:
1071: -----------------------------------------------------
1072: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1073: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1074: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1075: RAISE OKC_API.G_EXCEPTION_ERROR;
1076: END IF;
1077: --------------------------------------------------------
1078:
1079: -- Checking if we need to call deliverable's APIs for synch-ing
1111: 'OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables return status is : '
1112: || x_return_status);
1113: END IF;
1114: -----------------------------------------------------
1115: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1116: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1117: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_ERROR;
1119: END IF;
1112: || x_return_status);
1113: END IF;
1114: -----------------------------------------------------
1115: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1116: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1117: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_ERROR;
1119: END IF;
1120: --------------------------------------------------------
1113: END IF;
1114: -----------------------------------------------------
1115: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1116: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1117: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_ERROR;
1119: END IF;
1120: --------------------------------------------------------
1121:
1114: -----------------------------------------------------
1115: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1116: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1117: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1118: RAISE OKC_API.G_EXCEPTION_ERROR;
1119: END IF;
1120: --------------------------------------------------------
1121:
1122: -- Disable prev. version deliverables
1140: 'OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables return status is : '
1141: || x_return_status);
1142: END IF;
1143: -----------------------------------------------------
1144: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_ERROR;
1148: END IF;
1141: || x_return_status);
1142: END IF;
1143: -----------------------------------------------------
1144: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_ERROR;
1148: END IF;
1149: --------------------------------------------------------
1142: END IF;
1143: -----------------------------------------------------
1144: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_ERROR;
1148: END IF;
1149: --------------------------------------------------------
1150: END IF; -- (l_sync_flag = 'Y')
1143: -----------------------------------------------------
1144: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1145: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_ERROR;
1148: END IF;
1149: --------------------------------------------------------
1150: END IF; -- (l_sync_flag = 'Y')
1151:
1233: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1234: g_module || l_api_name,
1235: 'Leaving sign_contract because of EXCEPTION: ' || sqlerrm);
1236: END IF;
1237: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1238: p_msg_name => G_UNEXPECTED_ERROR,
1239: p_token1 => G_SQLCODE_TOKEN,
1240: p_token1_value => sqlcode,
1241: p_token2 => G_SQLERRM_TOKEN,
1391: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1392: g_module || l_api_name,
1393: 'Leaving create_contract because of EXCEPTION: ' || sqlerrm);
1394: END IF;
1395: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1396: p_msg_name => G_UNEXPECTED_ERROR,
1397: p_token1 => G_SQLCODE_TOKEN,
1398: p_token1_value => sqlcode,
1399: p_token2 => G_SQLERRM_TOKEN,
1498: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1499: g_module || l_api_name,
1500: 'Leaving delete_contract because of EXCEPTION: ' || sqlerrm);
1501: END IF;
1502: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1503: p_msg_name => G_UNEXPECTED_ERROR,
1504: p_token1 => G_SQLCODE_TOKEN,
1505: p_token1_value => sqlcode,
1506: p_token2 => G_SQLERRM_TOKEN,
1621: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1622: g_module || l_api_name,
1623: 'Leaving create_new_contract_version because of EXCEPTION: ' || sqlerrm);
1624: END IF;
1625: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1626: p_msg_name => G_UNEXPECTED_ERROR,
1627: p_token1 => G_SQLCODE_TOKEN,
1628: p_token1_value => sqlcode,
1629: p_token2 => G_SQLERRM_TOKEN,
1732: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1733: g_module || l_api_name,
1734: 'Leaving check_contract_exists because of EXCEPTION: ' || sqlerrm);
1735: END IF;
1736: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1737: p_msg_name => G_UNEXPECTED_ERROR,
1738: p_token1 => G_SQLCODE_TOKEN,
1739: p_token1_value => sqlcode,
1740: p_token2 => G_SQLERRM_TOKEN,
1923: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1924: G_MODULE||l_api_name,
1925: 'Invalid Business Document Id: '|| p_document_rec.business_document_id);
1926: END IF;
1927: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1928: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
1929: p_token1 => G_CONTRACT_ID_TOKEN,
1930: p_token1_value => to_char(p_document_rec.business_document_id));
1931: RAISE FND_API.G_EXC_ERROR;
1952: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT , G_MODULE||l_api_name,
1953: 'Completed OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa with returned status: ' || x_return_status);
1954: END IF;
1955:
1956: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1957: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1958: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1959: RAISE OKC_API.G_EXCEPTION_ERROR;
1960: END IF;
1953: 'Completed OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa with returned status: ' || x_return_status);
1954: END IF;
1955:
1956: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1957: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1958: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1959: RAISE OKC_API.G_EXCEPTION_ERROR;
1960: END IF;
1961:
1954: END IF;
1955:
1956: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1957: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1958: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1959: RAISE OKC_API.G_EXCEPTION_ERROR;
1960: END IF;
1961:
1962: --------------------------------------------
1955:
1956: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1957: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1958: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1959: RAISE OKC_API.G_EXCEPTION_ERROR;
1960: END IF;
1961:
1962: --------------------------------------------
1963: -- VALIDATIONS are done for Deliverables.
2074: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2075: g_module || l_api_name,
2076: 'Leaving validate_closeout_tasks because of EXCEPTION: ' || sqlerrm);
2077: END IF;
2078: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
2079: p_msg_name => G_UNEXPECTED_ERROR,
2080: p_token1 => G_SQLCODE_TOKEN,
2081: p_token1_value => sqlcode,
2082: p_token2 => G_SQLERRM_TOKEN,
2224: x_msg_count => x_msg_count,
2225: x_return_status => x_return_status);
2226:
2227: -----------------------------------------------------
2228: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2230: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2231: RAISE OKC_API.G_EXCEPTION_ERROR;
2232: END IF;
2225: x_return_status => x_return_status);
2226:
2227: -----------------------------------------------------
2228: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2230: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2231: RAISE OKC_API.G_EXCEPTION_ERROR;
2232: END IF;
2233: --------------------------------------------------------
2226:
2227: -----------------------------------------------------
2228: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2230: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2231: RAISE OKC_API.G_EXCEPTION_ERROR;
2232: END IF;
2233: --------------------------------------------------------
2234:
2227: -----------------------------------------------------
2228: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2230: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2231: RAISE OKC_API.G_EXCEPTION_ERROR;
2232: END IF;
2233: --------------------------------------------------------
2234:
2235: OPEN c_get_src_contract;
2251: x_msg_data => x_msg_data,
2252: x_msg_count => x_msg_count,
2253: x_return_status => x_return_status);
2254: -----------------------------------------------------
2255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2258: RAISE OKC_API.G_EXCEPTION_ERROR;
2259: END IF;
2252: x_msg_count => x_msg_count,
2253: x_return_status => x_return_status);
2254: -----------------------------------------------------
2255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2258: RAISE OKC_API.G_EXCEPTION_ERROR;
2259: END IF;
2260: --------------------------------------------------------
2253: x_return_status => x_return_status);
2254: -----------------------------------------------------
2255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2258: RAISE OKC_API.G_EXCEPTION_ERROR;
2259: END IF;
2260: --------------------------------------------------------
2261:
2254: -----------------------------------------------------
2255: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2257: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2258: RAISE OKC_API.G_EXCEPTION_ERROR;
2259: END IF;
2260: --------------------------------------------------------
2261:
2262: --update supplier information on the individual Po Del
2269: WHERE business_document_type = 'REP_CCC'
2270: AND business_document_id = l_target_contract_id
2271: AND DELIVERABLE_TYPE = 'CONTRACTUAL';
2272: -----------------------------------------------------
2273: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2275: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_ERROR;
2277: END IF;
2270: AND business_document_id = l_target_contract_id
2271: AND DELIVERABLE_TYPE = 'CONTRACTUAL';
2272: -----------------------------------------------------
2273: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2275: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_ERROR;
2277: END IF;
2278: --------------------------------------------------------
2271: AND DELIVERABLE_TYPE = 'CONTRACTUAL';
2272: -----------------------------------------------------
2273: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2275: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_ERROR;
2277: END IF;
2278: --------------------------------------------------------
2279:
2272: -----------------------------------------------------
2273: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2274: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2275: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_ERROR;
2277: END IF;
2278: --------------------------------------------------------
2279:
2280: -- Standard check of p_commit
2339: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2340: g_module || l_api_name,
2341: 'Leaving copy_set_tasks_to_each_po because of EXCEPTION: ' || sqlerrm);
2342: END IF;
2343: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
2344: p_msg_name => G_UNEXPECTED_ERROR,
2345: p_token1 => G_SQLCODE_TOKEN,
2346: p_token1_value => sqlcode,
2347: p_token2 => G_SQLERRM_TOKEN,
2447: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2448: g_module || l_api_name,
2449: 'Leaving check_tasks_exists because of EXCEPTION: ' || sqlerrm);
2450: END IF;
2451: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
2452: p_msg_name => G_UNEXPECTED_ERROR,
2453: p_token1 => G_SQLCODE_TOKEN,
2454: p_token1_value => sqlcode,
2455: p_token2 => G_SQLERRM_TOKEN,