[Home] [Help]
PACKAGE: APPS.OKL_RCT_PVT
Source
1 PACKAGE OKL_RCT_PVT AS
2 /* $Header: OKLSRCTS.pls 120.4 2007/08/30 09:02:46 asawanka ship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 TYPE rct_rec_type IS RECORD (
7 id NUMBER := Okl_Api.G_MISS_NUM,
8 currency_code OKL_TRX_CSH_RECEIPT_B.CURRENCY_CODE%TYPE := Okl_Api.G_MISS_CHAR,
9 exchange_rate_type OKL_TRX_CSH_RECEIPT_B.EXCHANGE_RATE_TYPE%TYPE := Okl_Api.G_MISS_CHAR,
10 exchange_rate_date OKL_TRX_CSH_RECEIPT_B.EXCHANGE_RATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
11 exchange_rate OKL_TRX_CSH_RECEIPT_B.EXCHANGE_RATE%TYPE := Okl_Api.G_MISS_NUM,
12 btc_id NUMBER := Okl_Api.G_MISS_NUM,
13 iba_id NUMBER := Okl_Api.G_MISS_NUM,
14 gl_date DATE := Okl_Api.G_MISS_DATE,
15 ile_id NUMBER := Okl_Api.G_MISS_NUM,
16 irm_id NUMBER := Okl_Api.G_MISS_NUM,
17 object_version_number NUMBER := Okl_Api.G_MISS_NUM,
18 check_number OKL_TRX_CSH_RECEIPT_B.CHECK_NUMBER%TYPE := Okl_Api.G_MISS_CHAR,
19 amount NUMBER := Okl_Api.G_MISS_NUM,
20 date_effective OKL_TRX_CSH_RECEIPT_B.DATE_EFFECTIVE%TYPE := Okl_Api.G_MISS_DATE,
21 rcpt_status_code OKL_TRX_CSH_RECEIPT_B.RCPT_STATUS_CODE%TYPE := Okl_Api.G_MISS_CHAR,
22 request_id NUMBER := Okl_Api.G_MISS_NUM,
23 program_application_id NUMBER := Okl_Api.G_MISS_NUM,
24 program_id NUMBER := Okl_Api.G_MISS_NUM,
25 program_update_date OKL_TRX_CSH_RECEIPT_B.PROGRAM_UPDATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
26 org_id NUMBER := Okl_Api.G_MISS_NUM,
27 attribute_category OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE_CATEGORY%TYPE := Okl_Api.G_MISS_CHAR,
28 attribute1 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE1%TYPE := Okl_Api.G_MISS_CHAR,
29 attribute2 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE2%TYPE := Okl_Api.G_MISS_CHAR,
30 attribute3 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE3%TYPE := Okl_Api.G_MISS_CHAR,
31 attribute4 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE4%TYPE := Okl_Api.G_MISS_CHAR,
32 attribute5 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE5%TYPE := Okl_Api.G_MISS_CHAR,
33 attribute6 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE6%TYPE := Okl_Api.G_MISS_CHAR,
34 attribute7 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE7%TYPE := Okl_Api.G_MISS_CHAR,
35 attribute8 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE8%TYPE := Okl_Api.G_MISS_CHAR,
36 attribute9 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE9%TYPE := Okl_Api.G_MISS_CHAR,
37 attribute10 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE10%TYPE := Okl_Api.G_MISS_CHAR,
38 attribute11 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE11%TYPE := Okl_Api.G_MISS_CHAR,
39 attribute12 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE12%TYPE := Okl_Api.G_MISS_CHAR,
40 attribute13 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE13%TYPE := Okl_Api.G_MISS_CHAR,
41 attribute14 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE14%TYPE := Okl_Api.G_MISS_CHAR,
42 attribute15 OKL_TRX_CSH_RECEIPT_B.ATTRIBUTE15%TYPE := Okl_Api.G_MISS_CHAR,
43 created_by NUMBER := Okl_Api.G_MISS_NUM,
44 creation_date OKL_TRX_CSH_RECEIPT_B.CREATION_DATE%TYPE := Okl_Api.G_MISS_DATE,
45 last_updated_by NUMBER := Okl_Api.G_MISS_NUM,
46 last_update_date OKL_TRX_CSH_RECEIPT_B.LAST_UPDATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
47 last_update_login NUMBER := Okl_Api.G_MISS_NUM,
48 -- New column receipt type added.
49 receipt_type OKL_TRX_CSH_RECEIPT_B.RECEIPT_TYPE%TYPE := Okl_Api.G_MISS_CHAR,
50 cash_receipt_id OKL_TRX_CSH_RECEIPT_B.CASH_RECEIPT_ID%TYPE := Okl_Api.G_MISS_NUM,
51 fully_applied_flag OKL_TRX_CSH_RECEIPT_B.FULLY_APPLIED_FLAG%TYPE := Okl_Api.G_MISS_CHAR,
52 expired_flag OKL_TRX_CSH_RECEIPT_B.EXPIRED_FLAG%TYPE := Okl_Api.G_MISS_CHAR);
53 g_miss_rct_rec rct_rec_type;
54 TYPE rct_tbl_type IS TABLE OF rct_rec_type
55 INDEX BY BINARY_INTEGER;
56 TYPE OklTrxCshReceiptTlRecType IS RECORD (
57 id NUMBER := Okl_Api.G_MISS_NUM,
58 LANGUAGE OKL_TRX_CSH_RECEIPT_TL.LANGUAGE%TYPE := Okl_Api.G_MISS_CHAR,
59 source_lang OKL_TRX_CSH_RECEIPT_TL.SOURCE_LANG%TYPE := Okl_Api.G_MISS_CHAR,
60 sfwt_flag OKL_TRX_CSH_RECEIPT_TL.SFWT_FLAG%TYPE := Okl_Api.G_MISS_CHAR,
61 description OKL_TRX_CSH_RECEIPT_TL.DESCRIPTION%TYPE := Okl_Api.G_MISS_CHAR,
62 created_by NUMBER := Okl_Api.G_MISS_NUM,
63 creation_date OKL_TRX_CSH_RECEIPT_TL.CREATION_DATE%TYPE := Okl_Api.G_MISS_DATE,
64 last_updated_by NUMBER := Okl_Api.G_MISS_NUM,
65 last_update_date OKL_TRX_CSH_RECEIPT_TL.LAST_UPDATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
66 last_update_login NUMBER := Okl_Api.G_MISS_NUM);
67 GMissOklTrxCshReceiptTlRec OklTrxCshReceiptTlRecType;
68 TYPE OklTrxCshReceiptTlTblType IS TABLE OF OklTrxCshReceiptTlRecType
69 INDEX BY BINARY_INTEGER;
70 TYPE rctv_rec_type IS RECORD (
71 id NUMBER := Okl_Api.G_MISS_NUM,
72 object_version_number NUMBER := Okl_Api.G_MISS_NUM,
73 sfwt_flag OKL_TRX_CSH_RECEIPT_V.SFWT_FLAG%TYPE := Okl_Api.G_MISS_CHAR,
74 btc_id NUMBER := Okl_Api.G_MISS_NUM,
75 iba_id NUMBER := Okl_Api.G_MISS_NUM,
76 gl_date DATE := Okl_Api.G_MISS_DATE,
77 ile_id NUMBER := Okl_Api.G_MISS_NUM,
78 irm_id NUMBER := Okl_Api.G_MISS_NUM,
79 check_number OKL_TRX_CSH_RECEIPT_V.CHECK_NUMBER%TYPE := Okl_Api.G_MISS_CHAR,
80 currency_code OKL_TRX_CSH_RECEIPT_V.CURRENCY_CODE%TYPE := Okl_Api.G_MISS_CHAR,
81 exchange_rate_type OKL_TRX_CSH_RECEIPT_V.EXCHANGE_RATE_TYPE%TYPE := Okl_Api.G_MISS_CHAR,
82 exchange_rate_date OKL_TRX_CSH_RECEIPT_V.EXCHANGE_RATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
83 exchange_rate OKL_TRX_CSH_RECEIPT_V.EXCHANGE_RATE%TYPE := Okl_Api.G_MISS_NUM,
84 amount NUMBER := Okl_Api.G_MISS_NUM,
85 date_effective OKL_TRX_CSH_RECEIPT_V.DATE_EFFECTIVE%TYPE := Okl_Api.G_MISS_DATE,
86 rcpt_status_code OKL_TRX_CSH_RECEIPT_V.RCPT_STATUS_CODE%TYPE := Okl_Api.G_MISS_CHAR,
87 description OKL_TRX_CSH_RECEIPT_V.DESCRIPTION%TYPE := Okl_Api.G_MISS_CHAR,
88 attribute_category OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE_CATEGORY%TYPE := Okl_Api.G_MISS_CHAR,
89 attribute1 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE1%TYPE := Okl_Api.G_MISS_CHAR,
90 attribute2 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE2%TYPE := Okl_Api.G_MISS_CHAR,
91 attribute3 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE3%TYPE := Okl_Api.G_MISS_CHAR,
92 attribute4 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE4%TYPE := Okl_Api.G_MISS_CHAR,
93 attribute5 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE5%TYPE := Okl_Api.G_MISS_CHAR,
94 attribute6 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE6%TYPE := Okl_Api.G_MISS_CHAR,
95 attribute7 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE7%TYPE := Okl_Api.G_MISS_CHAR,
96 attribute8 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE8%TYPE := Okl_Api.G_MISS_CHAR,
97 attribute9 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE9%TYPE := Okl_Api.G_MISS_CHAR,
98 attribute10 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE10%TYPE := Okl_Api.G_MISS_CHAR,
99 attribute11 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE11%TYPE := Okl_Api.G_MISS_CHAR,
100 attribute12 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE12%TYPE := Okl_Api.G_MISS_CHAR,
101 attribute13 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE13%TYPE := Okl_Api.G_MISS_CHAR,
102 attribute14 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE14%TYPE := Okl_Api.G_MISS_CHAR,
103 attribute15 OKL_TRX_CSH_RECEIPT_V.ATTRIBUTE15%TYPE := Okl_Api.G_MISS_CHAR,
104 request_id NUMBER := Okl_Api.G_MISS_NUM,
105 program_application_id NUMBER := Okl_Api.G_MISS_NUM,
106 program_id NUMBER := Okl_Api.G_MISS_NUM,
107 program_update_date OKL_TRX_CSH_RECEIPT_V.PROGRAM_UPDATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
108 org_id NUMBER := Okl_Api.G_MISS_NUM,
109 created_by NUMBER := Okl_Api.G_MISS_NUM,
110 creation_date OKL_TRX_CSH_RECEIPT_V.CREATION_DATE%TYPE := Okl_Api.G_MISS_DATE,
111 last_updated_by NUMBER := Okl_Api.G_MISS_NUM,
112 last_update_date OKL_TRX_CSH_RECEIPT_V.LAST_UPDATE_DATE%TYPE := Okl_Api.G_MISS_DATE,
113 last_update_login NUMBER := Okl_Api.G_MISS_NUM,
114 -- New column receipt type added.
115 receipt_type OKL_TRX_CSH_RECEIPT_V.RECEIPT_TYPE%TYPE := Okl_Api.G_MISS_CHAR,
116 cash_receipt_id OKL_TRX_CSH_RECEIPT_B.CASH_RECEIPT_ID%TYPE := Okl_Api.G_MISS_NUM,
117 fully_applied_flag OKL_TRX_CSH_RECEIPT_B.FULLY_APPLIED_FLAG%TYPE := Okl_Api.G_MISS_CHAR,
118 expired_flag OKL_TRX_CSH_RECEIPT_B.EXPIRED_FLAG%TYPE := Okl_Api.G_MISS_CHAR);
119 g_miss_rctv_rec rctv_rec_type;
120 TYPE rctv_tbl_type IS TABLE OF rctv_rec_type
121 INDEX BY BINARY_INTEGER;
122 ---------------------------------------------------------------------------
123 -- GLOBAL MESSAGE CONSTANTS
124 ---------------------------------------------------------------------------
125 G_FND_APP CONSTANT VARCHAR2(200) := Okl_Api.G_FND_APP;
126 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := Okl_Api.G_FORM_UNABLE_TO_RESERVE_REC;
127 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := Okl_Api.G_FORM_RECORD_DELETED;
128 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := Okl_Api.G_FORM_RECORD_CHANGED;
129 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := Okl_Api.G_RECORD_LOGICALLY_DELETED;
130 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := Okl_Api.G_REQUIRED_VALUE;
131 G_INVALID_VALUE CONSTANT VARCHAR2(200) := Okl_Api.G_INVALID_VALUE;
132 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := Okl_Api.G_COL_NAME_TOKEN;
133 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := Okl_Api.G_PARENT_TABLE_TOKEN;
134 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := Okl_Api.G_CHILD_TABLE_TOKEN;
135 ---------------------------------------------------------------------------
136 -- GLOBAL VARIABLES
137 ---------------------------------------------------------------------------
138 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_RCT_PVT';
139 G_APP_NAME CONSTANT VARCHAR2(3) := Okl_Api.G_APP_NAME;
140
141 ---------------------------------------------------------------------------
142 -- ADDED AFTER TAPI 04/17/2001
143 ---------------------------------------------------------------------------
144 ---------------------------------------------------------------------------
145 -- GLOBAL MESSAGES
146 ---------------------------------------------------------------------------
147 G_NO_PARENT_RECORD CONSTANT VARCHAR2(200) := 'OKL_NO_PARENT_RECORD';
148 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_UNEXPECTED_ERROR';
149 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
150 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
151 G_USER_MESSAGE CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_INVALID_VALUE';
152 ---------------------------------------------------------------------------
153 -- GLOBAL VARIABLES
154 ---------------------------------------------------------------------------
155 G_VIEW CONSTANT VARCHAR2(30) := 'OKL_TRX_AR_INVOICES_V';
156 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
157
158 ---------------------------------------------------------------------------
159 -- POST TAPI GENERATION CODE ENDS HERE.
160 ---------------------------------------------------------------------------
161
162 ---------------------------------------------------------------------------
163 -- Procedures and Functions
164 ---------------------------------------------------------------------------
165
166 PROCEDURE qc;
167 PROCEDURE change_version;
168 PROCEDURE api_copy;
169 PROCEDURE add_language;
170 PROCEDURE insert_row(
171 p_api_version IN NUMBER,
172 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
173 x_return_status OUT NOCOPY VARCHAR2,
174 x_msg_count OUT NOCOPY NUMBER,
175 x_msg_data OUT NOCOPY VARCHAR2,
176 p_rctv_rec IN rctv_rec_type,
177 x_rctv_rec OUT NOCOPY rctv_rec_type);
178
179 PROCEDURE insert_row(
180 p_api_version IN NUMBER,
181 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
182 x_return_status OUT NOCOPY VARCHAR2,
183 x_msg_count OUT NOCOPY NUMBER,
184 x_msg_data OUT NOCOPY VARCHAR2,
185 p_rctv_tbl IN rctv_tbl_type,
186 x_rctv_tbl OUT NOCOPY rctv_tbl_type);
187
188 PROCEDURE lock_row(
189 p_api_version IN NUMBER,
190 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
191 x_return_status OUT NOCOPY VARCHAR2,
192 x_msg_count OUT NOCOPY NUMBER,
193 x_msg_data OUT NOCOPY VARCHAR2,
194 p_rctv_rec IN rctv_rec_type);
195
196 PROCEDURE lock_row(
197 p_api_version IN NUMBER,
198 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
199 x_return_status OUT NOCOPY VARCHAR2,
200 x_msg_count OUT NOCOPY NUMBER,
201 x_msg_data OUT NOCOPY VARCHAR2,
202 p_rctv_tbl IN rctv_tbl_type);
203
204 PROCEDURE update_row(
205 p_api_version IN NUMBER,
206 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
207 x_return_status OUT NOCOPY VARCHAR2,
208 x_msg_count OUT NOCOPY NUMBER,
209 x_msg_data OUT NOCOPY VARCHAR2,
210 p_rctv_rec IN rctv_rec_type,
211 x_rctv_rec OUT NOCOPY rctv_rec_type);
212
213 PROCEDURE update_row(
214 p_api_version IN NUMBER,
215 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
216 x_return_status OUT NOCOPY VARCHAR2,
217 x_msg_count OUT NOCOPY NUMBER,
218 x_msg_data OUT NOCOPY VARCHAR2,
219 p_rctv_tbl IN rctv_tbl_type,
220 x_rctv_tbl OUT NOCOPY rctv_tbl_type);
221
222 PROCEDURE delete_row(
223 p_api_version IN NUMBER,
224 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
225 x_return_status OUT NOCOPY VARCHAR2,
226 x_msg_count OUT NOCOPY NUMBER,
227 x_msg_data OUT NOCOPY VARCHAR2,
228 p_rctv_rec IN rctv_rec_type);
229
230 PROCEDURE delete_row(
231 p_api_version IN NUMBER,
232 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
233 x_return_status OUT NOCOPY VARCHAR2,
234 x_msg_count OUT NOCOPY NUMBER,
235 x_msg_data OUT NOCOPY VARCHAR2,
236 p_rctv_tbl IN rctv_tbl_type);
237
238 PROCEDURE validate_row(
239 p_api_version IN NUMBER,
240 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
241 x_return_status OUT NOCOPY VARCHAR2,
242 x_msg_count OUT NOCOPY NUMBER,
243 x_msg_data OUT NOCOPY VARCHAR2,
244 p_rctv_rec IN rctv_rec_type);
245
246 PROCEDURE validate_row(
247 p_api_version IN NUMBER,
248 p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
249 x_return_status OUT NOCOPY VARCHAR2,
250 x_msg_count OUT NOCOPY NUMBER,
251 x_msg_data OUT NOCOPY VARCHAR2,
252 p_rctv_tbl IN rctv_tbl_type);
253
254 END Okl_Rct_Pvt;