692:
693:
694: /*------------------------------------------------------------------------------------------
695: Procedure GET_SYSTEN_LOCK
696: This procedure replaces the existing API BSC_SECURITY.Check_System_Lock
697: to be the locking procedure for BSC modules. Instead of calling the API
698: at the start of the process flow, this new API will be called right
699: before the changes are committed to the database.
700:
918:
919:
920: /*------------------------------------------------------------------------------------------
921: Procedure GET_SYSTEN_LOCKS
922: This procedure replaces the existing API BSC_SECURITY.Check_System_Lock
923: to be the locking procedure for BSC modules. Instead of calling the API
924: at the start of the process flow, this new API will be called right
925: before the changes are committed to the database.
926:
1045:
1046:
1047: /*------------------------------------------------------------------------------------------
1048: Procedure GET_SYSTEN_LOCKS
1049: This procedure replaces the existing API BSC_SECURITY.Check_System_Lock
1050: to be the locking procedure for BSC modules. Instead of calling the API
1051: at the start of the process flow, this new API will be called right
1052: before the changes are committed to the database.
1053:
1634: FND_MSG_PUB.Initialize;
1635: x_return_status := FND_API.G_RET_STS_SUCCESS;
1636: BSC_LOCKS_PVT.Initialize;
1637:
1638: BSC_SECURITY.Refresh_System_Lock(p_program_id);
1639: --Delete all orphan the sessions
1640: --DELETE BSC_CURRENT_SESSIONS
1641: --WHERE SESSION_ID NOT IN
1642: -- (SELECT VS.AUDSID