<?
/*
-- File Name   : tbl_user.php
-- Description : libreria para tabla tbl_user 
-- Programmer  : Christian Díaz
-- Date        : 01/May/2006 
*/

/********************************************************************************/

function fm_bus_user($vtCod, $vtLogin, $vtPass, $vtCed , $vtCod_AS, $vtNivel, $vtIni, $vtTamPag)
{
	$vlString = "";
	$vlString = $vlString . " SELECT a.user_cod, a.user_nomb, a.user_niv_cod, a.user_login, a.user_pass, a.user_mail, a.user_tel, " ;
	$vlString = $vlString . "				 a.user_cel, a. user_stat, a.user_direc, a.user_cedula, a.user_cod_as, b.niv_cod, b.niv_desc " ;
	$vlString = $vlString . " FROM tbl_user a, tbl_nivel b " ;
	$vlString = $vlString . " WHERE a.user_cod >= 1 " ;
	$vlString = $vlString . " AND a.user_niv_cod = b.niv_cod " ;
	//$vlString = $vlString . " AND a.user_stat = 1 " ;
	//------------
	if (!empty($vtCod)){ $vlString = $vlString . " AND a.user_cod = '" . trim($vtCod) . "'" ; }
	//------------
	if (!empty($vtLogin)){ $vlString = $vlString . " AND a.user_login = '" . trim($vtLogin) . "'" ; }
	//------------
	if (!empty($vtPass)){ $vlString = $vlString . " AND a.user_pass = '" . trim($vtPass) . "'" ; }
	//------------
	if (!empty($vtCed)){ $vlString = $vlString . " AND a.user_cedula = '" . trim($vtCed) . "'" ; }
	//------------
	if (!empty($vtCod_AS)){ $vlString = $vlString . " AND a.user_cod_as = '" . trim($vtCod_AS) . "'" ; }
	//------------
	if (!empty($vtNivel)){ $vlString = $vlString . " AND a.user_niv_cod = '" . trim($vtNivel) . "'" ; }
	//------------
	$vlString = $vlString . " ORDER BY a.user_cod " ;
	//------------
	if (!empty($vtIni) && !empty($vtTamPag))
	{
		if(intval($vtIni) == 1 ){ $vtIni = 0 ;}
		$vlString = $vlString . " LIMIT ". $vtIni . "," . $vtTamPag ;
	}
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------

	$vlQuery = fm_query_gen($vlString);

	return $vlQuery;
}

/********************************************************************************/

function fm_bus_user_like($vtTipo, $vtCampo, $vtIni, $vtTamPag)
{
	$vlString = "";
	$vlString = $vlString . " SELECT a.user_cod, a.user_nomb, a.user_niv_cod, a.user_login, a.user_pass, a.user_mail, a.user_tel, " ;
	$vlString = $vlString . "				 a.user_cel, a. user_stat, a.user_direc, a.user_cedula, a.user_cod_as, b.niv_cod, b.niv_desc " ;
	$vlString = $vlString . " FROM tbl_user a, tbl_nivel b ";
	$vlString = $vlString . " WHERE a.user_cod >= 1 " ;
	$vlString = $vlString . " AND a.user_niv_cod = b.niv_cod " ;
	//$vlString = $vlString . " AND a.user_stat = 1 " ;
	//------------
	switch ($vtTipo)
		{
			case 1:
				$vlString = $vlString . " AND a.user_nomb like '%" . trim($vtCampo) . "%'" ;
				break;
			case 2:
				$vlString = $vlString . " AND a.user_login like '%" . trim($vtCampo) . "%'" ;
				break;
			case 3:
				$vlString = $vlString . " AND a.user_cedula like '%" . trim($vtCampo) . "%'" ;
				break;
			case 4:
				$vlString = $vlString . " AND a.user_cod_as like '%" . trim($vtCampo) . "%'" ;
				break;
		}
	//------------
	$vlString = $vlString . " ORDER BY a.user_cod " ;
	//------------
	if (!empty($vtIni) && !empty($vtTamPag))
	{
		if(intval($vtIni) == 1 ){ $vtIni = 0 ;}
		$vlString = $vlString . " LIMIT ". $vtIni . "," . $vtTamPag ;
	}
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------

	$vlQuery = fm_query_gen($vlString);

	return $vlQuery;
}

/********************************************************************************/

function fm_reg_user($vtNomb, $vtNivCod, $vtLogin, $vtPass, $vtMail, $vtTel, $vtCel, $vtStat, $vtDirec, $vtCed, $vtCod_AS)
{
/*****************************/
	$vecUser[0]="tbl_user";
  $vecUser[1]="user_cod";
  $vecUser[2]="user_nomb";
  $vecUser[3]="user_niv_cod";
  $vecUser[4]="user_login";
  $vecUser[5]="user_pass";
  $vecUser[6]="user_mail";
  $vecUser[7]="user_tel";
  $vecUser[8]="user_cel";
  $vecUser[9]="user_stat";
  $vecUser[10]="user_direc";
  $vecUser[11]="user_cedula";
  $vecUser[12]="user_cod_as";
/*****************************/
	$vlString = "" ;
	$vlString = $vlString . " INSERT INTO  " . $vecUser[0] . "( " . $vecUser[2] . ", " . $vecUser[3] . ", " . $vecUser[4] . ", " ;
	$vlString = $vlString .  $vecUser[5] . ", " . $vecUser[6] . ", " . $vecUser[7] . ", " . $vecUser[8] . ", " . $vecUser[9] . ", " ;
	$vlString = $vlString .  $vecUser[10] . ", " . $vecUser[11] . ", " . $vecUser[12] ." ) " ;
	$vlString = $vlString . " VALUES ( " ;
	$vlString = $vlString . "'" . $vtNomb . "', " ;
	$vlString = $vlString . $vtNivCod . ", " ;
	$vlString = $vlString . "'" . $vtLogin . "', " ;
	$vlString = $vlString . "'" . $vtPass . "', " ;
	$vlString = $vlString . "'" . $vtMail . "', " ;
	$vlString = $vlString . "'" . $vtTel . "', " ;
	$vlString = $vlString . "'" . $vtCel . "', " ;
	$vlString = $vlString . $vtStat . ", " ;
	$vlString = $vlString . "'" . $vtDirec . "', " ;
	$vlString = $vlString . "'" . $vtCed . "', " ;
	$vlString = $vlString . "'" . $vtCod_AS . "' ) " ;
	//------------
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------
	fm_query_gen($vlString);
	//------------
	fm_desconect();

//$vlPrueba = mysql_insert_id();
//echo $vlPrueba ;
//exit();
}

/********************************************************************************/

function fm_mod_user($vtCod, $vtNomb, $vtNivCod, $vtLogin, $vtPass, $vtMail, $vtTel, $vtCel, $vtStat, $vtDirec, $vtCed, $vtCod_AS)
{
/*****************************/
	$vecUser[0]="tbl_user";
  $vecUser[1]="user_cod";
  $vecUser[2]="user_nomb";
  $vecUser[3]="user_niv_cod";
  $vecUser[4]="user_login";
  $vecUser[5]="user_pass";
  $vecUser[6]="user_mail";
  $vecUser[7]="user_tel";
  $vecUser[8]="user_cel";
  $vecUser[9]="user_stat";
  $vecUser[10]="user_direc";
  $vecUser[11]="user_cedula";
  $vecUser[12]="user_cod_as";
/*****************************/
	$vlString = "";
	$vlString = $vlString . " UPDATE " . $vecUser[0] ;
	$vlString = $vlString . " SET    " . $vecUser[2] . " = '" . fm_ecs($vtNomb) . "', " ;
	$vlString = $vlString . "        " . $vecUser[3] . " = '" . $vtNivCod . "', " ;
	$vlString = $vlString . "        " . $vecUser[4] . " = '" . fm_ecs($vtLogin) . "', " ;
	$vlString = $vlString . "        " . $vecUser[5] . " = '" . fm_ecs($vtPass) . "', " ;
	$vlString = $vlString . "        " . $vecUser[6] . " = '" . fm_ecs($vtMail) . "', " ;
	$vlString = $vlString . "        " . $vecUser[7] . " = '" . fm_ecs($vtTel) . "', " ;
	$vlString = $vlString . "        " . $vecUser[8] . " = '" . fm_ecs($vtCel) . "', " ;
	$vlString = $vlString . "        " . $vecUser[9] . " = '" . $vtStat . "', " ;
	$vlString = $vlString . "        " . $vecUser[10] . " = '" . fm_ecs($vtDirec) . "', " ;
	$vlString = $vlString . "        " . $vecUser[11] . " = '" . fm_ecs($vtCed) . "', " ;
	$vlString = $vlString . "        " . $vecUser[12] . " = '" . fm_ecs($vtCod_AS) . "' " ;
	$vlString = $vlString . " WHERE  " . $vecUser[1] . " = '" . trim($vtCod) . "'" ;
	//------------
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------
	fm_query_gen($vlString);
}

/********************************************************************************/

function fm_elim_user($vtCod)
{
/*****************************/
	$vecUser[0]="tbl_user";
  $vecUser[1]="user_cod";
/*****************************/
	$vlString = "";
	$vlString = $vlString . " DELETE FROM " . $vecUser[0] ;
	$vlString = $vlString . " WHERE  " . $vecUser[1] . " = " . trim($vtCod) ;
	//------------
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------
	fm_query_gen($vlString);
}

/********************************************************************************/

function fm_mod_stat_user($vtCod, $vtActiv)
{
/*****************************/
	$vecUser[0]="tbl_user";
  $vecUser[1]="user_cod";
  $vecUser[2]="user_stat";
/*****************************/	
	$vlString = "";
	$vlString = $vlString . " UPDATE " . $vecUser[0] ;
	$vlString = $vlString . " SET    " . $vecUser[2] . " = " . $vtActiv . " " ;
	$vlString = $vlString . " WHERE  " . $vecUser[1] . " = " . trim($vtCod) ;
	//------------
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------
	fm_query_gen($vlString);
}

/********************************************************************************/

function fm_bus_nomb_user($vtCod)
{
/*****************************/
	$vecUser[0]="tbl_user";
  $vecUser[1]="user_cod";
  $vecUser[2]="user_stat";
/*****************************/	
	$vlString = "";
	$vlString = $vlString . " SELECT  user_cod, user_cod_as, user_nomb ";
	$vlString = $vlString . " FROM  " . $vecUser[0] ;
	$vlString = $vlString . " WHERE " . $vecUser[1] . " = '" . trim($vtCod) . "'";
	//------------
	//echo " vlString : " . $vlString . "<br>" ;
	//exit();
	//------------
	$vlResult = fm_query_gen($vlString);
	$vlReturn = mysql_num_rows($vlResult);
	if(!empty($vlReturn))
	{
		$ObjRst = mysql_fetch_array($vlResult);
		$vlRetval= $ObjRst["user_nomb"] ;
	}else{
		$vlRetval = " No cargado " ;	
	}
	return $vlRetval;
}
?>