[Home] [Help]
PACKAGE: APPS.OKL_CFS_PVT
Source
1 Package OKL_CFS_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSCFSS.pls 120.2 2006/07/11 10:13:59 dkagrawa noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 TYPE cfsv_rec_type IS RECORD (
7 cure_fund_sum_id NUMBER := okl_api.G_MISS_NUM
8 ,vendor_id NUMBER := okl_api.G_MISS_NUM
9 ,balance NUMBER := okl_api.G_MISS_NUM
10 ,object_version_number NUMBER := okl_api.G_MISS_NUM
11 ,org_id NUMBER := okl_api.G_MISS_NUM
12 ,request_id NUMBER := okl_api.G_MISS_NUM
13 ,program_application_id NUMBER := okl_api.G_MISS_NUM
14 ,program_id NUMBER := okl_api.G_MISS_NUM
15 ,program_update_date OKL_CURE_FUND_SUMS.PROGRAM_UPDATE_DATE%TYPE := okl_api.G_MISS_DATE
16 ,attribute_category OKL_CURE_FUND_SUMS.ATTRIBUTE_CATEGORY%TYPE := okl_api.G_MISS_CHAR
17 ,attribute1 OKL_CURE_FUND_SUMS.ATTRIBUTE1%TYPE := okl_api.G_MISS_CHAR
18 ,attribute2 OKL_CURE_FUND_SUMS.ATTRIBUTE2%TYPE := okl_api.G_MISS_CHAR
19 ,attribute3 OKL_CURE_FUND_SUMS.ATTRIBUTE3%TYPE := okl_api.G_MISS_CHAR
20 ,attribute4 OKL_CURE_FUND_SUMS.ATTRIBUTE4%TYPE := okl_api.G_MISS_CHAR
21 ,attribute5 OKL_CURE_FUND_SUMS.ATTRIBUTE5%TYPE := okl_api.G_MISS_CHAR
22 ,attribute6 OKL_CURE_FUND_SUMS.ATTRIBUTE6%TYPE := okl_api.G_MISS_CHAR
23 ,attribute7 OKL_CURE_FUND_SUMS.ATTRIBUTE7%TYPE := okl_api.G_MISS_CHAR
24 ,attribute8 OKL_CURE_FUND_SUMS.ATTRIBUTE8%TYPE := okl_api.G_MISS_CHAR
25 ,attribute9 OKL_CURE_FUND_SUMS.ATTRIBUTE9%TYPE := okl_api.G_MISS_CHAR
26 ,attribute10 OKL_CURE_FUND_SUMS.ATTRIBUTE10%TYPE := okl_api.G_MISS_CHAR
27 ,attribute11 OKL_CURE_FUND_SUMS.ATTRIBUTE11%TYPE := okl_api.G_MISS_CHAR
28 ,attribute12 OKL_CURE_FUND_SUMS.ATTRIBUTE12%TYPE := okl_api.G_MISS_CHAR
29 ,attribute13 OKL_CURE_FUND_SUMS.ATTRIBUTE13%TYPE := okl_api.G_MISS_CHAR
30 ,attribute14 OKL_CURE_FUND_SUMS.ATTRIBUTE14%TYPE := okl_api.G_MISS_CHAR
31 ,attribute15 OKL_CURE_FUND_SUMS.ATTRIBUTE15%TYPE := okl_api.G_MISS_CHAR
32 ,created_by NUMBER := okl_api.G_MISS_NUM
33 ,creation_date OKL_CURE_FUND_SUMS.CREATION_DATE%TYPE := okl_api.G_MISS_DATE
34 ,last_updated_by NUMBER := okl_api.G_MISS_NUM
35 ,last_update_date OKL_CURE_FUND_SUMS.LAST_UPDATE_DATE%TYPE := okl_api.G_MISS_DATE
36 ,last_update_login NUMBER := okl_api.G_MISS_NUM);
37 G_MISS_cfsv_rec cfsv_rec_type;
38 TYPE cfsv_tbl_type IS TABLE OF cfsv_rec_type
39 INDEX BY BINARY_INTEGER;
40 TYPE cfs_rec_type IS RECORD (
41 cure_fund_sum_id NUMBER := okl_api.G_MISS_NUM
42 ,vendor_id NUMBER := okl_api.G_MISS_NUM
43 ,balance NUMBER := okl_api.G_MISS_NUM
44 ,object_version_number NUMBER := okl_api.G_MISS_NUM
45 ,org_id NUMBER := okl_api.G_MISS_NUM
46 ,request_id NUMBER := okl_api.G_MISS_NUM
47 ,program_application_id NUMBER := okl_api.G_MISS_NUM
48 ,program_id NUMBER := okl_api.G_MISS_NUM
49 ,program_update_date OKL_CURE_FUND_SUMS.PROGRAM_UPDATE_DATE%TYPE := okl_api.G_MISS_DATE
50 ,attribute_category OKL_CURE_FUND_SUMS.ATTRIBUTE_CATEGORY%TYPE := okl_api.G_MISS_CHAR
51 ,attribute1 OKL_CURE_FUND_SUMS.ATTRIBUTE1%TYPE := okl_api.G_MISS_CHAR
52 ,attribute2 OKL_CURE_FUND_SUMS.ATTRIBUTE2%TYPE := okl_api.G_MISS_CHAR
53 ,attribute3 OKL_CURE_FUND_SUMS.ATTRIBUTE3%TYPE := okl_api.G_MISS_CHAR
54 ,attribute4 OKL_CURE_FUND_SUMS.ATTRIBUTE4%TYPE := okl_api.G_MISS_CHAR
55 ,attribute5 OKL_CURE_FUND_SUMS.ATTRIBUTE5%TYPE := okl_api.G_MISS_CHAR
56 ,attribute6 OKL_CURE_FUND_SUMS.ATTRIBUTE6%TYPE := okl_api.G_MISS_CHAR
57 ,attribute7 OKL_CURE_FUND_SUMS.ATTRIBUTE7%TYPE := okl_api.G_MISS_CHAR
58 ,attribute8 OKL_CURE_FUND_SUMS.ATTRIBUTE8%TYPE := okl_api.G_MISS_CHAR
59 ,attribute9 OKL_CURE_FUND_SUMS.ATTRIBUTE9%TYPE := okl_api.G_MISS_CHAR
60 ,attribute10 OKL_CURE_FUND_SUMS.ATTRIBUTE10%TYPE := okl_api.G_MISS_CHAR
61 ,attribute11 OKL_CURE_FUND_SUMS.ATTRIBUTE11%TYPE := okl_api.G_MISS_CHAR
62 ,attribute12 OKL_CURE_FUND_SUMS.ATTRIBUTE12%TYPE := okl_api.G_MISS_CHAR
63 ,attribute13 OKL_CURE_FUND_SUMS.ATTRIBUTE13%TYPE := okl_api.G_MISS_CHAR
64 ,attribute14 OKL_CURE_FUND_SUMS.ATTRIBUTE14%TYPE := okl_api.G_MISS_CHAR
65 ,attribute15 OKL_CURE_FUND_SUMS.ATTRIBUTE15%TYPE := okl_api.G_MISS_CHAR
66 ,created_by NUMBER := okl_api.G_MISS_NUM
67 ,creation_date OKL_CURE_FUND_SUMS.CREATION_DATE%TYPE := okl_api.G_MISS_DATE
68 ,last_updated_by NUMBER := okl_api.G_MISS_NUM
69 ,last_update_date OKL_CURE_FUND_SUMS.LAST_UPDATE_DATE%TYPE := okl_api.G_MISS_DATE
70 ,last_update_login NUMBER := okl_api.G_MISS_NUM);
71 G_MISS_cfs_rec cfs_rec_type;
72 TYPE cfs_tbl_type IS TABLE OF cfs_rec_type
73 INDEX BY BINARY_INTEGER;
74 ---------------------------------------------------------------------------
75 -- GLOBAL MESSAGE CONSTANTS
76 ---------------------------------------------------------------------------
77 G_FND_APP CONSTANT VARCHAR2(200) := okl_api.G_FND_APP;
78 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := okl_api.G_FORM_UNABLE_TO_RESERVE_REC;
79 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := okl_api.G_FORM_RECORD_DELETED;
80 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := okl_api.G_FORM_RECORD_CHANGED;
81 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := okl_api.G_RECORD_LOGICALLY_DELETED;
82 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := okl_api.G_REQUIRED_VALUE;
83 G_INVALID_VALUE CONSTANT VARCHAR2(200) := okl_api.G_INVALID_VALUE;
84 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := okl_api.G_COL_NAME_TOKEN;
85 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := okl_api.G_PARENT_TABLE_TOKEN;
86 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := okl_api.G_CHILD_TABLE_TOKEN;
87 ---------------------------------------------------------------------------
88 -- GLOBAL EXCEPTIONS
89 ---------------------------------------------------------------------------
90 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
91
92 ---------------------------------------------------------------------------
93 -- GLOBAL VARIABLES
94 ---------------------------------------------------------------------------
95 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CFS_PVT';
96 G_APP_NAME CONSTANT VARCHAR2(3) := okl_api.G_APP_NAME;
97 -------------------------------------------------------------------------------
98 --Post change to TAPI code
99 -------------------------------------------------------------------------------
100 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_UNEXPECTED_ERROR';
101 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
102 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
103 g_no_parent_record CONSTANT VARCHAR2(200) := 'OKL_NO_PARENT_RECORD';
104 ---------------------------------------------------------------------------
105 -- GLOBAL MESSAGE CONSTANTS
106 --Post change to TAPI code
107 ---------------------------------------------------------------------------
108 -- Procedures and Functions
109 ---------------------------------------------------------------------------
110
111 PROCEDURE qc;
112 PROCEDURE change_version;
113 PROCEDURE api_copy;
114 PROCEDURE insert_row(
115 p_api_version IN NUMBER,
116 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
117 x_return_status OUT NOCOPY VARCHAR2,
118 x_msg_count OUT NOCOPY NUMBER,
119 x_msg_data OUT NOCOPY VARCHAR2,
120 p_cfsv_rec IN cfsv_rec_type,
121 x_cfsv_rec OUT NOCOPY cfsv_rec_type);
122 PROCEDURE insert_row(
123 p_api_version IN NUMBER,
124 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
125 x_return_status OUT NOCOPY VARCHAR2,
126 x_msg_count OUT NOCOPY NUMBER,
127 x_msg_data OUT NOCOPY VARCHAR2,
128 p_cfsv_tbl IN cfsv_tbl_type,
129 x_cfsv_tbl OUT NOCOPY cfsv_tbl_type,
130 px_error_tbl IN OUT NOCOPY okl_api.ERROR_TBL_TYPE);
131 PROCEDURE insert_row(
132 p_api_version IN NUMBER,
133 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
134 x_return_status OUT NOCOPY VARCHAR2,
135 x_msg_count OUT NOCOPY NUMBER,
136 x_msg_data OUT NOCOPY VARCHAR2,
137 p_cfsv_tbl IN cfsv_tbl_type,
138 x_cfsv_tbl OUT NOCOPY cfsv_tbl_type);
139 PROCEDURE lock_row(
140 p_api_version IN NUMBER,
141 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
142 x_return_status OUT NOCOPY VARCHAR2,
143 x_msg_count OUT NOCOPY NUMBER,
144 x_msg_data OUT NOCOPY VARCHAR2,
145 p_cfsv_rec IN cfsv_rec_type);
146 PROCEDURE lock_row(
147 p_api_version IN NUMBER,
148 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
149 x_return_status OUT NOCOPY VARCHAR2,
150 x_msg_count OUT NOCOPY NUMBER,
151 x_msg_data OUT NOCOPY VARCHAR2,
152 p_cfsv_tbl IN cfsv_tbl_type,
153 px_error_tbl IN OUT NOCOPY okl_api.ERROR_TBL_TYPE);
154 PROCEDURE lock_row(
155 p_api_version IN NUMBER,
156 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
157 x_return_status OUT NOCOPY VARCHAR2,
158 x_msg_count OUT NOCOPY NUMBER,
159 x_msg_data OUT NOCOPY VARCHAR2,
160 p_cfsv_tbl IN cfsv_tbl_type);
161 PROCEDURE update_row(
162 p_api_version IN NUMBER,
163 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
164 x_return_status OUT NOCOPY VARCHAR2,
165 x_msg_count OUT NOCOPY NUMBER,
166 x_msg_data OUT NOCOPY VARCHAR2,
167 p_cfsv_rec IN cfsv_rec_type,
168 x_cfsv_rec OUT NOCOPY cfsv_rec_type);
169 PROCEDURE update_row(
170 p_api_version IN NUMBER,
171 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
172 x_return_status OUT NOCOPY VARCHAR2,
173 x_msg_count OUT NOCOPY NUMBER,
174 x_msg_data OUT NOCOPY VARCHAR2,
175 p_cfsv_tbl IN cfsv_tbl_type,
176 x_cfsv_tbl OUT NOCOPY cfsv_tbl_type,
177 px_error_tbl IN OUT NOCOPY okl_api.ERROR_TBL_TYPE);
178 PROCEDURE update_row(
179 p_api_version IN NUMBER,
180 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
181 x_return_status OUT NOCOPY VARCHAR2,
182 x_msg_count OUT NOCOPY NUMBER,
183 x_msg_data OUT NOCOPY VARCHAR2,
184 p_cfsv_tbl IN cfsv_tbl_type,
185 x_cfsv_tbl OUT NOCOPY cfsv_tbl_type);
186 PROCEDURE delete_row(
187 p_api_version IN NUMBER,
188 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
189 x_return_status OUT NOCOPY VARCHAR2,
190 x_msg_count OUT NOCOPY NUMBER,
191 x_msg_data OUT NOCOPY VARCHAR2,
192 p_cfsv_rec IN cfsv_rec_type);
193 PROCEDURE delete_row(
194 p_api_version IN NUMBER,
195 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
196 x_return_status OUT NOCOPY VARCHAR2,
197 x_msg_count OUT NOCOPY NUMBER,
198 x_msg_data OUT NOCOPY VARCHAR2,
199 p_cfsv_tbl IN cfsv_tbl_type,
200 px_error_tbl IN OUT NOCOPY okl_api.ERROR_TBL_TYPE);
201 PROCEDURE delete_row(
202 p_api_version IN NUMBER,
203 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
204 x_return_status OUT NOCOPY VARCHAR2,
205 x_msg_count OUT NOCOPY NUMBER,
206 x_msg_data OUT NOCOPY VARCHAR2,
207 p_cfsv_tbl IN cfsv_tbl_type);
208 PROCEDURE validate_row(
209 p_api_version IN NUMBER,
210 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
211 x_return_status OUT NOCOPY VARCHAR2,
212 x_msg_count OUT NOCOPY NUMBER,
213 x_msg_data OUT NOCOPY VARCHAR2,
214 p_cfsv_rec IN cfsv_rec_type);
215 PROCEDURE validate_row(
216 p_api_version IN NUMBER,
217 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
218 x_return_status OUT NOCOPY VARCHAR2,
219 x_msg_count OUT NOCOPY NUMBER,
220 x_msg_data OUT NOCOPY VARCHAR2,
221 p_cfsv_tbl IN cfsv_tbl_type,
222 px_error_tbl IN OUT NOCOPY okl_api.ERROR_TBL_TYPE);
223 PROCEDURE validate_row(
224 p_api_version IN NUMBER,
225 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
226 x_return_status OUT NOCOPY VARCHAR2,
227 x_msg_count OUT NOCOPY NUMBER,
228 x_msg_data OUT NOCOPY VARCHAR2,
229 p_cfsv_tbl IN cfsv_tbl_type);
230 END OKL_CFS_PVT;