include("../../inc/i_conect.php");
include("../../inc/i_comunes.php");
include("../inc/i_tabla.php");
include("../inc/tbl_inmueble.php");
include("../inc/tbl_inmb_ubicacion.php");
include("../inc/tbl_inmb_relacionado.php");
include("../inc/tbl_inmb_varios.php");
include("../inc/tbl_area_aux.php");
include("../inc/tbl_inmb_estado_propied.php");
include("../inc/tbl_inmb_area.php");
include("../inc/tbl_inmb_obser.php");
include("../inc/tbl_foto.php");
include("../inc/tbl_user.php");
include("../inc/tbl_divisa.php");
include("../inc/i_verifica_sesion.php");
/****************************************************************/
/*
-- File Name: mod_inmueble.php
-- Description : p gina para el listado de usuarios
-- Programmer : Christian Diaz
-- Date : 08/Jun/2006
*/
/****************************************************************/
$vlCod = $_POST["hddCod"];
$vlAccion = $_POST["hddAccion"];
/****************************************************************/
$vlLabel = "Inmueble " ;
$vlLabels = "Inmuebles " ;
$vlFlag = true;
$vlCriterio = "";
$vlBusca = "";
$VLTamPag = "";
$vlTotalPag = "";
$vlPlanta= "";
$vlClassName = "";
$vlMontoBol = "";
$vlMontoBol2 = "";
$vlMonto2= "0";
$vlCronos="";
$vlPiso = "";
$vlHabPpal = "";
$vlFecha = "";
/****************************************************************/
$vecCampos[0]="list_inmueble.php";
$vecCampos[1]="mod_inmueble.php";
$vecCampos[2]="list_foto.php";
/****************************************************************/
if(isset($_SESSION["vgVecUser"]) == "")
{
fm_carga_user();
}
/****************************************************************/
if(!empty($_POST["hddEject"]))
{
if ($vlAccion == "M")
{
$vlDivisa = explode("-", trim($_POST["cmbDivisa"]));
$vlUsuario = explode("-", trim($_POST["txtPromotor"]));
if(isset($_POST["cmbPlanInmb"])!=""){$vlPlanta=$_POST["cmbPlanInmb"];}
if(isset($_POST["txtMonto2"])!=""){$vlMonto2=$_POST["txtMonto2"];}
fm_mod_inmueble($_POST["hddCodInmb"], $_POST["rdTransac"], $_POST["hddCodFicha"], $_POST["txtMonto"], $vlMonto2, trim($vlDivisa[0]),
$_POST["rdPublicPag"], $_POST["rdPublicOfer"], $_POST["txtFechVencOfer"], $_POST["txtFechIng"],
date('d/m/Y'), $_POST["txtFechFirma"], $_POST["txtFechAnive"], $_POST["txtFechDispo"], $_POST["cmbFuente"],
trim($vlUsuario[0]) , $_POST["rdFichFirm"], $_POST["rdPermPubFot"], $_POST["cmbStatus"], $_POST["txtAreaInmb"],
$_POST["cmbAnoConst"], $_POST["cmbHabit"], $_POST["txtBanoCmpt"], $_POST["cmbTerraza"],
$_POST["rdPiscina"], $_POST["cmbCantEstacio"], $_POST["cmbTipAmob"]);
fm_mod_ubicacion($_POST["hddCodUbic"], $_POST["hddCodInmb"], $_POST["cmbZona"], $_POST["cmbCiudad"], $_POST["cmbMunicipio"], $_POST["cmbUrban"],
$_POST["txtNomInmb"], $_POST["txtDirInmb"], $_POST["txtTelInmb"],$_POST["txtTelInmb2"],
$_POST["cmbTipInmb"], $vlPlanta, $_POST["cmbEstaEstruc"], $_POST["cmbTallaEstru"]);
fm_mod_relacionado($_POST["hddCodRel1"], $_POST["hddCodInmb"], $_POST["txtNomProp"], $_POST["txtCedProp"], $_POST["txtTelDomProp"],
$_POST["txtTelOficProp"],$_POST["txtTelCelProp"], $_POST["txtFaxProp"], $_POST["txtEmailProp"],
$_POST["txtObserProp"], "1");
fm_mod_relacionado($_POST["hddCodRel2"], $_POST["hddCodInmb"], $_POST["txtNomCony"], $_POST["txtCedCony"], $_POST["txtTelDomCony"],
$_POST["txtTelOficCony"],$_POST["txtTelCelCony"], $_POST["txtFaxCony"], $_POST["txtEmailCony"],
$_POST["txtObserCony"], "2");
fm_mod_relacionado($_POST["hddCodRel3"], $_POST["hddCodInmb"], $_POST["txtNomApode"], $_POST["txtCedApode"], $_POST["txtTelDomApode"],
$_POST["txtTelOficApode"],$_POST["txtTelCelApode"], $_POST["txtFaxApode"], $_POST["txtEmailApode"],
$_POST["txtObserApode"], "3");
fm_mod_relacionado($_POST["hddCodRel4"], $_POST["hddCodInmb"], $_POST["txtNomAdmin"], $_POST["txtCedAdmin"], $_POST["txtTelDomAdmin"],
$_POST["txtTelOficAdmin"],$_POST["txtTelCelAdmin"], $_POST["txtFaxAdmin"], $_POST["txtEmailAdmin"],
$_POST["txtObserAdmin"], "4");
fm_mod_relacionado($_POST["hddCodRel5"], $_POST["hddCodInmb"], $_POST["txtNomConser"], $_POST["txtNomConyConser"], "", $_POST["txtTelConser"],
$_POST["txtCelConser"], "", "",$_POST["txtObserConser"], "5");
fm_mod_relacionado($_POST["hddCodRel6"], $_POST["hddCodInmb"], $_POST["txtNomVig"], $_POST["txtEmpVig"], "", $_POST["txtTelEmpVig"],
$_POST["txtCelVig"], "", "",$_POST["txtObserVig"], "6");
fm_mod_relacionado($_POST["hddCodRel7"], $_POST["hddCodInmb"], $_POST["txtNomVig2"], $_POST["txtEmpVig2"], "", $_POST["txtTelEmpVig2"],
$_POST["txtCelVig2"], "", "",$_POST["txtObserVig2"], "7");
fm_mod_varios($_POST["hddCodVari"], $_POST["hddCodInmb"], $_POST["rdCanchTen"], $_POST["rdGym"], $_POST["rdSquash"], $_POST["rdSalaFies"],
$_POST["rdSauna"], $_POST["cmbJardin"], $_POST["cmbTipVig"]);
fm_mod_area_aux($_POST["hddCodAreaAux"], $_POST["hddCodInmb"], $_POST["txtAreaConst"], $_POST["txtAreaJardin"], $_POST["txtAreaTerra"]);
if (isset($_POST["cmbTipoPiso"][0])){$vlPiso = join("|", $_POST["cmbTipoPiso"]);}
fm_mod_est_prop($_POST["hddCodEstPro"], $_POST["hddCodInmb"], $_POST["cmbEstProp"], $vlPiso,
$_POST["cmbAireAcond"], $_POST["cmbTV"], $_POST["cmbTelefon"],$_POST["rdABA"], $_POST["rdMascota"],
$_POST["cmbLumin"], $_POST["cmbTipVista"]);
if (isset($_POST["cmbHabitPpal"][0])){$vlHabPpal = join("|", $_POST["cmbHabitPpal"]);}
fm_mod_Area($_POST["hddCodArea"], $_POST["hddCodInmb"], $vlHabPpal, $_POST["txtBanoVisit"],
$_POST["txtBanoMedi"], $_POST["cmbAreaCocina"], $_POST["cmbEstCocina"],$_POST["cmbEstufa"],
$_POST["cmbHorno"], $_POST["rdNevera"], $_POST["rdCongelador"],$_POST["rdLavaPlat"],
$_POST["rdMicro"], $_POST["rdPantry"], $_POST["rdLavadora"], $_POST["rdSecadora"],
$_POST["rdUtensilio"], $_POST["cmbSalonComed"],$_POST["rdEstudio"],
$_POST["rdFamRoom"], $_POST["rdHabServ"], $_POST["rdBanoServ"],$_POST["rdHabChof"],
$_POST["cmbEstacio"], $_POST["rdMaletero"]);
fm_mod_Observ($_POST["hddCodObser"], $_POST["hddCodInmb"], $_POST["txtHistPropiedad"], $_POST["txtOtrosdatos"]);
}else{
fm_elim_Observ($_POST["hddCodInmb"]);
fm_elim_Area($_POST["hddCodInmb"]);
fm_elim_Est_Prop($_POST["hddCodInmb"]);
fm_elim_varios($_POST["hddCodInmb"]);
fm_elim_area_aux($_POST["hddCodInmb"]);
fm_elim_relacionado($_POST["hddCodInmb"]);
fm_elim_ubicacion($_POST["hddCodInmb"]);
fm_elim_foto($_POST["hddCodInmb"]);
fm_elim_inmueble($_POST["hddCodInmb"]);
}
fm_redirect($vecCampos[0]);
}
/*****************************************************************************************/
$vlResult = fm_bus_inmueble($vlCod, "", "", "", "", "", "", "", "", "","", "", "", "", "", "", "", "", "");
$vlReturn = mysql_num_rows($vlResult);
$vecInmb = array();
if(!empty($vlReturn))
{
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vecInmb[0] = $vlObjrst["inmb_cod"];
$vecInmb[1] = $vlObjrst["inmb_transac"];
$vecInmb[2] = $vlObjrst["inmb_codigo_as"];
$vecInmb[3] = $vlObjrst["inmb_monto"];
$vecInmb[39] = $vlObjrst["inmb_monto2"];
$vecInmb[4] = $vlObjrst["inmb_div_cod"];
$vecInmb[5] = $vlObjrst["inmb_stat_pub"];
$vecInmb[6] = $vlObjrst["inmb_stat_ofer"];
$vecInmb[7] = $vlObjrst["inmb_fech_venc_ofer"];
$vecInmb[8] = $vlObjrst["inmb_fech_ing"];
$vecInmb[9] = $vlObjrst["inmb_fech_ult_act"];
$vecInmb[10] = $vlObjrst["inmb_fech_firma"];
$vecInmb[11] = $vlObjrst["inmb_fech_dispon"];
$vecInmb[12] = $vlObjrst["inmb_fuen_cod"];
$vecInmb[13] = $vlObjrst["inmb_user_cod"];
$vecInmb[14] = $vlObjrst["inmb_firma"];
$vecInmb[15] = $vlObjrst["inmb_publ_fot"];
$vecInmb[16] = $vlObjrst["inmb_stat"];
$vecInmb[17] = $vlObjrst["inubic_cod"];
$vecInmb[18] = $vlObjrst["inubic_zon_cod"];
$vecInmb[19] = $vlObjrst["inubic_cdad_cod"];
$vecInmb[20] = $vlObjrst["inubic_mncp_cod"];
$vecInmb[21] = $vlObjrst["inubic_zmun_cod"];
$vecInmb[22] = $vlObjrst["inubic_nomb"];
$vecInmb[23] = $vlObjrst["inubic_dir"];
$vecInmb[24] = $vlObjrst["inubic_tel"];
$vecInmb[25] = $vlObjrst["inubic_tel2"];
$vecInmb[26] = $vlObjrst["inubic_tinm_cod"];
$vecInmb[27] = $vlObjrst["inubic_tinm_plan"];
$vecInmb[29] = $vlObjrst["inubic_estad_estruc"];
$vecInmb[30] = $vlObjrst["inubic_tipo_estruc"];
$vecInmb[31] = $vlObjrst["inmb_area"];
$vecInmb[32] = $vlObjrst["inmb_ano_const"];
$vecInmb[33] = $vlObjrst["inmb_habit"];
$vecInmb[34] = $vlObjrst["inmb_banos"];
$vecInmb[35] = $vlObjrst["inmb_terraza"];
$vecInmb[36] = $vlObjrst["inmb_piscina"];
$vecInmb[37] = $vlObjrst["inmb_cant_estacio"];
$vecInmb[38] = $vlObjrst["inmb_amoblado"];
$vecInmb[40] = $vlObjrst["inmb_fech_anive"];
}
mysql_free_result($vlResult);
}
if ($vecInmb[40] != "")
{
$vecCronos = explode("-", $vecInmb[40]);
$vecCronos[1] = intval($vecCronos[1]);
$vecCronos[1] = $vecCronos[1] - 3 ;
if (intval($vecCronos[1]) <= 0)
{
$vecCronos[1] = $vecCronos[1] + 12 ;
$vecCronos[0] = intval($vecCronos[0]) - 1;
}
$vlCronos = $vecCronos[2]."/".fm_rellen_izq(strval($vecCronos[1]), "0", 2)."/".$vecCronos[0];
}
/*****************************************************************************************/
$vlResult = fm_bus_relacionado("", $vlCod);
$vlReturn = mysql_num_rows($vlResult);
if(!empty($vlReturn))
{
$vecRel = array(array(), array());
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vlCont = count($vecRel[0]);
$vecRel[0][$vlCont] = trim($vlObjrst["inrel_cod"]);
$vecRel[1][$vlCont] = trim($vlObjrst["inrel_inmb_cod"]);
$vecRel[2][$vlCont] = trim($vlObjrst["inrel_nombre"]);
$vecRel[3][$vlCont] = trim($vlObjrst["inrel_ced"]);
$vecRel[4][$vlCont] = trim($vlObjrst["inrel_tel_hab"]);
$vecRel[5][$vlCont] = trim($vlObjrst["inrel_tel_ofic"]);
$vecRel[6][$vlCont] = trim($vlObjrst["inrel_tel_cel"]);
$vecRel[7][$vlCont] = trim($vlObjrst["inrel_fax"]);
$vecRel[8][$vlCont] = trim($vlObjrst["inrel_mail"]);
$vecRel[9][$vlCont] = trim($vlObjrst["inrel_observ"]);
$vecRel[10][$vlCont] = trim($vlObjrst["inrel_tipo_rela"]);
}
mysql_free_result($vlResult);
}
/*****************************************************************************************/
$vlResult = fm_bus_varios( "", $vlCod);
$vlReturn = mysql_num_rows($vlResult);
if(!empty($vlReturn))
{
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vecVarios[0] = $vlObjrst["invar_cod"];
$vecVarios[1] = $vlObjrst["invar_inmb_cod"];
$vecVarios[2] = $vlObjrst["invar_tennis"];
$vecVarios[3] = $vlObjrst["invar_gimnasio"];
$vecVarios[4] = $vlObjrst["invar_squash"];
$vecVarios[5] = $vlObjrst["invar_sala_fies"];
$vecVarios[6] = $vlObjrst["invar_sauna"];
$vecVarios[7] = $vlObjrst["invar_jardin"];
$vecVarios[8] = $vlObjrst["invar_tip_vigilancia"];
}
mysql_free_result($vlResult);
}
/*****************************************************************************************/
$vlResult = fm_bus_area_aux( "", $vlCod);
$vlReturn = mysql_num_rows($vlResult);
if(!empty($vlReturn))
{
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vecAreaAux[0] = $vlObjrst["areaux_cod"];
$vecAreaAux[1] = $vlObjrst["areaux_inmb_cod"];
$vecAreaAux[2] = $vlObjrst["areaux_const"];
$vecAreaAux[3] = $vlObjrst["areaux_jardin"];
$vecAreaAux[4] = $vlObjrst["areaux_terra"];
}
mysql_free_result($vlResult);
}
/*****************************************************************************************/
$vlResult = fm_bus_est_prop( "", $vlCod);
$vlReturn = mysql_num_rows($vlResult);
if(!empty($vlReturn))
{
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vecEstProp[0] = $vlObjrst["inep_cod"] ;
$vecEstProp[1] = $vlObjrst["inep_inmb_cod"] ;
$vecEstProp[2] = $vlObjrst["inep_estad_propied"] ;
$vecEstProp[4] = $vlObjrst["inep_piso"] ;
$vecEstProp[6] = $vlObjrst["inep_aire_acond"] ;
$vecEstProp[7] = $vlObjrst["inep_tip_cable"] ;
$vecEstProp[8] = $vlObjrst["inep_lineas_tel"] ;
$vecEstProp[9] = $vlObjrst["inep_aba"] ;
$vecEstProp[10] = $vlObjrst["inep_mascota"] ;
$vecEstProp[11] = $vlObjrst["inep_luminosidad"] ;
$vecEstProp[12] = $vlObjrst["inep_tipo_vista"] ;
}
mysql_free_result($vlResult);
}
$vecPiso = explode("|" , $vecEstProp[4]);
/*****************************************************************************************/
$vlResult = fm_bus_Area("", $vlCod);
$vlReturn = mysql_num_rows($vlResult);
if(!empty($vlReturn))
{
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vecArea[0] = $vlObjrst["inarea_cod"];
$vecArea[1] = $vlObjrst["inarea_inmb_cod"];
$vecArea[3] = $vlObjrst["inarea_hab_ppal"];
$vecArea[5] = $vlObjrst["inarea_bano_visit"];
$vecArea[6] = $vlObjrst["inarea_bano_med"];
$vecArea[7] = $vlObjrst["inarea_tipo_cocina"];
$vecArea[8] = $vlObjrst["inarea_estad_cocina"];
$vecArea[9] = $vlObjrst["inarea_tipo_estufa"];
$vecArea[10] = $vlObjrst["inarea_tipo_horno"];
$vecArea[11] = $vlObjrst["inarea_nevera"];
$vecArea[12] = $vlObjrst["inarea_congelador"];
$vecArea[13] = $vlObjrst["inarea_lavaplato"];
$vecArea[14] = $vlObjrst["inarea_micro"];
$vecArea[15] = $vlObjrst["inarea_pantry"];
$vecArea[16] = $vlObjrst["inarea_lavadora"];
$vecArea[17] = $vlObjrst["inarea_secadora"];
$vecArea[18] = $vlObjrst["inarea_utensilio"];
$vecArea[19] = $vlObjrst["inarea_tipo_salon_comedor"];
$vecArea[21] = $vlObjrst["inarea_estudio"];
$vecArea[22] = $vlObjrst["inarea_family_room"];
$vecArea[23] = $vlObjrst["inarea_hab_serv"];
$vecArea[24] = $vlObjrst["inarea_bano_serv"];
$vecArea[25] = $vlObjrst["inarea_hab_chofer"];
$vecArea[27] = $vlObjrst["inarea_tipo_estaciona"];
$vecArea[28] = $vlObjrst["inarea_maletero"];
}
mysql_free_result($vlResult);
}
$vecHabPpal = explode("|" , $vecArea[3]);
/*****************************************************************************************/
$vlResult = fm_bus_Observ( "", $vlCod);
$vlReturn = mysql_num_rows($vlResult);
if(!empty($vlReturn))
{
while($vlObjrst = mysql_fetch_array($vlResult))
{
$vecObser[0] = $vlObjrst["inobs_cod"];
$vecObser[1] = $vlObjrst["inobs_inmb_cod"];
$vecObser[2] = $vlObjrst["inobs_hist_propied"];
$vecObser[3] = $vlObjrst["inobs_otros_datos"];
}
mysql_free_result($vlResult);
}
/*****************************************************************************************/
if ($vlAccion=="M")
{
$vlRead = "";
}else{
$vlRead = " readonly='true' disabled = true";
}
/*****************************************************************************************/
if ( $vecInmb[39] != "0" && $vecInmb[39] != "")
{
$vlEtiqueta= "Monto de alquiler (Divisa Exranjera) : ";
$vlEtiqueta2= "Monto de alquiler en Bolivares : : ";
}else{
$vlEtiqueta= "Monto de Transacción (Divisa Exranjera) : ";
$vlEtiqueta2= "Monto en Bolivares : ";
}
?>
..:: ::..
include("meta_scripts.html"); ?>