Hi Dr.RYU.
Try changing FORMULA part with this next:
Formula = "CASE WHEN TransactionEntry.Price * TransactionEntry.Quantity <> 0 THEN ((TransactionEntry.Price - TransactionEntry.Cost) * TransactionEntry.Quantity)/(TransactionEntry.Price * TransactionEntry.Quantity) ELSE 0 END"
It works on my PC, have just test it.... Be careful, it have to be in whole line, otherwise RMS will not be able to read the report properly...
Regards, A.