-
Total de ítens
254 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Alexsandro Lopes
-
-
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...
-
Fiz a importação do seu TXT no Demo do ACBr (em Lazarus)... O XML gerado parece correto...
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
-
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
<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...!
-
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 ....
-
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....
-
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
-
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
-
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/
-
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
-
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.
-
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 !!!
-
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
-
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....
-
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 ...
-
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
-
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???
-
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 !!!
- 1
-
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 ...
- 1
-
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 dobeginTotalItem := (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 campoImposto.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 dobeginTotalItem := (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 campoImposto.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
-
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
-
eu estou tendo muitos problemas com as dll de comunicaçao questao de velocidade de resposta ...
Problema Na Hora de importar Txt Com Valores da NFE
em ACBrMonitor PLUS
Postado · Editado por 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 .....