[Home] [Help]
PACKAGE: APPS.OKL_CREATE_DISB_TRANS_PVT
Source
1 PACKAGE OKL_CREATE_DISB_TRANS_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRCDTS.pls 120.1 2007/02/16 19:53:14 pjgomes noship $ */
3 ---------------------------------------------------------------------------------------------------
4 -- Global Variables
5 ---------------------------------------------------------------------------------------------------
6 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CREATE_DISB_TRANS_PVT';
7 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
8 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
9 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKL_API.G_REQUIRED_VALUE;
10 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
11 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
12 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
13
14 ----------------------------------------------------------------------------------------------------
15 --Record, Table Type
16 ----------------------------------------------------------------------------------------------------
17 SUBTYPE tapv_rec_type IS okl_tap_pvt.tapv_rec_type;
18 SUBTYPE tplv_tbl_type IS okl_tpl_pvt.tplv_tbl_type;
19
20 ----------------------------------------------------------------------------------------------------
21 --Procedures and Functions
22 ----------------------------------------------------------------------------------------------------
23
24 --Procedure for creating disbursement transactions
25 --This procedure will create a header, lines and distributions
26 --and it will return a status about the creation process.
27
28 PROCEDURE create_disb_trx(p_api_version IN NUMBER
29 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
30 ,x_return_status OUT NOCOPY VARCHAR2
31 ,x_msg_count OUT NOCOPY NUMBER
32 ,x_msg_data OUT NOCOPY VARCHAR2
33 ,p_tapv_rec IN tapv_rec_type
34 ,p_tplv_tbl IN tplv_tbl_type
35 ,x_tapv_rec OUT NOCOPY tapv_rec_type
36 ,x_tplv_tbl OUT NOCOPY tplv_tbl_type
37 );
38
39 --Procedure for updating transaction status
40
41 PROCEDURE update_disb_trx(p_api_version IN NUMBER
42 ,p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
43 ,x_return_status OUT NOCOPY VARCHAR2
44 ,x_msg_count OUT NOCOPY NUMBER
45 ,x_msg_data OUT NOCOPY VARCHAR2
46 ,p_tapv_rec IN tapv_rec_type
47 ,x_tapv_rec OUT NOCOPY tapv_rec_type
48 );
49
50 FUNCTION get_khr_line_amount(p_invoice_id IN NUMBER
51 ,p_khr_id IN NUMBER) RETURN NUMBER;
52
53 PRAGMA RESTRICT_REFERENCES(get_khr_line_amount, WNDS, WNPS);
54
55 END OKL_CREATE_DISB_TRANS_PVT;