87: IF x_called_from_api = 'Y' THEN
88: RAISE;
89: ELSE
90: IF (SQLCODE <> -20001) THEN
91: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
92: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
93: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
94: END IF;
95: APP_EXCEPTION.RAISE_EXCEPTION;
88: RAISE;
89: ELSE
90: IF (SQLCODE <> -20001) THEN
91: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
92: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
93: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
94: END IF;
95: APP_EXCEPTION.RAISE_EXCEPTION;
96: END IF;
89: ELSE
90: IF (SQLCODE <> -20001) THEN
91: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
92: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
93: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
94: END IF;
95: APP_EXCEPTION.RAISE_EXCEPTION;
96: END IF;
97:
148:
149: EXCEPTION
150: WHEN OTHERS THEN
151: IF (SQLCODE <> -20001) THEN
152: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
153: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
154: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
155: END IF;
156: APP_EXCEPTION.RAISE_EXCEPTION;
149: EXCEPTION
150: WHEN OTHERS THEN
151: IF (SQLCODE <> -20001) THEN
152: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
153: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
154: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
155: END IF;
156: APP_EXCEPTION.RAISE_EXCEPTION;
157:
150: WHEN OTHERS THEN
151: IF (SQLCODE <> -20001) THEN
152: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
153: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
154: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
155: END IF;
156: APP_EXCEPTION.RAISE_EXCEPTION;
157:
158: END update_row;
289: (recinfo.last_update_login IS NULL AND x_last_update_login IS NULL)))
290: THEN
291: NULL;
292: ELSE
293: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
294: APP_EXCEPTION.RAISE_EXCEPTION;
295: END IF;
296:
297: EXCEPTION
297: EXCEPTION
298: WHEN OTHERS THEN
299: IF (SQLCODE <> -20001) THEN
300: IF (SQLCODE = -54) THEN
301: FND_MESSAGE.SET_NAME('GHG', 'GHG_RESOURCE_BUSY');
302: ELSE
303: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
305: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
299: IF (SQLCODE <> -20001) THEN
300: IF (SQLCODE = -54) THEN
301: FND_MESSAGE.SET_NAME('GHG', 'GHG_RESOURCE_BUSY');
302: ELSE
303: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
305: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
306: END IF;
307: END IF;
300: IF (SQLCODE = -54) THEN
301: FND_MESSAGE.SET_NAME('GHG', 'GHG_RESOURCE_BUSY');
302: ELSE
303: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
305: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
306: END IF;
307: END IF;
308: APP_EXCEPTION.RAISE_EXCEPTION;
301: FND_MESSAGE.SET_NAME('GHG', 'GHG_RESOURCE_BUSY');
302: ELSE
303: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
304: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
305: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
306: END IF;
307: END IF;
308: APP_EXCEPTION.RAISE_EXCEPTION;
309: