1: PACKAGE BODY AP_AWT_TAX_RATES_PKG AS
2: /* $Header: aptaxckb.pls 120.3 2005/05/12 06:30:38 sguddeti noship $ */
3:
4: PROCEDURE CHECK_AMOUNT_OVERLAP(X_tax_name IN VARCHAR2,
5: X_calling_sequence In VARCHAR2) IS
64: test3 VARCHAR2(10);
65: test4 VARCHAR2(10);
66:
67: BEGIN
68: current_calling_sequence := 'AP_AWT_TAX_RATES_PKG.CHECK_AMOUNT_OVERLAP<-'||X_calling_sequence;
69:
70: duplicate_check := 0;
71: num_duplicate :=0;
72: var_check := 0;
269:
270: AMOUNT_GAP EXCEPTION;
271:
272: BEGIN
273: current_calling_sequence := 'AP_AWT_TAX_RATES_PKG.CHECK_AMOUNT_GAPS<-'||X_calling_sequence;
274: var_check := 0;
275:
276: OPEN c_rate_type(X_tax_name);
277: LOOP
351:
352: LAST_AMOUNT_ERROR EXCEPTION;
353:
354: BEGIN
355: current_calling_sequence := 'AP_AWT_TAX_RATES_PKG.CHECK_AMOUNT_GAPS<-'||X_calling_sequence;
356: var_max_end := 0;
357: OPEN c_rate_type(X_tax_name);
358: LOOP
359: FETCH c_rate_type INTO var_rate_type;
409: END IF;
410: APP_EXCEPTION.RAISE_EXCEPTION;
411: END CHECK_LAST_AMOUNT;
412:
413: END AP_AWT_TAX_RATES_PKG;