The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Pre_Insert IS
BEGIN
null;
END Pre_Insert;
PROCEDURE Insert_Row (X_row_id IN OUT NOCOPY VARCHAR2,
X_inventory_item_id IN NUMBER,
X_organization_id IN NUMBER,
X_wip_entity_id IN NUMBER,
X_operation_seq_num IN NUMBER,
X_repetitive_schedule_id IN NUMBER,
X_last_update_date IN DATE,
X_last_updated_by IN NUMBER,
X_creation_date IN DATE,
X_created_by IN NUMBER,
X_last_update_login IN NUMBER,
X_department_id IN NUMBER,
X_wip_supply_type IN NUMBER,
X_date_required IN DATE,
X_required_quantity IN NUMBER,
X_quantity_issued IN NUMBER,
X_quantity_per_assembly IN NUMBER,
X_comments IN VARCHAR2,
X_supply_subinventory IN VARCHAR2,
X_supply_locator_id IN NUMBER,
X_mrp_net_flag IN NUMBER,
X_mps_required_quantity IN NUMBER,
X_mps_date_required IN DATE,
X_attribute_category IN VARCHAR2,
X_attribute1 IN VARCHAR2,
X_attribute2 IN VARCHAR2,
X_attribute3 IN VARCHAR2,
X_attribute4 IN VARCHAR2,
X_attribute5 IN VARCHAR2,
X_attribute6 IN VARCHAR2,
X_attribute7 IN VARCHAR2,
X_attribute8 IN VARCHAR2,
X_attribute9 IN VARCHAR2,
X_attribute10 IN VARCHAR2,
X_attribute11 IN VARCHAR2,
X_attribute12 IN VARCHAR2,
X_attribute13 IN VARCHAR2,
X_attribute14 IN VARCHAR2,
X_attribute15 IN VARCHAR2,
X_auto_request_material IN VARCHAR2,
X_L_EAM_MAT_REC OUT NOCOPY EAM_PROCESS_WO_PUB.eam_mat_req_rec_type,
X_material_shortage_flag OUT NOCOPY VARCHAR2,
X_material_shortage_check_date OUT NOCOPY DATE
) IS
l_return_status VARCHAR2(30) := '';
SELECT rowid
FROM WIP_REQUIREMENT_OPERATIONS
WHERE inventory_item_id = X_inventory_item_id
AND organization_id = X_organization_id
AND wip_entity_id = X_wip_entity_id
AND operation_seq_num = X_operation_seq_num;
l_eam_mat_req_rec.program_update_date := sysdate;
, p_debug_filename => 'insertmrthb.log'
, p_output_dir => l_output_dir
, p_debug_file_mode => 'w'
);
END Insert_Row;
PROCEDURE Update_Row (X_row_id IN VARCHAR2,
X_inventory_item_id IN NUMBER,
X_organization_id IN NUMBER,
X_wip_entity_id IN NUMBER,
X_operation_seq_num IN NUMBER,
X_repetitive_schedule_id IN NUMBER,
X_last_update_date IN DATE,
X_last_updated_by IN NUMBER,
X_last_update_login IN NUMBER,
X_department_id IN NUMBER,
X_wip_supply_type IN NUMBER,
X_date_required IN DATE,
X_required_quantity IN NUMBER,
X_quantity_issued IN NUMBER,
X_quantity_per_assembly IN NUMBER,
X_comments IN VARCHAR2,
X_supply_subinventory IN VARCHAR2,
X_supply_locator_id IN NUMBER,
X_mrp_net_flag IN NUMBER,
X_mps_required_quantity IN NUMBER,
X_mps_date_required IN DATE,
X_attribute_category IN VARCHAR2,
X_attribute1 IN VARCHAR2,
X_attribute2 IN VARCHAR2,
X_attribute3 IN VARCHAR2,
X_attribute4 IN VARCHAR2,
X_attribute5 IN VARCHAR2,
X_attribute6 IN VARCHAR2,
X_attribute7 IN VARCHAR2,
X_attribute8 IN VARCHAR2,
X_attribute9 IN VARCHAR2,
X_attribute10 IN VARCHAR2,
X_attribute11 IN VARCHAR2,
X_attribute12 IN VARCHAR2,
X_attribute13 IN VARCHAR2,
X_attribute14 IN VARCHAR2,
X_attribute15 IN VARCHAR2,
X_auto_request_material IN VARCHAR2,
X_L_EAM_MAT_REC OUT NOCOPY EAM_PROCESS_WO_PUB.eam_mat_req_rec_type,
X_material_shortage_flag OUT NOCOPY VARCHAR2,
X_material_shortage_check_date OUT NOCOPY DATE
)IS
l_return_status VARCHAR2(30) := '';
l_eam_mat_req_rec.program_update_date := sysdate;
l_eam_mat_req_rec.transaction_type := EAM_PROCESS_WO_PVT.G_OPR_UPDATE;
, p_debug_filename => 'updatemrthb.log'
, p_output_dir => l_output_dir
, p_debug_file_mode => 'w'
);
END Update_Row;
SELECT *
FROM WIP_REQUIREMENT_OPERATIONS
WHERE rowid = X_row_id
FOR UPDATE of Wip_Entity_Id NOWAIT;
FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
PROCEDURE Delete_Row(X_row_id IN VARCHAR2,
X_material_shortage_flag OUT NOCOPY VARCHAR2,
X_material_shortage_check_date OUT NOCOPY DATE) IS
l_wip_entity_id NUMBER := 0;
SELECT wip_entity_id, organization_id, operation_seq_num, inventory_item_id
INTO l_wip_entity_id, l_org_id, l_operation_seq_num, l_inventory_item_id
FROM WIP_REQUIREMENT_OPERATIONS
WHERE rowid = X_row_id;
l_eam_mat_req_rec.transaction_type := EAM_PROCESS_WO_PVT.G_OPR_DELETE;
END Delete_Row;
PROCEDURE Delete_Row_SS(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_validate_only IN VARCHAR2,
p_record_version_number IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_inventory_item_id IN NUMBER,
p_organization_id IN NUMBER,
p_wip_entity_id IN NUMBER,
p_operation_seq_num IN NUMBER) IS
l_material VARCHAR2(40);
SELECT 1
FROM MTL_MATERIAL_TRANSACTIONS_TEMP
WHERE operation_seq_num = p_operation_seq_num
AND inventory_item_id = p_inventory_item_id
AND transaction_source_id = p_wip_entity_id
AND organization_id = p_organization_id
AND process_flag <> 'N'
AND posting_flag <> 'N';
SELECT 1
FROM MTL_MATERIAL_TRANSACTIONS
WHERE operation_seq_num = p_operation_seq_num
AND inventory_item_id = p_inventory_item_id
AND transaction_source_id = p_wip_entity_id
AND organization_id = p_organization_id; */
SAVEPOINT delete_row_ss;
l_eam_mat_req_rec.transaction_type := EAM_PROCESS_WO_PUB.G_OPR_DELETE;
DELETE FROM WIP_REQUIREMENT_OPERATIONS
WHERE wip_entity_id = p_wip_entity_id
and organization_id = p_organization_id
and inventory_item_id = p_inventory_item_id
and operation_seq_num = p_operation_seq_num; */
ROLLBACK TO delete_row_ss;
ROLLBACK TO delete_row_ss;
ROLLBACK TO delete_row_ss;
END Delete_Row_SS;
PROCEDURE Delete_Desc_Row_SS(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_validate_only IN VARCHAR2,
p_record_version_number IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_di_sequence_id IN NUMBER,
p_organization_id IN NUMBER,
p_wip_entity_id IN NUMBER,
p_operation_seq_num IN NUMBER) IS
l_material VARCHAR2(40);
SAVEPOINT delete_desc_row_ss;
l_eam_direct_item_rec.transaction_type := EAM_PROCESS_WO_PUB.G_OPR_DELETE;
ROLLBACK TO delete_desc_row_ss;
ROLLBACK TO delete_desc_row_ss;
ROLLBACK TO delete_desc_row_ss;
END Delete_Desc_Row_SS;