joemil

ACBrNFSe1.Configuracoes.Arquivos.Salvar := True; ACBrNFSe1.Configuracoes.Geral.Salvar := True; ACBrNFSe1.Configuracoes.WebServices.Salvar := True; tem mais alguma?

ola pessoal, tb to querendo salvar o XML da NFS-e, mas nao ta salvando mais. ele gera as pastas 201406\RPS, 201406\Ger e 201406\NFSe, porem o XML da NFSe nao ta sendo salvo. alguma dica?

ok, obrigado mais uma vez

é NFe. o valor dos impostos ja é impresso proximo ao total da nota, mas nao informa a fonte. posso colocar nas informacoes complementares o texto: 'VALOR APROX. DOS IMPOSTOS-FONTE:IBPT'

valeu regys, vc como sempre atencioso e prestativo. outra duvida agora: como informo q a fonte foi o IBPT? coloco direto nas inf. complementares? ha algum lugar pra informar isso?

ola pessoal, vou iniciar o uso do IBPTax, e queria saber qual o link usado pra baixar o arquivo atualizado. pesquisei no forum, mas nao encontrei (acho mto confusa aquela pesquisa do google hehehe) se alg puder ajudar, agradeco

tb acho q deveria da segunda forma q o manoel santos postou. eu to fazendo assim: cdsBoletosCodCedente.AsString := ACBrBoleto1.Banco.MontarCampoCodigoCedente(titulo); e nao ta mostrando o codigo do cedente no boleto, e sim o numero da conta. alterei meu codigo no mesmo lugar indicado pelo manoel santos. apesar q uso esta informacao apenas na impressao do boleto, mas alterei pra ficar igual ao do banco. paralelamente, o arquivo remessa parece estar ok

e ai galera, tudo na paz? seguinte, to tentando enviar uma NFSe para o provedor Betha, mas como faco para mudar de linha da descricao do servico? pesquisei no forum, mas nao achei resposta

Ola pessoal, to fazendo os testes de envio do RPS para o provedor Betha, porem nao ta gravando o XML da NFSe (procurei no forum mas nao achei, caso alg tiver o link, por gentileza, inclua-o na respota) to usando o comando: ConfiguraNFSe; nroLote := '9'; protocolo := '93295748728213'; {ACBrNFSe1.ConsultarSituacao(SoNumeros(View_EmpresasCNPJ.AsString), View_EmpresasInsc_Municipal.AsString, Protocolo, nroLote);} ACBrNFSe1.ConsultarLoteRps(nroLote, Protocolo, SoNumeros(View_EmpresasCNPJ.AsString), View_EmpresasInsc_Municipal.AsString); procedure CofiguraNFSe: procedure TdmDados.ConfiguraNFSe; var xPasta, PathMensal: string; Ok: Boolean; begin xPasta := Pasta_Arquivos + 'NFSe\'+View_EmpresasNome.AsString; ACBrNFSe1.Configuracoes.Certificados.NumeroSerie := View_EmpresasCertificado_NFS_ACBr.AsString; ACBrNFSe1.Configuracoes.Arquivos.AdicionarLiteral := True; ACBrNFSe1.Configuracoes.Arquivos.EmissaoPathNFSe := True; ACBrNFSe1.Configuracoes.Arquivos.PastaMensal := True; ACBrNFSe1.Configuracoes.Arquivos.PathCan := xPasta; //edtPathLogs.Text; ACBrNFSe1.Configuracoes.Arquivos.PathNFSe := xPasta; //edtPathLogs.Text; ACBrNFSe1.Configuracoes.Arquivos.Salvar := True; PathMensal := ACBrNFSe1.Configuracoes.Arquivos.GetPathNFSe(0); ACBrNFSe1.Configuracoes.Geral.PathSchemas := DirPath + 'ACBrNFSe_Schemas\' + StringReplace(View_EmpresasProvedor_NFSe.AsString, ' ', '', [rfReplaceAll]); ; //edtSchemas.Text; ACBrNFSe1.Configuracoes.Geral.Salvar := True; //ckSalvar.Checked; ACBrNFSe1.Configuracoes.Geral.PathSalvar := xPasta; //edtPathLogs.Text; ACBrNFSe1.Configuracoes.WebServices.CodigoMunicipio := StrToInt(View_EmpresasCodIBGE.AsString); //StrToIntDef(edtCodCidade.Text, 0); ACBrNFSe1.Configuracoes.WebServices.Ambiente := StrToTpAmb(Ok, View_EmpresasNFSe_Ambiente.AsString); ACBrNFSe1.Configuracoes.WebServices.Visualizar := False; //ckVisualizar.Checked; ACBrNFSe1.Configuracoes.WebServices.SenhaWeb := ''; //edtSenhaWeb.Text; ACBrNFSe1.Configuracoes.WebServices.UserWeb := ''; //edtUserWeb.Text; ACBrNFSe1.Configuracoes.WebServices.ProxyHost := ''; //edtProxyHost.Text; ACBrNFSe1.Configuracoes.WebServices.ProxyPort := ''; //edtProxyPorta.Text; ACBrNFSe1.Configuracoes.WebServices.ProxyUser := ''; //edtProxyUser.Text; ACBrNFSe1.Configuracoes.WebServices.ProxyPass := ''; //edtProxySenha.Text; ACBrNFSe1.Configuracoes.WebServices.SetConfigMunicipio(ACBrNFSe1.Configuracoes.Geral.PathSchemas); o XML de retorno: <ConsultarSituacaoLoteRpsResposta> <NumeroLote>9</NumeroLote> <Situacao>4</Situacao> <ListaMensagemRetorno/> </ConsultarSituacaoLoteRpsResposta> o sistema gera os arquivos das pastas RPS e Ger (conforme anexo), mas nao me retorna a NFSe. qual a funcao usada para salvar o XML da NFSe??

ola pessoal, como esta o desenvolvimento do componente? tvz vou precisar tb e no q puder ajudar

ola pessoal, to tentando instalar o DACTe do FastReport, mas recebo o erro ao clicar em instalar: --------------------------- Delphi 7: delphi32.exe - Ponto de entrada não encontrado --------------------------- Não foi possível localizar o ponto de entrada do procedimento @Frxpdffile@initialization$qqrv na biblioteca de vínculo dinâmico frxe7.bpl. to usando D7, FR v. 4.12.6 fiz uma pesquisa mas nao encontrei alguma solucao. caso tenha algum posto com a solucao, por favor indique aqui, please. valew

Seria isto? tentei executar por fora do delphi tb. mesma coisa. to usando D7

agora ta ocorrendo o seguinte: se adiciono a linha: ACBrMail1.AddAttachment('f:\clientes.csv') o projeto fecha, mas nao envia o email com anexo, e se tento compilar novamente (F9), nao compila, so pisca o delphi e volta no mesmo lugar. o antivirus ta excluindo o executavel (Norton 360) e nao deixa compilar se nao coloco anexo, vai normal assim nao envia: ACBrMail1.AddAttachment('f:\clientes.csv'); ACBrMail1.Send; assim envia normal: // ACBrMail1.AddAttachment('f:\clientes.csv'); ACBrMail1.Send; mas o antivirus exclui o executavel de qq forma alguma dica? usei o exemplo q foi postado aqui neste post. e onde esta o demo?

fiz um teste simples aqui (gmail) e ta ok. parabens.

tb estou com o problema. atualizei o acbr, copei as dlls para a pasta SysWow64, mas continua o mesmo erro: Win 7 64 Certificado A3 - Serasa Leitora Perto CCID ja baixei todas as cadeias do site da serasa, o SafeSign versao 3.0.80 - 64Bits mais alguma dica?

vejam o blog do Mauro Negruni: http://www.mauronegruni.com.br/2013/09/18/porto-alegre-sera-palco-do-lancamento-nacional-da-nota-fiscal-eletronica-para-o-consumidor-final/

tb nao envio as NFS-e no SPED Fiscal, so no PIS/COFINS

é. esse governo apertando o cerco cada vez mais. so falta dar o devido retorno dos impostos. ainda bem q ja to bem adiantando para a emissao da NFC-e. so falta a impressao agora. to fazendo a impressao em FastReport. pelo q li no manual q postei, pode-se imprimir em A4. pode mesmo? assim q tiver pronto o layout da impressao eu posto aqui pra galera

pessoal, o erro na geracao do QRCode estava no manual mesmo, tem um espaco apos a letra 'd' no final da terceira linha. esse espaco acho q nao existe na tag. coloquei o espaco e funcionou igual ao manual. mas ainda acho q esse espaco nao existe no link do qrcode

veja o manual no link: https://www.google.com.br/url?sa=t&rct=j&q=&esrc=s&source=web&cd=1&ved=0CCwQFjAA&url=http%3A%2F%2Fwww.nfe.fazenda.gov.br%2Fportal%2FexibirArquivo.aspx%3Fconteudo%3DjKHRw%2520g4V%2520E%3D&ei=8NxKUqzNOomS9QS86YCwAw&usg=AFQjCNHozXgGX-0zbCSRbWtioAASoDrXeQ&sig2=EbK5mlYLwPW5JRoIcI1FBw&bvm=bv.53371865,d.dmg eu fiz mais ou menos assim: Memo1.Lines.Clear; // MONTA Texto := 'chNFe=' + edChave.Text { chave da NFCe }+ '&nVersao=' + edVersao.Text { versão do QRCode - 100 }+ '&tpAmb=' + edAmb.Text { ambiente 1-producao, 2-homologacao }+ IfThen(Length(edCPF.Text) > 0, '&cDest=' + edCPF.Text, '') { cpf/cnpj do destinatario }+ '&dhEmi=' + TextToHex(edData.Text) { data/hora no formato 2012-09-27T16:20:34-03:00 }+ '&vNF=' + edTotal.Text { total do cupom 100.00 } + '&vICMS=' + edICMS.Text { valor do icms 18.00 }+ '&digVal=' + TextToHex(edDigestValue.Text) { tag digest value do xml } '&cIdToken=' + edToken.Text { numero do token 000001 }; Hash_SHA1 := ACBrEAD1.CalcularHash(UTF8Encode(Texto), dgstSHA1); Texto := Texto + edToken2.Text; Memo1.Text := 'http://www.hom.nfe.sefaz.mt.gov.br/portal/consultarNFCe.jsp?' + Texto + '&cHashQRCode=' + Hash_SHA1;

uhuuu. agora sim deu certo. consegui enviar varias notas para o ambiente de testes. so nao testei ainda o QR Code

opa, valeu, ja to atualizando aqui pra fazer os testes. (prazo ta curtoooooooooooooooo hehehe)

tb nao estou conseguindo enviar o xml para o ambiente de testes. nao retorna erro, mas tb nao envia. aqui no MT vai comecar o piseiro dia 01/10

nem fazendo o 2 exemplo (pag 20 do manual), tb nao bate. precisa converter o hash pra algum outro padrao?

pra tirar a duvida fiz o seguinte: colei o texto abaixo em alguns sites de calculam hash sha1 online: chNFe=43120910585504000174650010000000541123456781&nVersao=100&tpAmb=2&dhEmi=323031322d30392d32375431363a32303a33342d30333a3030&vNF=1000.00&vICMS=180.00&digVal=37327151612b623074616f514f3966414a7766646c5875715176383d&cIdToken=0000011058550420130001 usei estes 2 sites pra verificar http://sha1-hash-online.waraxe.us/ http://www.xorbin.com/tools/sha1-hash-calculator e o resultado realmente é o mesmo do delphi. acho q tem alguma coisa no manual q ta errada hehehe. e eu aqui batendo cabeca