DBA Data[Home] [Help]

APPS.ARI_SERVICE_CHARGE_PKG dependencies on ARI_SERVICE_CHARGE_PKG

Line 1: PACKAGE BODY ARI_SERVICE_CHARGE_PKG AS

1: PACKAGE BODY ARI_SERVICE_CHARGE_PKG AS
2: /* $Header: ARISCRGB.pls 120.2 2005/10/31 04:14:38 vgundlap noship $ */
3:
4: /*=======================================================================+
5: | Global Constants

Line 8: G_PKG_NAME CONSTANT VARCHAR2(40) := 'ARI_SERVICE_CHARGE_PKG';

4: /*=======================================================================+
5: | Global Constants
6: +=======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(40) := 'ARI_SERVICE_CHARGE_PKG';
9: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
10:
11: CURSOR C_INVOICE_SET IS
12: SELECT PAYMENT_SCHEDULE_ID,

Line 30: FUNCTION ADJUST_INVOICE (P_ADJUSTMENT_REC_TYPE IN ARI_SERVICE_CHARGE_PKG.ADJUSTMENT_REC_TYPE)

26: |
27: | PARAMETERS adjustment_rec_type IN adjustment_rec_type
28: |
29: *=======================================================================*/
30: FUNCTION ADJUST_INVOICE (P_ADJUSTMENT_REC_TYPE IN ARI_SERVICE_CHARGE_PKG.ADJUSTMENT_REC_TYPE)
31: RETURN VARCHAR2
32:
33: IS
34:

Line 132: PROCEDURE COMPUTE_SERVICE_CHARGE(P_INVOICE_SET IN OUT NOCOPY ARI_SERVICE_CHARGE_PKG.INVOICE_LIST_TABTYPE)

128: |
129: |
130: |
131: * ======================================================================*/
132: PROCEDURE COMPUTE_SERVICE_CHARGE(P_INVOICE_SET IN OUT NOCOPY ARI_SERVICE_CHARGE_PKG.INVOICE_LIST_TABTYPE)
133: IS
134:
135: L_PROCEDURE_NAME VARCHAR2(30);
136: L_COUNT NUMBER ;

Line 213: FUNCTION APPLY_CHARGE(P_INVOICE_SET IN ARI_SERVICE_CHARGE_PKG.INVOICE_LIST_TABTYPE)

209: |
210: | PARAMETERS
211: |
212: * ======================================================================*/
213: FUNCTION APPLY_CHARGE(P_INVOICE_SET IN ARI_SERVICE_CHARGE_PKG.INVOICE_LIST_TABTYPE)
214: RETURN VARCHAR2
215: IS
216:
217: L_RETURN_VALUE VARCHAR2(1) ;

Line 220: L_ADJ_REC ARI_SERVICE_CHARGE_PKG.ADJUSTMENT_REC_TYPE;

216:
217: L_RETURN_VALUE VARCHAR2(1) ;
218: L_PROCEDURE_NAME VARCHAR2(30);
219:
220: L_ADJ_REC ARI_SERVICE_CHARGE_PKG.ADJUSTMENT_REC_TYPE;
221: L_COUNT NUMBER;
222: L_TOTAL_INVOICES NUMBER;
223: l_debug_info VARCHAR2(200);
224: L_CUSTOMER_ID NUMBER(15);

Line 254: L_RETURN_VALUE :=ARI_SERVICE_CHARGE_PKG.ADJUST_INVOICE(L_ADJ_REC);

250: L_ADJ_REC.GL_DATE := sysdate;
251: L_ADJ_REC.CREATED_FROM := 'ARI_ADJ_INVOICE';
252:
253: -- Call the adjustment API Wrapper
254: L_RETURN_VALUE :=ARI_SERVICE_CHARGE_PKG.ADJUST_INVOICE(L_ADJ_REC);
255:
256: IF L_RETURN_VALUE <> FND_API.G_RET_STS_SUCCESS THEN
257: L_RETURN_VALUE := FND_API.G_RET_STS_ERROR;
258: IF (PG_DEBUG = 'Y') THEN

Line 288: END ARI_SERVICE_CHARGE_PKG;

284:
285: END APPLY_CHARGE;
286:
287:
288: END ARI_SERVICE_CHARGE_PKG;