[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;
503: l_parameter_list.DELETE;
504:
505: EXCEPTION
506: WHEN OTHERS THEN
507: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
508: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
509: FND_MSG_PUB.ADD;
510: ROLLBACK TO raise_transferasu_event;
511: END raise_transferAsu_event;
624: lx_new_lessee_tbl OKL_CS_TRANSFER_ASSUMPTION_PVT.new_lessee_tbl_type;
625: lx_insurance_tbl OKL_CS_TRANSFER_ASSUMPTION_PVT.insurance_tbl_type;
626: l_message VARCHAR2(30000);
627: l_error VARCHAR2(2000);
628: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
629: l_api_version CONSTANT NUMBER := 1;
630: l_msg_count NUMBER;
631: l_msg_data VARCHAR2(2000);
632: l_requestor VARCHAR2(200);
1068: l_email VARCHAR2(2000);
1069: l_bind_var JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1070: l_bind_val JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1071: l_bind_var_type JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1072: l_commit CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
1073: lx_return_status VARCHAR2(3);
1074: l_error VARCHAR2(2000);
1075: l_api_version NUMBER := 1.0;
1076: lx_msg_count NUMBER;
1190: l_email VARCHAR2(2000);
1191: l_bind_var JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1192: l_bind_val JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1193: l_bind_var_type JTF_FM_REQUEST_GRP.G_VARCHAR_TBL_TYPE;
1194: l_commit CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
1195: lx_return_status VARCHAR2(3);
1196: l_error VARCHAR2(2000);
1197: l_api_version NUMBER := 1.0;
1198: lx_msg_count NUMBER;
2778: x_inv_days_tbl(i).khr_id := day_rec.khr_id;
2779:
2780: END LOOP;
2781: END LOOP;
2782: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
2783: EXCEPTION
2784: WHEN OTHERS THEN
2785: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2786: ,p_msg_name => G_UNEXPECTED_ERROR
2810: BEGIN
2811: OPEN outstanding_rcvble_csr;
2812: FETCH outstanding_rcvble_csr into x_outstanding_balance;
2813: CLOSE outstanding_rcvble_csr;
2814: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
2815: EXCEPTION
2816: WHEN OTHERS THEN
2817: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2818: ,p_msg_name => G_UNEXPECTED_ERROR
2859: AND orgb2.rgd_code = 'LACAN'
2860: AND hca.cust_account_id = c_cust_account_id;*/
2861:
2862: l_outstanding_balance NUMBER := 0;
2863: l_return_status VARCHAR2(1):= OKL_API.G_RET_STS_SUCCESS;
2864: l_total_balance NUMBER :=0;
2865: BEGIN
2866:
2867: FOR khr_rec in contracts_csr(p_cust_account_id)
2867: FOR khr_rec in contracts_csr(p_cust_account_id)
2868: LOOP
2869: get_contract_balance(khr_rec.khr_id,l_outstanding_balance,l_return_status);
2870:
2871: IF l_return_status = Okl_Api.G_RET_STS_SUCCESS THEN
2872: l_total_balance := l_total_balance + l_outstanding_balance;
2873: END IF;
2874: END LOOP;
2875: x_outstanding_balance := l_total_balance;
2872: l_total_balance := l_total_balance + l_outstanding_balance;
2873: END IF;
2874: END LOOP;
2875: x_outstanding_balance := l_total_balance;
2876: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2877:
2878: EXCEPTION
2879: WHEN OTHERS THEN
2880: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2882: ,p_token1 => G_SQLCODE_TOKEN
2883: ,p_token1_value => SQLCODE
2884: ,p_token2 => G_SQLERRM_TOKEN
2885: ,p_token2_value => SQLERRM);
2886: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2887: END get_customer_balance;
2888:
2889: ------------------------------------------------------------------
2890: -- The following API gets the product name for a particular
2908: FETCH products_csr INTO x_product_rec.product_id,
2909: x_product_rec.product_name,
2910: x_product_rec.product_description;
2911: CLOSE products_csr;
2912: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2913:
2914: EXCEPTION
2915: WHEN OTHERS THEN
2916: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2918: ,p_token1 => G_SQLCODE_TOKEN
2919: ,p_token1_value => SQLCODE
2920: ,p_token2 => G_SQLERRM_TOKEN
2921: ,p_token2_value => SQLERRM);
2922: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2923: END get_product;
2924:
2925: ------------------------------------------------------------------
2926: -- The following API gets the Bill to Address for a particular
2980: x_address_rec.county,
2981: x_address_rec.country,
2982: x_address_rec.description;
2983: CLOSE address_csr;
2984: x_return_status := OKL_API.G_RET_STS_SUCCESS;
2985:
2986: EXCEPTION
2987: WHEN OTHERS THEN
2988: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2990: ,p_token1 => G_SQLCODE_TOKEN
2991: ,p_token1_value => SQLCODE
2992: ,p_token2 => G_SQLERRM_TOKEN
2993: ,p_token2_value => SQLERRM);
2994: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2995: END get_bill_to_address;
2996:
2997: --Lease Renewal Work flow APIs
2998:
3027: l_parameter_list.DELETE;
3028:
3029: EXCEPTION
3030: WHEN OTHERS THEN
3031: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3032: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3033: FND_MSG_PUB.ADD;
3034: ROLLBACK TO raise_lease_renewal_event;
3035: END raise_lease_renewal_event;
3345: l_parameter_list.DELETE;
3346:
3347: EXCEPTION
3348: WHEN OTHERS THEN
3349: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3350: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3351: FND_MSG_PUB.ADD;
3352: ROLLBACK TO raise_principal_paydown_event;
3353: END raise_principal_paydown_event;
3800: l_parameter_list.DELETE;
3801:
3802: EXCEPTION
3803: WHEN OTHERS THEN
3804: FND_MESSAGE.SET_NAME('OKL', 'OKL_API_OTHERS_EXCEP');
3805: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3806: FND_MSG_PUB.ADD;
3807: ROLLBACK TO raise_credit_memo_event;
3808: END raise_credit_memo_event;