runtime error 3001 invalid argument error message

G

Guest

hi,

I have the following code behind a button:

Dim strSQLArchive2 As String

strSQLArchive2 = "INSERT INTO tbl_archive " _
& "([loan acct #], [popenterdt], [status], [pasted]," _
& "[Buying Center #], [Division Name],[Region Name],[Group Name],
[Collection Center Name], " _
& "[Distribution Channel], [New Institution Name], [Origination Channel],
[Sub Channel],[Short Name], [Loan Status], " _
& "[Contract Date], [Mat date], [Next Pmt Due Date], [Payoff Date], [Paid
Off?], [Nbr of Reg Pmts Made], " _
& "[# Reg Pmts Remaining], [Pmt Scd Monthly Pmt Amt], [Last Pmt Date], [Last
Pmt Amt], [Amended?], [Amended This Mo?], " _
& "[DEL Group], [Days Delinquent], [Tot Past Due Pmts $], [Principal
Balance], [Val Reserve Dollar Amt], NETBAL, " _
& "[Ext?],[Extended This Mo?],[Payoff Dollar Amt], [Flat Void Mth of
Orig],[Active BK Flag Date],[Active BK Flag], " _
& "[Inventory Status],[Charge Off Principal],[Chg Off Type],[CHG OFF
Date],[Cure Letter Date],[Skip Active Date], " _
& "[Skip Completion Date],[Skip Completion Sts],[Redeemed Date],[Entered
Date],[Repo Ordered Date],[Active Inactive Flag]) " _
& "SELECT " _
& "tbl_archive_temp.[loan acct #], tbl_archive_temp.[popenterdt],
tbl_archive_temp.[status], tbl_archive_temp.[pasted]," _
& "tbl_archive_temp.[Buying Center #], tbl_archive_temp.[Division
Name],tbl_archive_temp.[Region Name],tbl_archive_temp.[Group Name],
tbl_archive_temp.[Collection Center Name], " _
& "tbl_archive_temp.[Distribution Channel], tbl_archive_temp.[New
Institution Name], tbl_archive_temp.[Origination Channel],
tbl_archive_temp.[Sub Channel],tbl_archive_temp.[Short Name],
tbl_archive_temp.[Loan Status], " _
& "tbl_archive_temp.[Contract Date], tbl_archive_temp.[Mat date],
tbl_archive_temp.[Next Pmt Due Date], tbl_archive_temp.[Payoff Date],
tbl_archive_temp.[Paid Off?], tbl_archive_temp.[Nbr of Reg Pmts Made], " _
& "tbl_archive_temp.[# Reg Pmts Remaining], tbl_archive_temp.[Pmt Scd
Monthly Pmt Amt], tbl_archive_temp.[Last Pmt Date], tbl_archive_temp.[Last
Pmt Amt], tbl_archive_temp.[Amended?], tbl_archive_temp.[Amended This Mo?], "
_
& "tbl_archive_temp.[DEL Group], tbl_archive_temp.[Days Delinquent],
tbl_archive_temp.[Tot Past Due Pmts $], tbl_archive_temp.[Principal Balance],
tbl_archive_temp.[Val Reserve Dollar Amt], tbl_archive_temp.NETBAL, " _
& "tbl_archive_temp.[Ext?],tbl_archive_temp.[Extended This
Mo?],tbl_archive_temp.[Payoff Dollar Amt], tbl_archive_temp.[Flat Void Mth of
Orig],tbl_archive_temp.[Active BK Flag Date],tbl_archive_temp.[Active BK
Flag], " _
& "tbl_archive_temp.[Inventory Status],tbl_archive_temp.[Charge Off
Principal],tbl_archive_temp.[Chg Off Type],tbl_archive_temp.[CHG OFF
Date],tbl_archive_temp.[Cure Letter Date],tbl_archive_temp.[Skip Active
Date], " _
& "tbl_archive_temp.[Skip Completion Date],tbl_archive_temp.[Skip Completion
Sts],tbl_archive_temp.[Redeemed Date],tbl_archive_temp.[Entered
Date],tbl_archive_temp.[Repo Ordered Date],tbl_archive_temp.[Active Inactive
Flag] " _
& "FROM tbl_archive_temp LEFT JOIN Tbl_archive ON " _
& "(tbl_archive_temp.status=Tbl_archive.status) " _
& "AND (tbl_archive_temp.[Loan Acct #]=Tbl_archive.[Loan Acct #]) " _
& "WHERE (((tbl_archive_temp.PopEnterDt) Is Null) or ((Tbl_archive.status)
Is Null));"

DoCmd.RunSQL strSQLArchive2



Dim strSQLArchive23 As String

strSQLArchive23 = "INSERT INTO tbl_masterpop_resolved" _
& "([loan acct #], [PopEnterDt], [status], [pasted]," _
& "[Buying Center #], [Division Name],[Region Name],[Group Name],
[Collection Center Name], " _
& "[Distribution Channel], [New Institution Name], [Origination Channel],
[Sub Channel],[Short Name], [Loan Status], " _
& "[Contract Date], [Mat date], [Next Pmt Due Date], [Payoff Date], [Paid
Off?], [Nbr of Reg Pmts Made], " _
& "[# Reg Pmts Remaining], [Pmt Scd Monthly Pmt Amt], [Last Pmt Date], [Last
Pmt Amt], [Amended?], [Amended This Mo?], " _
& "[DEL Group], [Days Delinquent], [Tot Past Due Pmts $], [Principal
Balance], [Val Reserve Dollar Amt], NETBAL, " _
& "[Ext?],[Extended This Mo?],[Payoff Dollar Amt], [Flat Void Mth of
Orig],[Active BK Flag Date],[Active BK Flag], " _
& "[Inventory Status],[Charge Off Principal],[Chg Off Type],[CHG OFF
Date],[Cure Letter Date],[Skip Active Date], " _
& "[Skip Completion Date],[Skip Completion Sts],[Redeemed Date],[Entered
Date],[Repo Ordered Date],[Active Inactive Flag]) " _
& "SELECT " _
& "tbl_archive_temp.[loan acct #], tbl_archive_temp.[popenterdt],
tbl_archive_temp.[status], tbl_archive_temp.[pasted]," _
& "tbl_archive_temp.[Buying Center #], tbl_archive_temp.[Division
Name],tbl_archive_temp.[Region Name],tbl_archive_temp.[Group Name],
tbl_archive_temp.[Collection Center Name], " _
& "tbl_archive_temp.[Distribution Channel], tbl_archive_temp.[New
Institution Name], tbl_archive_temp.[Origination Channel],
tbl_archive_temp.[Sub Channel],tbl_archive_temp.[Short Name],
tbl_archive_temp.[Loan Status], " _
& "tbl_archive_temp.[Contract Date], tbl_archive_temp.[Mat date],
tbl_archive_temp.[Next Pmt Due Date], tbl_archive_temp.[Payoff Date],
tbl_archive_temp.[Paid Off?], tbl_archive_temp.[Nbr of Reg Pmts Made], " _
& "tbl_archive_temp.[# Reg Pmts Remaining], tbl_archive_temp.[Pmt Scd
Monthly Pmt Amt], tbl_archive_temp.[Last Pmt Date], tbl_archive_temp.[Last
Pmt Amt], tbl_archive_temp.[Amended?], tbl_archive_temp.[Amended This Mo?], "
_
& "tbl_archive_temp.[DEL Group], tbl_archive_temp.[Days Delinquent],
tbl_archive_temp.[Tot Past Due Pmts $], tbl_archive_temp.[Principal Balance],
tbl_archive_temp.[Val Reserve Dollar Amt], tbl_archive_temp.NETBAL, " _
& "tbl_archive_temp.[Ext?],tbl_archive_temp.[Extended This
Mo?],tbl_archive_temp.[Payoff Dollar Amt], tbl_archive_temp.[Flat Void Mth of
Orig],tbl_archive_temp.[Active BK Flag Date],tbl_archive_temp.[Active BK
Flag], " _
& "tbl_archive_temp.[Inventory Status],tbl_archive_temp.[Charge Off
Principal],tbl_archive_temp.[Chg Off Type],tbl_archive_temp.[CHG OFF
Date],tbl_archive_temp.[Cure Letter Date],tbl_archive_temp.[Skip Active
Date], " _
& "tbl_archive_temp.[Skip Completion Date],tbl_archive_temp.[Skip Completion
Sts],tbl_archive_temp.[Redeemed Date],tbl_archive_temp.[Entered
Date],tbl_archive_temp.[Repo Ordered Date],tbl_archive_temp.[Active Inactive
Flag] " _
& "FROM tbl_archive_temp LEFT JOIN tbl_masterpop_resolved ON " _
& "(tbl_archive_temp.status = tbl_masterpop_resolved.status)" _
& "AND (tbl_archive_temp.[Loan Acct #]= tbl_masterpop_resolved.[Loan Acct
#]) " _
& "WHERE (((tbl_masterpop_resolved.PopEnterDt) Is Null) or
((tbl_masterpop_resolved.status) Is Null));"

DoCmd.RunSQL strSQLArchive23



Me.check11.Caption = "R"
Me.check11.ForeColor = "12632256"


ever since i moved the backend file to a new folder and then back to its
original folder, i have been getting this error message. i dont know what is
going on, because i did not change the code. how can i fix this?

thanks in advance,
geebee
 
T

Tom Ellison

Dear GB:

Put a break point on each of the DoCmd.RunSQL lines. Run to that point and
use the immediate pane to display the strings. Paste these into new queries
and see if they work.

This is pretty fundamental debugging for code like this.

Tom Ellison


geebee said:
hi,

I have the following code behind a button:

Dim strSQLArchive2 As String

strSQLArchive2 = "INSERT INTO tbl_archive " _
& "([loan acct #], [popenterdt], [status], [pasted]," _
& "[Buying Center #], [Division Name],[Region Name],[Group Name],
[Collection Center Name], " _
& "[Distribution Channel], [New Institution Name], [Origination Channel],
[Sub Channel],[Short Name], [Loan Status], " _
& "[Contract Date], [Mat date], [Next Pmt Due Date], [Payoff Date], [Paid
Off?], [Nbr of Reg Pmts Made], " _
& "[# Reg Pmts Remaining], [Pmt Scd Monthly Pmt Amt], [Last Pmt Date],
[Last
Pmt Amt], [Amended?], [Amended This Mo?], " _
& "[DEL Group], [Days Delinquent], [Tot Past Due Pmts $], [Principal
Balance], [Val Reserve Dollar Amt], NETBAL, " _
& "[Ext?],[Extended This Mo?],[Payoff Dollar Amt], [Flat Void Mth of
Orig],[Active BK Flag Date],[Active BK Flag], " _
& "[Inventory Status],[Charge Off Principal],[Chg Off Type],[CHG OFF
Date],[Cure Letter Date],[Skip Active Date], " _
& "[Skip Completion Date],[Skip Completion Sts],[Redeemed Date],[Entered
Date],[Repo Ordered Date],[Active Inactive Flag]) " _
& "SELECT " _
& "tbl_archive_temp.[loan acct #], tbl_archive_temp.[popenterdt],
tbl_archive_temp.[status], tbl_archive_temp.[pasted]," _
& "tbl_archive_temp.[Buying Center #], tbl_archive_temp.[Division
Name],tbl_archive_temp.[Region Name],tbl_archive_temp.[Group Name],
tbl_archive_temp.[Collection Center Name], " _
& "tbl_archive_temp.[Distribution Channel], tbl_archive_temp.[New
Institution Name], tbl_archive_temp.[Origination Channel],
tbl_archive_temp.[Sub Channel],tbl_archive_temp.[Short Name],
tbl_archive_temp.[Loan Status], " _
& "tbl_archive_temp.[Contract Date], tbl_archive_temp.[Mat date],
tbl_archive_temp.[Next Pmt Due Date], tbl_archive_temp.[Payoff Date],
tbl_archive_temp.[Paid Off?], tbl_archive_temp.[Nbr of Reg Pmts Made], " _
& "tbl_archive_temp.[# Reg Pmts Remaining], tbl_archive_temp.[Pmt Scd
Monthly Pmt Amt], tbl_archive_temp.[Last Pmt Date], tbl_archive_temp.[Last
Pmt Amt], tbl_archive_temp.[Amended?], tbl_archive_temp.[Amended This
Mo?], "
_
& "tbl_archive_temp.[DEL Group], tbl_archive_temp.[Days Delinquent],
tbl_archive_temp.[Tot Past Due Pmts $], tbl_archive_temp.[Principal
Balance],
tbl_archive_temp.[Val Reserve Dollar Amt], tbl_archive_temp.NETBAL, " _
& "tbl_archive_temp.[Ext?],tbl_archive_temp.[Extended This
Mo?],tbl_archive_temp.[Payoff Dollar Amt], tbl_archive_temp.[Flat Void Mth
of
Orig],tbl_archive_temp.[Active BK Flag Date],tbl_archive_temp.[Active BK
Flag], " _
& "tbl_archive_temp.[Inventory Status],tbl_archive_temp.[Charge Off
Principal],tbl_archive_temp.[Chg Off Type],tbl_archive_temp.[CHG OFF
Date],tbl_archive_temp.[Cure Letter Date],tbl_archive_temp.[Skip Active
Date], " _
& "tbl_archive_temp.[Skip Completion Date],tbl_archive_temp.[Skip
Completion
Sts],tbl_archive_temp.[Redeemed Date],tbl_archive_temp.[Entered
Date],tbl_archive_temp.[Repo Ordered Date],tbl_archive_temp.[Active
Inactive
Flag] " _
& "FROM tbl_archive_temp LEFT JOIN Tbl_archive ON " _
& "(tbl_archive_temp.status=Tbl_archive.status) " _
& "AND (tbl_archive_temp.[Loan Acct #]=Tbl_archive.[Loan Acct #]) " _
& "WHERE (((tbl_archive_temp.PopEnterDt) Is Null) or ((Tbl_archive.status)
Is Null));"

DoCmd.RunSQL strSQLArchive2



Dim strSQLArchive23 As String

strSQLArchive23 = "INSERT INTO tbl_masterpop_resolved" _
& "([loan acct #], [PopEnterDt], [status], [pasted]," _
& "[Buying Center #], [Division Name],[Region Name],[Group Name],
[Collection Center Name], " _
& "[Distribution Channel], [New Institution Name], [Origination Channel],
[Sub Channel],[Short Name], [Loan Status], " _
& "[Contract Date], [Mat date], [Next Pmt Due Date], [Payoff Date], [Paid
Off?], [Nbr of Reg Pmts Made], " _
& "[# Reg Pmts Remaining], [Pmt Scd Monthly Pmt Amt], [Last Pmt Date],
[Last
Pmt Amt], [Amended?], [Amended This Mo?], " _
& "[DEL Group], [Days Delinquent], [Tot Past Due Pmts $], [Principal
Balance], [Val Reserve Dollar Amt], NETBAL, " _
& "[Ext?],[Extended This Mo?],[Payoff Dollar Amt], [Flat Void Mth of
Orig],[Active BK Flag Date],[Active BK Flag], " _
& "[Inventory Status],[Charge Off Principal],[Chg Off Type],[CHG OFF
Date],[Cure Letter Date],[Skip Active Date], " _
& "[Skip Completion Date],[Skip Completion Sts],[Redeemed Date],[Entered
Date],[Repo Ordered Date],[Active Inactive Flag]) " _
& "SELECT " _
& "tbl_archive_temp.[loan acct #], tbl_archive_temp.[popenterdt],
tbl_archive_temp.[status], tbl_archive_temp.[pasted]," _
& "tbl_archive_temp.[Buying Center #], tbl_archive_temp.[Division
Name],tbl_archive_temp.[Region Name],tbl_archive_temp.[Group Name],
tbl_archive_temp.[Collection Center Name], " _
& "tbl_archive_temp.[Distribution Channel], tbl_archive_temp.[New
Institution Name], tbl_archive_temp.[Origination Channel],
tbl_archive_temp.[Sub Channel],tbl_archive_temp.[Short Name],
tbl_archive_temp.[Loan Status], " _
& "tbl_archive_temp.[Contract Date], tbl_archive_temp.[Mat date],
tbl_archive_temp.[Next Pmt Due Date], tbl_archive_temp.[Payoff Date],
tbl_archive_temp.[Paid Off?], tbl_archive_temp.[Nbr of Reg Pmts Made], " _
& "tbl_archive_temp.[# Reg Pmts Remaining], tbl_archive_temp.[Pmt Scd
Monthly Pmt Amt], tbl_archive_temp.[Last Pmt Date], tbl_archive_temp.[Last
Pmt Amt], tbl_archive_temp.[Amended?], tbl_archive_temp.[Amended This
Mo?], "
_
& "tbl_archive_temp.[DEL Group], tbl_archive_temp.[Days Delinquent],
tbl_archive_temp.[Tot Past Due Pmts $], tbl_archive_temp.[Principal
Balance],
tbl_archive_temp.[Val Reserve Dollar Amt], tbl_archive_temp.NETBAL, " _
& "tbl_archive_temp.[Ext?],tbl_archive_temp.[Extended This
Mo?],tbl_archive_temp.[Payoff Dollar Amt], tbl_archive_temp.[Flat Void Mth
of
Orig],tbl_archive_temp.[Active BK Flag Date],tbl_archive_temp.[Active BK
Flag], " _
& "tbl_archive_temp.[Inventory Status],tbl_archive_temp.[Charge Off
Principal],tbl_archive_temp.[Chg Off Type],tbl_archive_temp.[CHG OFF
Date],tbl_archive_temp.[Cure Letter Date],tbl_archive_temp.[Skip Active
Date], " _
& "tbl_archive_temp.[Skip Completion Date],tbl_archive_temp.[Skip
Completion
Sts],tbl_archive_temp.[Redeemed Date],tbl_archive_temp.[Entered
Date],tbl_archive_temp.[Repo Ordered Date],tbl_archive_temp.[Active
Inactive
Flag] " _
& "FROM tbl_archive_temp LEFT JOIN tbl_masterpop_resolved ON " _
& "(tbl_archive_temp.status = tbl_masterpop_resolved.status)" _
& "AND (tbl_archive_temp.[Loan Acct #]= tbl_masterpop_resolved.[Loan Acct
#]) " _
& "WHERE (((tbl_masterpop_resolved.PopEnterDt) Is Null) or
((tbl_masterpop_resolved.status) Is Null));"

DoCmd.RunSQL strSQLArchive23



Me.check11.Caption = "R"
Me.check11.ForeColor = "12632256"


ever since i moved the backend file to a new folder and then back to its
original folder, i have been getting this error message. i dont know what
is
going on, because i did not change the code. how can i fix this?

thanks in advance,
geebee
 
G

Guest

Thanks Tom.

I figured it out. The code was working fine last week and no changes have
been made to it since. However, due to the size of the backend file being
1.99GB, the file was corrupt, thereby causing this wierd error message which
would not have occured if the backend size would have been say like 1.34GB or
less.

Thanks


Tom Ellison said:
Dear GB:

Put a break point on each of the DoCmd.RunSQL lines. Run to that point and
use the immediate pane to display the strings. Paste these into new queries
and see if they work.

This is pretty fundamental debugging for code like this.

Tom Ellison


geebee said:
hi,

I have the following code behind a button:

Dim strSQLArchive2 As String

strSQLArchive2 = "INSERT INTO tbl_archive " _
& "([loan acct #], [popenterdt], [status], [pasted]," _
& "[Buying Center #], [Division Name],[Region Name],[Group Name],
[Collection Center Name], " _
& "[Distribution Channel], [New Institution Name], [Origination Channel],
[Sub Channel],[Short Name], [Loan Status], " _
& "[Contract Date], [Mat date], [Next Pmt Due Date], [Payoff Date], [Paid
Off?], [Nbr of Reg Pmts Made], " _
& "[# Reg Pmts Remaining], [Pmt Scd Monthly Pmt Amt], [Last Pmt Date],
[Last
Pmt Amt], [Amended?], [Amended This Mo?], " _
& "[DEL Group], [Days Delinquent], [Tot Past Due Pmts $], [Principal
Balance], [Val Reserve Dollar Amt], NETBAL, " _
& "[Ext?],[Extended This Mo?],[Payoff Dollar Amt], [Flat Void Mth of
Orig],[Active BK Flag Date],[Active BK Flag], " _
& "[Inventory Status],[Charge Off Principal],[Chg Off Type],[CHG OFF
Date],[Cure Letter Date],[Skip Active Date], " _
& "[Skip Completion Date],[Skip Completion Sts],[Redeemed Date],[Entered
Date],[Repo Ordered Date],[Active Inactive Flag]) " _
& "SELECT " _
& "tbl_archive_temp.[loan acct #], tbl_archive_temp.[popenterdt],
tbl_archive_temp.[status], tbl_archive_temp.[pasted]," _
& "tbl_archive_temp.[Buying Center #], tbl_archive_temp.[Division
Name],tbl_archive_temp.[Region Name],tbl_archive_temp.[Group Name],
tbl_archive_temp.[Collection Center Name], " _
& "tbl_archive_temp.[Distribution Channel], tbl_archive_temp.[New
Institution Name], tbl_archive_temp.[Origination Channel],
tbl_archive_temp.[Sub Channel],tbl_archive_temp.[Short Name],
tbl_archive_temp.[Loan Status], " _
& "tbl_archive_temp.[Contract Date], tbl_archive_temp.[Mat date],
tbl_archive_temp.[Next Pmt Due Date], tbl_archive_temp.[Payoff Date],
tbl_archive_temp.[Paid Off?], tbl_archive_temp.[Nbr of Reg Pmts Made], " _
& "tbl_archive_temp.[# Reg Pmts Remaining], tbl_archive_temp.[Pmt Scd
Monthly Pmt Amt], tbl_archive_temp.[Last Pmt Date], tbl_archive_temp.[Last
Pmt Amt], tbl_archive_temp.[Amended?], tbl_archive_temp.[Amended This
Mo?], "
_
& "tbl_archive_temp.[DEL Group], tbl_archive_temp.[Days Delinquent],
tbl_archive_temp.[Tot Past Due Pmts $], tbl_archive_temp.[Principal
Balance],
tbl_archive_temp.[Val Reserve Dollar Amt], tbl_archive_temp.NETBAL, " _
& "tbl_archive_temp.[Ext?],tbl_archive_temp.[Extended This
Mo?],tbl_archive_temp.[Payoff Dollar Amt], tbl_archive_temp.[Flat Void Mth
of
Orig],tbl_archive_temp.[Active BK Flag Date],tbl_archive_temp.[Active BK
Flag], " _
& "tbl_archive_temp.[Inventory Status],tbl_archive_temp.[Charge Off
Principal],tbl_archive_temp.[Chg Off Type],tbl_archive_temp.[CHG OFF
Date],tbl_archive_temp.[Cure Letter Date],tbl_archive_temp.[Skip Active
Date], " _
& "tbl_archive_temp.[Skip Completion Date],tbl_archive_temp.[Skip
Completion
Sts],tbl_archive_temp.[Redeemed Date],tbl_archive_temp.[Entered
Date],tbl_archive_temp.[Repo Ordered Date],tbl_archive_temp.[Active
Inactive
Flag] " _
& "FROM tbl_archive_temp LEFT JOIN Tbl_archive ON " _
& "(tbl_archive_temp.status=Tbl_archive.status) " _
& "AND (tbl_archive_temp.[Loan Acct #]=Tbl_archive.[Loan Acct #]) " _
& "WHERE (((tbl_archive_temp.PopEnterDt) Is Null) or ((Tbl_archive.status)
Is Null));"

DoCmd.RunSQL strSQLArchive2



Dim strSQLArchive23 As String

strSQLArchive23 = "INSERT INTO tbl_masterpop_resolved" _
& "([loan acct #], [PopEnterDt], [status], [pasted]," _
& "[Buying Center #], [Division Name],[Region Name],[Group Name],
[Collection Center Name], " _
& "[Distribution Channel], [New Institution Name], [Origination Channel],
[Sub Channel],[Short Name], [Loan Status], " _
& "[Contract Date], [Mat date], [Next Pmt Due Date], [Payoff Date], [Paid
Off?], [Nbr of Reg Pmts Made], " _
& "[# Reg Pmts Remaining], [Pmt Scd Monthly Pmt Amt], [Last Pmt Date],
[Last
Pmt Amt], [Amended?], [Amended This Mo?], " _
& "[DEL Group], [Days Delinquent], [Tot Past Due Pmts $], [Principal
Balance], [Val Reserve Dollar Amt], NETBAL, " _
& "[Ext?],[Extended This Mo?],[Payoff Dollar Amt], [Flat Void Mth of
Orig],[Active BK Flag Date],[Active BK Flag], " _
& "[Inventory Status],[Charge Off Principal],[Chg Off Type],[CHG OFF
Date],[Cure Letter Date],[Skip Active Date], " _
& "[Skip Completion Date],[Skip Completion Sts],[Redeemed Date],[Entered
Date],[Repo Ordered Date],[Active Inactive Flag]) " _
& "SELECT " _
& "tbl_archive_temp.[loan acct #], tbl_archive_temp.[popenterdt],
tbl_archive_temp.[status], tbl_archive_temp.[pasted]," _
& "tbl_archive_temp.[Buying Center #], tbl_archive_temp.[Division
Name],tbl_archive_temp.[Region Name],tbl_archive_temp.[Group Name],
tbl_archive_temp.[Collection Center Name], " _
& "tbl_archive_temp.[Distribution Channel], tbl_archive_temp.[New
Institution Name], tbl_archive_temp.[Origination Channel],
tbl_archive_temp.[Sub Channel],tbl_archive_temp.[Short Name],
tbl_archive_temp.[Loan Status], " _
& "tbl_archive_temp.[Contract Date], tbl_archive_temp.[Mat date],
tbl_archive_temp.[Next Pmt Due Date], tbl_archive_temp.[Payoff Date],
tbl_archive_temp.[Paid Off?], tbl_archive_temp.[Nbr of Reg Pmts Made], " _
& "tbl_archive_temp.[# Reg Pmts Remaining], tbl_archive_temp.[Pmt Scd
Monthly Pmt Amt], tbl_archive_temp.[Last Pmt Date], tbl_archive_temp.[Last
Pmt Amt], tbl_archive_temp.[Amended?], tbl_archive_temp.[Amended This
Mo?], "
_
& "tbl_archive_temp.[DEL Group], tbl_archive_temp.[Days Delinquent],
tbl_archive_temp.[Tot Past Due Pmts $], tbl_archive_temp.[Principal
Balance],
tbl_archive_temp.[Val Reserve Dollar Amt], tbl_archive_temp.NETBAL, " _
& "tbl_archive_temp.[Ext?],tbl_archive_temp.[Extended This
Mo?],tbl_archive_temp.[Payoff Dollar Amt], tbl_archive_temp.[Flat Void Mth
of
Orig],tbl_archive_temp.[Active BK Flag Date],tbl_archive_temp.[Active BK
Flag], " _
& "tbl_archive_temp.[Inventory Status],tbl_archive_temp.[Charge Off
Principal],tbl_archive_temp.[Chg Off Type],tbl_archive_temp.[CHG OFF
Date],tbl_archive_temp.[Cure Letter Date],tbl_archive_temp.[Skip Active
Date], " _
& "tbl_archive_temp.[Skip Completion Date],tbl_archive_temp.[Skip
Completion
Sts],tbl_archive_temp.[Redeemed Date],tbl_archive_temp.[Entered
Date],tbl_archive_temp.[Repo Ordered Date],tbl_archive_temp.[Active
Inactive
Flag] " _
& "FROM tbl_archive_temp LEFT JOIN tbl_masterpop_resolved ON " _
& "(tbl_archive_temp.status = tbl_masterpop_resolved.status)" _
& "AND (tbl_archive_temp.[Loan Acct #]= tbl_masterpop_resolved.[Loan Acct
#]) " _
& "WHERE (((tbl_masterpop_resolved.PopEnterDt) Is Null) or
((tbl_masterpop_resolved.status) Is Null));"

DoCmd.RunSQL strSQLArchive23



Me.check11.Caption = "R"
Me.check11.ForeColor = "12632256"


ever since i moved the backend file to a new folder and then back to its
original folder, i have been getting this error message. i dont know what
is
going on, because i did not change the code. how can i fix this?

thanks in advance,
geebee
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Query Error 2
delete query 1
query speed 5
join type not supported 5
combine 2 access queries 3
runtime error 1
fit in code 2
duplicate records 3

Top