RELATORIO MENSAL
Pessoal,
Estou precisando muito da ajuda de vocês. Preciso gerar através do VB 6 um relatório mensal usando o campo (DataDoRegistro) através do crystal report e não sei como passar os parâmentros.
Seria mais mais ou menos assim:
Utilizo o cristal reports 9.
Grato Jair
Estou precisando muito da ajuda de vocês. Preciso gerar através do VB 6 um relatório mensal usando o campo (DataDoRegistro) através do crystal report e não sei como passar os parâmentros.
Seria mais mais ou menos assim:
Utilizo o cristal reports 9.
Grato Jair
fml = [Ô]month{tabela.datadoregistro} = [Ô] & month(date)
SacoFrito,
Obrigado pela atenção colega, infelismente pelo exemplo que vc me enviou não conseguir fazer funcionar.
Vou tentar explicar melhor
Tenho um form de impressão de relatorios
nele tem uma combox com meses: janeiro, fevereiro, março .....
e um campo onde escolho o ano corrente.
a intenção é quando escolher o mês e o ano ele gera o relatório
Obrigado pela atenção colega, infelismente pelo exemplo que vc me enviou não conseguir fazer funcionar.
Vou tentar explicar melhor
Tenho um form de impressão de relatorios
nele tem uma combox com meses: janeiro, fevereiro, março .....
e um campo onde escolho o ano corrente.
a intenção é quando escolher o mês e o ano ele gera o relatório
alguém?
Pessoal quero apenas passar pelo menos o mês para o campo DataDoRegistro que estar no crystal
tentei fazer como o exemplo abaixo mas não estar dando certo
mReport.RecordSelectionFormula = [Ô]{tblBoletim.DataDoRegistro} = [Ô] & Format(Date, [Ô]mm[Ô])
obrigado,
Jair
Pessoal quero apenas passar pelo menos o mês para o campo DataDoRegistro que estar no crystal
tentei fazer como o exemplo abaixo mas não estar dando certo
mReport.RecordSelectionFormula = [Ô]{tblBoletim.DataDoRegistro} = [Ô] & Format(Date, [Ô]mm[Ô])
obrigado,
Jair
Entao amigo, tive uma duvida parecida com essa(precisava de um relatori ode aniversariantes do mes) e resolvi com esse codigo que te passei.
Mas existe um jeito de voce digitar o espaco entre datas que deseja [Ô]puxar[Ô] no relatorio
If IsDate(d1) And IsDate(d2) Then
fml = fml & [Ô]{tabela.DATA} >= date ([Ô] & Format(d1, [Ô]YYYY[Ô]) & [Ô],[Ô] & Format(d1, [Ô]MM[Ô]) & [Ô],[Ô] & Format(d1, [Ô]DD[Ô]) & [Ô]) and [Ô]
fml = fml & [Ô]{tabela.DATA} <= date ([Ô] & Format(d2, [Ô]YYYY[Ô]) & [Ô],[Ô] & Format(d2, [Ô]MM[Ô]) & [Ô],[Ô] & Format(d2, [Ô]DD[Ô]) & [Ô]) and [Ô]
tit = tit & [Ô]PerÃodo:[Ô] & d1 & [Ô] a [Ô] & d2
End If
Veja se serve pra sua necessidade
Mas existe um jeito de voce digitar o espaco entre datas que deseja [Ô]puxar[Ô] no relatorio
If IsDate(d1) And IsDate(d2) Then
fml = fml & [Ô]{tabela.DATA} >= date ([Ô] & Format(d1, [Ô]YYYY[Ô]) & [Ô],[Ô] & Format(d1, [Ô]MM[Ô]) & [Ô],[Ô] & Format(d1, [Ô]DD[Ô]) & [Ô]) and [Ô]
fml = fml & [Ô]{tabela.DATA} <= date ([Ô] & Format(d2, [Ô]YYYY[Ô]) & [Ô],[Ô] & Format(d2, [Ô]MM[Ô]) & [Ô],[Ô] & Format(d2, [Ô]DD[Ô]) & [Ô]) and [Ô]
tit = tit & [Ô]PerÃodo:[Ô] & d1 & [Ô] a [Ô] & d2
End If
Veja se serve pra sua necessidade
Saco Frito,
Desculpe a ignorância colega, mas não conseguir usar seu código.
Depois de muito pesquisar cheguei ao condigo abaixo
mReport.RecordSelectionFormula = [Ô]{tblBoletim.DataDoRegistro}= & in Date ([Ô] & frmEstatisticaMensal.DataInicio & [Ô]) to Date ([Ô] & frmEstatisticaMensal.DataFinal & [Ô])[Ô]
para pode implementar o relatorio por intervalo de data
mas estar retornando o seguinte erro: [Ô]This field name is not known[Ô]
alguém sabe o motivo.
obrigado
Jair
Desculpe a ignorância colega, mas não conseguir usar seu código.
Depois de muito pesquisar cheguei ao condigo abaixo
mReport.RecordSelectionFormula = [Ô]{tblBoletim.DataDoRegistro}= & in Date ([Ô] & frmEstatisticaMensal.DataInicio & [Ô]) to Date ([Ô] & frmEstatisticaMensal.DataFinal & [Ô])[Ô]
para pode implementar o relatorio por intervalo de data
mas estar retornando o seguinte erro: [Ô]This field name is not known[Ô]
alguém sabe o motivo.
obrigado
Jair
Pessoal,
Conseguir resolver com este código
mReport.RecordSelectionFormula = [Ô]{ConEstatisticaBoVitima.DataDoRegistro} >= DateTime([ô][Ô] & frmEstatisticaMensal.DataInicio & [Ô][ô]) and {ConEstatisticaBoVitima.DataDoRegistro} <= DateTime([ô][Ô] & frmEstatisticaMensal.DataFinal & [Ô][ô])[Ô]
O problema é que tinha feito o relatorio a parti de uma consulta e estava usando a tabela
Agora só preciso que no relatório que é separado aparecerr conforme a baixo
Exemplo
PERIODO
Data Inicial: 01/02/2011 e Data Final: 28/02/2011
alguém ai sabe como fazer
Conseguir resolver com este código
mReport.RecordSelectionFormula = [Ô]{ConEstatisticaBoVitima.DataDoRegistro} >= DateTime([ô][Ô] & frmEstatisticaMensal.DataInicio & [Ô][ô]) and {ConEstatisticaBoVitima.DataDoRegistro} <= DateTime([ô][Ô] & frmEstatisticaMensal.DataFinal & [Ô][ô])[Ô]
O problema é que tinha feito o relatorio a parti de uma consulta e estava usando a tabela
Agora só preciso que no relatório que é separado aparecerr conforme a baixo
Exemplo
PERIODO
Data Inicial: 01/02/2011 e Data Final: 28/02/2011
alguém ai sabe como fazer
pessoal,
Na verdade o que eu preciso agora é passar o valor de um campo do formulário param o Crystal.
Alguém ai.
Na verdade o que eu preciso agora é passar o valor de um campo do formulário param o Crystal.
Alguém ai.
Tópico encerrado , respostas não são mais permitidas