add isPreview function to RTransaction