189:
190: EXCEPTION
191: WHEN OTHERS THEN
192: IF (SQLCODE <> -20001) THEN
193: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
194: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
195: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
196: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
197: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
190: EXCEPTION
191: WHEN OTHERS THEN
192: IF (SQLCODE <> -20001) THEN
193: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
194: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
195: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
196: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
197: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
198: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
191: WHEN OTHERS THEN
192: IF (SQLCODE <> -20001) THEN
193: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
194: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
195: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
196: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
197: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
198: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
199: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
192: IF (SQLCODE <> -20001) THEN
193: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
194: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
195: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
196: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
197: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
198: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
199: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
200: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
196: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
197: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
198: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
199: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
200: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
201: END IF;
202: APP_EXCEPTION.RAISE_EXCEPTION;
203:
204:
258: FETCH C INTO Recinfo;
259: if (C%NOTFOUND) then
260: debug_info := 'Close cursor C - ROW NOTFOUND';
261: CLOSE C;
262: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
263: APP_EXCEPTION.Raise_Exception;
264: end if;
265: debug_info := 'Close cursor C';
266: CLOSE C;
341: AND (X_Org_Id IS NULL)))
342: ) then
343: return;
344: else
345: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
346: APP_EXCEPTION.Raise_Exception;
347: end if;
348:
349: EXCEPTION
349: EXCEPTION
350: WHEN OTHERS THEN
351: IF (SQLCODE <> -20001) THEN
352: IF (SQLCODE = -54) THEN
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
351: IF (SQLCODE <> -20001) THEN
352: IF (SQLCODE = -54) THEN
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
359: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
352: IF (SQLCODE = -54) THEN
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
359: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
360: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
353: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
359: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
360: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
361: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
354: ELSE
355: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
356: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
357: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
359: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
360: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
361: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
362: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
358: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
359: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
360: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
361: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
362: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
363: END IF;
364: END IF;
365: APP_EXCEPTION.RAISE_EXCEPTION;
366:
489: p_error_code => l_error_code,
490: p_calling_sequence => current_calling_sequence);
491:
492: IF (NOT l_success) THEN
493: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_REL_TAX_HOLDS');
494: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
495: APP_EXCEPTION.RAISE_EXCEPTION;
496: END IF;
497:
490: p_calling_sequence => current_calling_sequence);
491:
492: IF (NOT l_success) THEN
493: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_REL_TAX_HOLDS');
494: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
495: APP_EXCEPTION.RAISE_EXCEPTION;
496: END IF;
497:
498: END IF;
522: p_calling_sequence => current_calling_sequence);
523:
524: IF (not l_success) THEN
525:
526: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_FRZ_INV');
527: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
528: APP_EXCEPTION.RAISE_EXCEPTION;
529:
530: END IF;
523:
524: IF (not l_success) THEN
525:
526: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_FRZ_INV');
527: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
528: APP_EXCEPTION.RAISE_EXCEPTION;
529:
530: END IF;
531:
541:
542: EXCEPTION
543: WHEN OTHERS THEN
544: IF (SQLCODE <> -20001) THEN
545: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
546: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
547: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
548: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
549: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
542: EXCEPTION
543: WHEN OTHERS THEN
544: IF (SQLCODE <> -20001) THEN
545: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
546: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
547: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
548: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
549: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
550: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
543: WHEN OTHERS THEN
544: IF (SQLCODE <> -20001) THEN
545: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
546: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
547: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
548: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
549: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
550: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
551: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
544: IF (SQLCODE <> -20001) THEN
545: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
546: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
547: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
548: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
549: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
550: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
551: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
552: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
548: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid ||
549: ', INVOICE_ID == ' || TO_CHAR(X_Invoice_Id) ||
550: ', LINE_LOCATION_ID = ' || TO_CHAR(X_Line_Location_Id) ||
551: ', HOLD_LOOKUP_CODE = ' || X_Hold_Lookup_Code);
552: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
553: END IF;
554: APP_EXCEPTION.RAISE_EXCEPTION;
555:
556: END Update_Row;
593:
594: EXCEPTION
595: WHEN OTHERS THEN
596: IF (SQLCODE <> -20001) THEN
597: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
598: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
599: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
600: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
601: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
594: EXCEPTION
595: WHEN OTHERS THEN
596: IF (SQLCODE <> -20001) THEN
597: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
598: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
599: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
600: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
601: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
602: END IF;
595: WHEN OTHERS THEN
596: IF (SQLCODE <> -20001) THEN
597: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
598: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
599: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
600: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
601: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
602: END IF;
603: APP_EXCEPTION.RAISE_EXCEPTION;
596: IF (SQLCODE <> -20001) THEN
597: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
598: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
599: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
600: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
601: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
602: END IF;
603: APP_EXCEPTION.RAISE_EXCEPTION;
604:
597: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
598: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
599: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
600: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
601: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
602: END IF;
603: APP_EXCEPTION.RAISE_EXCEPTION;
604:
605: END Delete_Row;
708:
709: EXCEPTION
710: WHEN OTHERS THEN
711: IF (SQLCODE <> -20001) THEN
712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
715: current_calling_sequence);
716:
709: EXCEPTION
710: WHEN OTHERS THEN
711: IF (SQLCODE <> -20001) THEN
712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
715: current_calling_sequence);
716:
717: FND_MESSAGE.SET_TOKEN('PARAMETERS',
710: WHEN OTHERS THEN
711: IF (SQLCODE <> -20001) THEN
712: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
715: current_calling_sequence);
716:
717: FND_MESSAGE.SET_TOKEN('PARAMETERS',
718: 'X_invoice_id = ' ||X_invoice_id
713: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
714: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
715: current_calling_sequence);
716:
717: FND_MESSAGE.SET_TOKEN('PARAMETERS',
718: 'X_invoice_id = ' ||X_invoice_id
719: ||', X_hold_lookup_code = '||X_hold_lookup_code
720: ||', X_hold_type = ' ||X_hold_type
721: ||', X_hold_reason = ' ||X_hold_reason
721: ||', X_hold_reason = ' ||X_hold_reason
722: ||', X_held_by = ' ||X_held_by
723: );
724:
725: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
726: END IF;
727: APP_EXCEPTION.RAISE_EXCEPTION;
728:
729: END insert_single_hold;
789:
790: EXCEPTION
791: WHEN OTHERS THEN
792: IF (SQLCODE <> -20001) THEN
793: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
794: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
795: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
796: current_calling_sequence);
797: FND_MESSAGE.SET_TOKEN('PARAMETERS',
790: EXCEPTION
791: WHEN OTHERS THEN
792: IF (SQLCODE <> -20001) THEN
793: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
794: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
795: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
796: current_calling_sequence);
797: FND_MESSAGE.SET_TOKEN('PARAMETERS',
798: 'X_invoice_id = ' ||X_invoice_id
791: WHEN OTHERS THEN
792: IF (SQLCODE <> -20001) THEN
793: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
794: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
795: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
796: current_calling_sequence);
797: FND_MESSAGE.SET_TOKEN('PARAMETERS',
798: 'X_invoice_id = ' ||X_invoice_id
799: ||', X_hold_lookup_code = ' ||X_hold_lookup_code
793: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
794: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
795: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
796: current_calling_sequence);
797: FND_MESSAGE.SET_TOKEN('PARAMETERS',
798: 'X_invoice_id = ' ||X_invoice_id
799: ||', X_hold_lookup_code = ' ||X_hold_lookup_code
800: ||', X_release_lookup_code= '||X_release_lookup_code
801: ||', X_held_by = ' ||X_held_by
799: ||', X_hold_lookup_code = ' ||X_hold_lookup_code
800: ||', X_release_lookup_code= '||X_release_lookup_code
801: ||', X_held_by = ' ||X_held_by
802: );
803: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
804: END IF;
805: APP_EXCEPTION.RAISE_EXCEPTION;
806:
807: END release_single_hold;
938: p_error_code => l_error_code,
939: p_calling_sequence => current_calling_sequence);
940:
941: IF (not l_success) THEN
942: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_REL_TAX_HOLDS');
943: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
944: APP_EXCEPTION.RAISE_EXCEPTION;
945: END IF;
946:
939: p_calling_sequence => current_calling_sequence);
940:
941: IF (not l_success) THEN
942: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_REL_TAX_HOLDS');
943: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
944: APP_EXCEPTION.RAISE_EXCEPTION;
945: END IF;
946:
947: END IF;
956: p_calling_sequence => current_calling_sequence);
957:
958: IF (not l_success) THEN
959:
960: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_FRZ_INV');
961: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
962: APP_EXCEPTION.RAISE_EXCEPTION;
963:
964: END IF;
957:
958: IF (not l_success) THEN
959:
960: FND_MESSAGE.SET_NAME('SQLAP','AP_ETX_CANNOT_FRZ_INV');
961: FND_MESSAGE.SET_TOKEN('REASON',l_error_code);
962: APP_EXCEPTION.RAISE_EXCEPTION;
963:
964: END IF;
965:
976:
977: EXCEPTION
978: WHEN OTHERS THEN
979: IF (SQLCODE <> -20001) THEN
980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
983: current_calling_sequence);
984: FND_MESSAGE.SET_TOKEN('PARAMETERS',
977: EXCEPTION
978: WHEN OTHERS THEN
979: IF (SQLCODE <> -20001) THEN
980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
983: current_calling_sequence);
984: FND_MESSAGE.SET_TOKEN('PARAMETERS',
985: 'X_invoice_id = ' ||TO_CHAR(X_invoice_id)
978: WHEN OTHERS THEN
979: IF (SQLCODE <> -20001) THEN
980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
983: current_calling_sequence);
984: FND_MESSAGE.SET_TOKEN('PARAMETERS',
985: 'X_invoice_id = ' ||TO_CHAR(X_invoice_id)
986: ||', X_hold_lookup_code = ' ||X_hold_lookup_code
980: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
981: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
982: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',
983: current_calling_sequence);
984: FND_MESSAGE.SET_TOKEN('PARAMETERS',
985: 'X_invoice_id = ' ||TO_CHAR(X_invoice_id)
986: ||', X_hold_lookup_code = ' ||X_hold_lookup_code
987: ||', X_release_lookup_code= '||X_release_lookup_code
988: ||', X_release_reason= '||X_release_reason
992: ||', X_holds_count= '||TO_CHAR(X_holds_count)
993: ||', X_approval_status_lookup_code= '||
994: X_approval_status_lookup_code
995: );
996: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
997: END IF;
998: APP_EXCEPTION.RAISE_EXCEPTION;
999:
1000: END quick_release;