Copy a record

[AlanBreck1000]

I have an application that when a user makes the record inactive by selecting a radio box on the update form i.e. 'Active' 'Inactive' radio options I would like it to copy certain fields in that particular record to a child related database, any help please.

 

[ShankarJ]

Assuming that the Parent & Child are related by ID in the Parent file and ParentID in the Child database with a key called ParentIDKey KEY(ParentID,..) in the child database :

In ABC - WindowManager - INIT - After opening tables

LOC:Status = PARENT:Status ! store the original value of the Active/Inactive

In ABC - Take Completed - After Parent Call

IF NOT ReturnValue ! check if file action on parent file was sucessful
IF SELF.Request = ChangeRecord AND PARENT:Status <> LOC:Status
CLEAR(CHILD:Record)
CHILDarentID = PARENT:ID
SET(CHILDarentIDKey,CHILDarentIDKey)
LOOP UNTIL AccessARENTFILE.Next()
IF CHILDarentID <> PARENT:ID THEN BREAK.

<update child fields based on Status changed>

Access:CHILDFile.Update() or Relate:CHILDFile.Update()
END
END
END

HTH-Regards