379: ELSE
380: OPEN c_current_details(p_ship_method_code, p_carrier_id);
381: END IF;
382:
383: l_user_id := FND_GLOBAL.USER_ID;
384: l_login := FND_GLOBAL.LOGIN_ID;
385:
386: l_continue := TRUE;
387: l_update_index := 0;
380: OPEN c_current_details(p_ship_method_code, p_carrier_id);
381: END IF;
382:
383: l_user_id := FND_GLOBAL.USER_ID;
384: l_login := FND_GLOBAL.LOGIN_ID;
385:
386: l_continue := TRUE;
387: l_update_index := 0;
388:
580: CLOSE c_lock_service;
581:
582: IF l_found
583: AND l_rec.update_mot_sl = 'P'
584: AND l_rec.request_id <> fnd_global.conc_request_id THEN
585: -- if this service is pending, check whether its request is still running.
586:
587: OPEN c_request_completed(l_rec.request_id);
588: FETCH c_request_completed INTO l_req_c;
598: IF l_found THEN
599: -- update this service for this request.
600: UPDATE WSH_CARRIER_SERVICES
601: SET update_mot_sl = p_new_state,
602: request_id = fnd_global.conc_request_id,
603: last_updated_by = fnd_global.user_id,
604: last_update_date = sysdate
605: WHERE carrier_service_id = p_carrier_service_id;
606: END IF;
599: -- update this service for this request.
600: UPDATE WSH_CARRIER_SERVICES
601: SET update_mot_sl = p_new_state,
602: request_id = fnd_global.conc_request_id,
603: last_updated_by = fnd_global.user_id,
604: last_update_date = sysdate
605: WHERE carrier_service_id = p_carrier_service_id;
606: END IF;
607: