/* Formatted on 2009/07/31 17:32 (Formatter Plus v4.8.6) */
DECLARE
v_api_version_number NUMBER;
v_init_msg_list VARCHAR2 (1000);
v_return_status VARCHAR2 (1000);
x_msg_count NUMBER;
x_msg_data VARCHAR2 (1000);
p_action_code VARCHAR2 (1000);
lx_msg_data VARCHAR2 (2000);
lx_msg_index_out NUMBER;
--v_delivery WSH_NEW_DELIVERIES_PVT.Delivery_Rec_Type;
v_delivery wsh_deliveries_pub.delivery_pub_rec_type;
v_delivery_name VARCHAR2 (100);
x_delivery_id NUMBER;
v_name VARCHAR2 (1000);
l_wsh_rec wsh_new_deliveries%ROWTYPE;
v_rowid VARCHAR2 (10);
v_delivery_details wsh_delivery_details_pub.id_tab_type;
v_validation_level NUMBER;
v_delivery_id NUMBER;
BEGIN
DBMS_OUTPUT.put_line ('Replay Start');
v_return_status := wsh_util_core.g_ret_sts_success;
v_api_version_number := 1.0;
--v_delivery.name := 278712044;
SELECT *
INTO l_wsh_rec
FROM wsh_new_deliveries
WHERE delivery_id = 278710043;
--v_delivery.DELIVERY_ID := 278713053 ;
v_delivery.NAME := '278742043';
--v_delivery.PLANNED_FLAG := l_wsh_rec.PLANNED_FLAG ;
--v_delivery.STATUS_CODE := l_wsh_rec.STATUS_CODE ;
--v_delivery.DELIVERY_TYPE := l_wsh_rec.DELIVERY_TYPE ;
--v_delivery.LOADING_SEQUENCE := l_wsh_rec.LOADING_SEQUENCE ;
--v_delivery.LOADING_ORDER_FLAG := l_wsh_rec.LOADING_ORDER_FLAG ;
--v_delivery.INITIAL_PICKUP_DATE := l_wsh_rec.INITIAL_PICKUP_DATE ;
v_delivery.initial_pickup_location_id := 121;
--l_wsh_rec.INITIAL_PICKUP_LOCATION_ID ;
v_delivery.organization_id := 46; --l_wsh_rec.ORGANIZATION_ID ;
v_delivery.ultimate_dropoff_location_id := 84483;
--l_wsh_rec.ULTIMATE_DROPOFF_LOCATION_ID ;
--v_delivery.ULTIMATE_DROPOFF_DATE := l_wsh_rec.ULTIMATE_DROPOFF_DATE ;
--v_delivery.CUSTOMER_ID := l_wsh_rec.CUSTOMER_ID ;
--v_delivery.INTMED_SHIP_TO_LOCATION_ID := l_wsh_rec.INTMED_SHIP_TO_LOCATION_ID ;
--v_delivery.POOLED_SHIP_TO_LOCATION_ID := l_wsh_rec.POOLED_SHIP_TO_LOCATION_ID ;
--v_delivery.CARRIER_ID := l_wsh_rec.CARRIER_ID ;
--v_delivery.SHIP_METHOD_CODE := l_wsh_rec.SHIP_METHOD_CODE ;
--v_delivery.FREIGHT_TERMS_CODE := l_wsh_rec.FREIGHT_TERMS_CODE ;
--v_delivery.FOB_CODE := l_wsh_rec.FOB_CODE ;
--v_delivery.FOB_LOCATION_ID := l_wsh_rec.FOB_LOCATION_ID ;
--v_delivery.WAYBILL := l_wsh_rec.WAYBILL ;
--v_delivery.DOCK_CODE := l_wsh_rec.DOCK_CODE ;
--v_delivery.ACCEPTANCE_FLAG := l_wsh_rec.ACCEPTANCE_FLAG ;
--v_delivery.ACCEPTED_BY := l_wsh_rec.ACCEPTED_BY ;
--v_delivery.ACCEPTED_DATE := l_wsh_rec.ACCEPTED_DATE ;
--v_delivery.ACKNOWLEDGED_BY := l_wsh_rec.ACKNOWLEDGED_BY ;
--v_delivery.CONFIRMED_BY := l_wsh_rec.CONFIRMED_BY ;
--v_delivery.CONFIRM_DATE := l_wsh_rec.CONFIRM_DATE ;
--v_delivery.ASN_DATE_SENT := l_wsh_rec.ASN_DATE_SENT ;
--v_delivery.ASN_STATUS_CODE := l_wsh_rec.ASN_STATUS_CODE ;
--v_delivery.ASN_SEQ_NUMBER := l_wsh_rec.ASN_SEQ_NUMBER ;
--v_delivery.GROSS_WEIGHT := l_wsh_rec.GROSS_WEIGHT ;
--v_delivery.NET_WEIGHT := l_wsh_rec.NET_WEIGHT ;
v_delivery.weight_uom_code := 'EA';
--l_wsh_rec.WEIGHT_UOM_CODE ;
--v_delivery.VOLUME := l_wsh_rec.VOLUME ;
v_delivery.volume_uom_code := 'EA';
--l_wsh_rec.VOLUME_UOM_CODE ;
--v_delivery.ADDITIONAL_SHIPMENT_INFO := l_wsh_rec.ADDITIONAL_SHIPMENT_INFO ;
--v_delivery.CURRENCY_CODE := l_wsh_rec.CURRENCY_CODE ;
--v_delivery.ATTRIBUTE_CATEGORY := l_wsh_rec.ATTRIBUTE_CATEGORY ;
--v_delivery.ATTRIBUTE1 := l_wsh_rec.ATTRIBUTE1 ;
--v_delivery.ATTRIBUTE2 := l_wsh_rec.ATTRIBUTE2 ;
--v_delivery.ATTRIBUTE3 := l_wsh_rec.ATTRIBUTE3 ;
--v_delivery.ATTRIBUTE4 := l_wsh_rec.ATTRIBUTE4 ;
--v_delivery.ATTRIBUTE5 := l_wsh_rec.ATTRIBUTE5 ;
--v_delivery.ATTRIBUTE6 := l_wsh_rec.ATTRIBUTE6 ;
--v_delivery.ATTRIBUTE7 := l_wsh_rec.ATTRIBUTE7 ;
--v_delivery.ATTRIBUTE8 := l_wsh_rec.ATTRIBUTE8 ;
--v_delivery.ATTRIBUTE9 := l_wsh_rec.ATTRIBUTE9 ;
v_delivery.attribute10 := '278742043';
--v_delivery.ATTRIBUTE11 := l_wsh_rec.ATTRIBUTE11 ;
--v_delivery.ATTRIBUTE12 := l_wsh_rec.ATTRIBUTE12 ;
--v_delivery.ATTRIBUTE13 := l_wsh_rec.ATTRIBUTE13 ;
--v_delivery.ATTRIBUTE14 := l_wsh_rec.ATTRIBUTE14 ;
--v_delivery.ATTRIBUTE15 := l_wsh_rec.ATTRIBUTE15 ;
--v_delivery.TP_ATTRIBUTE_CATEGORY := l_wsh_rec.TP_ATTRIBUTE_CATEGORY ;
--v_delivery.TP_ATTRIBUTE1 := l_wsh_rec.TP_ATTRIBUTE1 ;
--v_delivery.TP_ATTRIBUTE2 := l_wsh_rec.TP_ATTRIBUTE2 ;
--v_delivery.TP_ATTRIBUTE3 := l_wsh_rec.TP_ATTRIBUTE3 ;
--v_delivery.TP_ATTRIBUTE4 := l_wsh_rec.TP_ATTRIBUTE4 ;
--v_delivery.TP_ATTRIBUTE5 := l_wsh_rec.TP_ATTRIBUTE5 ;
--v_delivery.TP_ATTRIBUTE6 := l_wsh_rec.TP_ATTRIBUTE6 ;
--v_delivery.TP_ATTRIBUTE7 := l_wsh_rec.TP_ATTRIBUTE7 ;
--v_delivery.TP_ATTRIBUTE8 := l_wsh_rec.TP_ATTRIBUTE8 ;
--v_delivery.TP_ATTRIBUTE9 := l_wsh_rec.TP_ATTRIBUTE9 ;
--v_delivery.TP_ATTRIBUTE10 := l_wsh_rec.TP_ATTRIBUTE10 ;
--v_delivery.TP_ATTRIBUTE11 := l_wsh_rec.TP_ATTRIBUTE11 ;
--v_delivery.TP_ATTRIBUTE12 := l_wsh_rec.TP_ATTRIBUTE12 ;
--v_delivery.TP_ATTRIBUTE13 := l_wsh_rec.TP_ATTRIBUTE13 ;
--v_delivery.TP_ATTRIBUTE14 := l_wsh_rec.TP_ATTRIBUTE14 ;
--v_delivery.TP_ATTRIBUTE15 := l_wsh_rec.TP_ATTRIBUTE15 ;
--v_delivery.GLOBAL_ATTRIBUTE_CATEGORY := l_wsh_rec.GLOBAL_ATTRIBUTE_CATEGORY ;
--v_delivery.GLOBAL_ATTRIBUTE1 := l_wsh_rec.GLOBAL_ATTRIBUTE1 ;
--v_delivery.GLOBAL_ATTRIBUTE2 := l_wsh_rec.GLOBAL_ATTRIBUTE2 ;
--v_delivery.GLOBAL_ATTRIBUTE3 := l_wsh_rec.GLOBAL_ATTRIBUTE3 ;
--v_delivery.GLOBAL_ATTRIBUTE4 := l_wsh_rec.GLOBAL_ATTRIBUTE4 ;
--v_delivery.GLOBAL_ATTRIBUTE5 := l_wsh_rec.GLOBAL_ATTRIBUTE5 ;
--v_delivery.GLOBAL_ATTRIBUTE6 := l_wsh_rec.GLOBAL_ATTRIBUTE6 ;
--v_delivery.GLOBAL_ATTRIBUTE7 := l_wsh_rec.GLOBAL_ATTRIBUTE7 ;
--v_delivery.GLOBAL_ATTRIBUTE8 := l_wsh_rec.GLOBAL_ATTRIBUTE8 ;
--v_delivery.GLOBAL_ATTRIBUTE9 := l_wsh_rec.GLOBAL_ATTRIBUTE9 ;
--v_delivery.GLOBAL_ATTRIBUTE10 := l_wsh_rec.GLOBAL_ATTRIBUTE10 ;
--v_delivery.GLOBAL_ATTRIBUTE11 := l_wsh_rec.GLOBAL_ATTRIBUTE11 ;
--v_delivery.GLOBAL_ATTRIBUTE12 := l_wsh_rec.GLOBAL_ATTRIBUTE12 ;
--v_delivery.GLOBAL_ATTRIBUTE13 := l_wsh_rec.GLOBAL_ATTRIBUTE13 ;
--v_delivery.GLOBAL_ATTRIBUTE14 := l_wsh_rec.GLOBAL_ATTRIBUTE14 ;
--v_delivery.GLOBAL_ATTRIBUTE15 := l_wsh_rec.GLOBAL_ATTRIBUTE15 ;
--v_delivery.GLOBAL_ATTRIBUTE16 := l_wsh_rec.GLOBAL_ATTRIBUTE16 ;
--v_delivery.GLOBAL_ATTRIBUTE17 := l_wsh_rec.GLOBAL_ATTRIBUTE17 ;
--v_delivery.GLOBAL_ATTRIBUTE18 := l_wsh_rec.GLOBAL_ATTRIBUTE18 ;
--v_delivery.GLOBAL_ATTRIBUTE19 := l_wsh_rec.GLOBAL_ATTRIBUTE19 ;
--v_delivery.GLOBAL_ATTRIBUTE20 := l_wsh_rec.GLOBAL_ATTRIBUTE20 ;
--v_delivery.CREATION_DATE := l_wsh_rec.CREATION_DATE ;
--v_delivery.CREATED_BY := l_wsh_rec.CREATED_BY ;
--v_delivery.LAST_UPDATE_DATE := l_wsh_rec.LAST_UPDATE_DATE ;
--v_delivery.LAST_UPDATED_BY := l_wsh_rec.LAST_UPDATED_BY ;
--v_delivery.LAST_UPDATE_LOGIN := l_wsh_rec.LAST_UPDATE_LOGIN ;
--v_delivery.PROGRAM_APPLICATION_ID := l_wsh_rec.PROGRAM_APPLICATION_ID ;
--v_delivery.PROGRAM_ID := l_wsh_rec.PROGRAM_ID ;
--v_delivery.PROGRAM_UPDATE_DATE := l_wsh_rec.PROGRAM_UPDATE_DATE ;
--v_delivery.REQUEST_ID := l_wsh_rec.REQUEST_ID ;
--v_delivery.BATCH_ID := l_wsh_rec.BATCH_ID ;
--v_delivery.HASH_VALUE := l_wsh_rec.HASH_VALUE ;
--v_delivery.SOURCE_HEADER_ID := l_wsh_rec.SOURCE_HEADER_ID ;
--v_delivery.NUMBER_OF_LPN := l_wsh_rec.NUMBER_OF_LPN ;
--v_delivery.COD_AMOUNT := l_wsh_rec.COD_AMOUNT ;
--v_delivery.COD_CURRENCY_CODE := l_wsh_rec.COD_CURRENCY_CODE ;
--v_delivery.COD_REMIT_TO := l_wsh_rec.COD_REMIT_TO ;
--v_delivery.COD_CHARGE_PAID_BY := l_wsh_rec.COD_CHARGE_PAID_BY ;
--v_delivery.PROBLEM_CONTACT_REFERENCE := l_wsh_rec.PROBLEM_CONTACT_REFERENCE ;
--v_delivery.PORT_OF_LOADING := l_wsh_rec.PORT_OF_LOADING ;
--v_delivery.PORT_OF_DISCHARGE := l_wsh_rec.PORT_OF_DISCHARGE ;
--v_delivery.FTZ_NUMBER := l_wsh_rec.FTZ_NUMBER ;
--v_delivery.ROUTED_EXPORT_TXN := l_wsh_rec.ROUTED_EXPORT_TXN ;
--v_delivery.ENTRY_NUMBER := l_wsh_rec.ENTRY_NUMBER ;
--v_delivery.ROUTING_INSTRUCTIONS := l_wsh_rec.ROUTING_INSTRUCTIONS ;
--v_delivery.IN_BOND_CODE := l_wsh_rec.IN_BOND_CODE ;
--v_delivery.SHIPPING_MARKS := l_wsh_rec.SHIPPING_MARKS ;
--v_delivery.SERVICE_LEVEL := l_wsh_rec.SERVICE_LEVEL ;
--v_delivery.MODE_OF_TRANSPORT := l_wsh_rec.MODE_OF_TRANSPORT ;
--v_delivery.ASSIGNED_TO_FTE_TRIPS := l_wsh_rec.ASSIGNED_TO_FTE_TRIPS ;
--v_delivery.AUTO_SC_EXCLUDE_FLAG := l_wsh_rec.AUTO_SC_EXCLUDE_FLAG ;
--v_delivery.AUTO_AP_EXCLUDE_FLAG := l_wsh_rec.AUTO_AP_EXCLUDE_FLAG ;
--v_delivery.AP_BATCH_ID := l_wsh_rec.AP_BATCH_ID ;
--v_delivery.ROWID := l_wsh_rec.ROWID ;
--v_delivery.LOADING_ORDER_DESC := l_wsh_rec.LOADING_ORDER_DESC ;
--v_delivery.ORGANIZATION_CODE := l_wsh_rec.ORGANIZATION_CODE ;
--v_delivery.ULTIMATE_DROPOFF_LOCATION_CODE := l_wsh_rec.ULTIMATE_DROPOFF_LOCATION_CODE ;
--v_delivery.INITIAL_PICKUP_LOCATION_CODE := l_wsh_rec.INITIAL_PICKUP_LOCATION_CODE ;
--v_delivery.CUSTOMER_NUMBER := l_wsh_rec.CUSTOMER_NUMBER ;
--v_delivery.INTMED_SHIP_TO_LOCATION_CODE := l_wsh_rec.INTMED_SHIP_TO_LOCATION_CODE ;
--v_delivery.POOLED_SHIP_TO_LOCATION_CODE := l_wsh_rec.POOLED_SHIP_TO_LOCATION_CODE ;
--v_delivery.CARRIER_CODE := l_wsh_rec.CARRIER_CODE ;
--v_delivery.SHIP_METHOD_NAME := l_wsh_rec.SHIP_METHOD_NAME ;
--v_delivery.MS_NAME := l_wsh_rec.MS_NAME ;
--v_delivery.FOB_NAME := l_wsh_rec.FOB_NAME ;
--v_delivery.FOB_LOCATION_CODE := l_wsh_rec.FOB_LOCATION_CODE ;
--v_delivery.WEIGHT_UOM_DESC := l_wsh_rec.WEIGHT_UOM_DESC ;
--v_delivery.VOLUME_UOM_DESC := l_wsh_rec.VOLUME_UOM_DESC ;
--v_delivery.CURRENCY_NAME := l_wsh_rec.CURRENCY_NAME ;
--v_delivery.SHIPMENT_DIRECTION := l_wsh_rec.SHIPMENT_DIRECTION ;
--v_delivery.VENDOR_ID := l_wsh_rec.VENDOR_ID ;
--v_delivery.PARTY_ID := l_wsh_rec.PARTY_ID ;
--v_delivery.ROUTING_RESPONSE_ID := l_wsh_rec.ROUTING_RESPONSE_ID ;
--v_delivery.RCV_SHIPMENT_HEADER_ID := l_wsh_rec.RCV_SHIPMENT_HEADER_ID ;
--v_delivery.ASN_SHIPMENT_HEADER_ID := l_wsh_rec.ASN_SHIPMENT_HEADER_ID ;
--v_delivery.SHIPPING_CONTROL := l_wsh_rec.SHIPPING_CONTROL ;
--v_delivery.TP_DELIVERY_NUMBER := l_wsh_rec.TP_DELIVERY_NUMBER ;
--v_delivery.EARLIEST_PICKUP_DATE := l_wsh_rec.EARLIEST_PICKUP_DATE ;
--v_delivery.LATEST_PICKUP_DATE := l_wsh_rec.LATEST_PICKUP_DATE ;
--v_delivery.EARLIEST_DROPOFF_DATE := l_wsh_rec.EARLIEST_DROPOFF_DATE ;
--v_delivery.LATEST_DROPOFF_DATE := l_wsh_rec.LATEST_DROPOFF_DATE ;
--v_delivery.IGNORE_FOR_PLANNING := l_wsh_rec.IGNORE_FOR_PLANNING ;
--v_delivery.TP_PLAN_NAME := l_wsh_rec.TP_PLAN_NAME ;
--v_delivery.wv_frozen_flag := l_wsh_rec.wv_frozen_flag ;
--v_delivery.hash_string := l_wsh_rec.hash_string ;
--v_delivery.delivered_date := l_wsh_rec.delivered_date ;
--v_delivery.packing_slip := l_wsh_rec.packing_slip ;
--v_delivery.REASON_OF_TRANSPORT := l_wsh_rec.REASON_OF_TRANSPORT ;
--v_delivery.DESCRIPTION := l_wsh_rec.DESCRIPTION ;
--v_delivery.PRORATE_WT_FLAG := l_wsh_rec.PRORATE_WT_FLAG ;
--v_delivery.TMS_INTERFACE_FLAG := l_wsh_rec.TMS_INTERFACE_FLAG ;
--v_delivery.TMS_VERSION_NUMBER := l_wsh_rec.TMS_VERSION_NUMBER ;
--v_delivery.attribute1 := 'Y';
v_delivery_name := NULL;
DBMS_OUTPUT.put_line ('Replay Start:' v_return_status);
--commit;
/* WSH_NEW_DELIVERIES_PVT.Create_Delivery(p_delivery_info => v_delivery,
x_rowid => v_rowid,
x_delivery_id => x_delivery_id ,
x_name => v_name ,
x_return_status => v_return_status
) ;*/
/*WSH_NEW_DELIVERIES_PVT.Delete_Delivery
( p_delivery_id => 278710043 ,
x_return_status =>v_return_status,
p_validate_flag => 'Y'
) ;*/
DBMS_OUTPUT.put_line ('Replay Start:' v_return_status);
wsh_deliveries_pub.create_update_delivery
(p_api_version_number => v_api_version_number,
p_init_msg_list => v_init_msg_list,
x_return_status => v_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_action_code => 'CREATE',
p_delivery_info => v_delivery,
p_delivery_name => v_delivery_name,
x_delivery_id => x_delivery_id,
x_name => v_name
);
DBMS_OUTPUT.put_line ( 'DO CREATED PROBLEM:'
v_return_status
':'
x_delivery_id
);
COMMIT;
v_delivery_details (1) := 10915608; --Delivery Detail id from WDD table
v_delivery_id := 278742043;
wsh_delivery_details_pub.detail_to_delivery
(p_api_version => v_api_version_number,
p_init_msg_list => v_init_msg_list,
p_commit => fnd_api.g_true,
p_validation_level => v_validation_level,
x_return_status => v_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_tabofdeldets => v_delivery_details,
p_action => 'ASSIGN',
p_delivery_id => v_delivery_id
);
IF v_return_status = wsh_util_core.g_ret_sts_success
THEN
DBMS_OUTPUT.put_line ('DO DETAILS CREATED SUCCESSFULLY');
END IF;
IF (v_return_status <> wsh_util_core.g_ret_sts_success)
THEN
DBMS_OUTPUT.put_line ('DO CREATED PROBLEM');
IF (fnd_msg_pub.count_msg > 1)
THEN
FOR j IN 1 .. fnd_msg_pub.count_msg
LOOP
fnd_msg_pub.get (p_msg_index => j,
p_encoded => 'F',
p_data => x_msg_data,
p_msg_index_out => lx_msg_index_out
);
DBMS_OUTPUT.put_line ('DO CREATED PROBLEM' x_msg_data);
/* INSERT INTO ncr_nz_oe_error_msg
VALUES (ncr_nz_oe_error_msg_s.NEXTVAL, SYSDATE,
'ORDER Line CREATION bERROR1', h_oe.header_id,
'ORA-10000', x_msg_data);*/
END LOOP;
END IF;
ELSE
COMMIT;
END IF;
IF v_return_status = wsh_util_core.g_ret_sts_success
THEN
DBMS_OUTPUT.put_line ('DO CREATED SUCCESSFULLY');
END IF;
DBMS_OUTPUT.put_line ('Replay End');
END;
No comments:
Post a Comment