1: PACKAGE BODY AP_AI_TABLE_HANDLER_PKG as
2: /* $Header: apainthb.pls 120.25 2010/12/24 04:13:08 pgayen ship $ */
3:
4: PROCEDURE CHECK_UNIQUE (
5: p_ROWID VARCHAR2,
19:
20: -- Update the calling sequence
21:
22: current_calling_sequence :=
23: 'AP_AI_TABLE_HANDLER_PKG.CHECK_UNIQUE<-'||p_calling_sequence;
24:
25: debug_info := 'Count for same vendor_id,party_site_id and invoice_num'; /*Bug9105666*/
26: SELECT count(1)
27: INTO dummy_a
261: debug_info VARCHAR2(100);
262: BEGIN
263: -- Update the calling sequence
264:
265: current_calling_sequence := 'AP_AI_TABLE_HANDLER_PKG.INSERT_ROW<-'||
266: p_calling_sequence;
267:
268: -- Check uniqueness first
269: ap_ai_table_handler_pkg.check_unique(
265: current_calling_sequence := 'AP_AI_TABLE_HANDLER_PKG.INSERT_ROW<-'||
266: p_calling_sequence;
267:
268: -- Check uniqueness first
269: ap_ai_table_handler_pkg.check_unique(
270: p_ROWID,
271: p_INVOICE_NUM,
272: p_VENDOR_ID,
273: p_ORG_ID, -- Bug 5407785
824:
825: -- Update the calling sequence
826:
827: current_calling_sequence :=
828: 'AP_AI_TABLE_HANDLER_PKG.UPDATE_ROW<-'||p_calling_sequence;
829:
830: -- Check uniqueness first
831: ap_ai_table_handler_pkg.check_unique(
832: p_ROWID,
827: current_calling_sequence :=
828: 'AP_AI_TABLE_HANDLER_PKG.UPDATE_ROW<-'||p_calling_sequence;
829:
830: -- Check uniqueness first
831: ap_ai_table_handler_pkg.check_unique(
832: p_ROWID,
833: p_INVOICE_NUM,
834: p_VENDOR_ID,
835: p_ORG_ID, -- Bug 5407785
1058: BEGIN
1059: -- Update the calling sequence
1060: --
1061: current_calling_sequence :=
1062: 'AP_AI_TABLE_HANDLER_PKG.DELETE_ROW<-'||p_calling_sequence;
1063:
1064: -- Get the invoice_id
1065: debug_info := 'Get the invoice_id';
1066:
1182:
1183:
1184: END DELETE_ROW;
1185:
1186: END AP_AI_TABLE_HANDLER_PKG;