Relatorio Gerencial - Contador CER - ACBrMonitor

[lipaun]

Boa tarte.

Preciso fazer a leitura dos CER's dos relatorios gerenciais dos ECF's que trabalho, portanto tentei executar o comando ECF.CarregaRelatoriosGerenciais no ACBrMonitor, porem o mesmo retorna "comando invalido". Estou usando a versao 0.9.5b. Este comando está correto? alguem pode me ajudar?

[Daniel Simoes]

Realmente os métodos para Relatórios Gerencias ainda não haviam sido mapeados...

Atualizei o SVN com os seguintes métodos:

relatoriosgerenciais

carregarelatoriosgerenciais

lertotaisrelatoriosgerenciais

programaformapagamento

achargdescricao

[Janio]

Daniel,

Vc mesmo ja disse por diversas vezes que o help do ACBrMonitor anda desatualizado por absoluta falta de tempo.

Como o projeto ACBr envolve muitas coisa, e nao somente o monitor, e levando em consideração que não programo em Delphi e portanto não tenho familiaridade com projetos nesta linguagem, pergunto como podemos saber quais os comandos q estao 'mapeados' para o ACBrMonitor??? Tem algum .pas com esta 'lista' de comando disponíveis no acbrmonitor, mas que não constam em seu help???

[Daniel Simoes]

Sim... o DoECFUnit.pas... veja como ficou o trecho desses comandos novos...

        else if Cmd.Metodo = 'relatoriosgerenciais' then

           Cmd.Resposta := PegaRelatoriosGerenciais


        else if Cmd.Metodo = 'carregarelatoriosgerenciais' then

         begin

           CarregaRelatoriosGerenciais ;

           Cmd.Resposta := PegaRelatoriosGerenciais;

         end


        else if Cmd.Metodo = 'lertotaisrelatoriosgerenciais' then

           Cmd.Resposta := PegaTotaisRelatoriosGerenciais


        else if Cmd.Metodo = 'programaformapagamento' then

         begin

            wDescricao := Cmd.Params(0) ;

            ProgramaRelatoriosGerenciais( wDescricao ,             { Descricao }

                   Cmd.Params(1) ) ;                            { Posicao = '' }

         end


        else if Cmd.Metodo = 'achargdescricao' then

         begin

           REL := AchaRGDescricao( cmd.Params(0),                 { Descricao }

                     StrToBoolDef(Trim(Cmd.Params(1)),False) ) ;  { BuscaExata }

           if REL  nil then

              Cmd.Resposta := padL(REL.Indice,4) +

                              padL( REL.Descricao, 30) +

                              IntToStrZero( REL.Contador, 5 )

           else

              raise Exception.Create('Relatório Gerencial: '+Trim(cmd.Params(0))+

                                     ' não encontrado');

         end

[/code]


Apesar de ser em Pascal.. acho que é de fácil entendimento, graças aos comentários nos fontes...

[lipaun]

ok Daniel, porem nao consigo compilar o acbrMonitor. Ele acusa a falta de dois pacotes: LClBase e powerpdf. pesquisei a respeito mas como sou novato com o lazarus (e com pascal) nao consegui resolver. Voce poderia compilar o mesmo e disponibilizar para todos? Grato.

[Daniel Simoes]

Sim... Devo fazer isso ainda hoje....

[Jackson_rr]

Ola Daniel

Seguindo a linha de raciocínio com relação as funções mapeadas na DoECFUnit.pas, nao vi a função "DescontoAcrescimoItemAnterior", pois a mesma se encontra em vários fontes de ECFs, mais não consigo usá-la pois o ACBRMonitor informa que a função não existe.

Seria isso mesmo a falta de mapeamento...

Se for... inclua ela e disponibilize o BINÁRIO

[]'s

Jackson Douglas

[Daniel Simoes]

Realmente estava faltando...

Quando o SAC estiver ativo, vou disponibilizar na página do mesmo, compilações semanais do ACBrMonitor..

SVN e binário no SourceForge foram atualizados com a 0.9.6

[jader13]

else if Cmd.Metodo = 'programaformapagamento' then

begin

wDescricao := Cmd.Params(0) ;

ProgramaRelatoriosGerenciais( wDescricao , { Descricao }

Cmd.Params(1) ) ; { Posicao = '' }

end

No trecho de código acima (marcado em vermelho) não seria "ProgramaRelatoriosGerenciais" ?

Testei no ACBrMonitor 0.9.6b e obtive o seguinte erro:

ECF.ProgramaRelatoriosGerenciais("DAV EMITIDOS")

ERRO: Comando inválido (ECF.ProgramaRelatoriosGerenciais("DAV EMITIDOS"))

[Daniel Simoes]

sim... problemas com Ctrl-C Ctrl-V.... vou corrigir nos fontes... mas não conseguirei atualizar o ACBrMonitor em breve...