[Home] [Help]
PACKAGE: APPS.OKL_FEE_PVT
Source
1 PACKAGE OKL_FEE_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSFEES.pls 120.2 2007/08/08 21:12:33 rravikir noship $ */
3
4 --------------------
5 -- PACKAGE CONSTANTS
6 --------------------
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKL_FEE_PVT';
8 G_APP_NAME CONSTANT VARCHAR2(30) := OKL_API.G_APP_NAME;
9 G_API_VERSION CONSTANT NUMBER := 1;
10 G_USER_ID CONSTANT NUMBER := FND_GLOBAL.USER_ID;
11 G_LOGIN_ID CONSTANT NUMBER := FND_GLOBAL.LOGIN_ID;
12 G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
13 G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
14 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
15 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
16 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
17 G_DB_ERROR CONSTANT VARCHAR2(30) := 'OKL_DB_ERROR';
18 G_COL_ERROR CONSTANT VARCHAR2(30) := 'OKL_COL_ERROR';
19 G_OVN_ERROR CONSTANT VARCHAR2(30) := 'OKL_OVN_ERROR';
20 G_OVN_ERROR2 CONSTANT VARCHAR2(30) := 'OKL_OVN_ERROR2';
21 G_OVN_ERROR3 CONSTANT VARCHAR2(30) := 'OKL_OVN_ERROR3';
22 G_PKG_NAME_TOKEN CONSTANT VARCHAR2(30) := 'PKG_NAME';
23 G_PROG_NAME_TOKEN CONSTANT VARCHAR2(30) := 'PROG_NAME';
24 G_COL_NAME_TOKEN CONSTANT VARCHAR2(30) := 'COL_NAME';
25 G_SQLCODE_TOKEN CONSTANT VARCHAR2(30) := 'SQLCODE';
26 G_SQLERRM_TOKEN CONSTANT VARCHAR2(30) := 'SQLERRM';
27
28 ------------------
29 -- DATA STRUCTURES
30 ------------------
31
32 -- Do not include WHO columns in the base table record structure
33 TYPE fee_rec_type IS RECORD (
34 id okl_fees_b.id%TYPE
35 ,object_version_number okl_fees_b.object_version_number%TYPE
36 ,attribute_category okl_fees_b.attribute_category%TYPE
37 ,attribute1 okl_fees_b.attribute1%TYPE
38 ,attribute2 okl_fees_b.attribute2%TYPE
39 ,attribute3 okl_fees_b.attribute3%TYPE
40 ,attribute4 okl_fees_b.attribute4%TYPE
41 ,attribute5 okl_fees_b.attribute5%TYPE
42 ,attribute6 okl_fees_b.attribute6%TYPE
43 ,attribute7 okl_fees_b.attribute7%TYPE
44 ,attribute8 okl_fees_b.attribute8%TYPE
45 ,attribute9 okl_fees_b.attribute9%TYPE
46 ,attribute10 okl_fees_b.attribute10%TYPE
47 ,attribute11 okl_fees_b.attribute11%TYPE
48 ,attribute12 okl_fees_b.attribute12%TYPE
49 ,attribute13 okl_fees_b.attribute13%TYPE
50 ,attribute14 okl_fees_b.attribute14%TYPE
51 ,attribute15 okl_fees_b.attribute15%TYPE
52 ,parent_object_code okl_fees_b.parent_object_code%TYPE
53 ,parent_object_id okl_fees_b.parent_object_id%TYPE
54 ,stream_type_id okl_fees_b.stream_type_id%TYPE
55 ,fee_type okl_fees_b.fee_type%TYPE
56 ,structured_pricing okl_fees_b.structured_pricing%TYPE
57 ,rate_template_id okl_fees_b.rate_template_id%TYPE
58 ,rate_card_id okl_fees_b.rate_card_id%TYPE
59 ,lease_rate_factor okl_fees_b.lease_rate_factor%TYPE
60 ,target_arrears okl_fees_b.target_arrears%TYPE
61 ,effective_from okl_fees_b.effective_from%TYPE
62 ,effective_to okl_fees_b.effective_to%TYPE
63 ,supplier_id okl_fees_b.supplier_id%TYPE
64 ,rollover_quote_id okl_fees_b.rollover_quote_id%TYPE
65 ,initial_direct_cost okl_fees_b.initial_direct_cost%TYPE
66 ,fee_amount okl_fees_b.fee_amount%TYPE
67 ,target_amount okl_fees_b.target_amount%TYPE
68 ,target_frequency okl_fees_b.target_frequency%TYPE
69 ,payment_type_id okl_fees_b.payment_type_id%TYPE
70 ,fee_purpose_code okl_fees_b.fee_purpose_code%TYPE
71 );
72
73 -- Do not include WHO, LANGUAGE and SFWT_FLAG columns in the _TL record structure
74 TYPE feetl_rec_type IS RECORD (
75 id okl_fees_tl.id%TYPE
76 ,short_description okl_fees_tl.short_description%TYPE
77 ,description okl_fees_tl.description%TYPE
78 ,comments okl_fees_tl.comments%TYPE
79 );
80
81 -- view record structure
82 TYPE feev_rec_type IS RECORD (
83 id okl_fees_b.id%TYPE
84 ,object_version_number okl_fees_b.object_version_number%TYPE
85 ,attribute_category okl_fees_b.attribute_category%TYPE
86 ,attribute1 okl_fees_b.attribute1%TYPE
87 ,attribute2 okl_fees_b.attribute2%TYPE
88 ,attribute3 okl_fees_b.attribute3%TYPE
89 ,attribute4 okl_fees_b.attribute4%TYPE
90 ,attribute5 okl_fees_b.attribute5%TYPE
91 ,attribute6 okl_fees_b.attribute6%TYPE
92 ,attribute7 okl_fees_b.attribute7%TYPE
93 ,attribute8 okl_fees_b.attribute8%TYPE
94 ,attribute9 okl_fees_b.attribute9%TYPE
95 ,attribute10 okl_fees_b.attribute10%TYPE
96 ,attribute11 okl_fees_b.attribute11%TYPE
97 ,attribute12 okl_fees_b.attribute12%TYPE
98 ,attribute13 okl_fees_b.attribute13%TYPE
99 ,attribute14 okl_fees_b.attribute14%TYPE
100 ,attribute15 okl_fees_b.attribute15%TYPE
101 ,parent_object_code okl_fees_b.parent_object_code%TYPE
102 ,parent_object_id okl_fees_b.parent_object_id%TYPE
103 ,stream_type_id okl_fees_b.stream_type_id%TYPE
104 ,fee_type okl_fees_b.fee_type%TYPE
105 ,structured_pricing okl_fees_b.structured_pricing%TYPE
106 ,rate_template_id okl_fees_b.rate_template_id%TYPE
107 ,rate_card_id okl_fees_b.rate_card_id%TYPE
108 ,lease_rate_factor okl_fees_b.lease_rate_factor%TYPE
109 ,target_arrears okl_fees_b.target_arrears%TYPE
110 ,effective_from okl_fees_b.effective_from%TYPE
111 ,effective_to okl_fees_b.effective_to%TYPE
112 ,supplier_id okl_fees_b.supplier_id%TYPE
113 ,rollover_quote_id okl_fees_b.rollover_quote_id%TYPE
114 ,initial_direct_cost okl_fees_b.initial_direct_cost%TYPE
115 ,fee_amount okl_fees_b.fee_amount%TYPE
116 ,target_amount okl_fees_b.target_amount%TYPE
117 ,target_frequency okl_fees_b.target_frequency%TYPE
118 ,short_description okl_fees_tl.short_description%TYPE
119 ,description okl_fees_tl.description%TYPE
120 ,comments okl_fees_tl.comments%TYPE
121 ,payment_type_id okl_fees_b.payment_type_id%TYPE
122 ,fee_purpose_code okl_fees_b.fee_purpose_code%TYPE
123 );
124
125 TYPE feev_tbl_type IS TABLE OF feev_rec_type INDEX BY BINARY_INTEGER;
126
127 ----------------
128 -- PROGRAM UNITS
129 ----------------
130 PROCEDURE add_language;
131
132 PROCEDURE insert_row(
133 p_api_version IN NUMBER,
134 p_init_msg_list IN VARCHAR2,
135 x_return_status OUT NOCOPY VARCHAR2,
136 x_msg_count OUT NOCOPY NUMBER,
137 x_msg_data OUT NOCOPY VARCHAR2,
138 p_feev_tbl IN feev_tbl_type,
139 x_feev_tbl OUT NOCOPY feev_tbl_type);
140
141 PROCEDURE update_row(
142 p_api_version IN NUMBER,
143 p_init_msg_list IN VARCHAR2,
144 x_return_status OUT NOCOPY VARCHAR2,
145 x_msg_count OUT NOCOPY NUMBER,
146 x_msg_data OUT NOCOPY VARCHAR2,
147 p_feev_tbl IN feev_tbl_type,
148 x_feev_tbl OUT NOCOPY feev_tbl_type);
149
150 PROCEDURE delete_row(
151 p_api_version IN NUMBER,
152 p_init_msg_list IN VARCHAR2,
153 x_return_status OUT NOCOPY VARCHAR2,
154 x_msg_count OUT NOCOPY NUMBER,
155 x_msg_data OUT NOCOPY VARCHAR2,
156 p_feev_tbl IN feev_tbl_type);
157
158 PROCEDURE insert_row(
159 p_api_version IN NUMBER,
160 p_init_msg_list IN VARCHAR2,
161 x_return_status OUT NOCOPY VARCHAR2,
162 x_msg_count OUT NOCOPY NUMBER,
163 x_msg_data OUT NOCOPY VARCHAR2,
164 p_feev_rec IN feev_rec_type,
165 x_feev_rec OUT NOCOPY feev_rec_type);
166
167 PROCEDURE update_row(
168 p_api_version IN NUMBER,
169 p_init_msg_list IN VARCHAR2,
170 x_return_status OUT NOCOPY VARCHAR2,
171 x_msg_count OUT NOCOPY NUMBER,
172 x_msg_data OUT NOCOPY VARCHAR2,
173 p_feev_rec IN feev_rec_type,
174 x_feev_rec OUT NOCOPY feev_rec_type);
175
176 PROCEDURE delete_row(
177 p_api_version IN NUMBER,
178 p_init_msg_list IN VARCHAR2,
179 x_return_status OUT NOCOPY VARCHAR2,
180 x_msg_count OUT NOCOPY NUMBER,
181 x_msg_data OUT NOCOPY VARCHAR2,
182 p_feev_rec IN feev_rec_type);
183
184 END OKL_FEE_PVT;