349:
350: EXCEPTION
351: WHEN OTHERS THEN
352: if (SQLCODE <> -20001) then
353: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
354: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
355: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
356: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
357: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
350: EXCEPTION
351: WHEN OTHERS THEN
352: if (SQLCODE <> -20001) then
353: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
354: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
355: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
356: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
357: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
358: );
351: WHEN OTHERS THEN
352: if (SQLCODE <> -20001) then
353: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
354: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
355: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
356: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
357: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
358: );
359: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
352: if (SQLCODE <> -20001) then
353: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
354: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
355: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
356: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
357: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
358: );
359: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
360: end if;
355: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
356: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
357: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
358: );
359: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
360: end if;
361: APP_EXCEPTION.RAISE_EXCEPTION;
362:
363:
485: FETCH C INTO Recinfo;
486: if (C%NOTFOUND) then
487: debug_info := 'Close cursor C - ROW NOTFOUND';
488: CLOSE C;
489: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
490: APP_EXCEPTION.Raise_Exception;
491: end if;
492: debug_info := 'Close cursor C';
493: CLOSE C;
600: OR ( (Recinfo.RELATIONSHIP_ID IS NULL)
601: AND (X_RELATIONSHIP_ID IS NULL)))) then
602: null;
603: else
604: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
605: APP_EXCEPTION.Raise_Exception;
606: end if;
607:
608: if(
764:
765: )then
766: return;
767: else
768: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
769: APP_EXCEPTION.Raise_Exception;
770: end if;
771:
772: EXCEPTION
772: EXCEPTION
773: WHEN OTHERS THEN
774: if (SQLCODE <> -20001) then
775: IF (SQLCODE = -54) THEN
776: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
777: ELSE
778: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
779: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
780: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
774: if (SQLCODE <> -20001) then
775: IF (SQLCODE = -54) THEN
776: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
777: ELSE
778: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
779: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
780: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
781: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
782: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
775: IF (SQLCODE = -54) THEN
776: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
777: ELSE
778: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
779: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
780: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
781: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
782: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
783: );
776: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
777: ELSE
778: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
779: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
780: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
781: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
782: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
783: );
784: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
777: ELSE
778: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
779: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
780: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
781: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
782: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
783: );
784: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
785: END IF;
780: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
781: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
782: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
783: );
784: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
785: END IF;
786: end if;
787: APP_EXCEPTION.RAISE_EXCEPTION;
788: END Lock_Row;
1011:
1012: EXCEPTION
1013: WHEN OTHERS THEN
1014: if (SQLCODE <> -20001) then
1015: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1016: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1017: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1018: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
1019: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
1012: EXCEPTION
1013: WHEN OTHERS THEN
1014: if (SQLCODE <> -20001) then
1015: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1016: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1017: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1018: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
1019: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
1020: );
1013: WHEN OTHERS THEN
1014: if (SQLCODE <> -20001) then
1015: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1016: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1017: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1018: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
1019: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
1020: );
1021: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1014: if (SQLCODE <> -20001) then
1015: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1016: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1017: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1018: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
1019: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
1020: );
1021: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1022: end if;
1017: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1018: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid
1019: ||', Recurring_payment_id = '||TO_CHAR(X_Recurring_Payment_Id)
1020: );
1021: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1022: end if;
1023: APP_EXCEPTION.RAISE_EXCEPTION;
1024:
1025: END Update_Row;
1047:
1048: EXCEPTION
1049: WHEN OTHERS THEN
1050: if (SQLCODE <> -20001) then
1051: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1052: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1053: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1054: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid);
1055: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1048: EXCEPTION
1049: WHEN OTHERS THEN
1050: if (SQLCODE <> -20001) then
1051: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1052: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1053: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1054: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid);
1055: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1056: end if;
1049: WHEN OTHERS THEN
1050: if (SQLCODE <> -20001) then
1051: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1052: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1053: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1054: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid);
1055: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1056: end if;
1057: APP_EXCEPTION.RAISE_EXCEPTION;
1050: if (SQLCODE <> -20001) then
1051: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1052: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1053: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1054: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid);
1055: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1056: end if;
1057: APP_EXCEPTION.RAISE_EXCEPTION;
1058:
1051: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
1052: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
1053: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1054: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Rowid = '||X_Rowid);
1055: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
1056: end if;
1057: APP_EXCEPTION.RAISE_EXCEPTION;
1058:
1059: END Delete_Row;