283:
284: EXCEPTION
285: WHEN OTHERS THEN
286: IF (SQLCODE <> -20001) THEN
287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
290: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
291: X_Report_Header_Id);
284: EXCEPTION
285: WHEN OTHERS THEN
286: IF (SQLCODE <> -20001) THEN
287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
290: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
291: X_Report_Header_Id);
292: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
285: WHEN OTHERS THEN
286: IF (SQLCODE <> -20001) THEN
287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
290: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
291: X_Report_Header_Id);
292: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
293: END IF;
286: IF (SQLCODE <> -20001) THEN
287: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
290: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
291: X_Report_Header_Id);
292: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
293: END IF;
294: APP_EXCEPTION.RAISE_EXCEPTION;
288: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
289: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
290: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
291: X_Report_Header_Id);
292: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
293: END IF;
294: APP_EXCEPTION.RAISE_EXCEPTION;
295:
296: END Insert_Row;
397: FETCH C INTO Recinfo;
398: if (C%NOTFOUND) then
399: debug_info := 'Close cursor C - DATA NOTFOUND';
400: CLOSE C;
401: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
402: APP_EXCEPTION.Raise_Exception;
403: end if;
404: debug_info := 'Close cursor C';
405: CLOSE C;
562: AND (X_Workflow_approved_flag IS NULL)))
563: ) then
564: null;
565: else
566: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
567: APP_EXCEPTION.Raise_Exception;
568: end if;
569:
570: if (
633: AND (X_global_attribute20 IS NULL)))
634: ) then
635: return;
636: else
637: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
638: APP_EXCEPTION.Raise_Exception;
639: end if;
640:
641: EXCEPTION
641: EXCEPTION
642: WHEN OTHERS THEN
643: IF (SQLCODE <> -20001) THEN
644: IF (SQLCODE = -54) THEN
645: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
646: ELSE
647: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
648: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
649: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
643: IF (SQLCODE <> -20001) THEN
644: IF (SQLCODE = -54) THEN
645: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
646: ELSE
647: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
648: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
649: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
651: X_Report_Header_Id);
644: IF (SQLCODE = -54) THEN
645: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
646: ELSE
647: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
648: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
649: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
651: X_Report_Header_Id);
652: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
645: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
646: ELSE
647: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
648: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
649: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
651: X_Report_Header_Id);
652: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
653: END IF;
646: ELSE
647: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
648: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
649: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
651: X_Report_Header_Id);
652: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
653: END IF;
654: END IF;
648: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
649: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
650: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
651: X_Report_Header_Id);
652: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
653: END IF;
654: END IF;
655: APP_EXCEPTION.RAISE_EXCEPTION;
656:
839:
840: EXCEPTION
841: WHEN OTHERS THEN
842: IF (SQLCODE <> -20001) THEN
843: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
844: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
845: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
846: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
847: X_Report_Header_Id);
840: EXCEPTION
841: WHEN OTHERS THEN
842: IF (SQLCODE <> -20001) THEN
843: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
844: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
845: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
846: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
847: X_Report_Header_Id);
848: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
841: WHEN OTHERS THEN
842: IF (SQLCODE <> -20001) THEN
843: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
844: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
845: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
846: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
847: X_Report_Header_Id);
848: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
849: END IF;
842: IF (SQLCODE <> -20001) THEN
843: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
844: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
845: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
846: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
847: X_Report_Header_Id);
848: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
849: END IF;
850: APP_EXCEPTION.RAISE_EXCEPTION;
844: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
845: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
846: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
847: X_Report_Header_Id);
848: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
849: END IF;
850: APP_EXCEPTION.RAISE_EXCEPTION;
851:
852: END Update_Row;
871:
872: EXCEPTION
873: WHEN OTHERS THEN
874: IF (SQLCODE <> -20001) THEN
875: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
876: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
877: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
878: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
879: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
872: EXCEPTION
873: WHEN OTHERS THEN
874: IF (SQLCODE <> -20001) THEN
875: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
876: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
877: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
878: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
879: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
880: END IF;
873: WHEN OTHERS THEN
874: IF (SQLCODE <> -20001) THEN
875: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
876: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
877: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
878: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
879: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
880: END IF;
881: APP_EXCEPTION.RAISE_EXCEPTION;
874: IF (SQLCODE <> -20001) THEN
875: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
876: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
877: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
878: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
879: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
880: END IF;
881: APP_EXCEPTION.RAISE_EXCEPTION;
882:
875: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
876: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
877: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
878: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
879: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
880: END IF;
881: APP_EXCEPTION.RAISE_EXCEPTION;
882:
883: END Delete_Row;