Ir para conteúdo
  • Cadastre-se

VinheSoft

Membros Pro
  • Total de ítens

    26
  • Registro em

  • Última visita

Sobre VinheSoft

Contact Methods

  • Website URL
    http://www.vinhesoft.com.br

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

VinheSoft's Achievements

Contributor

Contributor (5/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

2

Reputação

1

Community Answers

  1. VinheSoft

    Links dos Manuais quebrado

    Boa tarde nao estou conseguindo acessar osl inks do manual online https://acbr.sourceforge.io/ACBrMonitor/ComousaroACBrMonitor.html https://acbr.sourceforge.io/ACBrLib/ACBrLib.html foi mudado de lugar ? Joao Carlos VinheSOFT
  2. Ok ! ficaremos no aguardo... Obrigado!!
  3. VinheSoft

    ACBrPixCD32.dll

    ACBrPixCd32.dll ja está disponível para download ? Att João Carlos VinheSOFT
  4. // ACBrLibBoleto - Versao: 0.2.0.80 03/12/21 09:36:50:858 - Boleto_TamNossoNumero 03/12/21 09:36:50:858 - Travar 03/12/21 09:36:50:858 - SetRetorno(0, 10) 03/12/21 09:36:50:858 - Destravar // ACBrLibBoleto - Versao: 0.2.0.128 03/12/21 09:38:58:817 - Boleto_TamNossoNumero 03/12/21 09:38:58:817 - Travar 03/12/21 09:38:58:817 - SetRetorno(10, ) 03/12/21 09:38:58:817 - Destravar veja o SetRetorno da nova DLL veio SetRetorno(10,) e antes vinha SetRetorno(0,10) Att Joao Carlos VinheSOFT
  5. VinheSoft

    ACBrBoleto

    metodo: TamNossoNumero esta retornando branco verifiquei os fontes e o retorno voltou 1 parametros em SetRetorno try Result := SetRetorno(BoletoDM.ACBrBoleto1.Banco.CalcularTamMaximoNossoNumero(Carteira, NossoNumero, Convenio)); finally BoletoDM.Destravar; end; deveria vir assim, com ErrOK try Result := SetRetorno(ErrOk,BoletoDM.ACBrBoleto1.Banco.CalcularTamMaximoNossoNumero(Carteira, NossoNumero, Convenio)); finally BoletoDM.Destravar; end; segue anexo, correcao... Att Joao Carlos VinheSOFT ACBrLibBoletoBase.pas
  6. VinheSoft

    Boleto

    Boa Tarde Antonio Carlos/BigWings Obrigado pelas respostas!! att Joao Carlos Vinhesoft
  7. VinheSoft

    Boleto

    Boa Tarde Antonio Carlos estou usando, ACBrBoleto32.dll entao tenho que ir adicionando na lista a quantidade de boletos que quero imprimir. se quero 3 copias por exemplo, entao adiciono 3 vezes na lista ! correto ? Att Joao Carlos Vinhesoft
  8. VinheSoft

    Boleto

    Boa Tarde, Metodos: Boleto_Imprimir([eNomeImpressora]) Boleto_ImprimirBoleto(eIndice, [eNomeImpressora]) não tem parâmetro quantidade de impressões ! eh isso mesmo ? att Joao Carlos Vinhesoft
  9. Boa Tarde faltou tag "descANP", segue arquivo: linha: 2359 INIRec.WriteString( sSecao,'descANP',descANP ) ; Att Joao Carlos VinheSoft DoACBrNFeUnit.pas
  10. José obrigado pela resposta !! vou rever minha rotina aqui... Att Joao Carlos Vinhesoft
  11. boa tarde José em uma situacao, assim: data de vencimento: 19/12/2017 data de mora: 19/12/2017 hoje o componente, calcula a data de mora: 20/12/2017 como eu faço para calcular a data de mora ser a mesma do vencimento ??? pois com a data de mora com 1 dia a mais, o cliente sempre pagara um dia depois, pois os juros, correcao partir da data de mora!! att Joao Carlos Vinhesoft
  12. Bom Dia componente não respeita o conteúdo do campo "DataMoraJuros", somando +1 dia na data deste campo, segue correção: antes: AStringList.Add(ACBrStr('Cobrar juros de ' + ifthen(((CodigoMora = '2') or (CodigoMora = 'B')), FloatToStr(ValorMoraJuros) + '%', FormatCurr('R$ #,##0.00',ValorMoraJuros)) + ' por dia de atraso para pagamento a partir de ' + FormatDateTime('dd/mm/yyyy',ifthen(Vencimento = DataMoraJuros, IncDay(DataMoraJuros,1),DataMoraJuros)))) correção: AStringList.Add(ACBrStr('Cobrar juros de ' + ifthen(((CodigoMora = '2') or (CodigoMora = 'B')), FloatToStr(ValorMoraJuros) + '%', FormatCurr('R$ #,##0.00',ValorMoraJuros)) + ' por dia de atraso para pagamento a partir de ' + FormatDateTime('dd/mm/yyyy',DataMoraJuros))) segue arquivo alterado Att Joao Carlos VinheSoft ACBrBoleto.pas
  13. Bom Dia Faltou o campo "DataMulta" no modulo: DoBoletoUnit.pas segue arquivo com correção: linha 357 ... DataMulta := StrToDateDef(Trim(aIni.ReadString(Sessao,'DataMulta','')),0); ... Att Joao Carlos VinheSoft DoBoletoUnit.pas
  14. Boa Noite segue alteração de metodos do objeto Email, na unit DoEmailUnit.pas Linha: 169 else if Cmd.Metodo = 'textomensagem' then {informa o texto do e-mail} Body.Text := Cmd.Params(0) alteração: else if Cmd.Metodo = 'textomensagem' then {informa o texto do e-mail} Body.Add( Cmd.Params(0) ) Linha: 172 else if Cmd.Metodo = 'textoalternativo' then {informa o texto alternativo (texto puro) do e-mail} AltBody.Text := Cmd.Params(0) alteração: else if Cmd.Metodo = 'textoalternativo' then {informa o texto alternativo (texto puro) do e-mail} AltBody.Add( Cmd.Params(0) ) Com esta alteração podemos enviar vários comandos, e o monitor vai montando o corpo do email. Do jeito que esta, ele so considera o ultimo envio com corpo do email, também tentei enviar o corpo de uma vez incluindo o comando de Final de linha, porem o monitor sempre separa o comando e não executando corretamente. Att VinheSoft Joao Carlos DoEmailUnit.pas
  15. era isso mesmo... obrigado. Joao Carlos VinheSoft
×
×
  • 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...