Reclaiming DGroup Space?

[Davin]

When I first start my application I have a total of 28 blocks total, 1 used, and 26 Available. After I run a the invoicing portion of the application and exit back to the menu I only have 20 total, 3 used and 14 available. Do anyone have any ideas as to what could be causing my memory leak or how to reclaim the lost memory.

 

[CFA]

Have you tried invoking garbage collection?

You can do this by calling the memory function with a parameter of zero.

example: memory(0)

HTH

Clyde

 

[Davin]

I tried memory(0) like you said but that didn't work. I also tried BLIMEMPAK(-1) which is a blinker function which packs dynamic memory but that didn't work either.

I forgot to mention that I am using class if that makes any difference.

 

[IgorD]

When destruct objects in Class use somethig like this:
oYourObj:= oYourObjestruct(), <- it will assign your
object to nil
where in your class:

Create Class Your metaClass class //use metaClass
methot init // class in Class
method destruct // declaration, if you do
endclass // not have class vars or class methods

method init()
return self

method Destruct()
//close all databases
return nil

Do not use also often puvlic, private variables - they take some Dynamic space (use local)