Skip to content

gia - Implementation Details

VBA Modules

Form_Add and Edit Metrics (Form)

File: ms_access_files\gia\Forms\Frm Add and Edit Metrics.txt Lines: 34

Procedures

Private Sub ClearFilters_Click()

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub StrCriteria1_AfterUpdate()

Form_Add and Edit Purple Panel Extra Notification Users (Form)

File: ms_access_files\gia\Forms\Frm Add and Edit Purple Panel Extra Notification Users.txt Lines: 60

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub DeleteRec_Click() - ⚠️ Contains GoTo statements

Private Sub NewRecord_Click() - ⚠️ Contains GoTo statements

Form_Add and Edit Purple Panels (Form)

File: ms_access_files\gia\Forms\Frm Add and Edit Purple Panels.txt Lines: 95

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub Form_Close()

Private Sub Form_Open(Cancel As Integer)

Form_Add and Edit Rubrics (Form)

File: ms_access_files\gia\Forms\Frm Add and Edit Rubrics.txt Lines: 25

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub Form_Close()

Form_Adjust Purple Panel Score (Form)

File: ms_access_files\gia\Forms\Frm Adjust Purple Panel Score.txt Lines: 53

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub DecreaseBy5_Click()

Private Sub IncreaseBy5_Click()

Private Sub SaveAndExit_Click()

Form_Change Password (Form)

File: ms_access_files\gia\Forms\Frm Change Password.txt Lines: 138

Procedures

Private Sub CancelButton_Click()

Private Sub CurrentPassword_AfterUpdate()

Private Sub Form_Open(Cancel As Integer)

Private Sub NewPassword_AfterUpdate()

Private Sub OKButton_Click()

Form_Change Rubric (Form)

File: ms_access_files\gia\Forms\Frm Change Rubric.txt Lines: 134

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub SaveAndExit_Click() - ⚠️ Large procedure (113 lines)

Form_Company List (Form)

File: ms_access_files\gia\Forms\Frm Company List.txt Lines: 487

Procedures

Public Sub UpdateList() - ⚠️ High branching (9 If statements)

Private Sub ClearFilters_Click()

Private Sub CloseFOrm_Click()

Private Sub CompanyList_AfterUpdate()

Private Sub CompanyStatus_AfterUpdate()

Private Sub CriteriaCombo1_AfterUpdate()

Private Sub EnterPurplePanelResults_Click() - ⚠️ High branching (7 If statements)

Private Sub Filter1_AfterUpdate()

Private Sub Form_Open(Cancel As Integer)

Private Sub MaintenanceFunction_Click()

Private Sub PrintReport_Click()

Private Sub SchedulePurplePanel_Click()

Private Sub StrCriteria1_AfterUpdate()

Private Function CalculatePanelistScore(PPID As Long) As Long

Private Sub SummarisePurplePanelResults_Click() - ⚠️ High branching (14 If statements); Large procedure (156 lines)

Form_Display Confidentiality Statement (Form)

File: ms_access_files\gia\Forms\Frm Display Confidentiality Statement.txt Lines: 20

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Form_Edit Purple Panel Convener Summary (Form)

File: ms_access_files\gia\Forms\Frm Edit Purple Panel Convener Summary.txt Lines: 469

Procedures

Public Sub GenerateTheReport() - ⚠️ Large procedure (103 lines)

Private Sub AdjustScore_Click()

Private Sub CloseFOrm_Click()

Private Sub CopyStrengthsDevAreas_Click()

Private Sub Form_Close()

Private Sub Form_Open(Cancel As Integer)

Private Sub Panelist1_Click()

Private Sub Panelist2_Click()

Private Sub Panelist3_Click()

Private Sub SubmitFinalPanel_Click() - ⚠️ High branching (21 If statements); Large procedure (210 lines)

Private Sub Suitabe_for_Recommended_Programme_AfterUpdate()

Form_Edit Purple Panelists Rubric Metric Scores (Form)

File: ms_access_files\gia\Forms\Frm Edit Purple Panelists Rubric Metric Scores.txt Lines: 216

Procedures

Private Sub ChangeRubric_Click()

Public Sub UpdateScore()

Private Sub CloseFOrm_Click()

Private Sub DisplayConfidentialityStatement_Click()

Private Sub Form_Close()

Private Sub Form_Open(Cancel As Integer)

Private Sub Form_Timer()

Private Sub Submitpanel_Click()

Form_Edit Rubric Metric Weight (Form)

File: ms_access_files\gia\Forms\Frm Edit Rubric Metric Weight.txt Lines: 25

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub Form_Close()

Form_Edit Rubric Metrics Template (Form)

File: ms_access_files\gia\Forms\Frm Edit Rubric Metrics Template.txt Lines: 52

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub Form_Close()

Form_Maintenance Menu (Form)

File: ms_access_files\gia\Forms\Frm Maintenance Menu.txt Lines: 32

Procedures

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub Metrics_Click()

Private Sub NotificationUser_Click()

Private Sub Rubrics_Click()

Form_Opening Dialog (Form)

File: ms_access_files\gia\Forms\Frm Opening Dialog.txt Lines: 109

Procedures

Private Sub CancelButton_Click()

Private Sub Form_Open(Cancel As Integer)

Private Sub Password_AfterUpdate() - ⚠️ High branching (6 If statements)

Private Sub Username_AfterUpdate()

Form_Rubric List (Form)

File: ms_access_files\gia\Forms\Frm Rubric List.txt Lines: 114

Procedures

Private Sub AddRubric_Click()

Private Sub CloseFOrm_Click() - ⚠️ Contains GoTo statements

Private Sub EditMetrics_Click()

Private Sub MetricList_DblClick(Cancel As Integer)

Private Sub MetricList_KeyDown(KeyCode As Integer, Shift As Integer)

Private Sub RubricList_AfterUpdate()

Private Sub RubricList_DblClick(Cancel As Integer)

Private Sub RubricList_KeyDown(KeyCode As Integer, Shift As Integer)

Form_View Purple Panelists Rubric Metric Scores (Form)

File: ms_access_files\gia\Forms\Frm View Purple Panelists Rubric Metric Scores.txt Lines: 31

Procedures

Private Sub CloseFOrm_Click()

Private Sub Form_Open(Cancel As Integer)

Private Sub Metric_AfterUpdate()

Form_SubFrm DatabaseUsers Module Permissions (Form)

File: ms_access_files\gia\Forms\SubFrm DatabaseUsers Module Permissions.txt Lines: 20

Procedures

Private Sub DeleteRec_Click()

Form_SubFrm Metrics (Form)

File: ms_access_files\gia\Forms\SubFrm Metrics.txt Lines: 55

Procedures

Private Sub DeleteRec_Click() - ⚠️ Contains GoTo statements

Private Sub NewRecord_Click() - ⚠️ Contains GoTo statements

Form_SubFrm Purple Panel Developmental Areas Summary (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panel Developmental Areas Summary.txt Lines: 20

Procedures

Private Sub DeleteRec_Click()

Form_SubFrm Purple Panel Strengths Summary (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panel Strengths Summary.txt Lines: 20

Procedures

Private Sub DeleteRec_Click()

Form_SubFrm Purple Panelist Developmental Areas (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panelist Developmental Areas.txt Lines: 20

Procedures

Private Sub DeleteRec_Click()

Form_SubFrm Purple Panelist Metric Scores (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panelist Metric Scores.txt Lines: 66

Procedures

Public Sub UpdateScore()

Public Sub FilterTheForms()

Private Sub Detail_Click()

Private Sub Metric_GotFocus()

Private Sub Purple_Panelist_Score_AfterUpdate()

Private Sub Purple_Panelist_Score_GotFocus()

Form_SubFrm Purple Panelist Score Evidence (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panelist Score Evidence.txt Lines: 22

Procedures

Private Sub DeleteRec_Click()

Private Sub Form_BeforeUpdate(Cancel As Integer)

Form_SubFrm Purple Panelist Strengths (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panelist Strengths.txt Lines: 20

Procedures

Private Sub DeleteRec_Click()

Form_SubFrm Purple Panelists (Form)

File: ms_access_files\gia\Forms\SubFrm Purple Panelists.txt Lines: 51

Procedures

Private Sub DeleteRec_Click()

Private Sub Purple_Panelist_AfterUpdate()

Form_SubFrm View Purple Panelist Score Evidence (Form)

File: ms_access_files\gia\Forms\SubFrm View Purple Panelist Score Evidence.txt Lines: 22

Procedures

Private Sub DeleteRec_Click()

Private Sub Form_BeforeUpdate(Cancel As Integer)

Form_ZZZ Save Frm Edit Purple Panel Convener Summary (Form)

File: ms_access_files\gia\Forms\ZZZ Save Frm Edit Purple Panel Convener Summary.txt Lines: 179

Procedures

Private Sub AdjustScore_Click()

Private Sub CloseFOrm_Click()

Private Sub Form_Close()

Private Sub Form_Open(Cancel As Integer)

Private Sub SelectPanelist_AfterUpdate()

Private Sub SubmitFinalPanel_Click() - ⚠️ High branching (11 If statements); Large procedure (126 lines)

Form_ZZZ Save Frm Edit Purple Panelists Rubric Metric Scores (Form)

File: ms_access_files\gia\Forms\ZZZ Save Frm Edit Purple Panelists Rubric Metric Scores.txt Lines: 179

Procedures

Public Sub UpdateScore()

Private Sub ChangeRubric_Click()

Private Sub CloseFOrm_Click()

Private Sub Form_Close()

Private Sub Form_Open(Cancel As Integer)

Private Sub Form_Timer()

Private Sub Submitpanel_Click()

Form_ZZZ Save SubFrm Purple Panelist Metric Scores (Form)

File: ms_access_files\gia\Forms\ZZZ Save SubFrm Purple Panelist Metric Scores.txt Lines: 51

Procedures

Public Sub MoveIt()

Public Sub FilterMainForm()

Private Sub Detail_Click()

Private Sub Metric_GotFocus()

Private Sub Purple_Panelist_Score_AfterUpdate()

Private Sub Purple_Panelist_Score_GotFocus()

File: ms_access_files\gia\Modules\basRelink.bas Lines: 562

Procedures

Public Function RelinkODBC() As Boolean - ⚠️ Contains GoTo statements; High branching (8 If statements); Large procedure (148 lines)

Public Function Update_zstblODBC() As Boolean - ⚠️ Contains GoTo statements

Public Function RelinkTablesLocal() As Boolean - ⚠️ Contains GoTo statements

Public Function CompactTablesMain() As Boolean - ⚠️ Contains GoTo statements

Public Function CompactTablesLocal() As Boolean - ⚠️ Contains GoTo statements

Public Function TableExists(ByVal pstrTableName As String) As Boolean - ⚠️ Uses On Error Resume Next

Mod Send Outlook Message (Standard)

File: ms_access_files\gia\Modules\Mod Send Outlook Message.bas Lines: 53

Procedures

Public Sub SendOutlookMessage(Recip As String, Optional fileName As String, Optional SubText As String, Optional BodyText As String, Optional CCText As String)

Mod Update Evidence (Standard)

File: ms_access_files\gia\Modules\Mod Update Evidence.bas Lines: 43

Procedures

Public Sub UpdateEvidence()

Mod Utilities (Standard)

File: ms_access_files\gia\Modules\Mod Utilities.bas Lines: 177

Procedures

Public Sub UpdateDivision()

Public Sub TestIt()

Public Function GetXofY(f As Form) - ⚠️ Uses On Error Resume Next

Public Function IsLoaded(ByVal strFormName As String) As Boolean

Public Function StringsSameCase(x As String, y As String) As Boolean

Public Function CheckForUpper(CheckString As String)

Public Function CheckForSpecial(CheckString As String)

Public Function CheckForNumber(CheckString As String)

Public Sub DeleteImportErrorTables()

Public Sub ObjectCounts()

Public Sub OpenTheFile(TheFileName As String)

SQL Queries

JB Qry Compression Rubric

Type: Select

SELECT Rubrics.[Rubric ID], [Rubric Metric Templates].[Rubric Metric Template ID], [Rubric Metric Templates].[Metric ID], Rubrics.Rubric, Metrics.Metric, Metrics.[Metric Description], Metrics.[Sort Order] FROM [Rubrics], [Rubric Metric Templates], [Metrics] WHERE (((Rubrics.[Rubric ID])=5))

Qry Company List

Type: Select

SELECT vwGIACompanyList.[Entrepreneur Company ID], [Purple Panels].[Purple Panel ID], vwGIACompanyList.[Company Status ID], vwGIACompanyList.Status, vwGIACompanyList.[Last Process Status ID], vwGIACompanyList.[Entrepreneur Status], vwGIACompanyList.[Company Name], vwGIACompanyList.[Delivery Location], [Purple Panels].[Purple Panel Date], Format([Purple Panel Time],\, [Purple Panels].[Average Score], [Purple Panel Status Lookup].Passed FROM [vwGIACompanyList], [Purple Panels], [Purple Panel Status Lookup] WHERE (((vwGIACompanyList.[Company Name]) Is Not Null))

Qry Edit Purple Panelists Main Form

Type: Select

SELECT [Purple Panels].[Changed Rubric Switch], [Purple Panels].[Purple Panel ID], [Purple Panels].[Rubric ID], [Purple Panels].[Entrepreneur Company ID], [Purple Panelists].[Purple Panelist ID], [Purple Panels].[Purple Panel Status ID], [Purple Panels].[Purple Panel Date], [Purple Panelists].[Purple Panelist Total Score], [Purple Panelists].[Possible Total Score], [Purple Panelists].[Purple Panelist], [Purple Panelists].[Business Area], [Purple Panelists].Submitted, [Purple Panels].[Recommended Product], [Purple Panelists].Questions, [Purple Panelists].Convener FROM [Purple Panels], [Purple Panelists]

Qry Edit Purple Panelists Rubric Metric Scores

Type: Select

SELECT [Purple Panelists Scores].Unused, [Purple Panelists Scores].[Purple Panelist ID], [Purple Panelists Scores].[Purple Panelist Score ID], 5*[Metric Weight], Metrics.[Metric ID], Metrics.Metric, Metrics.[Metric Description], [Purple Panelists Scores].[Purple Panelist Score], IIf(IsNull([Purple Panelist Score]) Or [Purple Panelist Score]=0,\, [Purple Panelist Score]*[Metric Weight], Metrics.[Sort Order] FROM [Purple Panelists Scores], [Rubric Metric Templates], [Metrics] WHERE ((([Purple Panelists Scores].Unused)=False))

Qry Entrepreneur and Company Status List

Type: Select

-- Unable to parse query definition

Qry Get Competent Purple Panelists

Type: Select

SELECT DatabaseUsers.Username, [DatabaseUsers Module Permissions].Role, [DatabaseUsers Module Permissions].[Module Permission] FROM [DatabaseUsers], [DatabaseUsers Module Permissions] WHERE ((([DatabaseUsers Module Permissions].Role)=\"Guide\") AND (([DatabaseUsers Modu

Qry Get Developmental Areas by Purple Panel

Type: Select

SELECT [Purple Panels].[Purple Panel ID], [Purple Panelist Developmental Areas].[Purple Panelist Developmental Areas] FROM [Purple Panels], [Purple Panelists], [Purple Panelist Developmental Areas]

Qry Get Email Address COO

Type: Select

SELECT DatabaseUsers.Username, DatabaseUsers.[Email Address], [DatabaseUsers Module Permissions].[Module Permission], [DatabaseUsers Module Permissions].Role FROM [DatabaseUsers], [DatabaseUsers Module Permissions] WHERE (((DatabaseUsers.[Email Address]) Is Not Null) AND (([DatabaseUsers Module Permi

Qry Get Email Address Owned By

Type: Select

SELECT vwGIACompanyList.[Entrepreneur Company ID], vwGIACompanyList.OwnedBy, DatabaseUsers.[Email Address] FROM [vwGIACompanyList], [DatabaseUsers] WHERE (((vwGIACompanyList.[Entrepreneur Company ID])=[Forms]![Frm Edit Purple Panel Co

Qry Get Email Addresses Extra

Type: Select

SELECT DatabaseUsers.[Email Address] FROM [Purple Panel Extra Notification Usernames], [DatabaseUsers] WHERE (((DatabaseUsers.[Email Address]) Is Not Null))

Qry Get Email Addresses Purple Panelists

Type: Select

SELECT [Purple Panelists].[Purple Panel ID], DatabaseUsers.[Email Address] FROM [DatabaseUsers], [Purple Panelists] WHERE ((([Purple Panelists].[Purple Panel ID])=[Forms]![Frm Edit Purple Panel Convener

Qry Get Email Addresses Regular Report

Type: Select

-- Unable to parse query definition

Qry Get Purple Panel Convener Name by Purple Panel

Type: Select

SELECT [Purple Panelists].[Purple Panel ID], [Purple Panelists].Convener, [First Name] & \ FROM [Purple Panelists], [DatabaseUsers] WHERE ((([Purple Panelists].Convener)=True))

Type: Select

SELECT Entrepreneurs.[Entrepreneur Company ID], Products.Product, Entrepreneurs.[Division ID], Entrepreneurs.[Distribution Model ID] FROM [Entrepreneurs], [Products]

Qry Get Strengths by Purple Panel

Type: Select

SELECT [Purple Panels].[Purple Panel ID], [Purple Panelist Strengths].[Purple Panelist Strengths] FROM [Purple Panels], [Purple Panelists], [Purple Panelist Strengths]

Qry Get Unused Metrics by Purple Panelist

Type: Select

SELECT [Purple Panelists Scores].[Purple Panelist Score ID], [Purple Panelists Scores].[Purple Panelist ID], [Rubric Metric Templates].[Metric ID], [Purple Panelists Scores].[Purple Panelist Score], [Purple Panelists Scores].Unused FROM [Purple Panelists Scores], [Rubric Metric Templates] WHERE ((([Purple Panelists Scores].Unused)=True))

Qry Purple Panelist List

Type: Select

SELECT [Purple Panelists].[Purple Panelist ID], [Purple Panelists].[Purple Panel ID], [Purple Panelists].[Purple Panelist], [Purple Panelists].[Business Area], [Purple Panelists].[Purple Panelist Total Score], IIf([Convener]=True,\, IIf([Submitted]=True,\ FROM [Purple Panelists]

Qry Report Purple Panel Feedback to COO

Type: Select

SELECT [SubQry Report Purple Panel Results].[Purple Panel ID], [SubQry Report Purple Panel Results].[Panel Feedback to COO], [SubQry Report Purple Panel Results].[Entrepreneur Company ID], [SubQry Report Purple Panel Results].[Company Name], [Temp Individuals in a Company].Individuals, [SubQry Report Purple Panel Results].[Purple Panel Date], [SubQry Report Purple Panel Results].[Purple Panel Time], [SubQry Report Purple Panel Results].[Recommended Product], [SubQry Report Purple Panel Results].[Suitabe for Recommended Programme], [SubQry Report Purple Panel Results].[Suitable for Rec Programme], [SubQry Report Purple Panel Results].[Rec Product], [SubQry Report Purple Panel Results].[Convener Name], [SubQry Report Purple Panel Results].[The Score], IIf([Passed]=True,\, [SubQry Report Purple Panel Results].[Purple Panel Status] FROM [SubQry Report Purple Panel Results], [Temp Individuals in a Company] WHERE ((([SubQry Report Purple Panel Results].[Purple Panel ID])=Forms![Frm Edit Purpl

Qry Report Purple Panel Results Successful

Type: Select

SELECT [SubQry Report Purple Panel Results].[Purple Panel ID], [SubQry Report Purple Panel Results].[Process Status ID], [SubQry Report Purple Panel Results].[Entrepreneur Company ID], [SubQry Report Purple Panel Results].Passed, [SubQry Report Purple Panel Results].Entrepreneur, [SubQry Report Purple Panel Results].[Company Name], [Temp Individuals in a Company].Individuals, [SubQry Report Purple Panel Results].[Delivery Location], [SubQry Report Purple Panel Results].[Purple Panel Date], [SubQry Report Purple Panel Results].[Suitable for Rec Programme], [SubQry Report Purple Panel Results].[Rec Product], [SubQry Report Purple Panel Results].[Convener Name], [SubQry Report Purple Panel Results].[The Score], [SubQry Report Purple Panel Results].[Strengths Summary], [SubQry Report Purple Panel Results].[Developmental Areas Summary] FROM [SubQry Report Purple Panel Results], [Temp Individuals in a Company] WHERE ((([SubQry Report Purple Panel Results].[Purple Panel ID])=Forms![Frm Company Li

Qry Report Purple Panel Results Unsuccessful

Type: Select

SELECT [SubQry Report Purple Panel Results].[Purple Panel ID], [SubQry Report Purple Panel Results].[Process Status ID], [SubQry Report Purple Panel Results].[Entrepreneur Company ID], [SubQry Report Purple Panel Results].Passed, [SubQry Report Purple Panel Results].Entrepreneur, [SubQry Report Purple Panel Results].[Company Name], [Temp Individuals in a Company].Individuals, [SubQry Report Purple Panel Results].[Delivery Location], [SubQry Report Purple Panel Results].[Purple Panel Date], [SubQry Report Purple Panel Results].[Rec Product], [SubQry Report Purple Panel Results].[Convener Name], [SubQry Report Purple Panel Results].[The Score], [SubQry Report Purple Panel Results].[Strengths Summary], [SubQry Report Purple Panel Results].[Developmental Areas Summary], [SubQry Report Purple Panel Results].[Rec Product] FROM [SubQry Report Purple Panel Results], [Temp Individuals in a Company] WHERE ((([SubQry Report Purple Panel Results].[Purple Panel ID])=[Forms]![Frm Company 

Qry Rubric Metric Templates List

Type: Select

SELECT [Rubric Metric Templates].[Rubric Metric Template ID], [Rubric Metric Templates].[Rubric ID], [Rubric Metric Templates].[Metric ID], Metrics.Metric, [Rubric Metric Templates].[Metric Weight], Metrics.[Sort Order] FROM [Rubric Metric Templates], [Metrics]

Qry Rubric Metrics NOT in the List

Type: Delete

SELECT Metrics.[Metric ID], Metrics.Metric, Metrics.[Metric Description], Metrics.[Sort Order] FROM [SubQry Rubric Metrics NOT in the List], [Metrics] WHERE ((([SubQry Rubric Metrics NOT in the List].[Metric ID]) Is Null))

Qry SubRpt Panelists

Type: Select

SELECT [Purple Panelists].[Purple Panel ID], [Purple Panelists].[Business Area], [First Name] & \, IIf([Convener]=True,\ FROM [Purple Panelists], [DatabaseUsers]

Qry Sum Total Scores by Purple Panelist

Type: Select

SELECT [Qry Edit Purple Panelists Rubric Metric Scores].[Purple Panelist ID], Sum([Qry Edit Purple Panelists Rubric Metric Scores].[Possible Score]), Sum([Qry Edit Purple Panelists Rubric Metric Scores].[Weighted Score]) FROM [Qry Edit Purple Panelists Rubric Metric Scores]

Qry View Purple Panelists Rubric Metric Scores

Type: Select

SELECT [Purple Panelists Scores].Unused, [Purple Panelists].[Purple Panel ID], [Purple Panelists Scores].[Purple Panelist ID], [Purple Panelists].[Purple Panelist], [Purple Panelists].[Business Area], [Purple Panelists Scores].[Purple Panelist Score ID], 5*[Metric Weight], Metrics.[Metric ID], Metrics.Metric, Metrics.[Metric Description], [Purple Panelists Scores].[Purple Panelist Score], IIf(IsNull([Purple Panelist Score]) Or [Purple Panelist Score]=0,\, [Purple Panelist Score]*[Metric Weight], Metrics.[Sort Order] FROM [Purple Panelists Scores], [Rubric Metric Templates], [Metrics], [Purple Panelists] WHERE ((([Purple Panelists Scores].Unused)=False))

qryLinkODBC

Type: Select

SELECT zstblODBC_db.Driver, zstblODBC_db.ServerName, zstblODBC_db.DBName, zstblODBC_db.Authentication, zstblODBC_db.UID, zstblODBC_db.PWD, zstblODBC_tables.Hidden, zstblODBC_tables.TableName, zstblODBC_tables.SourceTableName, zstblODBC_tables.AfterDDL FROM [zstblODBC_db], [zstblODBC_tables] WHERE (((zstblODBC_db.SelectDB)=True) AND ((zstblODBC_tables.Link)=True))

SubQry Report Purple Panel Results

Type: Select

SELECT vwGIAEntrepreneurList.[Entrepreneur ID], [Purple Panels].[Purple Panel ID], vwGIAEntrepreneurList.[Process Status ID], [First Name] & \, [Purple Panels].[Entrepreneur Company ID], vwGIAEntrepreneurList.[Company Name], vwGIAEntrepreneurList.[Delivery Location], [Purple Panels].[Purple Panel Date], [Purple Panels].[Purple Panel Time], [Purple Panels].[Recommended Product], [Purple Panels].[Suitabe for Recommended Programme], IIf([Suitabe for Recommended Programme]=1,\, IIf([Suitabe for Recommended Programme]=1,[Purple Panels].[Recommended Product],, [Qry Get Purple Panel Convener Name by Purple Panel].[Convener Name], IIf(IsNull([Adjusted Average Score]) Or [Adjusted Average Score]=0,[Average Scor, [Purple Panel Status Lookup].Passed, [Purple Panel Status Lookup].[Purple Panel Status], [Purple Panels].[Strengths Summary], [Purple Panels].[Developmental Areas Summary], [Purple Panels].[Panel Feedback to COO] FROM [Purple Panels], [Qry Get Purple Panel Convener Name by Purple Panel], [Purple Panel Status Lookup], [vwGIAEntrepreneurList], [Products]

SubQry Rubric Metrics NOT in the List

Type: Select

SELECT [Rubric Metric Templates].[Rubric Metric Template ID], [Rubric Metric Templates].[Rubric ID], [Rubric Metric Templates].[Metric ID] FROM [Rubric Metric Templates] WHERE ((([Rubric Metric Templates].[Rubric ID])=[Forms]![Frm Rubric List]![RubricList]