Ir para conteúdo
  • Cadastre-se

Patrick Alves

Membros
  • Total de ítens

    44
  • Registro em

  • Última visita

Tudo que Patrick Alves postou

  1. Rodrigo você não vai enviar 163 eventos (um para cada produtor). Você deve gerar um evento S-1250, nesse evento você deve pegar esses 163 produtores e agrupar pelo Indicativo da Aquisição. Repare que você pode gerar até 9999 produtores para cada tipo de aquisição.
  2. Brother, no meu caso eu armazeno cada correção realizada para a NF-e no banco de dados e ao fazer uma nova correção eu busco no banco as ocorrências anteriores e adiciono na mesma.
  3. Segue arquivos alterados com a url para o ES. Por favor considerem alterar também no repositório. Abraços. ACBrNFeServicos.ini ACBrNFeServicos.res
  4. Brother, certa vez eu precisei fazer algo parecido, não tinha tantos detalhes assim, mas acho que pode te dar uma ideia. Eu utilizei a propriedade texto livre do titulo, como só precisava de uma lista com os lançamentos e valores eu passei essa lista separando o lançamento do valor com um "pipe" (|) e no arquivo .fr3 eu coloquei 2 memos um para os lançamento e outro para o valor depois pegava a propriedade e percorria as linhas alimentando os memos via codigo. algo parecido: mmoHistorico.Lines.Clear; mmoValor.Lines.Clear; lista := TStringList.Create; try lista.Text := <Titulo."TextoLivre">; for i := 0 to lista.Count - 1 do begin mmoHistorico.Lines.Add(Copy(lista.Strings[i],1,Pos('|',lista.Strings[i]) - 1)); mmoValor.Lines.Add(Copy(lista.Strings[i],Pos('|',lista.Strings[i]) + 1, Length(lista.Strings[i]))); end; finally lista.Free; lista := nil; end;
  5. O código do país que está no xml é inválido. Para Estados Unidos utilize 02496.
  6. @leotelles, acredito que a validação dos dados é sobre a linha digitável, e que não exista base de dados compartilhada entre os bancos. Então se a pessoa conhece a forma de funcionamento da linha digitável vai conseguir alterar o valor, até mesmo na tentativa e erro uma hora vai passar, no seu caso de 4 passou 2. Não sei se tem alguma forma de bloquear. Talvez tratando o retorno do banco e gerando o valor restante + encargos e comunicando o cliente.
  7. Boa tarde, trecho da mesma nota técnica, página 3: Função: Serviço destinado à recepção de mensagem de Evento da NF-e. Este serviço permite que o destinatário da Nota Fiscal eletrônica confirme a sua participação na operação acobertada pela Nota Fiscal eletrônica emitida para o seu CNPJ, através do envio da mensagem de: • Confirmação da operação – confirmando a ocorrência da operação e o recebimento da mercadoria (para as operações com circulação de mercadoria); • Desconhecimento da operação – declarando o Desconhecimento da Operação; • Operação não Realizada – declarando que a Operação não foi Realizada (com Recusa do Recebimento da mercadoria e outros) e a justificativa porque a operação não se realizou; • Ciência da operação – declarando ter ciência da operação destinada ao CNPJ, mas ainda não possui elementos suficientes para apresentar uma manifestação conclusiva, como as acima citadas. O autor do evento é o destinatário da NF-e. A mensagem XML do evento será assinada com o certificado digital que tenha o CNPJ-Base (8 primeiras posições do CNPJ) do Destinatário da NFe. Em contato com a SEFAZ aqui do ES, me disseram que esse tipo de operação não pode ser realizada.
  8. Os valores para atribuição da propriedade modFrete são: [mfContaEmitente, mfContaDestinatario, mfContaTerceiros, mfSemFrete] Transp.modFrete := mfSemFrete Da uma olhada na Unit pcnConversao, nela vc tem uma série de funções que vão te ajudar a preencher esses campos.
  9. @GAVOHA, quando você coloca Det.Add esta adicionando um item ao componente. O problema não é o loop e sim a forma como você esta atribuindo o valor das propriedades. Dentro do loop de itens só deve ter um Det.Add, faça como @Celso sugeriu. Se você colocar Det.Add para cada propriedade (Tag) vai estar adicionando um item e preenchendo somente a propriedade em questão, ou seja, você esta adicionando vários itens e preenchendo apenas uma propriedade dele. Por isso a mensagem de validação tem varias tags sem o valor informado.
  10. Boa tarde! Hoje precisei atualizar o ACBr, como tenho essa alteração que precisa ser adicionada no meu fonte, decidi dar uma olhada neste post e baixei a unit que eu havia disponibilizado para fazer uma comparação com o que tenho aqui comigo. Constatei que o código está diferente e realmente só muda a margem na visualização. Acho que anexei a unit errada na época. Peço desculpas se alguém baixou no intuito de tentar resolver seu problema. Em anexo está a unit com o código correto. @Juliomar Marchetti será que haveria a possibilidade de incluirmos essa alteração no repositório? ACBrNFeDANFEFR.pas
  11. Boa tarde! Como na ultima revisão ainda não tem esta alteração para o Fast Report, anexei a unit alterada com a sugestão do colega @Henrique Paraiba. Alterado a linha 606: Field_Carteira.AsString := ListadeBoletos[iFor].Carteira; para: Field_Carteira.AsString := Banco.MontarCampoCarteira(ListadeBoletos[iFor]); Por favor sendo possível adicione ao repositório. Obrigado! ACBrBoletoFCFR.pas
  12. Pessoal, pesquisei aqui no forum e achei uma pessoa que teve essa mesma necessidade e implementou algo, porem, só alterando as margens no momento da impressão. Pediram pra alterar também no preview, mas a conversa parou por ai. Sendo assim, eu fiz uma alteração na unit ACBrNFeDANFEFR.pas e adicionei o código na procedure PrepareReport. Não sei se é o lugar correto, mas pra mim funcionou. Se puderem atualizar, segue em anexo a unit alterada. ACBrNFeDANFEFR.pas
  13. Boa tarde! Pessoal, tenho um cliente que personalizou folhas de A4 para impressão do Danfe. Surgiu a necessidade de fazer um ajuste nas margens do relatório para que a impressão se encaixe no A4 personalizado. Reparei que o componente tem as propriedades para definição das margens, mas ao configura-las, não influenciou nas margens do relatório. Como devo proceder para realizar este ajuste?
  14. Bom dia! Também precisei dos campos de ICMS ST no DANFE. Porém, no meu caso, o emitente está no Simples. Ao emitir o DANFE os campos de ST sempre vinham zerados. Dei uma olhada no componente e verifiquei que, caso o emitente fosse Simples, só era passado os valores de ICMS. Alterei a unit ACBrNFeDANFEFRDM para passar os valores de ICMS ST caso o CSOSN for 201, 202, 203 ou 900. Vou deixar no anexo a alteração. Por favor se puderem analisar e alterar também no repositório do SVN. Ou se estiver enganado, me passem orientações de como proceder se possível. Obrigado! ACBrNFeDANFEFRDM.rar ACBrNFeDANFEFRDM.rar
  15. Bom dia! Isaque, na verdade alguns bancos até tem no manual a definição de onde deve ser posicionado a logomarca do beneficiário/cedente no boleto. Se não me engano a Caixa faz isso. A pouco tempo homologuei um boleto do Bancoob com a logomarca do cedente. Talvez seria interessante colocar a propriedade na classe do cedente, uma string com o caminho da imagem ou até mesmo um bitmap contendo a imagem. Adicionando o field no clientdataset do cedente, nos componentes de impressão. Ai fica a cargo do pessoal utilizar no layout do boleto ou não.
  16. Boa tarde! Me desculpem pela demora em responder. Já até tinha me esquecido deste tópico por já estar finalizado. Bom, pra quem quiser a alteração que fiz vou deixar no anexo. Estes arquivos são um pouco antigos, então não estão com as ultimas correções no componente. Existe a propriedade 'TextoLivre' que pode ser usada no nosso caso, evitando assim uma grande alteração no componente que é bem especifica. Minha sugestão no caso seria incluir nessa propriedade os registros de serviço. Algo como segue abaixo: Titulo.TextoLivre := 'Serviço 1' + '|' + FormatFloat('#,##0.00',ValorServico1) + sLineBreak; Titulo.TextoLivre := 'Serviço 2' + '|' + FormatFloat('#,##0.00',ValorServico2); E no arquivo do boleto (No meu caso FastReport) adicionaria dois memos, um para descrição e outro para o valor. E no evento BeforePrint do MasterData codificaria para incluir os serviços nos memos. procedure MDOnBeforePrint(Sender: TfrxComponent); var lista: TStringList; i: Integer; begin mmoHistorico.Lines.Clear; mmoValor.Lines.Clear; lista := TStringList.Create; try lista.Text := <Titulo."TextoLivre">; for i := 0 to lista.Count - 1 do begin mmoHistorico.Lines.Add(Copy(lista.Strings[i],1,Pos('|',lista.Strings[i]) - 1)); mmoValor.Lines.Add(Copy(lista.Strings[i],Pos('|', lista.Strings[i]) + 1,Length(lista.Strings[i]))); end; finally lista.Free; lista := nil; end; end; O lado bom de fazer assim é que vc pode atualizar o componente normalmente pelo svn pois modificamos somente o arquivo do relatório. BoletoServicos.rar
  17. Arnaldo, Se não me engano, quando vc define 'ACBrBoleto1.LeCedenteRetorno = True' os dados do cedente serão lidos do arquivo que está sendo importado. Se estiver definido pra False, as definições feitas no Cedente serão comparadas com o que está no arquivo. Qual o tipo de cobrança que esta definido em ACBrBoleto1.Banco.TipoCobranca? Quanto ao nosso numero, vc pode definir o tamanho máximo em 'ACBrBoleto1.Banco.TamanhoMaximoNossoNum'. No caso da carteira vc não precisa definir, o componente pega do arquivo lido, no SICOB não retorna o numero da carteira, retorna o seguinte: 1 = Cobrança Simples; 3 = Cobrança Caucionada; 4 = Cobrança Descontada. No caso da posição do nosso numero no arquivo se vc estiver usando o tipo de cobrança cobCaixaEconomica começa em 42 e não em 40. Da uma olhada na função LerRetorno240 da unit do tipo de cobrança q vc está usando, vc vai conseguir ver como é feita a leitura do arquivo. Acho que não tem implementação de retorno para o padrão CNAB400 para caixa.
  18. Opa! Walter, desculpa a demora em responder, acabei me ocupando com outros projetos, porém esta semana peguei pra resolver esta situação. Bom, o que fiz foi criar uma classe para lista de serviços e outra para os serviços e adicionei uma propriedade para lista de serviços na classe dos títulos. Como utilizo o FastReport, em ACBrBoletoFCFR adicionei mais um clientdataset para os serviços e relacionei ao clientdataset de títulos. Por fim adaptei o relatório no fastreport para ficar parecido como na figura do post anterior. Qualquer coisa estamos ai!!
  19. Bom dia! Estou necessitando desenvolver um relatorio de boleto personalizado que lista os serviços que compõem o valor do boleto no recibo do sacado e logo abaixo a ficha de compensação. Qual seria a melhor forma de estar implentando isso, sabendo que teria que adicionar mais um DataSet com essas informações. Alguem já implementou algo parecido e poderia me passar alguma orientação? Desde já agradeço.
×
×
  • 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.