Server Exception When Automating Monarch

[Gareth Horton]

Thank you, Gareth.

Everything worked fine after inserting the line to minimize the reports in my code. I've tried much larger batches, and I can't kill it if I try now.

Thanks again.

Brian Turner

Gareth Horton wrote:
> Brian
>
> I have managed to reproduce the problem you mention, although in a slightly different way.
>
> The solution is to include a minimize statement to reduce the time for loading the reports.
>
> The problem appears when loading multiple reports in quick succession.
>
> This should speed up processing for you as well.
>
> Set MonarchObj = CreateObject("Monarch32")
>
> MonarchObj.DisplayWindow (2)
>
> strdirname = "BrianSharedDuplicate_ReportsClaimsInput"
> VarFileArray = GetAllFilesInDir(strdirname)
>
> You could also use a sleep statement later in the code if you prefer.
>
> Here is the declaration
>
> Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
>
>
>
> For lngI = 0 To UBound(VarFileArray)
> FileNames = CStr(strdirname & VarFileArray(lngI))
>
> Sleep 100
>
> openfile = MonarchObj.setreportfile(FileNames, True)
>
>
> Best regards
>
>
> Gareth Horton
> Datawatch Corporation