eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

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 474: x_return_status := OKC_API.G_RET_STS_ERROR;

470: fnd_log.string(fnd_log.level_event,G_MODULE_CURRENT||'.get_seeded_timeunit.item_not_found_error',
471: 'time_code_unit: '|| p_timeunit || ' is inactive or does not exist');
472: END IF;
473: /* End of Code added for Bug#13078136*/
474: x_return_status := OKC_API.G_RET_STS_ERROR;
475: WHEN OTHERS THEN
476: /* OKC_API.SET_MESSAGE(p_app_name => g_app_name,
477: p_msg_name => g_unexpected_error,
478: p_token1 => g_sqlcode_token,

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

472: END IF;
473: /* End of Code added for Bug#13078136*/
474: x_return_status := OKC_API.G_RET_STS_ERROR;
475: WHEN OTHERS THEN
476: /* OKC_API.SET_MESSAGE(p_app_name => g_app_name,
477: p_msg_name => g_unexpected_error,
478: p_token1 => g_sqlcode_token,
479: p_token1_value => sqlcode,
480: p_token2 => g_col_name_token,

Line 485: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

481: p_token2_value => 'uom_code',
482: p_token3 => g_sqlerrm_token,
483: p_token3_value => sqlerrm);*/
484: -- notify caller of an UNEXPECTED error
485: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
486: END get_seeded_timeunit;
487:
488: /**** This procedure is to get prorated amount ****/
489:

Line 492: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

488: /**** This procedure is to get prorated amount ****/
489:
490: Procedure Get_prorate_amount
491: ( p_api_version IN NUMBER,
492: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
493: x_return_status OUT NOCOPY VARCHAR2,
494: x_msg_count OUT NOCOPY NUMBER,
495: x_msg_data OUT NOCOPY VARCHAR2,
496: p_invoicing_rule_id IN Number,

Line 608: x_return_status := OKC_API.G_RET_STS_ERROR;

604: x_return_status := 'S';
605:
606: EXCEPTION
607: WHEN OTHERS THEN
608: x_return_status := OKC_API.G_RET_STS_ERROR;
609:
610: END;
611:
612: Function Get_frequency

Line 669: x_return_status := OKC_API.G_RET_STS_ERROR;

665: RETURN l_frequency;
666:
667: EXCEPTION
668: WHEN OTHERS THEN
669: x_return_status := OKC_API.G_RET_STS_ERROR;
670: END ;
671:
672: -------------------------------------------------------------------------
673: -- Begin partial period computation logic

Line 681: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

677: -- Changed the logic for deriving l_next_billing_date
678: -------------------------------------------------------------------------
679: Procedure Get_next_bill_sch
680: ( p_api_version IN NUMBER,
681: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
682: x_return_status OUT NOCOPY VARCHAR2,
683: x_msg_count OUT NOCOPY NUMBER,
684: x_msg_data OUT NOCOPY VARCHAR2,
685: p_invoicing_rule_id IN Number,

Line 893: x_return_status := OKC_API.G_RET_STS_ERROR;

889: x_return_status := 'S';
890:
891: EXCEPTION
892: WHEN OTHERS THEN
893: x_return_status := OKC_API.G_RET_STS_ERROR;
894:
895: END;
896:
897: Procedure Get_next_level_element

Line 902: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

898: ( p_api_version IN NUMBER,
899: p_id IN NUMBER,
900: p_covd_flag IN VARCHAR2,
901: p_date IN DATE,
902: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
903: x_return_status OUT NOCOPY VARCHAR2,
904: x_msg_count OUT NOCOPY NUMBER,
905: x_msg_data OUT NOCOPY VARCHAR2,
906: x_next_level_element OUT NOCOPY LEVEL_ELEMENT_TAB

Line 1059: x_return_status := OKC_API.G_RET_STS_SUCCESS ;

1055: END IF ;
1056:
1057: END LOOP;
1058: CLOSE l_csr_level_elements;
1059: x_return_status := OKC_API.G_RET_STS_SUCCESS ;
1060:
1061: EXCEPTION
1062: WHEN OTHERS THEN
1063: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1063: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1059: x_return_status := OKC_API.G_RET_STS_SUCCESS ;
1060:
1061: EXCEPTION
1062: WHEN OTHERS THEN
1063: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1064: END;
1065:
1066:
1067: Function Get_total_inv_billed(p_api_version IN Varchar2,

Line 1069: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1065:
1066:
1067: Function Get_total_inv_billed(p_api_version IN Varchar2,
1068: p_rule_id IN Number,
1069: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1070: x_return_status OUT NOCOPY Varchar2,
1071: x_msg_count OUT NOCOPY NUMBER,
1072: x_msg_data OUT NOCOPY VARCHAR2)
1073: RETURN NUMBER

Line 1091: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1087: Fetch l_csr_total_inv_billed INTO l_total_inv_billed;
1088: Close l_csr_total_inv_billed;
1089:
1090: Return l_total_inv_billed;
1091: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1092:
1093: EXCEPTION
1094: WHEN OTHERS THEN
1095: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1095: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1091: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1092:
1093: EXCEPTION
1094: WHEN OTHERS THEN
1095: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1096: RAISE G_EXCEPTION_HALT_VALIDATION;
1097: End Get_total_inv_billed;
1098:
1099:

Line 1122: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1118: WHERE id = p_rul_id;
1119:
1120: ExceptioN
1121: When Others then
1122: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1123: End;
1124:
1125: PROCEDURE pre_del_level_elements(
1126: p_api_version IN NUMBER,

Line 1140: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1136:
1137: l_msg_count NUMBER;
1138: l_msg_data VARCHAR2(2000);
1139: BEGIN
1140: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1141: IF (p_flag = 1) THEN
1142: oks_bill_util_pub.delete_level_elements
1143: (
1144: p_api_version => 1.0,

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

1149: x_return_status => x_return_status,
1150: x_msg_count => l_msg_count,
1151: x_msg_data => l_msg_data
1152: );
1153: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1154: raise G_EXCEPTION_HALT_VALIDATION;
1155: END IF;
1156:
1157: FOR cov_cur in coverage(p_id)

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

1166: x_return_status => x_return_status,
1167: x_msg_count => l_msg_count,
1168: x_msg_data => l_msg_data
1169: );
1170: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1171: raise G_EXCEPTION_HALT_VALIDATION;
1172: END IF;
1173:
1174: END LOOP;

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

1185: x_return_status => x_return_status,
1186: x_msg_count => l_msg_count,
1187: x_msg_data => l_msg_data
1188: );
1189: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1190: raise G_EXCEPTION_HALT_VALIDATION;
1191: END IF;
1192:
1193: END IF;

Line 1196: x_return_status := OKC_API.G_RET_STS_ERROR;

1192:
1193: END IF;
1194: EXCEPTION
1195: WHEN OTHERS THEN
1196: x_return_status := OKC_API.G_RET_STS_ERROR;
1197: END pre_del_level_elements;
1198:
1199:
1200: Procedure delete_level_elements (p_api_version IN NUMBER,

Line 1202: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1198:
1199:
1200: Procedure delete_level_elements (p_api_version IN NUMBER,
1201: p_rule_id IN Number,
1202: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1203: x_msg_count OUT NOCOPY NUMBER,
1204: x_msg_data OUT NOCOPY VARCHAR2,
1205: x_return_status OUT NOCOPY Varchar2 )
1206: IS

Line 1250: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1246:
1247:
1248: Begin
1249:
1250: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1251:
1252:
1253: /*** get sll info for a given rule id**/
1254:

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

1266:
1267: If l_bill_type_csr%Notfound then
1268: Close l_bill_type_Csr;
1269: x_return_status := 'E';
1270: OKC_API.set_message(G_PKG_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'BILLING SCHEDULE TYPE NOT FOUND.');
1271: RAISE G_EXCEPTION_HALT_VALIDATION;
1272: End If;
1273: Close l_bill_type_Csr;
1274:

Line 1324: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1320: p_api_version IN NUMBER,
1321: p_terminated_date IN DATE,
1322: p_chr_id IN NUMBER,
1323: p_cle_id IN NUMBER ,
1324: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1325: x_return_status OUT NOCOPY VARCHAR2,
1326: x_msg_count OUT NOCOPY NUMBER,
1327: x_msg_data OUT NOCOPY VARCHAR2
1328: )

Line 1346: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1342:
1343:
1344: BEGIN
1345:
1346: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1347:
1348: IF p_cle_id is NULL THEN /* when input parm is p_chr_id */
1349: DELETE FROM OKS_LEVEL_ELEMENTS
1350: WHERE Date_Completed is NULL

Line 1388: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1384:
1385: /*** deleting rules ***/
1386: PROCEDURE delete_rule(
1387: p_api_version IN NUMBER,
1388: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1389: p_chr_id IN NUMBER,
1390: x_return_status OUT NOCOPY VARCHAR2,
1391: x_msg_count OUT NOCOPY NUMBER,
1392: x_msg_data OUT NOCOPY VARCHAR2) IS

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

1391: x_msg_count OUT NOCOPY NUMBER,
1392: x_msg_data OUT NOCOPY VARCHAR2) IS
1393:
1394:
1395: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1396: i NUMBER := 1;
1397:
1398: cursor rule_csr Is
1399: select rul.id

Line 1421: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1417: END LOOP;
1418:
1419: close rule_csr;
1420:
1421: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1422:
1423: IF p_rulv_tbl.COUNT > 0 THEN
1424:
1425: OKC_RULE_PUB.delete_rule(

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

1429: x_msg_count => x_msg_count,
1430: x_msg_data => x_msg_data,
1431: p_rulv_tbl => p_rulv_tbl);
1432:
1433: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1434: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1435: x_return_status := l_return_status;
1436: raise G_EXCEPTION_HALT_VALIDATION;
1437: ELSE

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

1430: x_msg_data => x_msg_data,
1431: p_rulv_tbl => p_rulv_tbl);
1432:
1433: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1434: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1435: x_return_status := l_return_status;
1436: raise G_EXCEPTION_HALT_VALIDATION;
1437: ELSE
1438: x_return_status := l_return_status;

Line 1451: OKC_API.SET_MESSAGE(

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

Line 1459: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

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

Line 1468: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1464: /*** deleting rules ***/
1465:
1466: PROCEDURE delete_slh_rule(
1467: p_api_version IN NUMBER,
1468: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1469: p_cle_id IN NUMBER,
1470: x_return_status OUT NOCOPY VARCHAR2,
1471: x_msg_count OUT NOCOPY NUMBER,
1472: x_msg_data OUT NOCOPY VARCHAR2)

Line 1476: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1472: x_msg_data OUT NOCOPY VARCHAR2)
1473: IS
1474: BEGIN
1475:
1476: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1477:
1478: UPDATE oks_k_lines_b SET billing_schedule_type = NULL
1479: WHERE cle_id =p_cle_id;
1480:

Line 1487: OKC_API.SET_MESSAGE(

1483: EXCEPTION
1484:
1485: WHEN OTHERS THEN
1486: -- store SQL error message on message stack
1487: OKC_API.SET_MESSAGE(
1488: p_app_name => G_APP_NAME,
1489: p_msg_name => G_UNEXPECTED_ERROR,
1490: p_token1 => G_SQLCODE_TOKEN,
1491: p_token1_value => SQLCODE,

Line 1495: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1491: p_token1_value => SQLCODE,
1492: p_token2 => G_SQLERRM_TOKEN,
1493: p_token2_value => SQLERRM);
1494: -- notify caller of an error as UNEXPETED error
1495: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1496:
1497: END Delete_SLH_Rule;
1498:
1499:

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

1514: i NUMBER := 1;
1515: begin
1516: for rev_rec in rev_cur
1517: loop
1518: x_rev_tbl(i).id := OKC_API.G_MISS_NUM;
1519: x_rev_tbl(i).chr_id := rev_rec.chr_id;
1520: x_rev_tbl(i).account_class := rev_rec.account_class;
1521: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1522: x_rev_tbl(i).percent := rev_rec.percent;

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

1519: x_rev_tbl(i).chr_id := rev_rec.chr_id;
1520: x_rev_tbl(i).account_class := rev_rec.account_class;
1521: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1522: x_rev_tbl(i).percent := rev_rec.percent;
1523: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1524: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1525: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1526: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1527: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;

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

1520: x_rev_tbl(i).account_class := rev_rec.account_class;
1521: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1522: x_rev_tbl(i).percent := rev_rec.percent;
1523: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1524: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1525: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1526: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1527: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1528: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;

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

1521: x_rev_tbl(i).code_combination_id := rev_rec.code_combination_id;
1522: x_rev_tbl(i).percent := rev_rec.percent;
1523: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1524: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1525: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1526: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1527: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1528: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1529: i := i + 1;

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

1522: x_rev_tbl(i).percent := rev_rec.percent;
1523: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1524: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1525: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1526: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1527: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1528: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1529: i := i + 1;
1530: end loop;

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

1523: x_rev_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1524: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1525: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1526: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1527: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1528: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1529: i := i + 1;
1530: end loop;
1531: end get_rev_distr;

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

1524: x_rev_tbl(i).created_by := OKC_API.G_MISS_NUM;
1525: x_rev_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1526: x_rev_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1527: x_rev_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1528: x_rev_tbl(i).last_update_login := OKC_API.G_MISS_NUM;
1529: i := i + 1;
1530: end loop;
1531: end get_rev_distr;
1532:

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

1568: i NUMBER := 1;
1569: begin
1570: for scrv_rec in scrv_cur
1571: loop
1572: x_scrv_tbl(i).id := OKC_API.G_MISS_NUM;
1573: x_scrv_tbl(i).percent := scrv_rec.percent;
1574: x_scrv_tbl(i).chr_id := scrv_rec.chr_id;
1575: x_scrv_tbl(i).ctc_id := scrv_rec.ctc_id;
1576: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;

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

1574: x_scrv_tbl(i).chr_id := scrv_rec.chr_id;
1575: x_scrv_tbl(i).ctc_id := scrv_rec.ctc_id;
1576: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;
1577: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1578: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1579: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1580: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1581: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1582: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;

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

1575: x_scrv_tbl(i).ctc_id := scrv_rec.ctc_id;
1576: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;
1577: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1578: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1579: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1580: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1581: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1582: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1583: i := i + 1;

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

1576: x_scrv_tbl(i).sales_credit_type_id1 := scrv_rec.sales_credit_type_id1;
1577: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1578: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1579: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1580: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1581: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1582: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1583: i := i + 1;
1584: end loop;

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

1577: x_scrv_tbl(i).sales_credit_type_id2 := scrv_rec.sales_credit_type_id2;
1578: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1579: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1580: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1581: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1582: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1583: i := i + 1;
1584: end loop;
1585: end get_sales_cred;

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

1578: x_scrv_tbl(i).object_version_number := OKC_API.G_MISS_NUM;
1579: x_scrv_tbl(i).created_by := OKC_API.G_MISS_NUM;
1580: x_scrv_tbl(i).creation_date := OKC_API.G_MISS_DATE;
1581: x_scrv_tbl(i).last_updated_by := OKC_API.G_MISS_NUM;
1582: x_scrv_tbl(i).last_update_date := OKC_API.G_MISS_DATE;
1583: i := i + 1;
1584: end loop;
1585: end get_sales_cred;
1586:

Line 1666: x_status := OKC_API.G_RET_STS_SUCCESS;

1662: Open subline_count;
1663: Fetch subline_count into l_count;
1664: Close subline_count;
1665: If l_count = 0 Then
1666: x_status := OKC_API.G_RET_STS_SUCCESS;
1667: return;
1668: End If;
1669: i := 1;
1670: For subline in subline_cur

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

1729:
1730: If l_Line_Csr%Notfound then
1731: Close l_Line_Csr;
1732: x_status := 'E';
1733: OKC_API.set_message(G_PKG_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'LINE NOT FOUND');
1734: RAISE G_EXCEPTION_HALT_VALIDATION;
1735: End If;
1736: Close l_Line_Csr;
1737:

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

1818: l_rulv_tbl_in(1).rule_information1 := p_info1;
1819: l_rulv_tbl_in(1).rule_information2 := p_info2;
1820: l_rulv_tbl_in(1).rule_information3 := p_info3;
1821: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1822: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1823: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1824: l_rulv_tbl_in(1).creation_date := SYSDATE;
1825: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1826: l_rulv_tbl_in(1).last_update_date := SYSDATE;

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

1819: l_rulv_tbl_in(1).rule_information2 := p_info2;
1820: l_rulv_tbl_in(1).rule_information3 := p_info3;
1821: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1822: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1823: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1824: l_rulv_tbl_in(1).creation_date := SYSDATE;
1825: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1826: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1827: OKC_RULE_PUB.create_rule(

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

1821: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1822: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1823: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1824: l_rulv_tbl_in(1).creation_date := SYSDATE;
1825: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1826: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1827: OKC_RULE_PUB.create_rule(
1828: p_api_version => l_api_version,
1829: x_return_status => x_status,

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

1832: p_rulv_tbl => l_rulv_tbl_in,
1833: x_rulv_tbl => l_rulv_tbl_out);
1834: Else
1835: l_rulv_tbl_in(1).id := l_rule_id;
1836: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1837: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1838: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1839: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1840: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;

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

1833: x_rulv_tbl => l_rulv_tbl_out);
1834: Else
1835: l_rulv_tbl_in(1).id := l_rule_id;
1836: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1837: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1838: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1839: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1840: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1841: l_rulv_tbl_in(1).rule_information1 := p_info1;

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

1834: Else
1835: l_rulv_tbl_in(1).id := l_rule_id;
1836: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1837: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1838: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1839: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1840: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1841: l_rulv_tbl_in(1).rule_information1 := p_info1;
1842: l_rulv_tbl_in(1).rule_information2 := p_info2;

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

1835: l_rulv_tbl_in(1).id := l_rule_id;
1836: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1837: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1838: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1839: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1840: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1841: l_rulv_tbl_in(1).rule_information1 := p_info1;
1842: l_rulv_tbl_in(1).rule_information2 := p_info2;
1843: l_rulv_tbl_in(1).rule_information3 := p_info3;

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

1836: l_rulv_tbl_in(1).rgp_id := OKC_API.G_MISS_NUM;
1837: l_rulv_tbl_in(1).sfwt_flag := OKC_API.G_MISS_CHAR;
1838: l_rulv_tbl_in(1).std_template_yn := OKC_API.G_MISS_CHAR;
1839: l_rulv_tbl_in(1).warn_yn := OKC_API.G_MISS_CHAR;
1840: l_rulv_tbl_in(1).rule_information_category := OKC_API.G_MISS_CHAR;
1841: l_rulv_tbl_in(1).rule_information1 := p_info1;
1842: l_rulv_tbl_in(1).rule_information2 := p_info2;
1843: l_rulv_tbl_in(1).rule_information3 := p_info3;
1844: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;

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

1841: l_rulv_tbl_in(1).rule_information1 := p_info1;
1842: l_rulv_tbl_in(1).rule_information2 := p_info2;
1843: l_rulv_tbl_in(1).rule_information3 := p_info3;
1844: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1845: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1846: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1847: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1848: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1849: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

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

1842: l_rulv_tbl_in(1).rule_information2 := p_info2;
1843: l_rulv_tbl_in(1).rule_information3 := p_info3;
1844: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1845: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1846: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1847: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1848: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1849: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1850: OKC_RULE_PUB.update_rule(

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

1843: l_rulv_tbl_in(1).rule_information3 := p_info3;
1844: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1845: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1846: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1847: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1848: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1849: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1850: OKC_RULE_PUB.update_rule(
1851: p_api_version => l_api_version,

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

1844: l_rulv_tbl_in(1).dnz_chr_id := g_chr_id;
1845: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1846: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1847: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1848: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1849: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1850: OKC_RULE_PUB.update_rule(
1851: p_api_version => l_api_version,
1852: x_return_status => x_status,

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

1845: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1846: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1847: l_rulv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1848: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1849: l_rulv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1850: OKC_RULE_PUB.update_rule(
1851: p_api_version => l_api_version,
1852: x_return_status => x_status,
1853: x_msg_count => l_msg_count,

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

1859:
1860: procedure update_header_amount(p_cle_id IN NUMBER,
1861: x_status OUT NOCOPY VARCHAR2) IS
1862: l_api_version CONSTANT NUMBER := 1.0;
1863: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;
1864: l_return_status VARCHAR2(1);
1865: l_msg_count NUMBER;
1866: l_msg_data VARCHAR2(2000);
1867: l_msg_index_out NUMBER;

Line 1877: x_status := OKC_API.G_RET_STS_SUCCESS;

1873: from okc_k_lines_b
1874: where dnz_chr_id = p_chr_id
1875: and lse_id in (7,8,9,10,11,35,13,18,25);
1876: Begin
1877: x_status := OKC_API.G_RET_STS_SUCCESS;
1878: If p_cle_id IS NOT NULL Then
1879: For cur_total_amount IN total_amount(g_chr_id)
1880: loop
1881: l_chrv_tbl_in(1).id := g_chr_id;

Line 1928: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1924: where cle_id = p_cle_id;
1925: G_ERROR EXCEPTION;
1926: Begin
1927: If p_target_tbl.COUNT = 0 Then
1928: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1929: return;
1930: End If;
1931: Open header_cur;
1932: Fetch header_cur into g_chr_id;

Line 1975: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1971: p_from_cle_id => p_source_rec.cle_id,
1972: p_to_chr_id => g_chr_id,
1973: x_cle_id => p_target_tbl(idx).cle_id);
1974: --errorout('Copy line status: '||x_return_status);
1975: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1976: x_return_status := l_return_status;
1977: Raise G_ERROR;
1978: End If;
1979:

Line 1989: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1985:
1986: OKS_SETUP_UTIL_PUB.update_line_numbers(p_chr_id => g_chr_id,
1987: p_cle_id => p_target_tbl(idx).cle_id,
1988: x_return_status => l_return_status);
1989: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1990: x_return_status := l_return_status;
1991: Raise G_ERROR;
1992: End If;
1993: If l_rev_found Then

Line 1996: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1992: End If;
1993: If l_rev_found Then
1994: create_rev_distr(p_target_tbl(idx).cle_id, l_rev_tbl, l_return_status);
1995: --errorout('Create_rev_distr status: '||l_return_status);
1996: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1997: x_return_status := l_return_status;
1998: Raise G_ERROR;
1999: End If;
2000: End If;

Line 2004: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2000: End If;
2001: If l_scr_found Then
2002: create_sales_cred(p_target_tbl(idx).cle_id, l_salescr_tbl, l_return_status);
2003: --errorout('create_sales_cred status: '||l_return_status);
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: End If;

Line 2024: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2020: --errorout('Target Table('||idx||').percent: '||p_target_tbl(idx).percentage);
2021: --errorout('=====');
2022: update_line_item(p_target_tbl(idx).cle_id, p_target_tbl(idx).item_id, l_return_status);
2023: --errorout('update_line_item status: '||l_return_status);
2024: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2025: x_return_status := l_return_status;
2026: Raise G_ERROR;
2027: End If;
2028: If p_target_tbl(idx).percentage <> 100 Then

Line 2031: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2027: End If;
2028: If p_target_tbl(idx).percentage <> 100 Then
2029: prorate_amount(p_target_tbl(idx).cle_id, p_target_tbl(idx).percentage, p_target_tbl(idx).amount, l_return_status);
2030: --errorout('prorate_amount status: '||l_return_status);
2031: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2032: x_return_status := l_return_status;
2033: Raise G_ERROR;
2034: End If;
2035: refresh_bill_sch(p_target_tbl(idx).cle_id, l_rgp_id, l_return_status);

Line 2038: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2034: End If;
2035: refresh_bill_sch(p_target_tbl(idx).cle_id, l_rgp_id, l_return_status);
2036: --errorout('refresh_bill_sch status: '||l_return_status);
2037: --errorout('rgp_id: '||l_rgp_id);
2038: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2039: x_return_status := l_return_status;
2040: Raise G_ERROR;
2041: End If;
2042: Else

Line 2054: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2050: p_target_tbl(idx).item_id,
2051: p_source_rec.cle_id,
2052: l_return_status);
2053: --errorout('create_USV_rule status: '||l_return_status);
2054: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2055: x_return_status := l_return_status;
2056: Raise G_ERROR;
2057: End If;
2058: l_total_pct := l_total_pct + p_target_tbl(idx).percentage;

Line 2066: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2062: If l_total_pct <> 100 Then
2063: null;
2064: update_header_amount(p_source_rec.cle_id, l_return_status);
2065: --errorout('update_header_amount status: '||l_return_status);
2066: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2067: x_return_status := l_return_status;
2068: Raise G_ERROR;
2069: End If;
2070: End If;

Line 2071: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2067: x_return_status := l_return_status;
2068: Raise G_ERROR;
2069: End If;
2070: End If;
2071: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2072: --errorout('SUCCESS');
2073: Exception
2074: When G_ERROR Then
2075: /*

Line 2087: OKC_API.set_message(OKC_API.G_APP_NAME,

2083: End Loop;
2084: */
2085: Null;
2086: When Others Then
2087: OKC_API.set_message(OKC_API.G_APP_NAME,
2088: 'OKS_UNEXP_ERROR',
2089: 'SQLcode',
2090: SQLCODE,
2091: 'SQLerrm',

Line 2094: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2090: SQLCODE,
2091: 'SQLerrm',
2092: SQLERRM);
2093: -- notify caller of an UNEXPECTED error
2094: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2095: End copy_service;
2096:
2097: /** End of Code for changing/splitting service lines **/
2098:

Line 2103: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2099:
2100: /****FOR USAGE BILLING*********/
2101: Procedure Calculate_Bill_Amount (
2102: p_api_version IN NUMBER,
2103: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2104: p_bill_tbl IN OUT NOCOPY Bill_tbl_type,
2105: x_return_status OUT NOCOPY VARCHAR2,
2106: x_msg_count OUT NOCOPY NUMBER,
2107: x_msg_data OUT NOCOPY VARCHAR2)

Line 2140: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2136: v_index NUMBER;
2137:
2138:
2139: BEGIN
2140: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2141:
2142: --------errorout_ad('count = ' || p_bill_tbl.COUNT);
2143:
2144: IF p_bill_tbl.COUNT <= 0 THEN

Line 2145: x_return_status := OKC_API.G_RET_STS_ERROR;

2141:
2142: --------errorout_ad('count = ' || p_bill_tbl.COUNT);
2143:
2144: IF p_bill_tbl.COUNT <= 0 THEN
2145: x_return_status := OKC_API.G_RET_STS_ERROR;
2146: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'NO RECORDS PASSED');
2147: Raise G_EXCEPTION_HALT_VALIDATION;
2148: END IF;
2149:

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

2142: --------errorout_ad('count = ' || p_bill_tbl.COUNT);
2143:
2144: IF p_bill_tbl.COUNT <= 0 THEN
2145: x_return_status := OKC_API.G_RET_STS_ERROR;
2146: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'NO RECORDS PASSED');
2147: Raise G_EXCEPTION_HALT_VALIDATION;
2148: END IF;
2149:
2150: ---FIND OUT LAST READING from the table and clculate net reading for each record

Line 2195: x_return_status := OKC_API.G_RET_STS_ERROR;

2191: FETCH l_usage_line_csr INTO l_usage_line_rec;
2192:
2193: IF l_usage_line_csr%NOTFOUND THEN
2194: CLOSE l_usage_line_csr;
2195: x_return_status := OKC_API.G_RET_STS_ERROR;
2196: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'USAGE LINE NOT FOUND FOR THE COUNTER');
2197: Raise G_EXCEPTION_HALT_VALIDATION;
2198: END IF;
2199: CLOSE l_usage_line_csr;

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

2192:
2193: IF l_usage_line_csr%NOTFOUND THEN
2194: CLOSE l_usage_line_csr;
2195: x_return_status := OKC_API.G_RET_STS_ERROR;
2196: OKC_API.set_message(G_APP_NAME,G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'USAGE LINE NOT FOUND FOR THE COUNTER');
2197: Raise G_EXCEPTION_HALT_VALIDATION;
2198: END IF;
2199: CLOSE l_usage_line_csr;
2200: --------errorout_ad('usage line id for ' || v_index || 'line = ' || l_usage_line_rec.usage_id);

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

2222: X_MSG_DATA => x_msg_data);
2223:
2224:
2225: IF x_return_status <> 'S' Then
2226: OKC_API.set_message(G_APP_NAME,'CALCULATE PRICE ERROR');
2227: Raise G_EXCEPTION_HALT_VALIDATION;
2228: End If;
2229:
2230: /*****

Line 2255: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2251:
2252: WHEN G_EXCEPTION_HALT_VALIDATION Then
2253: NULL;
2254: WHEN OTHERS THEN
2255: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2256: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2257:
2258: END Calculate_Bill_Amount;
2259:

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

2252: WHEN G_EXCEPTION_HALT_VALIDATION Then
2253: NULL;
2254: WHEN OTHERS THEN
2255: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2256: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2257:
2258: END Calculate_Bill_Amount;
2259:
2260: Function Get_Credit_Amount (p_api_version IN Varchar2,

Line 2262: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2258: END Calculate_Bill_Amount;
2259:
2260: Function Get_Credit_Amount (p_api_version IN Varchar2,
2261: p_cp_line_id IN Number,
2262: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2263: x_return_status OUT NOCOPY VARCHAR2,
2264: x_msg_count OUT NOCOPY NUMBER,
2265: x_msg_data OUT NOCOPY VARCHAR2)
2266: RETURN NUMBER

Line 2295: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2291:
2292: EXCEPTION
2293:
2294: WHEN OTHERS THEN
2295: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2296: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2297:
2298: END Get_Credit_Amount;
2299:

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

2292: EXCEPTION
2293:
2294: WHEN OTHERS THEN
2295: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2296: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2297:
2298: END Get_Credit_Amount;
2299:
2300: /* ****** ------------------- Procedures for creating Billing report ------------------------ ****** */

Line 2317: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2313: l_line_id1 Varchar2(100) ;
2314: l_line_id2 Varchar2(100);
2315:
2316: Begin
2317: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2318: l_tbl_idx := l_lines_tbl_tmp.FIRST;
2319:
2320: While l_tbl_idx Is Not Null
2321: Loop

Line 2335: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2331: l_tbl_idx := l_lines_tbl_tmp.NEXT(l_tbl_idx) ;
2332: End Loop;
2333:
2334: x_lines_table := l_lines_tbl_tmp ;
2335: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2336:
2337: Exception When Others Then
2338:
2339: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2339: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2335: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2336:
2337: Exception When Others Then
2338:
2339: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2340: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_lines Error ' || sqlerrm);
2341:
2342: OKC_API.SET_MESSAGE
2343: (P_App_Name => G_APP_NAME

Line 2342: OKC_API.SET_MESSAGE

2338:
2339: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2340: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_lines Error ' || sqlerrm);
2341:
2342: OKC_API.SET_MESSAGE
2343: (P_App_Name => G_APP_NAME
2344: ,P_Msg_Name => G_UNEXPECTED_ERROR
2345: ,P_Token1 => G_SQLCODE_TOKEN
2346: ,P_Token1_Value => SQLCODE

Line 2368: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2364: l_line_id1 Varchar2(100) ;
2365: l_line_id2 Varchar2(100);
2366:
2367: Begin
2368: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2369: l_tbl_idx := l_sub_lines_tbl_tmp.FIRST;
2370:
2371: While l_tbl_idx Is Not Null
2372: Loop

Line 2386: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2382: l_tbl_idx := l_sub_lines_tbl_tmp.NEXT(l_tbl_idx) ;
2383: End Loop;
2384:
2385: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2386: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2387:
2388: Exception When Others Then
2389:
2390: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_sub_lines Error ' || sqlerrm);

Line 2391: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2387:
2388: Exception When Others Then
2389:
2390: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_sub_lines Error ' || sqlerrm);
2391: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2392:
2393: OKC_API.SET_MESSAGE
2394: (P_App_Name => G_APP_NAME
2395: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 2393: OKC_API.SET_MESSAGE

2389:
2390: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_sub_lines Error ' || sqlerrm);
2391: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2392:
2393: OKC_API.SET_MESSAGE
2394: (P_App_Name => G_APP_NAME
2395: ,P_Msg_Name => G_UNEXPECTED_ERROR
2396: ,P_Token1 => G_SQLCODE_TOKEN
2397: ,P_Token1_Value => SQLCODE

Line 2421: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2417: l_line_id2 Varchar2(95);
2418:
2419: Begin
2420:
2421: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2422: l_out_tbl_idx := l_lines_tbl_tmp.FIRST;
2423:
2424: While l_out_tbl_idx is Not Null
2425: Loop

Line 2450: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2446:
2447: End Loop ;
2448:
2449: x_lines_table := l_lines_tbl_tmp ;
2450: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2451:
2452: Exception When Others Then
2453: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_lines_table Error ' || sqlerrm);
2454: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2454: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2450: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2451:
2452: Exception When Others Then
2453: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_lines_table Error ' || sqlerrm);
2454: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2455: OKC_API.SET_MESSAGE
2456: (P_App_Name => G_APP_NAME
2457: ,P_Msg_Name => G_UNEXPECTED_ERROR
2458: ,P_Token1 => G_SQLCODE_TOKEN

Line 2455: OKC_API.SET_MESSAGE

2451:
2452: Exception When Others Then
2453: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_lines_table Error ' || sqlerrm);
2454: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2455: OKC_API.SET_MESSAGE
2456: (P_App_Name => G_APP_NAME
2457: ,P_Msg_Name => G_UNEXPECTED_ERROR
2458: ,P_Token1 => G_SQLCODE_TOKEN
2459: ,P_Token1_Value => SQLCODE

Line 2485: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2481: l_sub_line_id2 Varchar2(135);
2482:
2483: Begin
2484:
2485: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2486: l_out_tbl_idx := l_sub_lines_tbl_tmp.FIRST;
2487:
2488: While l_out_tbl_idx is Not Null
2489: Loop

Line 2516: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2512:
2513: End Loop ;
2514:
2515: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2516: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2517:
2518: Exception When Others Then
2519: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_sub_lines_table Error ' || sqlerrm);
2520: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2520: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2516: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2517:
2518: Exception When Others Then
2519: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_sub_lines_table Error ' || sqlerrm);
2520: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2521: OKC_API.SET_MESSAGE
2522: (P_App_Name => G_APP_NAME
2523: ,P_Msg_Name => G_UNEXPECTED_ERROR
2524: ,P_Token1 => G_SQLCODE_TOKEN

Line 2521: OKC_API.SET_MESSAGE

2517:
2518: Exception When Others Then
2519: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_sub_lines_table Error ' || sqlerrm);
2520: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2521: OKC_API.SET_MESSAGE
2522: (P_App_Name => G_APP_NAME
2523: ,P_Msg_Name => G_UNEXPECTED_ERROR
2524: ,P_Token1 => G_SQLCODE_TOKEN
2525: ,P_Token1_Value => SQLCODE

Line 2547: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2543: l_line_id Number := 0;
2544:
2545: Begin
2546:
2547: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2548: l_in_tbl_idx := p_sub_lines_table.FIRST ;
2549:
2550: While l_in_tbl_idx is Not Null
2551: Loop

Line 2574: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2570:
2571: End Loop ;
2572:
2573: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2574: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2575:
2576: Exception When Others Then
2577: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2578: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sub_lines_bill_status Error ' || sqlerrm);

Line 2577: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2573: x_sub_lines_table := l_sub_lines_tbl_tmp ;
2574: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2575:
2576: Exception When Others Then
2577: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2578: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sub_lines_bill_status Error ' || sqlerrm);
2579: OKC_API.SET_MESSAGE
2580: (P_App_Name => G_APP_NAME
2581: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 2579: OKC_API.SET_MESSAGE

2575:
2576: Exception When Others Then
2577: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2578: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sub_lines_bill_status Error ' || sqlerrm);
2579: OKC_API.SET_MESSAGE
2580: (P_App_Name => G_APP_NAME
2581: ,P_Msg_Name => G_UNEXPECTED_ERROR
2582: ,P_Token1 => G_SQLCODE_TOKEN
2583: ,P_Token1_Value => SQLCODE

Line 2648: Return(OKC_API.G_RET_STS_UNEXP_ERROR );

2644: Return (l_bill_profile);
2645:
2646: Exception When Others then
2647: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Billig_Profile Error ' || sqlerrm);
2648: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2649: OKC_API.SET_MESSAGE
2650: (P_App_Name => G_APP_NAME
2651: ,P_Msg_Name => G_UNEXPECTED_ERROR
2652: ,P_Token1 => G_SQLCODE_TOKEN

Line 2649: OKC_API.SET_MESSAGE

2645:
2646: Exception When Others then
2647: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Billig_Profile Error ' || sqlerrm);
2648: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2649: OKC_API.SET_MESSAGE
2650: (P_App_Name => G_APP_NAME
2651: ,P_Msg_Name => G_UNEXPECTED_ERROR
2652: ,P_Token1 => G_SQLCODE_TOKEN
2653: ,P_Token1_Value => SQLCODE

Line 2677: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2673:
2674: l_bill_profile Varchar2(100) := Null;
2675:
2676: Begin
2677: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2678:
2679:
2680: /* **** set the billing profile value for Summary billing **** */
2681:

Line 2689: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then

2685: l_bill_profile := Null;
2686:
2687: l_bill_profile := Get_Billig_Profile(l_lines_tbl_copy(l_lines_tbl_idx).Dnz_Chr_Id );
2688:
2689: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then
2690: If l_bill_profile = 'Y' then
2691: l_lines_tbl_copy(l_lines_tbl_idx).Summary_bill_YN := 'Y' ;
2692: Else
2693: l_lines_tbl_copy(l_lines_tbl_idx).Summary_bill_YN := 'N' ;

Line 2707: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then

2703: l_bill_profile := Null;
2704:
2705: l_bill_profile := Get_Billig_Profile(l_sub_lines_tbl_copy(l_slines_tbl_idx).Dnz_Chr_Id );
2706:
2707: If l_bill_profile <> OKC_API.G_RET_STS_UNEXP_ERROR then
2708: If l_bill_profile = 'Y' then
2709: l_sub_lines_tbl_copy(l_slines_tbl_idx).Summary_bill_YN := 'Y' ;
2710: Else
2711: l_sub_lines_tbl_copy(l_slines_tbl_idx).Summary_bill_YN := 'N' ;

Line 2724: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

2720: x_sub_lines_table := l_sub_lines_tbl_copy;
2721:
2722:
2723: Exception When Others Then
2724: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
2725: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Set_Billing_Profile Error ' || sqlerrm);
2726: OKC_API.SET_MESSAGE
2727: (P_App_Name => G_APP_NAME
2728: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 2726: OKC_API.SET_MESSAGE

2722:
2723: Exception When Others Then
2724: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
2725: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Set_Billing_Profile Error ' || sqlerrm);
2726: OKC_API.SET_MESSAGE
2727: (P_App_Name => G_APP_NAME
2728: ,P_Msg_Name => G_UNEXPECTED_ERROR
2729: ,P_Token1 => G_SQLCODE_TOKEN
2730: ,P_Token1_Value => SQLCODE

Line 2837: Return(OKC_API.G_RET_STS_UNEXP_ERROR );

2833:
2834:
2835: Exception When Others then
2836: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Sub_Line_Name Error ' || sqlerrm);
2837: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2838: OKC_API.SET_MESSAGE
2839: (P_App_Name => G_APP_NAME
2840: ,P_Msg_Name => G_UNEXPECTED_ERROR
2841: ,P_Token1 => G_SQLCODE_TOKEN

Line 2838: OKC_API.SET_MESSAGE

2834:
2835: Exception When Others then
2836: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Sub_Line_Name Error ' || sqlerrm);
2837: Return(OKC_API.G_RET_STS_UNEXP_ERROR );
2838: OKC_API.SET_MESSAGE
2839: (P_App_Name => G_APP_NAME
2840: ,P_Msg_Name => G_UNEXPECTED_ERROR
2841: ,P_Token1 => G_SQLCODE_TOKEN
2842: ,P_Token1_Value => SQLCODE

Line 2865: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2861: l_currency_cd1 Varchar2(15) ;
2862: l_currency_cd2 Varchar2(15);
2863:
2864: Begin
2865: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2866: l_tbl_idx := l_currency_table_tmp.FIRST;
2867:
2868: While l_tbl_idx Is Not Null
2869: Loop

Line 2883: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2879: l_tbl_idx := l_currency_table_tmp.NEXT(l_tbl_idx) ;
2880: End Loop;
2881:
2882: x_currency_table := l_currency_table_tmp ;
2883: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2884:
2885: Exception When Others Then
2886:
2887: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2887: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2883: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2884:
2885: Exception When Others Then
2886:
2887: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2888: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_currency_code Error ' || sqlerrm);
2889:
2890: OKC_API.SET_MESSAGE
2891: (P_App_Name => G_APP_NAME

Line 2890: OKC_API.SET_MESSAGE

2886:
2887: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2888: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: delete_duplicate_currency_code Error ' || sqlerrm);
2889:
2890: OKC_API.SET_MESSAGE
2891: (P_App_Name => G_APP_NAME
2892: ,P_Msg_Name => G_UNEXPECTED_ERROR
2893: ,P_Token1 => G_SQLCODE_TOKEN
2894: ,P_Token1_Value => SQLCODE

Line 2921: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2917: l_currency_cd2 Varchar2(15);
2918:
2919: Begin
2920:
2921: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2922: l_out_tbl_idx := l_currency_tbl_tmp.FIRST;
2923:
2924: While l_out_tbl_idx is Not Null
2925: Loop

Line 2948: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2944:
2945: End Loop ;
2946:
2947: x_currency_table := l_currency_tbl_tmp ;
2948: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2949:
2950: Exception When Others Then
2951: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_currency_table Error ' || sqlerrm);
2952: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2952: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2948: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2949:
2950: Exception When Others Then
2951: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_currency_table Error ' || sqlerrm);
2952: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2953: OKC_API.SET_MESSAGE
2954: (P_App_Name => G_APP_NAME
2955: ,P_Msg_Name => G_UNEXPECTED_ERROR
2956: ,P_Token1 => G_SQLCODE_TOKEN

Line 2953: OKC_API.SET_MESSAGE

2949:
2950: Exception When Others Then
2951: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: sort_currency_table Error ' || sqlerrm);
2952: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2953: OKC_API.SET_MESSAGE
2954: (P_App_Name => G_APP_NAME
2955: ,P_Msg_Name => G_UNEXPECTED_ERROR
2956: ,P_Token1 => G_SQLCODE_TOKEN
2957: ,P_Token1_Value => SQLCODE

Line 2986: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2982: l_curreny_code Varchar(15) := Null;
2983: l_return_status Varchar2(30) ;
2984:
2985: Begin
2986: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2987:
2988: l_line_tbl_idx := l_lines_table_tmp.FIRST;
2989: l_curreny_code := 'X';
2990: l_currency_tbl_idx := 1 ;

Line 3030: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3026: ,x_currency_table => l_currency_table_tmp
3027: ,x_return_status => l_return_status
3028: ) ;
3029:
3030: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3031:
3032:
3033: l_currency_table_in := l_currency_table_tmp ;
3034: l_currency_table_tmp.DELETE ;*/

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

3037: ,x_currency_table => l_currency_table_tmp
3038: ,x_return_status => l_return_status
3039: ) ;
3040: x_return_status := l_return_status ;
3041: /* If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
3042: x_return_status := l_return_status ;
3043: End If;
3044: Else
3045: x_return_status := l_return_status ;

Line 3053: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3049: x_currency_table_out := l_currency_table_tmp ;
3050:
3051: Exception When Others then
3052: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Currency_code Error ' || sqlerrm);
3053: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3054: OKC_API.SET_MESSAGE
3055: (P_App_Name => G_APP_NAME
3056: ,P_Msg_Name => G_UNEXPECTED_ERROR
3057: ,P_Token1 => G_SQLCODE_TOKEN

Line 3054: OKC_API.SET_MESSAGE

3050:
3051: Exception When Others then
3052: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Get_Currency_code Error ' || sqlerrm);
3053: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3054: OKC_API.SET_MESSAGE
3055: (P_App_Name => G_APP_NAME
3056: ,P_Msg_Name => G_UNEXPECTED_ERROR
3057: ,P_Token1 => G_SQLCODE_TOKEN
3058: ,P_Token1_Value => SQLCODE

Line 3106: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3102: l_currency_desc VARCHAR2(100);
3103:
3104: Begin
3105:
3106: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3107:
3108: fnd_message.set_name ('OKS','OKS_BILLREP_CURRSUMM');
3109: l_msg := fnd_message.get;
3110: fnd_message.set_name ('OKS','OKS_BILLREP_CURVAL');

Line 3172: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3168: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, ' ' ) ;
3169: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, ' ' ) ;
3170:
3171: Exception When Others Then
3172: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3173: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_currency_break Error ' || sqlerrm);
3174: OKC_API.SET_MESSAGE
3175: (P_App_Name => G_APP_NAME
3176: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 3174: OKC_API.SET_MESSAGE

3170:
3171: Exception When Others Then
3172: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3173: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_currency_break Error ' || sqlerrm);
3174: OKC_API.SET_MESSAGE
3175: (P_App_Name => G_APP_NAME
3176: ,P_Msg_Name => G_UNEXPECTED_ERROR
3177: ,P_Token1 => G_SQLCODE_TOKEN
3178: ,P_Token1_Value => SQLCODE

Line 3312: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3308:
3309:
3310: Begin
3311:
3312: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3313:
3314:
3315: /* *** ---- Print the error message ---- *** */
3316:

Line 3533: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3529:
3530:
3531:
3532: Exception When Others Then
3533: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3534: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_Error_Report ' || sqlerrm);
3535: OKC_API.SET_MESSAGE
3536: (P_App_Name => G_APP_NAME
3537: ,P_Msg_Name => G_UNEXPECTED_ERROR

Line 3535: OKC_API.SET_MESSAGE

3531:
3532: Exception When Others Then
3533: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3534: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: Print_Error_Report ' || sqlerrm);
3535: OKC_API.SET_MESSAGE
3536: (P_App_Name => G_APP_NAME
3537: ,P_Msg_Name => G_UNEXPECTED_ERROR
3538: ,P_Token1 => G_SQLCODE_TOKEN
3539: ,P_Token1_Value => SQLCODE

Line 3584: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3580:
3581: Create_Report_Exception Exception ;
3582:
3583: Begin
3584: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3585: l_return_status := Null;
3586:
3587:
3588:

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

3642: ,p_rejected_slines_total => p_billrep_table(i).Rejected_SubLines_Value
3643: ,x_return_status => l_return_status
3644: ) ;
3645:
3646: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
3647: FND_FILE.PUT_LINE( FND_FILE.LOG, '*** Billing Report:: PRINT_CURRENCY_BREAK procedure failed for : ' || p_billrep_table(i).Currency_code ||' Error: '||sqlerrm);
3648: x_return_status := l_return_status ;
3649: Raise Create_Report_Exception ;
3650: END IF;

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

3672: ,p_slines_rejected => l_slines_rejected
3673: ,x_return_status => l_return_status
3674: ) ;
3675:
3676: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
3677: x_return_status := l_return_status ;
3678: Raise Create_Report_Exception ;
3679: END IF;
3680:

Line 3685: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3681:
3682: EXCEPTION
3683:
3684: WHEN Create_Report_Exception Then
3685: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3686: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: Report Exception ***** '||sqlerrm) ;
3687: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3688: OKC_API.SET_MESSAGE
3689: (P_App_Name => G_APP_NAME

Line 3688: OKC_API.SET_MESSAGE

3684: WHEN Create_Report_Exception Then
3685: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3686: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: Report Exception ***** '||sqlerrm) ;
3687: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3688: OKC_API.SET_MESSAGE
3689: (P_App_Name => G_APP_NAME
3690: ,P_Msg_Name => G_UNEXPECTED_ERROR
3691: ,P_Token1 => G_SQLCODE_TOKEN
3692: ,P_Token1_Value => SQLCODE

Line 3697: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;

3693: ,P_Token2 => G_SQLERRM_TOKEN
3694: ,P_Token2_Value => SQLERRM);
3695:
3696: WHEN Others Then
3697: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3698: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: When Others ***** '||sqlerrm) ;
3699: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3700: OKC_API.SET_MESSAGE
3701: (P_App_Name => G_APP_NAME

Line 3700: OKC_API.SET_MESSAGE

3696: WHEN Others Then
3697: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR ;
3698: FND_FILE.PUT_LINE( FND_FILE.LOG, '***** Billing Report has errors :: When Others ***** '||sqlerrm) ;
3699: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, '*** Billing Report has errors **** '||sqlerrm);
3700: OKC_API.SET_MESSAGE
3701: (P_App_Name => G_APP_NAME
3702: ,P_Msg_Name => G_UNEXPECTED_ERROR
3703: ,P_Token1 => G_SQLCODE_TOKEN
3704: ,P_Token1_Value => SQLCODE

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

3737:
3738: SUBTYPE LEVEL_ID_TBL IS OKS_BILL_LEVEL_ELEMENTS_PVT.letv_tbl_type ;
3739: L_LEVEL_ID_TBL_IN LEVEL_ID_TBL ;
3740: L_LEVEL_ID_TBL_OUT LEVEL_ID_TBL ;
3741: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;
3742: l_msg_count number;
3743: l_msg_data Varchar2(2000);
3744: COUNTER NUMBER := 0 ;
3745: G_EXCEPTION_HALT_VALIDATION exception ;

Line 3802: X_RETURN_STATUS := OKC_API.G_RET_STS_UNEXP_ERROR;

3798: EXCEPTION
3799: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3800: X_RETURN_STATUS := L_RETURN_STATUS ;
3801: WHEN OTHERS THEN
3802: X_RETURN_STATUS := OKC_API.G_RET_STS_UNEXP_ERROR;
3803: OKC_API.SET_MESSAGE(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3804:
3805: END UPDATE_OKS_LEVEL_ELEMENTS ;
3806:

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

3799: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3800: X_RETURN_STATUS := L_RETURN_STATUS ;
3801: WHEN OTHERS THEN
3802: X_RETURN_STATUS := OKC_API.G_RET_STS_UNEXP_ERROR;
3803: OKC_API.SET_MESSAGE(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3804:
3805: END UPDATE_OKS_LEVEL_ELEMENTS ;
3806:
3807:

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

3843:
3844: L_BCL_EXISTS BOOLEAN ;
3845: L_BCL_DATES_UPDATE BOOLEAN ;
3846: L_SUB_LINES_INSERTED NUMBER ;
3847: L_RETURN_STATUS VARCHAR2(4):= OKC_API.G_RET_STS_SUCCESS;
3848: L_MSG_CNT NUMBER ;
3849: L_MSG_DATA VARCHAR2(2000);
3850: L_TOTAL_AMOUNT NUMBER := 0 ;
3851: L_LINE_ID NUMBER ;

Line 3908: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3904: P_BCLV_REC => L_BCLV_REC_IN,
3905: X_BCLV_REC => L_BCLV_REC_OUT
3906: );
3907:
3908: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3909: X_RETURN_STATUS := L_RETURN_STATUS;
3910: RAISE G_EXCEPTION_HALT_VALIDATION;
3911: END IF;
3912: END IF ;

Line 3922: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3918: L_BCL_ID := L_BCLV_REC_OUT.ID ;
3919: END IF ;
3920:
3921:
3922: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3923: L_LINE_ID := P_LINE_ID ;
3924: CREATE_BSL_FOR_OM( P_LINE_ID => L_LINE_ID ,
3925: P_BCL_ID => L_BCL_ID ,
3926: X_RETURN_STATUS => L_RETURN_STATUS,

Line 3929: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3925: P_BCL_ID => L_BCL_ID ,
3926: X_RETURN_STATUS => L_RETURN_STATUS,
3927: X_SUB_LINES_INSERTED => L_SUB_LINES_INSERTED,
3928: X_TOTAL_AMOUNT => L_TOTAL_AMOUNT) ;
3929: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3930: RAISE G_EXCEPTION_HALT_VALIDATION;
3931: END IF ;
3932: END IF ;
3933:

Line 3963: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3959: X_MSG_DATA => L_MSG_DATA,
3960: P_BCLV_REC => L_BCLV_REC_UPD_IN,
3961: X_BCLV_REC => L_BCLV_REC_UPD_OUT
3962: );
3963: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3964: X_RETURN_STATUS := L_RETURN_STATUS;
3965: RAISE G_EXCEPTION_HALT_VALIDATION;
3966: END IF;
3967: END IF ;

Line 3969: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

3965: RAISE G_EXCEPTION_HALT_VALIDATION;
3966: END IF;
3967: END IF ;
3968:
3969: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
3970: UPDATE_OKS_LEVEL_ELEMENTS(L_GET_OKS_LINES_REC.id ,
3971: X_RETURN_STATUS );
3972: IF (L_RETURN_STATUS <> 'S') THEN
3973: X_RETURN_STATUS := L_RETURN_STATUS;

Line 3984: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3980: EXCEPTION
3981: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3982: X_RETURN_STATUS := l_return_status ;
3983: When Others Then
3984: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3985: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3986:
3987: END CREATE_BCL_FOR_OM ;
3988:

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

3981: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3982: X_RETURN_STATUS := l_return_status ;
3983: When Others Then
3984: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3985: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3986:
3987: END CREATE_BCL_FOR_OM ;
3988:
3989:

Line 4056: X_RETURN_STATUS := OKC_API.G_RET_STS_SUCCESS ;

4052:
4053:
4054:
4055: BEGIN
4056: X_RETURN_STATUS := OKC_API.G_RET_STS_SUCCESS ;
4057: /*Added for ER 16039680*/
4058: OPEN get_line_dtls(P_LINE_ID);
4059: FETCH get_line_dtls INTO l_lse_id,l_start_date,l_end_date;
4060: CLOSE get_line_dtls;

Line 4097: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4093: fnd_file.put_line (fnd_file.LOG,
4094: 'Create_Contract :- CREATE_BSL_FOR_OM L_RETURN_STATUS '
4095: || L_RETURN_STATUS
4096: );
4097: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4098: RAISE G_EXCEPTION_HALT_VALIDATION;
4099: END IF;
4100: ----Get the item uom from okc_k_items
4101: OPEN L_GET_ITM_UOM_CSR( P_LINE_ID );

Line 4124: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4120: X_MSG_COUNT => l_msg_cnt,
4121: X_MSG_DATA => l_msg_data,
4122: p_bsdv_rec => l_bsdv_rec_in,
4123: x_bsdv_rec => l_bsdv_rec_out);
4124: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4125: RAISE G_EXCEPTION_HALT_VALIDATION;
4126: END IF; --chk for status
4127: X_SUB_LINES_INSERTED :=1;
4128: X_TOTAL_AMOUNT := L_TOTAL_AMOUNT ;

Line 4157: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4153: P_BSLV_REC => L_BSLV_REC_IN,
4154: X_BSLV_REC => L_BSLV_REC_OUT
4155: );
4156:
4157: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4158: RAISE G_EXCEPTION_HALT_VALIDATION;
4159: ELSE
4160: L_SUB_LINES_INSERTED := L_SUB_LINES_INSERTED + 1 ;
4161: L_TOTAL_AMOUNT := L_TOTAL_AMOUNT + L_GET_COVERED_LEVELS_REC.PRICE_NEGOTIATED ;

Line 4195: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4191: X_MSG_DATA => l_msg_data,
4192: p_bsdv_rec => l_bsdv_rec_in,
4193: x_bsdv_rec => l_bsdv_rec_out);
4194:
4195: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4196: RAISE G_EXCEPTION_HALT_VALIDATION;
4197: END IF; --chk for status
4198:
4199:

Line 4213: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4209: EXCEPTION
4210: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4211: X_RETURN_STATUS := L_RETURN_STATUS ;
4212: When Others Then
4213: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4214: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4215:
4216: END CREATE_BSL_FOR_OM ;
4217:

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

4210: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4211: X_RETURN_STATUS := L_RETURN_STATUS ;
4212: When Others Then
4213: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4214: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4215:
4216: END CREATE_BSL_FOR_OM ;
4217:
4218: /*Added for ER 16039680*/

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

4247: L_BCLV_REC_UPD_OUT BCLV_REC_TYPE ;
4248: L_BCL_EXISTS BOOLEAN ;
4249: L_BCL_DATES_UPDATE BOOLEAN ;
4250: L_SUB_LINES_INSERTED NUMBER ;
4251: L_RETURN_STATUS VARCHAR2(4):= OKC_API.G_RET_STS_SUCCESS;
4252: L_MSG_CNT NUMBER ;
4253: L_MSG_DATA VARCHAR2(2000);
4254: L_TOTAL_AMOUNT NUMBER := 0 ;
4255: L_LINE_ID NUMBER ;

Line 4301: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4297: X_MSG_DATA => L_MSG_DATA,
4298: P_BCLV_REC => L_BCLV_REC_IN,
4299: X_BCLV_REC => L_BCLV_REC_OUT
4300: );
4301: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4302: X_RETURN_STATUS := L_RETURN_STATUS;
4303: RAISE G_EXCEPTION_HALT_VALIDATION;
4304: END IF;
4305: END IF ;

Line 4311: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4307: L_BCL_ID := L_GET_BCL_LINES_REC.ID ;
4308: ELSE
4309: L_BCL_ID := L_BCLV_REC_OUT.ID ;
4310: END IF ;
4311: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4312: L_LINE_ID := P_LINE_ID ;
4313: CREATE_BSL_FOR_OM_OKS_BILLING( P_LINE_ID => L_LINE_ID ,
4314: P_BCL_ID => L_BCL_ID ,
4315: P_DATE_FROM => L_BCLV_REC_IN.DATE_BILLED_FROM,

Line 4320: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4316: P_DATE_TO => L_BCLV_REC_IN.DATE_BILLED_TO,
4317: X_RETURN_STATUS => L_RETURN_STATUS,
4318: X_SUB_LINES_INSERTED => L_SUB_LINES_INSERTED,
4319: X_TOTAL_AMOUNT => L_TOTAL_AMOUNT) ;
4320: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4321: RAISE G_EXCEPTION_HALT_VALIDATION;
4322: END IF ;
4323: END IF ;
4324: --THIS WILL UPDATE THE BCL LINE ENTRY IF THE DATES DIFFER FROM THAT OF THE TOP LINE DATES..

Line 4348: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4344: X_MSG_DATA => L_MSG_DATA,
4345: P_BCLV_REC => L_BCLV_REC_UPD_IN,
4346: X_BCLV_REC => L_BCLV_REC_UPD_OUT
4347: );
4348: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4349: X_RETURN_STATUS := L_RETURN_STATUS;
4350: RAISE G_EXCEPTION_HALT_VALIDATION;
4351: END IF;
4352: END IF;

Line 4353: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4349: X_RETURN_STATUS := L_RETURN_STATUS;
4350: RAISE G_EXCEPTION_HALT_VALIDATION;
4351: END IF;
4352: END IF;
4353: IF L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4354: Update oks_level_elements
4355: set date_completed = SYSDATE
4356: where parent_cle_id = p_line_id
4357: and date_completed is NULL

Line 4366: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4362: EXCEPTION
4363: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4364: X_RETURN_STATUS := l_return_status ;
4365: When Others Then
4366: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4367: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4368: END CREATE_BCL_FOR_OM_OKS_BILLING ;
4369: PROCEDURE CREATE_BSL_FOR_OM_OKS_BILLING ( P_LINE_ID IN NUMBER ,
4370: P_BCL_ID IN NUMBER ,

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

4363: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4364: X_RETURN_STATUS := l_return_status ;
4365: When Others Then
4366: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4367: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4368: END CREATE_BCL_FOR_OM_OKS_BILLING ;
4369: PROCEDURE CREATE_BSL_FOR_OM_OKS_BILLING ( P_LINE_ID IN NUMBER ,
4370: P_BCL_ID IN NUMBER ,
4371: P_DATE_FROM IN DATE,

Line 4419: X_RETURN_STATUS := OKC_API.G_RET_STS_SUCCESS ;

4415: L_SUB_LINES_INSERTED NUMBER := 0;
4416: L_TOTAL_AMOUNT NUMBER := 0 ;
4417: l_lse_id NUMBER;
4418: BEGIN
4419: X_RETURN_STATUS := OKC_API.G_RET_STS_SUCCESS ;
4420: OPEN L_LINE_TYPE;
4421: FETCH L_LINE_TYPE into l_lse_id;
4422: CLOSE L_LINE_TYPE;
4423: IF l_lse_id = 46 THEN

Line 4447: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4443: X_MSG_DATA => L_MSG_DATA,
4444: P_BSLV_REC => L_BSLV_REC_IN,
4445: X_BSLV_REC => L_BSLV_REC_OUT
4446: );
4447: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4448: RAISE G_EXCEPTION_HALT_VALIDATION;
4449: END IF;
4450: ---create rec in oks_subline_bill_dtl table.
4451: ----Get the item uom from okc_k_items

Line 4475: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4471: X_MSG_COUNT => l_msg_cnt,
4472: X_MSG_DATA => l_msg_data,
4473: p_bsdv_rec => l_bsdv_rec_in,
4474: x_bsdv_rec => l_bsdv_rec_out);
4475: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4476: RAISE G_EXCEPTION_HALT_VALIDATION;
4477: END IF; --chk for status
4478: X_SUB_LINES_INSERTED :=1;
4479: X_TOTAL_AMOUNT := L_TOTAL_AMOUNT ;

Line 4522: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4518: fnd_file.put_line (fnd_file.LOG,
4519: 'Create_Contract :- CREATE_BSL_FOR_OM_OKS_SUBSCRIPTION L_RETURN_STATUS'
4520: || L_RETURN_STATUS
4521: );
4522: IF NOT L_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4523: RAISE G_EXCEPTION_HALT_VALIDATION;
4524: ELSE
4525: L_SUB_LINES_INSERTED := L_SUB_LINES_INSERTED + 1 ;
4526: L_TOTAL_AMOUNT := L_TOTAL_AMOUNT + L_GET_COVERED_LEVELS_REC.PRICE_NEGOTIATED ;

Line 4553: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN

4549: X_MSG_COUNT => l_msg_cnt,
4550: X_MSG_DATA => l_msg_data,
4551: p_bsdv_rec => l_bsdv_rec_in,
4552: x_bsdv_rec => l_bsdv_rec_out);
4553: IF NOT l_RETURN_STATUS = OKC_API.G_RET_STS_SUCCESS THEN
4554: RAISE G_EXCEPTION_HALT_VALIDATION;
4555: END IF; --chk for status
4556: END IF ;
4557: CLOSE L_GET_BSL_CSR ;

Line 4575: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4571: EXCEPTION
4572: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4573: X_RETURN_STATUS := L_RETURN_STATUS ;
4574: When Others Then
4575: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4576: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4577:
4578: END CREATE_BSL_FOR_OM_OKS_BILLING ;
4579:

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

4572: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4573: X_RETURN_STATUS := L_RETURN_STATUS ;
4574: When Others Then
4575: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4576: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4577:
4578: END CREATE_BSL_FOR_OM_OKS_BILLING ;
4579:
4580: /*Added for ER 16039680*/

Line 4625: x_return_status := OKC_API.G_RET_STS_SUCCESS;

4621:
4622:
4623: BEGIN
4624:
4625: x_return_status := OKC_API.G_RET_STS_SUCCESS;
4626:
4627: Open l_subscription_type_csr;
4628: Fetch l_subscription_type_csr Into l_subscription_type_rec;
4629:

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

4694: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4695: RETURN NULL;
4696:
4697: WHEN OTHERS THEN
4698: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4699: RETURN NULL;
4700: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4701:
4702: END Get_Billed_Qty;

Line 4700: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4696:
4697: WHEN OTHERS THEN
4698: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4699: RETURN NULL;
4700: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4701:
4702: END Get_Billed_Qty;
4703:
4704: Function Get_Billed_Upto ( p_id IN Number,

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

4952: 'oks_billsubline_pub.insert_bill_subline_pub(x_return_status = '||x_return_status
4953: ||', bsl id = '|| L_BSLV_REC_OUT.id ||')');
4954: END IF;
4955:
4956: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN
4957: RAISE G_EXCEPTION_HALT_VALIDATION;
4958: END IF;
4959:
4960: ---update old bsl record

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

5027: 'OKS_BSL_det_PUB.insert_bsl_det_Pub(x_return_status = '||x_return_status
5028: ||', bsd id = '|| l_bsdv_tbl_out(1).id ||')');
5029: END IF;
5030:
5031: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN
5032: RAISE G_EXCEPTION_HALT_VALIDATION;
5033: END IF;
5034:
5035: -------update old bsd amount

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

5125: 'OKS_BILLTRAN_LINE_PUB.insert_Bill_Tran_Line_Pub(x_return_status = '||x_return_status
5126: ||', btl id = '|| l_btlv_tbl_out(1).id ||')');
5127: END IF;
5128:
5129: IF NVL(x_return_status,'!') <> OKC_API.G_RET_STS_SUCCESS THEN
5130: RAISE G_EXCEPTION_HALT_VALIDATION;
5131: END IF;
5132:
5133: IF l_btl_rec.split_flag IS NULL THEN

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

5183: fnd_log.string(fnd_log.level_unexpected,G_MODULE_CURRENT||'.Adjust_billed_lvl_element.UNEXPECTED',
5184: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
5185: END IF;
5186:
5187: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
5188: p_msg_name => G_UNEXPECTED_ERROR,
5189: p_token1 => G_SQLCODE_TOKEN,
5190: p_token1_value => sqlcode,
5191: p_token2 => G_SQLERRM_TOKEN,

Line 5194: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

5190: p_token1_value => sqlcode,
5191: p_token2 => G_SQLERRM_TOKEN,
5192: p_token2_value => sqlerrm);
5193:
5194: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5195:
5196:
5197: END ADJUST_SPLIT_BILL_REC;
5198: