Subject Parent/Child
From Bob McKinney <bmckinney721@gmail.com>
Date Fri, 05 Mar 2021 10:58:04 -0500
Newsgroups dbase.getting-started

Hi All:  Using dB+2.8 w/wind-10.  Haing a problem w/"parent-Child" setup when
  creating a new Query (Datamodule).  I set the indexes and drag the Vendor.dbf
  field "VendNo" to NewBkBal.dbf "VendNO" field as I always have to set "Parent/Child".
  When I click on "Parent/Child Properties" the readout is correct but it doesn't work.
  The Child table is blanked out rather than show all the fields available for that
  particuler Vendno.
    Am I forgetting something or could this possibly be a glitch that has gotten into
  dBase that will require a "Re-Install" of dbase?
  any help on this problem would be greatly appreciated.......Bob

** END HEADER -- do not remove this line
//
// Generated on 03/05/2021
//
class PerAllDATAMODULE of DATAMODULE
   with (this)
      left = -1.0
      top = -1.0
   endwith

   this.PERBIZ1 = new DATABASE()
   this.PERBIZ1.parent = this
   with (this.PERBIZ1)
      left = 19.0
      top = 135.0
      width = 115.0
      height = 112.0
      databaseName = "perBiz"
      active = true
   endwith

   this.PERVEND1 = new QUERY()
   this.PERVEND1.parent = this
   with (this.PERVEND1)
      left = 143.0
      top = 10.0
      width = 114.0
      height = 126.0
      database = form.perbiz1
      sql = 'Select * from "PerVend"'
      active = true
   endwith

   this.PERVEND1 = new QUERY()
   this.PERVEND1.parent = this
   with (this.PERVEND1)
      left = 143.0
      top = 10.0
      width = 114.0
      height = 126.0
      database = form.perbiz1
      sql = 'Select * from "PerVend"'
      active = true
   endwith

   with (this.PERVEND1.rowset)
      indexName = "VENDOR"
   endwith

   this.NEWBKBAL1 = new QUERY()
   this.NEWBKBAL1.parent = this
   with (this.NEWBKBAL1)
      left = 323.0
      top = 20.0
      width = 117.0
      height = 117.0
      database = form.perbiz1
      sql = 'Select * from "newbkbal"'
      active = true
   endwith

   with (this.NEWBKBAL1.rowset)
      indexName = "VENDNO"
      masterRowset = form.pervend1.rowset
      masterFields = "VendNo"
   endwith

endclass