Initialize() and Destroy() methods

The Initialize() method will set default values to the fields in the class definition. Note that by default, EASI already sets numeric variables to 0, and string fields to empty.

define method Initialize() on VLShape
  this.AtEnd = "TRUE"
  this.fd = 0
  this.filename = ""
  this.shape = -1
  this.layer = 0
  this.access = ""
  this.fieldnames = ""
enddefine

The Destroy() method will ensure that the file has been closed when the object is destroyed. It will do this by simply calling the objects Close() method. The Destroy() method also frees the list of vertices belonging to the shape.

define method Destroy() on VLShape
  call this.Close()
  if ( this.Vertices != NULL ) then
     call EFree( this.Vertices )
     this.Vertices = NULL
  endif
enddefine