Kill (shut down the RelationManager object)

Top  Previous  Next

 

Kill, VIRTUAL

The Kill method frees any memory allocated during the life of the object and performs any other required termination code.

Example:

 

PROGRAM

INCLUDE('FILE.INC')                  !declare RelationManager class

 

Access:Client  CLASS(FileManager)     !declare Access:Client class

Init            PROCEDURE

              END

 

Client   FILE,DRIVER('TOPSPEED'),PRE(CLI),THREAD !declare Client file

IDKey    KEY(CLI:ID),NOCASE,OPT,PRIMARY

Record    RECORD,PRE()

ID         LONG

Name       STRING(20)

StateCode  STRING(2)

         END

        END

 CODE

 Access:Client.Init                         !initialize Access:Client obj

 Relate:Client.Init(Access:Client,1)        !init Relate:Client--use logout

 Relate:Client.AddRelation( Relate:States ) !relate Client to States file

 !program code

 Relate:Client.Kill                         !shut down Relate:Client object

 Access:Client.Kill                         !shut down Access:Client object