sexta-feira, 26 de fevereiro de 2016

Windev - Curso Relatorio - 20/... - Relatorio - Gerar Pdf






Video youtube

 


Nessa aula vou mostrar como criar e abrir um pdf do relatorio

This lesson will show how to create and open a PDF report

Cette leçon va vous montrer comment créer et ouvrir un rapport PDF

Blog - WinDev - Relatorio - 001/... Configura e Filtro
Blog - WinDev - Relatorio - 002/... IParameterReport
Blog - WinDev - Relatório - 003/... Marca D´Agua
Blog - WinDev - Relatorio - 004/... Layout 
Blog - WinDev - Relatorio - 005/... Campo Vertical - Angle 
Blog - WinDev - Relatorio - 006/... Como fazer quando sai duas paginas? 
Blog - WinDev - Relatorio - 007/... Imprimir Linha Multi Line
Blog - WinDev - Relatorio - 008/... Relatorio Valor Zero deixar Branco
Blog - WinDev - Relatorio - 009/... Relatorio Alinhar Texto 
Blog - WinDev - Relatorio - 010/... Colocar Totalizador
Blog - WinDev - Relatorio - 011/... Imprime Somente os Selecionados ou Todos da Tabela 
Blog - WinDev - Relatorio - 012/... Break e totalizadores de valores
Blog - WinDev - Relatorio - 013/... Retorno de Relatorio - Result 
Blog - WinDev - Relatorio - 014/... Zerar Totalizador  
Blog - WinDev - Relatorio - 015/... Relatorio - Totalmente Manual
Blog - WinDev - Relatorio - 016/... Linha Zebrada
Blog - WinDev - Relatorio - 017/... Posicoes do Relatorio Alterar
Blog - WinDev - Relatorio - 018/... Alterar Fonte
Blog - WinDev - Relatorio - 019/... Linha Acrescentar
Blog - WinDev - Relatorio - 020/... Relatorio - Gerar Pdf
Blog - WinDev - Relatorio - 021/... Filtro
Blog - WinDev - Relatorio - 022/... Pagina Inicial/Final - Data Hora
Blog - WinDev - Relatorio - 023/... Pular Página Break - IpageEnd()
Blog - WinDev - Relatorio - 024/... Imprimir Tabela com TablePrint
Blog - WinDev - Relatorio - 025/... Relatorio Mudar Orientação



http://doc.windev.com/en-US/?3046074&name=iDestination

http://doc.pcsoft.fr/fr-FR/?3046074&name=idestination_fonction


//pergunta se quer relatorio
IF CBOX_GeraPdf=True THEN
    iDestination(iPDF,"Relatorio_Nome.pdf")
ELSE
    iPreview(ipvZoomPageWidth)   
END
//pergunta se quer relatorio
filtro_data_inicial = EDT_data_inicial
filtro_data_final = EDT_data_Final
IF CBOX_Relatorio_Grafico = 1 THEN  // Imprime com gráfico
    iPrintReport(RPT_Material_Relatorio_Curva_ABC,filtro_data_inicial,filtro_data_final,1)
ELSE  // Imprime sem gráfico
    iPrintReport(RPT_Material_Relatorio_Curva_ABC,filtro_data_inicial,filtro_data_final)   
END
//Abrir pdf
IF CBOX_GeraPdf=True THEN
    IF YesNo("Deseja Abrir Relatorio") THEN
        ShellExecute("Relatorio_Nome.pdf")
    END   
END   
//Abrir pdf




//EM FRANCES
SI CBOX_GeraPdf=Vrai ALORS
    iDestination(iPDF,"Relatorio_Nome.pdf")
SINON
    iAperçu(iapZoomLargeurPage)   
FIN
//pergunta se quer relatorio
filtro_data_inicial = EDT_data_inicial
filtro_data_final = EDT_data_Final
SI CBOX_Relatorio_Grafico = 1 ALORS  // Imprime com gráfico
    iImprimeEtat(RPT_Material_Relatorio_Curva_ABC,filtro_data_inicial,filtro_data_final,1)
SINON  // Imprime sem gráfico
    iImprimeEtat(RPT_Material_Relatorio_Curva_ABC,filtro_data_inicial,filtro_data_final)   
FIN
//Abrir pdf
SI CBOX_GeraPdf=Vrai ALORS
    SI OuiNon("Deseja Abrir Relatorio") ALORS
        LanceAppliAssociée("Relatorio_Nome.pdf")
    FIN   
FIN   



























Teste

Teste
teste