|
|
Postada em 11/10/2014 22:15 hs
Ola, boa noite... tenho um relatorio que exibe o sequencia do registro, montei um relatorio detalhado q, ao clicar no hiperlink chama o relatorio detalhando as informacoes, o relatorio no modo design funciona correto, ou seja, tenho por exemplo o codigo 1, ao clicar no hiperlink é chamado o sub-report filtrando o registro 1... em execucao no projeto, ao clicar no hiperlink o sub-report é aberto, so q em branco... meu relatorio principal tem a tabela CADCONTRATOS.SEQ, o sub-report tem CADCONTRATOSCOMPL.SEQ, onde os SEQ estao relacionados... no SELECT EXPERT do sub-report tem o criterio CADCONTRATOSCOMPL.SEQ = PM-CADCONTRATOS.SEQ
resumindo, em tempo de projeto funciona, quando rodo o sistema o sub-report abre, mas em branco...
alguem tem uma dica, uso o VB6, crystal reports 8.5
|
|
|
|
|
|
|
|
Postada em 12/10/2014 21:20 hs
para complementar a pergunta acima, disse q em modo de projeto a relatorio principal esta funcionando certinho com o subreport, estao linkados... no VB6 estou chamando o relatorio assim:
-------------------------------------------------------------------------------------------------
With CrystalReport1
.Connect = "MS Access;pwd=senha"
.SelectionFormula = Formula2
.ReportFileName = App.Path & "RelContInterContAnalPagtoRes.rpt"
.formulas(0) = "razao ='" & SISAD.Label15.Caption & "'"
.formulas(1) = "CepLogo ='" & SISAD.Label7(3).Caption & "'"
.formulas(2) = "Filtro ='" & Label2.Caption & "'"
.DataFiles(0) = AnoSel
.CopiesToPrinter = 1
.DiscardSavedData = True
.Destination = crptToWindow
.WindowState = crptMaximized
.WindowTitle = "Controle de Contratos - Relação de Contratos"
.Action = 1
AnoSel = Empty
End With
---------------------------------------------------------------------------------------------------------
pesquisando, vi algo dizendo q alem d chamar o relatorio principal, devo chamar o subreport tambem, com um codigo +- assim:
.SubreportToChange = App.Path & "subteste.rpt"
.DataFiles(1) = AnoSel
.SubreportToChange = ""
tentei inserir essas linhas acima no meu codigo, mas dá o erro:
Run-time error 20406
unknown subreport name
mas o relatorio "subteste.rpt" existe e ta na pasta do aplicativo, junto com o relatorio principal, mas esse "SubreportToChange " nao carrega...
alguem tem uma dica ai?
|
|
|
|
djan
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 02/01/2015 10:46 hs
cara o sub, tem que esta dentro do rpt principal, não entendi a forma que vc fez, vc criou outro relatório para ser o sub?
|
|
|
|
|
|
Postada em 02/01/2015 12:07 hs
Ola, na verdade esse codigo acima tava tendo algo q nem sabia por onde ir... o codigo final ficou assim:
...
.ReportFileName = App.Path & "RelContInterContDetFim.rpt"
'CODIGO PARA EXIBIR OS SUB RELATORIOS NA MESMA PAGINA
.GetNSubreports
.SelectionFormula = Formula2
.SubreportToChange = .GetNthSubreportName(0)
.Connect = "MS Access;pwd=senha"
.SubreportToChange = ""
.SubreportToChange = .GetNthSubreportName(1)
.Connect = "MS Access;pwd=senha"
.SubreportToChange = ""
.SubreportToChange = .GetNthSubreportName(2)
.Connect = "MS Access;pwd=senha"
.SubreportToChange = ""
....
agora ta funcionando, nesse caso ai, tenho dentro do relatorio principal, 3 subrelatorios q exibem dados.. em um outro, tenho 5 subreports...
|
|
|
|
|
