Ir para conteúdo
  • Cadastre-se

windsoft

Membros Pro
  • Total de ítens

    393
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que windsoft postou

  1. Olá 3Soft, como faz tempo que mexemos nisso, não tenho total certeza, mas me parece que foi só alterar a variável "TotalPages" para "TotalPages#" no .fr3 Olá Daniel, a resposta acima, acho que já te ajuda, se não conseguir fazer me avisa aqui que eu faço a alteração e te envio. Abraço
  2. Olá amigo bom dia, segue anexo o arquivo que eu uso em produção, corrigido. Abraço DANFERetrato.zip
  3. Olá Daniel, eu postei a correção para este problema neste post não sei se foi disponibilizado pra todos.
  4. Não estou usando o Trunk2 ainda mas o problema também ocorre no Trunk, basta corrigir a seguinte função: function TACBrNFeDANFEFR.PrepareReportEvento: Boolean; var wProjectStream: TStringStream; begin FdmDanfe.SetDataSetsToFrxReport; if Trim(FastFileEvento) <> '' then begin if not (uppercase(copy(FastFileEvento,length(FastFileEvento)-3,4))='.FR3') then begin wProjectStream:=TStringStream.Create(FastFileEvento); FdmDanfe.frxReport.FileName := ''; FdmDanfe.frxReport.LoadFromStream(wProjectStream); wProjectStream.Free; end Corrigir apenas o trecho em vermelho
  5. Não sei se entendi bem a sua pergunta, mas acredito que o problema está em você não informar a propriedade: IndPag de forma correta, verifique se você está preenchendo conforme o exemplo abaixo: if ( cdsImpressaoNFCODVENC.AsString = '1' ) then // a Vista Ide.indPag := ipVista else if ( cdsImpressaoNFCODVENC.AsString = '2' ) then // a Prazo Ide.indPag := ipPrazo else Ide.indPag := ipOutras;
  6. Pelo que percebi. No seu código está faltando o trecho: with Ide.NFref.Add do begin
  7. Você terá que personalizar o arquivo Danferetrato.fr3 basta abri-lo e comentar o código que exibe o canhoto apenas na primeira pagina.
  8. Olá pessoal, boa tarde! O problema com a numeração de páginas ainda persistia, conforme pode ser verificado usando o XML anexo. Fiz uma pequena alteração na variável que demonstra o número total de páginas e o problema foi resolvido. Testado no FastReport 5.2.12. Por favor disponibilizem a alteração no repositório. Abraço a todos. Exemplo-nfe.xml DanfeRetrato.zip
  9. Quanto às mensagens de erro não sei te responder. Quanto ao certificado não há esta verificação. O contribuinte de qualquer estado (desde que esteja habilitado para emissão de NFe) consegue consultar de qualquer outro estado, porém existem alguns estados em que a consulta ainda não está disponível, mas geralmente nestes casos o componente emite uma mensagem informando que a URL não está disponível para aquele estado.
  10. Olá Amigos boa tarde! Realizamos algumas melhorias na impressão do DANFSE em fastreport, deixando-o no mesmo padrão já desenvolvido em FORTES REPORT E QUICKREPORT. Para isso foi necessário pequenas alterações na unit ACBrNFSeDANFSeFRDM, pois foi preciso adicionar os campos "NaturezaOperacao", "RegimeEspecialTributacao", "OpcaoSimplesNacional" e "IncentivadorCultural". Gostaria que o novo modelo fosse disponibilizado a todos e se possível que fosse utilizado como padrão do componente, afim de manter o padrão com os demais geradores de relatório. Segue anexo o DANFSE no formato PDF, FR3 bem como as units alteradas. Muito obrigado a todos e parabéns pelo excelente trabalho! DANFSENovoPadrao.pdf ACBrNFSeDANFSeFRDM.zip
  11. Olá Amigos boa tarde! Estou com o seguinte problema: Tenho uma NFSe cancelada com o arquivo XML da NFSe salvo no banco de dados, ao salvar o arquivo XML para arquivo utilizando o comando ACBrNFSe1.NotasFiscais.Items[0].SaveToFile() o componente está salvando o arquivo XML sem as informações de cancelamento, porém, se o arquivo for salvo utilizando o comando ACBrNFSe1.NotasFiscais.Items[0].SaveToStream() o componente gera o arquivo XML com as Tags de cancelamento. Outro detalhe é que se você utilizar um visualizador de XML (como o próprio IE) no arquivo salvo com SAVETOSTREAM() ( o que tem as tags de cancelamento ), o arquivo é dado como inválido. Percebi que há diferenças entre o código SaveToFile e SaveToStream, essas diferenças são propositais? Não seria mais interessante ter um mesmo código e apenas alterar o salvamento de Stream para File quando for o caso, para que não haja diferenças em mudanças futuras? (algo como no código exemplo abaixo) function NotaFiscal.SaveToFile(CaminhoArquivo: string): boolean; var sl : TStrings; ss : TStringStream; begin try sl := TStringList.Create; try ss := TStringStream.Create(''); try SaveToStream( ss ); ss.Position := 0; sl.LoadFromStream( ss ); finally ss.Free; end; if DFeUtil.EstaVazio(CaminhoArquivo) then begin if TACBrNFSe( TNotasFiscais( Collection ).ACBrNFSe ).Configuracoes.Arquivos.EmissaoPathNFSe then CaminhoArquivo := TACBrNFSe( TNotasFiscais( Collection ).ACBrNFSe ).Configuracoes.Arquivos.GetPathRPS(Self.NFSe.DataEmissao) else CaminhoArquivo := TACBrNFSe( TNotasFiscais( Collection ).ACBrNFSe ).Configuracoes.Arquivos.GetPathRPS(0); CaminhoArquivo := NotaUtil.PathWithDelim(CaminhoArquivo) + Self.NFSe.InfID.ID + '-Rps.xml'; end; if DFeUtil.EstaVazio(CaminhoArquivo) or not DirectoryExists(ExtractFilePath(CaminhoArquivo)) then raise Exception.Create('Caminho Inválido: ' + CaminhoArquivo); sl.SaveToFile( CaminhoArquivo ); finally sl.Free; end; NomeArq := CaminhoArquivo; Result := True; except Result := False; raise; end; end; Muito obrigado pela atenção de todos. 19-NFSe com SAVETOFILE.xml 19-NFSe com SAVETOSTREAM.xml
  12. Consegui corrigir o problema informando novamente a alíquota do ISS antes de assinar o lote para transmissão. Durante a assinatura o componente estava dividindo a alíquota por 100, não gostei muito da "gambiarra" mas não encontrei outra solução até agora. Se alguém tiver alguma outra solução melhor por favor compartilhe.
  13. windsoft

    Erro E206

    Consegui corrigir o problema informando novamente a alíquota do ISS antes de assinar o lote para transmissão. Durante a assinatura o componente estava dividindo a alíquota por 100, não gostei muito da "gambiarra" mas não encontrei outra solução até agora. Se alguém tiver alguma outra solução melhor por favor compartilhe.
  14. Olá amigos bom dia! Estou com um problema e não estou conseguindo encontrar solução, por isso venho recorrer à vocês. Provedor Ginfes. Ao gerar o XML do RPS eu informo aliquota do ISS como 2,79, gero o RPS e salvo o XML no banco de dados. Na rotina de transmissão, carrego o XML salvo no BD e transmito, então recebo a mensagem "Alíquota de ISS não condiz com o percentual de simples do município". Analisando o XML que está salvo no BD, percebi que a alíquota do ISS está sendo informada corretamente, ou seja (0,0279) porém ao tentar transmitir o XML que está sendo transmitido está com a alíquota de 0,0003, ou seja, a alíquota de 0,0279 foi dividida novamente por 100. Não consegui identificar onde é que ela está sendo dividida. Será que ao carregar um arquivo XML através do "LoadFromStream" o componente está dividindo indevidamente? Grato pela atenção de todos Segue o arquivo XML para análise rps do BD.xml
  15. windsoft

    Erro E206

    Desculpe desenterrar o tópico mas não estou conseguindo resolver este problema. Uso provedor Ginfes e estou informando a alíquota do ISS de 2,79 (a mesma utilizada no site para emissão) e estou recebendo esta mensagem de erro. Valor da aliquota informado nao condiz com a lista de simples do municipio. Alguma luz?
  16. windsoft

    Csosn

    Exatamente isso Ricardo.
  17. windsoft

    Csosn

    Seria interessante você anexar o XML para análise.
  18. windsoft

    Csosn

    Sim exatamente
  19. windsoft

    Csosn

    Não sei se entendi a pergunta, mas a totalização da nota fiscal não muda.
  20. Olá bom dia! Após a exportação do DACTE para PDF, utilizando a função ImprimirDACTEPDF, o componente estava desabilitando a propriedade ShowDialog e não estava restaurando o valor anterior. Fiz a correção na unit ACBrCTeDACTEFR.pas (assim como já ocorre na NFe) para que o componente restaure o estado da propriedade após a exportação do PDF. O trecho de código alterado pode ser visto abaixo (comentado) e os arquivos alterados estão anexo. O Mesmo problema ocorre com o DAMDFE (MDFe), para não criar um tópico idêntico peço que já atualizem este também (a unit corrigida também já está anexo). procedure TACBrCTeDACTEFR.ImprimirDACTEPDF(CTE: TCTe); const TITULO_PDF = 'Conhecimento de Transporte Eletrônico'; var I: Integer; // Alteração WindSoft // Após a exportação do DACTE em PDF retornar o estado anterior da // Propriedade ShowDialog bOldShowDialog : Boolean; begin if PrepareReport(CTE) then begin dmDacte.frxPDFExport.Author := Sistema; dmDacte.frxPDFExport.Creator := Sistema; dmDacte.frxPDFExport.Producer := Sistema; dmDacte.frxPDFExport.Title := TITULO_PDF; dmDacte.frxPDFExport.Subject := TITULO_PDF; dmDacte.frxPDFExport.Keywords := TITULO_PDF; // Alteração WindSoft bOldShowDialog := dmDacte.frxPDFExport.ShowDialog; try dmDacte.frxPDFExport.ShowDialog := False; for I := 0 to TACBrCTe(ACBrCTe).Conhecimentos.Count - 1 do begin dmDacte.frxPDFExport.FileName := IncludeTrailingPathDelimiter(PathPDF) + dmDacte.CTe.procCTe.chCTe + '-cte.pdf'; dmDacte.frxReport.Export(dmDacte.frxPDFExport); end; finally dmDacte.frxPDFExport.ShowDialog := bOldShowDialog; end; // end; end; ACBrCTeDACTEFR.zip
  21. windsoft

    Csosn

    Olá Zottis, basta você informar o CRT do emitente como 1 e informar o CSOSN para os itens. Conforme o exemplo abaixo: Emit.CRT := crtSimplesNacional Imposto.ICMS.CSOSN := csosn101; ou Imposto.ICMS.CSOSN := csosn400; Nos dados adicionais da NF você deve informar o valor do aproveitamento multiplicando o percentual de 0,67% pelo valor dos produtos que permitem aproveitamento de crédito (CSOSN = 101)
  22. Você já consultou a nf na SEFAZ de origem? Se ela tiver lá está certo.
  23. Nossos clientes também estão relatando este problema, porém nós não utilizamos a consulta de status do webservice. Acredito que o problema esteja do lado da SEFAZ/SP mesmo.
  24. Eu utilizo qualquer tamanho, desde que a proporção seja 3x8, exemplo 300x800, 3000x8000 etc...
  25. Não precisa informar em nenhum outro lugar, se não couber na primeira página, é impressa automaticamente a página com as informações adicionais.
×
×
  • 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.

The popup will be closed in 10 segundos...