José Manoel
-
Total de ítens
47 -
Registro em
-
Última visita
Últimos Visitantes
1.484 visualizações
José Manoel's Achievements
-
@Renan Silva onde você consegue esse romaneio?
-
Importação de XML do Siscomex
José Manoel replied to valterpatrick's tópico in Object Pascal - Delphi & Lazarus
Fernando, como está o desenvolvimento? Tenho interesse em participar desse projeto. Seria muito interessante ter esse recurso. Nossa demanda está aumentando. Hoje os despachantes mandam o xml já em "formato de NFe" para os nossos clientes, mas alguns estão dizendo que o trabalho deles é entregar apenas o xml da declaração de importação. Ainda estou iniciando no assunto. Tenho poucas informações, mas podemos nos unir e tentar desenvolver algo em conjunto. -
Isso quer dizer que não é suportado. Certo ?
-
Prezados, bom dia. Estou procurando o procedor SIAPNet, da prefeitura da cidade de Lorena/SP, mas não estou encontrando. Gostaria de confirmar se esse provedor não está mesmo homologado, ou se está com outro nome. No arquivo Cidades.ini consta que usa o ISSNet, mas ao tentar enviar e em contato com o suporte da empresa (embras) fui informado que o caminho indicado no XML (http://www.issnetonline.com.br/webserviceabrasf/vsd/servico_enviar_lote_rps_envio.xsd), não se refere ao sistema deles. Url do serviço da prefeitura: https://siap.lorena.sp.gov.br/pmlorena/websis/siapnet/arrecadacao/issonline/iss.login.php Obrigado desde já pelas informações.
-
Solução perfeita! Obrigado.
-
@BigWings . Desmarquei a opção "Verificar se há certificados revogados do fornecedor"; . Alterei a diretiva de compilação {$DEFINE USE_MINGW} e copiei as dlls para a pasta do projeto; . Coloquei no componente o arquivo pfx e a senha. Nenhum desses procedimentos deu certo. Será que tem mais alguma coisa? Muito obrigado. 3.10 aqui está funcionando normalmente.
-
Também estou tendo problemas. Após rodar ACBrNFe.WebServices.StatusServico.Executar tenho a seguinte resposta:
-
Serviço de regras de tributação, IVA, ICMS, PIS, etc
José Manoel replied to raosistemas's tópico in ACBrNFe
Não sei se é bem isso que você quer, mas dê uma pesquisada na Mix Fiscal. http://www.mixfiscal.com.br Boa sorte. -
Somente para informar, estou recebendo esse erro agora.
-
Qual seria a melhor @hleorj ?
-
Prezados, boa tarde. Identifiquei uma inconsistência na NFe 4.0 em relação à Danfe; Na impressão, ao selecionar as modalidades 3 e 4, o campo Frete Por Conta fica em branco. Está assim: function modFreteToDesStr(const t: TpcnModalidadeFrete): string; begin case t of mfContaEmitente : result := '0 - EMITENTE'; mfContaDestinatario : result := '1 - DEST/REM'; mfContaTerceiros : result := '2 - TERCEIROS'; mfSemFrete : result := '9 - SEM FRETE'; end; end; Poderia ser assim: function modFreteToDesStr(const t: TpcnModalidadeFrete): string; begin case t of mfContaEmitente : result := '0 - EMITENTE'; mfContaDestinatario : result := '1 - DEST/REM'; mfContaTerceiros : result := '2 - TERCEIROS'; mfProprioRemetente : result := '3 - PROP/REMT'; mfProprioDestinatario : result := '4 - PROP/DEST'; mfSemFrete : result := '9 - SEM FRETE'; end; end; Obrigado. Att,
-
Dados do Medicamento nas Informações Adicionais do Produto
José Manoel replied to José Manoel's tópico in ACBrNFe
Não seria interessante parametrizar essa opção do <rastro>? Não encontrei nada que obrigasse emitir esses dados no Danfe, e acho que isso pode gerar reclamações por parte dos clientes. -
Dados do Medicamento nas Informações Adicionais do Produto
José Manoel replied to José Manoel's tópico in ACBrNFe
Não tenho certeza sobre o ManterRastro, pois a NT (Pág. 49) informa que somente os valores relacionados a FCP devem ser relacionados no infAdProd. Sobre o ManterMedicamentos acho que seu código está correto. Eu havia me esquecido do novo campo cProdAnvisa. -
Dados do Medicamento nas Informações Adicionais do Produto
José Manoel replied to José Manoel's tópico in ACBrNFe
Sim. A tag med ficou assim: -
Dados do Medicamento nas Informações Adicionais do Produto
José Manoel replied to José Manoel's tópico in ACBrNFe
Function TACBrNFeFRClass.ManterMedicamentos( inItem: integer ) : String; Var i : Integer; begin Result := ''; { detalhamento específico de medicamentos } with FNFe.Det.Items[inItem].Prod do begin if med.Count > 0 then begin Result := sQuebraLinha; for i := 0 to med.Count - 1 do begin if NFe.infNFe.Versao < 4 then begin Result := Result + 'LOTE: ' + med.Items[i].nLote+ sQuebraLinha; Result := Result + 'QTD: ' + FormatFloatBr(med.Items[i].qLote)+ sQuebraLinha; Result := Result + 'FAB: ' + FormatDateBr(med.Items[i].dFab)+ sQuebraLinha; Result := Result + 'VAL: ' + FormatDateBr(med.Items[i].dVal)+ sQuebraLinha; end; Result := Result + IfThen( med.Items[i].vPMC > 0, 'PMC: ' + FormatFloatBr(med.Items[i].vPMC) + ';' , ''); end; end; end; end; Acredito que essa seja a implementação correta. Att,