/*
-- File Name : tbl_inmb_estado_propied.php
-- Description : libreria para tabla tbl_inmb_estado_propied
-- Programmer : Christian Díaz
-- Date : 08/Jun/2006
*/
//*****************************************************
function fm_bus_est_prop($vtCod, $vtCodInmb)
{
/*---------------*/
$vecEst_Prop[0]="tbl_inmb_estado_propied" ;
$vecEst_Prop[1]="inep_cod" ;
$vecEst_Prop[2]="inep_inmb_cod" ;
$vecEst_Prop[3]="inep_estad_propied" ;
$vecEst_Prop[5]="inep_piso" ;
$vecEst_Prop[7]="inep_aire_acond" ;
$vecEst_Prop[8]="inep_tip_cable" ;
$vecEst_Prop[9]="inep_lineas_tel" ;
$vecEst_Prop[10]="inep_aba" ;
$vecEst_Prop[11]="inep_mascota" ;
$vecEst_Prop[12]="inep_luminosidad" ;
$vecEst_Prop[13]="inep_tipo_vista" ;
/*---------------*/
$vlString = "";
$vlString = $vlString . " SELECT " . $vecEst_Prop[1] . ", " . $vecEst_Prop[2] . ", " . $vecEst_Prop[3] . ", " . $vecEst_Prop[5] . ", ";
$vlString = $vlString . " " . $vecEst_Prop[7] . ", " . $vecEst_Prop[8] . ", " . $vecEst_Prop[9] . ", " ;
$vlString = $vlString . " " . $vecEst_Prop[10] . ", " . $vecEst_Prop[11] . ", " . $vecEst_Prop[12] . ", " ;
$vlString = $vlString . " " . $vecEst_Prop[13] . " " ;
$vlString = $vlString . " FROM " . $vecEst_Prop[0] ;
$vlString = $vlString . " WHERE " . $vecEst_Prop[1] . " >= 1 " ;
//------------
if (!empty($vtCod))
{
$vlString = $vlString . " AND " . $vecEst_Prop[1] . " = '" . trim($vtCod) . "'" ;
}
//------------
if (!empty($vtCodInmb))
{
$vlString = $vlString . " AND " . $vecEst_Prop[2] . " = '" . trim($vtCodInmb) . "'" ;
}
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
$vlQuery = fm_query_gen($vlString);
return $vlQuery;
fm_desconect();
}
//*****************************************************
function fm_reg_est_prop($vtInmb_cod, $vtestad_propied, $vtpiso, $vtaire_acond, $vttip_cable,
$vtlineas_tel, $vtaba, $vtmascota, $vtluminosidad, $vttipo_vista)
{
/*******************************************/
$vecEst_Prop[0]="tbl_inmb_estado_propied" ;
$vecEst_Prop[1]="inep_cod" ;
$vecEst_Prop[2]="inep_inmb_cod" ;
$vecEst_Prop[3]="inep_estad_propied" ;
$vecEst_Prop[5]="inep_piso" ;
$vecEst_Prop[7]="inep_aire_acond" ;
$vecEst_Prop[8]="inep_tip_cable" ;
$vecEst_Prop[9]="inep_lineas_tel" ;
$vecEst_Prop[10]="inep_aba" ;
$vecEst_Prop[11]="inep_mascota" ;
$vecEst_Prop[12]="inep_luminosidad" ;
$vecEst_Prop[13]="inep_tipo_vista" ;
/*******************************************/
$vlString = "" ;
$vlString = $vlString . " INSERT INTO " . $vecEst_Prop[0] . "( " . $vecEst_Prop[2] . ", " . $vecEst_Prop[3] . ", " ;
$vlString = $vlString . $vecEst_Prop[5] . ", " . $vecEst_Prop[7] . ", " . $vecEst_Prop[8] . ", " . $vecEst_Prop[9] . ", " ;
$vlString = $vlString . $vecEst_Prop[10] . ", " . $vecEst_Prop[11] . ", " . $vecEst_Prop[12] . ", " . $vecEst_Prop[13] . ")" ;
$vlString = $vlString . " VALUES ( " ;
$vlString = $vlString . "'" . $vtInmb_cod . "', " ;
$vlString = $vlString . "'" . $vtestad_propied . "', " ;
$vlString = $vlString . "'" . $vtpiso . "', " ;
$vlString = $vlString . "'" . $vtaire_acond . "', " ;
$vlString = $vlString . "'" . $vttip_cable . "', " ;
$vlString = $vlString . "'" . $vtlineas_tel . "', " ;
$vlString = $vlString . "'" . $vtaba . "', " ;
$vlString = $vlString . "'" . $vtmascota . "', " ;
$vlString = $vlString . "'" . $vtluminosidad . "', " ;
$vlString = $vlString . "'" . $vttipo_vista . "') " ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
fm_desconect();
}
/********************************************************************************/
function fm_mod_est_prop($vtCod, $vtInmb_cod, $vtestad_propied, $vtpiso, $vtaire_acond, $vttip_cable,
$vtlineas_tel, $vtaba, $vtmascota, $vtluminosidad, $vttipo_vista)
{
/*******************************************/
$vecEst_Prop[0]="tbl_inmb_estado_propied" ;
$vecEst_Prop[1]="inep_cod" ;
$vecEst_Prop[2]="inep_inmb_cod" ;
$vecEst_Prop[3]="inep_estad_propied" ;
$vecEst_Prop[5]="inep_piso" ;
$vecEst_Prop[7]="inep_aire_acond" ;
$vecEst_Prop[8]="inep_tip_cable" ;
$vecEst_Prop[9]="inep_lineas_tel" ;
$vecEst_Prop[10]="inep_aba" ;
$vecEst_Prop[11]="inep_mascota" ;
$vecEst_Prop[12]="inep_luminosidad" ;
$vecEst_Prop[13]="inep_tipo_vista" ;
/*******************************************/
$vlString = "";
$vlString = $vlString . " UPDATE " . $vecEst_Prop[0] ;
$vlString = $vlString . " SET " . $vecEst_Prop[2] . " = '" . $vtInmb_cod . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[3] . " = '" . $vtestad_propied . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[5] . " = '" . $vtpiso . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[7] . " = '" . $vtaire_acond . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[8] . " = '" . $vttip_cable . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[9] . " = '" . $vtlineas_tel . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[10] . " = '" . $vtaba . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[11] . " = '" . $vtmascota . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[12] . " = '" . $vtluminosidad . "', " ;
$vlString = $vlString . " " . $vecEst_Prop[13] . " = '" . $vttipo_vista . "' " ;
$vlString = $vlString . " WHERE " . $vecEst_Prop[1] . " = '" . trim($vtCod) . "'" ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
fm_desconect();
}
/********************************************************************************/
function fm_elim_Est_Prop($vtCod)
{
/*****************************/
$vecEst_Prop[0]="tbl_inmb_estado_propied" ;
$vecEst_Prop[1]="inep_cod" ;
$vecEst_Prop[2]="inep_inmb_cod" ;
/*****************************/
$vlString = "";
$vlString = $vlString . " DELETE FROM " . $vecEst_Prop[0] ;
$vlString = $vlString . " WHERE " . $vecEst_Prop[2] . " = " . trim($vtCod) ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
fm_desconect();
}
/********************************************************************************/
?>