Final Project - Requirement 2 & 4
04/12/2019 11:59 PM
1
For Educational Purposes Only
Database History for C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project 1\AR 2017.IMD
Database Date User
Data Set_Sales Orders-Sheet1.IMD
Import from Excel 12/4/2019 12:38:12 AM anacr
Imported from: C:\Users\anacr\Google Drive\MACC\DATA ANALYTICS\W6\Data Set_Sales
Orders.xlsx
Data Source: Excel
Sheet Name: Sheet1
Number of records: 1168
First record as title: TRUE
IDEAScript code: Set task = Client.GetImportTask("ImportExcel")
dbName = "C:\Users\anacr\Google Drive\MACC\DATA
ANALYTICS\W6\Data Set_Sales Orders.xlsx"
task.FileToImport = dbName
task.SheetToImport = "Sheet1"
task.OutputFilePrefix = "Data Set_Sales Orders"
task.FirstRowIsFieldName = "TRUE"
task.EmptyNumericFieldAsZero = "TRUE"
task.PerformTask
dbName = task.OutputFilePath("Sheet1")
Set task = Nothing
Client.OpenDatabase(dbName)
Index Database 12/4/2019 12:44:18 AM anacr
Indexed by: SALESORDERID/A
IDEAScript code: Set db = Client.OpenDatabase("Data Set_Sales Orders-Sheet1.IMD")
Set task = db.Index
task.AddKey "SALESORDERID", "A"
task.Index FALSE
Set task = Nothing
Set db = Nothing
Sales and Customers .IMD
Join Databases 12/4/2019 1:22:32 AM anacr
File name: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Sales and Customers .IMD
Number of records: 1167
Control field: No Control Total
04/12/2019 11:59 PM
2
For Educational Purposes Only
Database History for C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project 1\AR 2017.IMD
Database Date User
Control total: No Control Total
Primary recs rejected: 1
Join primary file: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Data Set_Sales Orders-Sheet1.IMD
Number of records: 1168
Join secondary file: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Data Set_Customer Invoices (1)-Sheet1.IMD
Number of records: 1167
Type of join: Matches only
Key used: SALESORDERID/A - SALESORDERID/A
Creating a virtual data... No
IDEAScript code: Set db = Client.OpenDatabase("Data Set_Sales Orders-Sheet1.IMD")
Set task = db.JoinDatabase
task.FileToJoin "Data Set_Customer Invoices (1)-Sheet1.IMD"
task.IncludeAllPFields
task.IncludeAllSFields
task.AddMatchKey "SALESORDERID", "SALESORDERID", "A"
task.CreateVirtualDatabase = False
dbName = "Sales and Customers .IMD"
task.PerformTask dbName, "", WI_JOIN_MATCH_ONLY
Set task = Nothing
Set db = Nothing
Client.OpenDatabase (dbName)
All Three.IMD
Join Databases 12/4/2019 1:23:50 AM anacr
File name: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\All Three.IMD
Number of records: 1165
Control field: No Control Total
Control total: No Control Total
Primary recs rejected: 2
04/12/2019 11:59 PM
3
For Educational Purposes Only
Database History for C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project 1\AR 2017.IMD
Database Date User
Join primary file: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Sales and Customers .IMD
Number of records: 1167
Join secondary file: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Data Set_Shipments (1)-Sheet1.IMD
Number of records: 1165
Type of join: Matches only
Key used: SALESORDERID/A - SALESORDERID/A
Creating a virtual data... No
IDEAScript code: Set db = Client.OpenDatabase("Sales and Customers .IMD")
Set task = db.JoinDatabase
task.FileToJoin "Data Set_Shipments (1)-Sheet1.IMD"
task.IncludeAllPFields
task.IncludeAllSFields
task.AddMatchKey "SALESORDERID", "SALESORDERID", "A"
task.CreateVirtualDatabase = False
dbName = "All Three.IMD"
task.PerformTask dbName, "", WI_JOIN_MATCH_ONLY
Set task = Nothing
Set db = Nothing
Client.OpenDatabase (dbName)
Sales 2017.IMD
Record Extraction 12/4/2019 11:40:27 PM anacr
File name: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Sales 2017.IMD
Number of records: 1156
Control field: No Control Total
Control total: No Control Total
Extraction from: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\All Three.IMD
Number of records: 1165
Indexed by: No index
Extraction Range: 1 - 1165
04/12/2019 11:59 PM
4
For Educational Purposes Only
Database History for C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project 1\AR 2017.IMD
Database Date User
Extraction Criteria: INVOICEDATE >= "20170101" .AND. INVOICEDATE <= "20171231"
Creating a virtual data... No
IDEAScript code: Set db = Client.OpenDatabase("All Three.IMD")
Set task = db.Extraction
task.IncludeAllFields
dbName = "Sales 2017.IMD"
task.AddExtraction dbName, "", " INVOICEDATE >= ""20170101"" .AND.
INVOICEDATE <= ""20171231"""
task.CreateVirtualDatabase = False
task.PerformTask 1, db.Count
Set task = Nothing
Set db = Nothing
Client.OpenDatabase (dbName)
AR 2017.IMD
Record Extraction 12/4/2019 11:53:34 PM anacr
File name: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\AR 2017.IMD
Number of records: 148
Control field: No Control Total
Control total: No Control Total
Extraction from: C:\Users\anacr\Documents\My IDEA Documents\IDEA Projects\Project
1\Sales 2017.IMD
Number of records: 1156
Indexed by: No index
Extraction Range: 1 - 1156
Extraction Criteria: PAIDDATE >= "20171231"
Creating a virtual data... No
IDEAScript code: Set db = Client.OpenDatabase("Sales 2017.IMD")
Set task = db.Extraction
task.IncludeAllFields
dbName = "AR 2017.IMD"
task.AddExtraction dbName, "", " PAIDDATE >= ""20171231"""
task.CreateVirtualDatabase = False
task.PerformTask 1, db.Count
Set task = Nothing
Set db = Nothing
Client.OpenDatabase (dbName)