86: ,x_batch_history.orig_status, x_batch_history.new_status
87: ,x_batch_history.orig_wip_whse
88: ,x_batch_history.new_wip_whse
89: ,x_batch_history.gl_posted_ind
90: ,gme_common_pvt.g_user_ident, gme_common_pvt.g_login_id
91: ,gme_common_pvt.g_user_ident, gme_common_pvt.g_timestamp
92: ,gme_common_pvt.g_timestamp, x_batch_history.program_id
93: ,x_batch_history.request_id
94: ,x_batch_history.program_update_date
87: ,x_batch_history.orig_wip_whse
88: ,x_batch_history.new_wip_whse
89: ,x_batch_history.gl_posted_ind
90: ,gme_common_pvt.g_user_ident, gme_common_pvt.g_login_id
91: ,gme_common_pvt.g_user_ident, gme_common_pvt.g_timestamp
92: ,gme_common_pvt.g_timestamp, x_batch_history.program_id
93: ,x_batch_history.request_id
94: ,x_batch_history.program_update_date
95: ,x_batch_history.program_application_id)
88: ,x_batch_history.new_wip_whse
89: ,x_batch_history.gl_posted_ind
90: ,gme_common_pvt.g_user_ident, gme_common_pvt.g_login_id
91: ,gme_common_pvt.g_user_ident, gme_common_pvt.g_timestamp
92: ,gme_common_pvt.g_timestamp, x_batch_history.program_id
93: ,x_batch_history.request_id
94: ,x_batch_history.program_update_date
95: ,x_batch_history.program_application_id)
96: RETURNING event_id
102: RETURN FALSE;
103: END IF;
104: EXCEPTION
105: WHEN OTHERS THEN
106: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
107: ,SQLERRM);
108: RETURN FALSE;
109: END insert_row;
110:
169: ,x_batch_history.program_application_id
170: FROM gme_batch_history
171: WHERE event_id = p_batch_history.event_id;
172: ELSE
173: gme_common_pvt.log_message ('GME_NO_KEYS'
174: ,'TABLE_NAME'
175: ,g_table_name);
176: RETURN FALSE;
177: END IF;
178:
179: RETURN TRUE;
180: EXCEPTION
181: WHEN NO_DATA_FOUND THEN
182: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
183: ,'TABLE_NAME'
184: ,g_table_name);
185: RETURN FALSE;
186: WHEN OTHERS THEN
183: ,'TABLE_NAME'
184: ,g_table_name);
185: RETURN FALSE;
186: WHEN OTHERS THEN
187: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
188: ,SQLERRM);
189: RETURN FALSE;
190: END fetch_row;
191:
235:
236: DELETE FROM gme_batch_history
237: WHERE event_id = p_batch_history.event_id;
238: ELSE
239: gme_common_pvt.log_message ('GME_NO_KEYS'
240: ,'TABLE_NAME'
241: ,g_table_name);
242: RETURN FALSE;
243: END IF;
245: IF SQL%FOUND THEN
246: RETURN TRUE;
247: ELSE
248: IF l_dummy = 0 THEN
249: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
250: ,'TABLE_NAME'
251: ,g_table_name);
252: ELSE
253: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
249: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
250: ,'TABLE_NAME'
251: ,g_table_name);
252: ELSE
253: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
254: ,'TABLE_NAME'
255: ,g_table_name);
256: END IF;
257:
259: END IF;
260: EXCEPTION
261: WHEN NO_DATA_FOUND THEN
262: IF l_dummy = 0 THEN
263: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
264: ,'TABLE_NAME'
265: ,g_table_name);
266: ELSE
267: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
263: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
264: ,'TABLE_NAME'
265: ,g_table_name);
266: ELSE
267: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
268: ,'TABLE_NAME'
269: ,g_table_name);
270: END IF;
271:
270: END IF;
271:
272: RETURN FALSE;
273: WHEN locked_by_other_user THEN
274: gme_common_pvt.log_message ('GME_RECORD_LOCKED'
275: ,'TABLE_NAME'
276: ,g_table_name
277: ,'RECORD'
278: ,'Batch'
279: ,'KEY'
280: ,TO_CHAR (p_batch_history.batch_id) );
281: RETURN FALSE;
282: WHEN OTHERS THEN
283: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
284: ,SQLERRM);
285: RETURN FALSE;
286: END delete_row;
287:
335: ,new_status = p_batch_history.new_status
336: ,orig_wip_whse = p_batch_history.orig_wip_whse
337: ,new_wip_whse = p_batch_history.new_wip_whse
338: ,gl_posted_ind = p_batch_history.gl_posted_ind
339: ,last_updated_by = gme_common_pvt.g_user_ident
340: ,last_update_login = gme_common_pvt.g_login_id
341: ,last_update_date = gme_common_pvt.g_timestamp
342: ,program_id = p_batch_history.program_id
343: ,request_id = p_batch_history.request_id
336: ,orig_wip_whse = p_batch_history.orig_wip_whse
337: ,new_wip_whse = p_batch_history.new_wip_whse
338: ,gl_posted_ind = p_batch_history.gl_posted_ind
339: ,last_updated_by = gme_common_pvt.g_user_ident
340: ,last_update_login = gme_common_pvt.g_login_id
341: ,last_update_date = gme_common_pvt.g_timestamp
342: ,program_id = p_batch_history.program_id
343: ,request_id = p_batch_history.request_id
344: ,program_update_date = p_batch_history.program_update_date
337: ,new_wip_whse = p_batch_history.new_wip_whse
338: ,gl_posted_ind = p_batch_history.gl_posted_ind
339: ,last_updated_by = gme_common_pvt.g_user_ident
340: ,last_update_login = gme_common_pvt.g_login_id
341: ,last_update_date = gme_common_pvt.g_timestamp
342: ,program_id = p_batch_history.program_id
343: ,request_id = p_batch_history.request_id
344: ,program_update_date = p_batch_history.program_update_date
345: ,program_application_id =
346: p_batch_history.program_application_id
347: WHERE event_id = p_batch_history.event_id
348: AND last_update_date = p_batch_history.last_update_date;
349: ELSE
350: gme_common_pvt.log_message ('GME_NO_KEYS'
351: ,'TABLE_NAME'
352: ,g_table_name);
353: RETURN FALSE;
354: END IF;
356: IF SQL%FOUND THEN
357: RETURN TRUE;
358: ELSE
359: IF l_dummy = 0 THEN
360: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
361: ,'TABLE_NAME'
362: ,g_table_name);
363: ELSE
364: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
360: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
361: ,'TABLE_NAME'
362: ,g_table_name);
363: ELSE
364: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
365: ,'TABLE_NAME'
366: ,g_table_name);
367: END IF;
368:
370: END IF;
371: EXCEPTION
372: WHEN NO_DATA_FOUND THEN
373: IF l_dummy = 0 THEN
374: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
375: ,'TABLE_NAME'
376: ,g_table_name);
377: ELSE
378: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
374: gme_common_pvt.log_message ('GME_NO_DATA_FOUND'
375: ,'TABLE_NAME'
376: ,g_table_name);
377: ELSE
378: gme_common_pvt.log_message ('GME_RECORD_CHANGED'
379: ,'TABLE_NAME'
380: ,g_table_name);
381: END IF;
382:
381: END IF;
382:
383: RETURN FALSE;
384: WHEN locked_by_other_user THEN
385: gme_common_pvt.log_message ('GME_RECORD_LOCKED'
386: ,'TABLE_NAME'
387: ,g_table_name
388: ,'RECORD'
389: ,'Batch'
390: ,'KEY'
391: ,TO_CHAR (p_batch_history.batch_id) );
392: RETURN FALSE;
393: WHEN OTHERS THEN
394: gme_common_pvt.log_message ('GME_UNEXPECTED_ERROR', 'ERROR'
395: ,SQLERRM);
396: RETURN FALSE;
397: END update_row;
398:
440:
441: RETURN TRUE;
442: EXCEPTION
443: WHEN app_exception.record_lock_exception THEN
444: gme_common_pvt.log_message ('GME_RECORD_LOCKED'
445: ,'TABLE_NAME'
446: ,g_table_name
447: ,'RECORD'
448: ,'Batch'