Cross Ref > Database

In ObjectPAL, you use Cursor.InsertRecord to add a new record, Cursor.postRecord to post the record, and Cursor.deleteRecord() to delete it. To edit a record, you must put the cursor into edit mode, Cursor.Edit(). (A cursor applies to both a TCursor and UIObject.)

ObjectPAL gives you tremendous flexibility with editing data and includes many additional commands such as insertAfterRecord and isEdit. For dBASE tables, you can also use unDeleteRecord() to un-delete a record. See the ObjectPAL help for more commands.

tc.edit()

tc.InsertRecord()

tc.FullName = "Barack Obama"

tc.Created  = today()

tc.postRecord

In ObjectPAL, you can filter set a TCursor, UIObject, and Table objects using setRange() and setGenFilter().

var
 r Report
 dyn DynArray[] String
endVar

dyn["Name"] = "SCUBA Heaven"
Customer.setGenFilter(dyn)

r.load(":Sample:customer")
r.Customer.setGenFilter(dyn)

r.run()

r.Customer.dropGenFilter()

ObjectPAL provides a rich set of commands for finding a record with a TCursor or UIObject including:

• locate() -  Seach for a value based on a criteria. Uses indexes as appropriate.
• locatePattern() - Search for a pattern within a value.
• moveToRecord() - Moves to a specific record number.
• qLocate() - Search using currently set index.

Each of these basic find record commands has supporting commands such as locateNext() and recNo().

var
  tc TCursor
endVar

tc.open("Customer.db") 
  

if tc.locate("Name", "Proffessional Divers, Ltd.") then 
  tc.edit()
  tc.Name = "Professional Divers, Ltd." 
  msgInfo("Success", "Corrected spelling error.") 
endIf 
  

tc.endEdit()

ObjectPAL uses home(), end(), nextRecord(), priorRecord() to move a database cursor (works with either a TCursor or UIObject).

TCursor.nextRecord()

These commands send a message to the object. Specifically, they send an action constant using the action command. The above snippet is equivalent to:

TCursor.action(DataNextRecord)

It is handy to  with familiar with action constants because not all action constants have an ObjectPAL equivalent comment.

active.end()

active.priorRecord()

 An ObjectPAL Primer: Part 3  

In Paradox, you add an index for each sort your wish to perform on a table then use switchIndex(). Alternatively, you can use sortTo() to sort a table into a new table.