24:
25:
26: PROCEDURE Get_AR_Invoice_numbers (
27: p_api_version IN NUMBER,
28: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
29: x_return_status OUT NOCOPY VARCHAR2,
30: x_msg_count OUT NOCOPY NUMBER,
31: x_msg_data OUT NOCOPY VARCHAR2)
32: IS
131: PRAGMA EXCEPTION_INIT (bulk_errors, -24381);
132:
133: BEGIN
134:
135: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
136: p_init_msg_list,
137: '_PVT',
138: x_return_status);
139:
136: p_init_msg_list,
137: '_PVT',
138: x_return_status);
139:
140: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
141: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
142: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
143: RAISE OKC_API.G_EXCEPTION_ERROR;
144: END IF;
137: '_PVT',
138: x_return_status);
139:
140: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
141: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
142: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
143: RAISE OKC_API.G_EXCEPTION_ERROR;
144: END IF;
145:
138: x_return_status);
139:
140: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
141: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
142: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
143: RAISE OKC_API.G_EXCEPTION_ERROR;
144: END IF;
145:
146: -- ------------------------------
139:
140: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
141: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
142: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
143: RAISE OKC_API.G_EXCEPTION_ERROR;
144: END IF;
145:
146: -- ------------------------------
147: -- Bulk Fetch and Bulk Updates
470: end if;
471:
472: WHEN OTHERS THEN
473: Fnd_File.PUT_LINE (Fnd_File.OUTPUT, 'ERROR (02): '||SQLERRM);
474: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
475: (
476: l_api_name,
477: 'Okl_Arfetch_Pub',
478: 'OTHERS',