<!--
// Deals with parameters passed in the initial URL
// > Allows answers to be pre-supplied 

// Process the URL
var autoAnswerObjectID = -1 ;
var p = parent.document.URL.indexOf("?") ;
if ( p >= 0 )
{
  var urlquery = parent.document.URL.substring(p+1,parent.document.URL.length) ;
  while ( urlquery.length > 0 )
  {
    var p1 = urlquery.indexOf("?") ;
    var p2 = urlquery.indexOf("&") ;
    if ( p1 < 0 )
      p = p2 ;
    else if ( p2 < 0 )
      p = p1 ;
    else if ( p1 < p2 )
      p = p1 ;
    else
      p = p2 ;
    if ( p < 0 )
    {
      urlterm = urlquery ;
      urlquery = "" ;
    }
    else
    {
      urlterm = urlquery.substring(0,p) ;
      urlquery = urlquery.substring(p+1,urlquery.length) ;
    }

    var v = urlterm.split("=") ;
    if ( v.length == 2 )
    {
      var aParam = v[0].toUpperCase() ;
      var aValue = v[1] ;
      if ( ( aParam.substr(0,3) == "AQI" ) || ( aParam.substr(0,3) == "AAI" ) )
        aParam = aParam.substr(0,3) ;
      switch ( aParam )
      {
//        case "DEBUG" :
//         doDebug = ( aValue == "1" ) ;
//          break ;
        case "RUNMODE" :
          runMode = aValue ;
          break ;
        case "EXPERT" :
          expert = aValue ;
          break ;
        case "POPUPS" :
          popupAttachments = ( aValue == "1" ) ;
          break ;
        case "AQC" :
          // auto answer question count
          break ;
        case "AQI" :
          // auto answer question ID
          autoAnswerObjectID = aValue ;
          break ;
        case "AAI" :
          // auto answer value ID
          if ( autoAnswerObjectID != -1 )
          {
            AddReplayAnswerByID ( autoAnswerObjectID , aValue , true ) ;
            autoAnswerObjectID = -1 ;
          }
          break ;
        case "JUMP" :
          // Debug question jump
          qJump = aValue ;
          break ;
        case "CONTEXT" :
          // Set any context values (i.e. how are we running)
	  var cp = aValue.split(",") ;
	  var sss = "" ;
          for ( ccc = 0 ; ccc < cp.length ; ccc++ )
	  {
	    sss = cp[ccc].toUpperCase() ;
	    if ( sss == "EMAIL" )
	      emailContext = true ; // email context
	    else
	      alert ( "Unknown context parameter [" + sss + "]" ) ;
	  }
          break ;
        default :
          AddReplayAnswerByName ( aParam , unescape(aValue) , true ) ;
      }
    }
  }
}

// If the language has not been supplies, default it from the country

if ( languageCode.length == 0 )
  switch ( countryCode )
  {
    case "BR" :
      languageCode = "pt" ;
      break ;
    case "JP" :
      languageCode = "jp" ;
      break ;
    case "CN" :
      languageCode = "zh" ;
      break ;
    case "AR" :
    case "MX" :
      languageCode = "es" ;
      break ;
    case "DE" :
      languageCode = "de" ;
      break ;
    case "FR" :
      languageCode = "fr" ;
      break ;
    default :
      languageCode = "en" ;
  }
  
-->