// JavaScript Document

function JS_Login(a_ref) {
  document.F_Forum.target="_self";
  //alert (a_ref);
  document.F_Forum.action=a_ref;
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO_LOG.value='login_ok.cfm';
  if (a_ref=="forum.cfm")document.F_Forum.Q_MODULO.value='forum_el.cfm';
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO.value='forum_el.cfm';
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO.value='forum_head.cfm';
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO2.value='forum_el_msg.cfm'; 
  document.F_Forum.submit();
}

function JS_Logoff(a_ref) {
  document.F_Forum.target="_self";
  document.F_Forum.action=a_ref;
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO_LOG.value='logout.cfm';
  if (a_ref=="forum.cfm")document.F_Forum.Q_MODULO.value='forum_el.cfm';
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO.value='forum_el.cfm';
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO.value='forum_head.cfm';
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  if (a_ref=="do_forum.cfm")document.F_Forum.Q_MODULO2.value='forum_el_msg.cfm'; 
  document.F_Forum.submit();
}


function JS_Register() {
  document.F_Forum.target="_self";
  document.F_Forum.action="index.cfm";
  document.F_Forum.Q_MODULO_LOGIN.value='../login/add_usr.cfm';  
  document.F_Forum.submit();
}

function JS_AddMsgOk(a_code,a_id,a_capo) {
  document.F_Forum.target="_self";
  document.F_Forum.action="do_forum.cfm";
  document.F_Forum.Q_MODULO_LOG.value='blank.cfm';
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO.value='forum_addmsg_ok.cfm';
  document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  document.F_Forum.Q_MODULO2.value='forum_el_msg.cfm'; 
  document.F_Forum.Q_FORUM.value=a_code;
  document.F_Forum.Q_REPLYTO.value=a_id;
  //document.F_Forum.Q_CAPO.value=a_capo;
  document.F_Forum.submit();
}
function JS_Reply(a_code,a_id,a_capo) {
  document.F_Forum.target="_self";
  document.F_Forum.action="do_forum.cfm";
  document.F_Forum.Q_MODULO_LOG.value='blank.cfm';
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO.value='forum_addmsg.cfm';
  document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  document.F_Forum.Q_MODULO2.value='forum_show_msg.cfm'; 
  document.F_Forum.Q_FORUM.value=a_code;
  document.F_Forum.Q_REPLYTO.value=a_id;
  //document.F_Forum.Q_CAPO.value=a_capo;
  document.F_Forum.submit();
}

function JS_AddMsg(a_code) {
  document.F_Forum.target="_self";
  document.F_Forum.action="do_forum.cfm";
  document.F_Forum.Q_FORUM.value=a_code;
  document.F_Forum.Q_MODULO_LOG.value='blank.cfm';
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO.value='forum_addmsg.cfm';
  document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  document.F_Forum.Q_MODULO2.value='forum_show_msg.cfm'; 
  document.F_Forum.Q_REPLYTO.value='0';
  document.F_Forum.submit();
}

function JS_ShowForum(a_code) {
  document.F_Forum.target="_self";
  document.F_Forum.action="do_forum.cfm";
  document.F_Forum.Q_FORUM.value=a_code;
  document.F_Forum.Q_MODULO_LOG.value='blank.cfm';
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO.value='forum_head.cfm';
  document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  document.F_Forum.Q_MODULO2.value='forum_el_msg.cfm'; 
  document.F_Forum.submit();
}


function JS_ShowMsg(a_id,a_mode,a_code) {
  document.F_Forum.target="_self";
  document.F_Forum.Q_MSG.value=a_id;
  document.F_Forum.Q_MODE.value=a_mode;
  document.F_Forum.action="do_forum.cfm";
  document.F_Forum.Q_FORUM.value=a_code;
  document.F_Forum.Q_MODULO_LOG.value='blank.cfm';
  document.F_Forum.Q_MODULO_LOGIN.value='login.cfm';
  document.F_Forum.Q_MODULO.value='forum_head.cfm';
  document.F_Forum.Q_MODULO1.value='forum_el_tpc.cfm'; 
  document.F_Forum.Q_MODULO2.value='forum_show_msg.cfm';  
  document.F_Forum.submit();
}