The following lines contain the word 'select', 'insert', 'update' or 'delete':
| - insert_row
| - fetch_row
| - update_row
| - lock_row
| - Delete_row
|
|
=============================================================================
*/
/* Api start of comments
+============================================================================
| FUNCTION NAME
| insert_row
|
| TYPE
| Private
| USAGE
| Insert_Row will insert a row in gme_batch_history
|
|
| DESCRIPTION
| Insert_Row will insert a row in gme_batch_history
|
|
|
| PARAMETERS
| p_batch_history IN gme_batch_history%ROWTYPE
| x_batch_history IN OUT NOCOPY gme_batch_history%ROWTYPE
|
| RETURNS
| BOOLEAN
| HISTORY
| 12-MAR-01 Thomas Daniel Created
|
|
|
+=============================================================================
Api end of comments
*/
FUNCTION insert_row (
p_batch_history IN gme_batch_history%ROWTYPE
,x_batch_history IN OUT NOCOPY gme_batch_history%ROWTYPE)
RETURN BOOLEAN
IS
BEGIN
x_batch_history := p_batch_history;
INSERT INTO gme_batch_history
(event_id, batch_id
,orig_status, new_status
,orig_wip_whse
,new_wip_whse
,gl_posted_ind
,last_updated_by, last_update_login
,created_by, creation_date
,last_update_date, program_id
,request_id
,program_update_date
,program_application_id)
VALUES (gem5_batch_event_id_s.NEXTVAL, x_batch_history.batch_id
,x_batch_history.orig_status, x_batch_history.new_status
,x_batch_history.orig_wip_whse
,x_batch_history.new_wip_whse
,x_batch_history.gl_posted_ind
,gme_common_pvt.g_user_ident, gme_common_pvt.g_login_id
,gme_common_pvt.g_user_ident, gme_common_pvt.g_timestamp
,gme_common_pvt.g_timestamp, x_batch_history.program_id
,x_batch_history.request_id
,x_batch_history.program_update_date
,x_batch_history.program_application_id)
RETURNING event_id
INTO x_batch_history.event_id;
END insert_row;
SELECT event_id, batch_id
,orig_status, new_status
,orig_wip_whse, new_wip_whse
,gl_posted_ind
,last_updated_by
,last_update_login
,created_by, creation_date
,last_update_date
,program_id, request_id
,program_update_date
,program_application_id
INTO x_batch_history.event_id, x_batch_history.batch_id
,x_batch_history.orig_status, x_batch_history.new_status
,x_batch_history.orig_wip_whse, x_batch_history.new_wip_whse
,x_batch_history.gl_posted_ind
,x_batch_history.last_updated_by
,x_batch_history.last_update_login
,x_batch_history.created_by, x_batch_history.creation_date
,x_batch_history.last_update_date
,x_batch_history.program_id, x_batch_history.request_id
,x_batch_history.program_update_date
,x_batch_history.program_application_id
FROM gme_batch_history
WHERE event_id = p_batch_history.event_id;
| delete_row
|
| TYPE
| Private
| USAGE
| Delete_Row will delete a row in gme_batch_history
|
|
| DESCRIPTION
| Delete_Row will delete a row in gme_batch_history
|
|
|
| PARAMETERS
| p_batch_history IN gme_batch_history%ROWTYPE
|
| RETURNS
| BOOLEAN
| HISTORY
| 12-MAR-01 Thomas Daniel Created
| 26-AUG-01 Bharati Satpute Bug 2404126
| Added error message 'GME_RECORD_CHANGED'
|
|
+=============================================================================
Api end of comments
*/
FUNCTION delete_row (p_batch_history IN gme_batch_history%ROWTYPE)
RETURN BOOLEAN
IS
l_dummy NUMBER := 0;
SELECT 1
INTO l_dummy
FROM gme_batch_history
WHERE event_id = p_batch_history.event_id
FOR UPDATE NOWAIT;
DELETE FROM gme_batch_history
WHERE event_id = p_batch_history.event_id;
END delete_row;
| update_row
|
| TYPE
| Private
| USAGE
| Update_Row will update a row in gme_batch_history
|
|
| DESCRIPTION
| Update_Row will update a row in gme_batch_history
|
|
|
| PARAMETERS
| p_batch_history IN gme_batch_history%ROWTYPE
|
| RETURNS
| BOOLEAN
| HISTORY
| 12-MAR-01 Thomas Daniel Created
| 26-AUG-02 Bharati Satpute Bug2404126
| Added Error message 'GME_RECORD_CHANGED'
|
|
+=============================================================================
Api end of comments
*/
FUNCTION update_row (p_batch_history IN gme_batch_history%ROWTYPE)
RETURN BOOLEAN
IS
l_dummy NUMBER := 0;
SELECT 1
INTO l_dummy
FROM gme_batch_history
WHERE event_id = p_batch_history.event_id
FOR UPDATE NOWAIT;
UPDATE gme_batch_history
SET batch_id = p_batch_history.batch_id
,orig_status = p_batch_history.orig_status
,new_status = p_batch_history.new_status
,orig_wip_whse = p_batch_history.orig_wip_whse
,new_wip_whse = p_batch_history.new_wip_whse
,gl_posted_ind = p_batch_history.gl_posted_ind
,last_updated_by = gme_common_pvt.g_user_ident
,last_update_login = gme_common_pvt.g_login_id
,last_update_date = gme_common_pvt.g_timestamp
,program_id = p_batch_history.program_id
,request_id = p_batch_history.request_id
,program_update_date = p_batch_history.program_update_date
,program_application_id =
p_batch_history.program_application_id
WHERE event_id = p_batch_history.event_id
AND last_update_date = p_batch_history.last_update_date;
END update_row;
SELECT 1
INTO l_dummy
FROM gme_batch_history
WHERE event_id = p_batch_history.event_id
FOR UPDATE NOWAIT;