[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* procedure name: UUpdate_Logistics_Line */
/* description */
/* : This is a private API, whose main functionality is to update product*/
/* transaction line, interface with OM and progress product trxn line */
/* status through BOOKED status. Once all validations are done it will */
/* private API Update_PRoduct_Txn which will continue to do some more */
/* more validations before actually perfoming user intended action. */
/* Note: */
/* Contract_Line_Id from CSD_Product_Txns_v is assigned to contract_id */
/* in l_Product_Txn_Rec */
/* Parameters */
/* p_api_version IN Standard API paramater */
/* p_commit IN Standard API paramater */
/* p_init_msg_list IN Standard API paramater */
/* x_return_status OUT Standard API paramater */
/* x_msg_count OUT Standard API paramater */
/* x_msg_data OUT Standard API paramater */
/* p_UpdateProductTrxn_Rec IN user input values are stored in this record */
/* X_Product_Txn_Rec OUT database values are stored in this record */
/*---------------------------------------------------------------------------*/
procedure Update_Logistics_Line(p_api_version IN NUMBER,
p_commit IN VARCHAR2,
p_init_msg_list IN VARCHAR2,
p_validation_level IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_Upd_ProdTxn_Rec IN CSD_LOGISTICS_PUB.Upd_ProdTxn_Rec_Type,
x_object_version_number OUT NOCOPY NUMBER,
x_order_header_id OUT NOCOPY NUMBER,
x_order_line_id OUT NOCOPY NUMBER ) IS
-- Define local constants
C_API_NAME CONSTANT VARCHAR2(30) := 'Update_Logistics_Line';
SELECT A.Product_Transaction_Id,
A.Action_Type,
A.Action_Code,
A.Inventory_Item_Id,
A.Txn_Billing_Type_Id,
A.Price_List_Header_ID,
ABS(A.Estimate_Quantity),
A.Revision,
A.source_Serial_Number,
A.non_source_Serial_Number,
A.Lot_Number,
A.Sub_Inventory,
A.Return_Reason_Code,
A.Return_By_Date,
A.PO_Number,
A.Invoice_To_Org_Id,
A.Ship_To_Org_Id,
A.Unit_Of_Measure,
A.Charge,
A.No_Charge_Flag,
A.New_Order_Flag,
A.Object_Version_Number,
A.Transaction_Status,
A.Interface_To_OM_Flag,
A.Book_Sales_Order_flag,
A.Status,
A.Release_Sales_Order_Flag,
A.Ship_Sales_Order_Flag,
A.Order_Header_Id,
A.Order_Line_Id,
A.Repair_Line_Id,
A.Order_Number,
A.Estimate_Detail_Id,
A.Contract_Line_Id,
A.Business_Process_id,
B.incident_id,
A.Reference_Number,
A.picking_rule_id,
A.inventory_org_id -- bug#13114174
FROM CSD_Product_Txns_v A, CSD_REPAIRS B
WHERE A.REPAIR_LINE_ID = B.REPAIR_LINE_ID
AND Product_Transaction_Id =
p_Upd_ProdTxn_Rec.Product_Transaction_Id;
SELECT dra.Repair_NUMBER, fndl2.meaning Status_Meaning
FROM Csd_Repairs dra, fnd_lookups fndl2
WHERE dra.status = fndl2.lookup_code
and fndl2.lookup_type = 'CSD_REPAIR_STATUS'
and dra.repair_line_id = p_Repair_line_id;
SELECT currency_code
FROM qp_list_headers_b
WHERE list_header_id = p_price_list_id;
debug('Entered update_logistics_line pvt');
SAVEPOINT Update_Logistics_Line_Pvt;
CSD_LOGISTICS_PVT.Update_product_txn(p_api_version => 1.0,
p_commit => fnd_api.g_false,
p_init_msg_list => fnd_api.g_false,
p_validation_level => fnd_api.g_valid_level_full,
x_product_txn_rec => l_Product_Txn_Rec,
x_return_status => x_Return_Status,
x_msg_count => x_Msg_Count,
x_msg_data => x_Msg_Data);
ROLLBACK TO Update_Logistics_Line_pvt;
ROLLBACK TO Update_Logistics_Line_pvt;
ROLLBACK TO Update_Logistics_Line_pvt;
END Update_Logistics_Line;
/* procedure name: update_product_txn */
/* description : procedure to update product txn lines.It is */
/* called from update_logistics_line API */
/* This is different from the process_pvt api */
/* in the sense that this does not commit if */
/* something fails (booking or release). */
/*----------------------------------------------------------------*/
PROCEDURE update_product_txn(p_api_version IN NUMBER,
p_commit IN VARCHAR2,
p_init_msg_list IN VARCHAR2,
p_validation_level IN NUMBER,
x_product_txn_rec IN OUT NOCOPY CSD_PROCESS_PVT.PRODUCT_TXN_REC,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PRODUCT_TXN';
l_mod_name varchar2(2000) := 'csd.plsql.csd_logistics_pvt.update_product_txn';
SAVEPOINT UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
rollback to UPDATE_PRODUCT_TXN_PVT;
END update_product_txn;