Pesquisar na Comunidade

@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>

@Italo Jurisato Junior Poderia corrigir no codigo fonte do NFS-e, o endereco correto da cidade 3169901 no arquivo cidades.ini ? Trocar de NomeURL_H=homologauba.versatecnologia.com.br Mudar para: (somente a url homologação) [3169901] Nome=Uba UF=MG Provedor=VersaTecnologia NomeURL_H=homologacaouba.versatecnologia.com.br NomeURL_P=nfe.uba.mg.gov.br Grato!

Mantenedores: Alguns fontes foram alterados do ACBrNFS-e, porém, para o provedor versa, se faz necessário manter o arquivo versatecnologia.ini como: UseCertificado=0 segue anexo arquivo corrigido. VersaTecnologia.ini

Efetuado a correção da leitura da data de emissao da NFS-e gerada pelo provedor, a mesma retorna como data + hora. Foi alterado a linha: 950 da unit pnfsNFSeR if FProvedor = proVersaTecnologia then NFSe.dhRecebimento := Leitor.rCampo(tcDatHor, 'DataEmissao'); pnfsNFSeR.pas

Prezados mantenedores do fonte. Segue pacote com arquivos alterados para suprir provedor versa tecnologia da cidade 3169901. Até dia 25/05/2016, o provedor não contava com retorno correto na recepção de lote normal, então fui orientado usar o webservice sincrono. Se precisarem de algo, ou se surgir duvida, estou a disposição. ACBr_2_NFSe_ComVersaTecnologia.zip