IF HSynchronizeReplica("C:\Data", "D:\Temp", rplToSubscriber, FilterReplica) = True THEN
	Info("Replication performed")
END

PROCEDURE FilterReplica()
ProgressBar(RPL.OperationNum, RPL.OperationMax)
// ******************************** Filter records ********************************
// Example: Exporting the catalog of bargains
IF RPL.Direction = rplToSubscriber AND RPL.Operation = rplHAdd THEN
	 IF RPL.File = "Product" AND {RPL.SourceAlias + ".BARGAINS"} = False THEN
		  // The record must not be copied
		  RETURN False
	END 
END
// ************************************** Conflict Management ***********************************
// Example: Checks whether the product already exists
// HReadSeek(PRODUCT, ProductCode, {RPL.SourceAlias + ".ProductCode"})
// IF HFound() THEN
// // The record must not be copied
// RETURN False
// END
// No problem was detected
RETURN True