226:
227: EXCEPTION
228: WHEN G_EXCEPTION_HALT_VALIDATION THEN
229: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in Level Procedure --G_exception_halt_validation raised' || sqlerrm);
230: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
231: WHEN OTHERS THEN
232: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in Level Procedure --OTHERS Exception raised' || sqlerrm);
233: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
234: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
229: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in Level Procedure --G_exception_halt_validation raised' || sqlerrm);
230: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
231: WHEN OTHERS THEN
232: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in Level Procedure --OTHERS Exception raised' || sqlerrm);
233: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
234: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
235:
236: END level;
237:
230: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
231: WHEN OTHERS THEN
232: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in Level Procedure --OTHERS Exception raised' || sqlerrm);
233: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
234: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
235:
236: END level;
237:
238:
273:
274: BEGIN
275: x_Volume := 0;
276: l_totvol := 0;
277: x_Return_Status := OKC_API.G_RET_STS_SUCCESS;
278:
279:
280: OPEN l_date_csr;
281: FETCH l_date_csr into l_date_billed_from,l_date_billed_to;
293:
294: EXCEPTION
295: WHEN G_EXCEPTION_HALT_VALIDATION THEN
296: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in OKS_REG_GET_AMCV -- G_Exception_halt_validation raised' );
297: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
298: WHEN OTHERS THEN
299: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in OKS_REG_GET_AMCV -- Others Exception raised' );
300: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
301: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
296: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in OKS_REG_GET_AMCV -- G_Exception_halt_validation raised' );
297: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
298: WHEN OTHERS THEN
299: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in OKS_REG_GET_AMCV -- Others Exception raised' );
300: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
301: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
302: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
303:
304:
298: WHEN OTHERS THEN
299: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Error in OKS_REG_GET_AMCV -- Others Exception raised' );
300: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
301: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
302: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
303:
304:
305:
306: END OKS_REG_GET_AMCV;
2253:
2254: OKC_CONTRACT_PUB.update_contract_header(
2255: P_API_VERSION => l_api_version,
2256: X_RETURN_STATUS => l_return_status,
2257: P_INIT_MSG_LIST => OKC_API.G_TRUE,
2258: X_MSG_COUNT => l_msg_cnt,
2259: X_MSG_DATA => l_msg_data,
2260: P_RESTRICTED_UPDATE => OKC_API.G_TRUE,
2261: P_CHRV_REC => l_chrv_rec,
2256: X_RETURN_STATUS => l_return_status,
2257: P_INIT_MSG_LIST => OKC_API.G_TRUE,
2258: X_MSG_COUNT => l_msg_cnt,
2259: X_MSG_DATA => l_msg_data,
2260: P_RESTRICTED_UPDATE => OKC_API.G_TRUE,
2261: P_CHRV_REC => l_chrv_rec,
2262: X_CHRV_REC => l_chrv_out_rec);
2263:
2264: IF l_write_log THEN
2792: P_BILLREP_ERR_TBL => l_billrep_err_tbl,
2793: P_BILLREP_ERR_TBL_IDX => l_billrep_errtbl_idx
2794: );
2795:
2796: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) Then
2797: oks_bill_rec_pub.get_message (
2798: l_msg_cnt => l_msg_count,
2799: l_msg_data => l_msg_data);
2800: l_processed_lines_tbl(l_pr_tbl_idx).Billed_YN := 'N' ;
2892: ,p_line_from => P_process_from
2893: ,p_line_to => P_process_to
2894: ,x_return_status => l_return_status);
2895:
2896: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
2897: FND_FILE.PUT_LINE(FND_FILE.LOG,'OKS_BILLING_PUB.Calculate_bill => *** Failed to create Billing Report ***' );
2898: END IF;
2899: End If;
2900:
2909:
2910: EXCEPTION
2911:
2912: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2913: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2914: RETCODE := 2;
2915: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
2916: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2917: WHEN G_EXCEPTION_ROLLBACK THEN
2918: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when g_exception_rollback raised'||sqlerrm);
2919: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2920:
2921: WHEN OTHERS THEN
2922: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2923: RETCODE := 2;
2924: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when others raised'||sqlerrm);
2925: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
2926: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2921: WHEN OTHERS THEN
2922: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2923: RETCODE := 2;
2924: FND_FILE.PUT_LINE( FND_FILE.LOG, 'OKS_BILLING_PUB.Calculate_bill => when others raised'||sqlerrm);
2925: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
2926: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2927: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
2928:
2929: END Calculate_bill;
3737: WHEN OTHERS THEN
3738: FND_FILE.PUT_LINE( FND_FILE.LOG, 'Supress credit completed with Errors');
3739: conc_ret_code := ERROR;
3740: RETCODE := 2;
3741: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,
3742: G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3743: End Process_Suppress_Credits;
3744:
3745: End OKS_BILLING_PUB;