Attribute VB_Name = "Config"

Global NumOfSales As Integer

Global SALES_ANALYSIS_COL_MONTH As String
Global SALES_ANALYSIS_COL_QUARTER As String
Global SALES_ANALYSIS_COL_PRODUCT_CATEGORY As String
Global SALES_ANALYSIS_COL_SELLING_UNIT As String
Global SALES_ANALYSIS_COL_MONTHLY_SALES As String
Global SALES_ANALYSIS_COL_QUARTELY_SALES As String
Global SALES_ANALYSIS_COL_COMMISSION As String
Global SALES_ANALYSIS_COL_MONTHLY_MARGIN As String
Global SALES_ANALYSIS_COL_QUATERLY_MARGIN As String
Global SALES_ANALYSIS_COL_QUATERLY_COMMISSION_ As String

'row
Global SALES_ANALYSIS_ROW_JANUARY As String
Global SALES_ANALYSIS_ROW_FEBURARY As String
Global SALES_ANALYSIS_ROW_MARCH As String
Global SALES_ANALYSIS_ROW_APRIL As String
Global SALES_ANALYSIS_ROW_MAY As String
Global SALES_ANALYSIS_ROW_JUNE As String
Global SALES_ANALYSIS_ROW_JULY As String
Global SALES_ANALYSIS_ROW_AUGEST As String
Global SALES_ANALYSIS_ROW_SEPTEMBER As String
Global SALES_ANALYSIS_ROW_OCTOBER As String
Global SALES_ANALYSIS_ROW_NOVEMBER As String
Global SALES_ANALYSIS_ROW_DECEMBER As String

Global SALES_ARRAY As Variant

Global monthly_commission_per_agent As Object

Global STRING_SEPERATOR As String

' Global YEAR_GRAPHS_TOP as variant
' Global YEAR_GRAPHS_LEFT as variant

Global MONTH_NAMES As Variant

Sub init()
    STRING_SEPERATOR = "#_STRING_SEPERATOR_#"

    SALES_ANALYSIS_COL_MONTH = "A"
    SALES_ANALYSIS_COL_QUARTER = "B"
    SALES_ANALYSIS_COL_PRODUCT_CATEGORY = "C"
    SALES_ANALYSIS_COL_SELLING_UNIT = "D"
    SALES_ANALYSIS_COL_MONTHLY_SALES = "E"
    SALES_ANALYSIS_COL_QUARTELY_SALES = "F"
    SALES_ANALYSIS_COL_COMMISSION = "G"
    SALES_ANALYSIS_COL_MONTHLY_MARGIN = "H"
    SALES_ANALYSIS_COL_QUATERLY_MARGIN = "I"
    SALES_ANALYSIS_COL_QUATERLY_COMMISSION_ = "J"

    'row
    SALES_ANALYSIS_ROW_JANUARY = "2"
    SALES_ANALYSIS_ROW_FEBURARY = "3"
    SALES_ANALYSIS_ROW_MARCH = "4"
    SALES_ANALYSIS_ROW_APRIL = "5"
    SALES_ANALYSIS_ROW_MAY = "6"
    SALES_ANALYSIS_ROW_JUNE = "7"
    SALES_ANALYSIS_ROW_JULY = "8"
    SALES_ANALYSIS_ROW_AUGEST = "9"
    SALES_ANALYSIS_ROW_SEPTEMBER = "10"
    SALES_ANALYSIS_ROW_OCTOBER = "11"
    SALES_ANALYSIS_ROW_NOVEMBER = "12"
    SALES_ANALYSIS_ROW_DECEMBER = "13"

    NumOfSales = 20
    SALES_ARRAY = Array("Alex", "Ben", "Candy", "Danny", "Eason", "Filex", "Gary", "Henry", "Irene", "Jenny")

    Dim top_comission(12, 3) As Double

    Set monthly_commission_per_agent = CreateObject("Scripting.Dictionary")

    MONTH_NAMES = Array("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec")

End Sub