** END HEADER -- do not remove this line
//
// Generated on 25.02.2017
//
class inveDATAMODULE of DATAMODULE
   this.INVE = new QUERY(this)
   with (this.INVE)
      onOpen = class::INVE_ONOPEN
      left = 291.0
      top = 22.0
      sql = 'Select * from "inve16.dbf"'
      active = true
   endwith

   with (this.INVE.rowset)
      with (fields["full"])
         beforeGetValue = {||iif(this.parent["company"].value#null ,left(this.parent["company"].value,1),"1")}
      endwith
      autoNullFields = false
   endwith

	function inve_onOpen()
		g = new field()
		g.fieldname = "full"
		this.rowset.fields.add(g)
		g.beforegetvalue = {||iif(this.parent["company"].value#null ,left(this.parent["company"].value,1),"1")}
			
      return

endclass