Customizing codeunit ApplicationManagement

jks · 2006-09-27

Hi all,

I added two statements in codeunit 1 i.e ApplicationManagement, one in CompanyOpen and one in CompanyClose. On CompanyOpen I have added statement for Database connection and on CompanyClose I disconnect from there. Code is as follow:

CompanyOpen
IF GUIALLOWED THEN
LogInStart;
TestCD.Init;

ComapnyClose
IF GUIALLOWED THEN
BEGIN
TestCD.Term;
LogInEnd;
END;

Here TestCD is my another codeunit. Now CompanyOpen code works perfectly. but on CompanyClose I get error
Internal error 2 in module 7
Contact your dealer if you need assistance.
And then Navision crashes.

Please help.

Marije_Brummel · 2006-09-27

What does TestCD do? Is it a singleinstance CU with some Automation contol?

jks · 2006-09-27

Yes.

Marije_Brummel · 2006-09-27

Just as i thought

. Wow this is scary.

What is the code in the functions? I've had the same error some years ago.

jks · 2006-09-27

Code just uses the Automation Variable and invokes COM interface function to connect to the database.

What you did then to resolve it??
Please help.

Marije_Brummel · 2006-09-27

I was hoping to remember by looking at your code. But my guess is you forgot to CLEAR the automation contol.

jks · 2006-09-27

No I have cleared it.
My code is as follow:

Term
{
AutomationVar.Terminate();
returnvalue := AutomationVar.ErrCode;
IF returnvalues <> 0 THEN ERROR('display error');

CLEAR(Automationvar);
}

Marije_Brummel · 2006-09-27

Just thinking, I don't have the database at hand.

Is the TestCD codunit a global var in CU1 or local?

jks · 2006-09-27

Global

Customizing codeunit ApplicationManagement

Comments

Categories