Ir para conteúdo
  • Cadastre-se
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Rodrigo - Digibyte

Membros Pro
 Perfil  Explorar Conteúdo

  • Total de ítens

    284

  • Registro em

  • Última visita

  • Days Won

    1

 Tipo de Conteúdo 

Posts postados por Rodrigo - Digibyte

    Campo Grande - MS - Por que não consigo ler a nota?

    em ACBrNFSe

    Postado

    Obrigado, pelo retorno, o cliente está pressionando... esse XML com certeza foi baixado da prefeitura ou algum outro lugar (não foi gerado pelo ACBR). O que estou tentando fazer é importar a nota para dentro do meu sistema fiscal que já importa de várias outras prefeituras pelo ACBR.

    É muito pouco provável que o ACBr não importe NFSe de uma cidade como Campo Grande mas realmente não tenho tanta experiência para saber se esse é um XML correto, como é o XML de Campo Grande ou se realmente pode ser algo no ACBr.

    O fato é que ele não reconheçe nem como NFEs nem como RPS.

    Campo Grande - MS - Por que não consigo ler a nota?

    em ACBrNFSe

    Postado

    Pessoal, estou tentando importar NFSE para dentro do ACBr porém o mesmo não reconheçe a nota. Alguém pode me dar alguma dica ?

    A função PosNFSe abaixo não funciona pois não existem nenhuma das tags correspondentes, vou passar também um exemplo do arquivo que o cliente me mandou.

    function TNotasFiscais.LoadFromString(AXMLString: String;
      AGerarNFSe: Boolean = True): Boolean;
    var
      VersaoNFSe: TVersaoNFSe;
      Ok: Boolean;
      AXML: AnsiString;
      N, TamTAG, i: integer;
      TagF: Array[1..7] of String;

      function PosNFSe: Integer;
      begin
        TagF[1] := '</NFS-e>';
        TagF[2] := '</CompNfse>';
        TagF[3] := '</Nfse>';
        TagF[4] := '</Nota>';
        TagF[5] := '</NFe>';
        TagF[6] := '</tbnfd>';
        TagF[7] := '</nfs>';

        i := 0;

        repeat
          inc(i);
          TamTAG := Length(TagF) -1;
          Result := Pos(TagF, AXMLString);
        until (i = 7) or (Result <> 0);

      end;

    <?xml version="1.0" encoding="ISO-8859-1"?>
    <NOTAS_FISCAIS>
        <NOTA_FISCAL>
            <TIPO>Prestado Eletrônico</TIPO>
            <NUM_NOTA>000000000009077</NUM_NOTA>
            <DATA_HORA_EMISSAO>03/07/2017 10:07:04</DATA_HORA_EMISSAO>
            <DIA_EMISSAO>03</DIA_EMISSAO>
            <MES_COMPETENCIA>07/2017</MES_COMPETENCIA>
            <SITUACAO_NF>Normal</SITUACAO_NF>
            <CODIGO_CIDADE>9051</CODIGO_CIDADE>
            <USUARIO_CPF_CNPJ>00629970000150</USUARIO_CPF_CNPJ>
            <USUARIO_RAZAO_SOCIAL>BOMBEX EXTINTORES E EQUIPAMENTOS DE SEGU</USUARIO_RAZAO_SOCIAL>
            <DATA_HORA_CANCELAMENTO>0000000000000000000</DATA_HORA_CANCELAMENTO>
            <RPS_EMISSAO>0000000000</RPS_EMISSAO>
            <SUB_EMISSAO>0000000000</SUB_EMISSAO>
            <PRESTADOR_CPF_CNPJ>00629970000150</PRESTADOR_CPF_CNPJ>
            <PRESTADOR_INSCRICAO_MUNICIPAL>00080802005</PRESTADOR_INSCRICAO_MUNICIPAL>
            <PRESTADOR_RAZAO_SOCIAL>BOMBEX EXTINTORES E EQUIPAMENTOS DE SEGURANCA EIRELI - ME</PRESTADOR_RAZAO_SOCIAL>
            <PRESTADOR_NOME_FANTASIA>BOMBERACO</PRESTADOR_NOME_FANTASIA>
            <PRESTADOR_TIPO_LOGRADOURO>AVENIDA</PRESTADOR_TIPO_LOGRADOURO>
            <PRESTADOR_LOGRADOURO>BANDEIRANTES</PRESTADOR_LOGRADOURO>
            <PRESTADOR_PREST_NUMERO>3036</PRESTADOR_PREST_NUMERO>
            <PRESTADOR_TIPO_BAIRRO>VILA</PRESTADOR_TIPO_BAIRRO>
            <PRESTADOR_BAIRRO>NOVA BANDEIRANTES</PRESTADOR_BAIRRO>
            <PRESTADOR_CIDADE_CODIGO>9051</PRESTADOR_CIDADE_CODIGO>
            <PRESTADOR_CIDADE>CAMPO GRANDE</PRESTADOR_CIDADE>
            <PRESTADOR_UF>MS</PRESTADOR_UF>
            <PRESTADOR_CEP>79006001</PRESTADOR_CEP>
            <PRESTADOR_DDD_TELEFONE>67</PRESTADOR_DDD_TELEFONE>
            <PRESTADOR_TELEFONE>33215651</PRESTADOR_TELEFONE>
            <TOMADOR_CPF_CNPJ>01016179000219</TOMADOR_CPF_CNPJ>
            <TOMADOR_RAZAO_SOCIAL>VIACAO SAO LUIZ LTDA</TOMADOR_RAZAO_SOCIAL>
            <TOMADOR_TIPO_LOGRADOURO>AVENIDA</TOMADOR_TIPO_LOGRADOURO>
            <TOMADOR_LOGRADOURO>MARECHAL DEODORO</TOMADOR_LOGRADOURO>
            <TOMADOR_NUMERO>2194</TOMADOR_NUMERO>
            <TOMADOR_COMPLEMENTO>386-2398</TOMADOR_COMPLEMENTO>
            <TOMADOR_TIPO_BAIRRO>JARDIM</TOMADOR_TIPO_BAIRRO>
            <TOMADOR_BAIRRO>TIJUCA</TOMADOR_BAIRRO>
            <TOMADOR_CIDADE_CODIGO>9051</TOMADOR_CIDADE_CODIGO>
            <TOMADOR_CIDADE>CAMPO GRANDE</TOMADOR_CIDADE>
            <TOMADOR_UF>MS</TOMADOR_UF>
            <TOMADOR_CEP>79094000</TOMADOR_CEP>
            <TOMADOR_EMAIL>[email protected]</TOMADOR_EMAIL>
            <TOMADOR_OPTANTE_SIMPLES>N</TOMADOR_OPTANTE_SIMPLES>
            <TOMADOR_DDD_TELEFONE>67</TOMADOR_DDD_TELEFONE>
            <TOMADOR_TELEFONE>00000000</TOMADOR_TELEFONE>
            <VALOR_NOTA>220</VALOR_NOTA>
            <VALOR_DEDUCAO>0</VALOR_DEDUCAO>
            <VALOR_SERVICO>220</VALOR_SERVICO>
            <VALOR_ISS>11</VALOR_ISS>
            <VALOR_PIS>1,43</VALOR_PIS>
            <VALOR_COFINS>6,6</VALOR_COFINS>
            <VALOR_INSS>0</VALOR_INSS>
            <VALOR_IR>0</VALOR_IR>
            <VALOR_CSLL>2,2</VALOR_CSLL>
            <ALIQUOTA_PIS>,65</ALIQUOTA_PIS>
            <ALIQUOTA_COFINS>3</ALIQUOTA_COFINS>
            <ALIQUOTA_INSS>0</ALIQUOTA_INSS>
            <ALIQUOTA_IR>1,5</ALIQUOTA_IR>
            <ALIQUOTA_CSLL>1</ALIQUOTA_CSLL>
            <CODIGO_ATIVIDADE>952150000</CODIGO_ATIVIDADE>
            <DESCRICAO_ATIVIDADE>Reparacao e manutencao de equipamentos eletroeletr</DESCRICAO_ATIVIDADE>
            <GRUPO_ATIVIDADE>A</GRUPO_ATIVIDADE>
            <ENQUADRAMENTO_ATIVIDADE>S</ENQUADRAMENTO_ATIVIDADE>
            <LOCAL_INCIDENCIA_ATIVIDADE>P</LOCAL_INCIDENCIA_ATIVIDADE>
            <TRIBUTAVEL_ATIVIDADE>S</TRIBUTAVEL_ATIVIDADE>
            <DEDUCAO_VALOR_ATIVIDADE>0.0000</DEDUCAO_VALOR_ATIVIDADE>
            <DEDUCAO_ATIVIDADE>0</DEDUCAO_ATIVIDADE>
            <ATV_ECON_ATV>S</ATV_ECON_ATV>
            <COS_SERVICO>1401</COS_SERVICO>
            <DESCRICAO_SERVICO>1401 - Lubrificação, limpeza, lustração, revisão, carga e recarga, conserto, restauração, blindagem, manutenção e conservação de máquinas, veículos, aparelhos, equipamentos, motores, elevadores ou de qualquer objeto (exceto peças e partes empregadas, que ficam sujeitas ao ICMS).</DESCRICAO_SERVICO>
            <ALIQUOTA>5</ALIQUOTA>
            <TIPO_RECOLHIMENTO>R</TIPO_RECOLHIMENTO>
            <OPERACAO_TRIBUTACAO>A</OPERACAO_TRIBUTACAO>
            <MOTIVO_PAGAMENTO></MOTIVO_PAGAMENTO>
            <CODIGO_REGIME>1</CODIGO_REGIME>
            <CIDADE_CODIGO_PRESTACAO>9051</CIDADE_CODIGO_PRESTACAO>
            <CIDADE_PRESTACAO>CAMPO GRANDE</CIDADE_PRESTACAO>
            <UF_PRESTACAO>MS</UF_PRESTACAO>
            <DOCUMENTO_PRESTACAO>NF</DOCUMENTO_PRESTACAO>
            <SERIE_PRESTACAO>10</SERIE_PRESTACAO>
            <TRIBUTACAO_PRESTACAO>T</TRIBUTACAO_PRESTACAO>
            <DESCRICAO_NOTA>Contribuições a serem pagas p/ tomador(PIS,CSLL,COFINS)&lt;br /&gt;R$10,23</DESCRICAO_NOTA>
            <CODIGO_VERIFICACAO>b249173e588771c718cb6173cac2db7d5beafd98</CODIGO_VERIFICACAO>
            <ID_NOTA_FISCAL>65012746</ID_NOTA_FISCAL>
            <VALOR_ISS_RET>11</VALOR_ISS_RET>
            <ALIQ_RET>5</ALIQ_RET>
            <DESCONTO_RET>0</DESCONTO_RET>
            <ITENS>
                <ITEM>

     

    Trocar conhecimento sobre programação e regras de negócio para eSocial, pode ser aqui?

    em ACBreSocial

    Postado

    1 hora atrás, GuilhermeCosta disse:

    ...neste caso, se o seu sistema utilizar a mesma rubrica, você deverá enviar dois eventos, um de alteração, indicando a data fim para aquele evento, e um de inclusão, informando as novas incidências... Talvez por isso o amigo @hnq_campos mencionou o fato de ter que armazenar tudo. E realmente, gerenciar tudo isso, é um problemao...

    Pelo que entendi da página 6 do MOS 2.2 não é necessário enviar o fim da validade, isso facilita muito. O fim de validade será considerado automaticamente o movimento anterior ao início enviado. Seria apenas um envio.

    • Curtir 1

    Trocar conhecimento sobre programação e regras de negócio para eSocial, pode ser aqui?

    em ACBreSocial

    Postado

    4 minutos atrás, hnq_campos disse:

    Por isso motivo que você citou o cara faz uma alteração e depois volta o que estava antes ou seja a alteração pro eSocial "não existe" é isso pode complicar a hora de bater no servidor

    Mas a idéia não é controlar isso não. Se o cliente marcou uma incidência e depois desmarcou mando o evento pro esocial mesmo assim com nova validade. Logicamente vai estar igual mas duvido que isso será validado.

    Trocar conhecimento sobre programação e regras de negócio para eSocial, pode ser aqui?

    em ACBreSocial

    Postado

    Bom, estou realmente pegando firme agora a questão do eSocial. Estava analisando por exemplo como trabalhar com a tabela de eventos=proventos/descontos (mas a lógica pode servir para outras) e suas alterações/inclusões/exclusões que tem que ser informadas. Pensei o seguinte:

    Exclusão de evento: não informar, que fique lá na base do esocial...

    Inclusão: setar um campo "novo evento" e "data inclusão". Antes de enviar a folha dar um aviso, ou fazer automático, e enviar a inclusão. Recebendo um retorno positivo resetar o campo "novo evento"

    Alteração: setar um campo "evento alterado" e "data alteração" e seguir a lógica da inclusão. Se o usuário alterar o evento e depois alterar novamente, voltando ao que era, a princípio não tenho como saber, vai ser enviada a alteração de qualquer forma.

    O que acham, pensam da mesma forma?

    Proposta alteração tipo tpSimNao

    em ACBreSocial

    Postado

    Na unit eSocial_Conversao linha tpSimNao                = (tpSim, tpNao) proponho alteração para tpNaoSim                = (tpNao, tpSim) de forma a facilitar quando estiver em produção a leitura direta dos dados de forma que zero seria não e um seria sim

    Importar SPED FIscal

    em ACBrSPEDFiscal

    Postado

    Foi criado um novo componente (TACBrSpedFiscalImportar) que é o importador do Sped Fiscal. Ele foi criado nos mesmos moldes do importador do Sped Contribuições e colocado no mesmo pacote de instalação. Para usá-lo basta ligar o mesmo, pela propriedade ACBrSpedFiscal, a um TAcbrSpedFiscal e usar da seguinte forma:

      if OpenDialog.Execute then
      begin
        ACBrSpedImpEF.Arquivo := OpenDialog.FileName; (ler arquivo sped)
        ACBrSpedImpEF.Importar;
      end;

    Feito isso estarão disponíveis os valores como por exemplo:

      with ACBrSpedImpEF.ACBrSPEDFiscal.Bloco_0 do
      begin
        vCnpj := ACBrSpedImpEF.ACBrSpedFiscal.Bloco_0.Registro0000.CNPJ;
        vCpf := ACBrSpedImpEF.ACBrSpedFiscal.Bloco_0.Registro0000.CPF;
      end;

    Pode ter melhorias a fazer mas está plenamente funcional.

    Remessa Santander C400 número maior que 400

    em ACBrBoleto

    Postado

    3 horas atrás, Aldrinfag disse:

    PadRight( Cedente.ContaDigito, 2, ' ') + Space(6)

    porque no caso do campo CONTADIGITO, na empresa aqui é apenas 1 digito e não 2 dígitos. 

     

     

     

     

    Está errado essa parte segundo o manual é o último dígito da conta mais o dígito verificador

    Pessoal, já está bem esclarecido, é necessário apenas arrumar para ou pegar 2 dígitos do campo complemento ou pegar direto o último dígito da conta + verificador conforme manual. O que falta para atualizar ?

×
×
  • 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.