ABERTURA E FECHAMENTO DE CAIXA

Delphi

23/02/2015

Boa noite!

estou com dificuldades em entender como faço para fazer a abertura de caixa?
Jander Sales

Jander Sales

Curtidas 0

Respostas

Thiago Santana

Thiago Santana

23/02/2015

Boa noite!

estou com dificuldades em entender como faço para fazer a abertura de caixa?


Qual a sua dúvida específica Jander? Detalhe mais seu problema!
GOSTEI 0
Jander Sales

Jander Sales

23/02/2015

nas tabelas e codigos!
tipo criei uma tabela sql:

ABERTURACAIXA
SALDOINICIAL
DATA
STATUS

FECHAMENTOCAIXA
SALDOINCIAL
SALDOFINAL
DATA

Estou com dificuldades com relação ao codigo fonte de como faço para:
se tabela estiver status fechado não fazer lançamentos.
GOSTEI 0
Ricardo

Ricardo

23/02/2015

Se tiver dificuldades em implementar, poste o seu código assim eu ou outra pessoa mostra o que fazer. Porém basta você usar a lógica:

Antes de tudo você verifica se o caixa está aberto ou não

if tabela.filedbyname('campo').as... = 'fechado' then
abort;

Daqui pra frente segue seu código normalmente, pois se a consulta acima for verdadeira o sistema vai parar por aí mesmo, ou seja, no abort.
GOSTEI 0
POSTAR