Alexsandro Lopes

if (nfe.infNFe.Versao < 3.10) then begin (*B09*)NFe.ide.dEmi := LerCampo(tcDat, 'dEmi'); (*B10*)NFe.ide.dSaiEnt := LerCampo(tcDat, 'dSaiEnt'); (*B10a*)NFe.ide.hSaiEnt := LerCampo(tcHor, 'hSaiEnt'); end else begin (*B09*)NFe.ide.dEmi := LerCampo(tcDatHor, 'dhEmi'); NFe.Ide.dSaiEnt := LerCampo(tcDatHor, 'dhSaiEnt'); end; end; aQUI ESTA CORRETO ELE ESTA PEGANDO O VALOR QUE A FUNÇAO ESTA PASSANDO PARA ELE DIREITINHO ... function TNFeRTXT.LocalizarPosicaoTAG(TAG: String; Conteudo: String): Integer; var i, contador: Integer; begin TAG := Trim(TAG); conteudo := copy(conteudo, 1, pos('|' + TAG + '¨', conteudo)); contador := 0; for i := 1 to length(conteudo) do if conteudo = '|' then inc(contador); result := contador; end; Quando TAG esta referente a DATA Ele retorna zero entao nao identifica valores para o campo alguma soluçao ou esta desatualizado ja tentei de varias formas e sempre ele me retorna os valores equivocados .....

obrigado vou olhar e dou resposta se conseguir resolver...

sim aparentemente esta correto .!! estou usando delphi 7 nao sei se tem alguma coisa haver mais se for em qual fonte eu encontro o código de rotina onde ele pega o txt ler e poe na nota campo a campo... para que eu possa altera-lo para delphi 7 .... o txt que te enviei foi gerado ontem na hora do post aqui no forum e o acbr esta atualizado pelo 'svn' mais atual.. OpenDialog1.FileName := ''; OpenDialog1.Title := 'Selecione a NFE'; OpenDialog1.DefaultExt := '*-nfe.XML'; OpenDialog1.Filter := 'Arquivos NFE (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Arquivos TXT (*.TXT)|*.TXT|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin ACBrNFe1.NotasFiscais.Clear; //tenta TXT ACBrNFe1.NotasFiscais.Add; NFeRTXT := TNFeRTXT.Create(ACBrNFe1.NotasFiscais.Items[0].NFe); NFeRTXT.CarregarArquivo(UTF8Encode(OpenDialog1.FileName)); if NFeRTXT.LerTxt then NFeRTXT.Free

observe que valores de txt divergente de valor xml valores de data <dhEmi>1899-12-30T00:00:00-03:00</dhEmi> aqui e a parte do txt. =>2015-08-27T00:00:00-03:00 se for so configurar utf-8 como faço pelo acbr eu acredito que seja na forma que a rotina que esta pegando os valores .... se for...porfavor onde eu encontro essa rotina ja procurei pelo acbr inteiro e nao consegui encontrar agradeço pela ajuda desde ja...! 23150806121527000150550010000000011000000013-nfe.xml NFe.TXT

Quanto importo um txt ..."txt esta correto" a rotina acbr informa ou pega valores errados fazendo assim o xlm ficar incorreto segue em anexo o xml e o txt ....

ja foi resolvido meu caro amigo italo ... por um erro meu tinha mudado a propriedade nfecanceladas para:= true e estava acontecendo esse erro nesse momento se vc puder me ajudar em outro ponto do codigo te agradeço venho tentando exportar oum txt para gerar o xml e transmitir mais por algum motivo ele nao esta 'informando a data correta' no txt a data esta certa mais na hora da leitura deste mesmo ela sair muito atrasada.... se ja tiver passado por isso da uma luz que ja estou pensando em ler eu mesmo o txt....

estou com um pequeno problema com essa rotina na hora de importar ela nao me fornece as datas corretas em anexo o txt com os dados da nota por favor se alguém puder me dar uma luz

estou com um problema na hora que importo o txt ele esta retornando a data invalida mais o txt esta indo correto onde posso editar a forma como ele pega o txt ou uma soluçao problemas em todas as datas NFe.TXT

RESOLVIDO... http://www.projetoacbr.com.br/forum/topic/16121-protocolo-de-homologação-do-cancelamento/

na hora da impressão no campo Parametros contigencia_descricao , quando vou imprimir aparece a frase "Protocolo de homologação do cancelamento" e não consigo tirar a palavra cancelamento na hora de imprimir o danfe ... uma luz por favor ...!!!

na hora da impressão no campo Parametros contigencia_descricao , quando vou imprimir aparece a frase "Protocolo de homologação do cancelamento" e não consigo tirar a palavra cancelamento,. Alguém já passou por isso ou pode me dar uma luz? o certo era aparecer protocolo de autorização de uso;;.....

onde eu coloco esse CNPJ e xNOME to tentando e na o ta dando certo

Entrei em contado com a sefaz -CE e me deram retorno que pro ceara ainda nao tem previsão de lançar NFC-e pois eles nao tem autorização e estão tendo problemas com com essas URL ESTADO DO CEARA.

UF = CE / estou tentando implantar NFC-e o comando onde ele pega pelo que ando lendo e nessa função GetURL class function NotaUtil.GetURL(const AUF, AAmbiente, FormaEmissao : Integer; ALayOut: TLayOut; AModeloDF: TpcnModeloDF = moNFe; AVersaoDF: TpcnVersaoDF = ve200): WideString; 23: Result := NotaUtil.GetURLCE(AAmbiente, ALayOut, AModeloDF, AVersaoDF); //CE onde pega url AAmbiente:=homologacao ALayOut:=laynfeautorizacao AModeloDF:=moNFCe AVersaoDF:=ve310 result fica = ''; Régys Silveira Desde ja agradeço pela paciência !!!

Seu ACBr está desatualizado. Regys silveira meu se o endereço de repositório do svn estiver correto o meu acbr nao esta desatualizado utilizo o ultimo endereço informado .. 23: Result := NotaUtil.GetURLCE(AAmbiente, ALayOut, AModeloDF, AVersaoDF); //CE result fica como =0

to tentando mais estou com o mesmo problema diz nao ter "url nao disponivel para o estado solicitado" gostaria de saber se ja tem ! nos fontes contem uma url la pra o estado do ceara mais ele nao identifica ajuda por favor....

eu te pergunto se o MODULO SAT ESTIVER OPERACIONAL tudo certo fun fun direitinho e a empresa estiver sem internet ele vai me dar algum retorno pq ele e modulo offline ...

muito obrigado daniel simoes

Como faço p/ consultar se tem alguma cf-e que nao foi transmitida p/ sefaz pelo MODULO SAT PARA QUE EU POSSA MANDAR POR CONTIGENCIAn ou isso e automático existi algum comando no acbr que faça isso pra que eu possa utilizar???

desculpe so tentando ajudar !!!

pelo que eu intendi no leiaute do arquivo de venda(CF-e-SAT) http://www.fazenda.sp.gov.br/sat/downloads/Especificacao_SAT_v_ER_2_14_10.pdf pagina .77 grupo de pis para contribuinte do SIMPLES NACIONAL =>CST=49 pagina .80 Grupo CONFINS para contribuinte do SIMPLES NACIONAL =>CST=49 da uma olhada la mais e isso mesmo ...

with Det.Add do begin TotalItem := (Prod.qCom * Prod.vUnCom); Imposto.vItem12741 := TotalItem * 0.35; Imposto.iCMS.orig := oeNacional; //Imposto.ICMS.CST := cst00; Imposto.ICMS.CSOSN:=csosn500; //Imposto.ICMS.pICMS := 17; se Imposto.ICMS.CSOSN:=csosn500 nao informaar esse campo Imposto.PIS.CST := pis49; Imposto.PIS.vBC := 0; Imposto.PIS.pPIS := 0; //Imposto.PIS.vBC := TotalItem; //Imposto.PIS.pPIS := 0.0065; Imposto.COFINS.CST := cof49; Imposto.COFINS.vBC := 0; Imposto.COFINS.pCOFINS := 0; //Imposto.COFINS.vBC := TotalItem; //Imposto.COFINS.pCOFINS := 0.0065; //Imposto.COFINSST.vBC := 87206.46; //Imposto.COFINSST.pCOFINS := 1.8457; end; consegui resolver desta forna depois de muito apanhar

with Det.Add do begin TotalItem := (Prod.qCom * Prod.vUnCom); Imposto.vItem12741 := TotalItem * 0.35; Imposto.iCMS.orig := oeNacional; //Imposto.ICMS.CST := cst00; Imposto.ICMS.CSOSN:=csosn500; //Imposto.ICMS.pICMS := 17; se Imposto.ICMS.CSOSN:=csosn500 nao informaar esse campo Imposto.PIS.CST := pis49; Imposto.PIS.vBC := 0; Imposto.PIS.pPIS := 0; //Imposto.PIS.vBC := TotalItem; //Imposto.PIS.pPIS := 0.0065; Imposto.COFINS.CST := cof49; Imposto.COFINS.vBC := 0; Imposto.COFINS.pCOFINS := 0; //Imposto.COFINS.vBC := TotalItem; //Imposto.COFINS.pCOFINS := 0.0065; //Imposto.COFINSST.vBC := 87206.46; //Imposto.COFINSST.pCOFINS := 1.8457; end; consegui resolver desta forna depois de muito apanhar

mais se voce fizer isso ele vai estar em regime normal e nao simples nacional se eu estiver enganado peço desculpas mais acho que o problema nao e esse

eu estou tendo muitos problemas com as dll de comunicaçao questao de velocidade de resposta ...