[Home] [Help]
106: l_parameter_list.DELETE;
107:
108: EXCEPTION
109: WHEN OTHERS THEN
110: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
111: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
112: FND_MSG_PUB.ADD;
113: ROLLBACK TO raise_equipment_exchange_event;
114: END raise_equipment_exchange_event;
512: l_parameter_list.DELETE;
513:
514: EXCEPTION
515: WHEN OTHERS THEN
516: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
517: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
518: FND_MSG_PUB.ADD;
519: ROLLBACK TO raise_transferasu_event;
520: END raise_transferAsu_event;
633: lx_new_lessee_tbl OKL_CS_TRANSFER_ASSUMPTION_PVT.new_lessee_tbl_type;
634: lx_insurance_tbl OKL_CS_TRANSFER_ASSUMPTION_PVT.insurance_tbl_type;
635: l_message VARCHAR2(30000);
636: l_error VARCHAR2(2000);
637: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
638: l_api_version CONSTANT NUMBER := 1;
639: l_msg_count NUMBER;
640: l_msg_data VARCHAR2(2000);
641: l_requestor VARCHAR2(200);
1077: l_email VARCHAR2(2000);
1078: l_bind_var JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1079: l_bind_val JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1080: l_bind_var_type JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1081: l_commit CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
1082: lx_return_status VARCHAR2(3);
1083: l_error VARCHAR2(2000);
1084: l_api_version NUMBER := 1.0;
1085: lx_msg_count NUMBER;
1199: l_email VARCHAR2(2000);
1200: l_bind_var JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1201: l_bind_val JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1202: l_bind_var_type JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1203: l_commit CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
1204: lx_return_status VARCHAR2(3);
1205: l_error VARCHAR2(2000);
1206: l_api_version NUMBER := 1.0;
1207: lx_msg_count NUMBER;
2787: x_inv_days_tbl(i).khr_id := day_rec.khr_id;
2788:
2789: END LOOP;
2790: END LOOP;
2791: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
2792: EXCEPTION
2793: WHEN OTHERS THEN
2794: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2795: ,p_msg_name => G_UNEXPECTED_ERROR
2819: BEGIN
2820: OPEN outstanding_rcvble_csr;
2821: FETCH outstanding_rcvble_csr into x_outstanding_balance;
2822: CLOSE outstanding_rcvble_csr;
2823: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
2824: EXCEPTION
2825: WHEN OTHERS THEN
2826: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2827: ,p_msg_name => G_UNEXPECTED_ERROR
2868: AND orgb2.rgd_code = 'LACAN'
2869: AND hca.cust_account_id = c_cust_account_id;*/
2870:
2871: l_outstanding_balance NUMBER := 0;
2872: l_return_status VARCHAR2(1):= OKL_API.G_RET_STS_SUCCESS;
2873: l_total_balance NUMBER :=0;
2874: BEGIN
2875:
2876: FOR khr_rec in contracts_csr(p_cust_account_id)
2876: FOR khr_rec in contracts_csr(p_cust_account_id)
2877: LOOP
2878: get_contract_balance(khr_rec.khr_id,l_outstanding_balance,l_return_status);
2879:
2880: IF l_return_status = Okl_Api.G_RET_STS_SUCCESS THEN
2881: l_total_balance := l_total_balance + l_outstanding_balance;
2882: END IF;
2883: END LOOP;
2884: x_outstanding_balance := l_total_balance;
2881: l_total_balance := l_total_balance + l_outstanding_balance;
2882: END IF;
2883: END LOOP;
2884: x_outstanding_balance := l_total_balance;
2885: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2886:
2887: EXCEPTION
2888: WHEN OTHERS THEN
2889: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2891: ,p_token1 => G_SQLCODE_TOKEN
2892: ,p_token1_value => SQLCODE
2893: ,p_token2 => G_SQLERRM_TOKEN
2894: ,p_token2_value => SQLERRM);
2895: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2896: END get_customer_balance;
2897:
2898: ------------------------------------------------------------------
2899: -- The following API gets the product name for a particular
2917: FETCH products_csr INTO x_product_rec.product_id,
2918: x_product_rec.product_name,
2919: x_product_rec.product_description;
2920: CLOSE products_csr;
2921: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2922:
2923: EXCEPTION
2924: WHEN OTHERS THEN
2925: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2927: ,p_token1 => G_SQLCODE_TOKEN
2928: ,p_token1_value => SQLCODE
2929: ,p_token2 => G_SQLERRM_TOKEN
2930: ,p_token2_value => SQLERRM);
2931: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2932: END get_product;
2933:
2934: ------------------------------------------------------------------
2935: -- The following API gets the Bill to Address for a particular
2989: x_address_rec.county,
2990: x_address_rec.country,
2991: x_address_rec.description;
2992: CLOSE address_csr;
2993: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2994:
2995: EXCEPTION
2996: WHEN OTHERS THEN
2997: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2999: ,p_token1 => G_SQLCODE_TOKEN
3000: ,p_token1_value => SQLCODE
3001: ,p_token2 => G_SQLERRM_TOKEN
3002: ,p_token2_value => SQLERRM);
3003: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
3004: END get_bill_to_address;
3005:
3006: --Lease Renewal Work flow APIs
3007:
3036: l_parameter_list.DELETE;
3037:
3038: EXCEPTION
3039: WHEN OTHERS THEN
3040: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3041: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3042: FND_MSG_PUB.ADD;
3043: ROLLBACK TO raise_lease_renewal_event;
3044: END raise_lease_renewal_event;
3354: l_parameter_list.DELETE;
3355:
3356: EXCEPTION
3357: WHEN OTHERS THEN
3358: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3359: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3360: FND_MSG_PUB.ADD;
3361: ROLLBACK TO raise_principal_paydown_event;
3362: END raise_principal_paydown_event;
3809: l_parameter_list.DELETE;
3810:
3811: EXCEPTION
3812: WHEN OTHERS THEN
3813: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3814: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3815: FND_MSG_PUB.ADD;
3816: ROLLBACK TO raise_credit_memo_event;
3817: END raise_credit_memo_event;