[Home] [Help]
PACKAGE BODY: APPS.ASO_PAYMENTS_PKG
Source
1 PACKAGE BODY ASO_PAYMENTS_PKG as
2 /* $Header: asotpayb.pls 120.2 2005/07/19 11:17:51 appldev ship $ */
3 -- Start of Comments
4 -- Package name : ASO_PAYMENTS_PKG
5 -- Purpose :
6 -- History :
7 -- NOTE :
8 -- End of Comments
9
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'ASO_PAYMENTS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'asotpayb.pls';
13
14 PROCEDURE Insert_Row(
15 px_PAYMENT_ID IN OUT NOCOPY /* file.sql.39 change */ NUMBER,
16 p_CREATION_DATE DATE,
17 p_CREATED_BY NUMBER,
18 p_LAST_UPDATE_DATE DATE,
19 p_LAST_UPDATED_BY NUMBER,
20 p_LAST_UPDATE_LOGIN NUMBER,
21 p_REQUEST_ID NUMBER,
22 p_PROGRAM_APPLICATION_ID NUMBER,
23 p_PROGRAM_ID NUMBER,
24 p_PROGRAM_UPDATE_DATE DATE,
25 p_QUOTE_HEADER_ID NUMBER,
26 p_QUOTE_LINE_ID NUMBER,
27 p_PAYMENT_TYPE_CODE VARCHAR2,
28 p_PAYMENT_REF_NUMBER VARCHAR2,
29 p_PAYMENT_OPTION VARCHAR2,
30 p_PAYMENT_TERM_ID NUMBER,
31 p_CREDIT_CARD_CODE VARCHAR2,
32 p_CREDIT_CARD_HOLDER_NAME VARCHAR2,
33 p_CREDIT_CARD_EXPIRATION_DATE DATE,
34 p_CREDIT_CARD_APPROVAL_CODE VARCHAR2,
35 p_CREDIT_CARD_APPROVAL_DATE DATE,
36 p_PAYMENT_AMOUNT NUMBER,
37 p_ATTRIBUTE_CATEGORY VARCHAR2,
38 p_ATTRIBUTE1 VARCHAR2,
39 p_ATTRIBUTE2 VARCHAR2,
40 p_ATTRIBUTE3 VARCHAR2,
41 p_ATTRIBUTE4 VARCHAR2,
42 p_ATTRIBUTE5 VARCHAR2,
43 p_ATTRIBUTE6 VARCHAR2,
44 p_ATTRIBUTE7 VARCHAR2,
45 p_ATTRIBUTE8 VARCHAR2,
46 p_ATTRIBUTE9 VARCHAR2,
47 p_ATTRIBUTE10 VARCHAR2,
48 p_ATTRIBUTE11 VARCHAR2,
49 p_ATTRIBUTE12 VARCHAR2,
50 p_ATTRIBUTE13 VARCHAR2,
51 p_ATTRIBUTE14 VARCHAR2,
52 p_ATTRIBUTE15 VARCHAR2,
53 p_ATTRIBUTE16 VARCHAR2,
54 p_ATTRIBUTE17 VARCHAR2,
55 p_ATTRIBUTE18 VARCHAR2,
56 p_ATTRIBUTE19 VARCHAR2,
57 p_ATTRIBUTE20 VARCHAR2,
58 p_QUOTE_SHIPMENT_ID NUMBER,
59 p_CUST_PO_NUMBER VARCHAR2,
60 p_PAYMENT_TERM_ID_FROM NUMBER,
61 p_OBJECT_VERSION_NUMBER NUMBER,
62 p_CUST_PO_LINE_NUMBER VARCHAR2, -- Line Payments Change
63 p_TRXN_EXTENSION_ID NUMBER
64 )
65
66 IS
67 CURSOR C2 IS SELECT ASO_PAYMENTS_S.nextval FROM sys.dual;
68 BEGIN
69 If (px_PAYMENT_ID IS NULL) OR (px_PAYMENT_ID = FND_API.G_MISS_NUM) then
70 OPEN C2;
71 FETCH C2 INTO px_PAYMENT_ID;
72 CLOSE C2;
73 End If;
74 INSERT INTO ASO_PAYMENTS(
75 PAYMENT_ID,
76 CREATION_DATE,
77 CREATED_BY,
78 LAST_UPDATE_DATE,
79 LAST_UPDATED_BY,
80 LAST_UPDATE_LOGIN,
81 REQUEST_ID,
82 PROGRAM_APPLICATION_ID,
83 PROGRAM_ID,
84 PROGRAM_UPDATE_DATE,
85 QUOTE_HEADER_ID,
86 QUOTE_LINE_ID,
87 PAYMENT_TYPE_CODE,
88 PAYMENT_REF_NUMBER,
89 PAYMENT_OPTION,
90 PAYMENT_TERM_ID,
91 CREDIT_CARD_CODE,
92 CREDIT_CARD_HOLDER_NAME,
93 CREDIT_CARD_EXPIRATION_DATE,
94 CREDIT_CARD_APPROVAL_CODE,
95 CREDIT_CARD_APPROVAL_DATE,
96 PAYMENT_AMOUNT,
97 ATTRIBUTE_CATEGORY,
98 ATTRIBUTE1,
99 ATTRIBUTE2,
100 ATTRIBUTE3,
101 ATTRIBUTE4,
102 ATTRIBUTE5,
103 ATTRIBUTE6,
104 ATTRIBUTE7,
105 ATTRIBUTE8,
106 ATTRIBUTE9,
107 ATTRIBUTE10,
108 ATTRIBUTE11,
109 ATTRIBUTE12,
110 ATTRIBUTE13,
111 ATTRIBUTE14,
112 ATTRIBUTE15,
113 ATTRIBUTE16,
114 ATTRIBUTE17,
115 ATTRIBUTE18,
116 ATTRIBUTE19,
117 ATTRIBUTE20,
118 QUOTE_SHIPMENT_ID,
119 CUST_PO_NUMBER,
120 PAYMENT_TERM_ID_FROM,
121 OBJECT_VERSION_NUMBER,
122 CUST_PO_LINE_NUMBER, -- Line Payments Change
123 TRXN_EXTENSION_ID
124 ) VALUES (
125 px_PAYMENT_ID,
126 ASO_UTILITY_PVT.decode( p_CREATION_DATE, FND_API.G_MISS_DATE, NULL, p_CREATION_DATE),
127 decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
128 ASO_UTILITY_PVT.decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, p_LAST_UPDATE_DATE),
129 decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY),
130 decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
131 decode( p_REQUEST_ID, FND_API.G_MISS_NUM, NULL, p_REQUEST_ID),
132 decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_APPLICATION_ID),
133 decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_ID),
134 ASO_UTILITY_PVT.decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, NULL, p_PROGRAM_UPDATE_DATE),
135 decode( p_QUOTE_HEADER_ID, FND_API.G_MISS_NUM, NULL, p_QUOTE_HEADER_ID),
136 decode( p_QUOTE_LINE_ID, FND_API.G_MISS_NUM, NULL, p_QUOTE_LINE_ID),
137 decode( p_PAYMENT_TYPE_CODE, FND_API.G_MISS_CHAR, NULL, p_PAYMENT_TYPE_CODE),
138 decode( p_PAYMENT_REF_NUMBER, FND_API.G_MISS_CHAR, NULL, p_PAYMENT_REF_NUMBER),
139 decode( p_PAYMENT_OPTION, FND_API.G_MISS_CHAR, NULL, p_PAYMENT_OPTION),
140 decode( p_PAYMENT_TERM_ID, FND_API.G_MISS_NUM, NULL, p_PAYMENT_TERM_ID),
141 decode( p_CREDIT_CARD_CODE, FND_API.G_MISS_CHAR, NULL, p_CREDIT_CARD_CODE),
142 decode( p_CREDIT_CARD_HOLDER_NAME, FND_API.G_MISS_CHAR, NULL, p_CREDIT_CARD_HOLDER_NAME),
143 ASO_UTILITY_PVT.decode( p_CREDIT_CARD_EXPIRATION_DATE, FND_API.G_MISS_DATE, NULL, p_CREDIT_CARD_EXPIRATION_DATE),
144 decode( p_CREDIT_CARD_APPROVAL_CODE, FND_API.G_MISS_CHAR, NULL, p_CREDIT_CARD_APPROVAL_CODE),
145 ASO_UTILITY_PVT.decode( p_CREDIT_CARD_APPROVAL_DATE, FND_API.G_MISS_DATE, NULL, p_CREDIT_CARD_APPROVAL_DATE),
146 decode( p_PAYMENT_AMOUNT, FND_API.G_MISS_NUM, NULL, p_PAYMENT_AMOUNT),
147 decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY),
148 decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
149 decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
150 decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
151 decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
152 decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
153 decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
154 decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
155 decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
156 decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
157 decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
158 decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
159 decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
160 decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
161 decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
162 decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15),
163 decode( p_ATTRIBUTE16, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE16),
164 decode( p_ATTRIBUTE17, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE17),
165 decode( p_ATTRIBUTE18, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE18),
166 decode( p_ATTRIBUTE19, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE19),
167 decode( p_ATTRIBUTE20, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE20),
168 decode( p_QUOTE_SHIPMENT_ID, FND_API.G_MISS_NUM, NULL, p_QUOTE_SHIPMENT_ID),
169 decode( p_CUST_PO_NUMBER, FND_API.G_MISS_CHAR, NULL, p_CUST_PO_NUMBER),
170 decode( p_PAYMENT_TERM_ID_FROM, FND_API.G_MISS_NUM, NULL, p_PAYMENT_TERM_ID_FROM),
171 decode ( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM,1,NULL,1, p_OBJECT_VERSION_NUMBER),
172 decode ( p_CUST_PO_LINE_NUMBER, FND_API.G_MISS_CHAR,NULL,p_CUST_PO_LINE_NUMBER),-- Line Payments Change
173 decode( p_TRXN_EXTENSION_ID, FND_API.G_MISS_NUM, NULL, p_TRXN_EXTENSION_ID)
174 );
175 End Insert_Row;
176
177 PROCEDURE Update_Row(
178 p_PAYMENT_ID NUMBER,
179 p_CREATION_DATE DATE,
180 p_CREATED_BY NUMBER,
181 p_LAST_UPDATE_DATE DATE,
182 p_LAST_UPDATED_BY NUMBER,
183 p_LAST_UPDATE_LOGIN NUMBER,
184 p_REQUEST_ID NUMBER,
185 p_PROGRAM_APPLICATION_ID NUMBER,
186 p_PROGRAM_ID NUMBER,
187 p_PROGRAM_UPDATE_DATE DATE,
188 p_QUOTE_HEADER_ID NUMBER,
189 p_QUOTE_LINE_ID NUMBER,
190 p_PAYMENT_TYPE_CODE VARCHAR2,
191 p_PAYMENT_REF_NUMBER VARCHAR2,
192 p_PAYMENT_OPTION VARCHAR2,
193 p_PAYMENT_TERM_ID NUMBER,
194 p_CREDIT_CARD_CODE VARCHAR2,
195 p_CREDIT_CARD_HOLDER_NAME VARCHAR2,
196 p_CREDIT_CARD_EXPIRATION_DATE DATE,
197 p_CREDIT_CARD_APPROVAL_CODE VARCHAR2,
198 p_CREDIT_CARD_APPROVAL_DATE DATE,
199 p_PAYMENT_AMOUNT NUMBER,
200 p_ATTRIBUTE_CATEGORY VARCHAR2,
201 p_ATTRIBUTE1 VARCHAR2,
202 p_ATTRIBUTE2 VARCHAR2,
203 p_ATTRIBUTE3 VARCHAR2,
204 p_ATTRIBUTE4 VARCHAR2,
205 p_ATTRIBUTE5 VARCHAR2,
206 p_ATTRIBUTE6 VARCHAR2,
207 p_ATTRIBUTE7 VARCHAR2,
208 p_ATTRIBUTE8 VARCHAR2,
209 p_ATTRIBUTE9 VARCHAR2,
210 p_ATTRIBUTE10 VARCHAR2,
211 p_ATTRIBUTE11 VARCHAR2,
212 p_ATTRIBUTE12 VARCHAR2,
213 p_ATTRIBUTE13 VARCHAR2,
214 p_ATTRIBUTE14 VARCHAR2,
215 p_ATTRIBUTE15 VARCHAR2,
216 p_ATTRIBUTE16 VARCHAR2,
217 p_ATTRIBUTE17 VARCHAR2,
218 p_ATTRIBUTE18 VARCHAR2,
219 p_ATTRIBUTE19 VARCHAR2,
220 p_ATTRIBUTE20 VARCHAR2,
221 p_QUOTE_SHIPMENT_ID NUMBER,
222 p_CUST_PO_NUMBER VARCHAR2,
223 p_PAYMENT_TERM_ID_FROM NUMBER,
224 p_OBJECT_VERSION_NUMBER NUMBER,
225 p_CUST_PO_LINE_NUMBER VARCHAR2, -- Line Payments Change
226 p_TRXN_EXTENSION_ID NUMBER
227 )
228
229 IS
230 BEGIN
231 Update ASO_PAYMENTS
232 SET
233 /* CREATION_DATE = ASO_UTILITY_PVT.decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
234 CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),*/
235 LAST_UPDATE_DATE = ASO_UTILITY_PVT.decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
236 LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
237 LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
238 REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID),
239 PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID),
240 PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID),
241 PROGRAM_UPDATE_DATE = ASO_UTILITY_PVT.decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, PROGRAM_UPDATE_DATE, p_PROGRAM_UPDATE_DATE),
242 QUOTE_HEADER_ID = decode( p_QUOTE_HEADER_ID, FND_API.G_MISS_NUM, QUOTE_HEADER_ID, p_QUOTE_HEADER_ID),
243 QUOTE_LINE_ID = decode( p_QUOTE_LINE_ID, FND_API.G_MISS_NUM, QUOTE_LINE_ID, p_QUOTE_LINE_ID),
244 PAYMENT_TYPE_CODE = decode( p_PAYMENT_TYPE_CODE, FND_API.G_MISS_CHAR, PAYMENT_TYPE_CODE, p_PAYMENT_TYPE_CODE),
245 PAYMENT_REF_NUMBER = decode( p_PAYMENT_REF_NUMBER, FND_API.G_MISS_CHAR, PAYMENT_REF_NUMBER, p_PAYMENT_REF_NUMBER),
246 PAYMENT_OPTION = decode( p_PAYMENT_OPTION, FND_API.G_MISS_CHAR, PAYMENT_OPTION, p_PAYMENT_OPTION),
247 PAYMENT_TERM_ID = decode( p_PAYMENT_TERM_ID, FND_API.G_MISS_NUM, PAYMENT_TERM_ID, p_PAYMENT_TERM_ID),
248 CREDIT_CARD_CODE = decode( p_CREDIT_CARD_CODE, FND_API.G_MISS_CHAR, CREDIT_CARD_CODE, p_CREDIT_CARD_CODE),
249 CREDIT_CARD_HOLDER_NAME = decode( p_CREDIT_CARD_HOLDER_NAME, FND_API.G_MISS_CHAR, CREDIT_CARD_HOLDER_NAME, p_CREDIT_CARD_HOLDER_NAME),
250 CREDIT_CARD_EXPIRATION_DATE = ASO_UTILITY_PVT.decode( p_CREDIT_CARD_EXPIRATION_DATE, FND_API.G_MISS_DATE, CREDIT_CARD_EXPIRATION_DATE, p_CREDIT_CARD_EXPIRATION_DATE),
251 CREDIT_CARD_APPROVAL_CODE = decode( p_CREDIT_CARD_APPROVAL_CODE, FND_API.G_MISS_CHAR, CREDIT_CARD_APPROVAL_CODE, p_CREDIT_CARD_APPROVAL_CODE),
252 CREDIT_CARD_APPROVAL_DATE = ASO_UTILITY_PVT.decode( p_CREDIT_CARD_APPROVAL_DATE, FND_API.G_MISS_DATE, CREDIT_CARD_APPROVAL_DATE, p_CREDIT_CARD_APPROVAL_DATE),
253 PAYMENT_AMOUNT = decode( p_PAYMENT_AMOUNT, FND_API.G_MISS_NUM, PAYMENT_AMOUNT, p_PAYMENT_AMOUNT),
254 ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY),
255 ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
256 ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
257 ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
258 ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
259 ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
260 ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
261 ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
262 ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
263 ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
264 ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
265 ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
266 ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
267 ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
268 ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
269 ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15),
270 ATTRIBUTE16 = decode( p_ATTRIBUTE16, FND_API.G_MISS_CHAR, ATTRIBUTE16, p_ATTRIBUTE16),
271 ATTRIBUTE17 = decode( p_ATTRIBUTE17, FND_API.G_MISS_CHAR, ATTRIBUTE17, p_ATTRIBUTE17),
272 ATTRIBUTE18 = decode( p_ATTRIBUTE18, FND_API.G_MISS_CHAR, ATTRIBUTE18, p_ATTRIBUTE18),
273 ATTRIBUTE19 = decode( p_ATTRIBUTE19, FND_API.G_MISS_CHAR, ATTRIBUTE19, p_ATTRIBUTE19),
277 PAYMENT_TERM_ID_FROM = decode( p_PAYMENT_TERM_ID_FROM, FND_API.G_MISS_NUM, PAYMENT_TERM_ID_FROM, p_PAYMENT_TERM_ID_FROM),
274 ATTRIBUTE20 = decode( p_ATTRIBUTE20, FND_API.G_MISS_CHAR, ATTRIBUTE20, p_ATTRIBUTE20),
275 QUOTE_SHIPMENT_ID = decode( p_QUOTE_SHIPMENT_ID, FND_API.G_MISS_NUM, QUOTE_SHIPMENT_ID, p_QUOTE_SHIPMENT_ID),
276 CUST_PO_NUMBER = decode( p_CUST_PO_NUMBER, FND_API.G_MISS_CHAR, CUST_PO_NUMBER, p_CUST_PO_NUMBER),
278 OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, nvl(OBJECT_VERSION_NUMBER,0)+1, nvl(p_OBJECT_VERSION_NUMBER, nvl(OBJECT_VERSION_NUMBER,0))+1),
279 CUST_PO_LINE_NUMBER = decode ( p_CUST_PO_LINE_NUMBER, FND_API.G_MISS_CHAR,CUST_PO_LINE_NUMBER,p_CUST_PO_LINE_NUMBER), -- Line Payments Change
280 TRXN_EXTENSION_ID = decode( p_TRXN_EXTENSION_ID, FND_API.G_MISS_NUM, TRXN_EXTENSION_ID, p_TRXN_EXTENSION_ID)
281 where PAYMENT_ID = p_PAYMENT_ID;
282
283 If (SQL%NOTFOUND) then
284 RAISE NO_DATA_FOUND;
285 End If;
286 END Update_Row;
287
288 PROCEDURE Delete_Row(
289 p_PAYMENT_ID NUMBER)
290 IS
291 BEGIN
292 DELETE FROM ASO_PAYMENTS
293 WHERE PAYMENT_ID = p_PAYMENT_ID;
294 If (SQL%NOTFOUND) then
295 RAISE NO_DATA_FOUND;
296 End If;
297 END Delete_Row;
298
299 PROCEDURE Delete_Row(
300 p_QUOTE_LINE_ID NUMBER)
301 IS
302 BEGIN
303 DELETE FROM ASO_PAYMENTS
304 WHERE QUOTE_LINE_ID = p_QUOTE_LINE_ID;
305 If (SQL%NOTFOUND) then
306 RAISE NO_DATA_FOUND;
307 End If;
308 END Delete_Row;
309
310 PROCEDURE Lock_Row(
311 --p_OBJECT_VERSION_NUMBER NUMBER,
312 p_PAYMENT_ID NUMBER,
313 p_CREATION_DATE DATE,
314 p_CREATED_BY NUMBER,
315 p_LAST_UPDATE_DATE DATE,
316 p_LAST_UPDATED_BY NUMBER,
317 p_LAST_UPDATE_LOGIN NUMBER,
318 p_REQUEST_ID NUMBER,
319 p_PROGRAM_APPLICATION_ID NUMBER,
320 p_PROGRAM_ID NUMBER,
321 p_PROGRAM_UPDATE_DATE DATE,
322 p_QUOTE_HEADER_ID NUMBER,
323 p_QUOTE_LINE_ID NUMBER,
324 p_PAYMENT_TYPE_CODE VARCHAR2,
325 p_PAYMENT_REF_NUMBER VARCHAR2,
326 p_PAYMENT_OPTION VARCHAR2,
327 p_PAYMENT_TERM_ID NUMBER,
328 p_CREDIT_CARD_CODE VARCHAR2,
329 p_CREDIT_CARD_HOLDER_NAME VARCHAR2,
330 p_CREDIT_CARD_EXPIRATION_DATE DATE,
331 p_CREDIT_CARD_APPROVAL_CODE VARCHAR2,
332 p_CREDIT_CARD_APPROVAL_DATE DATE,
333 p_PAYMENT_AMOUNT NUMBER,
334 p_ATTRIBUTE_CATEGORY VARCHAR2,
335 p_ATTRIBUTE1 VARCHAR2,
336 p_ATTRIBUTE2 VARCHAR2,
337 p_ATTRIBUTE3 VARCHAR2,
338 p_ATTRIBUTE4 VARCHAR2,
339 p_ATTRIBUTE5 VARCHAR2,
340 p_ATTRIBUTE6 VARCHAR2,
341 p_ATTRIBUTE7 VARCHAR2,
342 p_ATTRIBUTE8 VARCHAR2,
343 p_ATTRIBUTE9 VARCHAR2,
344 p_ATTRIBUTE10 VARCHAR2,
345 p_ATTRIBUTE11 VARCHAR2,
346 p_ATTRIBUTE12 VARCHAR2,
347 p_ATTRIBUTE13 VARCHAR2,
348 p_ATTRIBUTE14 VARCHAR2,
349 p_ATTRIBUTE15 VARCHAR2,
350 p_QUOTE_SHIPMENT_ID NUMBER,
351 p_CUST_PO_NUMBER VARCHAR2)
352
353 IS
354 CURSOR C IS
355 SELECT PAYMENT_ID,
356 --OBJECT_VERSION_NUMBER,
357 CREATION_DATE,
358 CREATED_BY,
359 LAST_UPDATE_DATE,
360 LAST_UPDATED_BY,
361 LAST_UPDATE_LOGIN,
362 REQUEST_ID,
363 PROGRAM_APPLICATION_ID,
364 PROGRAM_ID,
365 PROGRAM_UPDATE_DATE,
366 QUOTE_HEADER_ID,
367 QUOTE_LINE_ID,
368 PAYMENT_TYPE_CODE,
369 PAYMENT_REF_NUMBER,
370 PAYMENT_OPTION,
371 PAYMENT_TERM_ID,
372 CREDIT_CARD_CODE,
373 CREDIT_CARD_HOLDER_NAME,
374 CREDIT_CARD_EXPIRATION_DATE,
375 CREDIT_CARD_APPROVAL_CODE,
376 CREDIT_CARD_APPROVAL_DATE,
377 PAYMENT_AMOUNT,
378 ATTRIBUTE_CATEGORY,
379 ATTRIBUTE1,
380 ATTRIBUTE2,
381 ATTRIBUTE3,
382 ATTRIBUTE4,
383 ATTRIBUTE5,
384 ATTRIBUTE6,
385 ATTRIBUTE7,
386 ATTRIBUTE8,
387 ATTRIBUTE9,
388 ATTRIBUTE10,
389 ATTRIBUTE11,
390 ATTRIBUTE12,
391 ATTRIBUTE13,
392 ATTRIBUTE14,
393 ATTRIBUTE15,
394 QUOTE_SHIPMENT_ID,
395 CUST_PO_NUMBER
396 FROM ASO_PAYMENTS
397 WHERE PAYMENT_ID = p_PAYMENT_ID
398 FOR UPDATE of PAYMENT_ID NOWAIT;
399 Recinfo C%ROWTYPE;
400 BEGIN
401 OPEN C;
402 FETCH C INTO Recinfo;
403 If (C%NOTFOUND) then
404 CLOSE C;
405 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
406 APP_EXCEPTION.RAISE_EXCEPTION;
407 End If;
408 CLOSE C;
409 if (
410 /*
411 ( Recinfo.PAYMENT_ID = p_PAYMENT_ID)
412 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
413 OR ( ( Recinfo.CREATION_DATE IS NULL )
414 AND ( p_CREATION_DATE IS NULL )))
415 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
416 OR ( ( Recinfo.CREATED_BY IS NULL )
417 AND ( p_CREATED_BY IS NULL )))
418 AND
419 */
420 ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
421 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
422 AND ( p_LAST_UPDATE_DATE IS NULL )))
423 /*
424 AND
425 ( ( Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER)
426 OR ( ( Recinfo.OBJECT_VERSION_NUMBER IS NULL )
427 AND ( p_OBJECT_VERSION_NUMBER IS NULL )))
428 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
432 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
429 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
430 AND ( p_LAST_UPDATED_BY IS NULL )))
431 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
433 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
434 AND ( ( Recinfo.REQUEST_ID = p_REQUEST_ID)
435 OR ( ( Recinfo.REQUEST_ID IS NULL )
436 AND ( p_REQUEST_ID IS NULL )))
437 AND ( ( Recinfo.PROGRAM_APPLICATION_ID = p_PROGRAM_APPLICATION_ID)
438 OR ( ( Recinfo.PROGRAM_APPLICATION_ID IS NULL )
439 AND ( p_PROGRAM_APPLICATION_ID IS NULL )))
440 AND ( ( Recinfo.PROGRAM_ID = p_PROGRAM_ID)
441 OR ( ( Recinfo.PROGRAM_ID IS NULL )
442 AND ( p_PROGRAM_ID IS NULL )))
443 AND ( ( Recinfo.PROGRAM_UPDATE_DATE = p_PROGRAM_UPDATE_DATE)
444 OR ( ( Recinfo.PROGRAM_UPDATE_DATE IS NULL )
445 AND ( p_PROGRAM_UPDATE_DATE IS NULL )))
446 AND ( ( Recinfo.QUOTE_HEADER_ID = p_QUOTE_HEADER_ID)
447 OR ( ( Recinfo.QUOTE_HEADER_ID IS NULL )
448 AND ( p_QUOTE_HEADER_ID IS NULL )))
449 AND ( ( Recinfo.QUOTE_LINE_ID = p_QUOTE_LINE_ID)
450 OR ( ( Recinfo.QUOTE_LINE_ID IS NULL )
451 AND ( p_QUOTE_LINE_ID IS NULL )))
452 AND ( ( Recinfo.PAYMENT_TYPE_CODE = p_PAYMENT_TYPE_CODE)
453 OR ( ( Recinfo.PAYMENT_TYPE_CODE IS NULL )
454 AND ( p_PAYMENT_TYPE_CODE IS NULL )))
455 AND ( ( Recinfo.PAYMENT_REF_NUMBER = p_PAYMENT_REF_NUMBER)
456 OR ( ( Recinfo.PAYMENT_REF_NUMBER IS NULL )
457 AND ( p_PAYMENT_REF_NUMBER IS NULL )))
458 AND ( ( Recinfo.PAYMENT_OPTION = p_PAYMENT_OPTION)
459 OR ( ( Recinfo.PAYMENT_OPTION IS NULL )
460 AND ( p_PAYMENT_OPTION IS NULL )))
461 AND ( ( Recinfo.PAYMENT_TERM_ID = p_PAYMENT_TERM_ID)
462 OR ( ( Recinfo.PAYMENT_TERM_ID IS NULL )
463 AND ( p_PAYMENT_TERM_ID IS NULL )))
464 AND ( ( Recinfo.CREDIT_CARD_CODE = p_CREDIT_CARD_CODE)
465 OR ( ( Recinfo.CREDIT_CARD_CODE IS NULL )
466 AND ( p_CREDIT_CARD_CODE IS NULL )))
467 AND ( ( Recinfo.CREDIT_CARD_HOLDER_NAME = p_CREDIT_CARD_HOLDER_NAME)
468 OR ( ( Recinfo.CREDIT_CARD_HOLDER_NAME IS NULL )
469 AND ( p_CREDIT_CARD_HOLDER_NAME IS NULL )))
470 AND ( ( Recinfo.CREDIT_CARD_EXPIRATION_DATE = p_CREDIT_CARD_EXPIRATION_DATE)
471 OR ( ( Recinfo.CREDIT_CARD_EXPIRATION_DATE IS NULL )
472 AND ( p_CREDIT_CARD_EXPIRATION_DATE IS NULL )))
473 AND ( ( Recinfo.CREDIT_CARD_APPROVAL_CODE = p_CREDIT_CARD_APPROVAL_CODE)
474 OR ( ( Recinfo.CREDIT_CARD_APPROVAL_CODE IS NULL )
475 AND ( p_CREDIT_CARD_APPROVAL_CODE IS NULL )))
476 AND ( ( Recinfo.CREDIT_CARD_APPROVAL_DATE = p_CREDIT_CARD_APPROVAL_DATE)
477 OR ( ( Recinfo.CREDIT_CARD_APPROVAL_DATE IS NULL )
478 AND ( p_CREDIT_CARD_APPROVAL_DATE IS NULL )))
479 AND ( ( Recinfo.PAYMENT_AMOUNT = p_PAYMENT_AMOUNT)
480 OR ( ( Recinfo.PAYMENT_AMOUNT IS NULL )
481 AND ( p_PAYMENT_AMOUNT IS NULL )))
482 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
483 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
484 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
485 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
486 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
487 AND ( p_ATTRIBUTE1 IS NULL )))
488 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
489 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
490 AND ( p_ATTRIBUTE2 IS NULL )))
491 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
492 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
493 AND ( p_ATTRIBUTE3 IS NULL )))
494 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
495 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
496 AND ( p_ATTRIBUTE4 IS NULL )))
497 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
498 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
499 AND ( p_ATTRIBUTE5 IS NULL )))
500 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
501 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
502 AND ( p_ATTRIBUTE6 IS NULL )))
503 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
504 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
505 AND ( p_ATTRIBUTE7 IS NULL )))
506 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
507 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
508 AND ( p_ATTRIBUTE8 IS NULL )))
509 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
510 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
511 AND ( p_ATTRIBUTE9 IS NULL )))
512 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
513 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
514 AND ( p_ATTRIBUTE10 IS NULL )))
515 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
516 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
517 AND ( p_ATTRIBUTE11 IS NULL )))
518 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
519 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
520 AND ( p_ATTRIBUTE12 IS NULL )))
521 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
522 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
523 AND ( p_ATTRIBUTE13 IS NULL )))
524 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
525 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
526 AND ( p_ATTRIBUTE14 IS NULL )))
527 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
528 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
529 AND ( p_ATTRIBUTE15 IS NULL )))
533 AND ( ( Recinfo.CUST_PO_NUMBER = p_CUST_PO_NUMBER)
530 AND ( ( Recinfo.QUOTE_SHIPMENT_ID = p_QUOTE_SHIPMENT_ID)
531 OR ( ( Recinfo.QUOTE_SHIPMENT_ID IS NULL )
532 AND ( p_QUOTE_SHIPMENT_ID IS NULL )))
534 OR ( ( Recinfo.CUST_PO_NUMBER IS NULL )
535 AND ( p_CUST_PO_NUMBER IS NULL )))
536 */
537 ) then
538 return;
539 else
540 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
541 APP_EXCEPTION.RAISE_EXCEPTION;
542 End If;
543 END Lock_Row;
544
545 End ASO_PAYMENTS_PKG;