Atualizar informações de campos das entregas

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 das entregas.

Sem título

DECLARE
p_sales_order NUMBER := 10014445;
p_line_number NUMBER := 1.1;
p_org_id NUMBER := 308;
l_shipped_quantity NUMBER := 5;
p_api_version_number NUMBER := 1.0;
init_msg_list VARCHAR2 (200);
l_commit VARCHAR2 (30);
x_msg_details VARCHAR2 (3000);
x_msg_summary VARCHAR2 (3000);
x_return_status VARCHAR2 (3);
x_msg_count NUMBER;
x_msg_data VARCHAR2 (3000);
p_validation_level NUMBER;
v_errbuf VARCHAR2 (2000);
v_retcode VARCHAR2 (20);
v_released_status wsh_delivery_details.released_status%TYPE;
v_inv_interfaced_flag wsh_delivery_details.inv_interfaced_flag%TYPE;
v_oe_interfaced_flag wsh_delivery_details.oe_interfaced_flag%TYPE;
v_source_code wsh_delivery_details.source_code%TYPE;
v_pending_interface_flag wsh_trip_stops.pending_interface_flag%TYPE;
l_changed_attributes WSH_DELIVERY_DETAILS_PUB.changedattributetabtype;
l_source_code VARCHAR2 (30) := 'OE';
p_delivery_name VARCHAR2 (30);
BEGIN

FND_GLOBAL.apps_initialize (1139, 21623, 660);

MO_GLOBAL.set_policy_context ('S', 81);
MO_GLOBAL.init ('ONT');

l_changed_attributes(1).delivery_detail_id := 19029;
l_changed_attributes(1).volume := 23;

WSH_DELIVERY_DETAILS_PUB.update_shipping_attributes ( p_api_version_number => 1.0,
p_init_msg_list => init_msg_list,
p_commit => l_commit,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_changed_attributes => l_changed_attributes,
p_source_code => l_source_code);

IF (x_return_status <> WSH_UTIL_CORE.g_ret_sts_success) THEN
DBMS_OUTPUT.PUT_LINE ('Failed to Update the Shipping Attributes' ||x_msg_data);
ELSE
DBMS_OUTPUT.PUT_LINE ('Successfully Updated the Shipping Attributes');
COMMIT;
END IF;
END;

Após executar a API, o campo foi atualizado.

Sem título

Deixe uma resposta

Powered by WordPress.com. Tema: Baskerville 2 por Anders Noren

Acima ↑

%d blogueiros gostam disto: