Murilo Sousa

Bom dia. Estou tentando fazer a instalação dos componentes do ACBr através do instalador porém não estou tendo sucesso. Eu já utilizava os componentes, porém estou tentando atualizá-los para a nova versão. Procedimentos que eu já fiz: Desinstalei o ACBr, baixei novamente através do SVN e removi todas as referencias no libary path. Está retornando: File not found: 'ACBr_jedi.inc' Erro ao compilar o pacote "ACBr_synapse.dpk". Alguém sabe o que pode ser? Estou utilizando Delphi 7. O arquivo ACBR_jedi.inc está localizado no diretório: \Fontes\ACBrComum log_Delphi_7.txt

Bom dia @JNPace. Vou tentar realizar esse procedimento... Obrigado!

Ok, André. Obrigado. Estou criando algumas tratativas em meu sistema para solucionar o problema.

Olá, André. Sim eu verifiquei a função "ConsultarStatusOperacional" porém não encontrei nenhuma propriedade na classe TACBrSATStatus que fosse relacionado a isso. Olá, Daniel. Ok, essa era minha dúvida, se não havia mesmo algum jeito de descobrir os CFe's pendente de envio. Obrigado pela informação.

Bom dia. Eu possuo um sistema que faz a emissão de CF-e/SAT. Eu o desenvolvi com Delphi 7 e ultimamente estou tendo alguns problemas com um equipamento ELGIN LINKER II (Homologação) onde está ocorrendo pulo de numeração com muita frequência. O pulo de numeração acontece por causa que no momento do envio do cupom, o equipamento me retorna uma mensagem de erro: Código do erro: 0 Mensagem de erro: "" Mesmo retornando essa mensagem de erro (exception), o cupom é enviado para o equipamento SAT mas em meu sistema eu faço uma tratativa (try - except) no qual eu faço a exclusão do CF-e do banco de dados. Através de algumas análises nos logs e até mesmo depois de entrar em contato com a ELGIN, pude perceber que o problema está relacionado ao equipamento e nas dlls necessárias para o ele funcionar. Já fiz diversos testes trocando elas porém sem sucesso. Sendo assim, o problema pode ocorrer a qualquer momento. Pois bem, eu gostaria de saber se o ACBr possui algum recurso para que eu possar consultar no equipamento todos os cupons que estão pendente de envio, para desta forma poder confrontar com o meu sistema e fazer todas as tratativas necessárias. Obrigado desde já!

Bom dia, pessoal. Eu possuo uma impressora HP LaserJet M1132 MFP e estou com o seguinte problema: Ao realizar a impressão de uma listagem desenvolvida com FortesReport, a impressão não é feita na orientação correta. Ex: Se a propriedade RLReport.PageSetup.Orientation estiver marcada como poPortrait (Retrato) ou como poLandscape (Paisagem) a impressão está sendo feita sempre como retrato. Vendo isso, analisei as propriedades da impressora e percebi que o FortesReport só está respeitando o padrão de orientação definido nas Preferências de Impressão. Então, se estiver definido como paisagem, irá imprimir sempre como paisagem independente da propriedade RLReport.PageSetup.Orientation, se estiver como retrato, irá imprimir sempre retrato independente da propriedade RLReport.PageSetup.Orientation. Logo, se eu preparar um RLReport em modo paisagem e a orientação na impressora estiver como retrato, a impressão irá sair cortada. Testei com outra impressora HP e o problema também ocorreu. Só ocorre com impressoras HP. Tentei salvar a listagem em modo retrato como pdf e imprimir através do FoxitReader e funcionou imprimindo corretamente. Alguém tem noção do que pode ser isso e me dar uma ajuda? Obrigado!!

Essa solução foi sugerida pelo pessoal na última FDD que aconteceu em Piracicaba.

Bom dia pessoal, Agradeço pelas dicas. Consegui resolver o problema com a seguinte lógica: O sistema tenta fazer a operação (try), se não conseguir (cair em um except) ele tenta novamente mais 4 vezes. Se conseguir fazer a operação sem dar deadlock, interrompe o loop e dá um commit, senão, se não conseguir em nenhuma das 5 tentativas, gera uma exceção com uma mensagem informativa e legível para o usuário e aborta a operação seguido de um rollback. Analisei e testei bem os locais na aplicação onde isso poderia afetar e pelo que vi deu tudo certo, não ocasionou nenhum outro problema e a operação foi executada corretamente. Obrigado a todos.

Bom dia!Eu possuo um sistema feito em Delphi 7 + Firebird 2.5 com componentes de conexão da paleta InterBase. Em uma das minhas rotinas, é realizada a baixa de estoque do produto através de Expedição de pedido de venda.Estou com o seguinte problema: Ao fazer a expedição de um mesmo produto, simultaneamente, em terminais diferentes (e pedidos de venda diferentes), o sistema trava e logo após destravar exibe a seguinte mensagem de erro: "deadlock / concurrent transaction number is 14297". Segue o código:IBTransAtualizacao.StartTransaction; try ExpedirItem(StrToInt(edtCodigo.Text) ,poItemExpedido.nQuantidade ,poItemExpedido.nQuantidadeUP ,cdsItensVendaITE_QTD_EXPEDIDO.AsFloat ,cdsItensVendaITE_QTD_UP_EXPEDIDO.AsFloat ); IBTransAtualizacao.Commit; except on E: Exception do begin IBTransAtualizacao.Rollback; MensagemFalha('Expedição não executada!'); end; end;Toda operação está ligada no mesmo Transaction (IBTransAtualizacao).Dentro do método ExpedirItem, faço algumas consultas na tabela ANDAMENTO_ESTOQUE (Esta por sua vez armazena toda movimentação de estoque do sistema por produto) para poder recalcular o saldo do produto que está sendo expedido e assim poder dar baixa do mesmo no estoque (Atualizar o campo PRO_ESTOQUE da tabela PRODUTO).O deadlock provavelmente ocorre porque ao consultar simultaneamente a tabela ANDAMENTO_ESTOQUE cruzando (JOIN) com a tabela PRODUTO, o firebird bloqueia o registro referente ao produto que está sendo expedido. Mas está tudo ligado na mesma transação. Alguém sabe como resolver o problema do deadlock? Como faço para trabalhar com "fila"? Ex: Caso a transação em um terminal tente acessar um registro que já está sendo utilizado por outro, o sistema aguarde até o registro ser "liberado"? A propriedade Params do IBTransAtualizacao está como:read_committedno_rec_versionwaitObrigado desde já!