Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 19-01-2024 em todas as áreas

  1. Olá Pessoal, É com grande alegria que informo a todos que já se encontra no SVN o componente ACBrNFCom. Para quem não sabe o que vem a ser NFCom, segue abaixo o texto copiado do Portal da SEFAZ-Virtual do Rio Grande do Sul. "O Projeto NFCom tem como objetivo a implantação de um modelo nacional de documento fiscal eletrônico (modelo 62) que venha substituir a sistemática atual de emissão da Nota Fiscal de Serviço de Comunicação/Telecomunicações (modelos 21 e 22), com validade jurídica garantida pela assinatura digital do emitente, simplificando as obrigações acessórias dos contribuintes e permitindo, ao mesmo tempo, o acompanhamento da emissão em tempo real pelo Fisco." Foi enviado para o SVN, os fontes do componente, os pacotes de instalação para o Delphi e Lazarus e o programa exemplo para o Delphi. O que falta a ser feito: o programa exemplo para o Lazarus e a instalação do componente via ACBrInstall. Enquanto não for liberado uma nova versão do ACBrInstall a instalação do componente vai ter que ser via pacote. Como eu não tenho um certificado digital de um prestador de serviço de comunicação/telecomunicações os testes ficam prejudicados. Detalhe importante: Na pagina que trata o NFCom no Portal da SEFAZ-Virtual do Rio Grande do Sul não consta ainda o manual com o layout do DANFCom, sendo assim não foi possível implementar o componente de geração do Documento Auxiliar da NFCom. Convido a todos que tenham interesse nesse componente, instalar e fazer os testes. Ficaremos felizes em receber melhorias e correções nos fontes do componente.
    8 pontos
  2. LT_SSH2 é legado e não deve ser aceito em nenhum servidor atualmente... Creio que você precise usar LT_TLSv1_2
    2 pontos
  3. Bingo Daniel! Funcionou! Muito obrigado! João
    2 pontos
  4. Bom dia Joemil, Muito obrigado pela sua colaboração, já inclui na minha lista de tarefas para analisar as suas alterações.TK-2951 Se tudo der certo ainda hoje estarei enviando para o SVN os fontes atualizados, bem como os pacotes de instalação Delphi e Lazarus. O programa exemplo feito em Delphi. O programa exemplo feito em Lazarus vai ficar para semana que vem.
    2 pontos
  5. Olá pessoal! Foi publicada no dia 18/01/2024 comunicado no portal do SPED informando sobre a versão 10.0.1 do programa ECF utilizado para transmitir arquivos do ano-calendário 2023 e situações especiais de 2024(registro 10). A nova versão trás as seguintes atualizações: Fonte: http://sped.rfb.gov.br/pagina/show/7318
    1 ponto
  6. Boa Tarde. estou homologando o BancoC6 pela primeira vez em meu sistema. pude observar que no create da AcbrBancoC6.pas a propriedade fpTamanhoConta esta recebendo o valor 7. o meu cliente tem o tamanho de conta com 8 digitos, assim quando envio a remessa esta cortando o ultimo digito. no manual de remessa e retorno do banco o tamanho desse campo é 12.
    1 ponto
  7. Bom dia pessoal, com base na documentação disponibilizada pelo Inter https://developers.inter.co/references/cobranca-bolepix#tag/Cobranca fiz algumas alterações nos fontes para que seja possível a emissão, consulta e cancelamento dos boletos via API Segue os fontes modificados, está com comentários com o as alterações dentro dos próprios fontes, tanto o que retirei quanto o que acrescentei. Qualquer outra dúvida estou a disposição ACBrBoletoRet_Inter_API.pas ACBrBoletoW_Inter_API.pas ACBrBoletoWS.pas ACBrBoletoWS.Rest.pas ACBrBoleto.pas
    1 ponto
  8. Já foi sim. Já tem o pacote para Delphi e o programa exemplo: Ainda falta o DANFCom e colocar no instalador.
    1 ponto
  9. Olá pessoal. No dia 19/01/2024 foi publicado um comunicado informando que foi corrigido o código de receita 938501 para o 938502 da natureza de operação 14008 ((Importâncias correspondentes a multas e qualquer outra vantagem, ainda que a título de indenização, em virtude de rescisão de contrato). Quem fez um envio do evento R-4010, precisará enviar um evento de retificação para que o evento seja corretamente processado, gerando assim um novo recibo de consulta. Fonte: http://sped.rfb.gov.br/pagina/show/7320
    1 ponto
  10. Show.. obrigado por compartilhar a solução conosco...
    1 ponto
  11. Boa tarde. Descobri o problema. Seguindo a lógica do Demo, ao chamar a função Administrativa, não informei o segundo parâmetro, sendo esse Número sequencial de operação. Estava assim no demo: procedure TFormPrincipal.btAdministrativoClick(Sender: TObject); begin AdicionarLinhaLog('- btAdministrativoClick'); IniciarOperacao; StatusVenda := stsOperacaoTEF; try ACBrTEFAPI1.EfetuarAdministrativa(tefopAdministrativo); finally StatusVenda := stsFinalizada; end; end; Homologação concluida informando: ACBrTEFAPI1.EfetuarAdministrativa(tefopAdministrativo,NumeroSequencial); Obrigado
    1 ponto
  12. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  13. a ACBrLib, ainda tem dependências gráficas (devido o gerador de relatórios FortesReport) Veja um tópico que fala como contornar isso no Linux
    1 ponto
  14. Bom dia @Renato Rubinho! Fiz o teste que você mencionou acima e entendi o que ocorreu nesse caso... Temos o costume de fazer em nossos clientes, antes de começar a utilizar os boletos no sistema, de gerar um boleto de R$1,00 (um real) e pedir para o cliente pagar. Fazemos isso para o cliente aprender como funciona todo o processo e também como se fosse uma 'homologação', para saber se o valor irá cair corretamente na conta do cliente. Ocorre que o boleto é de um valor muito baixo R$1,00 e a taxa de juros é de 3% ao mês (3% / 30 dias = 0,1% ao dia), sendo R$1,00 * 0,1% = R$ 0,001 de juros ao dia, arredondando dá R$0,00 de juros, ou seja, não tem juros nesse boleto. Então o conteúdo da tag 'ValorMoraJuros' que foi no arquivo INI é VAZIO e está correto... O que estava errado é que eu mandei no arquivo ini nas tags: 'DataMulta=20/01/2024' e 'CodigoMora=1', quando deveriam ser 'DataMulta=' e 'CodigoMora=' (ambos vazios, pois não tem juros). Resumindo, eu corrigi o meu problema inserindo valores corretos no arquivo .ini, como se fosse ISENTO DE JUROS, pois não há juros nesse caso. Não se se a DLL deveria tratar isso quando o valor do juros é zero. Nessa situação deixo a cargo de vcs avaliarem, pois é possível resolver isso como eu resolvi. Obrigado pela atenção, e se quiserem fechar o tópico fiquem a vontade.
    1 ponto
  15. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  16. Boa tarde, Criada a TK-5016 para avaliação. Obrigado pela contribuição
    1 ponto
  17. Notei que se eu passar o XML com alguma tag incorreta ou o caminho errado ele nao gera erro Passando certo aceitou Mas ai me surge a duvida como irei Carregar o XML para o componente validar ? minha pergunta surge por que nao encontrei onde pego a respostar do CarregarXML [resolvido] o componente somente nao anexa caso exista erro estrutural ou seja se for erro de tags ele aceita carregar para Validar na sequencia
    1 ponto
  18. Por favor, faça o seguinte procedimento: Faça um backupdo arquivo de LOG.txt do Monitor para uma eventual necessidade. Limpe o arquivo LOG.txt do Monitor. Faça o processo completo com um evento que esteja funcionando, mas ao invés de usar o comando que cria e envia o eSocial, use o comando eSocial.CriarEventoeSocial, para que ele apenas crie o XML e não envie para o Web Service. Faça a mesma coisa do passo 3, só que agora, com este evento que está dando problema. Disponibilize o arquivo LOG.txt do Monitor para análise. Ele agora vai ter somente os comandos relativos a estes dois eventos. Execute o comando eSocial.LimpareSocial para que ele limpe da memória do Monitor estes dois eventos que você adicionou.
    1 ponto
  19. Somente para dar um retorno aqui. O problema era o PinPad do cliente. Tem uma série de PinPad da Getnet que saiu com problemas. A Getnet enviou outro Pinpad. Foi só trocar o mesmo que conseguimos instalar e funcionou na hora. Gilson S.
    1 ponto
  20. Também acho sem sentido, respondi a ele. A numero sequencial informei quando chamei o ADM, a partir dali respondo as perguntas que o Sitef precisa para continuar o cancelamento.
    1 ponto
  21. A exigência parece não fazer sentido... Uma Solicitação ADM, para uma simples reimpressão, ou pedido de teste de comunicação... não terá vinculo algum com algum "CupomFiscal"
    1 ponto
  22. Você vai precisar modificar o método TACBrNFeDANFEClass.ManterVeiculos da unit ACBrNFeDANFeClass.pas, já deve alterar em todos os DANFE. O MOC não diz em qual ordem deve ser impressa, no ACBr está na mesma ordem que vem no XML, e como você mesmo disse, é preciosismo do usuário, não tem razão pra alterar no componente.
    1 ponto
  23. Bom dia, Nosso técnico verificou e era problema no micro mesmo. Tudo resolvido. Obrigado
    1 ponto
  24. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  25. Bom dia, Juliomar, vou revisar esse código e atualiza aqui, obrigado.
    1 ponto
  26. Bom dia Juliomar, muito obrigado pelas dicas, fiz exatamente como você sugeriu nos passos 35 e 36, 37 e 38, e por fim, 51. No log gravou a confirmação no 36, no 38 cancelamento manual e no 51 a queda de energia, espero que agora tenha ficado certo, vou encaminhar para a Setis avaliar. Muito obrigado pela ajuda. Bom dia Daniel, verifiquei este post, mas ele ajuda somente para o componente ACBrTEFAPI, e estou utilizando o ACBrTEFD que achei mais simples de desenvolver. Mesmo assim, obrigado pela ajuda.
    1 ponto
  27. Bom dia. Este erro indica que você não preencheu: ACBrNFSeX.Configuracores.Geral.Emitente.WSChaveAutoriz No programa exemplo:
    1 ponto
  28. 1 ponto
  29. Resolvido, nada como ler as notas técnicas.
    1 ponto
  30. Bom dia @econdotta, Esse IF que você comentou antes não tinha a condição: StringIsXML(FPRetorno). Mesmo com ela ocorre o erro?
    1 ponto
  31. Bom dia, Apareceu este erro agora, a sequencia de registros está errada, gerou duas linhas com sequencia 00001 e deveria ser 00002. No Registro W gerou duas linhas com sequencia 00001.
    1 ponto
  32. Bom dia, Você chegou a preencher manualmente a data no arquivo de remessa gerado, substituindo os zeros, e enviou para validação no banco para verificar se fica tudo ok? Caso ainda não tenha feito, por favor faça esse teste e nos avise se ficou ok ou se precisa de mais algum ajuste além da data, quando esta for preenchida. Após o teste acima, caso ainda não tenha feito, informe o resultado e envie o ini para [email protected], mencionando este tópico no corpo do e-mail para que seja identificado. Criada TK-5013 para análise.
    1 ponto
  33. Por favor atualize seus fontes, pelo SVN do ACBr... Já subimos para o nosso repositório de fontes, modificações que podem corrigir algum dos itens referentes a esse tópico... Por favor atualize seus fontes, faça testes, e se possível comente em uma nova resposta, se o problema foi resolvido... Dúvidas, sobre o uso do SVN ? Clique aqui e veja um vídeo
    1 ponto
  34. pessoal, eu nao tenho ninguem no RS ou SC pra fazer os testes, mas aparentemente ta funcionando. só os probleminhas acima q nao resolvi ainda vou enviar as alteracoes q fiz aqui, caso alguem queira testar ACBrNFCom.rar to usando o código abaixo pra gerar a nota procedure TForm40.Button1Click(Sender: TObject); var MinhaNFCom: TACBrNFCom; //DANFeCom: TACBrNFComDANFComClass; sPath: String; begin sPath := ExtractFilePath(ParamStr(0))+'NFCom'; MinhaNFCom := TACBrNFCom.Create(Self); //DANFeCom := TACBrMinhaNFComDAMinhaNFComClass.Create(Self); //MinhaNFCom.DAMinhaNFCom := DANFeCom; MinhaNFCom.Configuracoes.Arquivos.PathArquivoMunicipios := sPath+'/Municipios'; MinhaNFCom.Configuracoes.Arquivos.PathEvento := sPath+'/Eventos'; MinhaNFCom.Configuracoes.Arquivos.PathNFCom := sPath; MinhaNFCom.Configuracoes.Arquivos.PathSalvar := sPath+'/Salvar'; MinhaNFCom.Configuracoes.Arquivos.PathSchemas := sPath+'/Schemas'; MinhaNFCom.Configuracoes.Certificados.NumeroSerie := 'xxxx'; MinhaNFCom.Configuracoes.Certificados.Senha := 'xxxx'; MinhaNFCom.Configuracoes.Certificados.VerificarValidade := true; MinhaNFCom.Configuracoes.Geral.FormaEmissao := teNormal; MinhaNFCom.Configuracoes.Geral.CSC := 'tokencsc'; MinhaNFCom.Configuracoes.Geral.ExibirErroSchema := True; //MinhaNFCom.Configuracoes.Geral.FormatoAlerta := ''; MinhaNFCom.Configuracoes.Geral.IdCSC := 'idcsc'; MinhaNFCom.Configuracoes.Geral.IdentarXML := True; MinhaNFCom.Configuracoes.Geral.Salvar := True; MinhaNFCom.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; MinhaNFCom.Configuracoes.Geral.SSLHttpLib := httpWinHttp; MinhaNFCom.Configuracoes.Geral.SSLLib := libWinCrypt; MinhaNFCom.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; //xsLibXml2; MinhaNFCom.Configuracoes.Geral.RetirarAcentos := True; MinhaNFCom.SSL.SSLType := LT_TLSv1_2;//LT_ALL; MinhaNFCom.Configuracoes.RespTec.CSRT := ''; MinhaNFCom.Configuracoes.RespTec.IdCSRT := 0; MinhaNFCom.Configuracoes.WebServices.Ambiente := taHomologacao; MinhaNFCom.Configuracoes.WebServices.IntervaloTentativas := 5; MinhaNFCom.Configuracoes.WebServices.Salvar := true; //MinhaNFCom.Configuracoes.WebServices.SSLType := LT_TLSv1_2; MinhaNFCom.Configuracoes.WebServices.Tentativas := 3; MinhaNFCom.Configuracoes.WebServices.TimeOut := 3000; MinhaNFCom.Configuracoes.WebServices.UF := ''; MinhaNFCom.Configuracoes.WebServices.Visualizar := True; MinhaNFCom.NotasFiscais.Clear; with MinhaNFCom.NotasFiscais.Add do begin with NFCom.Ide do begin cDV := 1; cMunFG := 5107909; cNF := 1; cUF := 51; //dhCont := Now; dhEmi := Now; finNFCom := fnNormal; indPrePago := tiNao; modelo := 62; nNF := 1; indCessaoMeiosRede := tiSim; {???} indNotaEntrada := tiNao; {???} nSiteAutoriz := sa0; {???} NFCom.Ide.tpFat := tfNormal; NFCom.Ide.verProc := '1.00'; end; //NFCom.Ide.xJust := 'nada a informar'; NFCom.infNFCom.ID := '1'; NFCom.infNFCom.Versao := 1.00; with NFCom.Emit do begin CNPJ := 'xxxx'; CRT := crtSimplesNacional; IE := 'xxx'; //IEUFDest := ''; xFant := 'NOME FANTASIA EMISSOR'; xNome := 'RAZAO SOCIAL EMISSOR'; EnderEmit.CEP := 78555000; EnderEmit.cMun := 5107909; EnderEmit.email := '[email protected]'; EnderEmit.fone := '66123123123'; EnderEmit.nro := '123'; EnderEmit.UF := 'MT'; EnderEmit.xCpl := ''; EnderEmit.xLgr := 'logradouro emitente'; EnderEmit.xMun := 'Sinop'; EnderEmit.xBairro :='bairro emitente'; end; with NFCom.Dest do begin CNPJCPF := '34589014009'; //IE := ''; //IM := '123456'; indIEDest := inNaoContribuinte; xNome := 'TESTE DE NOTA FISCAL'; idOutros := ''; EnderDest.CEP := 78555000; EnderDest.cMun := 5107909; EnderDest.email := '[email protected]'; EnderDest.fone := '66987987987'; EnderDest.nro := '987'; EnderDest.UF := 'MT'; EnderDest.xCpl := ''; EnderDest.xLgr := 'logradouro destinatario'; EnderDest.xMun := 'Sinop'; EnderDest.xBairro :='bairro destinatario'; end; with NFCom.assinante do begin cUFPrinc := 56; dContratoFim := Now; dContratoIni := Now; iCodAssinante := '123'; nContrato := '12345'; NroTermPrinc := ''; tpAssinante := taResidencial; tpServUtil := suAcessoInternet; {with NFCom.assinante.TermAdic.new do begin cUFAdic := 96; NroTermAdic := ''; end;} end; with NFCom.Det.New do begin nItem := 1; //chNFComAnt := ''; {Imposto.COFINS; Imposto.FUNTTEL; Imposto.FUST; Imposto.ICMS; Imposto.ICMSUFDest; Imposto.PIS;} //infAdProd := ''; Prod.cClass := '0100401'; // https://dfe-portal.svrs.rs.gov.br/NFCOM/tabelacclass Prod.CNPJLD := ''; Prod.cProd := '1234'; Prod.indDevolucao := tiNao; {???} Prod.qFaturada := 1; Prod.uMed := umMB; Prod.vDesc := 0; Prod.vItem := 10; Prod.vOutro := 0; Prod.vProd := 10; Prod.xProd := 'DESCRICAO DO SERVICO'; end; NFCom.infRespTec.CNPJ := '37848330000141'; NFCom.infRespTec.email := '[email protected]'; NFCom.infRespTec.fone := '66123456789'; NFCom.infRespTec.hashCSRT := 'asfafafdasf'; NFCom.infRespTec.idCSRT := 1; NFCom.infRespTec.xContato := 'contato resptec'; NFCom.Total.vBC := 10; NFCom.Total.vCOFINS := 0; NFCom.Total.vDesc := 0; NFCom.Total.vFCP := 0; NFCom.Total.vFUNTTEL := 0; NFCom.Total.vFUST := 0; NFCom.Total.vICMS := 0; NFCom.Total.vICMSDeson := 0; NFCom.Total.vIRRF := 0; NFCom.Total.vNF := 10; NFCom.Total.vOutro := 0; NFCom.Total.vPIS := 0; NFCom.Total.vProd := 10; NFCom.Total.vRetCOFINS := 0; NFCom.Total.vRetCSLL := 0; NFCom.Total.vRetPIS := 0;; //NFCom.infNFComSupl.qrCodNFCom := MinhaNFCom.GetURLQRCode(51, taHomologacao, teNormal, ; end; MinhaNFCom.NotasFiscais.GerarNFCom; //AssinarXML; //MinhaNFCom.NotasFiscais.LoadFromFIle('.\nfcom.xml'); MinhaNFCom.NotasFiscais.Assinar; MinhaNFCom.NotasFiscais.GravarXML('.\nfcom2.xml'); //MinhaNFCom.NotasFiscais.Validar; //MinhaNFCom.Cancelamento('justificativa', 1 {lote}); //MinhaNFCom.Consultar('chave', True); MinhaNFCom.Enviar(True); //MinhaNFCom.Gravar('filename', 'xml', 'path'); //MinhaNFCom.NotasFiscais.Imprimir; //MinhaNFCom.NotasFiscais.ImprimirPDF; // NFCom.Status.; // NFCom.WebServices.Consulta.ArqEnv; // NFCom.WebServices.Consulta.ArqResp; {NFCom.WebServices.Enviar.; NFCom.WebServices.Retorno; NFCom.WebServices.StatusServico;} ShowMessage('OK'); end; se alguem tiver os links pro MT (e para as outras UFs tb), me envia q ja vou fazer os testes.
    1 ponto
  35. Me parece que você está confundindo as informações. No Padrão Nacional tem dois espaços para o envio de Código de Tributação, o cTribNac que recebe o código de tributação nacional e o cTribMun que recebe o código de tributação municipal. Veja na Lista de Códigos de Serviço Nacional se não encontra um equivalente a este código 17.01 que está usando. Já o cTribMun, deve ser confirmado junto a administração municipal qual é o valor a utilizar. De acordo com o Leiaute e Regras de Validação este erro não tem relação com o cTribMun/cTribFed, mas sim com o campo cNaoNIF. Vide:
    1 ponto
  36. Boa tarde! Neste tópico tem as configurações de e-mail recomendada para os principais provedores do mercado. Por favor, veja se lhe é útil:
    1 ponto
  37. Obrigado. Fico no aguardo da solução.
    1 ponto
  38. Boa Tarde Daniel, Fiz melhorias nos fontes acima apresentados incorporando outras mudanças. Segue fontes ajustados o qual foram utilizados e no nosso processo de Homologação Junto a Auttar(GetNet) com uso da DLL. Fontes_ACBrTEFD.zip Exemplos_ACBrTEFD.zip
    1 ponto
  39. Olá pessoal, neste tópico vamos falar sobre o uso dos cartões Banrisul no TEF PayGo. É importante lembrar que: Banricompras à Vista = É uma transação de Débito à Vista na Bandeira Banricompras. Banricompras Pré-Datado = É uma transação de Débito Pré-Datado na Bandeira Banricompras. Não é um parcelamento e sim um único débito agendado para um prazo definido que pode variar entre 5 até 60 dias (parcela única). Banricompras Parcelado = É uma transação de Débito em 2 ou mais parcelas, na Bandeira Banricompras. Normalmente é usado entre 2 a 12 parcelas com débito a cada 30 dias. É semelhante ao Pré-Datado, só que é mais de 1 débito agendado. Mas é importante lembrar que não é uma transação de Crédito. Devido grande demanda dos pedidos de TEF no Estado Rio Grande do Sul... muitos estabelecimentos utilizam o cartão Banrisul e este tipo de cartão é bem especifico na região... Para que a automação possa utilizar este tipo de cartão nas transações TEF pela PayGo, precisamos seguir alguns passos, como por exemplo: 1 - Transacionar apenas na opção débito.. 2 - Essa transação débito, ela pode ser à vista ou pré-datado. E como vamos fazer isso utilizando os componentes ACBrTEFD e ACBrTEFAPI ? Começando pelo componente ACBrTEFD: Exemplo Débito à vista: procedure InformarParametrosCartaoDebito; begin // Instruindo CRT a apenas transações de Débito if (ACBrTEFD1.GPAtual = gpPayGoWeb) then begin ACBrTEFD1.TEFPayGoWeb.ParametrosAdicionais.ValueInfo[PWINFO_CARDTYPE]:='02'; //02: débito ACBrTEFD1.TEFPayGoWeb.ParametrosAdicionais.ValueInfo[PWINFO_FINTYPE]:='01'; //01: à vista end else if (ACBrTEFD1.GPAtual = gpCliSiTef) then ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 2; end; Exemplo Débito Pré-datado: procedure InformarParametrosCartaoDebito; begin // Instruindo CRT a apenas transações de Débito if (ACBrTEFD1.GPAtual = gpPayGoWeb) then begin ACBrTEFD1.TEFPayGoWeb.ParametrosAdicionais.ValueInfo[PWINFO_CARDTYPE]:='02'; //02: débito ACBrTEFD1.TEFPayGoWeb.ParametrosAdicionais.ValueInfo[PWINFO_FINTYPE]:='08'; //08: pré-datado end else if (ACBrTEFD1.GPAtual = gpCliSiTef) then ACBrTEFD1.TEFCliSiTef.OperacaoCRT := 2; end; Agora utilizando o componente ACBrTEFAPI, temos duas formas de informar os parâmetros, uma opção é usar a Function EfetuarPagamento: Exemplo Débito à vista: ACBrTEFAPI1.EfetuarPagamento( IntToStr(Venda.NumOperacao), AValor, tefmpCartao, teftcDebito, tefmfAVista); Exemplo Débito Pré-datado: ACBrTEFAPI1.EfetuarPagamento( IntToStr(Venda.NumOperacao), AValor, tefmpCartao, teftcDebito, tefmfPredatado); Outra opção é usar um TypeCast e inserir as propriedades diretamente na classe de TEF: Exemplo Débito à vista: if ACBrTEFAPI1.TEF is TACBrTEFAPIClassPayGoWeb then begin with TACBrTEFAPIClassPayGoWeb(ACBrTEFAPI1.TEF) do begin TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_CARDTYPE] := '2'; // Tipo Cartão: Débito TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_FINTYPE] := '1'; // Modalidade de financiamento da transação: À vista end; end; Exemplo Débito Pré-datado: if ACBrTEFAPI1.TEF is TACBrTEFAPIClassPayGoWeb then begin with TACBrTEFAPIClassPayGoWeb(ACBrTEFAPI1.TEF) do begin TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_CARDTYPE] := '2'; // Tipo Cartão: Débito TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_FINTYPE] := '8'; // Modalidade de financiamento da transação: Pré-datado end; end; Qualquer dúvida nos procure nos canais do Discord.. Até a próxima
    1 ponto
  40. Bom dia Lucas, Sugiro que você baixe e leia o MOC versão 7.01 Anexo III - Manual DANFE, nesse manual não existe nada referente a impressão dos valores do PIS/COFINS. Esse modelo de DANFE que você anexou não esta em conformidade com o manual. É obvio que podemos incluir um quadro para imprimir esses valores no DANFE visto que eles estão presentes no XML, mas isso poderá nos levar a uma bola de neve, pois amanhã outro vai querer que imprima outra informação. Não podemos diminuir o tamanho da fonte e nem expandir a altura de um bloco de informações, pois isso nos forçaria a diminuir a altura do quadro de itens resultando numa quantidade menor por folha, essa atitude causaria um descontentamento de outros desenvolvedores. A contador do seu cliente ainda esta trabalhando como se fosse 1990 onde a Nota Fiscal era papel, quando foi instituído a NF-e Nota Fiscal Eletrônica através do Ajuste SINIEF 07/2005, no paragrafo primeiro da clausula primeira deixa claro que a nota fiscal agora é um arquivo de computador, o tal do XML que para ter validade jurídica ele precisa estar assinado digitalmente e com o protocolo de autorização gerado pela SEFAZ-Autorizadora. No paragrafo primeiro da clausula nona deixa claro que o DANFE somente poderá ser utilizado para acobertar o transporte da mercadoria. Resumindo o contador do seu cliente quer usar o DANFE acreditando que este é a nota, sendo que ele é apenas um Documento Auxiliar da Nota Fiscal Eletrônica. Se é um documento auxiliar da nota, não é a nota, da mesma forma que o auxiliar do chefe não é o chefe. O contador precisa utilizar o XML para obter os dados necessários para realizar a escrita fiscal e contábil. Espero ter ajudado.
    1 ponto
  41. Boa tarde Adailson, As informações sobre seguro esta presente somente na versão 3.00 do MDF-e. Essas informações são opcionais, mas podemos informar. Conforme consta na página 106 da Nota Técnica que traz a nova estrutura do XML, note que o grupo <Seg> pode se repetir n vezes, sendo assim você pode informar os dados dos diversos seguros caso existam mais do que UM.
    1 ponto
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.