sexta-feira, 18 de dezembro de 2015

WinDev - Curso - 173 - Pegar Retorno Arquivo Banco - Componente - Email -







Video - pegar Retorno Banco


Nessa aula vou mostrar como eu leio um arquivo de retorno do banco, e coloco isso numa
tabela, para posteriormente colocar esses dados no arquivo de duplicata


TableDeleteAll(TABLE_Retorno)  // DELETO TABELA
nArquivoid is int
nArquivoid = fOpen(EDT_Retorno,foReadWrite) // ABRIR ARQUIVO, RETORNO
IF nArquivoid<>-1 THEN  // SE EXISTE ARQUIVO
    n_contador is int=0
    sLinha is string="" //
    LOOP  // VAI ATE O FINAL DO ARQUIVO
        sLinha = fReadLine(nArquivoid) // LENDO CADA LINHA
        IF sLinha = EOT THEN  // SE FOR FIM/ TERMINOU
            BREAK
        ELSE           
            IF sLinha[[1]]="1" THEN  // SE A PRIMEIRA COLUNA É 1
                TableAddLine(TABLE_Retorno) // ADICIONAR TABELA
                n_contador++ // SOMANDO
                TABLE_Retorno.COL_4_cpf_cnpj_empresa[n_contador]=sLinha[[4 TO 17]] //
                TABLE_Retorno.COL_18_agencia[n_contador]=sLinha[[18 TO 21]]
                TABLE_Retorno.COL_24_conta[n_contador]=sLinha[[24 TO 28]]
                TABLE_Retorno.COL_29_dac[n_contador]=sLinha[[29 TO 29]]
                TABLE_Retorno.COL_63_nosso_numero_titulo[n_contador]=sLinha[[63 TO 70]]
                TABLE_Retorno.COL_109_cod_ocorrencia[n_contador]=sLinha[[109 TO 110]]
                SWITCH TABLE_Retorno.COL_109_cod_ocorrencia[n_contador]
                    CASE "02"
                        TABLE_Retorno.COL_DescricaoOcorrencia[n_contador]="Entrada Confir"                   
                    CASE "03"
                        TABLE_Retorno.COL_DescricaoOcorrencia[n_contador]="Entrada Rejeitadar"                   
                    OTHER CASE                       
                END
                d_data_vencimento is Date
                d_data_vencimento..Day=NumToString(sLinha[[147 TO 148]])
                d_data_vencimento..Month=sLinha[[149 TO 150]]
                d_data_vencimento..Year="20"+sLinha[[151 TO 152]]
                TABLE_Retorno.COL_147_data_vencimento[n_contador]=d_data_vencimento
                TABLE_Retorno.COL_153_valor_titulo[n_contador]=sLinha[[153 TO 165]]
                TABLE_Retorno.COL_153_valor_titulo[n_contador]=TABLE_Retorno.COL_153_valor_titulo[n_contador]/100
            ELSE               
            END
        END // IF sLinha = EOT THEN
    END    // LOOP
END // IF nArquivoid<>-1 THEN
TableSort(TABLE_Retorno,"TABLE_Retorno.COL_109_cod_ocorrencia","TABLE_Retorno.COL_325_nome_pagador")
fClose(nArquivoid)
TraceEnd()

TableDisplay(TABLE_Retorno)














Blog - Curso Iniciante /1/... - Inicio
Blog - Curso Iniciante /2/... - Menu
Blog - Curso Iniciante /3/... Campos  
Blog - Curso Iniciante /4/... - Duvida/Style
Blog - Curso Iniciante /5/... - Menu
Blog - Curso Iniciante /6/... - Menu 2
Blog - Curso Iniciante /7/... - If / ShellExecute  
Blog - Curso Iniciante /8/... - ReturntoCapture 
Blog - Curso Iniciante /9/... - Info
Blog - Curso Iniciante /10/.. - DateSys - Now
Blog - Curso Iniciante /11/... - Criando Analise Agenda 
Blog - Curso Iniciante /12/... - Menu , Agenda
Blog - curso Iniciante /13/... - HreadSeek  
Blog - curso Iniciante /14/... - For Each - Percorrer Tabela 
Blog - Curso Iniciante /15/... - Query Consultas
Blog - Curso Iniciante /16/... - Tabela Relatorio
Blog - Curso Iniciante /17/... - Relatorio Criando 
Blog - Curso Iniciante /18/... - Relatorio Manual 
Blog - Curso Iniciante /19/.. - Menu Popup
Blog - Curso Iniciante /20/... - Data - Separar dia mes e ano
Blog - Curso Iniciante /21/... - Time - Separar hora/min/seg 
Blog - Curso Iniciante /22/... - Operadores
Blog - Curso Iniciante /23/... - String Igualdade 
Blog - Curso Iniciante /24/... - Switch / Case
Blog - Curso Iniciante /25/... - LOOP 
Blog - Curso Iniciante /26/... - FOR
Blog - Curso /27/... - Extern 
Blog - Curso /28/... - My 
Blog - Curso /29/... Procedures
Blog - Curso /30/... HSave  .. - Inclui Um Registro
Blog - Curso /31/... - Hsave - Altera um Registro
Blog - Curso /32/... - HDelete - Exclui Registro(s)
Blog - Curso /33/... - Relatorio
Blog - Curso /34/... - Dialog 
Blog - Curso /35/... - Input
blog - Curso /36/... - Combox 
Blog - Curso /37/... Combox Tabela 
Blog - Curso /38/... List Box
Blog - Curso /39/... - Analise Agenda/Ligacoes
Blog - Curso /40/... - Rad - Tabela Relacionada Agenda/Ligações
Blog - Curso /41/... - Tabela Relacionada Manual
Blog - Curso /42/... - Dica Tela/Code Separado
Blog - Curso /43/... - Mapa /1..
Blog - Curso /44/... - Mapa /2.. Imprime
Blog - Curso /45/... - Fechar Programa - EndPrograma()
Blog - Curso /46/... - Camera Habilita/Desabilita 
Blog - Curso /47/... - Tabela e Formulario - Configurar Cnpj
Blog - Curso /48/... - Camera - Tirar Uma Foto e Gravar Imagem
Blog - Curso /49/... - Reports e Queies - Instalacao
Blog - Curso /50/... Reports e Queies - Relatorio - Como Gerar 
Blog - Curso /51/... Pedidos/Orcamento 1/... Analise
Blog - Curso /52/... Pedidos/Orcamento 2/.. Analise Windev
Blog - Curso /53/... Pedidos/Orcamento 3/... Relacionamento
Blog - Curso /54/... Pedidos Orcamento 4/... Rad
Blog - Curso /55/... Pegar Quantidade e Codigo - Separador * 
Blog - Curso /56/... Pegar Retorno de Uma Tabela e colocar Campo 
Blog - Curso /57/... Xml - Ler Conteudo Tags e Importar Pedido
Blog - Curso /58/... Ini - Ler e Gravar 
Blog - Curso /59/... Pedidos Orcamento 5/... Inicio Digitacao Pedido
Blog - Curso /60/... Pedidos Orcamento 6/... Digitando Iten Pedido
Blog - Curso /61/... Pedidos orcamento 7/... Gravando Pedido e Itens   
Blog - Curso /62/... Pedido Orcamento 8/... Consulta cliente   
Blog - Curso /63/... Tabela - Ancorar Coluna
Blog - Curso /64/... Tabela - Esconder ou Mostrar Coluna 
Blog - Curso /65/... RSS 
Blog - Curso /66/... Pedido Orcamento 9/... Consulta Material
Blog - Curso /67/... Tabelas, Control F Pesquisa Toda Tabela /Contenha/Cor Fundo
Blog - Curso /68/... Pedidos Orcamento 10/... Planos - Condições Pagamento 
Blog - Curso /69/... - Calculadora dentro do Campo Valor 
Blog - Curso /70/... Mapa - Itinerario
Blog - Curso /71/... Tabela - Alterar Nome Coluna
Blog - Curso /72/... Botal Fazer Menu popup 
Blog - Curso /73/... Debug - Como Usar
Blog - Curso /74/... Tabela Alinhar Coluna Lado Esquerdo 
Blog - Curso /75/... Pedidos Orcamento 11/... Quantidade /Mascara/Mudar
Blog - Curso /76/... YesNo - Pergunta Se Deseja Eliminar 
Blog - Curso /77/... Select - Case - Query
Blog - Curso /78/... Pedido/Orcamento 12/... - Analise Cond.Pagto
Blog - Curso /79/... Campos - Como Alterar configuracao via Codigo
Blog - Curso /80/... Pedido/Orcamento 13/... - Tabela,Gerar Condicoes/Parcelas
Blog - Curso /81/... Configuracao Trocar Exe para Wdl ou outro 
Blog - Curso /82/... Utilitarios - PopUp - Aumento Precos Materiais 
Blog - Curso /83/... TableEnableFilter - Digita Nome e Filtra 
Blog - Curso /84/... Dica Copiar Colar Texto Ou Imagen Pdf
Blog - Curso /85/... SElect Como Usar Wizard 
Blog - Curso /86/... Radio - Colocar tudo Mesma Linha
Blog - Curso /87/... Procedure - Melhoria Versao20 - Parametros
Blog - Curso /88/... Style - Tabela Como Alterar
Blog - Curso /89/... Style - Tab Como Alterar
Blog - Curso /90/... Pedido/Orcamento 14/... - Style - Mudando Botao Procura
Blog - Curso /91/... - Pedido/Orcamento 15/... - Pedido - Totalizar Colunas Tabela
Blog - Curso /92/... Backup - Hyperfile 
Blog - Curso /93/... Debug - STOP 
Blog - Curso /94/... Tabela - Alterar Cor da Coluna - Texto
Blog - Curso /95/... Select Max - Pegar o Numero Proxima Nota 
Blog - Curso /96/... Tabela Divisao de Muitas Colunas 
Blog - Curso /97/... Analise - Configurar Campo para Vir Automatico Combox 
Blog - Curso /98/... Tabela - Double click - Entrar direto Alteração do Cliente 
Blog - Curso /99/... Tabela MultiSeleção
Blog - Curso/100/... Tabela - TableMoveLine - Move Linha Baixou ou Cima
Blog - Curso/101/... TableAjust - Ajustar Tabela com Colunas
Blog - Curso/102/... TableSort - Ordem nas Colunas
Blog - Curso/103/... Tabelas Somar Manualmente rowTotal 
Blog - Curso/104/... Pedidos/Orcamento 16/... Melhorando Visual Incluir Pedido 
Blog - Curso/105/... Pedidos 17/... Digitacao Iten e Gera Tabela
Blog - Curso/106/... Fazer Tecla Atalho Direto no Cliente
Blog - Curso/107/... Como Fazer para nao passar Campo
Blog - Curso/108/... Pedido 18/... Menu Inicial Ajustando Tela
Blog - Curso/109/... Select Color - Como Selecionar uma Cor 
Blog - Curso/110/... SelectionColor - Mudar cor Seleção Table/Combox/Listbox
Blog - Curso/111/... Stc - Como fazer como se fosses uma ajuda para dar dica Cliente 
Blog - Curso/112/... ListBox - Mostrar como se fosse ajuda e selecionar 
Blog - Curso/113/... Close - Window - Como mandar Varios Retornos 
Blog - Curso/114/... Pedido 19/... Salvar Digitacao do pedido
Blog - Curso/115/... Converter Code de Frances para Ingles ou Contrario 
Blog - Curso/116/... Pedido 20/... Recuperar Pedido Digitado 
Blog - Curso/117/... Pedido 21/... Gravar Pedido/Tabela pedidos e itens pedido 
Blog - Curso/118/... Como Nao Mudar Nome Variavel Windev 
Blog - Curso/119/... Pedido 22/... Calcular Titulos no Pedido 
Blog - Curso/120/... Pedido 23/... Pedido - Calculo condições 
Blog - Curso/121/... Faltou Luz e Recuperei uma Window do Projeto Windev 
Blog - Curso/122/... Pedido 24/... Calcular Titulo Modelo2  
Blog - Curso/123/... Pedido 25/... Tabela - Criando Duplicata Receber
Blog - Curso/124/... Pedido 26/... Duplicata Linkando com Pedido e cliente 
Blog - Curso/125/... Pedido 27/... Criando Tabela Contas Receber 
Blog - Curso/126/... Pedido 28/... Gravando Duplicatas ao Gerar Pedido
Blog - Curso/127/... ExecuteProcess 
Blog - Curso/128/... Code - Marcar Pontos - MARK 
Blog - Curso/129/... Pedido 29/... Pedido - Iniciando Relatorio 
Blog - Curso/130/... Menu Ribbon - Alterar Cor Seleção 
Blog - Curso/131/... Pedido 30/... Pedido Gerar Tabela Relatorio
Blog - Curso/132/... Pedido 31 - Listar Pedido 
Blog - Curso/133/... Pedido 32 - Windows Mdi
Blog - Curso/134/... Code Bricks
Blog - Curso/135/... Menu Ribbon 
Blog - Curso/136/... Dicas
Blog - Curso/137/... Dicas de Analise 
Blog - Curso/138/... Relatorio Filtrar Dados-Ex.Material Saldo
Blog - Curso/139/... Duas Tabelas - Arrastar de uma Tabela Para Outra Os Dados
Blog - Curso/140/... Code - Procedures - Como diferenciar com  Cores
Blog - Curso/141/... Wdk - Como Criar
Blog - Curso/142/... Internetconnection - Verificar Conexão
Blog - Curso/143/... TableEnableFilter
Blog - Curso/144/... ChaveComposta
Blog - Curso/145/... Detais - Mantatory Input - Campo Obrigatorio
Blog - Curso/146/... Datas - pegar String Nfe e Jogar no Date 
Blog - Curso/147/... Tabela Asc, Fazer em WinDev 
Blog - Curso/148/... SuperControle 
Blog - Curso/149/... Calendario
Blog - Curso/150/... Xml - Como Montar sem Comandos 
Blog - Curso/151/... Tabela Como Tirar Colunas 
Blog - Curso/152/... Tab - SideBar 
Blog - Curso/153/... String Para Numero -> VAL 
Blog - Curso/154/... Internet - HTML 
Blog - Curso/155/... Descontos Nos itens - nfe - Nfce
Blog - Curso/156/... Wdm - Mensagem de Ingles Para Portugues WinDev 
Blog - Curso/157/... Tabela Somar Valores com Condição
Blog - Curso/158/... Tabela Container
Blog - Curso/159/... Desabilitar Campo
Blog - Curso/160/... Mudar Cor do botao
Blog - Curso/161/... Window Mdi - Focus goin-
Blog - Curso/162/... Botao Seta Abaixo, Menu
Blog - Curso/163/... Separar Dia Mes Ano Na Data Arquivo Remessa Banco
Blog - Curso/164/... WinDev - Dashboard / Window Interna
Blog - Curso/165/... WinDev - Importar Ncm Site Olho Imposto 
Blog - Curso/166/... WinDev - Combox Fazer Manual e Selecionar Banco
Blog - Curso/167/... WinDev Tabela Coluna Check Style 
Blog - Curso/168/... Criar Varios Titulos Automatico -  Duplicatas
Blog - Curso/169/... HFilter - Combox Bancos Filtar por Empresa 
Blog - Curso/170/... Table Pai e Filho - Grupo e Materiais 
Blog - Curso/171/.. Email - Como Fazer Componente e Usar 
Blog - Curso/172/... Email - Componente - Anexo - Array 
Blog - Curso/173/... Boleto Pegar Retorno Banco
Blog - Curso/174/... Sistema Bandeja no Windows - SysIconAdd 

Teste

Teste
teste