DBA Data[Home] [Help]

APPS.OKE_CONTRACT_APPROVAL_PVT dependencies on OKC_API

Line 4: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;

1: package body OKE_CONTRACT_APPROVAL_PVT as
2: /* $Header: OKEVCAPB.pls 115.3 2002/12/02 21:05:13 alaw ship $ */
3: --
4: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
5: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKE_CONTRACT_APPROVAL_PVT';
6: G_LEVEL CONSTANT VARCHAR2(4) := '_PVT';
7: l_api_version CONSTANT NUMBER := 1;
8: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;

Line 8: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;

4: G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
5: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKE_CONTRACT_APPROVAL_PVT';
6: G_LEVEL CONSTANT VARCHAR2(4) := '_PVT';
7: l_api_version CONSTANT NUMBER := 1;
8: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
9: G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
10: --
11: G_K_WAS_APPROVED CONSTANT varchar2(200) := 'OKC_ALREADY_APPROVED';
12: --

Line 9: G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;

5: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKE_CONTRACT_APPROVAL_PVT';
6: G_LEVEL CONSTANT VARCHAR2(4) := '_PVT';
7: l_api_version CONSTANT NUMBER := 1;
8: G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
9: G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
10: --
11: G_K_WAS_APPROVED CONSTANT varchar2(200) := 'OKC_ALREADY_APPROVED';
12: --
13: G_PROCESS_NOT_FOR_APPROVAL CONSTANT varchar2(200) := 'OKC_PROCESS_NOT_FOR_APPROVAL';

Line 166: raise OKC_API.G_EXCEPTION_ERROR;

162: p_token1 => 'NUMBER',
163: p_token1_value => L_CONTRACT_NUMBER||'-'||L_CONTRACT_NUMBER_MODIFIER,
164: p_token2 => 'STATUS',
165: p_token2_value => L_STATUS);
166: raise OKC_API.G_EXCEPTION_ERROR;
167: end if;
168: --
169: open process_def_csr;
170: fetch process_def_csr into L_WF_NAME, L_WF_PROCESS_NAME, L_USAGE;

Line 231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

227: x_return_status => l_return_status,
228: x_msg_count => l_msg_count,
229: x_msg_data => l_msg_data,
230: p_cpsv_rec => L1_CPSV_REC);
231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
234: RAISE OKE_API.G_EXCEPTION_ERROR;
235: END IF;

Line 232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

228: x_msg_count => l_msg_count,
229: x_msg_data => l_msg_data,
230: p_cpsv_rec => L1_CPSV_REC);
231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
234: RAISE OKE_API.G_EXCEPTION_ERROR;
235: END IF;
236: */

Line 233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

229: x_msg_data => l_msg_data,
230: p_cpsv_rec => L1_CPSV_REC);
231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
234: RAISE OKE_API.G_EXCEPTION_ERROR;
235: END IF;
236: */
237: begin

Line 1190: then return OKC_API.G_TRUE;

1186: */
1187: begin
1188: l_q :=okc_util.get_k_access_level(p_chr_id => p_contract_id);
1189: if ((l_q = p_level) or (l_q = 'U'))
1190: then return OKC_API.G_TRUE;
1191: else return OKC_API.G_FALSE;
1192: end if;
1193: /*
1194: --

Line 1191: else return OKC_API.G_FALSE;

1187: begin
1188: l_q :=okc_util.get_k_access_level(p_chr_id => p_contract_id);
1189: if ((l_q = p_level) or (l_q = 'U'))
1190: then return OKC_API.G_TRUE;
1191: else return OKC_API.G_FALSE;
1192: end if;
1193: /*
1194: --
1195: open check_access_csr;

Line 1200: if l_q = '?' then return OKC_API.G_FALSE;

1196: fetch check_access_csr into l_q;
1197: close check_access_csr;
1198: --
1199:
1200: if l_q = '?' then return OKC_API.G_FALSE;
1201: else return OKC_API.G_TRUE;
1202: end if;
1203: */
1204:

Line 1201: else return OKC_API.G_TRUE;

1197: close check_access_csr;
1198: --
1199:
1200: if l_q = '?' then return OKC_API.G_FALSE;
1201: else return OKC_API.G_TRUE;
1202: end if;
1203: */
1204:
1205: end k_accesible;

Line 1312: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1308: l_msg_data,
1309: G_LEVEL);
1310: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1311: db_failed('OKC_APPROVE');
1312: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1313: (substr(l_api_name,1,26),
1314: G_PKG_NAME,
1315: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1316: l_msg_count,

Line 1315: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1311: db_failed('OKC_APPROVE');
1312: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1313: (substr(l_api_name,1,26),
1314: G_PKG_NAME,
1315: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1316: l_msg_count,
1317: l_msg_data,
1318: G_LEVEL);
1319: WHEN OTHERS THEN

Line 1321: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1317: l_msg_data,
1318: G_LEVEL);
1319: WHEN OTHERS THEN
1320: db_failed('OKC_APPROVE');
1321: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1322: (substr(l_api_name,1,26),
1323: G_PKG_NAME,
1324: 'OTHERS',
1325: l_msg_count,

Line 1357: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1353: from OKC_K_HEADERS_B
1354: where ID = p
1355: ;
1356: l_api_name CONSTANT VARCHAR2(30) := 'k_erase_approved';
1357: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1358: l_msg_count NUMBER;
1359: l_msg_data varchar2(2000);
1360: begin
1361:

Line 1367: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1363: open c1;
1364: fetch c1 into dummy;
1365: close c1;
1366: if (dummy = '?') then
1367: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1368: return;
1369: end if;
1370:
1371: --start

Line 1372: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),

1368: return;
1369: end if;
1370:
1371: --start
1372: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
1373: G_PKG_NAME,
1374: OKC_API.G_TRUE,
1375: l_api_version,
1376: l_api_version,

Line 1374: OKC_API.G_TRUE,

1370:
1371: --start
1372: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
1373: G_PKG_NAME,
1374: OKC_API.G_TRUE,
1375: l_api_version,
1376: l_api_version,
1377: G_LEVEL,
1378: x_return_status);

Line 1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1375: l_api_version,
1376: l_api_version,
1377: G_LEVEL,
1378: x_return_status);
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;

Line 1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1376: l_api_version,
1377: G_LEVEL,
1378: x_return_status);
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384:

Line 1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1377: G_LEVEL,
1378: x_return_status);
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384:
1385: --lock

Line 1382: RAISE OKC_API.G_EXCEPTION_ERROR;

1378: x_return_status);
1379: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1380: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1381: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1382: RAISE OKC_API.G_EXCEPTION_ERROR;
1383: END IF;
1384:
1385: --lock
1386: L1_header_rec.id := p_contract_id;

Line 1396: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1392: x_return_status => x_return_status,
1393: x_msg_count => l_msg_count,
1394: x_msg_data => l_msg_data,
1395: p_chrv_rec => L1_header_rec);
1396: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1397: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1398: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1399: RAISE OKC_API.G_EXCEPTION_ERROR;
1400: END IF;

Line 1397: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1393: x_msg_count => l_msg_count,
1394: x_msg_data => l_msg_data,
1395: p_chrv_rec => L1_header_rec);
1396: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1397: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1398: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1399: RAISE OKC_API.G_EXCEPTION_ERROR;
1400: END IF;
1401:

Line 1398: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1394: x_msg_data => l_msg_data,
1395: p_chrv_rec => L1_header_rec);
1396: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1397: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1398: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1399: RAISE OKC_API.G_EXCEPTION_ERROR;
1400: END IF;
1401:
1402: --update

Line 1399: RAISE OKC_API.G_EXCEPTION_ERROR;

1395: p_chrv_rec => L1_header_rec);
1396: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1397: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1398: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1399: RAISE OKC_API.G_EXCEPTION_ERROR;
1400: END IF;
1401:
1402: --update
1403: L1_header_rec.date_approved := NULL;

Line 1409: p_restricted_update => OKC_API.G_TRUE,

1405: p_api_version => l_api_version,
1406: x_return_status => x_return_status,
1407: x_msg_count => l_msg_count,
1408: x_msg_data => l_msg_data,
1409: p_restricted_update => OKC_API.G_TRUE,
1410: p_chrv_rec => L1_header_rec,
1411: x_chrv_rec => L2_header_rec);
1412: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1413: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1412: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1408: x_msg_data => l_msg_data,
1409: p_restricted_update => OKC_API.G_TRUE,
1410: p_chrv_rec => L1_header_rec,
1411: x_chrv_rec => L2_header_rec);
1412: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1413: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1414: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1415: RAISE OKC_API.G_EXCEPTION_ERROR;
1416: END IF;

Line 1413: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1409: p_restricted_update => OKC_API.G_TRUE,
1410: p_chrv_rec => L1_header_rec,
1411: x_chrv_rec => L2_header_rec);
1412: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1413: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1414: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1415: RAISE OKC_API.G_EXCEPTION_ERROR;
1416: END IF;
1417:

Line 1414: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1410: p_chrv_rec => L1_header_rec,
1411: x_chrv_rec => L2_header_rec);
1412: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1413: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1414: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1415: RAISE OKC_API.G_EXCEPTION_ERROR;
1416: END IF;
1417:
1418: --end

Line 1415: RAISE OKC_API.G_EXCEPTION_ERROR;

1411: x_chrv_rec => L2_header_rec);
1412: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1413: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1414: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1415: RAISE OKC_API.G_EXCEPTION_ERROR;
1416: END IF;
1417:
1418: --end
1419: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

Line 1419: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

1415: RAISE OKC_API.G_EXCEPTION_ERROR;
1416: END IF;
1417:
1418: --end
1419: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1420: EXCEPTION
1421: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1422: db_failed('OKC_REVOKE');
1423: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1421: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1417:
1418: --end
1419: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1420: EXCEPTION
1421: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1422: db_failed('OKC_REVOKE');
1423: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1424: (substr(l_api_name,1,26),
1425: G_PKG_NAME,

Line 1423: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1419: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1420: EXCEPTION
1421: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1422: db_failed('OKC_REVOKE');
1423: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1424: (substr(l_api_name,1,26),
1425: G_PKG_NAME,
1426: 'OKC_API.G_RET_STS_ERROR',
1427: l_msg_count,

Line 1426: 'OKC_API.G_RET_STS_ERROR',

1422: db_failed('OKC_REVOKE');
1423: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1424: (substr(l_api_name,1,26),
1425: G_PKG_NAME,
1426: 'OKC_API.G_RET_STS_ERROR',
1427: l_msg_count,
1428: l_msg_data,
1429: G_LEVEL);
1430: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1430: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1426: 'OKC_API.G_RET_STS_ERROR',
1427: l_msg_count,
1428: l_msg_data,
1429: G_LEVEL);
1430: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1431: db_failed('OKC_REVOKE');
1432: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1433: (substr(l_api_name,1,26),
1434: G_PKG_NAME,

Line 1432: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1428: l_msg_data,
1429: G_LEVEL);
1430: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1431: db_failed('OKC_REVOKE');
1432: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1433: (substr(l_api_name,1,26),
1434: G_PKG_NAME,
1435: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1436: l_msg_count,

Line 1435: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1431: db_failed('OKC_REVOKE');
1432: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1433: (substr(l_api_name,1,26),
1434: G_PKG_NAME,
1435: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1436: l_msg_count,
1437: l_msg_data,
1438: G_LEVEL);
1439: WHEN OTHERS THEN

Line 1441: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1437: l_msg_data,
1438: G_LEVEL);
1439: WHEN OTHERS THEN
1440: db_failed('OKC_REVOKE');
1441: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1442: (substr(l_api_name,1,26),
1443: G_PKG_NAME,
1444: 'OTHERS',
1445: l_msg_count,

Line 1465: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1461: p_date_signed IN date default sysdate,
1462: x_return_status OUT NOCOPY VARCHAR2
1463: ) is
1464: l_api_name CONSTANT VARCHAR2(30) := 'k_signed';
1465: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1466: l_msg_count NUMBER;
1467: l_msg_data varchar2(2000);
1468:
1469: L1_header_rec OKC_CONTRACT_PUB.chrv_rec_type;

Line 1519: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),

1515:
1516: begin
1517:
1518: --start
1519: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
1520: G_PKG_NAME,
1521: OKC_API.G_TRUE,
1522: l_api_version,
1523: l_api_version,

Line 1521: OKC_API.G_TRUE,

1517:
1518: --start
1519: l_return_status := OKC_API.START_ACTIVITY(substr(l_api_name,1,26),
1520: G_PKG_NAME,
1521: OKC_API.G_TRUE,
1522: l_api_version,
1523: l_api_version,
1524: G_LEVEL,
1525: x_return_status);

Line 1526: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1522: l_api_version,
1523: l_api_version,
1524: G_LEVEL,
1525: x_return_status);
1526: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1527: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1528: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1529: RAISE OKC_API.G_EXCEPTION_ERROR;
1530: END IF;

Line 1527: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1523: l_api_version,
1524: G_LEVEL,
1525: x_return_status);
1526: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1527: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1528: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1529: RAISE OKC_API.G_EXCEPTION_ERROR;
1530: END IF;
1531:

Line 1528: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1524: G_LEVEL,
1525: x_return_status);
1526: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1527: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1528: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1529: RAISE OKC_API.G_EXCEPTION_ERROR;
1530: END IF;
1531:
1532: --lock header

Line 1529: RAISE OKC_API.G_EXCEPTION_ERROR;

1525: x_return_status);
1526: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1527: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1528: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1529: RAISE OKC_API.G_EXCEPTION_ERROR;
1530: END IF;
1531:
1532: --lock header
1533: L1_header_rec.id := p_contract_id;

Line 1544: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1540: x_return_status => x_return_status,
1541: x_msg_count => l_msg_count,
1542: x_msg_data => l_msg_data,
1543: p_chrv_rec => L1_header_rec);
1544: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;

Line 1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1541: x_msg_count => l_msg_count,
1542: x_msg_data => l_msg_data,
1543: p_chrv_rec => L1_header_rec);
1544: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549:

Line 1546: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1542: x_msg_data => l_msg_data,
1543: p_chrv_rec => L1_header_rec);
1544: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549:
1550: --update header

Line 1547: RAISE OKC_API.G_EXCEPTION_ERROR;

1543: p_chrv_rec => L1_header_rec);
1544: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1545: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1546: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1547: RAISE OKC_API.G_EXCEPTION_ERROR;
1548: END IF;
1549:
1550: --update header
1551: L1_header_rec.date_signed := p_date_signed;

Line 1581: p_restricted_update => OKC_API.G_TRUE,

1577: p_api_version => l_api_version,
1578: x_return_status => x_return_status,
1579: x_msg_count => l_msg_count,
1580: x_msg_data => l_msg_data,
1581: p_restricted_update => OKC_API.G_TRUE,
1582: p_chrv_rec => L1_header_rec,
1583: x_chrv_rec => L2_header_rec);
1584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1580: x_msg_data => l_msg_data,
1581: p_restricted_update => OKC_API.G_TRUE,
1582: p_chrv_rec => L1_header_rec,
1583: x_chrv_rec => L2_header_rec);
1584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;

Line 1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1581: p_restricted_update => OKC_API.G_TRUE,
1582: p_chrv_rec => L1_header_rec,
1583: x_chrv_rec => L2_header_rec);
1584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589:

Line 1586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1582: p_chrv_rec => L1_header_rec,
1583: x_chrv_rec => L2_header_rec);
1584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589:
1590: -- lock lines

Line 1587: RAISE OKC_API.G_EXCEPTION_ERROR;

1583: x_chrv_rec => L2_header_rec);
1584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1587: RAISE OKC_API.G_EXCEPTION_ERROR;
1588: END IF;
1589:
1590: -- lock lines
1591: for lock1_rec in lock1_csr LOOP

Line 1606: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1602: x_return_status => x_return_status,
1603: x_msg_count => l_msg_count,
1604: x_msg_data => l_msg_data,
1605: p_clev_tbl => l1_lines);
1606: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1607: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1608: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1609: RAISE OKC_API.G_EXCEPTION_ERROR;
1610: END IF;

Line 1607: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1603: x_msg_count => l_msg_count,
1604: x_msg_data => l_msg_data,
1605: p_clev_tbl => l1_lines);
1606: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1607: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1608: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1609: RAISE OKC_API.G_EXCEPTION_ERROR;
1610: END IF;
1611:

Line 1608: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1604: x_msg_data => l_msg_data,
1605: p_clev_tbl => l1_lines);
1606: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1607: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1608: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1609: RAISE OKC_API.G_EXCEPTION_ERROR;
1610: END IF;
1611:
1612: -- update lines

Line 1609: RAISE OKC_API.G_EXCEPTION_ERROR;

1605: p_clev_tbl => l1_lines);
1606: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1607: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1608: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1609: RAISE OKC_API.G_EXCEPTION_ERROR;
1610: END IF;
1611:
1612: -- update lines
1613: OKC_CONTRACT_PUB.update_contract_line(

Line 1618: p_restricted_update => OKC_API.G_TRUE,

1614: p_api_version => l_api_version,
1615: x_return_status => x_return_status,
1616: x_msg_count => l_msg_count,
1617: x_msg_data => l_msg_data,
1618: p_restricted_update => OKC_API.G_TRUE,
1619: p_clev_tbl => l2_lines,
1620: x_clev_tbl => l3_lines);
1621: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1622: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1621: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1617: x_msg_data => l_msg_data,
1618: p_restricted_update => OKC_API.G_TRUE,
1619: p_clev_tbl => l2_lines,
1620: x_clev_tbl => l3_lines);
1621: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1622: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1623: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1624: RAISE OKC_API.G_EXCEPTION_ERROR;
1625: END IF;

Line 1622: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1618: p_restricted_update => OKC_API.G_TRUE,
1619: p_clev_tbl => l2_lines,
1620: x_clev_tbl => l3_lines);
1621: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1622: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1623: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1624: RAISE OKC_API.G_EXCEPTION_ERROR;
1625: END IF;
1626:

Line 1623: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1619: p_clev_tbl => l2_lines,
1620: x_clev_tbl => l3_lines);
1621: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1622: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1623: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1624: RAISE OKC_API.G_EXCEPTION_ERROR;
1625: END IF;
1626:
1627: -- call time ...

Line 1624: RAISE OKC_API.G_EXCEPTION_ERROR;

1620: x_clev_tbl => l3_lines);
1621: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1622: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1623: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1624: RAISE OKC_API.G_EXCEPTION_ERROR;
1625: END IF;
1626:
1627: -- call time ...
1628: if (call_time = 'Y') then

Line 1629: OKC_TIME_RES_PUB.Res_Time_New_K(L2_header_rec.id, l_api_version,OKC_API.G_FALSE,x_return_status);

1625: END IF;
1626:
1627: -- call time ...
1628: if (call_time = 'Y') then
1629: OKC_TIME_RES_PUB.Res_Time_New_K(L2_header_rec.id, l_api_version,OKC_API.G_FALSE,x_return_status);
1630: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1631: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1632: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1630: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1626:
1627: -- call time ...
1628: if (call_time = 'Y') then
1629: OKC_TIME_RES_PUB.Res_Time_New_K(L2_header_rec.id, l_api_version,OKC_API.G_FALSE,x_return_status);
1630: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1631: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1632: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_ERROR;
1634: END IF;

Line 1631: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1627: -- call time ...
1628: if (call_time = 'Y') then
1629: OKC_TIME_RES_PUB.Res_Time_New_K(L2_header_rec.id, l_api_version,OKC_API.G_FALSE,x_return_status);
1630: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1631: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1632: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_ERROR;
1634: END IF;
1635: end if;

Line 1632: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1628: if (call_time = 'Y') then
1629: OKC_TIME_RES_PUB.Res_Time_New_K(L2_header_rec.id, l_api_version,OKC_API.G_FALSE,x_return_status);
1630: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1631: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1632: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_ERROR;
1634: END IF;
1635: end if;
1636:

Line 1633: RAISE OKC_API.G_EXCEPTION_ERROR;

1629: OKC_TIME_RES_PUB.Res_Time_New_K(L2_header_rec.id, l_api_version,OKC_API.G_FALSE,x_return_status);
1630: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1631: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1632: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1633: RAISE OKC_API.G_EXCEPTION_ERROR;
1634: END IF;
1635: end if;
1636:
1637: -- raise event

Line 1644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1640: x_return_status => x_return_status,
1641: x_msg_count => l_msg_count,
1642: x_msg_data => l_msg_data,
1643: p_contract_id => p_contract_id);
1644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1647: RAISE OKC_API.G_EXCEPTION_ERROR;
1648: END IF;

Line 1645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1641: x_msg_count => l_msg_count,
1642: x_msg_data => l_msg_data,
1643: p_contract_id => p_contract_id);
1644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1647: RAISE OKC_API.G_EXCEPTION_ERROR;
1648: END IF;
1649:

Line 1646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1642: x_msg_data => l_msg_data,
1643: p_contract_id => p_contract_id);
1644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1647: RAISE OKC_API.G_EXCEPTION_ERROR;
1648: END IF;
1649:
1650: --end

Line 1647: RAISE OKC_API.G_EXCEPTION_ERROR;

1643: p_contract_id => p_contract_id);
1644: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1646: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1647: RAISE OKC_API.G_EXCEPTION_ERROR;
1648: END IF;
1649:
1650: --end
1651: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

Line 1651: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);

1647: RAISE OKC_API.G_EXCEPTION_ERROR;
1648: END IF;
1649:
1650: --end
1651: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1652: EXCEPTION
1653: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1654: db_failed('OKC_SIGN');
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1653: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1649:
1650: --end
1651: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1652: EXCEPTION
1653: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1654: db_failed('OKC_SIGN');
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (substr(l_api_name,1,26),
1657: G_PKG_NAME,

Line 1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1651: OKC_API.END_ACTIVITY(l_msg_count, l_msg_data);
1652: EXCEPTION
1653: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1654: db_failed('OKC_SIGN');
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (substr(l_api_name,1,26),
1657: G_PKG_NAME,
1658: 'OKC_API.G_RET_STS_ERROR',
1659: l_msg_count,

Line 1658: 'OKC_API.G_RET_STS_ERROR',

1654: db_failed('OKC_SIGN');
1655: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1656: (substr(l_api_name,1,26),
1657: G_PKG_NAME,
1658: 'OKC_API.G_RET_STS_ERROR',
1659: l_msg_count,
1660: l_msg_data,
1661: G_LEVEL);
1662: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1662: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1658: 'OKC_API.G_RET_STS_ERROR',
1659: l_msg_count,
1660: l_msg_data,
1661: G_LEVEL);
1662: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1663: db_failed('OKC_SIGN');
1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (substr(l_api_name,1,26),
1666: G_PKG_NAME,

Line 1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1660: l_msg_data,
1661: G_LEVEL);
1662: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1663: db_failed('OKC_SIGN');
1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (substr(l_api_name,1,26),
1666: G_PKG_NAME,
1667: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1668: l_msg_count,

Line 1667: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1663: db_failed('OKC_SIGN');
1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (substr(l_api_name,1,26),
1666: G_PKG_NAME,
1667: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1668: l_msg_count,
1669: l_msg_data,
1670: G_LEVEL);
1671: WHEN OTHERS THEN

Line 1673: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1669: l_msg_data,
1670: G_LEVEL);
1671: WHEN OTHERS THEN
1672: db_failed('OKC_SIGN');
1673: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1674: (substr(l_api_name,1,26),
1675: G_PKG_NAME,
1676: 'OTHERS',
1677: l_msg_count,