ronnei

Obrigado

Estou desenvolvendo um atualizador do Banco de dados e um dos passos é por o "fdb" wm shutdown e no final por "online" novamente, consegui fazer isso via gfix, porém gostaria de saber se tem algum comando ou componente que possa me retornar se o "fdb" já está em shutdown ou não. Uso Firebird 2.5 e Delphi Xe3.

Obrigado

Galera, alguém sabe de algum webservice que disponibilize as Nfes emitidas contra a minha empresa? Para depois so baixar os XMLS? Semelhante ao que o site "arquivei" faz? Ou alguem sabe como eles fazem isso?

Concordo que sim, porém se eu não baixar o titulo que foi descontado ele ficará em aberto, visto que não pode ser baixado no momento do desconto pois se o cliente não pagar o banco descontará de mim, de qualquer forma não teria como tratar pelo software visto que o processamento do arquivo é feito pelo componente, somente alterando a função direto nas units do componente, foi o que eu fiz, de qualquer forma é apenas uma sugestão de melhoria ao componente. Atenciosamente Ronnei Peterson

Saiu abaixo a resposta do SICOOB, significa que os títulos que foram descontados, ao serem pagos pelo cliente a data que vem preenchida é da de liquidação e não a de crédito, deixo como sugestão a alteração da unit conforme eu postei anteriormente. procedure TACBrBancoob.LerRetorno400(ARetorno: TStringList); ... if StrToIntDef(Copy(Linha,176,6),0) <> 0 then DataCredito:= StringToDateTimeDef( Copy(Linha,176,2)+'/'+ Copy(Linha,178,2)+'/'+ Copy(Linha,180,2),0, 'DD/MM/YY' ) Else DataCredito:= StringToDateTimeDef( Copy(Linha,111,2)+'/'+ Copy(Linha,113,2)+'/'+ Copy(Linha,115,2),0, 'DD/MM/YY' ); Resposta do SICOOB -------- Mensagem encaminhada -------- Assunto: Re: Fwd: Fwd: Re: Fwd: HOMOLOGAÇÃO - VIDRAÇARIA PARIS Data: Tue, 21 Feb 2017 09:08:32 -0300 De: Seguros <[email protected]> Para: Ronnei Peterson <[email protected]> Bom dia Segue o que a central me mandou. "Para títulos que estejam na Cobrança (que não tenham sido transferidos para o TD), observei que a data de crédito vem preenchida. Este arquivo que enviaram, todos os boletos já tiveram a transferência para TD. Se eles não tiveram o retorno para cobrança simples, ao serem liquidados não terão o crédito lançado em conta corrente e com isso não haverá preenchimento desta informação." Pelo que verificamos esses títulos foram baixados não retornando para simples. Assim, a data não será preenchida. Att, Caio

Olá Renan Silva, tudo bem? Estou passando pelo mesmo problema com a LocalWeb, qual endereço de smtp voce usou? E qual porta? Precisou configurar algo na LocalWeb, no painel deles? Por outros emails eu consigo enviar, mas nesse cliente que usa localweb não.

Vamos lá, fiz pesquisas nos tópicos sobre o assunto e encontrei diversos, mas nenhum deles resolveu na questão que estou aqui, acredito que meu problema esteja relacionado a LocalWeb, visto que envia corretamente pelo gmail e em outros clientes também, porém email em específico nada que foi colocado como solução resolveu, desde troca de porta, autenticações... Já conectei na conta do cliente com o Thunderbird e está ok, por isso acredito que possa ser algo relacionado a alguma configuração direto na LocalWeb, tipo o "aplicativo menos seguros" do Gmail, por isso estou postando aqui para saber se alguém passou por esse problema de envio de email pelo ACBR usando um email corporativo hospedado na localweb e conseguiu?

Vou tentar contato com o banco, mas já viu né, é um parto kkk, de qualquer forma vou manter meu fonte do ACBR nessa unit alterado localmente e vou cuidar sempre que tiver uma atualização para não dar conflito nisso, até que o SICOOB me dê alguma posição, de qualquer forma acredito que nesse caso o correto é trabalhar com a data de liquidação quando a data de crédito vir em branco, foi isso que eu fiz.

Arquivo de retorno em anexo, por enquanto vou alterar o fonte do meu ACBR até chegarem no consenso de qual a data correta. 4340_01325850_20170125_C400_00.ret Veio como 06 e mesmo assim a datacredito veio zerada, conforme arquivo enviado em anexo no post anterior

Juliana ele não retorna as duas, a data do credito vem zerada, acredito que o ideal serial seria personalizar para se a opção vir zerada pegar a data de liquidação, como eu postei no fonte acima, não encontrei a propriedade databaixa, somente a DataOcorrencia, se for essa que você se referiu dá diferença de dias em relaçaã ao crédito do banco, isso gera inconsistência na conciliação bancária.

Estou com o mesmo problema e debugando vi que na unit ACBrBancoBancoob ainda se encontra copiando a partir da posição 176, porem ela esta zerada no arquivo de retorno e realmente pelo manual que tenho aqui a posição é a 111 111 116 06 Data Entrada ou Liquidação 9(06) (ddmmaa) Conferindo o arquivo na posição 111-> 240117 já na posição 176 000000 Vou alterar o arquivo para pegar a informação correta porém na próxima atualização do ACBR irei perder essas alterações? Alguém que passou por isso tratou como? Como resolvi: procedure TACBrBancoob.LerRetorno400(ARetorno: TStringList); ... if StrToIntDef(Copy(Linha,176,6),0) <> 0 then DataCredito:= StringToDateTimeDef( Copy(Linha,176,2)+'/'+ Copy(Linha,178,2)+'/'+ Copy(Linha,180,2),0, 'DD/MM/YY' ) Else DataCredito:= StringToDateTimeDef( Copy(Linha,111,2)+'/'+ Copy(Linha,113,2)+'/'+ Copy(Linha,115,2),0, 'DD/MM/YY' );

Também não deu certo, mas é bom saber que você tem clientes rodando, significa que tem uma solução, agora vou em busca dela.

Não deu certo amigo, inclusive já copiei as mesmas configurações da parte de segurança do IE do Administrador para o outro Usuário e não funciona

Olá amigos! Fiz a instalação do certificado no Windows Server 2012, consigo emitir a Nfe quando conecto via TS com administrador, porém com outro usuário via TS ele dá erro no suporte de canais seguros, o certificado foi instalado neste usuário bem como as cadeias, conforme imagem em anexo. Já segui passo a passo essa explicação: http://forum.imasters.com.br/topic/430454-nfe-instalando-certificado-digital-no-windows-server/ Alguém conseguiu por a Nfe para rodar via TS em usuários não administradores com Windows Server 2012? Se sim qual o procedimento adotado?

RESOLVIDO Problemas no componente relacionado ao Delphi Xe3, apaguei tudo, baixei do SVN, corrigi units que mudaram no Xe3 como a jpeg e troquei o arquivo (RLIB) do Fortes para Xe3 e resolveu.

Erro ao tentar imprimir uma Carta de Correção (cce), uso Delphi Xe3, Fortes Report, o erro é Ancestor for 'RlEvento' not found with FComponentesNfe.ACBrNFe do Begin NotasFiscais.LoadFromFile(RetornaPastaSistema+'ARQUIVOB.XML'); EventoNFe.Evento.Clear; EventoNFe.LerXML(RetornaPastaSistema+'ARQUIVOEVENTO.XML'); IF (FComponentesNfe.ConfiguraComponente('', '')= False) then exit; ImprimirEvento; End; Obs: Pesquisei por RlEvento e não veio nada no fórum, então não sei se já tem outro post no fórum com esse problema, não sei se é impressão minha mas parece que o motor de busca não está funcionando muito legal de uns tempos para cá.

Tenho um cliente que precisa do PAF/ECF em MG, porém meu atual parceiro não está homologado para MG, alguém trabalha em parceria para me atender em MG? Preciso integrar com meu software, enviando clientes, produtos e DAV para emissão automático do cupom facilitando ao meu cliente. Precisa emitir Sintegra e SPED

Deu certo Juliomar.

Boa tarde Juliomar, atualizei o SVN antes de fazer isso que postei acima, e também utilizei o ACbrInstall, tive que corrigir o erro e depois usei o AcbrInstall e deu certo, atualizei de novo agora e não tem nada de novo, estou usando o SVN no repositório svn://svn.code.sf.net/p/acbr/code Portanto acredito que não seja isso a não ser que eu esteja em um repositório errado.

Fui instalar a versão atualizada hoje no meu Delphi Xe3 e ocorreu o erro: D:\Dev\componentes\acbr\Fontes\ACBrNFSe\pnfsNFSeW.pas(1575) Error: E2003 Undeclared identifier: 'DateSeparator' D:\Dev\componentes\acbr\Fontes\ACBrNFSe\pnfsNFSeW.pas(1576) Error: E2003 Undeclared identifier: 'ShortDateFormat' D:\Dev\componentes\acbr\Fontes\ACBrNFSe\ACBrNFSeNotasFiscais.pas(1909) Fatal: F2063 Could not compile used unit 'pnfsNFSeW.pas' Compilation failure Fui até a Unit pnfsNFSeW.pas e vi que eram usadas variáveis Globais que foram depreciadas no XE3, para resolver o meu caso alterei o procedimento abaixo trocando as variáveis globais pelas chamadas a FormatSettings procedure TNFSeW.GerarXML_Provedor_NFSEBrasil; begin Gerador.wGrupoNFSe('Rps ' + FIdentificador + '="' + NFSe.InfID.ID + '"'); GerarIdentificacaoRPS; // Gerador.wCampoNFSe(tcDat, '#3','DataEmissao', 19, 19, 1, NFSe.DataEmissao + 'T10:00:00', DSC_DEMI); System.SysUtils.FormatSettings.DateSeparator:='-'; // DateSeparator := '-'; System.SysUtils.FormatSettings.ShortDateFormat:='yyyy-mm-dd'; // ShortDateFormat := 'yyyy-mm-dd'; Gerador.wCampoNFSe(tcStr, '#3','DataEmissao', 19, 19, 1, DateTimeToStr(NFSe.DataEmissao)+ 'T10:00:00', DSC_DEMI); System.SysUtils.FormatSettings.DateSeparator:='/'; //DateSeparator := '/'; System.SysUtils.FormatSettings.ShortDateFormat := 'dd/mm/yyyy'; // ShortDateFormat := 'dd/mm/yyyy'; Gerador.wCampoNFSe(tcStr, '#4','NaturezaOperacao ', 01, 01, 1, NaturezaOperacaoToStr(NFSe.NaturezaOperacao), ''); Gerador.wCampoNFSe(tcStr, '#5','Status ', 01, 01, 1, StatusRPSToStr(NFSe.Status), ''); // GerarServico; GerarServicoValores_V2; GerarPrestador; GerarTomador; GerarIntermediarioServico; GerarConstrucaoCivil; Gerador.wGrupoNFSe('/Rps'); end; Não estou usando a Nfse ainda, então não tenho como testar, então segue a dica para a equipe dar uma analisada no caso. Links sobre o assunto: http://www.andreanolanusse.com/pt/delphi-xe3-e-suas-novidades-parte-2/ http://marciorossato.meucanal.com.br/decimalseparator-delphi-xe3/ Obrigado

Depois da atualização o problema foi corrigido.

Depois da atualização de hoje o erro foi corrigido.

Estou com o mesmo problema, eu emito Nfe e Nfce no mesmo sistema, quando eu manipulo uma Nfce ele não envia mais o PDF, parece ter a ver com a questão dos danfes diferentes para o mesmo componente, já tentei até separar os componentes mas o erro permanece. Só estou conseguindo enviar email da NFE com pdf quando não manipulo a Nfce.

Fizemos isso Juliomar, mas aí que o erro persiste, por isso separamos em dois componentes. O Simples fato de imprimir uma Nfce e depois voltar o danfe AcbrNfe.Danfe:=DanfeNFe; Já causa o erro no envio do Email com PDF.