update Batch_PointBatchItem set TrustBatchCode=left(TrustBatchCode,len(TrustBatchCode)-4)+'R2'  where TrustBatchCode like '%R1R1%'
update Batch_BatchTrust set TrustBatchCode=left(TrustBatchCode,len(TrustBatchCode)-4)+'R2'  where TrustBatchCode like  '%R1R1%'
update Batch_NDE set NDECode=left(NDECode,len(NDECode)-4)+'R2'  where NDECode like  '%R1R1%'
GO