E
Eric
After parsing i move the values form tblcustomer to tblRequest. There
are too many spaces in all the field of tblcustomer
but they all move good accept field Account number. Below is the query
which i use to move values but it still give me last
4 digit from tblcustomers.
tblcustomers
AccountNum Text 100
Value: 07836-105575-02
Input Mask: CCCCCC\-CC
tblRequest
AcctCustNum Text 15
Value: 75-02
INSERT INTO tblRequest ( AcctCustNum, CableDataDate, CreditRequested,
ZipCode, CorpNum, BoxType, Comments, CustFName,
CustLName, NewRequest, BoxQty, ReturnMethod, DateLoaded, ConverterNum,
RequestRecd, RequestRecdDtl, RequestDate,
RequestStatus, ErrorType, RequestType, SenderInitials, SenderCorp,
CableDataID )
SELECT Right(Trim([AccountNum]),9) AS AccountNo,
tblCustomers.ReturnDate, tblCustomers.CreditAmount,
Right(Trim([CityStateZip]),Len(Trim([CityStateZip]))-InStr(1,[CityStateZip],",
")) AS Zip, Left([AccountNum],5) AS Corp,
tblCustomers.BoxType, tblCustomers.Comments,
Left([Name],InStr(1,[Name]," ")-1) AS Expr,
Right(Trim([Name]),Len(Trim([Name]))-InStr(1,[Name]," ")) AS Expr2,
"Yes" AS NewWork, tblCustomers.BoxQty,
tblCustomers.ReturnMethod, tblCustomers.ImportDate,
tblCustomers.ConverterNumbers, "E Mail" AS RecdHow, "KDB" AS
RecdDetail, Left([RequestDate],10) AS ReqDate, "Open" AS ReqStat,
"Open" AS ErrTyp, tblCustomers.Subject,
Left([Sender],InStr(1,[Sender]," (")-1) AS SenderInits,
Right([Sender],4) AS SenderCorp, Left((Right([Sender],8)),3) AS
CDID
FROM tblCustomers;
are too many spaces in all the field of tblcustomer
but they all move good accept field Account number. Below is the query
which i use to move values but it still give me last
4 digit from tblcustomers.
tblcustomers
AccountNum Text 100
Value: 07836-105575-02
Input Mask: CCCCCC\-CC
tblRequest
AcctCustNum Text 15
Value: 75-02
INSERT INTO tblRequest ( AcctCustNum, CableDataDate, CreditRequested,
ZipCode, CorpNum, BoxType, Comments, CustFName,
CustLName, NewRequest, BoxQty, ReturnMethod, DateLoaded, ConverterNum,
RequestRecd, RequestRecdDtl, RequestDate,
RequestStatus, ErrorType, RequestType, SenderInitials, SenderCorp,
CableDataID )
SELECT Right(Trim([AccountNum]),9) AS AccountNo,
tblCustomers.ReturnDate, tblCustomers.CreditAmount,
Right(Trim([CityStateZip]),Len(Trim([CityStateZip]))-InStr(1,[CityStateZip],",
")) AS Zip, Left([AccountNum],5) AS Corp,
tblCustomers.BoxType, tblCustomers.Comments,
Left([Name],InStr(1,[Name]," ")-1) AS Expr,
Right(Trim([Name]),Len(Trim([Name]))-InStr(1,[Name]," ")) AS Expr2,
"Yes" AS NewWork, tblCustomers.BoxQty,
tblCustomers.ReturnMethod, tblCustomers.ImportDate,
tblCustomers.ConverterNumbers, "E Mail" AS RecdHow, "KDB" AS
RecdDetail, Left([RequestDate],10) AS ReqDate, "Open" AS ReqStat,
"Open" AS ErrTyp, tblCustomers.Subject,
Left([Sender],InStr(1,[Sender]," (")-1) AS SenderInits,
Right([Sender],4) AS SenderCorp, Left((Right([Sender],8)),3) AS
CDID
FROM tblCustomers;