Membros Pro Light System Software Postado 23 Abril Membros Pro Compartilhar Postado 23 Abril Boa tarde Estou tentando realizar uma nota de serviço para consumidor pelo sistema, o mesmo pede pelo CPF/CNPJ do tomador de serviço já informei o tipo do tomador como tpPFNaoIdentificada e passo em CPF mas a prefeitura reclama que é obrigatório o CPF, mais pelo site direto da prefeitura consegue fazer a NFSe sem o CNPJ ? Poderia nos ajudar com este por favor ? há algum parametro que tenho que mudar ? mesmo no exemplo ACBrNFSeX não consegue enviar em o CPF. Obrigado. Link para o comentário Compartilhar em outros sites More sharing options...
Consultores Italo Giurizzato Junior Postado 23 Abril Consultores Compartilhar Postado 23 Abril Tópico movido para a área do SAC, para que o SLA de respostas seja considerado Italo Giurizzato Junior Ajude o Projeto ACBr crescer - Assine o SAC Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP Araraquara - A era dos Trólebus Link para o comentário Compartilhar em outros sites More sharing options...
Consultores Italo Giurizzato Junior Postado 23 Abril Consultores Compartilhar Postado 23 Abril Boa tarde @Light System Software, Na unit Conam.GravarXml temos: CpfCnpj := Trim(NFSe.Tomador.IdentificacaoTomador.CpfCnpj); if (CpfCnpj <> 'CONSUMIDOR') and (CpfCnpj <> 'EXTERIOR') then CpfCnpj := OnlyNumber(CpfCnpj); { Se hover municipios com apostofro deve ser substituido por espaço, por exemplo SANTA BARBARA D'OESTE deve informar SANTA BARBARA D OESTE. } MunPrestador:= UpperCase(StringReplace(NFSe.Prestador.Endereco.xMunicipio, '''', ' ', [rfReplaceAll])); MunTomador:= UpperCase(StringReplace(NFSe.Tomador.Endereco.xMunicipio, '''', ' ', [rfReplaceAll])); NFSeNode.AppendChild(AddNode(tcStr, '#1', 'CpfCnpTom', 1, 14, 1, CpfCnpj, '')); Note que a tag CpfCnpTom é gerada com o conteúdo da variável CpfCnpj. Note também que o conteúdo da propriedade: Tomador.IdentificacaoTomador.CpfCnpj pode conter o numero do CPF ou CNPJ ou os literais: CONSUMIDOR ou EXTERIOR. Acredito que no seu caso devemos informar o literal CONSUMIDOR a propriedade CpfCnpj. Espero ter ajudado. Italo Giurizzato Junior Ajude o Projeto ACBr crescer - Assine o SAC Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP Araraquara - A era dos Trólebus Link para o comentário Compartilhar em outros sites More sharing options...
Membros Pro Light System Software Postado 24 Abril Autor Membros Pro Compartilhar Postado 24 Abril Boa tarde , informei "CONSUMIDOR" conforme a resposta anterior, mas agora ele está falando que para consumidor final não pode informar o CEP, não estou informando mas está aparecendo como <MunTom>BRAGANCA PAULISTA</MunTom> <SiglaUFTom>SP</SiglaUFTom> <CepTom>00000000</CepTom> preciso fazer alguma coisa ? existe algum lugar a mais para configurar ? Obrigado. Link para o comentário Compartilhar em outros sites More sharing options...
Consultores Italo Giurizzato Junior Postado 25 Abril Consultores Compartilhar Postado 25 Abril Bom dia @Light System Software, Vou lhe pedir um favor. Abra a unit Conam.GravarXml e faça a seguinte alteração: Atual: if (CpfCnpj <> 'CONSUMIDOR') and (CpfCnpj <> 'EXTERIOR') then NFSeNode.AppendChild(AddNode(tcStr, '#1', 'CepTom', 1, 8, 1, OnlyNumber(NFSe.Tomador.Endereco.CEP), '')) else NFSeNode.AppendChild(AddNode(tcStr, '#1', 'CepTom', 1, 8, 1, '00000000','')); Alteração: if (CpfCnpj <> 'CONSUMIDOR') and (CpfCnpj <> 'EXTERIOR') then NFSeNode.AppendChild(AddNode(tcStr, '#1', 'CepTom', 1, 8, 1, OnlyNumber(NFSe.Tomador.Endereco.CEP), '')) else NFSeNode.AppendChild(AddNode(tcStr, '#1', 'CepTom', 1, 8, 1, '','')); Salve a unit alterada, fecha tudo, finaliza a execução do Delphi. Reinstale o ACBr. Execute o Delphi, abra a sua aplicação recompila com a opção Build e faça um novo teste. Italo Giurizzato Junior Ajude o Projeto ACBr crescer - Assine o SAC Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP Araraquara - A era dos Trólebus Link para o comentário Compartilhar em outros sites More sharing options...
Recommended Posts