Update VS4TQuotation Set TQuoTCurCode='THB' WHERE  TQuoTCurCode='BHT'
GO
Update VS4TSO Set TSODTCurCode='THB' WHERE  TSODTCurCode='BHT'
GO
Update VS4TARInvoice Set TIvoTCurCode='THB' WHERE  TIvoTCurCode='BHT'
GO
Update VS4TARCreditNote Set TRCNTCurCode='THB' WHERE  TRCNTCurCode='BHT'
GO
Update VS4TARDebitNote Set TDBNTCurCode='THB' WHERE  TDBNTCurCode='BHT'
GO
Update VS4TARVoucherPay  Set TRVRCurrency='THB' WHERE  TRVRCurrency='BHT'
GO
Update VS4TPS Set TPSDTCurCode='THB' WHERE  TPSDTCurCode='BHT'
GO
Update VS4TPO Set TPODTCurCode='THB' WHERE  TPODTCurCode='BHT'
GO
Update VS4TAPInvoice Set TIAPTCurCode='THB' WHERE  TIAPTCurCode='BHT'
GO
Update VS4TAPCreditNote Set TPCNTCurCode='THB' WHERE  TPCNTCurCode='BHT'
GO
Update VS4TAPDebitNote Set TDENTCurCode='THB' WHERE  TDENTCurCode='BHT'
GO
Update VS4TAPVoucherPay  Set TPVPCurrency='THB' WHERE  TPVPCurrency='BHT'
GO
Update VS4TTeasuryTransMB Set TTTMTCurCode='THB' WHERE  TTTMTCurCode='BHT'
GO
Update VS4TAssetFund  Set TAFdTCurCode='THB' WHERE  TAFdTCurCode='BHT'
GO
