function win_open(url, name, top, left, w_max, h_max)
{
  var w_width  = screen.width;
  var w_height = screen.height;

  if (w_width  > w_max) {
    w_width  = w_max;
  } else {
    w_width = w_width - 100;
  }
  if (w_height > h_max) {
    w_height = h_max;
  } else {
    w_height = w_height - 100;
  }

//  w = window.open(url, name, "top=" + top + ",left=" + left + ",width=" + w_width + ",height=" + w_height + ",resizable=yes,scrollbars=yes,status=yes");
  w = window.open(url, name, "width=" + w_width + ",height=" + w_height + ",resizable=yes,scrollbars=yes,status=yes");
  w.resizeTo(w_width, w_height);
  w.focus();
}

function win_open2(url, name, top, left, w_max, h_max)
{
  var w_width  = screen.width;
  var w_height = screen.height;

  if (w_width  > w_max) {
    w_width  = w_max;
  } else {
    w_width = w_width - 100;
  }
  if (w_height > h_max) {
    w_height = h_max;
  } else {
    w_height = w_height - 100;
  }

  w = window.open(url, name, "width=" + w_width + ",height=" + w_height + ",resizable=yes,scrollbars=yes,status=yes,menubar=yes,location=yes");
  w.resizeTo(w_width, w_height);
  w.focus();
}

// 本文表示 (ウィンドウサイズ = 900 x 700)
function body_open(f, jp, vol, koma, base_url)
{
  if (jp != "-1") {
    f.JP_NUM.value = jp;
  }

  if (vol != "-1") {
    f.VOL_NUM.value = vol;
  }

  if (koma != "-1") {
    f.KOMA.value = koma;
  }

  if (base_url == "") {
      base_url = "./";
  }

  win_open('', 'F_BODY', 10, 10, 900, 700);
  f.action = base_url + "BIImgFrame.php";
  f.target = "F_BODY";
  f.submit();
}

// 永続的識別子による本文表示 (ウィンドウサイズ = 900 x 700)
function body_open_with_id(f, koma, identifier, base_url)
{
  if (identifier == "") {
    identifier = "info:ndljp/pid";
    koma = "-1";
  }

  if (base_url == "") {
      base_url = "./";
  }

  win_open2('', 'F_BODY', 10, 10, 900, 700);
  if (koma != "-1") {
      f.action = base_url + identifier + "/" + koma;
  } else {
      f.action = base_url + identifier;
  }
  f.target = "F_BODY";
  f.method = "POST";
  f.submit();
}

// 本文編集表示 (ウィンドウサイズ = 1200 x 800)
function bodyedit_open(f, jp, vol)
{
  if (jp != "-1") {
    f.JP_NUM.value = jp;
  }

  if (vol != "-1") {
    f.VOL_NUM.value = vol;
  }

  win_open('', 'W_BODYLIST', 10, 10, 1200, 800);
  f.action = "./BIUpdImgList.php";
  f.target = "W_BODYLIST";
  f.submit();
}

// 人名件名辞書表示 (ウィンドウサイズ = 800 x 600)
function jinmei_open(url)
{
  win_open(url, 'W_JINMEI', 10, 10, 800, 600);
}

// しおり表示 (ウィンドウサイズ = 800 x 600)
function siori_open(url)
{
  win_open(url, 'W_BKMARK', 50, 50, 800, 600);
}

// 印刷表示 (ウィンドウサイズ = 800 x 600)
function print_open(f)
{
  win_open('', 'W_PRT', 50, 50, 800, 600);
  f.submit();
}

// URL表示 (ウィンドウサイズ = 900 x 200)
function url_open(url)
{
  win_open(url, 'W_IMGURL', 50, 50, 900, 200);
}

// 本文GIF/LINDRA(フレーム無し)表示 (ウィンドウサイズ = 800 x 600)
function img_open(url)
{
  win_open(url, 'IMG', 50, 50, 800, 600);
}

// 振り直し結果表示 (ウィンドウサイズ = 800 x 600)
function result_open(f)
{
  win_open('', 'W_RESULT', 10, 10, 800, 600);
  f.submit();
}

// 実行レポート表示 (ウィンドウサイズ = 800 x 600)
function report_open(f)
{
  win_open('', 'W_REPORT', 10, 10, 800, 600);
  f.submit();
}

// analogレポート表示 (ウィンドウサイズ = 800 x 600)
function analog_open(f)
{
  win_open('', 'W_ANALOG', 10, 10, 800, 600);
  f.submit();
}

// ヘルプ表示
function help_open(url)
{
  win_open(url, 'W_HELP', 50, 50, 800, 800);
}

// ステータスヘルプ画面表示 (ウィンドウサイズ = 470 x 370)
function stshelp_open(f,type)
{
  win_open('', 'W_STSHELP', 10, 10, 470, 370);
  f.tpl_sts_type.value = type;
  f.action = "./BICRHelpDisp.php";
  f.target = "W_STSHELP";
  f.submit();
}

// 2010/01/08 追加
function ClickSearch( strUrl ) {
	if (document.forms[0].tpl_bib_access.checked) {
		document.location.href = strUrl + "?tpl_bib_access=1";
	}
	else{
		document.location.href = strUrl + "?tpl_bib_access=0";
	}
}
function ClickSearch2( strUrl ) {
	if (document.forms[0].tpl_bib_access.value == 1) {
		document.location.href = strUrl + "?tpl_bib_access=1";
	}
	else{
		document.location.href = strUrl + "?tpl_bib_access=0";
	}
}
// 2010/01/08 追加