declare 
x_return_status varchar2 (1000);
x_msg_count number;
x_msg_data varchar2(1000);
p_trip_info WSH_TRIPS_PUB.trip_pub_rec_type;
x_trip_id number;
x_trip_name varchar2(1000);
begin
wsh_trips_pub.Create_Update_Trip
  ( 1.0
    ,' '
    ,x_return_status          
    ,x_msg_count              
    ,x_msg_data               
    ,'CREATE'
    ,p_trip_info
    ,'New_Trip'              
    ,x_trip_id               
    ,x_trip_name  ) ;
dbms_output.put_line ('Return_Status'||' '||x_return_status);
dbms_output.put_line ('Msg_Count'||' '||x_msg_count);
dbms_output.put_line ('Msg_Data'||' '||x_msg_data);
dbms_output.put_line ('trip_id'||' '||x_trip_id);
dbms_output.put_line ('trip_name'||' '||x_trip_name);
end;

CREATE OR REPLACE PROCEDURE XXTEST_CR_UP_TRIP AS
/*
  P_API_VERSION_NUMBER  IN    NUMBER, 
  P_INIT_MSG_LIST  IN    VARCHAR2, 
  P_ACTION_CODE  IN    VARCHAR2, 
  P_TRIP_NAME  IN    VARCHAR2 := FND_API.G_MISS_CHAR, */
  
  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

    P_TRIP_INFO.name := 22094;
    P_TRIP_INFO.seal_code := 'NOPE';

    WSH_TRIPS_PUB.CREATE_UPDATE_TRIP( 
      1.0, -- P_API_VERSION_NUMBER  IN    NUMBER, 
      '',--P_INIT_MSG_LIST  IN    VARCHAR2, 
      X_RETURN_STATUS,  --OUT    VARCHAR2, 
      X_MSG_COUNT,--  OUT    NUMBER, 
      X_MSG_DATA ,-- OUT    VARCHAR2, 
      'UPDATE', -- P_ACTION_CODE  IN    VARCHAR2, 
      P_TRIP_INFO  , --IN OUT    TRIP_PUB_REC_TYPE, 
      22094, --P_TRIP_NAME  IN    VARCHAR2 := FND_API.G_MISS_CHAR, 
      X_TRIP_ID, --X_TRIP_ID  OUT    NUMBER, 
      X_TRIP_NAME  -- X_TRIP_NAME  OUT    VARCHAR2 
    ); 
    
    DBMS_OUTPUT.PUT_LINE ('x_return_status : ' ||x_return_status) ; 
    DBMS_OUTPUT.PUT_LINE ('x_trip_id       : ' ||x_trip_id ) ; 
    DBMS_OUTPUT.PUT_LINE ('x_trip_name     : ' ||x_trip_name ) ; 
END ;