NFS-e Abrasf2 VersaTecnologia

[Antonio Gomes]

@Italo Giurizzato Junior

Anterior NFS-e, atender abrasf2:

function ResponsavelRetencaoToStr(const t: TnfseResponsavelRetencao): String;
begin
  result := EnumeradoToStr(t,
                           ['1', '2'],
                           [ptTomador, rtPrestador]);
end;

function StrToResponsavelRetencao(out ok: boolean; const s: String): TnfseResponsavelRetencao;
begin
  result := StrToEnumerado(ok, s,
                           ['1', '2', ''],
                           [ptTomador, rtPrestador, rtPrestador]);
end;

-----------------------------------------------------------------

Na NFS-eX:

function TACBrNFSeXProvider.ResponsavelRetencaoToStr(
  const t: TnfseResponsavelRetencao): string;
begin
  Result := EnumeradoToStr(t,
                           ['1', '', '2', ''],
                           [rtTomador, rtPrestador, rtIntermediario, rtNenhum]);
end;

function TACBrNFSeXProvider.StrToResponsavelRetencao(out ok: boolean;
  const s: string): TnfseResponsavelRetencao;
begin
  Result := StrToEnumerado(ok, s,
                           ['1', '', '2', ''],
                           [rtTomador, rtPrestador, rtIntermediario, rtNenhum]);
end;

function TACBrNFSeXProvider.ResponsavelRetencaoDescricao(
  const t: TnfseResponsavelRetencao): String;
begin
  case t of
    rtTomador       : Result := '1 - Tomador';
    rtIntermediario : Result := '2 - Intermediário';
    rtPrestador     : Result := '3 - Prestador';
  else
    Result := '';
  end;
end;

Como prestador, anterior ia 2 agora está ficando vazio no xml.

Tem como corrigir, ou eu estender essa função, para atender ao provedor, está dando problema no schema:

X800-Erro de Validação:  --> 1824 - Element '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}ResponsavelRetencao': '' is not a valid value of the atomic type '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}tsResponsavelRetencao'.

no schema:

<xsd:simpleType name="tsResponsavelRetencao">
        <xsd:restriction base="xsd:byte">
            <xsd:pattern value="1|2" />
        </xsd:restriction>
    </xsd:simpleType>

 

[Antonio Gomes]

12 horas atrás, Antonio Gomes disse:

@Italo Giurizzato Junior

Anterior NFS-e, atender abrasf2:

function ResponsavelRetencaoToStr(const t: TnfseResponsavelRetencao): String;
begin
  result := EnumeradoToStr(t,
                           ['1', '2'],
                           [ptTomador, rtPrestador]);
end;

function StrToResponsavelRetencao(out ok: boolean; const s: String): TnfseResponsavelRetencao;
begin
  result := StrToEnumerado(ok, s,
                           ['1', '2', ''],
                           [ptTomador, rtPrestador, rtPrestador]);
end;

-----------------------------------------------------------------

Na NFS-eX:

function TACBrNFSeXProvider.ResponsavelRetencaoToStr(
  const t: TnfseResponsavelRetencao): string;
begin
  Result := EnumeradoToStr(t,
                           ['1', '', '2', ''],
                           [rtTomador, rtPrestador, rtIntermediario, rtNenhum]);
end;

function TACBrNFSeXProvider.StrToResponsavelRetencao(out ok: boolean;
  const s: string): TnfseResponsavelRetencao;
begin
  Result := StrToEnumerado(ok, s,
                           ['1', '', '2', ''],
                           [rtTomador, rtPrestador, rtIntermediario, rtNenhum]);
end;

function TACBrNFSeXProvider.ResponsavelRetencaoDescricao(
  const t: TnfseResponsavelRetencao): String;
begin
  case t of
    rtTomador       : Result := '1 - Tomador';
    rtIntermediario : Result := '2 - Intermediário';
    rtPrestador     : Result := '3 - Prestador';
  else
    Result := '';
  end;
end;

Como prestador, anterior ia 2 agora está ficando vazio no xml.

Tem como corrigir, ou eu estender essa função, para atender ao provedor, está dando problema no schema:

X800-Erro de Validação:  --> 1824 - Element '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}ResponsavelRetencao': '' is not a valid value of the atomic type '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}tsResponsavelRetencao'.

no schema:

<xsd:simpleType name="tsResponsavelRetencao">
        <xsd:restriction base="xsd:byte">
            <xsd:pattern value="1|2" />
        </xsd:restriction>
    </xsd:simpleType>

 

@Juliomar Marchettie esse bug, tem solução mano?

[Italo Giurizzato Junior]

Boa tarde @Antonio Gomes,

Foi criado a TK-6602 para analise do problema.

[Antonio Gomes]

57 minutos atrás, Italo Giurizzato Junior disse:

Boa tarde @Antonio Gomes,

Foi criado a TK-6602 para analise do problema.

eu sou mei, e parece que está meio que atendendo os numeros de lá, mas, devemos pensar no todo né... complicado, esses projetos nada falam com nada.

 

[Antonio Gomes]

22 minutos atrás, Antonio Gomes disse:

eu sou mei, e parece que está meio que atendendo os numeros de lá, mas, devemos pensar no todo né... complicado, esses projetos nada falam com nada.

 

Cara, acho que vou desistir de entender os manuais... olha lá, 1 e 2, tomador e intermediário. 

https://abrasf.org.br/biblioteca/arquivos-publicos/nfs-e/versao-2-01

[Italo Giurizzato Junior]

Bom dia @Antonio Gomes,

Quem é MEI deve emitir as suas notas segundo o Padrão Nacional, sendo assim não importa qual é o provedor contratado pela prefeitura.

Preciso saber se a nota esta sendo emitida por um MEI ou não.

[Italo Giurizzato Junior]

Boa tarde @Antonio Gomes,

Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

[Antonio Gomes]

11 horas atrás, Italo Giurizzato Junior disse:

Bom dia @Antonio Gomes,

Quem é MEI deve emitir as suas notas segundo o Padrão Nacional, sendo assim não importa qual é o provedor contratado pela prefeitura.

Preciso saber se a nota esta sendo emitida por um MEI ou não.

sim, mas lá que vi que tem como intermediar servico, ate entao, de prefeitura, so sei o feijao com arroz mesmo. Nao com os 3 atores, prestador, tomador e intermediador... fiz uma analogia.

[Italo Giurizzato Junior]

Boa tarde @Antonio Gomes,

Você atualizou os fontes e fez novos testes?

[Antonio Gomes]

Boa tarde Mano, acabei de testar, top, resolvido.

Obs: aquela herança ficou linda.

Grato.

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.