48: *=======================================================================*/
49:
50: PROCEDURE pull_extract_data (
51: p_api_version IN NUMBER
52: ,p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE
53: ,x_return_status OUT NOCOPY VARCHAR2
54: ,x_msg_count OUT NOCOPY NUMBER
55: ,x_msg_data OUT NOCOPY VARCHAR2,
56: x_row_count OUT NOCOPY VARCHAR2,
100: p_api_type => '_PVT',
101: x_return_status => x_return_status);
102:
103:
104: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
106: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
107: RAISE OKC_API.G_EXCEPTION_ERROR;
108: END IF;
101: x_return_status => x_return_status);
102:
103:
104: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
106: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
107: RAISE OKC_API.G_EXCEPTION_ERROR;
108: END IF;
109:
102:
103:
104: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
106: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
107: RAISE OKC_API.G_EXCEPTION_ERROR;
108: END IF;
109:
110: write_to_log('Parameters in pull_extract_data ...');
103:
104: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
106: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
107: RAISE OKC_API.G_EXCEPTION_ERROR;
108: END IF;
109:
110: write_to_log('Parameters in pull_extract_data ...');
111: write_to_log('P_OPERATING_UNIT = '||P_OPERATING_UNIT);
6265: Okl_Api.END_ACTIVITY (
6266: x_msg_count => x_msg_count,
6267: x_msg_data => x_msg_data);
6268: EXCEPTION
6269: WHEN OKC_API.G_EXCEPTION_ERROR THEN
6270:
6271: write_to_log('G_EXCEPTION_ERROR was raised..');
6272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
6273: (
6268: EXCEPTION
6269: WHEN OKC_API.G_EXCEPTION_ERROR THEN
6270:
6271: write_to_log('G_EXCEPTION_ERROR was raised..');
6272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
6273: (
6274: l_api_name,
6275: G_PKG_NAME,
6276: 'OKC_API.G_RET_STS_ERROR',
6272: x_return_status := OKC_API.HANDLE_EXCEPTIONS
6273: (
6274: l_api_name,
6275: G_PKG_NAME,
6276: 'OKC_API.G_RET_STS_ERROR',
6277: x_msg_count,
6278: x_msg_data,
6279: '_PVT'
6280: );
6278: x_msg_data,
6279: '_PVT'
6280: );
6281:
6282: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6283: write_to_log('G_EXCEPTION_UNEXPECTED_ERROR was raised..');
6284: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
6285: (
6286: l_api_name,
6280: );
6281:
6282: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
6283: write_to_log('G_EXCEPTION_UNEXPECTED_ERROR was raised..');
6284: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
6285: (
6286: l_api_name,
6287: G_PKG_NAME,
6288: 'OKC_API.G_RET_STS_UNEXP_ERROR',
6284: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
6285: (
6286: l_api_name,
6287: G_PKG_NAME,
6288: 'OKC_API.G_RET_STS_UNEXP_ERROR',
6289: x_msg_count,
6290: x_msg_data,
6291: '_PVT'
6292: );
6300: p_token1_value => SQLCODE,
6301: p_token2 => G_SQLERRM_TOKEN,
6302: p_token2_value => SQLERRM);
6303:
6304: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
6305: (
6306: l_api_name,
6307: G_PKG_NAME,
6308: 'OTHERS',
6481: END LOOP;
6482:
6483: fnd_file.new_line(fnd_file.log,2);
6484:
6485: IF lx_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
6486: write_to_log('Extraction failed for Contract Line Financial Extract.');
6487:
6488: DELETE OKL_PARALLEL_PROCESSES
6489: WHERE assigned_process = p_assigned_process;