The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ITEM_TECHNICAL_DATA
(
p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
, p_commit IN VARCHAR2 := FND_API.G_FALSE
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_header_rec IN OUT NOCOPY technical_data_hdr_rec
, p_dtl_tbl IN technical_data_dtl_tab
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Item_Technical_Data';
SELECT data_type
FROM gmd_tech_parameters_b
WHERE tech_parm_id = l_tech_parm_id
AND (organization_id = l_orgn_id OR organization_id IS NULL);
SAVEPOINT Insert_Item_Tech_Data_PUB; /* Changed in Bug No.7489645*/
, p_operation => 'INSERT'
, x_return_status => l_return_status
);
GMD_ITEM_TECHNICAL_DATA_PVT.INSERT_ITEM_TECHNICAL_DATA_HDR
( p_api_version => p_api_version
, p_init_msg_list => p_init_msg_list
, p_commit => p_commit
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, x_tech_data_id => p_header_rec.Tech_Data_Id
, p_organization_id => p_header_rec.Organization_Id
, p_inventory_item_id => p_header_rec.Inventory_Item_Id
, p_lot_no => p_header_rec.Lot_Number
, p_lot_organization_id => p_header_rec.Lot_Organization_Id
, p_formula_id => p_header_rec.Formula_Id
, p_batch_id => p_header_rec.Batch_Id
, p_delete_mark => 0
, p_text_code => p_header_rec.Text_Code
, p_creation_date => SYSDATE
, p_created_by => FND_GLOBAL.USER_ID
, p_last_update_date => SYSDATE
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_last_update_login => FND_GLOBAL.LOGIN_ID
);
GMD_ITEM_TECHNICAL_DATA_PVT.INSERT_ITEM_TECHNICAL_DATA_DTL
( p_api_version => p_api_version
, p_init_msg_list => p_init_msg_list
, p_commit => p_commit
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, x_tech_data_id => p_header_rec.Tech_Data_Id
, x_tech_parm_id => l_tech_parm_id
, p_sort_seq => l_sort_seq
, p_text_data => l_text_data
, p_num_data => l_num_data
, p_boolean_data => l_bool_data
, p_text_code => p_header_rec.text_code
, p_creation_date => SYSDATE
, p_created_by => FND_GLOBAL.USER_ID
, p_last_update_date => SYSDATE
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_last_update_login => FND_GLOBAL.LOGIN_ID
);
ROLLBACK TO Insert_Item_Tech_Data_PUB;
ROLLBACK TO Insert_Item_Tech_Data_PUB;
ROLLBACK TO Insert_Item_Tech_Data_PUB;
END INSERT_ITEM_TECHNICAL_DATA;
PROCEDURE UPDATE_ITEM_TECHNICAL_DATA
(
p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
, p_commit IN VARCHAR2 := FND_API.G_FALSE
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_tech_data_id IN NUMBER
, p_dtl_tbl IN technical_data_dtl_tab
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Item_Technical_Data';
SELECT data_type
FROM gmd_tech_parameters_b
WHERE tech_parm_id = l_tech_parm_id
AND (organization_id = l_orgn_id OR organization_id IS NULL);
SELECT organization_id
FROM gmd_technical_data_hdr
WHERE tech_data_id = p_tech_data_id;
SAVEPOINT Update_Item_Technical_Data;
, p_operation => 'UPDATE'
, x_return_status => l_return_status
);
GMD_ITEM_TECHNICAL_DATA_PVT.UPDATE_ITEM_TECHNICAL_DATA
( p_api_version => p_api_version
, p_init_msg_list => p_init_msg_list
, p_commit => p_commit
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_tech_data_id => p_tech_data_id
, x_tech_parm_id => l_tech_parm_id
, p_sort_seq => l_sort_seq
, p_text_data => l_text_data
, p_num_data => l_num_data
, p_boolean_data => l_bool_data
, p_text_code => l_text_code
, p_last_update_date => SYSDATE
, p_last_updated_by => FND_GLOBAL.USER_ID
, p_last_update_login => FND_GLOBAL.LOGIN_ID
);
ROLLBACK TO Update_Item_Tech_Data;
ROLLBACK TO Update_Item_Tech_Data;
ROLLBACK TO Update_Item_Tech_Data;
END UPDATE_ITEM_TECHNICAL_DATA;
PROCEDURE DELETE_ITEM_TECHNICAL_DATA
(
p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
, p_commit IN VARCHAR2 := FND_API.G_FALSE
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_tech_data_id IN NUMBER
)IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Item_Technical_Data';
SAVEPOINT Delete_Item_Technical_Data;
GMD_ITEM_TECHNICAL_DATA_PVT.DELETE_ITEM_TECHNICAL_DATA
( p_api_version => p_api_version
, p_init_msg_list => FND_API.G_FALSE
, p_commit => FND_API.G_FALSE
, x_return_status => x_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_tech_data_id => p_tech_data_id
);
ROLLBACK TO Delete_Item_Tech_Data;
ROLLBACK TO Delete_Item_Tech_Data;
ROLLBACK TO Delete_Item_Tech_Data;
END DELETE_ITEM_TECHNICAL_DATA;
SELECT 1
FROM org_access_view org, gmd_parameters_hdr p
WHERE org.organization_id = p.organization_id
AND p.organization_id = l_orgn_id
AND p.lab_ind = 1;
SELECT 1
FROM mtl_system_items
WHERE inventory_item_id = l_item_id
AND SYSDATE BETWEEN NVL(START_DATE_ACTIVE,SYSDATE) AND NVL(END_DATE_ACTIVE,SYSDATE)
AND SERIAL_NUMBER_CONTROL_CODE = 1;
SELECT 1
FROM mtl_lot_numbers
WHERE organization_id = l_lot_orgn_id
AND inventory_item_id = l_item_id
AND lot_number = l_lot_no;
SELECT a.formula_id
FROM fm_form_mst a, fm_matl_dtl b
WHERE b.inventory_item_id = l_item_id
AND a.formula_id = b.formula_id
AND a.formula_id <> 0
AND b.line_type = 1
AND a.delete_mark =0
AND a.formula_id = l_form_id;