2: /* $Header: WSHINMSB.pls 120.0.12010000.1 2009/03/26 06:00:08 brana noship $ */
3:
4: /*==============================================================================
5: -- PROCEDURE: lock_record
6: -- Purpose: Locking records in wsh_del_details_interface and wsh_new_del_interface
7: -- Description: This procedure is called from Interface Message Correction Form
8: -- for locking the record in table wsh_del_details_interface
9: -- and wsh_new_del_interface
10: * ==============================================================================*/
4: /*==============================================================================
5: -- PROCEDURE: lock_record
6: -- Purpose: Locking records in wsh_del_details_interface and wsh_new_del_interface
7: -- Description: This procedure is called from Interface Message Correction Form
8: -- for locking the record in table wsh_del_details_interface
9: -- and wsh_new_del_interface
10: * ==============================================================================*/
11:
12: --
26:
27:
28: CURSOR l_lock_del_details_interface is
29: SELECT 1
30: FROM wsh_del_details_interface
31: WHERE delivery_detail_interface_id = p_delivery_detail_interface_id
32: FOR UPDATE NOWAIT;
33:
34: l_id NUMBER :=0;