19: -- Declare variables required by APIs
20: -- ----------------------------------------------------------
21: l_api_version CONSTANT NUMBER := 1;
22: l_api_name CONSTANT VARCHAR2(30) := 'OKL_BILLING_RECON_RPT_PVT';
23: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
24:
25: -- ----------------------------------------------------------
26: -- Record Type for reconciliation report format
27: -- ----------------------------------------------------------
365: ------------------------------------------------------------
366: -- Start processing
367: ------------------------------------------------------------
368:
369: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
370:
371: l_return_status := Okl_Api.START_ACTIVITY(
372: p_api_name => l_api_name,
373: p_pkg_name => G_PKG_NAME,
367: ------------------------------------------------------------
368:
369: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
370:
371: l_return_status := Okl_Api.START_ACTIVITY(
372: p_api_name => l_api_name,
373: p_pkg_name => G_PKG_NAME,
374: p_init_msg_list => p_init_msg_list,
375: l_api_version => l_api_version,
376: p_api_version => p_api_version,
377: p_api_type => '_PVT',
378: x_return_status => l_return_status);
379:
380: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
381: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
383: RAISE Okl_Api.G_EXCEPTION_ERROR;
384: END IF;
377: p_api_type => '_PVT',
378: x_return_status => l_return_status);
379:
380: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
381: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
383: RAISE Okl_Api.G_EXCEPTION_ERROR;
384: END IF;
385:
378: x_return_status => l_return_status);
379:
380: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
381: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
383: RAISE Okl_Api.G_EXCEPTION_ERROR;
384: END IF;
385:
386: ---------------------------------------
379:
380: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
381: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
382: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
383: RAISE Okl_Api.G_EXCEPTION_ERROR;
384: END IF;
385:
386: ---------------------------------------
387: -- Get operating unit name
880: ------------------------------------------------------------
881: -- End processing
882: ------------------------------------------------------------
883:
884: Okl_Api.END_ACTIVITY (
885: x_msg_count => x_msg_count,
886: x_msg_data => x_msg_data);
887:
888: EXCEPTION
890: ------------------------------------------------------------
891: -- Exception handling
892: ------------------------------------------------------------
893:
894: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
895: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
896: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
897: p_api_name => l_api_name,
898: p_pkg_name => G_PKG_NAME,
892: ------------------------------------------------------------
893:
894: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
895: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
896: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
897: p_api_name => l_api_name,
898: p_pkg_name => G_PKG_NAME,
899: p_exc_name => 'Okl_Api.G_RET_STS_ERROR',
900: x_msg_count => x_msg_count,
895: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (EXCP) => '||SQLERRM);
896: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
897: p_api_name => l_api_name,
898: p_pkg_name => G_PKG_NAME,
899: p_exc_name => 'Okl_Api.G_RET_STS_ERROR',
900: x_msg_count => x_msg_count,
901: x_msg_data => x_msg_data,
902: p_api_type => '_PVT');
903:
900: x_msg_count => x_msg_count,
901: x_msg_data => x_msg_data,
902: p_api_type => '_PVT');
903:
904: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
905: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXP) => '||SQLERRM);
906: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
907: p_api_name => l_api_name,
908: p_pkg_name => G_PKG_NAME,
902: p_api_type => '_PVT');
903:
904: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
905: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXP) => '||SQLERRM);
906: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
907: p_api_name => l_api_name,
908: p_pkg_name => G_PKG_NAME,
909: p_exc_name => 'Okl_Api.G_RET_STS_UNEXP_ERROR',
910: x_msg_count => x_msg_count,
905: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (UNEXP) => '||SQLERRM);
906: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
907: p_api_name => l_api_name,
908: p_pkg_name => G_PKG_NAME,
909: p_exc_name => 'Okl_Api.G_RET_STS_UNEXP_ERROR',
910: x_msg_count => x_msg_count,
911: x_msg_data => x_msg_data,
912: p_api_type => '_PVT');
913:
912: p_api_type => '_PVT');
913:
914: WHEN OTHERS THEN
915: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, 'Error (OTHERS) => '||SQLERRM);
916: x_return_status := Okl_Api.HANDLE_EXCEPTIONS (
917: p_api_name => l_api_name,
918: p_pkg_name => G_PKG_NAME,
919: p_exc_name => 'OTHERS',
920: x_msg_count => x_msg_count,
949: END IF;
950:
951: OKL_BILLING_RECON_RPT_PVT.recon_report(
952: p_api_version => l_api_version,
953: p_init_msg_list => Okl_Api.G_FALSE,
954: x_return_status => l_return_status,
955: x_msg_count => l_msg_count,
956: x_msg_data => errbuf,
957: p_contract_number => p_contract_number,