CREATE OR REPLACE procedure cc_shipping
as 
 l_return_status VARCHAR2(2000); 
 l_msg_count NUMBER; 
 --l_msg_data VARCHAR2(1000); 
  
 pp_init_msg_list VARCHAR2(10) := FND_API.G_FALSE; 
 pp_return_values VARCHAR2(10) := FND_API.G_FALSE; 
 pp_action_commit VARCHAR2(10) := FND_API.G_FALSE; 
 xx_return_status VARCHAR2(1); 
 xx_msg_count NUMBER; 
 xx_msg_data VARCHAR2(2000); 
 trip_id number;
 trip_name varchar2(2000);
 l_msg_index_out number;
 l_msg_data varchar2(2000);
  x_msg_summary varchar2(2000); 
  x_msg_details varchar2(2000);
  fail_api EXCEPTION;
BEGIN 
 dbms_output.enable(1000000);
 mo_global.init('ONT');
 MO_GLOBAL.SET_POLICY_CONTEXT('S', 120); 
 --fnd_global.apps_initialize(1013475,21623,660); -- pass in user_id, responsibility_id, and application_id
 --FND_PROFILE.PUT('USER_ID','1013475') ;
 --FND_PROFILE.PUT( 'OE_ORGANIZATION_ID','204');
 oe_msg_pub.initialize; 
 oe_debug_pub.initialize; 
 --X_DEBUG_FILE := OE_DEBUG_PUB.Set_Debug_Mode('FILE'); 
 --oe_debug_pub.SetDebugLevel(5); -- Use 5 for the most debuging output, I warn  you its a lot of data 
 dbms_output.put_line('START OF NEW DEBUG'); 
--This is to UPDATE order line 
 --l_line_tbl_index :=1; 

fnd_global.apps_initialize(user_id => 1115,
resp_id => 50676,
resp_appl_id => 660,
security_group_id => 0);

/* Values for Ship Confirming the delivery. 
WSH_DELIVERIES_PUB.Delivery_Action(
p_api_version_number  =>   0.1,
    p_init_msg_list       =>   pp_init_msg_list,
    x_return_status       =>   xx_return_status,
    x_msg_count           =>   xx_msg_count,
    x_msg_data            =>   xx_msg_data,
p_action_code => 'CONFIRM', 
p_delivery_id => 2094, 
p_delivery_name => '2094', 
p_sc_action_flag => 'S', 
p_sc_close_trip_flag => 'Y',
p_sc_trip_ship_method => 'GROUND', 
--p_sc_report_set_name => null, 
--p_wv_override_flag => p_wv_override_flag, 
x_trip_id => trip_id, 
x_trip_name            =>  trip_name );
*/
/*
source_code := 'OE'; -- The only source code that should be used by the API 
changed_attributes(1).delivery_detail_id := 12132; -- Ship All quantities in this detail. 
changed_attributes(1).shipped_quantity := 1; 
--changed_attributes(2).source_line_id := 2031; -- Back Order All in this detail. 
--changed_attributes(2).shipped_quantity := 0; 
--changed_attributes(2).cycle_count_quantity := 2; 
--changed_attributes(3).source_line_id := 13433; -- Stage All in this detail. 
--changed_attributes(3).shipped_quantity := 0; 
--changed_attributes(3).cycle_count_quantity := 0; 
WSH_DELIVERY_DETAILS_PUB.Update_Shipping_Attributes( 
:::::::::::::
p_changed_attributes => changed_attributes, 
p_source_code => 'OE'); 
commit;
*/
wsh_deliveries_pub.Delivery_Action
  ( p_api_version_number  =>    1.0,
    p_init_msg_list       =>   pp_init_msg_list,
    x_return_status       =>   xx_return_status,
    x_msg_count           =>   xx_msg_count,
    x_msg_data            =>   xx_msg_data,
    p_action_code         =>   'CONFIRM',
    p_delivery_id         =>   2094,
    p_delivery_name       =>    '2094',
    p_asg_trip_id         =>    NULL,
    p_asg_trip_name       =>    NULL,
    p_asg_pickup_stop_id  =>    NULL,
    p_asg_pickup_loc_id   =>    NULL,
    p_asg_pickup_stop_seq =>    NULL,
    p_asg_pickup_loc_code =>    NULL,
    p_asg_pickup_arr_date =>    NULL,
    p_asg_pickup_dep_date =>   NULL,
    p_asg_dropoff_stop_id =>   NULL,
    p_asg_dropoff_loc_id  =>   NULL,
    p_asg_dropoff_stop_seq =>    NULL,
    p_asg_dropoff_loc_code =>   NULL,
    p_asg_dropoff_arr_date =>  NULL,
    p_asg_dropoff_dep_date =>   NULL,
    p_sc_action_flag       =>   'S',
    p_sc_intransit_flag    =>  'N',
    p_sc_close_trip_flag   =>   'Y',
    p_sc_create_bol_flag   =>   'N',
    p_sc_stage_del_flag    =>   'Y',
    p_sc_trip_ship_method  =>   null,--'UPS', --'GROUND',
    p_sc_actual_dep_date   =>   NULL,
    p_sc_report_set_id     =>   NULL,
    p_sc_report_set_name   =>   NULL,
    p_sc_defer_interface_flag =>  'Y',
    p_sc_send_945_flag       => NULL,
    p_sc_rule_id             => NULL,
    p_sc_rule_name         =>   NULL,
    p_wv_override_flag     =>   'N',
    x_trip_id              =>  trip_id,
    x_trip_name            =>  trip_name );
    
    DBMS_OUTPUT.PUT_LINE('xx_return_status= ' || xx_return_status);
    if (xx_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) then 
raise fail_api; 
end if; 
exception 
when fail_api then 
WSH_UTIL_CORE.get_messages('Y', x_msg_summary, x_msg_details, xx_msg_count); 
if xx_msg_count >= 1 then 
DBMS_OUTPUT.PUT_LINE('x_msg_summary= ' || x_msg_summary); 
DBMS_OUTPUT.PUT_LINE('x_msg_details= ' || x_msg_details);
--x_msg_data := x_msg_summary || x_msg_details; 
--else 
--x_msg_data := x_msg_summary; 
end if;

end; 
/*
    
    FOR i IN 1 .. xx_msg_count 
 LOOP 
  Oe_Msg_Pub.get( p_msg_index => i 
  , p_encoded => Fnd_Api.G_FALSE 
  , p_data => l_msg_data 
  , p_msg_index_out => l_msg_index_out); 
  DBMS_OUTPUT.PUT_LINE('message is: ' || l_msg_data); 
  DBMS_OUTPUT.PUT_LINE('message index is: ' || l_msg_index_out); 
 END LOOP; 
    
    dbms_output.put_line('trip_id='||trip_id);
    dbms_output.put_line('trip_name='||trip_name);
    dbms_output.put_line('xx_return_status='||xx_return_status);
    dbms_output.put_line('xx_msg_coun='||xx_msg_count);
    dbms_output.put_line('xx_msg_data='||xx_msg_data);
    
    
    COMMIT;
    





end;
*/