589: EXCEPTION
590:
591: WHEN NO_DATA_FOUND then
592: if (debug_info = 'check void') then
593: FND_MESSAGE.SET_NAME('SQLAP', 'AP_INP_MUST_POST_VOID');
594: APP_EXCEPTION.RAISE_EXCEPTION;
595: elsif(debug_info ='Get period_name') then
596: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
597: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
592: if (debug_info = 'check void') then
593: FND_MESSAGE.SET_NAME('SQLAP', 'AP_INP_MUST_POST_VOID');
594: APP_EXCEPTION.RAISE_EXCEPTION;
595: elsif(debug_info ='Get period_name') then
596: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
597: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
598: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
599: FND_MESSAGE.SET_TOKEN('DEBUG_INFO','the GL_date(sysdate) is not in an open period');
600: APP_EXCEPTION.RAISE_EXCEPTION;
593: FND_MESSAGE.SET_NAME('SQLAP', 'AP_INP_MUST_POST_VOID');
594: APP_EXCEPTION.RAISE_EXCEPTION;
595: elsif(debug_info ='Get period_name') then
596: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
597: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
598: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
599: FND_MESSAGE.SET_TOKEN('DEBUG_INFO','the GL_date(sysdate) is not in an open period');
600: APP_EXCEPTION.RAISE_EXCEPTION;
601: end if;
594: APP_EXCEPTION.RAISE_EXCEPTION;
595: elsif(debug_info ='Get period_name') then
596: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
597: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
598: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
599: FND_MESSAGE.SET_TOKEN('DEBUG_INFO','the GL_date(sysdate) is not in an open period');
600: APP_EXCEPTION.RAISE_EXCEPTION;
601: end if;
602:
595: elsif(debug_info ='Get period_name') then
596: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
597: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
598: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
599: FND_MESSAGE.SET_TOKEN('DEBUG_INFO','the GL_date(sysdate) is not in an open period');
600: APP_EXCEPTION.RAISE_EXCEPTION;
601: end if;
602:
603: WHEN OTHERS then
601: end if;
602:
603: WHEN OTHERS then
604: if (SQLCODE <> -20001 ) then
605: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
606: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
607: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
608: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
609: ||', Payment_num = '||TO_CHAR(P_payment_num)
602:
603: WHEN OTHERS then
604: if (SQLCODE <> -20001 ) then
605: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
606: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
607: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
608: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
609: ||', Payment_num = '||TO_CHAR(P_payment_num)
610: ||', Check_id = '||TO_CHAR(P_check_id)
603: WHEN OTHERS then
604: if (SQLCODE <> -20001 ) then
605: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
606: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
607: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
608: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
609: ||', Payment_num = '||TO_CHAR(P_payment_num)
610: ||', Check_id = '||TO_CHAR(P_check_id)
611: ||', Invoice_payment_id = '||TO_CHAR(P_invoice_payment_id)
604: if (SQLCODE <> -20001 ) then
605: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
606: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
607: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
608: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
609: ||', Payment_num = '||TO_CHAR(P_payment_num)
610: ||', Check_id = '||TO_CHAR(P_check_id)
611: ||', Invoice_payment_id = '||TO_CHAR(P_invoice_payment_id)
612: ||', Old Invoice_payment_id = '||TO_CHAR(P_old_invoice_payment_id)
627: ||', future_pay_posted_flag = '||P_future_pay_posted_flag
628: ||', payment_dists_flag = '||P_payment_dists_flag
629: ||', payment_mode = '||P_payment_mode
630: ||', replace_flag = '||P_replace_flag);
631: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
632: end if;
633:
634: APP_EXCEPTION.RAISE_EXCEPTION;
635:
744:
745: WHEN OTHERS then
746:
747: if (SQLCODE <> -20001 ) then
748: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
749: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
750: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
751: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
752: ||', Check_id = '||TO_CHAR(P_check_id)
745: WHEN OTHERS then
746:
747: if (SQLCODE <> -20001 ) then
748: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
749: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
750: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
751: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
752: ||', Check_id = '||TO_CHAR(P_check_id)
753: ||', Amount = '||TO_CHAR(P_amount)
746:
747: if (SQLCODE <> -20001 ) then
748: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
749: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
750: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
751: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
752: ||', Check_id = '||TO_CHAR(P_check_id)
753: ||', Amount = '||TO_CHAR(P_amount)
754: ||', discount_taken = '||TO_CHAR(P_discount_taken)
747: if (SQLCODE <> -20001 ) then
748: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
749: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
750: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
751: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
752: ||', Check_id = '||TO_CHAR(P_check_id)
753: ||', Amount = '||TO_CHAR(P_amount)
754: ||', discount_taken = '||TO_CHAR(P_discount_taken)
755: ||', Last_updated_by = '||TO_CHAR(P_last_updated_by)
756: ||', Last_update_date = '||TO_CHAR(P_last_update_date)
757: ||', payment_dists_flag = '||P_payment_dists_flag
758: ||', payment_mode = '||P_payment_mode
759: ||', replace_flag = '||P_replace_flag);
760: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
761: end if;
762:
763: APP_EXCEPTION.RAISE_EXCEPTION;
764:
944: EXCEPTION
945: WHEN OTHERS then
946:
947: if (SQLCODE <> -20001 ) then
948: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
949: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
950: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
951: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
952: ||', Payment_num = '||TO_CHAR(P_payment_num)
945: WHEN OTHERS then
946:
947: if (SQLCODE <> -20001 ) then
948: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
949: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
950: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
951: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
952: ||', Payment_num = '||TO_CHAR(P_payment_num)
953: ||', Check_id = '||TO_CHAR(P_check_id)
946:
947: if (SQLCODE <> -20001 ) then
948: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
949: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
950: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
951: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
952: ||', Payment_num = '||TO_CHAR(P_payment_num)
953: ||', Check_id = '||TO_CHAR(P_check_id)
954: ||', Invoice_payment_id = '||TO_CHAR(P_invoice_payment_id)
947: if (SQLCODE <> -20001 ) then
948: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
949: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
950: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
951: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
952: ||', Payment_num = '||TO_CHAR(P_payment_num)
953: ||', Check_id = '||TO_CHAR(P_check_id)
954: ||', Invoice_payment_id = '||TO_CHAR(P_invoice_payment_id)
955: ||', Old Invoice_payment_id = '||TO_CHAR(P_old_invoice_payment_id)
1002: ||', payment_dists_flag = '||P_payment_dists_flag
1003: ||', payment_mode = '||P_payment_mode
1004: ||', replace_flag = '||P_replace_flag);
1005:
1006: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1007: end if;
1008:
1009: APP_EXCEPTION.RAISE_EXCEPTION;
1010:
1151: EXCEPTION
1152: WHEN OTHERS then
1153:
1154: if (SQLCODE <> -20001 ) then
1155: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1156: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1157: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1158: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1159: ||', Payment_num = '||TO_CHAR(P_payment_num)
1152: WHEN OTHERS then
1153:
1154: if (SQLCODE <> -20001 ) then
1155: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1156: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1157: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1158: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1159: ||', Payment_num = '||TO_CHAR(P_payment_num)
1160: ||', Check_id = '||TO_CHAR(P_check_id)
1153:
1154: if (SQLCODE <> -20001 ) then
1155: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1156: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1157: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1158: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1159: ||', Payment_num = '||TO_CHAR(P_payment_num)
1160: ||', Check_id = '||TO_CHAR(P_check_id)
1161: ||', Amount = '||TO_CHAR(P_amount)
1154: if (SQLCODE <> -20001 ) then
1155: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1156: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1157: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1158: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1159: ||', Payment_num = '||TO_CHAR(P_payment_num)
1160: ||', Check_id = '||TO_CHAR(P_check_id)
1161: ||', Amount = '||TO_CHAR(P_amount)
1162: ||', discount_taken = '||TO_CHAR(P_discount_taken)
1164: ||', Last_update_date = '||TO_CHAR(P_last_update_date)
1165: ||', payment_dists_flag = '||P_payment_dists_flag
1166: ||', payment_mode = '||P_payment_mode
1167: ||', replace_flag = '||P_replace_flag);
1168: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1169: end if;
1170:
1171: APP_EXCEPTION.RAISE_EXCEPTION;
1172:
1283: Exception
1284: WHEN OTHERS then
1285:
1286: if (SQLCODE <> -20001 ) then
1287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1290: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1291: ||', Payment_line_number = '||TO_CHAR(P_payment_line_number)
1284: WHEN OTHERS then
1285:
1286: if (SQLCODE <> -20001 ) then
1287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1290: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1291: ||', Payment_line_number = '||TO_CHAR(P_payment_line_number)
1292: ||', Amount = '||TO_CHAR(P_amount)
1285:
1286: if (SQLCODE <> -20001 ) then
1287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1290: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1291: ||', Payment_line_number = '||TO_CHAR(P_payment_line_number)
1292: ||', Amount = '||TO_CHAR(P_amount)
1293: ||', discount_taken = '||TO_CHAR(P_discount)
1286: if (SQLCODE <> -20001 ) then
1287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
1290: FND_MESSAGE.SET_TOKEN('PARAMETERS','Invoice_id = '||TO_CHAR(P_invoice_id)
1291: ||', Payment_line_number = '||TO_CHAR(P_payment_line_number)
1292: ||', Amount = '||TO_CHAR(P_amount)
1293: ||', discount_taken = '||TO_CHAR(P_discount)
1294: ||', Last_update_by = '||TO_CHAR(P_last_updated_by)
1293: ||', discount_taken = '||TO_CHAR(P_discount)
1294: ||', Last_update_by = '||TO_CHAR(P_last_updated_by)
1295: ||', Last_update_date = '||TO_CHAR(P_last_update_date));
1296:
1297: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1298: end if;
1299:
1300: APP_EXCEPTION.RAISE_EXCEPTION;
1301: