Controle de estoque

Disponível somente no TrabalhosFeitos
  • Páginas : 6 (1329 palavras )
  • Download(s) : 0
  • Publicado : 28 de novembro de 2012
Ler documento completo
Amostra do texto
Sistema de Controle de Estoque

Componentes no Desenvolvimento do Sistema • Rodrigo Cardozo • João Wellington • Raniere Lourenço • André Luis Turma: ADS-12 Disciplina: Sistemas Paralelos Distribuídos

Tecnologia Empregada
• Utilização do Sistema no Sistema Operacional Windows Servem com a linguagem Delphi, acesso a base de dados em SQL Server, os relatórios podendo ser exportado para oExcel e outras plataformas.

Objetivos
Efetuar o controle de entrada e saída de mercadorias no estoque de uma empresa. Através das seguintes funções gerais: • Cadastro de Produto: consiste nas operações de inclusão,alteração, consulta e exclusão de um produto. • Movimentação: Consiste nas operações de entrada e saída de um produto no estoque. • Reajuste de preço: consiste na alteração de preçode um ou mais produtos do estoque. • Relatórios: Lista de preços, Balanço Físico/Financeiro, Entrada e Saída do estoque.

Descrição do Sistema
Toda empresa de comércio, possui um estoque, no qual armazena os seus produtos. O controle eficiente do estoque permite que a empresa tenha um planejamento melhor de suas compras, na medida em que tem condições de saber quanto tem de cada produto,sabendo assim, quanto deverá comprar para repor suas necessidades e atender bem a demanda de seus clientes.

Descrição do Sistema
O controle de estoque é feito através da autorização das quantidades disponíveis de cada um dos itens do estoque. Isso é feito através de um levantamento de todos os produtos com os quais a empresa trabalha. Após o levantamento, todos os produtos serão cadastrado nosistema (operações de inclusão, alteração, consulta e exclusão de produtos), para que a partir desse momento, o sistema reflita exatamente o que existe no estoque da empresa.

Para o comerciante, existem dois relatórios básicos: • Lista de Preço: um relação de todos os produtos do estoque, constando do preço de cada um dos deles e a unidade medida. • Balanço Físico/Financeiro: um relação de todosos produtos de estoque, constando da quantidade disponível de cada um dos produtos, o valor total de cada um dos produtos e o valor total do estoque.

Descrição do Sistema
• O sistema oferecer uma interface com o usuário simples, baseado em menus, com diálogos explicativos.
• O programa foi desenvolvido com o uso de subprogramas(procedures e functions).

Tabelas - SQL

Tabelas –SQL[Script]
• CREATE TABLE PRODUTOS ( Codigo int not null identity (1,1) primary key, Nome varchar(100), Preco float, Unidade vachar(10), Quant int )

Tabelas – SQL[Script]
• CREATE TABLE ENTRADA ( Codigo int not null identity (1,1) primary key, Codigo_Produto int, Descricao_Produto varchar(50), Quant_Entrada int, Data_Entrada VARCHAR(20), foreign key (codigo_produto) references PRODUTO (Codigo), ) Tabelas – SQL[Script]
• CREATE TABLE SAIDA ( Codigo int not null identity (1,1) primary key, Codigo_Produto int, Descricao_Produto varchar(50), Quant_Saida int, Data_Saida VARCHAR(20), foreign key (codigo_produto) references PRODUTO (Codigo), )

Layouts – Menu Principal

Layouts – Cadastro de Produtos

Layouts – Cadastro de Produtos

Layouts – Cadastro de Produtos[Botão Salvar]If lblstatus.Caption = 'Incluindo' then begin If(MessageBox(Handle, pchar('Deseja Salvar?'), pchar('Salvar'), MB_YESNO + MB_ICONQUESTION)= mrYes) then begin qryExecute.Close; qryExecute.SQL.Add('INSERT INTO PRODUTOS (NOME,UNIDADE,PRECO,QUANT) VALUES '); qryExecute.SQL.Add('(:NOME,:UNIDADE,:PRECO,:QUANTIDADE)'); qryExecute.ParamByName('NOME').AsString := edtNome.Text;qryExecute.ParamByName('UNIDADE').AsString := cbbUnidade.Text; qryExecute.ParamByName('PRECO').AsFloat := StrToFloat(edtPreco.Text); qryExecute.ParamByName('QUANTIDADE').AsInteger := StrToint(edtQuantidade.Text); qryExecute.ExecSQL(); cdsDados.Close; cdsDados.Open; Application.MessageBox('Produto Salvo Com Sucesso!','ATENÇÃO',MB_ICONEXCLAMATION); end;

Layouts – Cadastro de Produtos[Botão Salvar]
If lblstatus.Caption =...
tracking img