RibaSoft

Nossa Kiko Fernandes, que vergonha , nem acredito que deixei passar esses detalhes, faz dias que to me matando aq e era só falta de atenção, muiiiiiiito obrigado pela atenção e ajuda de todos. Não sei como faz mas da minha parte pode dar como encerrado o tópico. DEUS abençoe

Puts, que mancada, era tão simples e eu me matando Sem palavras pra agradecer Brigadão

Olá a todos, Estou com um problema muito estranho, vi um tópico semelhante de mais de anos aq mas não relata esse exato problema. Sou do PR e quanto gero uma NFC (CRT 3 - Lucro Real) de CST 020 Pão de Alho, vai normal, mas quando gero um de Apresuntado, no XML não aparece o PIS COFINS. Ambas são autorizadas pelo SEFAZ, mas a contadora exige que tenha o PIS / COFINS em ambas, e no Apresuntado não sai. Alguém poderia me ajudar por favor, tô a dias pesquisando e não consigo achar nada do tipo. Abaixo as imagens dos xml autorizados dos dois itens, os dados no meu DB e meu código. Não precisa ser explicadinho, se me derem uma direção eu corro atrás. DEUS abençoe a todos e muiiiito obrigado aos que puderem me ajudar ou ao menos tentar. Codigo.txt

Atualizei a tabela hj, esta na sequencia conforme o nome do arquivo obs. Regras do Paraná NCM, Descrição, Origem, CFOP, CEST, CSOSN, IBPT Estadual, IBPT Federal, CST, PICMS, CBenef, Pis, PPis, Cofins, PCofins.txt

Olá EMBarbosa, como sempre vc me ajudando muito, sem querer vc já me deu uma boa dica de quando usar o Close, vou montar um app e disponibiliza-lo pra vc dar uma olhada, assim que pronto já coloco aq, muiiiiiito obrigado pela atenção.

Aparentemente, eu falei besteira, mas continuo precisando de ajuda. Quando acesso os dados com o ibexpert e mantenho a tabela aberta, não consigo acessar do meu sistema, provavelmente porque o ibexpert de segurar a conexão aberta, já no meu sistema se a tabela esta aberta (DBGrid Carregado), eu consigo acessar pelo ibexpert pois os dados então em memoria do meu sistema, ou seja meu sistema não segura a conexão. O que eu estou precisando é que a cada consulta que eu faça no meu sistema ele busque as informações no banco de dados e não as que estão na memoria, e é isso que eu resolvi fechando a conexão antes de cada select com o IBConnection.Close(True); Pois preciso das informações atuais caso outro terminal faça alguma alteração. E é isso que eu queria saber, qual a melhor maneira de fazer. Pode ser que seja uma pergunta besta, mas pesquisando a respeito vi muita gente com a mesma dúvida e não consegui achar outra solução.

Mas uma vez muito obrigado, vou pesquisar a respeito e posto aq o resultado. DEUS abençoe

Então... Aparente ele não fecha pois quando dou um commit, ele mostra os dados conforme o terminal que estou usando, se houve alteração por outro terminal ele não mostra, a não ser que eu feche e abra novamente a aplicação. mas fazendo esse Connection.Close(True), ai sim ele busca as informações novamente no banco de dados, e se algum outro terminal fez alguma modificação dai consigo vê-las. Obrigado pela atenção

Olá a todos! Gostaria de saber qual a melhor forma para se proceder... Uso => Lazarus, Firebid 2.5, TIbConnection, TSQLQuery, TSQLTransaction, TDataSource, TDBGrid Sempre que fecho um Form, depois de executar um commit (Transaction.Commit), ou antes de carregar um DBgrid (Query.Open), eu executo o "Connection.Close(True)" para fechar a conexão fazendo com que eu possa ter sempre os dados que estão no banco e não na memoria. Essa seria a forma mais correta? Ou existe uma forma melhor? Desde já agradeço a atenção de todos

É a unit System Mas eu uso só o windows, não sei como fazer no linux

Eureca!!! Ficou assim... No DataModulo //Adiciona a procedure ao evento Application.OnException := @OnException; //Forms //============================= ON EXCEPTION =================================\\ procedure TDataModulo.OnException(Sender: TObject; E: Exception); var auxLog: TextFile; begin try AssignFile(auxLog, 'Log_Exceptions.txt'); if (FileExists('Log_Exceptions.txt')) then begin Append(auxLog); end else begin Rewrite(auxLog); WriteLn(auxLog, 'Log de Erros!'); WriteLn(auxLog, ''); end; WriteLn(auxLog, FormatDateTime('dd/MM/yyyy - hh:mm:ss',now) + '=> Erro: ' + E.ClassName + ' - ' + E.Message); //Aqui é onde registra os detalhes do erro DumpExceptionBackTrace(auxLog); WriteLn(auxLog, '======================================================='+ '================================'); finally CloseFile(auxLog); end; Riba.Aviso('Erro: ' + E.ClassName + ' - ' + E.Message); end; //=============================== RESULTADO DO LOG 17/09/2019 - 00:40:48=> Erro: EConvertError - " " is an invalid integer $00501536 $0045C6C7 TFORMCLIENTES__EDITBUSCARCHANGE, line 290 of unitClientes.pas $005DB395 TCUSTOMEDIT__CHANGE, line 652 of ./include/customedit.inc $005DB33A TCUSTOMEDIT__TEXTCHANGED, line 644 of ./include/customedit.inc $005BCD6B TCONTROL__CMTEXTCHANGED, line 1203 of ./include/control.inc $0040E828 $005B4801 TWINCONTROL__WNDPROC, line 5419 of ./include/wincontrol.inc $005DAF03 TCUSTOMEDIT__WNDPROC, line 528 of ./include/customedit.inc $006525CF DELIVERMESSAGE, line 112 of lclmessageglue.pas $0059B5BD TWINDOWPROCHELPER__DOWINDOWPROC, line 2515 of win32callback.inc $0059BC8B WINDOWPROC, line 2677 of win32callback.inc $006491ED GROUPBOXWINDOWPROC, line 576 of win32wsstdctrls.pp $75E96238 $75E968EA $75E9CD1A $75E9CD81 $72596508 ======================================================================================= //Na segunda linha mostra o nome do form, o evento, a linha do erro e o nome da unit onde ocorreu o erro. Muito bom, brigadão EMBarbosa, perfeito!!!

Não devo ter me espessado direito, mas é exatamente o que preciso, tratar erros que não foram tratados e criar um log que me ajude a identificar a origem do erro, não tenho palavras pra agradecer sua ajuda em me orientar, vou pesquisar sobre o callstack pois não sei como funciona, e quanto ao segundo modo citado, realmente não parece haver vantagens. DEUS abençoe pela ajuda.

Arrumei conforme vc falou, testei no DataModulo e no FormPrincipal, o ruim de fazer assim é que não vem o nome do Form no Sender, dai meu log não vai registrar da onde veio o erro, e nem consigo fechar aquele form especifico, mas se fica mais estável vou seguir seu conselho e deixar como está, pelo menos não aparece mais o abort que o cliente sempre clica e fecha toda a aplicação. DEUS abençoe pela ajuda.

Show a explicação, só uma ultima pergunta se não for abusar, eu usando o componente mencionado no datamodulo ele pegara as exception de toda a aplicação? pela logica acho que sim né pois vc falou que se trata de um evento da aplicação e não do form.

Boa noite fico muito contente pelas suas explicações, vou tentar coloca-las em prática. Só para entender melhor, meu form padrão nunca é criado (instanciado), ele serve apenas para que os forms herdeiros herdem seus eventos e propriedades, o meu form que é instanciado junto com o sistema é o formPrincipal que também é herdeiro do form padrão, minha duvida é: Se esse evento o Application.OnException que é herdado pode dar problemas, o meus outros eventos herdados tambem podem dar problemas? tipo o onKeyPress que uso para fechar todos os forms com o ESC? Sou autodidata por isso não tenho tanta experiência, acho que não venho usando corretamente a herança de classes. Preciso estudar mais.