483: --
484: EXCEPTION
485: WHEN OTHERS THEN
486: IF (SQLCODE <> -20001) THEN
487: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
488: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
489: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
490: FND_MESSAGE.SET_TOKEN('PARAMETERS','SHIP_TO_LOCATION_ID = ' ||
491: x_ship_to_location_id ||
484: EXCEPTION
485: WHEN OTHERS THEN
486: IF (SQLCODE <> -20001) THEN
487: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
488: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
489: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
490: FND_MESSAGE.SET_TOKEN('PARAMETERS','SHIP_TO_LOCATION_ID = ' ||
491: x_ship_to_location_id ||
492: 'BILL_TO_LOCATION_ID = ' || x_bill_to_location_id ||
485: WHEN OTHERS THEN
486: IF (SQLCODE <> -20001) THEN
487: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
488: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
489: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
490: FND_MESSAGE.SET_TOKEN('PARAMETERS','SHIP_TO_LOCATION_ID = ' ||
491: x_ship_to_location_id ||
492: 'BILL_TO_LOCATION_ID = ' || x_bill_to_location_id ||
493: 'FOB_LOOKUP_CODE = ' || x_fob_lookup_code ||
486: IF (SQLCODE <> -20001) THEN
487: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
488: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
489: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
490: FND_MESSAGE.SET_TOKEN('PARAMETERS','SHIP_TO_LOCATION_ID = ' ||
491: x_ship_to_location_id ||
492: 'BILL_TO_LOCATION_ID = ' || x_bill_to_location_id ||
493: 'FOB_LOOKUP_CODE = ' || x_fob_lookup_code ||
494: 'FREIGHT_TERMS_LOOKUP_CODE = ' || x_freight_terms_lookup_code ||
504: 'QTY_RCV_EXCEPTION_CODE = ' || x_qty_rcv_exception_code ||
505: 'RECEIPT_DAYS_EXCEPTION_CODE = ' || x_receipt_days_exception_code ||
506: 'RECEIVING_ROUTING_ID = ' || x_receiving_routing_id);
507:
508: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
509: END IF;
510: APP_EXCEPTION.RAISE_EXCEPTION;
511:
512:
642: --
643: EXCEPTION
644: WHEN OTHERS THEN
645: IF (SQLCODE <> -20001) THEN
646: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
647: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
648: FND_MESSAGE.SET_TOKEN
649: ('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS',
643: EXCEPTION
644: WHEN OTHERS THEN
645: IF (SQLCODE <> -20001) THEN
646: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
647: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
648: FND_MESSAGE.SET_TOKEN
649: ('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS',
651: 'TERMS_ID = ' || x_terms_id ||
644: WHEN OTHERS THEN
645: IF (SQLCODE <> -20001) THEN
646: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
647: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
648: FND_MESSAGE.SET_TOKEN
649: ('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS',
651: 'TERMS_ID = ' || x_terms_id ||
652: 'PAY_DATE_BASIS_LOOKUP_CODE = ' || x_pay_date_basis_lookup_code ||
646: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
647: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
648: FND_MESSAGE.SET_TOKEN
649: ('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS',
651: 'TERMS_ID = ' || x_terms_id ||
652: 'PAY_DATE_BASIS_LOOKUP_CODE = ' || x_pay_date_basis_lookup_code ||
653: 'VENDOR_PAY_GROUP_LOOKUP_CODE = ' ||
654: x_vendor_pay_group_lookup_code ||
652: 'PAY_DATE_BASIS_LOOKUP_CODE = ' || x_pay_date_basis_lookup_code ||
653: 'VENDOR_PAY_GROUP_LOOKUP_CODE = ' ||
654: x_vendor_pay_group_lookup_code ||
655: 'TERMS_DATE_BASIS = ' || x_terms_date_basis);
656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
657: END IF;
658: APP_EXCEPTION.RAISE_EXCEPTION;
659:
660: