sábado, 28 de março de 2015

Windev Pedido Memoria + Grafico

Windev Pedido Memoria + Grafico

Nesses passos vou mostrar como se faz um cadastro de pedido em memoria com tabela  para ir mostrando os itens do pedido e mais um grafico no final de cada digitacao.

Crie uma window

Dentro da window , crie uma Table (Tabela)

Table
   Fill the table control by programming

   Marque Editable table para poder alterar
 
      Altere as colunas com o seguinte:
        Codigo,Descricao,Quantidade,Unitario,Total

Nome tabela sera : table_pedido

Coloque em cima da tabela os campos que serao digitados, no caso dos edt e coloque os nomes neles

Criar uma Procedure para somar os valores da tabela num totalValor

Procedure
   SOMATABELAVALOR
=====================================
PROCEDURE SomaTabelaValor()
// zera total
EDT_TotalVenda=0
//Percorre toda tabela para somar totais
FOR ALL ROW OF TABLE_PEDIDO
   EDT_TotalVenda+=TABLE_PEDIDO.COL_total
END
=====================================
No campo em que digite o valor unitario, botao direito e code
================== digite abaixo====
//Calcula Total
EDT_TOTAL=EDT_QUANTIDADE*EDT_UNITARIO 
// Adiciona na Tabela
TableAddLine(TABLE_PEDIDO,EDT_CODIGO,EDT_DESCRICAO,EDT_QUANTIDADE,EDT_UNITARIO,EDT_TOTAL) 
//Limpar Campos
EDT_CODIGO=0
EDT_DESCRICAO=""
EDT_QUANTIDADE=0
EDT_TOTAL=0
EDT_UNITARIO=0
// Busca procedure para somar
SomaTabelaValor()

grDraw(CHART_pedido)   // Mostra pedido

ReturnToCapture(EDT_CODIGO)
===========================
crie um botao excluir e coloque o seguinte
=====
TableDelete(TABLE_PEDIDO)
SomaTabelaValor()
===========
crie um bota altere e coloque o seguinte:
====
EDT_CODIGO=TABLE_PEDIDO.COL_codigo
EDT_DESCRICAO=TABLE_PEDIDO.COL_descricao
EDT_QUANTIDADE=TABLE_PEDIDO.COL_quantidade
EDT_UNITARIO=TABLE_PEDIDO.COL_valor_venda
EDT_TOTAL=TABLE_PEDIDO.COL_total
TableDelete(TABLE_PEDIDO)
SomaTabelaValor()
ReturnToCapture(EDT_CODIGO)
====
vamos criar o grafico agora
va em creation
   chart
      escolha o grafico
        sera por tabela
         escolha descricao e valor total 
===
Pronto abaixo as telas de como eu fiz
==




































Nenhum comentário:

Postar um comentário

Teste

Teste
teste