141: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
142: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
143: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
144: END IF;
145: APP_EXCEPTION.RAISE_EXCEPTION;
146:
147: END insert_row;
148:
149: PROCEDURE update_row (x_rowid IN OUT NOCOPY VARCHAR2,
238: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
239: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
240: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
241: END IF;
242: APP_EXCEPTION.RAISE_EXCEPTION;
243:
244: END update_row;
245:
246: PROCEDURE delete_row (x_source_id NUMBER) IS
267: FND_MESSAGE.SET_NAME('GHG', 'GHG_DEBUG');
268: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
269: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
270: END IF;
271: APP_EXCEPTION.RAISE_EXCEPTION;
272:
273:
274: END delete_row;
275:
443: THEN
444: NULL;
445: ELSE
446: FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
447: APP_EXCEPTION.RAISE_EXCEPTION;
448: END IF;
449:
450: EXCEPTION
451: WHEN NO_DATA_FOUND THEN
460: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
461: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', v_debug_info);
462: END IF;
463: END IF;
464: APP_EXCEPTION.RAISE_EXCEPTION;
465:
466: END lock_row;
467:
468: FUNCTION source_in_use (x_source_id NUMBER) RETURN BOOLEAN IS