table.MOVE_RECORD_TO Function


Result_Flag as L = Table.Move_Record_To(C Target_table_name )



The name of the table to receive the record.


Moves the current record to another table with the same structure.


The <TBL>.MOVE_RECORD_TO() method moves the current record in the source table referenced by <TBL> to the target table specified by Table_Name. Data is copied from each field in the source table to the corresponding field with the same name in the target table and then the record in the current table is deleted. If the record was successfully moved, Result_Flag is .T. (TRUE). If the record was not moved then the method generates an error. For example, if the record you are trying to copy violates a field rule in Table_Name, it will not be moved. Use the ERROR_CODE_GET() and ERROR_TEXT_GET() functions to get the error message associated with the error. Table_Name can have more fields than the source table. However, at a minimum, it must have all of the fields in the source table, and they must be of the same type and size.


This script moves record 3 to "old_customers".

dim tbl_source as P
tbl_source = table.current()
on error goto failed_to_copy
result = tbl_source.move_record_to("old_customers")
on error goto 0
if result then
    ui_msg_box("Result","Record was moved")
end if
ui_msg_box("Record not moved.",error_text_get(error_code_get()))

See Also