Alexsandro Lopes

28 Agosto, 2015

    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 .....

28 Agosto, 2015

unit pcnNFeRTXT.pas

procedure TNFeRTXT.LerRegistro(const Registro: String);

linha: 261

       (*B09*)NFe.ide.dEmi := LerCampo(tcDatHor, 'dhEmi');

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

28 Agosto, 2015

Fiz a importação do seu TXT no Demo do ACBr (em Lazarus)... O XML gerado parece correto...

NFe.XML

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

27 Agosto, 2015

veja o enconding do mesmo!utf-8 ansi e como está configurado no monitor

observe que valores de txt divergente de valor xml

valores de data

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

26 Agosto, 2015

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 ....

21 Agosto, 2015

Boa tarde Alexsandro,

O DANFE que você se refere foi feito em qual Report?

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....

20 Agosto, 2015

Resolvido, para quem precisar....

Obrigado juliomar

  NFe:= TACBrNFe.Create(Self);

  NFe.NotasFiscais.Clear;

  NFe.NotasFiscais.Add;

  NFeRTXT:= TNFeRTXT.Create(NFe.NotasFiscais.Items[0].NFe);

  NFeRTXT.CarregarArquivo("NomeDoArquivo");

  if Not(NFeRTXT.LerTxt) then begin

    ShowMessage('Arquivo não pode ser lido!');

    Exit;

  end;


  /*A partir desse trecho o objeto NFe.NotasFiscais.Items[0] pode ser usado*/

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

20 Agosto, 2015

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

14 Agosto, 2015

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;;.....

RESOLVIDO...

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

14 Agosto, 2015

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 ...!!!

13 Agosto, 2015

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;;.....

16 Julho, 2015

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

9 Julho, 2015

Boa tarde Alexsandro,

O Ceará no que diz respeito a NFC-e vai utilizar a SEFAZ-Virtual-RS ou é a SEFAZ-CE que vai recepcionar as NFC-e?

Se for a SEFAZ-CE por favor nos informe as URLs de cada Web Services para que possamos atualizar a unit ACBrNFeUtil, poi esta ainda não possui elas.

Não é atoa que é retornado uma string vazia.

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.

8 Julho, 2015

Para qual UF e qual tipo você está usando (NF-e/NFC-e)?

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 !!!

8 Julho, 2015

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....

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

6 Julho, 2015

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....

16 Junho, 2015

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???

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 ...

15 Junho, 2015

o ACBrSAT só fala com o equipamento... quem fala com o SEFAZ é o próprio SAT...

Se o SAT lhe deu a resposta como aprovado... esqueça... ele irá fazer o trabalho dele...

Você pode ler a especificação funcional do SAT e saber se há alguma maneira de se comunicar diretamente com o SEFAZ para obter essa informação

muito obrigado daniel simoes

12 Junho, 2015

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???

12 Junho, 2015

Parabéns..

por favor queira postar em um único local não precisa postar em todos os tópicos do fórum!

desculpe so tentando ajudar !!!

12 Junho, 2015

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 ...

11 Junho, 2015

Já descobri o problema, era o mesmo informado acima porém não percebi uma inconsistência no TesteSAT.exe que usava como referencia.

O regime estava retornando 0 para simples nacional e 1 para regime normal e era ai o problema, estava apontando como 0 o regime causando então o problema, apenas apontei para 1 e agora sim gera corretamente.

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

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

11 Junho, 2015

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

11 Junho, 2015

Já descobri o problema, era o mesmo informado acima porém não percebi uma inconsistência no TesteSAT.exe que usava como referencia.

O regime estava retornando 0 para simples nacional e 1 para regime normal e era ai o problema, estava apontando como 0 o regime causando então o problema, apenas apontei para 1 e agora sim gera corretamente.

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

11 Maio, 2015

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

Entrar

Sobre nós...

Blocks

Notes ACBrLibNFe

Fóruns

Downloads

Calendário

Posts postados por Alexsandro Lopes

Sobre nós...

Informação Importante