Contar servi�os no m�s e liberar no pr�ximo...

Question

Salve galera.... Meu problema �: Tenho que liberar para um determinado cliente uma quantidade de itens por m�s, por exemplo: O cliente pode pegar sem pagar nada na minha barraquinha de pipocas todos o...

Edilcimar · Answer

em princ�pio o cliente vai pegar 2 pipocas, mas no m�s seguinte para pegar mais 2 pipocas deve ter pago as anteriores, caso contr�rio vc n�o deveria deixar ele pegar nada, portanto basta criar um campo �saldo� onde vc colocaria a quantidade que ele deve

Martins · Answer

vc poderia tentar o seguinte, criar um arquivo de parametros, uma tabela ou um arquivo de configura��o mesmo (seusistema.cfg), e guardar os parametros dentro desse arquivo, dentre esses paramentros teria [b:2a143ab930]compet�ncia[/b:2a143ab930] no caso mm/aaaa, vc poderia ao carregar seus forms ter uma instru��o SQL para lhe mostrar somente os registros pertencentes a compet�ncia informada no parametro do sistema, assim digamos, vc estava trabalhando com a compet�ncia: 11/2005, fechou esse compet�ncia blz, abriu a compet�ncia: 12/2005 ent�o grids e tudo mais n�o mostrariam nada do m�s anterior a menos q seja necess�rio e informado ao sistema para mostrar, algo como (Saldo anterior, valor transportado, etc...).

A �deia seria mais ou menos essa, qualquer coisa agente at� tentar arrumar um tempinho aqui para escrever um exemplo.

Boa sorte!!!

Paullsoftware · Answer

[quote:de355e0736=�Edilcimar�]em princ�pio o cliente vai pegar 2 pipocas, mas no m�s seguinte para pegar mais 2 pipocas deve ter pago as anteriores, caso contr�rio vc n�o deveria deixar ele pegar nada, portanto basta criar um campo �saldo� onde vc colocaria a quantidade que ele deve[/quote:de355e0736]A quest�o n�o seria ele pagar as pipocas do m�s anterior, � que todos os meses ele tem direito a [b:de355e0736]pegar[/b:de355e0736] duas pipocas FREE sem precisar pagar nada, sei que devo fazer um filtro para mostrar e contar os dados existentes no corrente m�s o meu problema � que desconhe�o o c�digo para filtrar os dados pegando o m�s corrente: Tipo, pegando o primeiro dia do m�s e pegando o �ltimo dia do m�s posso fazer um filtro num arquivo/tabela que j� possou onde ele vai me retornar  a quantidade de registros existentes nela por exemplo:TabelaPipocasCliente  = Integer;Data     = Date;Pessoa  = TExto;Pipocas = Integer;sendo assim quero saber o c�digo que me retorne o primeiro e ultimo dia do m�s corrente...por que ai eu posso fazer um filtro que me retorne todos os registros de determinado cliente naquele m�s e posso contar quantas pipocas ele pegou e se o m�s corrente n�o houver nada posso liberar para novas pipocas......

Paullsoftware · Answer

Valeu pela ajuda de todos, consegui resolver o meu problema... e se algu�m possui ou chegar a possuir a mesma d�vida que eu ta ai o c�digo:

[b:53cf87a368]
PROPRIEDADE SQL DO COMPONENTE TADOQUERY
[/b:53cf87a368][i:53cf87a368]

SELECT * FROM CONTA_PIPOCAS
WHERE CLIENTE=:CODCLIENTE
ORDER BY DATA DESC

[/i:53cf87a368][b:53cf87a368]
CAMPOS DA TABELA[/b:53cf87a368][i:53cf87a368]
CLIENTE,DATA,PIPOCAS,BENEFICIADO
[/i:53cf87a368][b:53cf87a368]
NO BOT�O COLOQUEI O SEGUINTE EVENTO:
[/b:53cf87a368][i:53cf87a368]

CONTA_PIPOCAS.Close;
CONTA_PIPOCAS.SQL[1]:=�WHERE CLIENTE=:CODCLIENTE AND DATA BETWEEN :D1 AND :D2 �;
CONTA_PIPOCAS.Parameters[0].Value := vCodCliente;
CONTA_PIPOCAS.Parameters[1].Value := FormatDateTime(�dd/mm/yyyy�,StartOfTheMonth(Now));//Retorno o primeiro dia do m�s corrente
CONTA_PIPOCAS.Parameters[2].Value := FormatDateTime(�dd/mm/yyyy�,EndOfTheMonth(Now));//retorno o �ltimo dia do m�s corrente
CONTA_PIPOCAS.Open;
//ContaPipocasMes = variavel do tipo inteiro
ContaPipocasMes := CONTA_PIPOCAS.RecordCount;//AQUI ME RETORNA O TOTAL DE REGISTRO EXISTENTES QUE � IGUAL A QUANTIDADE DE PIPOCAS QUE ELE PEGOU ENTRE O PRIMEIRO E �LTIMO DIA DO M�S

[/i:53cf87a368]

valeu mais uma vez pela for�a galera...

Okama · Answer

TABELA PIPOCA[code:1:ef5f808a6c]cliente qtde produto     data======= ==== =========== ==========01       8   DOCES       20/12/200501       4   PIPOCA      01/01/200601       3   PA�OCA      15/01/200601       5   BALA        04/02/2006[/code:1:ef5f808a6c]//Total Retirado no m�sSelect Sum(qtde) as Qtde from Pipoca where month(data) = 1 and year(data) = 2006;Result:[code:1:ef5f808a6c]Qtde ==== 7[/code:1:ef5f808a6c]//Diferenciando ProdutosSelect Sum(qtde) as Qtde, Produto from Pipoca where month(data) = 1 and year(data) = 2006 group by produtoResult:[code:1:ef5f808a6c]Qtde Produto==== =======4    PIPOCA3    PA�OCA[/code:1:ef5f808a6c]...