update vs4tapvoucherpay set tpvptransferdate = (select tapvdate from vs4tapvoucher where tapvno=tpvptapvno)
update vs4tapinvoicepay set tpiptransferdate = (select tiapdate from vs4tapinvoice where tiapno=tpiptiapno)
update vs4tinvoicepayment set tipytransferdate = (select tivodate from vs4tinvoice where tivono=tipytivono)
update vs4trvreceive set trvrtransferdate = (select trvhdate from vs4treceiveVoucher where trvhno=trvrtrvhno)
update vs4tpostranspay set tppytransferdate = (select tptadate from vs4tpostrans where tptano=tppytptano)

update vs4tapvoucherpay set tpvpcashdate = tpvptransferdate
update vs4tapinvoicepay set tpipcashdate = tpiptransferdate
update vs4tinvoicepayment set tipycashdate = tipytransferdate
update vs4trvreceive set trvrcashdate = trvrtransferdate
update vs4tpostranspay set tppycashdate = tppytransferdate