SP

create or replace procedure "SP_INV_CREATE_BOM_ART"(p_nombre IN VARCHAR2, p_art_id IN NUMBER, p_mat_id IN NUMBER, p_cant IN NUMBER)
is
    l_articulo INV_ARTICULOS%rowtype;
    l_bom_count NUMBER;
begin
    SELECT * INTO l_articulo FROM INV_ARTICULOS WHERE ID = p_art_id;
    SELECT COUNT(*) INTO l_bom_count FROM INV_ARTICULOS WHERE CODIGO LIKE l_articulo.CODIGO || '-B%';
    -- Crear el Nuevo Articulo
    INSERT INTO INV_ARTICULOS (NOMBRE, CODIGO, LINEA_ID, UNIDAD_ID, IVA) VALUES (p_nombre, l_articulo.CODIGO || '-B' || l_bom_count, l_articulo.LINEA_ID, l_articulo.UNIDAD_ID, l_articulo.IVA);
    -- Crear el BOM
    INSERT INTO INV_BOM (ARTICULO_ID, MATERIAL_ID, CANT) VALUES (p_art_id, p_mat_id, p_cant);
end;