Atps - banco de dados
Por: claaudiana • 13/5/2015 • Monografia • 440 Palavras (2 Páginas) • 235 Visualizações
delimiter $$
drop procedure if exists produto $$
create procedure produto (idcod_produto int,nome_produto varchar(40),uni_produto varchar(100),
preco_custo varchar(10),preco_venda varchar(10);
main: begin
if (idcod_produto='') then
select 'preencha o campo codigo do produto' as msg, 'erro no codigo do produto';
leave main;
end if;
if (nome_produto='') then
select 'preencha o campo nome_produto' as msg, 'erro no nome do produto';
leave main;
end if;
if (uni_produto='') then
select 'preencha o campo uni_produto' as msg, 'erro no codigo do produto';
leave main;
end if;
if (preco_custo='') then
select 'preencha o campo preco_custo' as msg, 'erro no preco_custo';
leave main;
end if;
if (preco_venda='') then
select 'preencha o campo preco_venda' as msg, 'erro no preco_venda';
leave main;
end if;
insert into produto (idcod_produto,nome_produto,uni_produto,preco_custo,preco_venda);
select into 'produto cadastrado com sucesso' as msg;
end $$
delimiter ;
delimiter $$
drop procedure if exists movimentacao $$
create procedure movimentacao (idcod_movimentacao int,idcod_produto int, data_movimen data,
hora_movimen time, valor_recebido varchar(10);
main: begin
if (idcod_movimentacao='') then
select 'preencha o campo codigo da movimentacao' as msg, 'erro no codigo da movimentacao';
leave main;
end if;
if (idcod_produto='') then
select 'preencha o campo codigo do produto' as msg, 'erro no codigo do produto';
leave main;
end if;
if (data_movimen='') then
select 'preencha o campo data de movimentacao' as msg, 'erro na data de movimentacao';
leave main;
end if;
if (hora_movimen='') then
select 'preencha o campo hora da movimentacao' as msg, 'erro na hora da movimentacao';
leave main;
end if;
if (valor_recebido='') then
select 'preencha o campo valor recebido' as msg, 'erro no valor recebido';
leave main;
end if;
insert into movimentacao (idcod_movimentacao, idcod_produto, data_movimen,
hora_movimen, valor_recebido;
select into 'movimentacao cadastrado com sucesso' as msg;
end $$
delimiter ;
delimiter $$
drop procedure if exists saida $$
create procedure saida (idcod_saida int, idcod_produto int, quant_vendida varchar (45),valor_total varchar(10), total_venda varchar (100);
main: begin
if (idcod_saida='') then
select 'preencha o campo codigo dde saida' as msg, 'erro no codigo de saida';
leave main;
end if;
if (idcod_produto='') then
select 'preencha o campo codigo do produto' as msg, 'erro no codigo do produto';
leave main;
end if;
if (quant_vendida='') then
select 'preencha o campo quantidade vendida' as msg, 'erro na quantidade vendida';
leave main;
end if;
if (valor_total='') then
select 'preencha o campo valor total' as msg, 'erro no valor total';
leave main;
end if;
if (total_venda='') then
...