Atualizar informações de campos do percurso

Nesse post irei mostrar como é possível atualizar informações das entregas via API, essa alternativa pode ajudar quando há integrações e o procedimento é feito por um outro sistema sem precisar entrar na tela do percurso.

DECLARE
p_trip_info WSH_TRIPS_PUB.trip_pub_rec_type;
x_return_status VARCHAR2(200);
x_msg_count NUMBER; 
x_msg_data VARCHAR2(2000); 
x_trip_id NUMBER; 
x_trip_name VARCHAR2(200) ;
BEGIN

FND_GLOBAL.apps_initialize (1139, 21623, 660);
MO_GLOBAL.set_policy_context ('S', 81);
MO_GLOBAL.init ('ONT');

p_trip_info.name := '18051';
p_trip_info.attribute1 := 'NRCXXXXX';

WSH_TRIPS_PUB.Create_Update_Trip( p_api_version_number => 1.0,
p_init_msg_list => '',
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_action_code => 'UPDATE',
p_trip_info => p_trip_info,
p_trip_name => '18051',
x_trip_id => x_trip_id,
x_trip_name => x_trip_name);

DBMS_OUTPUT.PUT_LINE (x_msg_data);


IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
DBMS_OUTPUT.PUT_LINE ('Status: ' || x_return_status);
RETURN;
ELSE
DBMS_OUTPUT.PUT_LINE ('Status: ' || x_return_status);
END IF;
EXCEPTION WHEN OTHERS THEN
NULL;
END;