lemuel

Nova integração ACBrTefAndroid com as smart POS Cielo DX8000 e Clover Flex 4 e MiniPDV 3. A integração para impressão está no link: https://www.projetoacbr.com.br/forum/topic/92614-integração-posprinter-para-smart-pos-cielo-e-clover/ @Daniel Simoes segue a integração conforme o @Warquia havia comentado com você na AutoCom. Lemuel Zafenate - Viva Sistemas ACBrTEFAndroid.pas ACBrTEFAndroidCielo.pas ACBrTEFAndroidCloverSiTef.pas ACBrTEFCieloAndroidAPI.pas ACBrTEFCieloComum.pas ACBrTEFCloverSiTefAPI.pas ACBrTEFCloverSiTefComum.pas

Nova integração ACBrPosPrinter com as smart POS Cielo DX8000 e Clover Flex 4 e MiniPDV 3. A integração com o ACBrTefAndroid está no link: https://www.projetoacbr.com.br/forum/topic/92617-integração-acbrtefandroid-para-smart-pos-cielo-e-clover/ Lemuel Zafenate - Viva Sistemas ACBrPosPrinterClover.pas ACBrPosPrinterCielo.pas CloverPrintSdk.jar AndroidManifest.template.xml ACBrPosPrinterAndroidFr.fmx ACBrPosPrinterAndroidFr.pas

Ainda não, realmente foi paliativo e já está nos planos para remover este componente e passar a utilizar diretamente o ACBrNFe.

Olá, utilizamos o componente ACBrECF. Estava com um problema quando informado valor de frete, ao subtotalizar esse valor no componente, o valor era replicado para o acréscimo. Ao emitir a NFCe, o valor ficava errado pois existia nos campos vFrete e vOutros. Foi necessário alterar a unit ACBrECFVirtualNFCe para deduzir o v alor do frete na subtotalização, evitando assim um valor de acréscimo indevido. Em anexo está o arquivo com minha alteração. ACBrECFVirtualNFCe.pas

Implementado carga de operadores para MGV6 e MGV7. Implementado de acordo com a documentação de ambos, testado somente no MGV7. ACBrCargaBal.pas

Em outro topico eu anexei uma alteração do componente de validação com a alteração para permitir esse novo padrão; https://www.projetoacbr.com.br/forum/topic/79708-cnpj-alfanumérico/#comment-515385

Fiz uma alteração no Componente de validação para suportar esse novo formato. Acredito que esteja correto. Agora vão utilizar o código da tabela ascii subtraindo 48 que é o ascii do número zero. Então na prática é o Ord(Char) - Ord('0'). ACBrValidador.pas

Com a mudança disponibilizada lá funcionou normal.

Aqui tambem estou com esse mesmo problema no Preview. Esta acumulando as notas já emitidas, mesmo executando o AcbrNFe.NotasFiscais.Clear;

Muito obrigado. Farei o update.

[5201306] Nome=Anicuns UF=GO Provedor=MegaSoft Versao=2.00 ProRecepcionar=https://anicuns.megasoftarrecadanet.com.br/anicuns/ws/nfseSOAP Boa tarde. Essa cidade ainda não possui o link no arquivo .ini do ACBrNFSeX.

Beleza. Muito obrigado

Boa tarde, a função que faz uso é function TACBrXmlWriter.AddNode. tcNumStr: begin ConteudoProcessado := Trim(VarToStr(valor)); EstaVazio := ConteudoProcessado = ''; if Length(ConteudoProcessado) < TamMin then ConteudoProcessado := PadLeft(ConteudoProcessado, TamMin, '0'); end; Conforme você pode verificar, existe a implementação para essa conversão e está verificando o parâmetro de tamanho. Realizei somente a alteração que indiquei no inicio e funcionou corretamente.

Boa tarde. Iniciei alguns testes com o NFS-e aqui do meu município e estou recebendo o seguinte retorno: Identifiquei que é um problema no componente, mais especificamente na Unit "ACBrNFSeXGravarXml_ABRASFv2", na "function TNFSeW_ABRASFv2.GerarServico: TACBrXmlNode; ", na linha "Result.AppendChild(AddNode(tcStr, '#36', 'ExigibilidadeISS',". o Correto nessa linha é "Result.AppendChild(AddNode(tcNumStr, '#36', 'ExigibilidadeISS',", portanto essa função deveria ficar da seguinte forma: function TNFSeW_ABRASFv2.GerarServico: TACBrXmlNode; var item: string; begin Result := CreateElement('Servico'); Result.AppendChild(GerarValores); if GerarTagServicos then begin Result.AppendChild(AddNode(tcStr, '#20', 'IssRetido', 1, 1, NrOcorrIssRetido, FpAOwner.SituacaoTributariaToStr(NFSe.Servico.Valores.IssRetido), DSC_INDISSRET)); Result.AppendChild(AddNode(tcStr, '#21', 'ResponsavelRetencao', 1, 1, NrOcorrRespRetencao, FpAOwner.ResponsavelRetencaoToStr(NFSe.Servico.ResponsavelRetencao), DSC_INDRESPRET)); item := FormatarItemServico(NFSe.Servico.ItemListaServico, FormatoItemListaServico); Result.AppendChild(AddNode(tcStr, '#29', 'ItemListaServico', 1, 8, NrOcorrItemListaServico, item, DSC_CLISTSERV)); Result.AppendChild(AddNode(tcStr, '#30', 'CodigoCnae', 1, 9, NrOcorrCodigoCNAE, OnlyNumber(NFSe.Servico.CodigoCnae), DSC_CNAE)); Result.AppendChild(AddNode(tcStr, '#31', 'CodigoTributacaoMunicipio', 1, 20, NrOcorrCodTribMun_1, NFSe.Servico.CodigoTributacaoMunicipio, DSC_CSERVTRIBMUN)); Result.AppendChild(AddNode(tcStr, '#32', 'Discriminacao', 1, 2000, NrOcorrDiscriminacao_1, StringReplace(NFSe.Servico.Discriminacao, ';', FpAOwner.ConfigGeral.QuebradeLinha, [rfReplaceAll, rfIgnoreCase]), DSC_DISCR)); Result.AppendChild(AddNode(tcStr, '#33', 'CodigoMunicipio', 1, 7, NrOcorrCodigoMunic_1, OnlyNumber(NFSe.Servico.CodigoMunicipio), DSC_CMUN)); Result.AppendChild(AddNode(tcStr, '#31', 'CodigoTributacaoMunicipio', 1, 20, NrOcorrCodTribMun_2, NFSe.Servico.CodigoTributacaoMunicipio, DSC_CSERVTRIBMUN)); Result.AppendChild(AddNode(tcStr, '#32', 'CodigoNbs', 1, 9, NrOcorrCodigoNBS, OnlyNumber(NFSe.Servico.CodigoNBS), DSC_CMUN)); Result.AppendChild(AddNode(tcStr, '#33', 'Discriminacao', 1, 2000, NrOcorrDiscriminacao_2, StringReplace(NFSe.Servico.Discriminacao, ';', FpAOwner.ConfigGeral.QuebradeLinha, [rfReplaceAll, rfIgnoreCase]), DSC_DISCR)); Result.AppendChild(AddNode(tcStr, '#34', 'CodigoMunicipio', 1, 7, NrOcorrCodigoMunic_2, OnlyNumber(NFSe.Servico.CodigoMunicipio), DSC_CMUN)); Result.AppendChild(AddNode(tcInt, '#35', 'CodigoPais', 4, 4, NrOcorrCodigoPaisServico, NFSe.Servico.CodigoPais, DSC_CPAIS)); Result.AppendChild(AddNode(tcNumStr, '#36', 'ExigibilidadeISS', NrMinExigISS, NrMaxExigISS, NrOcorrExigibilidadeISS, StrToInt(FpAOwner.ExigibilidadeISSToStr(NFSe.Servico.ExigibilidadeISS)), DSC_INDISS)); Result.AppendChild(AddNode(tcInt, '#37', 'MunicipioIncidencia', 7, 7, NrOcorrMunIncid, NFSe.Servico.MunicipioIncidencia, DSC_MUNINCI)); Result.AppendChild(AddNode(tcStr, '#38', 'NumeroProcesso', 1, 30, NrOcorrNumProcesso, NFSe.Servico.NumeroProcesso, DSC_NPROCESSO)); Result.AppendChild(GerarListaItensServico); end; end;

Bom dia. Alguem sabe se algum dos modelos testados nesse componente, funciona com a marca Tanca?

Olá, você pode usar os eventos OnDepoisAutenticar para gravar o token e a validade e OnAntesAutenticar para usar os dados gravados. Esses eventos estão no componente ACBrPSPShipay. A validade atualmente está fixa em 24 horas no componente, a Shipay não retorna essa informação. Com a redução do tempo de validade, será necessário alterar no componente. Tambem estou aguardando essa alteração.