felipeiw

Pessoal nao sei se posso colocar essa duvida aqui, mas é o seguinte estou desenvolvendo um método para importar os dados de cadastros de clientes e produtos no emissor gratuito de nfe para uma tabela firebird. Abrindo o arquivo no bloco de notas as palavras com acentos estão corretas, porem quando executo os seguintes comandos, as palavras acentuadas ficam todas erradas, ou melhor é trocado as letras por simbolos, tem como resolver isso, importando com os acentos ? #código xarqimp := TStringList.Create; xarqimp.StrictDelimiter := True; xarqimp.Delimiter := '|'; AssignFile(F,xnomarq); Reset(F); while not(Eof(F)) do begin Readln(F,xlinha); xarqimp.DelimitedText := xlinha; if (Length1(xlinha) > 0) then ShowMessage(xlinha); end; obrigado

pessoal sei que tem bastante material aqui no forum sobre esse assunto, mas realmente o caso é um pouco urgente, então peço desculpas por estar perguntando antes de fazer uma pesquisa, um cliente pegou um virus q acabou perdendo os xml de 1 mes existe alguma maneira de baixa-los em lote do site do sefaz sp ? obrigado

Pessoal tenho um cliente que seu numero de apolice de seguro possui 24 numeros, porem o xml aceita no maximo 20, existe alguma alternativa para passar o numero completo com 24 algarismos ? obrigado

Acho que foi tudo uma coincidencia a atualização do sistema com esses problemas da SEFAZ, pois esta funcionando agora, e nao fiz nenhuma alteração. Obrigado

Obrigado Fabio Em SP Estou inclusive acompanhando os amigos do forum com esses problemas em SP, mas acredite ontem eu achava que era apenas coincidencia a troca de versão, ficamos inclusive aguardando estabilizar, mas hoje fazendo um teste e voltando a mh versão de 1 ano atras, voltou a funcionar e enviar as nfe. Abs

Troquei a versao do meu sistema em um cliente, eles estavam usando ainda uma versão do meu sistema compilado com o "trunk1", ontem enfim atualizei com a versão atual que ja esta a muito tempo com a trunk 2, somente esse cliente ainda estava dessa maneira, e agora não envia nfe pela versão nova retorna a mensagem INATIVO OU INOPERANTE, O TEMPO LIMITE DA OPERACAO FOI ATINGIDO, tento enviar a mesma nota com a versão de 1 ano atras e vai certinho, tento com a versão atual e retorna esse erro, pode ser que esteja faltando alguma dll, ou alguma configuração ? obrigado

Pessoal gostaria de saber como voces fazem a carta de correção do CTe, toda vez preciso passar para o usuario o grupo e nome do campo, olhando no manual da CTe, pois o pessoal não conseguem encontrar essa informação, é isso mesmo ? Alguem tem alguma sujestão ? mt obrigado

Pessoal estou usando para imprimir o encerramento o seguinte codigo ACBrMDFe1.EventoMDFe.Evento.Clear; ACBrMDFe1.EventoMDFe.LerXML( 'c:\MDFe\'+FormatDateTime('YYYYMM',ManifestosDATEMI.AsDateTime)+'\MDFe\Evento\Encerramento\'+'110112'+Trim(ManifestosCHAVE.Value)+'01-procEventoMDFe.xml';); ACBrMDFe1.ImprimirEvento; mas percebi q nao esta mais gerando esse xml e nem a pasta \encerramento, seria alguma propriedade que nao estou passando corretamente ? Obrigado

Obrigado Italo, Na primeira reclamação eu copiei e colei a parte do manual, que diz isso, mas cliente é complicado, ele disse q os clientes dele é que estão reclamando, enfim é complicado, porem mt obrigado pessoal !

Juliomar obrigado pela resposta -<Comp><xNome>FRETE PESO</xNome><vComp>0.18</vComp></Comp> no xml tb fica com 2 casas, no sistema o valor seria 0,1750, o duro q olhei no manual e no manual diz q esse campo é com 2 decimais, e o cliente quer q imprima 4, nao sei o que fazer, algum amigo tem alguma sujestão ? obrigado a todos

pessoal estou com um problema na hora de imprimir o cte, no campo componentes do valor da prestação de serviço, meu cliente utiliza 4 casas decimais no item frete peso, mas nao consigo imprimir as 4 casas, imprime apenas 2 casas, por favor, estou passando da seguinte maneira: if (RoundTo(CdFretesFREPES.AsFloat,-4) > 0) then begin with vPrest.comp.Add do begin xNome := 'FRETE PESO'; vComp := RoundTo(CdFretesFREPES.AsFloat,-4); end; end; Obrigado

perfeito Italo a hora esta diferente e sempre sera pq ela faz o cte e depois de alguns minutos provavelmente vai tentar fazer a CONSULTA, e eu estava usando o NOW na propriedade, alterei para pegar a data e hora do banco de dados do momento de geração do cte. vou testar e retorno, mt obrigado Italo

Italo muito obrigado pela resposta, o que esta acontecendo é exatamente como vc descreveu, enviamos o cte o sefaz aceita porem nao me retorna o protocolo, faço o processo que mencionei para acertar o xml, estou enviando o xml baixado do sefaz e o xml q tentei "consultar" abs 35160707640854000181570010000123041000123042-cteOriginal.xml 35160707640854000181570010000123041000123042-cteSefaz.xml

bom dia doni obrigado é isso que estamos fazendo porem queria uma maneira de resolver pelo proprio sistema, o que acontece é que a chave nao retorna pro sistema por alguma problema na internet, antes o simples fato de consultar o cte resolvia o problema mas agora fica retornando esse erro. abs

Italo mt obrigado pela resposta. fiz conforme vc mencionou, mas continuou retornando o erro citado acima.

provavelmente por problema na internet estou com alguns ctes sem a chave, protocolo e recibo, quando tento enviar novamente retorna erro de duplicidade, claro a sefaz ja recebeu, porem estou fazendo o seguinte: ACBrCTe.Conhecimentos.Clear; ACBrCTe.Conhecimentos.LoadFromFile(DiretorioXML+Trim(DM1Fretes.CdsFretesCTECHA.Value)+'-cte.xml'); ACBrCTe.Consultar; if (ACBrCTe.WebServices.Consulta.cStat = 100) then showmessage('Conhecimento Autorizado !'); end; mas esta retornando o seguinte erro Digest do documento (chave) nao confere, e nestes casos estou tendo que baixar o xml do sefaz, como faço pra resolver pelo sistema, existe alguma maneira diferente de autorizar o xml ? abs e obrigado

jaques obrigado pelas respostas mais uma duvida, depois do comando ACBrNFe1.Consultar vc usa o ACBrNFe1.NotasFiscais.GravarXML ? é isso ? valeu

quando faço o ACBrNFe1.Consultar

muito obrigado jaques, o consultar eu passei a fazer, porem de tem dado muito desse erro: DigestValue do documento nao confere, sera que devo usar tambem o gravarXML ? abs

pessoal tenho um problema, seguinte o sistema envia a nota pro sefaz, por algum motivo não retorna a chave, o usuário então tenta enviar novamente e retorna erro de duplicidade, o que os amigos fazem pra resolver essa situacao ? neste momento estou baixando o xml do sefaz manualmente e substituindo na pasta do sistema, mas isso da mt trabalho é dificil de ensinar pros usuarios, precisava resolver pelo sistema. obrigado

Sim andre fiz exatamente isso, mas muito obrigado por responder, montei uma função para retornar a impressora padrão e passo pra propriedade da seguinte maneira: function ImpressoraPadrao: String; begin if (Printer.PrinterIndex >= 0)then Result := Printer.Printers[Printer.PrinterIndex] else Result := 'Nenhuma impressora Padrão foi detectada'; end; ACBrDanfeCB.Impressora := ImpressoraPadrao; abs

estou usando o fortes report, acho q nao existe essa propriedade para este componente.

Alguma sujestão ?

quanto tento cancelar um mdfe esta retornando o seguinte erro Rejeição: Falha no Schema XML especifico para o evento. Acabei de baixar o ultimo arquivo de schemas 11/09/2015 nt03.2015 enviar, consultar, encerrar, tudo funcionando perfeitamente abs

montei uma tela para imprimir as danfes em lote, consegui desligar a opcao preview e tb de status, porem nao consigo desligar a tela de escolha de impressora, tem alguma propriedade para desligar essa tela ? Senao o usuario tem que ficar clicando em OK para cada nota a ser impressa obrigado