DBA Data[Home] [Help]

APPS.AR_INTEREST_BATCHES_PKG dependencies on AR_INTEREST_BATCHES

Line 1: PACKAGE BODY AR_INTEREST_BATCHES_PKG AS

1: PACKAGE BODY AR_INTEREST_BATCHES_PKG AS
2: /*$Header: ARIIBATB.pls 120.5 2006/04/07 21:47:35 hyu noship $*/
3:
4: g_not VARCHAR2(30):= ARPT_SQL_FUNC_UTIL.get_lookup_meaning ('AR_PROCESS_STATUS','N');
5: g_error VARCHAR2(30):= ARPT_SQL_FUNC_UTIL.get_lookup_meaning ('AR_PROCESS_STATUS','E');

Line 18: ar_interest_batches ib

14: CURSOR c IS
15: SELECT SUM(NVL(iil.INTEREST_CHARGED,0))
16: FROM ar_interest_lines iil,
17: ar_interest_headers ii,
18: ar_interest_batches ib
19: WHERE iil.interest_header_id = ii.interest_header_id
20: AND ib.interest_batch_id = ii.interest_batch_id
21: AND ib.interest_batch_id = p_interest_batch_id;
22: l_batch_amount NUMBER := 0;

Line 24: arp_util.debug('AR_INTEREST_BATCHES_PKG.get_batch_amount+');

20: AND ib.interest_batch_id = ii.interest_batch_id
21: AND ib.interest_batch_id = p_interest_batch_id;
22: l_batch_amount NUMBER := 0;
23: BEGIN
24: arp_util.debug('AR_INTEREST_BATCHES_PKG.get_batch_amount+');
25: arp_util.debug(' p_interest_batch_id :'||p_interest_batch_id);
26: OPEN c;
27: FETCH c INTO l_batch_amount;
28: IF c%NOTFOUND THEN

Line 33: arp_util.debug('AR_INTEREST_BATCHES_PKG.get_batch_amount-');

29: l_batch_amount := 0;
30: END IF;
31: CLOSE c;
32: arp_util.debug(' resultat :'||l_batch_amount);
33: arp_util.debug('AR_INTEREST_BATCHES_PKG.get_batch_amount-');
34: RETURN l_batch_amount;
35: END;
36:
37: PROCEDURE Lock_batch

Line 52: FROM AR_INTEREST_BATCHES

48: x_msg_data OUT NOCOPY VARCHAR2)
49: IS
50: CURSOR C IS
51: SELECT *
52: FROM AR_INTEREST_BATCHES
53: WHERE Interest_Batch_Id = p_Interest_Batch_Id
54: FOR UPDATE OF Interest_Batch_Id NOWAIT;
55: Recinfo C%ROWTYPE;
56: l_continue VARCHAR2(1) := 'Y';

Line 58: arp_util.debug('AR_INTEREST_BATCHES_PKG.Lock_batch+');

54: FOR UPDATE OF Interest_Batch_Id NOWAIT;
55: Recinfo C%ROWTYPE;
56: l_continue VARCHAR2(1) := 'Y';
57: BEGIN
58: arp_util.debug('AR_INTEREST_BATCHES_PKG.Lock_batch+');
59: arp_util.debug(' p_Interest_Batch_Id :'||p_Interest_Batch_Id);
60: x_return_status := fnd_api.g_ret_sts_success;
61: OPEN C;
62: FETCH C INTO Recinfo;

Line 92: arp_util.debug('AR_INTEREST_BATCHES_PKG.Lock_batch-');

88: p_count => x_msg_count,
89: p_data => x_msg_data);
90: END IF;
91: END IF;
92: arp_util.debug('AR_INTEREST_BATCHES_PKG.Lock_batch-');
93: END Lock_batch;
94:
95:
96:

Line 100: p_old_batch_rec IN ar_interest_batches%ROWTYPE,

96:
97: PROCEDURE Validate_batch
98: ( p_action IN VARCHAR2,
99: p_updated_by_program IN VARCHAR2 DEFAULT 'ARIINR',
100: p_old_batch_rec IN ar_interest_batches%ROWTYPE,
101: p_new_batch_rec IN ar_interest_batches%ROWTYPE,
102: x_cascade_update OUT NOCOPY VARCHAR2,
103: x_return_status IN OUT NOCOPY VARCHAR2)
104: IS

Line 101: p_new_batch_rec IN ar_interest_batches%ROWTYPE,

97: PROCEDURE Validate_batch
98: ( p_action IN VARCHAR2,
99: p_updated_by_program IN VARCHAR2 DEFAULT 'ARIINR',
100: p_old_batch_rec IN ar_interest_batches%ROWTYPE,
101: p_new_batch_rec IN ar_interest_batches%ROWTYPE,
102: x_cascade_update OUT NOCOPY VARCHAR2,
103: x_return_status IN OUT NOCOPY VARCHAR2)
104: IS
105: --Batch should exists

Line 250: FROM ar_interest_batches

246: CREATION_DATE ,
247: TRANSFERRED_status ,
248: ORG_ID ,
249: OBJECT_VERSION_NUMBER
250: FROM ar_interest_batches
251: WHERE interest_batch_id = P_INTEREST_BATCH_ID
252: FOR UPDATE OF INTEREST_BATCH_ID;
253: l_rec ar_interest_batches%ROWTYPE;
254: l_new_rec ar_interest_batches%ROWTYPE;

Line 253: l_rec ar_interest_batches%ROWTYPE;

249: OBJECT_VERSION_NUMBER
250: FROM ar_interest_batches
251: WHERE interest_batch_id = P_INTEREST_BATCH_ID
252: FOR UPDATE OF INTEREST_BATCH_ID;
253: l_rec ar_interest_batches%ROWTYPE;
254: l_new_rec ar_interest_batches%ROWTYPE;
255: x_cascade_update VARCHAR2(1);
256: BEGIN
257: arp_util.debug('Delete_Batch +');

Line 254: l_new_rec ar_interest_batches%ROWTYPE;

250: FROM ar_interest_batches
251: WHERE interest_batch_id = P_INTEREST_BATCH_ID
252: FOR UPDATE OF INTEREST_BATCH_ID;
253: l_rec ar_interest_batches%ROWTYPE;
254: l_new_rec ar_interest_batches%ROWTYPE;
255: x_cascade_update VARCHAR2(1);
256: BEGIN
257: arp_util.debug('Delete_Batch +');
258: arp_util.debug(' p_interest_batch_id : '||p_interest_batch_id);

Line 282: fnd_message.set_token('RECORD', 'ar_interest_batches');

278: CLOSE c;
279:
280: IF l_rec.INTEREST_BATCH_ID IS NULL THEN
281: fnd_message.set_name('AR', 'HZ_API_NO_RECORD');
282: fnd_message.set_token('RECORD', 'ar_interest_batches');
283: fnd_message.set_token('VALUE',
284: NVL(TO_CHAR(P_INTEREST_BATCH_ID), 'null'));
285: fnd_msg_pub.add;
286: RAISE fnd_api.g_exc_error;

Line 296: fnd_message.set_token('TABLE', 'ar_interest_batches');

292: l_rec.OBJECT_VERSION_NUMBER IS NOT NULL AND
293: x_object_version_number = l_rec.OBJECT_VERSION_NUMBER))
294: THEN
295: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
296: fnd_message.set_token('TABLE', 'ar_interest_batches');
297: fnd_msg_pub.add;
298: RAISE fnd_api.g_exc_error;
299: END IF;
300:

Line 322: DELETE FROM AR_INTEREST_BATCHES

318:
319: DELETE FROM ar_interest_headers
320: WHERE interest_batch_id = p_interest_batch_id;
321:
322: DELETE FROM AR_INTEREST_BATCHES
323: WHERE interest_batch_id = p_interest_batch_id ;
324:
325: arp_util.debug('Delete_Batch -');
326: EXCEPTION

Line 372: FROM ar_interest_batches

368: CREATION_DATE ,
369: TRANSFERRED_status ,
370: ORG_ID ,
371: OBJECT_VERSION_NUMBER
372: FROM ar_interest_batches
373: WHERE interest_batch_id = P_INTEREST_BATCH_ID
374: FOR UPDATE OF INTEREST_BATCH_ID;
375: l_rec ar_interest_batches%ROWTYPE;
376: l_new_rec ar_interest_batches%ROWTYPE;

Line 375: l_rec ar_interest_batches%ROWTYPE;

371: OBJECT_VERSION_NUMBER
372: FROM ar_interest_batches
373: WHERE interest_batch_id = P_INTEREST_BATCH_ID
374: FOR UPDATE OF INTEREST_BATCH_ID;
375: l_rec ar_interest_batches%ROWTYPE;
376: l_new_rec ar_interest_batches%ROWTYPE;
377: x_cascade_update VARCHAR2(1);
378:
379: BEGIN

Line 376: l_new_rec ar_interest_batches%ROWTYPE;

372: FROM ar_interest_batches
373: WHERE interest_batch_id = P_INTEREST_BATCH_ID
374: FOR UPDATE OF INTEREST_BATCH_ID;
375: l_rec ar_interest_batches%ROWTYPE;
376: l_new_rec ar_interest_batches%ROWTYPE;
377: x_cascade_update VARCHAR2(1);
378:
379: BEGIN
380: arp_util.debug('update_batch +');

Line 407: fnd_message.set_token('RECORD', 'ar_interest_batches');

403: CLOSE c;
404:
405: IF l_rec.INTEREST_BATCH_ID IS NULL THEN
406: fnd_message.set_name('AR', 'HZ_API_NO_RECORD');
407: fnd_message.set_token('RECORD', 'ar_interest_batches');
408: fnd_message.set_token('VALUE',
409: NVL(TO_CHAR(P_INTEREST_BATCH_ID), 'null'));
410: fnd_msg_pub.add;
411: RAISE fnd_api.g_exc_error;

Line 421: fnd_message.set_token('TABLE', 'ar_interest_batches');

417: l_rec.OBJECT_VERSION_NUMBER IS NOT NULL AND
418: x_object_version_number = l_rec.OBJECT_VERSION_NUMBER))
419: THEN
420: fnd_message.set_name('AR', 'HZ_API_RECORD_CHANGED');
421: fnd_message.set_token('TABLE', 'ar_interest_batches');
422: fnd_msg_pub.add;
423: RAISE fnd_api.g_exc_error;
424: END IF;
425:

Line 466: UPDATE ar_interest_batches SET

462:
463: END IF;
464:
465:
466: UPDATE ar_interest_batches SET
467: BATCH_STATUS = P_BATCH_STATUS,
468: transferred_status = p_transferred_status,
469: gl_date = DECODE(p_gl_date,NULL,gl_date,p_gl_date),
470: LAST_UPDATE_DATE = SYSDATE,

Line 500: END AR_INTEREST_BATCHES_PKG;

496: p_count => x_msg_count,
497: p_data => x_msg_data);
498: END;
499:
500: END AR_INTEREST_BATCHES_PKG;