if file('morph_logical.dbf')
   drop table morph_logical
endif

if not file('morph_logical.dbf')
   create table morph_logical  (id autoinc,data character(15),logical_fld boolean)
   use morph_logical 
   generate 10
   use
endif

** END HEADER -- do not remove this line
//
// Generated on 2022-07-21
//
parameter bModal
local f
f = new morph_logicalForm()
if (bModal)
   f.mdi = false // ensure not MDI
   f.readModal()
else
   f.open()
endif

class morph_logicalForm of FORM
   with (this)
      height = 17.7727
      left = 52.0
      top = 0.2273
      width = 96.0
      text = ""
   endwith

   this.MORPH_LOGICAL1 = new QUERY(this)
   with (this.MORPH_LOGICAL1)
      onOpen = class::MORPH_LOGICAL1_ONOPEN
      left = 6.0
      top = 1.0
      width = 12.0
      height = 1.0
      sql = 'select * from "morph_logical.DBF"'
      active = true
   endwith


   this.GRID1 = new GRID(this)
   with (this.GRID1)
      dataLink = form.morph_logical1.rowset
      height = 12.1818
      left = 3.8571
      top = 2.6818
      width = 81.1429
   endwith

   this.rowset = this.morph_logical1.rowset

   function MORPH_LOGICAL1_onOpen()
      f = new Field()
      f.fieldName = 'morph_logic'
      f.beforeGetValue = {||iif( this.parent["logical_fld"].value= true,"Blocked","Unblocked")} 
      this.rowset.fields.add( f )
      return

endclass