367: ELSE
368: OPEN c_current_details(p_ship_method_code, p_carrier_id);
369: END IF;
370:
371: l_user_id := FND_GLOBAL.USER_ID;
372: l_login := FND_GLOBAL.LOGIN_ID;
373:
374: l_continue := TRUE;
375: l_update_index := 0;
368: OPEN c_current_details(p_ship_method_code, p_carrier_id);
369: END IF;
370:
371: l_user_id := FND_GLOBAL.USER_ID;
372: l_login := FND_GLOBAL.LOGIN_ID;
373:
374: l_continue := TRUE;
375: l_update_index := 0;
376:
568: CLOSE c_lock_service;
569:
570: IF l_found
571: AND l_rec.update_mot_sl = 'P'
572: AND l_rec.request_id <> fnd_global.conc_request_id THEN
573: -- if this service is pending, check whether its request is still running.
574:
575: OPEN c_request_completed(l_rec.request_id);
576: FETCH c_request_completed INTO l_req_c;
586: IF l_found THEN
587: -- update this service for this request.
588: UPDATE WSH_CARRIER_SERVICES
589: SET update_mot_sl = p_new_state,
590: request_id = fnd_global.conc_request_id,
591: last_updated_by = fnd_global.user_id,
592: last_update_date = sysdate
593: WHERE carrier_service_id = p_carrier_service_id;
594: END IF;
587: -- update this service for this request.
588: UPDATE WSH_CARRIER_SERVICES
589: SET update_mot_sl = p_new_state,
590: request_id = fnd_global.conc_request_id,
591: last_updated_by = fnd_global.user_id,
592: last_update_date = sysdate
593: WHERE carrier_service_id = p_carrier_service_id;
594: END IF;
595: