[Home] [Help]
PACKAGE: APPS.OKL_MISC_TRANS_PVT
Source
1 PACKAGE OKL_MISC_TRANS_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRMSCS.pls 120.3 2006/07/11 09:51:02 dkagrawa noship $ */
3
4 SUBTYPE tclv_rec_type IS OKL_TRX_CONTRACTS_PUB.TCLV_REC_TYPE;
5 SUBTYPE tabv_tbl_type IS OKL_TRNS_ACC_DSTRS_PUB.tabv_tbl_type;
6
7
8 -----------------------------------------------------------------------------
9 -- APPLICATION GLOBAL CONSTANTS
10 -----------------------------------------------------------------------------
11
12 G_API_VERSION CONSTANT NUMBER := 1;
13 G_FALSE CONSTANT VARCHAR2(1) := OKL_API.G_FALSE;
14 G_TRUE CONSTANT VARCHAR2(1) := OKL_API.G_TRUE;
15 G_DB_ERROR CONSTANT VARCHAR2(12) := 'OKL_DB_ERROR';
16 G_PROG_NAME_TOKEN CONSTANT VARCHAR2(9) := 'PROG_NAME';
17 G_SQLCODE_TOKEN CONSTANT VARCHAR2(7) := 'SQLCODE';
18 G_SQLERRM_TOKEN CONSTANT VARCHAR2(7) := 'SQLERRM';
19 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
20 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_UNEXP_ERROR;
21 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKL_API.G_RET_STS_ERROR;
22
23 -----------------------------------------------------------------------------
24 -- DATA STRUCTURES
25 -----------------------------------------------------------------------------
26 TYPE jrnl_hdr_rec_type IS RECORD (ID OKL_TRX_CONTRACTS.ID%TYPE,
27 KHR_ID OKL_TRX_CONTRACTS.KHR_ID%TYPE,
28 PDT_ID OKL_TRX_CONTRACTS.PDT_ID%TYPE,
29 AMOUNT OKL_TRX_CONTRACTS.AMOUNT%TYPE,
30 TSU_CODE OKL_TRX_CONTRACTS.TSU_CODE%TYPE,
31 CURRENCY_CODE OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
32 TRX_NUMBER OKL_TRX_CONTRACTS.TRX_NUMBER%TYPE,
33 DESCRIPTION OKL_TRX_CONTRACTS.DESCRIPTION%TYPE,
34 DATE_TRANSACTION_OCCURRED OKL_TRX_CONTRACTS.DATE_TRANSACTION_OCCURRED%TYPE);
35
36 TYPE jrnl_line_rec_type IS RECORD (ID OKL_TXL_CNTRCT_LNS.ID%TYPE,
37 KHR_ID OKL_TXL_CNTRCT_LNS.KHR_ID%TYPE,
38 LINE_NUMBER OKL_TXL_CNTRCT_LNS.LINE_NUMBER%TYPE,
39 TCN_ID OKL_TXL_CNTRCT_LNS.TCN_ID%TYPE,
40 DESCRIPTION OKL_TXL_CNTRCT_LNS.DESCRIPTION%TYPE,
41 AVL_ID OKL_TXL_CNTRCT_LNS.AVL_ID%TYPE,
42 STY_ID OKL_TXL_CNTRCT_LNS.STY_ID%TYPE,
43 CURRENCY_CODE OKL_TXL_CNTRCT_LNS.CURRENCY_CODE%TYPE,
44 AMOUNT OKL_TXL_CNTRCT_LNS.AMOUNT%TYPE);
45
46 TYPE jrnl_line_tbl_type IS TABLE OF jrnl_line_rec_type INDEX BY BINARY_INTEGER;
47
48
49 PROCEDURE CREATE_MISC_DSTR_LINE(p_api_version IN NUMBER,
50 p_init_msg_list IN VARCHAR2,
51 x_return_status OUT NOCOPY VARCHAR2,
52 x_msg_count OUT NOCOPY NUMBER,
53 x_msg_data OUT NOCOPY VARCHAR2,
54 p_tclv_rec IN tclv_rec_type,
55 x_tclv_rec OUT NOCOPY tclv_rec_type);
56
57
58 PROCEDURE CREATE_DIST_LINE(p_tclv_rec IN tclv_rec_type,
59 x_return_status OUT NOCOPY VARCHAR2);
60
61
62 -----------------------------------------------------------------------------
63 -- PROGRAM UNITS
64 -----------------------------------------------------------------------------
65 PROCEDURE create_misc_transaction(p_api_version IN NUMBER,
66 p_init_msg_list IN VARCHAR2,
67 x_return_status OUT NOCOPY VARCHAR2,
68 x_msg_count OUT NOCOPY NUMBER,
69 x_msg_data OUT NOCOPY VARCHAR2,
70 p_jrnl_hdr_rec IN jrnl_hdr_rec_type,
71 p_jrnl_line_tbl IN jrnl_line_tbl_type,
72 x_jrnl_hdr_rec OUT NOCOPY jrnl_hdr_rec_type);
73
74 PROCEDURE update_misc_transaction(p_api_version IN NUMBER,
75 p_init_msg_list IN VARCHAR2,
76 x_return_status OUT NOCOPY VARCHAR2,
77 x_msg_count OUT NOCOPY NUMBER,
78 x_msg_data OUT NOCOPY VARCHAR2,
79 p_jrnl_hdr_rec IN jrnl_hdr_rec_type,
80 p_jrnl_line_tbl IN jrnl_line_tbl_type);
81
82
83 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_MISC_TRANS_PVT' ;
84 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
85 G_INVALID_VALUE CONSTANT VARCHAR2(200) := Okc_Api.G_INVALID_VALUE;
86 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
87 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := Okc_Api.G_COL_NAME_TOKEN;
88
89
90
91 END OKL_MISC_TRANS_PVT;
92