361:
362: --
363: -- Set expiration to 30 minutes
364: --
365: dbms_lock.allocate_unique
366: ( lockname => l_lock_name
367: , lockhandle => l_lock_handle
368: , expiration_secs => 1800
369: );
430: END IF;
431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
432: END IF;
433:
434: l_lock_req_stat := dbms_lock.request
435: ( lockhandle => l_lock_handle
436: , lockmode => dbms_lock.x_mode
437: , timeout => 1
438: , release_on_commit => TRUE
432: END IF;
433:
434: l_lock_req_stat := dbms_lock.request
435: ( lockhandle => l_lock_handle
436: , lockmode => dbms_lock.x_mode
437: , timeout => 1
438: , release_on_commit => TRUE
439: );
440:
442: x_return_status := 'L';
443: ELSIF l_lock_req_stat NOT IN (0,4) THEN
444: IF l_debug = 1 THEN
445: print_debug
446: ( 'Error status from dbms_lock.request: ' ||
447: to_char(l_lock_req_stat)
448: , l_api_name
449: );
450: END IF;