Élviro Cavalcanti

Boa tarde pessoal, quando fiz a atualização do meu ACBRCTe começou a não compilar aparecendo a seguinte mensagem : "[DCC Fatal Error] Frm_Demo_ACBrCTe.pas(279): F1026 File not found: 'pcnRetConsStatServBPe.dcu'" Alguém já passou por esse erro?

Boa tarde pessoal, estou com uma dúvida quanto a valores, eu tenho um valor num produto de R$ 25,12 onde o mesmo sofre um desconto de 4% o que nas minhas contas daria 1,0048 no meu sistema o valor fica arredondado pra 1,00 e no espelho de uma nota o valor ficou de 1,01 alguém pode me dizer se está certo o valor de 1,00 ou o de 1,01?

Boa noite, estava lendo a nota técnica que foi lançada onde teremos que indicar os dados do responsável técnico pela emissão da nota, esse dados podem ser da empresa que está emitindo a nota? Fiquei preocupado pois sou pessoa física e desenvolvo para as empresas e vi os campos abaixo, como devo proceder nesse caso, posso usar o código da empresa? "Identificador do CSRT utilizado para montar o hash do CSRT" "O hashCSRT é o resultado da função hash (SHA-1 – Base64) do CSRT fornecido pelo fisco mais a Chave de Acesso da NFe."

Obrigado meu amigo, vou dar uma pesquisada no assunto!

Juliomar, nunca fiz nada parecido, você tem algum exemplo sobre CData?

Boa tarde, um cliente me perguntou se teria como através do delphi divulgar preços em algumas redes sociais como Facebook e Instagram, nunca fiz nada parecido, alguém já fez ou tem ideia de como pode ser feito?

Bom dia, tive esse mesmo problema com um certificado de um cliente, apenas o dele, não consegui solucionar, minha sorte que ele renovou o certificado e resolveu o problema!

Muito obrigado meu amigo mais uma vez!

Boa noite, no caso eu trabalho na empresa e desenvolvo o sistema dela, nesse caso posso usar o CNPJ da empresa e os dados da própria empresa?

Boa tarde pessoal, estou usando o delphi xe8 para iniciar o desenvolvimento de uma aplicação que possa me comunicar com minha aplicação desktop, alguém do grupo já fez algo parecido? Qual a linguagem que usou?

Atualmente uso assim function TfrmExemplo.obterNroResultado(const aXML: XMLString; aTag, aEndTag: string): string; var _Posini, _Posfim : integer; Begin Result := ''; _Posini:= Pos(aTag,aXML); _Posfim:= Pos(aEndTag,aXML); if ( _Posini > 0 ) then begin inc(_PosIni, Length(aTag)); Result:=Copy(aXML,_Posini+1,(_PosFim-_PosIni)-1); end; end; obterNroResultado(Memo2.text, '<xMotivo','</xMotivo'); mas infelizmente só traz o primeiro resultado e o que preciso é o segundo

Bom dia, estou querendo capturar apenas uma parte do texto abaixo, mas infelizmente existem mais de dois campos como referência <retConsReciNFe versao="4.00" xmlns="http://www.portalfiscal.inf.br/nfe"> <tpAmb>2</tpAmb> <verAplic>NFEPE_H_20.01.03.167</verAplic> <nRec>261180001088199</nRec> <cStat>104</cStat> <xMotivo>Lote processado</xMotivo> <cUF>26</cUF><dhRecbto>2018-08-23T15:23:13-03:00</dhRecbto> <protNFe versao="4.00"><infProt Id="NFe1"><tpAmb>2</tpAmb> <verAplic>NFEPE_H_20.01.03.167</verAplic> <chNFe>26180829187557000165550010000000201000000206</chNFe> <dhRecbto>2018-08-23T15:23:13-03:00</dhRecbto><cStat>204</cStat> <xMotivo>Rejeição: Duplicidade de NF-e [nRec: 261180001081986]</xMotivo> </infProt></protNFe></retConsReciNFe> Estou pegando entre xMotivo e /xMotivo, mas pega apenas a primeira linha e estou precisando da segunda linha que contém essa informação que seria "Rejeição: Duplicidade de NF-e [nRec: 261180001081986]" alguém sabe como posso fazer?

A sefaz não está com problemas de recepção não?

Pessoal, percebi em alguns clientes que depois de algum tempo, o Windows desmarca a TLS 1.2 e com isso a nota fiscal fica sem comunicar, ao abrir o meu sistema eu criei essa rotina que marca via registro do windows e até agora está resolvendo os meus problemas WinExec('reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings" /f /v "SecureProtocols" /t REG_DWORD /d "268832"', SW_SHOW); Criei no on create do form principal Nota que ainda temos que efetuar todo o processo de atualização do windows

Isso, quando as atualizações estão desativadas, demora mesmo e em alguns casos usando o Windows 7 vai ter que migrar pra o 10 caso dê algum erro na atualização

Pessoal, consegui resolver, atualizei o Windows e ativei o TLS 1.2, em alguns casos esse protocolo não fica gravado e é preciso usar o comando gpedit.msc e seguir o passo a passo do site que vou colocar abaixo, depois disso, tudo voltou ao normal! https://answers.microsoft.com/pt-br/ie/forum/ie_other-windows_7/ativardesativar-segurança-ssl-e-tls-sem/8c3293bd-c092-4dcd-b9cd-107d33a44a70 Caso o Windows não tenha o gpedit, basta executar esse bat como administrador! Instalar GPedit.bat

Pelo que estava vendo, precisa atualizar o Windows com o Windows Update, depois instalar o ie 11, estou com um cliente que usa o Windows 7, estou ajustando ele e caso dê certo, posto aqui o resultado!

Tive que mudar pra o componente VDOCaPrinter com ele consegui resolver o problema de condensar o cupom fiscal

Bom dia, nas impressões usando o RDPrint como cupom não fiscal usando a Bematech 4200 USB com muitos itens a impressão no rdprint sai de forma minúscula, alguma solução para esse caso?

Opa, desculpe o meu banco é o Firebird, infelizmente preciso usar todo o cadastro do clientes, infelizmente pois ele usa isso pra usar um parâmetro de bloqueio. Não possuo índice no campo de codcli na tabela de contas a receber e o campo de código na tabela de clientes é o campo de chave primária.

Boa tarde pessoal, atualmente possuo uma tabela de contas a receber com mais de 100.000 registros e uma tabela de clientes com mais de 50.000, ambos estão relacionadas pelo campo de código. Estou usando o sql abaixo pra atualizar o campo de maior atraso que está na tabela de clientes. segue abaixo o código update clientes set clientes.maioratraso = (select max(areceber.atraso) from areceber where clientes.codigo = areceber.codcli and areceber.databaixa is null) O código funciona, mas demora muito até terminar a rotina, alguém pode me ajudar a otimizar esse sql?

Opa Italo, muito obrigado pela sua resposta, segue abaixo a rotina funcionando perfeitamente! ACBrCTeDACTeRL1.Logo := edtLogoMarca.Text; ACBrCTe1.Conhecimentos.Clear; ACBrCTe1.Configuracoes.Arquivos.PathSchemas := ExtractFilePath(Application.ExeName) + 'Schemas\CTe'; ACBrCTe1.Configuracoes.Arquivos.PathCTe := ExtractFilePath(Application.ExeName) + '\XmlDestinatario'; ACBrCTe1.Configuracoes.Arquivos.PathInu := ExtractFilePath(Application.ExeName) + '\XmlDestinatario'; ACBrCTe1.Configuracoes.Arquivos.PathEvento := ExtractFilePath(Application.ExeName) + '\XmlDestinatario'; ACBrCTe1.Configuracoes.Arquivos.PathSalvar := ExtractFilePath(Application.ExeName) + '\XmlDestinatario'; ACBrCTe1.Configuracoes.Geral.ModeloDF := moCTe; ACBrCTe1.Configuracoes.Geral.VersaoDF := ve300; GerarCTe(DM.IBConhecimentoNUMERO.AsString); try Begin ACBrCTe1.Conhecimentos.Assinar; ACBrCTe1.Conhecimentos.Validar; ACBrCTe1.Conhecimentos.Imprimir;

Boa dia pessoal, eu consigo gerar o XML do CTe pra poder visualizar ele antes de enviar pra poder conferir se está tudo certo com a impressão?

Bom dia, o problema foi resolvido da seguinte forma Verifique se o CSC que está sendo usando é o de produção, pois a sefaz de PE estava deixando passar o CSC de homologação e agora não está mais, outra coisa, o CSC antes pedia ser sem dígitos, agora tem que ser informado conforma a sefaz gera, com dígitos.

Boa tarde, mesmo informando, conforme abaixo, meu CTe sempre sai com a data de previsão de entrega vazia infCTeNorm.rodo.dPrev := data_emissao + 4; // lembrando que a variavel data_emissao é do tipo Tdatetime.