1 PACKAGE BODY PA_PCO_DOC_NUMBER_CLIENT_EXTN AS
2 /* $Header: PAPCORXB.pls 120.0.12010000.1 2009/07/20 10:03:36 sosharma noship $ */
3
4
5 PROCEDURE GET_NEXT_NUMBER (
6 p_project_id IN NUMBER
7 ,p_customer_appr IN VARCHAR2
8 ,p_change_req_id IN NUMBER
9 ,p_chage_req_ver IN NUMBER
10 ,p_next_number IN OUT NOCOPY VARCHAR2
11 ,x_return_status OUT NOCOPY VARCHAR2
12 ,x_msg_count OUT NOCOPY NUMBER
13 ,x_msg_data OUT NOCOPY VARCHAR2) IS
14
15 BEGIN
16 x_return_status := FND_API.G_RET_STS_SUCCESS;
17 p_next_number := p_next_number;
18
19 EXCEPTION
20 WHEN OTHERS THEN
21 x_return_status := FND_API.G_RET_STS_ERROR;
22 END GET_NEXT_NUMBER;
23
24 END PA_PCO_DOC_NUMBER_CLIENT_EXTN;
25