Skip to content

Module: Form_Add and Edit Entrepreneurs

Type: Form
Lines of Code: 543
Source: ms_access_files\purple\Forms\Frm Add and Edit Entrepreneurs.txt

Dependencies

Module Dependencies: - RecSet - Actdatabase - ArcRecSet

Tables Accessed: - RecSet - ArcRecSet - the - Archive - Entrepreneur - Entrepreneurs

Forms Referenced: - Frm

Procedures

ThereIsADuplicate

Type: Public Function
Lines: 27
Returns: Boolean

Calls: OpenRecordset, ThereIsADuplicate, Chr, WHERE

CalculateDateOfBirth

Type: Public Sub
Lines: 40

Calls: CalculateDateOfBirth, DateSerial, Int

Complexity Notes: - ⚠️ Contains GoTo statements

AddCompany_Click

Type: Private Sub
Lines: 4

Calls: AddCompany_Click

ArchiveResults_Click

Type: Private Sub
Lines: 72

Calls: FindFirst, OpenRecordset, Fields, ArchiveResults_Click

CloseFOrm_Click

Type: Private Sub
Lines: 51

Calls: CloseFOrm_Click

Complexity Notes: - ⚠️ Contains GoTo statements - ⚠️ High branching (9 If statements)

Delivery_Location_ID_AfterUpdate

Type: Private Sub
Lines: 3

Calls: Delivery_Location_ID_AfterUpdate

Distribution_Model_ID_AfterUpdate

Type: Private Sub
Lines: 4

Calls: Distribution_Model_ID_AfterUpdate

Division_ID_AfterUpdate

Type: Private Sub
Lines: 3

Calls: Division_ID_AfterUpdate

EditFirstMeeting_Click

Type: Private Sub
Lines: 3

Calls: EditFirstMeeting_Click

EditViewStatusHistory_Click

Type: Private Sub
Lines: 4

Calls: EditViewStatusHistory_Click

Financial_Literacy_Result_AfterUpdate

Type: Private Sub
Lines: 7

Calls: Financial_Literacy_Result_AfterUpdate

Form_BeforeInsert

Type: Private Sub
Lines: 20
Parameters: Cancel As Integer

Calls: Form_BeforeInsert

Complexity Notes: - ⚠️ High branching (6 If statements)

Form_BeforeUpdate

Type: Private Sub
Lines: 19
Parameters: Cancel As Integer

Calls: Form_BeforeUpdate, OpenRecordset, Fields

Form_Close

Type: Private Sub
Lines: 43

Calls: IsLoaded, Form_Close

Complexity Notes: - ⚠️ High branching (13 If statements)

Form_Open

Type: Private Sub
Lines: 99
Parameters: Cancel As Integer

Calls: Form_Open

Complexity Notes: - ⚠️ High branching (8 If statements)

SA_Id_Number_AfterUpdate

Type: Private Sub
Lines: 7

Calls: SA_Id_Number_AfterUpdate

Personal_Audit_Score_AfterUpdate

Type: Private Sub
Lines: 26

Calls: Personal_Audit_Score_AfterUpdate, OpenRecordset, Fields

PrintEOI_Click

Type: Private Sub
Lines: 7

Calls: IsLoaded, PrintEOI_Click

Type: Private Sub
Lines: 32

Calls: OpenRecordset, Recommended_Product_ID_AfterUpdate, Fields, Column

Complexity Notes: - ⚠️ Uses SendKeys

SAID_AfterUpdate

Type: Private Sub
Lines: 7

Calls: SAID_AfterUpdate

Style_Questionnaire_Score_AfterUpdate

Type: Private Sub
Lines: 32

Calls: Fields, OpenRecordset, Style_Questionnaire_Score_AfterUpdate

ViewEditHistory_Click

Type: Private Sub
Lines: 3

Calls: ViewEditHistory_Click

ViewFirstMeeting_Click

Type: Private Sub
Lines: 3

Calls: ViewFirstMeeting_Click