// リンク元(GET)のパラメータを取得
function getParam(paramkey){
	var pvalue = '';
	var thisURL = document.URL;
	if(thisURL.indexOf(paramkey+'=') != -1){//パラメータ'af'あり
		pvalue = thisURL.substr(thisURL.indexOf('?')+1,thisURL.length);//パラメータ取得
		if(pvalue.indexOf('&') != -1){//パラメータ接続詞'&'あり
			arrp = pvalue.split('&');//パラメータを配列化
			for(i=0; i<arrp.length; i++){
				if(arrp[i].indexOf(paramkey) != -1){//指定されたもののみを処理対象とする
					pvalue = arrp[i].substr(paramkey.length+1,arrp[i].length);//パラメータ'af'の値を取得
				}
			}
		}else{//パラメータ接続詞'&'なし
			pvalue = pvalue.substr(paramkey.length+1,pvalue.length);//パラメータ'af'の値を取得
		}
	}
	return pvalue;
}
// 表示しているページのリンク(a)にパラメータを付与
function setParamWizLink(paramkey){
	var pvalue = getParam(paramkey);
	if(pvalue.length > 0){
		objElem = document.getElementsByTagName('a');
		for(i=0; i<objElem.length; i++){
			//パラメータ値に'#'(アンカー)、'@'(メール符号)があったらパラメータは引き継がない
			if((objElem[i].href.indexOf('#') == -1) && (objElem[i].href.indexOf('@') == -1)){
				objElem[i].href += '?'+ paramkey +'='+ pvalue;
			}
		}
	}
}
// 表示しているページのインナーフレーム(iframe)にパラメータを付与
function setParamWizIframe(paramkey){
	var pvalue = getParam(paramkey);
	if(pvalue.length > 0){
		objElem = document.getElementsByTagName('iframe');
		for(i=0; i<objElem.length; i++){
			// 主にアンケートモジュール表示用なので接続詞は「&」で固定
			objElem[i].src += '&'+ paramkey +'='+ pvalue;
		}
	}
}
// 表示しているページのエリアリンク(area)にパラメータを付与
function setParamWizArea(paramkey){
	var pvalue = getParam(paramkey);
	if(pvalue.length > 0){
		objElem = document.getElementsByTagName('area');
		for(i=0; i<objElem.length; i++){
			objElem[i].href += '?'+ paramkey +'='+ pvalue;
		}
	}
}