I can't figure out where this data is orginating from help please!!!!

[analyzer777]

I have this access 2003 mdb and I am trying to find out where the data is originating from ..or what table it is being imported from before it spits out nothing but this in a text file::::



call_date_time|medium|lead_source|program_code|ext ernal_lead_id|sub salutation|sub gende|sub firstname|sub middle name|sub lastname|sub Email|sub language|sub dob|sub home phone|sub complex\facility name|sub street address|sub apt no|sub rr num|sub po box|sub zip code|sub city|sub state|key code|key code descr|activation method|monitoring device|personal help button 1|personal help button 2|optional services|ship to firstname|ship to lastname|ship to complex\facility name|ship to street address|ship to apt no|ship to zip code|ship to city|ship to state|ship to home phone|ship to work phone|primary contact firstname|primary contact lastname|primary contact relationship|primary contact home phone|primary contact work phone|ordered service contact firstname|ordered service contact lastname|ordered service contact relationship|ordered service contact home phone|ordered service contact work phone|phone service type|additonal activation instr|payment contact firstname|payment contact lastname|payment contact complex\facility name|payment contact street address|payment contact apt no|payment contact zip code|payment contact city|payment contact state|payment contact home phone|payment contact work phone|Payment Method|card type|name on card|card number|exp date|BankAccnt First Name|BankAccnt Last Name|Bank Routing/ABA Number|Account Number|Type of Account
02/12/2013 01:30|Consumer Channel|Firststreet|NO RECORDS||||||||||||||||||||||||||||||||||||||||||| ||||||||||||||||||||||||

this is the main form:

Option Compare Database
Option Explicit

Private Sub btn_VAL_Click()
    BuildReports ("VAL")
    DoCmd.OpenQuery ("PHILIPS_EXPORT_FAILED")
End Sub

Private Sub cmdRunReport_Click()

RESET_FILENAME                  'if its 1am set the table to yest first file
BuildReports ("PRE")

Dim FILENAME As String
Dim num_RECORDS As String

Dim db As Database
Dim rs As Recordset

Set db = CurrentDb
Set rs = db.OpenRecordset("ORDERS") 'Check to see if there are orders
If rs.EOF Then
    DoCmd.RunMacro ("XFR_MT_PHILIPS_TABLE")
    rs.Close
    Exit Sub
Else
    BuildReports ("LIST")
    BuildReports ("VAL")
    CHECK_MT
'    Call Sleep(15000)               '20120413 - give files time to load (15 sec)
'    Create_SendExtractSFTP
'    run_sendExtractSftp
'    copy_to_Archive
'    TransmitEmail                   'send confirmation to sourmen, reynaldo, brenda, tammy, tim h
End If

'DoCmd.Quit

End Sub

Private Sub Form_Open(Cancel As Integer)
  Dim intBlank As Integer
  intBlank = ProgressBar(0, 1, 0, 1)
  
  If Hour(Now()) = 1 Then
    [Forms]![frm main]![SDate] = Date - 1
    [Forms]![frm main]![EDate] = Date - 1
  Else
    [Forms]![frm main]![SDate] = Date
    [Forms]![frm main]![EDate] = Date
  End If
  
End Sub

if you can help or just need to peek at the modules i can forward them to you if you email me at chuckied97@gmail.com

[June7]

What is CHECK_MT?

Have you step-debugged? Refer to link at bottom of my post.

You can attach files to post.