Flávio Nascimento
-
Total de ítens
9 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Flávio Nascimento
-
-
Boa noite Italo,
A empresa já desenvolve dessa forma a um bom tempo pois ela faz algumas adaptações quando acha necessário. Eu só estou dando continuidade com essa nota técnica. Infelizmente não posso usar diretamente os componentes.
-
-
Boa tarde Juliana,
Não, só utilizamos os fontes mesmo e geramos a nossa própria DLL, por isso não temos esse log.
Att,
Flávio
-
Boa tarde Ítalo,
A gente não usa o programa do ACBr, nós utilizamos nosso sistema chamando a DLL com os métodos. Os fontes foram atualizados hoje mas esse erro persiste. Imaginei que pudesse ser algo relacionado a chamada do método ou a forma como preencho o evento.
-
Boa tarde,
Implementando o evento de pagamento de operação de transporte, estou tendo o seguinte erro no retorno:
cStat=[9999] - Falha mensagem de retorno WebService -> Falha na validação dos dados do Evento: Element ''{http://www.portalfiscal.inf.br/mdfe}vContrato'' is unexpected according to content model of parent element ''{http://www.portalfiscal.inf.br/mdfe}infPag''.
Expecting: {http://www.portalfiscal.inf.br/mdfe}Comp.Isso me parece estar relacionado com os schemas mas foram atualizados.
Essa é a forma que estou usando o método:
detEvento.descEvento := Evento;
detEvento.infViagens.qtdViagens := cdsEvento.FieldByName('qt_viagens').AsInteger;
detEvento.infViagens.nroViagem := cdsEvento.FieldByName('viagem').AsInteger;
detEvento.descEvento := cdsEvento.FieldByName('evento').AsString;
detEvento.infPag.New;
detEvento.infPag.Items.xNome := cdsEvento.FieldByName('Nome').AsString
detEvento.infPag.Items.CNPJCPF := cdsEvento.FieldByName('cnpj').AsString;
detEvento.infPag.Items.vContrato := cdsEvento.FieldByName('vcontrato').AsFloat;
detEvento.infPag.Items.indPag := StrToTIndPag(ok, cdsEvento.FieldByName('indpag').asString);
detEvento.infPag.Items.vContrato := cdsEvento.FieldByName('vcontrato').AsFloat;
detEvento.infPag.Items.infBanc.codBanco := cdsEvento.FieldByName('codBanco').asString;
detEvento.infPag.Items.infBanc.codAgencia := cdsEvento.FieldByName('codAgencia').asString;
detEvento.infPag.Items.infBanc.CNPJIPEF := cdsEvento.FieldByName('CNPJIPEF').asString;
detEvento.infPag.Items.infPrazo.New;
detEvento.infPag.Items.infPrazo[j].nParcela := cdsEvento.FieldByName('nParcela').AsInteger;
detEvento.infPag.Items.infPrazo[j].vParcela := cdsEvento.FieldByName('vParcela').AsFloat;
detEvento.infPag.Items.infPrazo[j].dVenc := cdsEvento.FieldByName('dVenc').AsDateTime;Result := MDFeEnviarEvento(AXML_mdfe, AIdLote, ANSeqEvento, ADt_Evento, tePagamentoOperacao, detEvento,
AUF_empresa, ADirPadrao, AAmbiente, ACertificado, AContingencia, AVersaoMDFe, ConfigProtocolo);Alguém teve esse mesmo problema?
-
Muito obrigado Ítalo
-
1
-
-
Boa tarde,
Implementando produto predominante no MDFe me deparei com o erro "Erro: 12029 - Conexão com o Servidor falhou". Percebi que o problema ocorre até mesmo tentando conectar a aplicação com o webservice mas somente em homologação. Alterei as configurações SSL para TLS e alterei as configurações do Internet Explorar como vi em alguns fóruns mas o problema persiste. Alguém mais já passou por esse problema recentemente?
-
Bom dia,
Um de nosso clientes tentou emitir uma NFe Complementar com csosn 0900, onde é destacado fundo de combate à pobreza com valores zerados mas foi retornado pelo webservice o erro:
"1871 - Element '{http://www.portalfiscal.inf.br/nfe}vBCFCPST':
This element is not expected. Expected is one of
( {http://www.portalfiscal.inf.br/nfe}modBC,
{http://www.portalfiscal.inf.br/nfe}modBCST,
{http://www.portalfiscal.inf.br/nfe}pCredSN )."Em simulação no emissor gratuito nas mesmas condições foi possível a emissão conforme anexo. Recebemos a informação de que mesmo que os valores dos referidos campos estejam zerados, devem ser enviados.
Após alterar na unit pcnNFeW as linhas:
if (nfe.Det.Imposto.ICMS.vBCFCPST > 0)
if (nfe.Det.Imposto.ICMS.vBC > 0)
if nfe.Det.Imposto.ICMS.pCredSN > 0 then
por
if (nfe.Det.Imposto.ICMS.vBCFCPST >= 0)
if (nfe.Det.Imposto.ICMS.vBC >= 0)
if nfe.Det.Imposto.ICMS.pCredSN >= 0 then
Foi possível fazer a emissão via sistema (Danfe em anexo).
Essa alteração deve seguir para o ACBr?
Nota Técnica 2020/001 - MDF-e - Erro ao enviar Evento de Pagamento da Operação de Transporte
em ACBrMDFe
Postado
Bom dia Ítalo,
Verificando aqui, na unit ACBrMDFe e as que são chamadas através dela estão como nos fontes do ACBr mesmo. Mas vou verificar a possibilidade de compartilhar nossas alterações.
Quanto ao prolema, consegui resolver, estava informando incorretamente a tpComp e vComp e passei a informar:
compCollectionItem := detEvento.infPag.Items[0].Comp.New;
compCollectionItem.tpComp := StrToTComp(ok, 'valor');
compCollectionItem.vComp := valor;
Obrigado