domingo, 21 de fevereiro de 2021

DICAS 3268 - WINDEV_MOBILE - COMO GERAR PDF E MANDAR EMAIL ANDROID - PERGUNTAS E REPOSTAS 29



Bom Dia Boa Tarde Boa Noite



https://youtu.be/PpJ0TY5w6nw



Esse Video vai estrear as XX:00 do dia 22/02/2021 

DICAS 3268 - WINDEV_MOBILE - COMO GERAR PDF E MANDAR EMAIL ANDROID - PERGUNTAS E REPOSTAS 29


ASSUNTOS

COMO GERAR PDF E MANDAR EMAIL ANDROID
ENTRANDO NA WINDOWS TRANSPORTADORA
CRIANDO BOTAO IMPRIMIR
ENTRANDO NO CODIGO BOTAO IMPRIMIR
CRIANDO UM DIRETORIO
DANDO DESTINO NA IMPRESSORA PARA PDF, E O CAMINHO MAIS O ARQUIVO
CRIANDO O RELATORIO MANUALMENTE
LENDO A QUERY TRANSPORTADORA COM SELECT 
FAZENDO OUTRA OPCAO COM COMANDOS WL COM FOR EACH 
FINALIZANDO O RELATORIO 
CHAMANDO COM SHELLEXECUTE PARA ABRIR O PDF 
MANDANDO O EMAIL COM O PDF ANEXADO 

============== CODIGO


// btn imprimir transportadora

nSTATUS is int=SysStatusStorageCard()
IF nSTATUS=sysCardAvailable THEN
sDIRETORIO is string
sDIRETORIO = SysDirStorageCard()+"/diretorio_amarildo"
IF fDirectoryExist(sDIRETORIO) THEN
ELSE
   bRetorno is boolean=fMakeDir(sDIRETORIO)
   IF bRetorno=True THEN
   ELSE
       Info(ErrorInfo(errFullDetails))
   END  
END
//imprimir relatorio
sNome_arquivo is string=sDIRETORIO+"/arquivo.pdf"
iDestination(iGenericPDF,sNome_arquivo)
iPrint("Relatorio de Transportadora")
iPrint("")
iPrint(iXPos((1)+"Codigo"+iXPos(18)+"Nome"))
iPrint("")
HExecuteQuery(QRY_transportadora_relacao,hQueryDefault)
FOR EACH QRY_transportadora_relacao 
iPrint(iXPos(1)+QRY_transportadora_relacao.id_empresa_transportadora+iXPos(18)+QRY_transportadora_relacao.razao_social)
END
// //se voce quizer usar o comando wl
//
// for EACH transportadora 
// iPrint(iXPos(1)+transportadora.id_empresa_transportadora+iXPos(18)+transportadora.razao_social)
// END

    iEndPrinting()
    ShellExecute(sNome_arquivo)
    
    // vamos mandar o email

    email.Recipient[1]="amarildo.matos@gmail.com"
    email.NbRecipient=1
    email.Subject="Assunto"
    email.Message="Minha Mensagem"
    email.Attach[1]=sNome_arquivo
    email.NbAttach=1
    EmailRunApp()
    
    // final imprimir gerar pdf e mandar email
    
ELSE
Info("nao gerou pdf")
    
END

====================
SELECT
transportadora.id_empresa_transportadora AS id_empresa_transportadora,
transportadora.razao_social AS razao_social,
transportadora.nome_fantasia AS nome_fantasia,
transportadora.telefone AS telefone,
transportadora.cnpj AS cnpj,
transportadora.id_transportadora AS id_transportadora
FROM
transportadora
WHERE 
    transportadora.razao_social LIKE %{parametro_nome_qualquer}%
ORDER BY
transportadora.razao_social

=============== INDICE PERGUNTAS E RESPOSTA



========= INDICE MOBILE


=============== INDICE CURSO DE RELATORIOS

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
Blog - WinDev - Relatorio - 026/... Mostrar impressoras/Selecionar e Imprimir
Blog - WinDev - Relatorio - 027/... IDestination - Destino do Relatorio
Blog - WinDev - Relatorio - 028/... Iprint - Relatorio Manual
Blog - WinDev - Relatorio - 029/... Dica Tabela e print
Blog - WinDev - Relatorio - 030/... Totalizadores
Blog - WinDev - Relatorio - 031/... Caption Mudar
Blog - WinDev - Relatorio - 032/... Intervalo Bancos
Blog - WinDev - Relatorio - 033/... Manual Linha - IHLine
Blog - WinDev - Relatorio - 034/... Borda - Iborder
Blog - WinDev - Relatorio - 035/... IPageNum
Blog - WinDev - Relatorio - 036/... Numero Com Espaco
Blog - WinDev - Relatorio - 037/... Fonte Seleciona - ISelectFont -
Blog - WinDev - Relatorio - 038/... Linha Mais de 2 - Mais informacoes no Campo
Blog - WinDev - Relatorio - 039/... Copias - IParameter - Icopies
Blog - WinDev - Relatorio - 040/... Pdf - Ler e Extrair Texto
Blog - WinDev - Relatorio - 041/... Imprimir Numero 000.001.500
Blog - WinDev - Relatorio - 042/... IListPrinter - Mostra Impressoras e Lista
Relatorio Inventario com Query - Relatorio 043/...
Relatorio - Sem Template - Dica Pedrosão - Relatorio - 044
Titulo Cabecalho - Alterar - WinDev - Relatorio - 045
Totais - Colocar Totais Abaixo ultima Linha Detalhe - WinDev - Relatorio - 046
Relatorio String Angulo 90% - WinDev - Relatorio - 047/...
Links Pagina e Email no Relatorio - WinDev - Relatorio - 048
PREVIEW TRADUZIR - WINDEV - RELATORIO - 049 - AULA 1211
TABELA E RELATORIO - COMO FAZER - RELATORIO 050 - AULA 1223
MANUAL - RELATORIO TOTALMENTE MANUAL - WINDEV RELATORIO 051 - AULA 1224
MEMORIA RELATORIO - AULA 1257 relatorio 052 tabela memoria
TOTAL BREAK - DICAS 1711 - PUBLICA - WINDEV RELATORIO 053 
GERAR PDF - DICAS 1889 - PUBLICA - WINDEV_23 - RELATORIO 54 - 
DICA 2150 - HANGOUT AO VIVO 10 06 2019 AS 19:00 - MOSTRAR CONSULTORIA COm joao sobre relatorios de como criar
DICAS 2151 WINDEV WEBDEV MOBILE RELATORIOS 59 CONSULTORIA JOAO 08062019
DICAS 2152 WINDEV WEBDEV MOBILE RELATORIOS 60 TOTAL RELATORIO
DICAS 2193 WINDEV WEBDEV MOBILE RELATORIO 61 IPREVIEW iMiniPreview
DICAS 2597 - WINDEV WEBDEV MOBILE - Relatorio 62 - Como eu Fiz Danf no Windev.
AO VIVO FACEBOOK - 2882 20:00 - 06/05/2020 - RELATORIOS COM TABELAS WINDEV
2885 RELATORIO SQL WINDEV TRASMITIDO FACEBOOK ERPAMARILDO
DICA 2912 PREVIEW PORTUGUES WINDEV


PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 












Teste

Teste
teste