function MultiForm()
{

  this.TargetField = false;
  this.ParentField = false;
  this.ValueDefault = false;
  this.AjaxURL = false;
  this.AjaxEvalURL = false;
  this.FetchData = FetchDataFunction;
  this.ValueSelected = false;
  this.OnloadTarget = false;
  this.OnloadEval = false;
  this.ParentAllowNull = false;
  this.ParentFieldNull = true;
  this.ParentAllowNullTarget = false;
  this.StaticData = false;
  this.SelectText = true;
  this.DebugMode = false;
  this.CaseInsensitive = false;
  this.DisableAllChildren = DisableAllChildrenFunction;
  this.OutputHandlerFunction = 'FetchDataCallback';
  this.SelectHeading = false;
  this.SelectHeadingDividerLeft = '----- '; // Space After
  this.SelectHeadingDividerRight = ' -----'; // Space Before
  this.SelectHeadingTextUnavailable = 'No Options Available'; // When Search results return nothing
  this.AutoSelectSingularOptions = false;
  this.MasterAllowNull = true;
  this.MasterTarget = false;
  this.MasterObject = null;
  this.ForkedAjax = null;
  
  function ParentFieldNullChecker(input)
  {
    var array = input.split(',');
    var valid = 0;
    for (var i = 0;i < array.length;i++)
    {
      if(document.getElementById(array[i]).value)
      {
        valid++;
      }
    }
    if(valid == array.length)
    {
      return false
    }
    else
    {
      return true;
    }
  }

  function FetchDataFunction()
  {
    if(this.DebugMode)alert('FetchData function called ('+this.TargetField+')'); // DEBUG OUTPUT
    var x = document.getElementById(this.TargetField);
    if(typeof x == 'undefined' || x == null)
    {
      alert('Failed to locate HTML element with the ID: '+this.TargetField+', Please contact Dealer Solutions');
    }
    var MatchFound = false;
    if(this.ParentAllowNullTarget)
    {
      this.ParentFieldNull = ParentFieldNullChecker(this.ParentAllowNullTarget);
      if(this.ParentFieldNull == true)
      {
        if(this.DebugMode)alert('ParentFieldValue is FALSE'); // DEBUG OUTPUT
        this.ParentFieldValue = null;
      }
      else
      {
        if(this.DebugMode)alert('ParentFieldValue is TRUE'); // DEBUG OUTPUT
        this.ParentFieldValue = true;
      }
    }
    else if(this.ParentField)
    {
      this.ParentFieldValue = document.getElementById(this.ParentField).value;
      if(this.DebugMode)alert('ParentFieldValue is:' + this.ParentFieldValue); // DEBUG OUTPUT
    }

    // Disables all child objects
    x.disabled = true;
    this.DisableAllChildren(this);

    if(this.AjaxEvalURL)
    {
      this.AjaxURL = eval(this.AjaxEvalURL);
      if(this.DebugMode)alert('AjaxEvalURL: '+this.AjaxURL); // DEBUG OUTPUT
      //prompt(this.AjaxURL,this.AjaxURL);
    }

    // fetch mater object
    if(this.MasterTarget != false && this.MasterAllowNull != true)
    {
      this.MasterObject = eval(this.MasterTarget);
    }
    
    if (((this.ParentFieldValue != null && this.ParentFieldValue != '') || this.ParentAllowNull == true) && this.StaticData == false && (this.MasterAllowNull == true || this.MasterTarget == false || (this.MasterTarget != false && this.MasterAllowNull != true && this.MasterObject.ValueDefault != null && this.MasterObject.ValueDefault != '')))
    {
      if(this.DebugMode)alert('Preparing to FORK.Ajax'); // DEBUG OUTPUT
      if (x.type == "select" || x.type == "select-one")
      {
        x.options.length = 1;
        x.options[0] = new Option(this.SelectHeadingDividerLeft+'Loading: Please Wait'+this.SelectHeadingDividerRight,'');
        x.selectedIndex = 0;
      }

      // URL ENCODE
      this.AjaxURL = this.AjaxURL.replace('+','%2B');

      // abort existing forks
      if(this.ForkedAjax != null)
      {
        this.ForkedAjax.abort();
      }
      
      this.ForkedAjax = new FORK.Ajax("GET", this.AjaxURL,
        {
          timeout: 30000,
          argument: {TargetObject: this},
          onComplete: function(o,x)
          {
            if(x.DebugMode)alert('FORK OnComplete Called'); // DEBUG OUTPUT
            eval(x.TargetObject.OutputHandlerFunction + '(o,x.TargetObject)');
            //FetchDataCallback(o,x.TargetObject);//, x.TargetField , x.ParentField, x.ValueSelected , x.ValueDefault, x.OnloadTarget);
          }
        }
      );
    }
    else if ((this.StaticData == true && this.ParentField == false && this.ParentAllowNullTarget == false) || (this.StaticData == true && this.ParentFieldValue && (this.ParentField || this.ParentAllowNullTarget)))// && this.ValueDefault)
    {
      if(this.DebugMode)alert('Parent is Null, no Ajax Call being made'); // DEBUG OUTPUT
      x.disabled = false;
      for (var xi = 0;xi < x.length;xi++)
      {
        if (xi == 0 && x[xi].value == '' && (x[xi].text == '' || x[xi].text == this.SelectHeadingDividerLeft+this.SelectHeadingTextUnavailable+this.SelectHeadingDividerRight))
        {
          if (this.SelectHeading == false)
          {
            x.options[0] = new Option(this.SelectHeadingDividerLeft+'Please Select'+this.SelectHeadingDividerRight,'');
          }
          else
          {
            x.options[0] = new Option(this.SelectHeadingDividerLeft+this.SelectHeading+this.SelectHeadingDividerRight,'');
          }
        }
        if (x[xi].value == this.ValueDefault || (this.CaseInsensitive == true && x[xi].value.toLowerCase() == this.ValueDefault.toLowerCase()))
        {
          if(this.DebugMode && this.CaseInsensitive == true)alert('Match Found (case insensitive)'); // DEBUG OUTPUT
          if(this.DebugMode && this.CaseInsensitive == false)alert('Match Found (case sensitive)'); // DEBUG OUTPUT
          x.selectedIndex = xi;
          var MatchFound = true;
        }
      }
      if (this.OnloadEval && (this.ParentAllowNull == true || MatchFound == true))
      {
        if(this.DebugMode)alert('OnloadEval (A) called\n----------\n'+this.OnloadEval); // DEBUG OUTPUT
        eval(this.OnloadEval)
      }
      if (this.OnloadTarget && (this.ParentAllowNull == true || MatchFound == true))
      {
        var PeformTarget = eval(this.OnloadTarget);
        if (PeformTarget.ValueDefault || this.ValueDefault)
        {
          if(this.DebugMode)alert('OnloadTarget (B) ('+this.OnloadTarget+') function called'); // DEBUG OUTPUT
          PeformTarget.FetchData();
        }
      }
    }
    // JUNE WORK
    else
    {
      if (this.OnloadEval)
      {
        if(this.DebugMode)alert('OnloadEval (1) called\n----------\n'+this.OnloadEval); // DEBUG OUTPUT
        eval(this.OnloadEval)
      }
      if (this.OnloadTarget)
      {
        var PeformTarget = eval(this.OnloadTarget);
        if(this.DebugMode)alert('OnloadTarget (1) ('+this.OnloadTarget+') function called'); // DEBUG OUTPUT
        PeformTarget.FetchData();
      }
    }
    // JUNE WORK
  }
  
  function DisableAllChildrenFunction(TargetObject)
  {
    if (TargetObject)
    {
      //if(TargetObject.DebugMode)alert('Disabling Children'); // DEBUG OUTPUT
      var x = document.getElementById(TargetObject.TargetField);
      if ((TargetObject.StaticData == false && typeof x != 'undefined') || (TargetObject.StaticData == true && TargetObject.ParentAllowNull == false && TargetObject.ParentField))
      {
        if (TargetObject.SelectText)
        {
          if (TargetObject.StaticData == true)
          {
            if(x.options[0].value == '')
            {
              x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+TargetObject.SelectHeadingTextUnavailable+TargetObject.SelectHeadingDividerRight,'');
            }
          }
          else if (x && x.options)
          {
            x.options.length = 1;
            x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+TargetObject.SelectHeadingTextUnavailable+TargetObject.SelectHeadingDividerRight,'');
          }
        }
        if(x)
        {
          x.selectedIndex = 0;
          x.disabled = true;
        }
      }
      else if (x)
      {
        x.disabled = false;
      }
      DisableAllChildrenFunction(eval(TargetObject.OnloadTarget));
    }
  }

  function FetchDataCallback(XMLHttpRequest,TargetObject)
  {
    if(TargetObject.DebugMode)alert('FetchDataCallback function called'); // DEBUG OUTPUT

    // reset the fork object since it got this far
    TargetObject.ForkedAjax = null;

    var data = eval(XMLHttpRequest.responseText);
    var MatchFound = false;
    var x = document.getElementById(TargetObject.TargetField);
    /*
    // If the Parent is blank, reset the child
    if (TargetObject.ParentField && TargetObject.ParentAllowNull == false)
    {
      if (document.getElementById(TargetObject.ParentField).value)
      {
        // Do Nothing
      }
      else
      {
        if (TargetObject.SelectText)
        {
          x.options.length = 1;
          x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+TargetObject.SelectHeadingTextUnavailable+TargetObject.SelectHeadingDividerRight,'');
        }
        // Duplication of OnloadTargetFromBelow
        if (TargetObject.OnloadTarget)
        {
          var PeformTarget = eval(TargetObject.OnloadTarget);
          PeformTarget.FetchData();
        }
        if(TargetObject.DebugMode)alert('Returning'); // DEBUG OUTPUT
        return;
      }
    }
    */
    // Make Level
    x.options.length = 1;
    if (data.length > 0)
    {
      if(TargetObject.DebugMode)alert('Data Found'); // DEBUG OUTPUT
      if (data.length)
      {
        if (TargetObject.SelectText == true)
        {
          if (TargetObject.SelectHeading == false)
          {
            x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+'Please Select'+TargetObject.SelectHeadingDividerRight,'');
          }
          else
          {
            x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+TargetObject.SelectHeading+TargetObject.SelectHeadingDividerRight,'');
          }
          var indexmodifyer = 1;
        }
        else
        {
          var indexmodifyer = 0;
        }
        if(TargetObject.DebugMode)alert('FetchDataCallback - Loop Initiated'); // DEBUG OUTPUT
        for (var xi = 0;xi < data.length;xi++)
        {
          if (data[xi].attribute_count > 0)
          {
            x.options[xi + indexmodifyer] = new Option((data[xi].attribute_text) ? data[xi].attribute_text + ' (' + data[xi].attribute_count + ')' : data[xi].attribute_name + ' (' + data[xi].attribute_count + ')',data[xi].attribute_name);
          }
          else
          {
            x.options[xi + indexmodifyer] = new Option((data[xi].attribute_text) ? data[xi].attribute_text : data[xi].attribute_name,data[xi].attribute_name);
          }
          if(TargetObject.DebugMode && TargetObject.AutoSelectSingularOptions && data.length == 1)alert('Only one result found, auto selecting'); // DEBUG OUTPUT
          if ((TargetObject.AutoSelectSingularOptions && data.length == 1) || data[xi].attribute_name == TargetObject.ValueDefault || (TargetObject.CaseInsensitive == true && data[xi].attribute_name.toLowerCase() == TargetObject.ValueDefault.toLowerCase()))
          {
            if(TargetObject.DebugMode && TargetObject.CaseInsensitive == true)alert('Match Found (case insensitive)'); // DEBUG OUTPUT
            if(TargetObject.DebugMode && TargetObject.CaseInsensitive == false)alert('Match Found (case sensitive)'); // DEBUG OUTPUT
            x.selectedIndex = xi + indexmodifyer;
            TargetObject.ValueDefault = data[xi].attribute_name;
            var MatchFound = true;
          }
        }
        x.disabled = false;
      }
      else if (TargetObject.SelectHeadingTextUnavailable)
      {
        x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+TargetObject.SelectHeadingTextUnavailable+TargetObject.SelectHeadingDividerRight,'');
        x.disabled = true;
      }
    }
    else if (TargetObject.SelectHeadingTextUnavailable)
    {
      if(TargetObject.DebugMode)alert('Data Not Found'); // DEBUG OUTPUT
      x.options[0] = new Option(TargetObject.SelectHeadingDividerLeft+TargetObject.SelectHeadingTextUnavailable+TargetObject.SelectHeadingDividerRight,'');
      x.disabled = true;
    }
    else
    {
      if(TargetObject.DebugMode)alert('Data Not Found'); // DEBUG OUTPUT
    }
    if (TargetObject.OnloadEval)
    {
      if(this.DebugMode)alert('OnloadEval (2) called\n----------\n'+TargetObject.OnloadEval); // DEBUG OUTPUT
      eval(TargetObject.OnloadEval);
    }
    /*
    if (TargetObject.OnloadTarget)
    {
      var PeformTarget = eval(TargetObject.OnloadTarget);
      if(PeformTarget && (PeformTarget.ParentAllowNull == true || MatchFound == true))
      {
        if(TargetObject.DebugMode)alert('FetchDataCallback - Trying Onload Target ('+TargetObject.OnloadTarget+')'); // DEBUG OUTPUT
        var PeformTarget = eval(TargetObject.OnloadTarget);
        //if (PeformTarget.ValueDefault || TargetObject.ValueDefault)
        if(PeformTarget.ParentAllowNull == true || MatchFound == true || TargetObject.ValueDefault || PeformTarget.ValueDefault) // || TargetObject.ParentAllowNull == true
        {
            if(TargetObject.DebugMode)alert('OnloadTarget (2) ('+TargetObject.OnloadTarget+') function called'); // DEBUG OUTPUT
            PeformTarget.FetchData();
        }
      }

    }
    */
    if (TargetObject.OnloadEval)
    {
      if(TargetObject.DebugMode)alert('OnloadEval (1) called\n----------\n'+TargetObject.OnloadEval); // DEBUG OUTPUT
      eval(TargetObject.OnloadEval)
    }
    if (TargetObject.OnloadTarget)
    {
      var PeformTarget = eval(TargetObject.OnloadTarget);
      if(TargetObject.DebugMode)alert('OnloadTarget (1) ('+TargetObject.OnloadTarget+') function called'); // DEBUG OUTPUT
      PeformTarget.FetchData();
    }
  } //FetchDataCallback()

} // MultiForm()