mcgyver
|
CRUZEIRO SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 18/07/2005 08:45 hs
Olá pessoal... Eu tenho um Banco de Dados chamado Estoque, e ele possui a tabela chamada Controle. Dentro dessa tabela possuo o campo Medicamento, Laboratório e Data. Gostaria de uma rotina de impressão que toda vez que eu mandar imprimir, um input box me pedisse o Medicamento (irá filtrar o campo Medicamento em busca do nome que eu digitei), e o intervalo de duas datas (irá filtrar, já com o medicamento encontrado, o intervalo de duas datas que eu quero encontar o medicamento que já pedi no input box anterior), ou seja, a rotina vai me dar todos os medicamentos que eu pedir (o nome do mediamento se encontra repetido várias vezes) e ainda vai me pedir duas datas, para que encontre esse medicamento e que seje nesse intervalo... Feito isso, gostaria de que essas informações fossem enviadas para o cristal, para serem impressas lá... Obrigado pela colaboração pessoal... Fui...
|
|
|
|
|
Postada em 18/07/2005 12:14 hs
Pô, McGyver... Fala sério... Essa é fácil. Dê um chego em casa, que lhe mostro um aplicativo que manipula registros filtrados entre duas datas, após definido um nome qualquer (que pode ser o medicamento que vc cadastrou na sua base de dados).... Fui.
|
|
|
Martini
|
PAROBÉ RS - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 18/07/2005 12:43 hs
use os selectionformula do crystal para filtar regitros ... no exemplo abaixo eu faço um filtro pelo código do cliente e período (vencimento) .SelectionFormula = "(({R~Relcrecp.Codigo do cliente} = " & Str$(Vcliente) & ") AND ({R~Relcrecp.Vencimento} >= Date(" & Year(CDate(Vdata1)) & " , " & Month(CDate(Vdata1)) & " , " & Day(CDate(Vdata1)) & ")) AND ({R~Relcrecp.Vencimento} <= Date(" & Year(CDate(Vdata2)) & " , " & Month(CDate(Vdata2)) & " , " & Day(CDate(Vdata2)) & ")))"
|
|
|
|