286:
287: EXCEPTION
288: WHEN OTHERS THEN
289: IF (SQLCODE <> -20001) THEN
290: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
291: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
292: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
293: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
294: X_Report_Header_Id);
287: EXCEPTION
288: WHEN OTHERS THEN
289: IF (SQLCODE <> -20001) THEN
290: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
291: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
292: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
293: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
294: X_Report_Header_Id);
295: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
288: WHEN OTHERS THEN
289: IF (SQLCODE <> -20001) THEN
290: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
291: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
292: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
293: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
294: X_Report_Header_Id);
295: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
296: END IF;
289: IF (SQLCODE <> -20001) THEN
290: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
291: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
292: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
293: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
294: X_Report_Header_Id);
295: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
296: END IF;
297: APP_EXCEPTION.RAISE_EXCEPTION;
291: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
292: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
293: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
294: X_Report_Header_Id);
295: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
296: END IF;
297: APP_EXCEPTION.RAISE_EXCEPTION;
298:
299: END Insert_Row;
400: FETCH C INTO Recinfo;
401: if (C%NOTFOUND) then
402: debug_info := 'Close cursor C - DATA NOTFOUND';
403: CLOSE C;
404: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
405: APP_EXCEPTION.Raise_Exception;
406: end if;
407: debug_info := 'Close cursor C';
408: CLOSE C;
565: AND (X_Workflow_approved_flag IS NULL)))
566: ) then
567: null;
568: else
569: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
570: APP_EXCEPTION.Raise_Exception;
571: end if;
572:
573: if (
636: AND (X_global_attribute20 IS NULL)))
637: ) then
638: return;
639: else
640: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
641: APP_EXCEPTION.Raise_Exception;
642: end if;
643:
644: EXCEPTION
644: EXCEPTION
645: WHEN OTHERS THEN
646: IF (SQLCODE <> -20001) THEN
647: IF (SQLCODE = -54) THEN
648: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
649: ELSE
650: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
651: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
652: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
646: IF (SQLCODE <> -20001) THEN
647: IF (SQLCODE = -54) THEN
648: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
649: ELSE
650: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
651: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
652: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
653: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
654: X_Report_Header_Id);
647: IF (SQLCODE = -54) THEN
648: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
649: ELSE
650: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
651: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
652: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
653: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
654: X_Report_Header_Id);
655: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
648: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
649: ELSE
650: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
651: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
652: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
653: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
654: X_Report_Header_Id);
655: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
656: END IF;
649: ELSE
650: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
651: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
652: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
653: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
654: X_Report_Header_Id);
655: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
656: END IF;
657: END IF;
651: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
652: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
653: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
654: X_Report_Header_Id);
655: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
656: END IF;
657: END IF;
658: APP_EXCEPTION.RAISE_EXCEPTION;
659:
842:
843: EXCEPTION
844: WHEN OTHERS THEN
845: IF (SQLCODE <> -20001) THEN
846: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
847: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
848: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
849: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
850: X_Report_Header_Id);
843: EXCEPTION
844: WHEN OTHERS THEN
845: IF (SQLCODE <> -20001) THEN
846: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
847: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
848: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
849: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
850: X_Report_Header_Id);
851: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
844: WHEN OTHERS THEN
845: IF (SQLCODE <> -20001) THEN
846: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
847: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
848: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
849: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
850: X_Report_Header_Id);
851: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
852: END IF;
845: IF (SQLCODE <> -20001) THEN
846: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
847: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
848: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
849: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
850: X_Report_Header_Id);
851: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
852: END IF;
853: APP_EXCEPTION.RAISE_EXCEPTION;
847: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
848: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
849: FND_MESSAGE.SET_TOKEN('PARAMETERS','REPORT_HEADER_ID = ' ||
850: X_Report_Header_Id);
851: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
852: END IF;
853: APP_EXCEPTION.RAISE_EXCEPTION;
854:
855: END Update_Row;
874:
875: EXCEPTION
876: WHEN OTHERS THEN
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
882: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
875: EXCEPTION
876: WHEN OTHERS THEN
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
882: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
883: END IF;
876: WHEN OTHERS THEN
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
882: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
883: END IF;
884: APP_EXCEPTION.RAISE_EXCEPTION;
877: IF (SQLCODE <> -20001) THEN
878: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
882: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
883: END IF;
884: APP_EXCEPTION.RAISE_EXCEPTION;
885:
878: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
879: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
880: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
881: FND_MESSAGE.SET_TOKEN('PARAMETERS','ROWID = ' || X_Rowid);
882: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
883: END IF;
884: APP_EXCEPTION.RAISE_EXCEPTION;
885:
886: END Delete_Row;