GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV 25
→
Report Diferente alguém faz idéia de como fazer isto em Windev
Report Diferente alguém faz idéia de como fazer isto em Windev
Iniciado por Bastiaan, ago., 17 2017 9:47 PM - 3 respostas
Conecte-se…
Bastiaan
#1
Membro registado
37 mensagems
Popularité : +5 (5 votes)
Publicado em agosto, 17 2017 - 9:47 PM
Oi pessoal
Gerar relatórios costuma ser bem fácil no Windev, até para mim que venho de outra plataforma (Delphi).
Só não achei um jeito de fazer o seguinte :
Tenho uma tabela, onde cada registro corresponde a informação particular de 1 cliente.
A partir desta tabela ao invés de gerar um relatório PDF único contendo informações de todos os clientes.
O que eu preciso é que seja impresso um relatório PDF para cada cliente, e o nome do relatório corresponda a um código no cadastro do cliente.
Eu já fiz isto em Delphi, mas não sei se isto é possível no WInDev.
Agradeceria muito se alguém soubesse como isto pode ser feito.
um abraço
Denunciar
0
0
Mister ANDRE MARTINI
#2
Membro registado
206 mensagems
Popularité : +25 (25 votes)
Publicado em agosto, 17 2017 - 10:44 PM
o código abaixo gera um pdf para cada pedido do relatório de pedido
dsPedidos
is Data Source
s
SQLPedidos
is string
= [
SELECT Numero_do_pedido
FROM Pedidos
WHERE
Pedidos.Codigo_da_empresa = %1
]
s
SQLPedidos
=
StringBuild
(
s
SQLPedidos
,
gn
CodigoEmpresa
)
IF
HExecuteSQLQuery
(
dsPedidos
,
hQueryDefault
,
s
SQLPedidos
)
THEN
IF
HNbRec
(
dsPedidos
) >
0
THEN
HReadFirst
(
dsPedidos
)
WHILE
NOT
HOut
(
dsPedidos
)
s
NomeRelatorio
is string
=
"Relatório Pedido"
s
NomePDFRelatorio
is string
=
"Relatorio_Pedido_"
+
Right
(
"000000000"
+
NumToString
(
dsPedidos.Numero_do_pedido
)
,
9
)
+
".pdf"
//EDT_Pdf = gsDiretorioExe + sNomePDFRelatorio
iDestination
(
iPDF
,
gs
DiretorioExe
+
s
NomePDFRelatorio
)
//// Initializes the query associated with the report
iInitReportQuery
(
RPT_Pedidos
,
gn
CodigoEmpresa
,
dsPedidos.Numero_do_pedido
)
//// Print the Form report (Pedidos)
iPrintReport
(
RPT_Pedidos
)
//Info("pedido" + NumToString(dsPedidos.Numero_do_pedido))
HReadNext
(
dsPedidos
)
END
END
END
HCancelDeclaration
(
dsPedidos
)
Info
(
"OK"
)
--
André Martini
IS2 Automotive
http://www.is2.inf.br/is2automotive/index.html
IS2 Construtive
http://www.is2.inf.br/is2construtive/index.html
IS2 Store
http://www.is2.inf.br/is2store/index.html
IS2 Gerent
http://www.is2.inf.br/is2gerent/index.html
Mensagem modificada, agosto, 17 2017 - 10:47 PM
Denunciar
2
0
Bastiaan
#3
Membro registado
37 mensagems
Popularité : +5 (5 votes)
Publicado em agosto, 18 2017 - 12:18 AM
Oi André
Muito obrigado, pelo código, conciso e claro
Só uma dúvida, quando a gente cria um REport existem várias opções de tipos de reports a serem criadas, tipo blank, table, form etc...
Neste caso específico qual das opções vai ser usada, ou efetivamente precisa ser usada ?
Um grande abraço
Bastiaan
Denunciar
0
0
Mister ANDRE MARTINI
#4
Membro registado
206 mensagems
Popularité : +25 (25 votes)
Publicado em agosto, 18 2017 - 2:49 PM
De nada! Pode ser qualquer tipo de relatório, aquelas opções são apenas templates
--
André Martini
IS2 Automotive
http://www.is2.inf.br/is2automotive/index.html
IS2 Construtive
http://www.is2.inf.br/is2construtive/index.html
IS2 Store
http://www.is2.inf.br/is2store/index.html
IS2 Gerent
http://www.is2.inf.br/is2gerent/index.html
Denunciar
1
0
→ Voltar para WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto