Private Const FINISHED_GOOD As Integer = 0
    Private Const SERVOLOC_SERIES As Integer = 1
    Private Const FRAME_SIZE As Integer = 2
    Private Const STACK_LENGTH As Integer = 3
    Private Const MOTOR_KE As Integer = 4
    Private Const VOLTAGE As Integer = 5
    Private Const MOUNTING_OPTION As Integer = 6
    Private Const FEEDBACK As Integer = 7
    Private Const TERMINATION As Integer = 8
    Private Const BRAKE_OPTION As Integer = 9
    Private Const OTHER_OPTIONS As Integer = 10
    Dim section(11) As String
    Dim list As Single
    Dim cost As Single
    Dim pricing(11) As Single
    Dim counter As Integer
    Dim price As Single
    Dim normalpart As Boolean