Erro Visual Basic

Question

Pessoal quando tento executar uma função aparece o seguinte erro:

Error detected by database DLL  

Debugando o código percebi que o erro acontece na seguinte linha :

 MDIGL.crpMKT.Action = 1

PAra ficar mais fácil segue o código completo :

  If optImpressora.Value Then
                    Set Printer = Printers(cmbImpressoras.ListIndex)
                    MDIGL.crpMKT.PrinterDriver = Printer.DriverName
                    MDIGL.crpMKT.PrinterName = Printer.DeviceName
                    MDIGL.crpMKT.PrinterPort = Printer.Port
                    MDIGL.crpMKT.Destination = crptToPrinter
                Else
                    MDIGL.crpMKT.WindowState = crptMaximized
                    MDIGL.crpMKT.Destination = crptToWindow
                End If
               
                Call Grava_Log_Impressao(MDIGL.crpMKT.ReportFileName, MDIGL.crpMKT.Destination)

 

                MDIGL.crpMKT.Action = 1

Quando fui procurar no form MDIGL a variável crpMKT o único trecho que achei foi esse :

      crpMKT.Reset
       crpMKT.LogOnServer "P2SSQL.DLL", pServidor, Conn.DefaultDatabase, "programador", SENHA_CONECT
       crpMKT.Connect = "dsn=" & pServidor & ";uid=" & "Programador" & ";pwd=" & SENHA_CONECT & ";dsq=" & Conn.DefaultDatabase
      
       'Caminho do arquivo de relatório.
       crpMKT.ReportFileName = App.Path & "\Relatorios\TodasEmpresasCompletas.rpt"
      
       crpMKT.StoredProcParam(0) = "C"
       crpMKT.Destination = crptToPrinter
      
        Call Grava_Log_Impressao(crpMKT.ReportFileName, crpMKT.Destination)

 

       crpMKT.Action = 1

Não entendi muito bem pois em nenhum momento no código ele declarou a variável, e além disso para quer serve essa action ?
Obrigado desde já

---

Seu nome

Answer 1

Esse objeto ai parece que foi algum outro programador que criou.

Só tem acesso ao código fonte para saber o que ele faz ou o Action faz.

Answer 2

Como assim ?
Não entendi muito bem

---

Seu nome