DBA Data[Home] [Help]

APPS.OKS_BILL_UTIL_PUB dependencies on OKC_API

Line 179: OKC_API.set_message('OKS','OKS_INVD_PERIOD_START_CODE'); --?? need to seed this message

175: RETURN l_level_periods;
176:
177: EXCEPTION
178: WHEN INVALID_PERIOD_START_EXCEPTION THEN
179: OKC_API.set_message('OKS','OKS_INVD_PERIOD_START_CODE'); --?? need to seed this message
180: return NULL;
181: WHEN INVALID_UOM_EXCEPTION THEN
182: OKC_API.SET_MESSAGE(p_app_name => 'OKS',
183: p_msg_name => 'OKS_INVD_UOM_CODE',

Line 182: OKC_API.SET_MESSAGE(p_app_name => 'OKS',

178: WHEN INVALID_PERIOD_START_EXCEPTION THEN
179: OKC_API.set_message('OKS','OKS_INVD_PERIOD_START_CODE'); --?? need to seed this message
180: return NULL;
181: WHEN INVALID_UOM_EXCEPTION THEN
182: OKC_API.SET_MESSAGE(p_app_name => 'OKS',
183: p_msg_name => 'OKS_INVD_UOM_CODE',
184: p_token1 => 'OKS_API_NAME',
185: p_token1_value => 'oks_bill_util_pub.Get_Periods',
186: p_token2 => 'UOM_CODE',

Line 193: OKC_API.set_message('OKS','OKS_INVALID_START_END_DATES'); --?? need to seed this message

189: CLOSE cs_validate_uom;
190: END IF;
191: return NULL;
192: WHEN INVALID_DATE_EXCEPTION THEN
193: OKC_API.set_message('OKS','OKS_INVALID_START_END_DATES'); --?? need to seed this message
194: return NULL;
195: WHEN OTHERS THEN
196: --set the error message and return with NULL to notify the
197: --caller of error

Line 198: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

194: return NULL;
195: WHEN OTHERS THEN
196: --set the error message and return with NULL to notify the
197: --caller of error
198: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
199: p_msg_name => G_UNEXPECTED_ERROR,
200: p_token1 => G_SQLCODE_TOKEN,
201: p_token1_value => sqlcode,
202: p_token2 => G_SQLERRM_TOKEN,

Line 292: OKC_API.set_message('OKS','OKS_INVD_PERIOD'); --?? need to seed this message

288: RETURN TRUNC(l_end_date);
289:
290: EXCEPTION
291: WHEN INVALID_PERIOD_EXCEPTION THEN
292: OKC_API.set_message('OKS','OKS_INVD_PERIOD'); --?? need to seed this message
293: return NULL;
294: WHEN INVALID_UOM_EXCEPTION THEN
295: OKC_API.SET_MESSAGE(p_app_name => 'OKS',
296: p_msg_name => 'OKS_INVD_UOM_CODE',

Line 295: OKC_API.SET_MESSAGE(p_app_name => 'OKS',

291: WHEN INVALID_PERIOD_EXCEPTION THEN
292: OKC_API.set_message('OKS','OKS_INVD_PERIOD'); --?? need to seed this message
293: return NULL;
294: WHEN INVALID_UOM_EXCEPTION THEN
295: OKC_API.SET_MESSAGE(p_app_name => 'OKS',
296: p_msg_name => 'OKS_INVD_UOM_CODE',
297: p_token1 => 'OKS_API_NAME',
298: p_token1_value => 'oks_bill_util_pub.Get_Enddate_Cal',
299: p_token2 => 'UOM_CODE',

Line 306: OKC_API.set_message('OKS','OKS_INVALID_START_END_DATES');

302: CLOSE cs_validate_uom;
303: END IF;
304: return NULL;
305: WHEN INVALID_DATE_EXCEPTION THEN
306: OKC_API.set_message('OKS','OKS_INVALID_START_END_DATES');
307: return NULL;
308: WHEN OTHERS THEN
309: --set the error message and return with NULL to notify the
310: --caller of error

Line 311: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

307: return NULL;
308: WHEN OTHERS THEN
309: --set the error message and return with NULL to notify the
310: --caller of error
311: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
312: p_msg_name => G_UNEXPECTED_ERROR,
313: p_token1 => G_SQLCODE_TOKEN,
314: p_token1_value => sqlcode,
315: p_token2 => G_SQLERRM_TOKEN,

Line 331: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

327:
328:
329: PROCEDURE Get_sll_amount( p_api_version IN NUMBER,
330: p_total_amount IN NUMBER,
331: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
332: x_return_status OUT NOCOPY VARCHAR2 ,
333: x_msg_count OUT NOCOPY NUMBER ,
334: x_msg_data OUT NOCOPY VARCHAR2,
335: p_currency_code IN VARCHAR2,

Line 439: x_return_status := OKC_API.G_RET_STS_SUCCESS;

435: time_code_unit_rec time_code_unit_csr%ROWTYPE;
436: Item_not_found_error EXCEPTION;
437:
438: BEGIN
439: x_return_status := OKC_API.G_RET_STS_SUCCESS;
440: OPEN time_code_unit_csr(p_timeunit);
441: FETCH time_code_unit_csr into time_code_unit_rec;
442:
443: IF time_code_unit_csr%NOTFOUND THEN

Line 444: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'uom_code');

440: OPEN time_code_unit_csr(p_timeunit);
441: FETCH time_code_unit_csr into time_code_unit_rec;
442:
443: IF time_code_unit_csr%NOTFOUND THEN
444: -- OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'uom_code');
445: CLOSE time_code_unit_csr;
446: RAISE item_not_found_error;
447: END IF;
448:

Line 468: x_return_status := OKC_API.G_RET_STS_ERROR;

464:
465: EXCEPTION
466:
467: WHEN item_not_found_error THEN
468: x_return_status := OKC_API.G_RET_STS_ERROR;
469: WHEN OTHERS THEN
470: /* OKC_API.SET_MESSAGE(p_app_name => g_app_name,
471: p_msg_name => g_unexpected_error,
472: p_token1 => g_sqlcode_token,

Line 470: /* OKC_API.SET_MESSAGE(p_app_name => g_app_name,

466:
467: WHEN item_not_found_error THEN
468: x_return_status := OKC_API.G_RET_STS_ERROR;
469: WHEN OTHERS THEN
470: /* OKC_API.SET_MESSAGE(p_app_name => g_app_name,
471: p_msg_name => g_unexpected_error,
472: p_token1 => g_sqlcode_token,
473: p_token1_value => sqlcode,
474: p_token2 => g_col_name_token,

Line 479: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

475: p_token2_value => 'uom_code',
476: p_token3 => g_sqlerrm_token,
477: p_token3_value => sqlerrm);*/
478: -- notify caller of an UNEXPECTED error
479: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
480: END get_seeded_timeunit;
481:
482: /**** This procedure is to get prorated amount ****/
483:

Line 486: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

482: /**** This procedure is to get prorated amount ****/
483:
484: Procedure Get_prorate_amount
485: ( p_api_version IN NUMBER,
486: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
487: x_return_status OUT NOCOPY VARCHAR2,
488: x_msg_count OUT NOCOPY NUMBER,
489: x_msg_data OUT NOCOPY VARCHAR2,
490: p_invoicing_rule_id IN Number,

Line 602: x_return_status := OKC_API.G_RET_STS_ERROR;

598: x_return_status := 'S';
599:
600: EXCEPTION
601: WHEN OTHERS THEN
602: x_return_status := OKC_API.G_RET_STS_ERROR;
603:
604: END;
605:
606: Function Get_frequency

Line 654: x_return_status := OKC_API.G_RET_STS_ERROR;

650: RETURN l_frequency;
651:
652: EXCEPTION
653: WHEN OTHERS THEN
654: x_return_status := OKC_API.G_RET_STS_ERROR;
655: END ;
656:
657: -------------------------------------------------------------------------
658: -- Begin partial period computation logic

Line 666: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

662: -- Changed the logic for deriving l_next_billing_date
663: -------------------------------------------------------------------------
664: Procedure Get_next_bill_sch
665: ( p_api_version IN NUMBER,
666: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
667: x_return_status OUT NOCOPY VARCHAR2,
668: x_msg_count OUT NOCOPY NUMBER,
669: x_msg_data OUT NOCOPY VARCHAR2,
670: p_invoicing_rule_id IN Number,

Line 859: x_return_status := OKC_API.G_RET_STS_ERROR;

855: x_return_status := 'S';
856:
857: EXCEPTION
858: WHEN OTHERS THEN
859: x_return_status := OKC_API.G_RET_STS_ERROR;
860:
861: END;
862:
863: Procedure Get_next_level_element

Line 868: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

864: ( p_api_version IN NUMBER,
865: p_id IN NUMBER,
866: p_covd_flag IN VARCHAR2,
867: p_date IN DATE,
868: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
869: x_return_status OUT NOCOPY VARCHAR2,
870: x_msg_count OUT NOCOPY NUMBER,
871: x_msg_data OUT NOCOPY VARCHAR2,
872: x_next_level_element OUT NOCOPY LEVEL_ELEMENT_TAB

Line 1025: x_return_status := OKC_API.G_RET_STS_SUCCESS ;

1021: END IF ;
1022:
1023: END LOOP;
1024: CLOSE l_csr_level_elements;
1025: x_return_status := OKC_API.G_RET_STS_SUCCESS ;
1026:
1027: EXCEPTION
1028: WHEN OTHERS THEN
1029: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1029: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1025: x_return_status := OKC_API.G_RET_STS_SUCCESS ;
1026:
1027: EXCEPTION
1028: WHEN OTHERS THEN
1029: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1030: END;
1031:
1032:
1033: Function Get_total_inv_billed(p_api_version IN Varchar2,

Line 1035: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1031:
1032:
1033: Function Get_total_inv_billed(p_api_version IN Varchar2,
1034: p_rule_id IN Number,
1035: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1036: x_return_status OUT NOCOPY Varchar2,
1037: x_msg_count OUT NOCOPY NUMBER,
1038: x_msg_data OUT NOCOPY VARCHAR2)
1039: RETURN NUMBER

Line 1057: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1053: Fetch l_csr_total_inv_billed INTO l_total_inv_billed;
1054: Close l_csr_total_inv_billed;
1055:
1056: Return l_total_inv_billed;
1057: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1058:
1059: EXCEPTION
1060: WHEN OTHERS THEN
1061: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1061: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1057: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1058:
1059: EXCEPTION
1060: WHEN OTHERS THEN
1061: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1062: RAISE G_EXCEPTION_HALT_VALIDATION;
1063: End Get_total_inv_billed;
1064:
1065:

Line 1088: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1084: WHERE id = p_rul_id;
1085:
1086: ExceptioN
1087: When Others then
1088: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1089: End;
1090:
1091: PROCEDURE pre_del_level_elements(
1092: p_api_version IN NUMBER,

Line 1106: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1102:
1103: l_msg_count NUMBER;
1104: l_msg_data VARCHAR2(2000);
1105: BEGIN
1106: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1107: IF (p_flag = 1) THEN
1108: oks_bill_util_pub.delete_level_elements
1109: (
1110: p_api_version => 1.0,

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

1115: x_return_status => x_return_status,
1116: x_msg_count => l_msg_count,
1117: x_msg_data => l_msg_data
1118: );
1119: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1120: raise G_EXCEPTION_HALT_VALIDATION;
1121: END IF;
1122:
1123: FOR cov_cur in coverage(p_id)

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

1132: x_return_status => x_return_status,
1133: x_msg_count => l_msg_count,
1134: x_msg_data => l_msg_data
1135: );
1136: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1137: raise G_EXCEPTION_HALT_VALIDATION;
1138: END IF;
1139:
1140: END LOOP;

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

1151: x_return_status => x_return_status,
1152: x_msg_count => l_msg_count,
1153: x_msg_data => l_msg_data
1154: );
1155: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1156: raise G_EXCEPTION_HALT_VALIDATION;
1157: END IF;
1158:
1159: END IF;

Line 1162: x_return_status := OKC_API.G_RET_STS_ERROR;

1158:
1159: END IF;
1160: EXCEPTION
1161: WHEN OTHERS THEN
1162: x_return_status := OKC_API.G_RET_STS_ERROR;
1163: END pre_del_level_elements;
1164:
1165:
1166: Procedure delete_level_elements (p_api_version IN NUMBER,

Line 1168: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1164:
1165:
1166: Procedure delete_level_elements (p_api_version IN NUMBER,
1167: p_rule_id IN Number,
1168: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1169: x_msg_count OUT NOCOPY NUMBER,
1170: x_msg_data OUT NOCOPY VARCHAR2,
1171: x_return_status OUT NOCOPY Varchar2 )
1172: IS

Line 1216: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1212:
1213:
1214: Begin
1215:
1216: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1217:
1218:
1219: /*** get sll info for a given rule id**/
1220:

Line 1236: OKC_API.set_message(G_PKG_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'BILLING SCHEDULE TYPE NOT FOUND.');

1232:
1233: If l_bill_type_csr%Notfound then
1234: Close l_bill_type_Csr;
1235: x_return_status := 'E';
1236: OKC_API.set_message(G_PKG_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'BILLING SCHEDULE TYPE NOT FOUND.');
1237: RAISE G_EXCEPTION_HALT_VALIDATION;
1238: End If;
1239: Close l_bill_type_Csr;
1240:

Line 1290: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1286: p_api_version IN NUMBER,
1287: p_terminated_date IN DATE,
1288: p_chr_id IN NUMBER,
1289: p_cle_id IN NUMBER ,
1290: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1291: x_return_status OUT NOCOPY VARCHAR2,
1292: x_msg_count OUT NOCOPY NUMBER,
1293: x_msg_data OUT NOCOPY VARCHAR2
1294: )

Line 1312: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1308:
1309:
1310: BEGIN
1311:
1312: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1313:
1314: IF p_cle_id is NULL THEN /* when input parm is p_chr_id */
1315: DELETE FROM OKS_LEVEL_ELEMENTS
1316: WHERE Date_Completed is NULL

Line 1354: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1350:
1351: /*** deleting rules ***/
1352: PROCEDURE delete_rule(
1353: p_api_version IN NUMBER,
1354: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1355: p_chr_id IN NUMBER,
1356: x_return_status OUT NOCOPY VARCHAR2,
1357: x_msg_count OUT NOCOPY NUMBER,
1358: x_msg_data OUT NOCOPY VARCHAR2) IS

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

1357: x_msg_count OUT NOCOPY NUMBER,
1358: x_msg_data OUT NOCOPY VARCHAR2) IS
1359:
1360:
1361: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1362: i NUMBER := 1;
1363:
1364: cursor rule_csr Is
1365: select rul.id

Line 1387: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1383: END LOOP;
1384:
1385: close rule_csr;
1386:
1387: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1388:
1389: IF p_rulv_tbl.COUNT > 0 THEN
1390:
1391: OKC_RULE_PUB.delete_rule(

Line 1399: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1395: x_msg_count => x_msg_count,
1396: x_msg_data => x_msg_data,
1397: p_rulv_tbl => p_rulv_tbl);
1398:
1399: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1400: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1401: x_return_status := l_return_status;
1402: raise G_EXCEPTION_HALT_VALIDATION;
1403: ELSE

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

1396: x_msg_data => x_msg_data,
1397: p_rulv_tbl => p_rulv_tbl);
1398:
1399: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1400: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1401: x_return_status := l_return_status;
1402: raise G_EXCEPTION_HALT_VALIDATION;
1403: ELSE
1404: x_return_status := l_return_status;

Line 1417: OKC_API.SET_MESSAGE(

1413: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1414: NULL;
1415: WHEN OTHERS THEN
1416: -- store SQL error message on message stack
1417: OKC_API.SET_MESSAGE(
1418: p_app_name => G_APP_NAME,
1419: p_msg_name => G_UNEXPECTED_ERROR,
1420: p_token1 => G_SQLCODE_TOKEN,
1421: p_token1_value => SQLCODE,

Line 1425: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1421: p_token1_value => SQLCODE,
1422: p_token2 => G_SQLERRM_TOKEN,
1423: p_token2_value => SQLERRM);
1424: -- notify caller of an error as UNEXPETED error
1425: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1426:
1427: END Delete_Rule;
1428:
1429:

Line 1434: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1430: /*** deleting rules ***/
1431:
1432: PROCEDURE delete_slh_rule(
1433: p_api_version IN NUMBER,
1434: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1435: p_cle_id IN NUMBER,
1436: x_return_status OUT NOCOPY VARCHAR2,
1437: x_msg_count OUT NOCOPY NUMBER,
1438: x_msg_data OUT NOCOPY VARCHAR2)

Line 1442: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1438: x_msg_data OUT NOCOPY VARCHAR2)
1439: IS
1440: BEGIN
1441:
1442: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1443:
1444: UPDATE oks_k_lines_b SET billing_schedule_type = NULL
1445: WHERE cle_id =p_cle_id;
1446:

Line 1453: OKC_API.SET_MESSAGE(

1449: EXCEPTION
1450:
1451: WHEN OTHERS THEN
1452: -- store SQL error message on message stack
1453: OKC_API.SET_MESSAGE(
1454: p_app_name => G_APP_NAME,
1455: p_msg_name => G_UNEXPECTED_ERROR,
1456: p_token1 => G_SQLCODE_TOKEN,
1457: p_token1_value => SQLCODE,

Line 1461: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1457: p_token1_value => SQLCODE,
1458: p_token2 => G_SQLERRM_TOKEN,
1459: p_token2_value => SQLERRM);
1460: -- notify caller of an error as UNEXPETED error
1461: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1462:
1463: END Delete_SLH_Rule;
1464:
1465:

Line 1484: x_rev_tbl(i).id := OKC_API.G_MISS_NUM;

1480: i NUMBER := 1;
1481: begin
1482: for rev_rec in rev_cur
1483: loop
1484: x_rev_tbl(i).id := OKC_API.G_MISS_NUM;
1485: x_rev_tbl(i).chr_id := rev_rec.chr_id;
1486: x_rev_tbl(i).account_class := rev_rec.account_class;
1487: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1488: x_rev_tbl(i).percent := rev_rec.percent;

Line 1489: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;

1485: x_rev_tbl(i).chr_id := rev_rec.chr_id;
1486: x_rev_tbl(i).account_class := rev_rec.account_class;
1487: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1488: x_rev_tbl(i).percent := rev_rec.percent;
1489: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;

Line 1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;

1486: x_rev_tbl(i).account_class := rev_rec.account_class;
1487: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1488: x_rev_tbl(i).percent := rev_rec.percent;
1489: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1494: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;

Line 1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;

1487: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1488: x_rev_tbl(i).percent := rev_rec.percent;
1489: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1494: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1495: i := i + 1;

Line 1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;

1488: x_rev_tbl(i).percent := rev_rec.percent;
1489: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1494: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1495: i := i + 1;
1496: end loop;

Line 1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;

1489: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1494: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1495: i := i + 1;
1496: end loop;
1497: end get_rev_distr;

Line 1494: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;

1490: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1491: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1492: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1493: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1494: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1495: i := i + 1;
1496: end loop;
1497: end get_rev_distr;
1498:

Line 1538: x_scrv_tbl(i).id := OKC_API.G_MISS_NUM;

1534: i NUMBER := 1;
1535: begin
1536: for scrv_rec in scrv_cur
1537: loop
1538: x_scrv_tbl(i).id := OKC_API.G_MISS_NUM;
1539: x_scrv_tbl(i).percent := scrv_rec.percent;
1540: x_scrv_tbl(i).chr_id := scrv_rec.chr_id;
1541: x_scrv_tbl(i).ctc_id := scrv_rec.ctc_id;
1542: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;

Line 1544: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;

1540: x_scrv_tbl(i).chr_id := scrv_rec.chr_id;
1541: x_scrv_tbl(i).ctc_id := scrv_rec.ctc_id;
1542: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;
1543: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1544: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1545: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1546: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1547: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1548: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;

Line 1545: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;

1541: x_scrv_tbl(i).ctc_id := scrv_rec.ctc_id;
1542: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;
1543: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1544: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1545: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1546: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1547: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1548: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1549: i := i + 1;

Line 1546: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;

1542: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;
1543: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1544: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1545: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1546: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1547: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1548: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1549: i := i + 1;
1550: end loop;

Line 1547: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;

1543: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1544: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1545: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1546: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1547: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1548: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1549: i := i + 1;
1550: end loop;
1551: end get_sales_cred;

Line 1548: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;

1544: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1545: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1546: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1547: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1548: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1549: i := i + 1;
1550: end loop;
1551: end get_sales_cred;
1552:

Line 1632: x_status := OKC_API.G_RET_STS_SUCCESS;

1628: Open subline_count;
1629: Fetch subline_count into l_count;
1630: Close subline_count;
1631: If l_count = 0 Then
1632: x_status := OKC_API.G_RET_STS_SUCCESS;
1633: return;
1634: End If;
1635: i := 1;
1636: For subline in subline_cur

Line 1699: OKC_API.set_message(G_PKG_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LINE NOT FOUND');

1695:
1696: If l_Line_Csr%Notfound then
1697: Close l_Line_Csr;
1698: x_status := 'E';
1699: OKC_API.set_message(G_PKG_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LINE NOT FOUND');
1700: RAISE G_EXCEPTION_HALT_VALIDATION;
1701: End If;
1702: Close l_Line_Csr;
1703:

Line 1788: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1784: l_rulv_tbl_in(1).rule_information1 := p_info1;
1785: l_rulv_tbl_in(1).rule_information2 := p_info2;
1786: l_rulv_tbl_in(1).rule_information3 := p_info3;
1787: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1788: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1789: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1790: l_rulv_tbl_in(1).creation_date := SYSDATE;
1791: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1792: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 1789: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1785: l_rulv_tbl_in(1).rule_information2 := p_info2;
1786: l_rulv_tbl_in(1).rule_information3 := p_info3;
1787: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1788: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1789: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1790: l_rulv_tbl_in(1).creation_date := SYSDATE;
1791: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1792: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1793: OKC_RULE_PUB.create_rule(

Line 1791: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1787: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1788: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1789: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1790: l_rulv_tbl_in(1).creation_date := SYSDATE;
1791: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1792: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1793: OKC_RULE_PUB.create_rule(
1794: p_api_version => l_api_version,
1795: x_return_status => x_status,

Line 1802: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;

1798: p_rulv_tbl => l_rulv_tbl_in,
1799: x_rulv_tbl => l_rulv_tbl_out);
1800: Else
1801: l_rulv_tbl_in(1).id := l_rule_id;
1802: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1803: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1804: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1805: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1806: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;

Line 1803: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;

1799: x_rulv_tbl => l_rulv_tbl_out);
1800: Else
1801: l_rulv_tbl_in(1).id := l_rule_id;
1802: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1803: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1804: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1805: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1806: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1807: l_rulv_tbl_in(1).rule_information1 := p_info1;

Line 1804: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;

1800: Else
1801: l_rulv_tbl_in(1).id := l_rule_id;
1802: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1803: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1804: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1805: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1806: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1807: l_rulv_tbl_in(1).rule_information1 := p_info1;
1808: l_rulv_tbl_in(1).rule_information2 := p_info2;

Line 1805: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;

1801: l_rulv_tbl_in(1).id := l_rule_id;
1802: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1803: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1804: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1805: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1806: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1807: l_rulv_tbl_in(1).rule_information1 := p_info1;
1808: l_rulv_tbl_in(1).rule_information2 := p_info2;
1809: l_rulv_tbl_in(1).rule_information3 := p_info3;

Line 1806: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;

1802: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1803: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1804: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1805: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1806: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1807: l_rulv_tbl_in(1).rule_information1 := p_info1;
1808: l_rulv_tbl_in(1).rule_information2 := p_info2;
1809: l_rulv_tbl_in(1).rule_information3 := p_info3;
1810: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;

Line 1811: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1807: l_rulv_tbl_in(1).rule_information1 := p_info1;
1808: l_rulv_tbl_in(1).rule_information2 := p_info2;
1809: l_rulv_tbl_in(1).rule_information3 := p_info3;
1810: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1811: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1812: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1813: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1814: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1815: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

Line 1812: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1808: l_rulv_tbl_in(1).rule_information2 := p_info2;
1809: l_rulv_tbl_in(1).rule_information3 := p_info3;
1810: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1811: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1812: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1813: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1814: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1815: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1816: OKC_RULE_PUB.update_rule(

Line 1813: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;

1809: l_rulv_tbl_in(1).rule_information3 := p_info3;
1810: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1811: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1812: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1813: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1814: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1815: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1816: OKC_RULE_PUB.update_rule(
1817: p_api_version => l_api_version,

Line 1814: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1810: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1811: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1812: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1813: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1814: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1815: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1816: OKC_RULE_PUB.update_rule(
1817: p_api_version => l_api_version,
1818: x_return_status => x_status,

Line 1815: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

1811: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1812: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1813: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1814: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1815: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1816: OKC_RULE_PUB.update_rule(
1817: p_api_version => l_api_version,
1818: x_return_status => x_status,
1819: x_msg_count => l_msg_count,

Line 1829: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;

1825:
1826: procedure update_header_amount(p_cle_id IN NUMBER,
1827: x_status OUT NOCOPY VARCHAR2) IS
1828: l_api_version CONSTANT NUMBER := 1.0;
1829: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;
1830: l_return_status VARCHAR2(1);
1831: l_msg_count NUMBER;
1832: l_msg_data VARCHAR2(2000);
1833: l_msg_index_out NUMBER;

Line 1843: x_status := OKC_API.G_RET_STS_SUCCESS;

1839: from okc_k_lines_b
1840: where dnz_chr_id = p_chr_id
1841: and lse_id in (7,8,9,10,11,35,13,18,25);
1842: Begin
1843: x_status := OKC_API.G_RET_STS_SUCCESS;
1844: If p_cle_id IS NOT NULL Then
1845: For cur_total_amount IN total_amount(g_chr_id)
1846: loop
1847: l_chrv_tbl_in(1).id := g_chr_id;

Line 1894: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1890: where cle_id = p_cle_id;
1891: G_ERROR EXCEPTION;
1892: Begin
1893: If p_target_tbl.COUNT = 0 Then
1894: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1895: return;
1896: End If;
1897: Open header_cur;
1898: Fetch header_cur into g_chr_id;

Line 1941: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1937: p_from_cle_id => p_source_rec.cle_id,
1938: p_to_chr_id => g_chr_id,
1939: x_cle_id => p_target_tbl(idx).cle_id);
1940: --errorout('Copy line status: '||x_return_status);
1941: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1942: x_return_status := l_return_status;
1943: Raise G_ERROR;
1944: End If;
1945:

Line 1955: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1951:
1952: OKS_SETUP_UTIL_PUB.update_line_numbers(p_chr_id => g_chr_id,
1953: p_cle_id => p_target_tbl(idx).cle_id,
1954: x_return_status => l_return_status);
1955: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1956: x_return_status := l_return_status;
1957: Raise G_ERROR;
1958: End If;
1959: If l_rev_found Then

Line 1962: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1958: End If;
1959: If l_rev_found Then
1960: create_rev_distr(p_target_tbl(idx).cle_id, l_rev_tbl, l_return_status);
1961: --errorout('Create_rev_distr status: '||l_return_status);
1962: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1963: x_return_status := l_return_status;
1964: Raise G_ERROR;
1965: End If;
1966: End If;

Line 1970: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1966: End If;
1967: If l_scr_found Then
1968: create_sales_cred(p_target_tbl(idx).cle_id, l_salescr_tbl, l_return_status);
1969: --errorout('create_sales_cred status: '||l_return_status);
1970: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1971: x_return_status := l_return_status;
1972: Raise G_ERROR;
1973: End If;
1974: End If;

Line 1990: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1986: --errorout('Target Table('||idx||').percent: '||p_target_tbl(idx).percentage);
1987: --errorout('=====');
1988: update_line_item(p_target_tbl(idx).cle_id, p_target_tbl(idx).item_id, l_return_status);
1989: --errorout('update_line_item status: '||l_return_status);
1990: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1991: x_return_status := l_return_status;
1992: Raise G_ERROR;
1993: End If;
1994: If p_target_tbl(idx).percentage <> 100 Then

Line 1997: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1993: End If;
1994: If p_target_tbl(idx).percentage <> 100 Then
1995: prorate_amount(p_target_tbl(idx).cle_id, p_target_tbl(idx).percentage, p_target_tbl(idx).amount, l_return_status);
1996: --errorout('prorate_amount status: '||l_return_status);
1997: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1998: x_return_status := l_return_status;
1999: Raise G_ERROR;
2000: End If;
2001: refresh_bill_sch(p_target_tbl(idx).cle_id, l_rgp_id, l_return_status);

Line 2004: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2000: End If;
2001: refresh_bill_sch(p_target_tbl(idx).cle_id, l_rgp_id, l_return_status);
2002: --errorout('refresh_bill_sch status: '||l_return_status);
2003: --errorout('rgp_id: '||l_rgp_id);
2004: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2005: x_return_status := l_return_status;
2006: Raise G_ERROR;
2007: End If;
2008: Else

Line 2020: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2016: p_target_tbl(idx).item_id,
2017: p_source_rec.cle_id,
2018: l_return_status);
2019: --errorout('create_USV_rule status: '||l_return_status);
2020: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2021: x_return_status := l_return_status;
2022: Raise G_ERROR;
2023: End If;
2024: l_total_pct := l_total_pct + p_target_tbl(idx).percentage;

Line 2032: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2028: If l_total_pct <> 100 Then
2029: null;
2030: update_header_amount(p_source_rec.cle_id, l_return_status);
2031: --errorout('update_header_amount status: '||l_return_status);
2032: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2033: x_return_status := l_return_status;
2034: Raise G_ERROR;
2035: End If;
2036: End If;

Line 2037: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2033: x_return_status := l_return_status;
2034: Raise G_ERROR;
2035: End If;
2036: End If;
2037: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2038: --errorout('SUCCESS');
2039: Exception
2040: When G_ERROR Then
2041: /*

Line 2053: OKC_API.set_message(OKC_API.G_APP_NAME,

2049: End Loop;
2050: */
2051: Null;
2052: When Others Then
2053: OKC_API.set_message(OKC_API.G_APP_NAME,
2054: 'OKS_UNEXP_ERROR',
2055: 'SQLcode',
2056: SQLCODE,
2057: 'SQLerrm',

Line 2060: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2056: SQLCODE,
2057: 'SQLerrm',
2058: SQLERRM);
2059: -- notify caller of an UNEXPECTED error
2060: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2061: End copy_service;
2062:
2063: /** End of Code for changing/splitting service lines **/
2064:

Line 2069: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2065:
2066: /****FOR USAGE BILLING*********/
2067: Procedure Calculate_Bill_Amount (
2068: p_api_version IN NUMBER,
2069: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2070: p_bill_tbl IN OUT NOCOPY Bill_tbl_type,
2071: x_return_status OUT NOCOPY VARCHAR2,
2072: x_msg_count OUT NOCOPY NUMBER,
2073: x_msg_data OUT NOCOPY VARCHAR2)

Line 2106: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2102: v_index NUMBER;
2103:
2104:
2105: BEGIN
2106: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2107:
2108: --------errorout_ad('count = ' || p_bill_tbl.COUNT);
2109:
2110: IF p_bill_tbl.COUNT <= 0 THEN

Line 2111: x_return_status := OKC_API.G_RET_STS_ERROR;

2107:
2108: --------errorout_ad('count = ' || p_bill_tbl.COUNT);
2109:
2110: IF p_bill_tbl.COUNT <= 0 THEN
2111: x_return_status := OKC_API.G_RET_STS_ERROR;
2112: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'NO RECORDS PASSED');
2113: Raise G_EXCEPTION_HALT_VALIDATION;
2114: END IF;
2115:

Line 2112: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'NO RECORDS PASSED');

2108: --------errorout_ad('count = ' || p_bill_tbl.COUNT);
2109:
2110: IF p_bill_tbl.COUNT <= 0 THEN
2111: x_return_status := OKC_API.G_RET_STS_ERROR;
2112: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'NO RECORDS PASSED');
2113: Raise G_EXCEPTION_HALT_VALIDATION;
2114: END IF;
2115:
2116: ---FIND OUT LAST READING from the table and clculate net reading for each record

Line 2161: x_return_status := OKC_API.G_RET_STS_ERROR;

2157: FETCH l_usage_line_csr INTO l_usage_line_rec;
2158:
2159: IF l_usage_line_csr%NOTFOUND THEN
2160: CLOSE l_usage_line_csr;
2161: x_return_status := OKC_API.G_RET_STS_ERROR;
2162: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'USAGE LINE NOT FOUND FOR THE COUNTER');
2163: Raise G_EXCEPTION_HALT_VALIDATION;
2164: END IF;
2165: CLOSE l_usage_line_csr;

Line 2162: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'USAGE LINE NOT FOUND FOR THE COUNTER');

2158:
2159: IF l_usage_line_csr%NOTFOUND THEN
2160: CLOSE l_usage_line_csr;
2161: x_return_status := OKC_API.G_RET_STS_ERROR;
2162: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'USAGE LINE NOT FOUND FOR THE COUNTER');
2163: Raise G_EXCEPTION_HALT_VALIDATION;
2164: END IF;
2165: CLOSE l_usage_line_csr;
2166: --------errorout_ad('usage line id for ' || v_index || 'line = ' || l_usage_line_rec.usage_id);

Line 2192: OKC_API.set_message(G_APP_NAME,'CALCULATE PRICE ERROR');

2188: X_MSG_DATA => x_msg_data);
2189:
2190:
2191: IF x_return_status <> 'S' Then
2192: OKC_API.set_message(G_APP_NAME,'CALCULATE PRICE ERROR');
2193: Raise G_EXCEPTION_HALT_VALIDATION;
2194: End If;
2195:
2196: /*****

Line 2221: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2217:
2218: WHEN G_EXCEPTION_HALT_VALIDATION Then
2219: NULL;
2220: WHEN OTHERS THEN
2221: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2222: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2223:
2224: END Calculate_Bill_Amount;
2225:

Line 2222: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2218: WHEN G_EXCEPTION_HALT_VALIDATION Then
2219: NULL;
2220: WHEN OTHERS THEN
2221: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2222: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2223:
2224: END Calculate_Bill_Amount;
2225:
2226: Function Get_Credit_Amount (p_api_version IN Varchar2,

Line 2228: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2224: END Calculate_Bill_Amount;
2225:
2226: Function Get_Credit_Amount (p_api_version IN Varchar2,
2227: p_cp_line_id IN Number,
2228: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2229: x_return_status OUT NOCOPY VARCHAR2,
2230: x_msg_count OUT NOCOPY NUMBER,
2231: x_msg_data OUT NOCOPY VARCHAR2)
2232: RETURN NUMBER

Line 2261: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2257:
2258: EXCEPTION
2259:
2260: WHEN OTHERS THEN
2261: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2262: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2263:
2264: END Get_Credit_Amount;
2265:

Line 2262: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2258: EXCEPTION
2259:
2260: WHEN OTHERS THEN
2261: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2262: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2263:
2264: END Get_Credit_Amount;
2265:
2266: /* ****** ------------------- Procedures for creating Billing report ------------------------ ****** */

Line 2283: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2279: l_line_id1 Varchar2(100) ;
2280: l_line_id2 Varchar2(100);
2281:
2282: Begin
2283: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2284: l_tbl_idx := l_lines_tbl_tmp.FIRST;
2285:
2286: While l_tbl_idx Is Not Null
2287: Loop

Line 2301: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2297: l_tbl_idx := l_lines_tbl_tmp.NEXT(l_tbl_idx) ;
2298: End Loop;
2299:
2300: x_lines_table := l_lines_tbl_tmp ;
2301: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2302:
2303: Exception When Others Then
2304:
2305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2301: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2302:
2303: Exception When Others Then
2304:
2305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2306: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_lines Error ' || sqlerrm);
2307:
2308: OKC_API.SET_MESSAGE
2309: (P_App_Name => G_APP_NAME

Line 2308: OKC_API.SET_MESSAGE

2304:
2305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2306: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_lines Error ' || sqlerrm);
2307:
2308: OKC_API.SET_MESSAGE
2309: (P_App_Name => G_APP_NAME
2310: ,P_Msg_Name => G_UNEXPECTED_ERROR
2311: ,P_Token1 => G_SQLCODE_TOKEN
2312: ,P_Token1_Value => SQLCODE

Line 2334: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2330: l_line_id1 Varchar2(100) ;
2331: l_line_id2 Varchar2(100);
2332:
2333: Begin
2334: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2335: l_tbl_idx := l_sub_lines_tbl_tmp.FIRST;
2336:
2337: While l_tbl_idx Is Not Null
2338: Loop

Line 2352: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2348: l_tbl_idx := l_sub_lines_tbl_tmp.NEXT(l_tbl_idx) ;
2349: End Loop;
2350:
2351: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2352: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2353:
2354: Exception When Others Then
2355:
2356: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_sub_lines Error ' || sqlerrm);

Line 2357: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2353:
2354: Exception When Others Then
2355:
2356: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_sub_lines Error ' || sqlerrm);
2357: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2358:
2359: OKC_API.SET_MESSAGE
2360: (P_App_Name => G_APP_NAME
2361: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 2359: OKC_API.SET_MESSAGE

2355:
2356: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_sub_lines Error ' || sqlerrm);
2357: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2358:
2359: OKC_API.SET_MESSAGE
2360: (P_App_Name => G_APP_NAME
2361: ,P_Msg_Name => G_UNEXPECTED_ERROR
2362: ,P_Token1 => G_SQLCODE_TOKEN
2363: ,P_Token1_Value => SQLCODE

Line 2387: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2383: l_line_id2 Varchar2(95);
2384:
2385: Begin
2386:
2387: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2388: l_out_tbl_idx := l_lines_tbl_tmp.FIRST;
2389:
2390: While l_out_tbl_idx is Not Null
2391: Loop

Line 2416: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2412:
2413: End Loop ;
2414:
2415: x_lines_table := l_lines_tbl_tmp ;
2416: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2417:
2418: Exception When Others Then
2419: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_lines_table Error ' || sqlerrm);
2420: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2420: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2416: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2417:
2418: Exception When Others Then
2419: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_lines_table Error ' || sqlerrm);
2420: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2421: OKC_API.SET_MESSAGE
2422: (P_App_Name => G_APP_NAME
2423: ,P_Msg_Name => G_UNEXPECTED_ERROR
2424: ,P_Token1 => G_SQLCODE_TOKEN

Line 2421: OKC_API.SET_MESSAGE

2417:
2418: Exception When Others Then
2419: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_lines_table Error ' || sqlerrm);
2420: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2421: OKC_API.SET_MESSAGE
2422: (P_App_Name => G_APP_NAME
2423: ,P_Msg_Name => G_UNEXPECTED_ERROR
2424: ,P_Token1 => G_SQLCODE_TOKEN
2425: ,P_Token1_Value => SQLCODE

Line 2451: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2447: l_sub_line_id2 Varchar2(135);
2448:
2449: Begin
2450:
2451: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2452: l_out_tbl_idx := l_sub_lines_tbl_tmp.FIRST;
2453:
2454: While l_out_tbl_idx is Not Null
2455: Loop

Line 2482: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2478:
2479: End Loop ;
2480:
2481: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2482: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2483:
2484: Exception When Others Then
2485: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_sub_lines_table Error ' || sqlerrm);
2486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2482: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2483:
2484: Exception When Others Then
2485: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_sub_lines_table Error ' || sqlerrm);
2486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2487: OKC_API.SET_MESSAGE
2488: (P_App_Name => G_APP_NAME
2489: ,P_Msg_Name => G_UNEXPECTED_ERROR
2490: ,P_Token1 => G_SQLCODE_TOKEN

Line 2487: OKC_API.SET_MESSAGE

2483:
2484: Exception When Others Then
2485: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_sub_lines_table Error ' || sqlerrm);
2486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2487: OKC_API.SET_MESSAGE
2488: (P_App_Name => G_APP_NAME
2489: ,P_Msg_Name => G_UNEXPECTED_ERROR
2490: ,P_Token1 => G_SQLCODE_TOKEN
2491: ,P_Token1_Value => SQLCODE

Line 2513: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2509: l_line_id Number := 0;
2510:
2511: Begin
2512:
2513: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2514: l_in_tbl_idx := p_sub_lines_table.FIRST ;
2515:
2516: While l_in_tbl_idx is Not Null
2517: Loop

Line 2540: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2536:
2537: End Loop ;
2538:
2539: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2540: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2541:
2542: Exception When Others Then
2543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2544: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sub_lines_bill_status Error ' || sqlerrm);

Line 2543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2539: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2540: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2541:
2542: Exception When Others Then
2543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2544: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sub_lines_bill_status Error ' || sqlerrm);
2545: OKC_API.SET_MESSAGE
2546: (P_App_Name => G_APP_NAME
2547: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 2545: OKC_API.SET_MESSAGE

2541:
2542: Exception When Others Then
2543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2544: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sub_lines_bill_status Error ' || sqlerrm);
2545: OKC_API.SET_MESSAGE
2546: (P_App_Name => G_APP_NAME
2547: ,P_Msg_Name => G_UNEXPECTED_ERROR
2548: ,P_Token1 => G_SQLCODE_TOKEN
2549: ,P_Token1_Value => SQLCODE

Line 2614: Return(OKC_API.G_RET_STS_UNEXP_ERROR );

2610: Return (l_bill_profile);
2611:
2612: Exception When Others then
2613: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Billig_Profile Error ' || sqlerrm);
2614: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2615: OKC_API.SET_MESSAGE
2616: (P_App_Name => G_APP_NAME
2617: ,P_Msg_Name => G_UNEXPECTED_ERROR
2618: ,P_Token1 => G_SQLCODE_TOKEN

Line 2615: OKC_API.SET_MESSAGE

2611:
2612: Exception When Others then
2613: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Billig_Profile Error ' || sqlerrm);
2614: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2615: OKC_API.SET_MESSAGE
2616: (P_App_Name => G_APP_NAME
2617: ,P_Msg_Name => G_UNEXPECTED_ERROR
2618: ,P_Token1 => G_SQLCODE_TOKEN
2619: ,P_Token1_Value => SQLCODE

Line 2643: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2639:
2640: l_bill_profile Varchar2(100) := Null;
2641:
2642: Begin
2643: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2644:
2645:
2646: /* **** set the billing profile value for Summary billing **** */
2647:

Line 2655: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then

2651: l_bill_profile := Null;
2652:
2653: l_bill_profile := Get_Billig_Profile(l_lines_tbl_copy(l_lines_tbl_idx).Dnz_Chr_Id );
2654:
2655: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then
2656: If l_bill_profile = 'Y' then
2657: l_lines_tbl_copy(l_lines_tbl_idx).Summary_bill_YN := 'Y' ;
2658: Else
2659: l_lines_tbl_copy(l_lines_tbl_idx).Summary_bill_YN := 'N' ;

Line 2673: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then

2669: l_bill_profile := Null;
2670:
2671: l_bill_profile := Get_Billig_Profile(l_sub_lines_tbl_copy(l_slines_tbl_idx).Dnz_Chr_Id );
2672:
2673: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then
2674: If l_bill_profile = 'Y' then
2675: l_sub_lines_tbl_copy(l_slines_tbl_idx).Summary_bill_YN := 'Y' ;
2676: Else
2677: l_sub_lines_tbl_copy(l_slines_tbl_idx).Summary_bill_YN := 'N' ;

Line 2690: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

2686: x_sub_lines_table := l_sub_lines_tbl_copy;
2687:
2688:
2689: Exception When Others Then
2690: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
2691: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Set_Billing_Profile Error ' || sqlerrm);
2692: OKC_API.SET_MESSAGE
2693: (P_App_Name => G_APP_NAME
2694: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 2692: OKC_API.SET_MESSAGE

2688:
2689: Exception When Others Then
2690: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
2691: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Set_Billing_Profile Error ' || sqlerrm);
2692: OKC_API.SET_MESSAGE
2693: (P_App_Name => G_APP_NAME
2694: ,P_Msg_Name => G_UNEXPECTED_ERROR
2695: ,P_Token1 => G_SQLCODE_TOKEN
2696: ,P_Token1_Value => SQLCODE

Line 2803: Return(OKC_API.G_RET_STS_UNEXP_ERROR );

2799:
2800:
2801: Exception When Others then
2802: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Sub_Line_Name Error ' || sqlerrm);
2803: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2804: OKC_API.SET_MESSAGE
2805: (P_App_Name => G_APP_NAME
2806: ,P_Msg_Name => G_UNEXPECTED_ERROR
2807: ,P_Token1 => G_SQLCODE_TOKEN

Line 2804: OKC_API.SET_MESSAGE

2800:
2801: Exception When Others then
2802: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Sub_Line_Name Error ' || sqlerrm);
2803: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2804: OKC_API.SET_MESSAGE
2805: (P_App_Name => G_APP_NAME
2806: ,P_Msg_Name => G_UNEXPECTED_ERROR
2807: ,P_Token1 => G_SQLCODE_TOKEN
2808: ,P_Token1_Value => SQLCODE

Line 2831: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2827: l_currency_cd1 Varchar2(15) ;
2828: l_currency_cd2 Varchar2(15);
2829:
2830: Begin
2831: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2832: l_tbl_idx := l_currency_table_tmp.FIRST;
2833:
2834: While l_tbl_idx Is Not Null
2835: Loop

Line 2849: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2845: l_tbl_idx := l_currency_table_tmp.NEXT(l_tbl_idx) ;
2846: End Loop;
2847:
2848: x_currency_table := l_currency_table_tmp ;
2849: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2850:
2851: Exception When Others Then
2852:
2853: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2853: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2849: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2850:
2851: Exception When Others Then
2852:
2853: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2854: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_currency_code Error ' || sqlerrm);
2855:
2856: OKC_API.SET_MESSAGE
2857: (P_App_Name => G_APP_NAME

Line 2856: OKC_API.SET_MESSAGE

2852:
2853: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2854: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_currency_code Error ' || sqlerrm);
2855:
2856: OKC_API.SET_MESSAGE
2857: (P_App_Name => G_APP_NAME
2858: ,P_Msg_Name => G_UNEXPECTED_ERROR
2859: ,P_Token1 => G_SQLCODE_TOKEN
2860: ,P_Token1_Value => SQLCODE

Line 2887: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2883: l_currency_cd2 Varchar2(15);
2884:
2885: Begin
2886:
2887: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2888: l_out_tbl_idx := l_currency_tbl_tmp.FIRST;
2889:
2890: While l_out_tbl_idx is Not Null
2891: Loop

Line 2914: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2910:
2911: End Loop ;
2912:
2913: x_currency_table := l_currency_tbl_tmp ;
2914: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2915:
2916: Exception When Others Then
2917: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_currency_table Error ' || sqlerrm);
2918: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2918: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2914: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2915:
2916: Exception When Others Then
2917: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_currency_table Error ' || sqlerrm);
2918: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2919: OKC_API.SET_MESSAGE
2920: (P_App_Name => G_APP_NAME
2921: ,P_Msg_Name => G_UNEXPECTED_ERROR
2922: ,P_Token1 => G_SQLCODE_TOKEN

Line 2919: OKC_API.SET_MESSAGE

2915:
2916: Exception When Others Then
2917: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_currency_table Error ' || sqlerrm);
2918: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2919: OKC_API.SET_MESSAGE
2920: (P_App_Name => G_APP_NAME
2921: ,P_Msg_Name => G_UNEXPECTED_ERROR
2922: ,P_Token1 => G_SQLCODE_TOKEN
2923: ,P_Token1_Value => SQLCODE

Line 2952: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2948: l_curreny_code Varchar(15) := Null;
2949: l_return_status Varchar2(30) ;
2950:
2951: Begin
2952: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2953:
2954: l_line_tbl_idx := l_lines_table_tmp.FIRST;
2955: l_curreny_code := 'X';
2956: l_currency_tbl_idx := 1 ;

Line 2996: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2992: ,x_currency_table => l_currency_table_tmp
2993: ,x_return_status => l_return_status
2994: ) ;
2995:
2996: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2997:
2998:
2999: l_currency_table_in := l_currency_table_tmp ;
3000: l_currency_table_tmp.DELETE ;*/

Line 3007: /* If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

3003: ,x_currency_table => l_currency_table_tmp
3004: ,x_return_status => l_return_status
3005: ) ;
3006: x_return_status := l_return_status ;
3007: /* If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
3008: x_return_status := l_return_status ;
3009: End If;
3010: Else
3011: x_return_status := l_return_status ;

Line 3019: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3015: x_currency_table_out := l_currency_table_tmp ;
3016:
3017: Exception When Others then
3018: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Currency_code Error ' || sqlerrm);
3019: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3020: OKC_API.SET_MESSAGE
3021: (P_App_Name => G_APP_NAME
3022: ,P_Msg_Name => G_UNEXPECTED_ERROR
3023: ,P_Token1 => G_SQLCODE_TOKEN

Line 3020: OKC_API.SET_MESSAGE

3016:
3017: Exception When Others then
3018: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Currency_code Error ' || sqlerrm);
3019: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3020: OKC_API.SET_MESSAGE
3021: (P_App_Name => G_APP_NAME
3022: ,P_Msg_Name => G_UNEXPECTED_ERROR
3023: ,P_Token1 => G_SQLCODE_TOKEN
3024: ,P_Token1_Value => SQLCODE

Line 3072: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3068: l_currency_desc VARCHAR2(100);
3069:
3070: Begin
3071:
3072: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3073:
3074: fnd_message.set_name ('OKS','OKS_BILLREP_CURRSUMM');
3075: l_msg := fnd_message.get;
3076: fnd_message.set_name ('OKS','OKS_BILLREP_CURVAL');

Line 3138: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3134: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, ' ' ) ;
3135: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, ' ' ) ;
3136:
3137: Exception When Others Then
3138: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3139: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_currency_break Error ' || sqlerrm);
3140: OKC_API.SET_MESSAGE
3141: (P_App_Name => G_APP_NAME
3142: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 3140: OKC_API.SET_MESSAGE

3136:
3137: Exception When Others Then
3138: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3139: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_currency_break Error ' || sqlerrm);
3140: OKC_API.SET_MESSAGE
3141: (P_App_Name => G_APP_NAME
3142: ,P_Msg_Name => G_UNEXPECTED_ERROR
3143: ,P_Token1 => G_SQLCODE_TOKEN
3144: ,P_Token1_Value => SQLCODE

Line 3278: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3274:
3275:
3276: Begin
3277:
3278: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3279:
3280:
3281: /* *** ---- Print the error message ---- *** */
3282:

Line 3498: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3494:
3495:
3496:
3497: Exception When Others Then
3498: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3499: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_Error_Report ' || sqlerrm);
3500: OKC_API.SET_MESSAGE
3501: (P_App_Name => G_APP_NAME
3502: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 3500: OKC_API.SET_MESSAGE

3496:
3497: Exception When Others Then
3498: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3499: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_Error_Report ' || sqlerrm);
3500: OKC_API.SET_MESSAGE
3501: (P_App_Name => G_APP_NAME
3502: ,P_Msg_Name => G_UNEXPECTED_ERROR
3503: ,P_Token1 => G_SQLCODE_TOKEN
3504: ,P_Token1_Value => SQLCODE

Line 3549: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3545:
3546: Create_Report_Exception Exception ;
3547:
3548: Begin
3549: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3550: l_return_status := Null;
3551:
3552:
3553:

Line 3611: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

3607: ,p_rejected_slines_total => p_billrep_table(i).Rejected_SubLines_Value
3608: ,x_return_status => l_return_status
3609: ) ;
3610:
3611: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
3612: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: PRINT_CURRENCY_BREAK procedure failed for : ' || p_billrep_table(i).Currency_code ||' Error: '||sqlerrm);
3613: x_return_status := l_return_status ;
3614: Raise Create_Report_Exception ;
3615: END IF;

Line 3641: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

3637: ,p_slines_rejected => l_slines_rejected
3638: ,x_return_status => l_return_status
3639: ) ;
3640:
3641: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
3642: x_return_status := l_return_status ;
3643: Raise Create_Report_Exception ;
3644: END IF;
3645:

Line 3650: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3646:
3647: EXCEPTION
3648:
3649: WHEN Create_Report_Exception Then
3650: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3651: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: Report Exception ***** '||sqlerrm) ;
3652: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3653: OKC_API.SET_MESSAGE
3654: (P_App_Name => G_APP_NAME

Line 3653: OKC_API.SET_MESSAGE

3649: WHEN Create_Report_Exception Then
3650: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3651: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: Report Exception ***** '||sqlerrm) ;
3652: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3653: OKC_API.SET_MESSAGE
3654: (P_App_Name => G_APP_NAME
3655: ,P_Msg_Name => G_UNEXPECTED_ERROR
3656: ,P_Token1 => G_SQLCODE_TOKEN
3657: ,P_Token1_Value => SQLCODE

Line 3662: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3658: ,P_Token2 => G_SQLERRM_TOKEN
3659: ,P_Token2_Value => SQLERRM);
3660:
3661: WHEN Others Then
3662: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3663: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: When Others ***** '||sqlerrm) ;
3664: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3665: OKC_API.SET_MESSAGE
3666: (P_App_Name => G_APP_NAME

Line 3665: OKC_API.SET_MESSAGE

3661: WHEN Others Then
3662: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3663: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: When Others ***** '||sqlerrm) ;
3664: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3665: OKC_API.SET_MESSAGE
3666: (P_App_Name => G_APP_NAME
3667: ,P_Msg_Name => G_UNEXPECTED_ERROR
3668: ,P_Token1 => G_SQLCODE_TOKEN
3669: ,P_Token1_Value => SQLCODE

Line 3706: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;

3702:
3703: SUBTYPE LEVEL_ID_TBL IS OKS_BILL_LEVEL_ELEMENTS_PVT.letv_tbl_type ;
3704: L_LEVEL_ID_TBL_IN LEVEL_ID_TBL ;
3705: L_LEVEL_ID_TBL_OUT LEVEL_ID_TBL ;
3706: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;
3707: l_msg_count number;
3708: l_msg_data Varchar2(2000);
3709: COUNTER NUMBER := 0 ;
3710: G_EXCEPTION_HALT_VALIDATION exception ;

Line 3767: X_RETURN_STATUS := OKC_API.G_RET_STS_UNEXP_ERROR;

3763: EXCEPTION
3764: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3765: X_RETURN_STATUS := L_RETURN_STATUS ;
3766: WHEN OTHERS THEN
3767: X_RETURN_STATUS := OKC_API.G_RET_STS_UNEXP_ERROR;
3768: OKC_API.SET_MESSAGE(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3769:
3770: END UPDATE_OKS_LEVEL_ELEMENTS ;
3771:

Line 3768: OKC_API.SET_MESSAGE(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

3764: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3765: X_RETURN_STATUS := L_RETURN_STATUS ;
3766: WHEN OTHERS THEN
3767: X_RETURN_STATUS := OKC_API.G_RET_STS_UNEXP_ERROR;
3768: OKC_API.SET_MESSAGE(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3769:
3770: END UPDATE_OKS_LEVEL_ELEMENTS ;
3771:
3772:

Line 3812: L_RETURN_STATUS VARCHAR2(4):= OKC_API.G_RET_STS_SUCCESS;

3808:
3809: L_BCL_EXISTS BOOLEAN ;
3810: L_BCL_DATES_UPDATE BOOLEAN ;
3811: L_SUB_LINES_INSERTED NUMBER ;
3812: L_RETURN_STATUS VARCHAR2(4):= OKC_API.G_RET_STS_SUCCESS;
3813: L_MSG_CNT NUMBER ;
3814: L_MSG_DATA VARCHAR2(2000);
3815: L_TOTAL_AMOUNT NUMBER := 0 ;
3816: L_LINE_ID NUMBER ;

Line 3873: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3869: P_BCLV_REC => L_BCLV_REC_IN,
3870: X_BCLV_REC => L_BCLV_REC_OUT
3871: );
3872:
3873: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3874: X_RETURN_STATUS := L_RETURN_STATUS;
3875: RAISE G_EXCEPTION_HALT_VALIDATION;
3876: END IF;
3877: END IF ;

Line 3887: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3883: L_BCL_ID := L_BCLV_REC_OUT.ID ;
3884: END IF ;
3885:
3886:
3887: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3888: L_LINE_ID := P_LINE_ID ;
3889: CREATE_BSL_FOR_OM( P_LINE_ID => L_LINE_ID ,
3890: P_BCL_ID => L_BCL_ID ,
3891: X_RETURN_STATUS => L_RETURN_STATUS,

Line 3894: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3890: P_BCL_ID => L_BCL_ID ,
3891: X_RETURN_STATUS => L_RETURN_STATUS,
3892: X_SUB_LINES_INSERTED => L_SUB_LINES_INSERTED,
3893: X_TOTAL_AMOUNT => L_TOTAL_AMOUNT) ;
3894: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3895: RAISE G_EXCEPTION_HALT_VALIDATION;
3896: END IF ;
3897: END IF ;
3898:

Line 3928: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3924: X_MSG_DATA => L_MSG_DATA,
3925: P_BCLV_REC => L_BCLV_REC_UPD_IN,
3926: X_BCLV_REC => L_BCLV_REC_UPD_OUT
3927: );
3928: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3929: X_RETURN_STATUS := L_RETURN_STATUS;
3930: RAISE G_EXCEPTION_HALT_VALIDATION;
3931: END IF;
3932: END IF ;

Line 3934: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3930: RAISE G_EXCEPTION_HALT_VALIDATION;
3931: END IF;
3932: END IF ;
3933:
3934: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3935: UPDATE_OKS_LEVEL_ELEMENTS(L_GET_OKS_LINES_REC.id ,
3936: X_RETURN_STATUS );
3937: IF (L_RETURN_STATUS <> 'S') THEN
3938: X_RETURN_STATUS := L_RETURN_STATUS;

Line 3949: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3945: EXCEPTION
3946: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3947: X_RETURN_STATUS := l_return_status ;
3948: When Others Then
3949: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3950: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3951:
3952: END CREATE_BCL_FOR_OM ;
3953:

Line 3950: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

3946: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3947: X_RETURN_STATUS := l_return_status ;
3948: When Others Then
3949: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3950: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3951:
3952: END CREATE_BCL_FOR_OM ;
3953:
3954:

Line 4002: X_RETURN_STATUS := OKC_API.G_RET_STS_SUCCESS ;

3998:
3999:
4000:
4001: BEGIN
4002: X_RETURN_STATUS := OKC_API.G_RET_STS_SUCCESS ;
4003: FOR L_GET_COVERED_LEVELS_REC IN L_GET_COVERED_LEVELS_CSR(P_LINE_ID )
4004: LOOP
4005: OPEN L_GET_BSL_CSR( L_GET_COVERED_LEVELS_REC.ID );
4006: FETCH L_GET_BSL_CSR INTO L_GET_BSL_REC ;

Line 4028: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4024: P_BSLV_REC => L_BSLV_REC_IN,
4025: X_BSLV_REC => L_BSLV_REC_OUT
4026: );
4027:
4028: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4029: RAISE G_EXCEPTION_HALT_VALIDATION;
4030: ELSE
4031: L_SUB_LINES_INSERTED := L_SUB_LINES_INSERTED + 1 ;
4032: L_TOTAL_AMOUNT := L_TOTAL_AMOUNT + L_GET_COVERED_LEVELS_REC.PRICE_NEGOTIATED ;

Line 4066: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4062: X_MSG_DATA => l_msg_data,
4063: p_bsdv_rec => l_bsdv_rec_in,
4064: x_bsdv_rec => l_bsdv_rec_out);
4065:
4066: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4067: RAISE G_EXCEPTION_HALT_VALIDATION;
4068: END IF; --chk for status
4069:
4070:

Line 4083: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4079: EXCEPTION
4080: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4081: X_RETURN_STATUS := L_RETURN_STATUS ;
4082: When Others Then
4083: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4084: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4085:
4086: END CREATE_BSL_FOR_OM ;
4087:

Line 4084: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

4080: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4081: X_RETURN_STATUS := L_RETURN_STATUS ;
4082: When Others Then
4083: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4084: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4085:
4086: END CREATE_BSL_FOR_OM ;
4087:
4088: ---This will give the billed qty for subcription line

Line 4131: x_return_status := OKC_API.G_RET_STS_SUCCESS;

4127:
4128:
4129: BEGIN
4130:
4131: x_return_status := OKC_API.G_RET_STS_SUCCESS;
4132:
4133: Open l_subscription_type_csr;
4134: Fetch l_subscription_type_csr Into l_subscription_type_rec;
4135:

Line 4204: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

4200: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4201: RETURN NULL;
4202:
4203: WHEN OTHERS THEN
4204: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4205: RETURN NULL;
4206: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4207:
4208: END Get_Billed_Qty;

Line 4206: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4202:
4203: WHEN OTHERS THEN
4204: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4205: RETURN NULL;
4206: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4207:
4208: END Get_Billed_Qty;
4209:
4210: Function Get_Billed_Upto ( p_id IN Number,

Line 4462: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN

4458: 'oks_billsubline_pub.insert_bill_subline_pub(x_return_status = '||x_return_status
4459: ||', bsl id = '|| L_BSLV_REC_OUT.id ||')');
4460: END IF;
4461:
4462: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN
4463: RAISE G_EXCEPTION_HALT_VALIDATION;
4464: END IF;
4465:
4466: ---update old bsl record

Line 4537: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN

4533: 'OKS_BSL_det_PUB.insert_bsl_det_Pub(x_return_status = '||x_return_status
4534: ||', bsd id = '|| l_bsdv_tbl_out(1).id ||')');
4535: END IF;
4536:
4537: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN
4538: RAISE G_EXCEPTION_HALT_VALIDATION;
4539: END IF;
4540:
4541: -------update old bsd amount

Line 4635: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN

4631: 'OKS_BILLTRAN_LINE_PUB.insert_Bill_Tran_Line_Pub(x_return_status = '||x_return_status
4632: ||', btl id = '|| l_btlv_tbl_out(1).id ||')');
4633: END IF;
4634:
4635: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN
4636: RAISE G_EXCEPTION_HALT_VALIDATION;
4637: END IF;
4638:
4639: IF l_btl_rec.split_flag IS NULL THEN

Line 4693: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,

4689: fnd_log.string(fnd_log.level_unexpected,G_MODULE_CURRENT||'.Adjust_billed_lvl_element.UNEXPECTED',
4690: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
4691: END IF;
4692:
4693: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
4694: p_msg_name => G_UNEXPECTED_ERROR,
4695: p_token1 => G_SQLCODE_TOKEN,
4696: p_token1_value => sqlcode,
4697: p_token2 => G_SQLERRM_TOKEN,

Line 4700: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4696: p_token1_value => sqlcode,
4697: p_token2 => G_SQLERRM_TOKEN,
4698: p_token2_value => sqlerrm);
4699:
4700: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4701:
4702:
4703: END ADJUST_SPLIT_BILL_REC;
4704: