Valtenci Santos

Após Atualizar o ACBr, e substituir os .fr3, minha impressao ficou assim... tem q fazer algum ajuste no codigo obrigado. DANFeNFCe.pdf

Ola, gostaria de saber se existe um Roteiro ou Manual para Homologação/Testes do MFE junto a Sefaz CE, ou se só e seguir as rotinas dos integradores MFE, tipo Elgin, Tanca, e etc. desde já agradeço.

Ola, estou com algumas duvidas em relação ao MFE - CE, e gostaria de esclarecer.: 1a - Para testar o meu PDV tenho que ter um modulo MFE(no nome da minha Software house) ou pode ser de um cliente meu ? 2a - Tenho que ter um modulo MFE(no nome da minha Software house) ou pode ser de um cliente meu para Homologar ? Obrigado desde ja a quem poder me orientar.

Ola Boa noite, estou emitindo uma NFe e na impressao do Danfe, nao esta mostrando os campos de PIS e COFINS, estou usando o compoente FortesReport, no XML gerado, tem todos os valores de pis, cofins, e etc, mais na impressao do danfe nao esta saido/mostrando. desde ja agradeço.

Deu certo, Obeigado Amigo. Obrigado*

ao desabilitar retirar acentos no componente, para que apareça os acentos na impressão do Danfe, estou validando a NFe e esta dando erro na validação dos schemas.

Obrigado.

Ola Bom dia Gostaria de saber como faço para na impressão da Sair as Devidas Acentuações, pois nome do cliente, endereço e etc não esta saindo impressos no Danfe, no meu ERP esta tudo Acentuado, só na hora da impressão q não sai no Danfe. Gratos.

ola, estou usando o codigo abaixo que peguei nos exemplos do ACBr procedure ButtonClick(Sender: TObject); var UF, Documento : String; begin // use como exemplo // UF :='PE'; // Documento :='09581721000298'; // UF :='RN'; // Documento :='03752712000155'; if not(InputQuery('WebServices Consulta Cadastro ', 'UF do Documento a ser Consultado:', UF)) then exit; if not(InputQuery('WebServices Consulta Cadastro ', 'Documento(CPF/CNPJ)', Documento)) then exit; Documento := Trim(OnlyNumber(Documento)); ACBrNFe1.WebServices.ConsultaCadastro.UF := UF; if Length(Documento) > 11 then ACBrNFe1.WebServices.ConsultaCadastro.CNPJ := Documento else ACBrNFe1.WebServices.ConsultaCadastro.CPF := Documento; ACBrNFe1.WebServices.ConsultaCadastro.Executar; MemoResp.Lines.Text := ACBrNFe1.WebServices.ConsultaCadastro.RetWS; memoRespWS.Lines.Text := ACBrNFe1.WebServices.ConsultaCadastro.RetornoWS; MemoDados.Lines.Add(''); MemoDados.Lines.Add('Consulta Cadastro'); MemoDados.Lines.Add('versao: ' +ACBrNFe1.WebServices.ConsultaCadastro.versao); MemoDados.Lines.Add('verAplic: ' +ACBrNFe1.WebServices.ConsultaCadastro.verAplic); MemoDados.Lines.Add('cStat: ' +IntToStr(ACBrNFe1.WebServices.ConsultaCadastro.cStat)); MemoDados.Lines.Add('xMotivo: ' +ACBrNFe1.WebServices.ConsultaCadastro.xMotivo); MemoDados.Lines.Add('DhCons: ' +DateTimeToStr(ACBrNFe1.WebServices.ConsultaCadastro.DhCons)); end; teste dois estados e pessiste o erro.

O Problema e esse nao gera nenhum retorno, conforme print em anexo

Ola, estou tentando consulta contribuinte do Estado do RN, e esta me retornando o seguinte erro, alguém sabe o porque ?? desde já agradeço.

Ola Boa Tarde, quando Gero uma NFe, no xml esta saindo 4 casas apos a virgula, conforme anexo como corrigir para 1.320,00 tanto na NFE como no MDFE esta com esse numeros apos a virgula a mais. Obrigado

ola, esta retornando essa mensagem ( Rejeicao: Cabecalho - Versao do arquivo XML nao suportdada ) quando estou enviando, encerrando uma MDFe tanto em ambiente de homologacao e de Producao desde ja agradeco a todos.

Ola, usando o ACBrNFe_demo, verificando o botao Importar TXT/XML, esta mostrando os dados do XML em um Memo perfeitamente, minha duvida e: como faço para que o mesmo puxe varios xml ao mesmo tempo, em vez de so um como esta atualmente. quero puxar varios xml e mostrar no Memo. desde ja agradeço a todos.

Ola Boa tarde a todos, gostaria de saber qual os registos necessários para pegar do XML do NFCe para o Sped, do cupom fiscal PAF-ECF, eu sei quais são os registros, mais do XML do NFCe não estou sabendo qual registros necessário. desde ja agradeço.

vixi, olhando bem era isso mesmo, obrigado amigo....

Ao enviar a MDFe esta me retornando o seguinte erro... is not a invalid integer value, (nao e um valor inteiro valido Ide.serie := StrToInt(frmmodulo.qremitenteCERT.AsString); <- numero de serie do certificado (00D1932E) ja troquei na tabela para string, mais continua mesmo coisa... alguem tem uma solucao ?? desde ja agradeco.

não entendi o que vc quis dizer em abrir o formulário em que esta o componente abri o formulário q esta o componente, compilei e continua o mesmo erro. tem q referenciar essa unidade na geração do xml

Ola Boa noite a todos, apos atualizar o acbr e compilar minha aplicação, ao entrar no meu modulo de emissao de nfe me deparei com a seguinte mensagem de erro. conforme print em anexo, la no parametro esta com False, coloquei como True e continuou o mesmo erro. como proceder neste caso.?

Ola boa Noite, ao enviar uma NFe ou NFCe, apos retorno OK, aparece o preview, com a NFe ou NFCe, no cantinho direito, tem um icone de uma impressora para que o usuario possa imprimir, ao clicar nesse icone, a impressao ja começa, ai que esta a minha duvida, tem alguma configuração para abrir a caixa de escolha listando as impressoras ao qual eu quero imprimir ???, seja a padrao ou uma em rede ?

Olá Boa Noite, o idCSC e o CSC e para sair no xml, se sim, como proceder, pois nao tem no exemplo do ACBr, la so tem como informar nas Configurações Gerais. Obrigado

ja resolvi aqui Amigo, muito obrigado pela dica. abraços.

Obrigado pela resposta, mais meu ACBe esta Atualizado, e estou pegando o exemplo do propiro ACBr, devo desconsiderar o que tem la no exemplo entao ?? Grato.

Ola, estou implantando o calculo de Fundo de combate a pobreza na meu NFCe, estou seguindo o exemplo do ACBRNFCe/NFe, e esta me retornando um erro. segue abaixo meu codigo, e o print do erro que me retorna. //codigo with Imposto do begin vTotTrib := (Prod.vProd * qrProdNCFE.fieldbyname('ALIQNACIONAL') .Value) / 100; total_trib := roundABNT(total_trib + vTotTrib, 2); // simples nacional if qrfilial.fieldbyname('CRT').asinteger < 3 then begin with ICMS do begin if (grid.Cell[11, i].asstring = '000') then CST := cst00 else if (grid.Cell[11, i].asstring = '010') then CST := cst10 else if (grid.Cell[11, i].asstring = '020') then CST := cst20 else if (grid.Cell[11, i].asstring = '030') then CST := cst30 else if (grid.Cell[11, i].asstring = '040') then CST := cst40 else if (grid.Cell[11, i].asstring = '050') then CST := cst50 else if (grid.Cell[11, i].asstring = '060') then CST := cst60 else if (grid.Cell[11, i].asstring = '070') then CST := cst70 else if (grid.Cell[11, i].asstring = '080') then CST := cst80 else if (grid.Cell[11, i].asstring = '090') then CST := cst90; if qrProdNCFE.fieldbyname('csosn').asstring = '101' then ICMS.CSOSN := csosn101 else if qrProdNCFE.fieldbyname('csosn').asstring = '102' then ICMS.CSOSN := csosn102 else if qrProdNCFE.fieldbyname('csosn').asstring = '103' then ICMS.CSOSN := csosn103 else if qrProdNCFE.fieldbyname('csosn').asstring = '201' then ICMS.CSOSN := csosn201 else if qrProdNCFE.fieldbyname('csosn').asstring = '202' then ICMS.CSOSN := csosn202 else if qrProdNCFE.fieldbyname('csosn').asstring = '203' then ICMS.CSOSN := csosn203 else if qrProdNCFE.fieldbyname('csosn').asstring = '300' then ICMS.CSOSN := csosn300 else if qrProdNCFE.fieldbyname('csosn').asstring = '400' then ICMS.CSOSN := csosn400 else if qrProdNCFE.fieldbyname('csosn').asstring = '500' then ICMS.CSOSN := csosn500 else if qrProdNCFE.fieldbyname('csosn').asstring = '900' then ICMS.CSOSN := csosn900 else ICMS.CSOSN := csosnVazio; ICMS.pCredSN := 0; ICMS.vCredICMSSN := 0; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := 0; total_base := 0; ICMS.pICMS := 0; ICMS.vICMS := 0; total_icms := 0; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := 0; ICMS.pRedBCST := 0; ICMS.vBCST := 0; ICMS.pICMSST := 0; ICMS.vICMSST := 0; ICMS.pRedBC := 0; -->Aqui // partilha do ICMS e fundo de probreza with ICMSUFDest do begin vBCUFDest := 0.00; pFCPUFDest := 0.00; pICMSUFDest := 0.00; pICMSInter := 0.00; pICMSInterPart := 0.00; vFCPUFDest := 0.00; vICMSUFDest := 0.00; vICMSUFRemet := 0.00; end; end; erro retornado no print. desde já agradeço.