245: EXCEPTION
246:
247: WHEN OTHERS THEN
248: IF (SQLCODE <> -20001) THEN
249: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
250: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
251: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
252: END IF;
253: APP_EXCEPTION.RAISE_EXCEPTION;
246:
247: WHEN OTHERS THEN
248: IF (SQLCODE <> -20001) THEN
249: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
250: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
251: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
252: END IF;
253: APP_EXCEPTION.RAISE_EXCEPTION;
254:
247: WHEN OTHERS THEN
248: IF (SQLCODE <> -20001) THEN
249: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
250: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
251: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
252: END IF;
253: APP_EXCEPTION.RAISE_EXCEPTION;
254:
255: END Do_Pay_Accounting;
300: EXCEPTION
301:
302: WHEN OTHERS THEN
303: IF (SQLCODE <> -20001) THEN
304: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
305: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
306: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
307: END IF;
308: APP_EXCEPTION.RAISE_EXCEPTION;
301:
302: WHEN OTHERS THEN
303: IF (SQLCODE <> -20001) THEN
304: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
305: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
306: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
307: END IF;
308: APP_EXCEPTION.RAISE_EXCEPTION;
309:
302: WHEN OTHERS THEN
303: IF (SQLCODE <> -20001) THEN
304: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
305: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
306: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
307: END IF;
308: APP_EXCEPTION.RAISE_EXCEPTION;
309:
310: END Delete_Hist_Dists;
710: EXCEPTION
711:
712: WHEN OTHERS THEN
713: IF (SQLCODE <> -20001) THEN
714: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
715: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
716: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
717: END IF;
718: APP_EXCEPTION.RAISE_EXCEPTION;
711:
712: WHEN OTHERS THEN
713: IF (SQLCODE <> -20001) THEN
714: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
715: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
716: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
717: END IF;
718: APP_EXCEPTION.RAISE_EXCEPTION;
719:
712: WHEN OTHERS THEN
713: IF (SQLCODE <> -20001) THEN
714: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
715: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
716: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', l_curr_calling_sequence);
717: END IF;
718: APP_EXCEPTION.RAISE_EXCEPTION;
719:
720: END Get_Pay_Sum;