/*
-- File Name : tbl_inmb_admin.php
-- Description : libreria para tabla tbl_inmb_admin
-- Programmer : Christian Díaz
-- Date : 01/May/2006
*/
/********************************************************************************/
function fm_reg_inmb_admin($vtInmb_cod, $vtDiv_cod, $vtMonto, $vtStat_pub, $vtStat_ofer,
$vtFech_venc_ofer, $vtCodigo, $vtFuen_cod, $vtFirma, $vtPubl_fot)
{
/******************************************/
$vecinmb_admin[0]="tbl_inmb_admin" ;
$vecinmb_admin[1]="inadm_cod" ;
$vecinmb_admin[2]="inadm_inmb_cod" ;
$vecinmb_admin[3]="inadm_div_cod" ;
$vecinmb_admin[4]="inadm_monto" ;
$vecinmb_admin[5]="inadm_stat_pub" ;
$vecinmb_admin[6]="inadm_stat_ofer" ;
$vecinmb_admin[7]="inadm_fech_venc_ofer" ;
$vecinmb_admin[8]="inadm_codigo" ;
$vecinmb_admin[9]="inadm_fuen_cod" ;
$vecinmb_admin[10]="inadm_firma" ;
$vecinmb_admin[11]="inadm_publ_fot" ;
/******************************************/
$vlString = "" ;
$vlString = $vlString . " INSERT INTO " . $vecinmb_admin[0] . "( " . $vecinmb_admin[2] . ", " . $vecinmb_admin[3] . ", " . $vecinmb_admin[4] . ", " ;
$vlString = $vlString . $vecinmb_admin[5] . ", " . $vecinmb_admin[6] . ", " . $vecinmb_admin[7] . ", " . $vecinmb_admin[8] . ", " . $vecinmb_admin[9] . ", " ;
$vlString = $vlString . $vecinmb_admin[10] . ", " . $vecinmb_admin[11] . ") " ;
$vlString = $vlString . " VALUES ( " ;
$vlString = $vlString . $vtInmb_cod . ", " ;
$vlString = $vlString . $vtDiv_cod . "', " ;
$vlString = $vlString . fm_format_number($vtMonto) . ", " ;
$vlString = $vlString . $vtStat_pub . ", " ;
$vlString = $vlString . $vtStat_ofer . "', " ;
$vlString = $vlString . "'" . $vtFech_venc_ofer . "', " ;
$vlString = $vlString . "'" . $vtCodigo . "', " ;
$vlString = $vlString . $vtFuen_cod . ", " ;
$vlString = $vlString . $vtFirma . ", " ;
$vlString = $vlString . $vtPubl_fot . ") " ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
//------------
fm_desconect();
}
/********************************************************************************/
function fm_mod_inmb_admin($vtCod, $vtInmb_cod, $vtDiv_cod, $vtMonto, $vtStat_pub, $vtStat_ofer,
$vtFech_venc_ofer, $vtCodigo, $vtFuen_cod, $vtFirma, $vtPubl_fot)
{
/******************************************/
$vecinmb_admin[0]="tbl_inmb_admin" ;
$vecinmb_admin[1]="inadm_cod" ;
$vecinmb_admin[2]="inadm_inmb_cod" ;
$vecinmb_admin[3]="inadm_div_cod" ;
$vecinmb_admin[4]="inadm_monto" ;
$vecinmb_admin[5]="inadm_stat_pub" ;
$vecinmb_admin[6]="inadm_stat_ofer" ;
$vecinmb_admin[7]="inadm_fech_venc_ofer" ;
$vecinmb_admin[8]="inadm_codigo" ;
$vecinmb_admin[9]="inadm_fuen_cod" ;
$vecinmb_admin[10]="inadm_firma" ;
$vecinmb_admin[11]="inadm_publ_fot" ;
/******************************************/
$vlString = "";
$vlString = $vlString . " UPDATE " . $vecinmb_admin[0] ;
$vlString = $vlString . " SET " . $vecinmb_admin[2] . " = " . $vtInmb_cod . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[3] . " = " . $vtDiv_cod . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[4] . " = " . fm_format_number($vtMonto) . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[5] . " = " . $vtStat_pub . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[6] . " = " . $vtStat_ofer . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[7] . " = '" . $vtFech_venc_ofer . "', " ;
$vlString = $vlString . " " . $vecinmb_admin[8] . " = '" . $vtCodigo . "', " ;
$vlString = $vlString . " " . $vecinmb_admin[9] . " = " . $vtFuen_cod . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[10] . " = " . $vtFirma . ", " ;
$vlString = $vlString . " " . $vecinmb_admin[11] . " = " . $vtPubl_fot . ", " ;
$vlString = $vlString . " WHERE " . $vecinmb_admin[1] . " = '" . trim($vtCod) . "'" ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
}
/********************************************************************************/
function fm_elim_inmb_admin($vtCod)
{
/******************************************/
$vecinmb_admin[0]="tbl_inmb_admin" ;
$vecinmb_admin[1]="inadm_cod" ;
$vecinmb_admin[2]="inadm_inmb_cod" ;
/******************************************/
$vlString = "";
$vlString = $vlString . " DELETE FROM " . $vecinmb_admin[0] ;
$vlString = $vlString . " WHERE " . $vecinmb_admin[2] . " = " . trim($vtCod) ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
}
/********************************************************************************/
function fm_mod_stat_pub_inmb_admin($vtCod, $vtActiv)
{
/**************************************/
$vecinmb_admin[0]="tbl_inmb_admin" ;
$vecinmb_admin[1]="inadm_cod" ;
$vecinmb_admin[2]="inadm_stat_pub" ;
/**************************************/
$vlString = "";
$vlString = $vlString . " UPDATE " . $vecinmb_admin[0] ;
$vlString = $vlString . " SET " . $vecinmb_admin[2] . " = " . $vtActiv . " " ;
$vlString = $vlString . " WHERE " . $vecinmb_admin[1] . " = " . trim($vtCod) ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
}
/********************************************************************************/
function fm_mod_stat_ofer_inmb_admin($vtCod, $vtActiv)
{
/**************************************/
$vecinmb_admin[0]="tbl_inmb_admin" ;
$vecinmb_admin[1]="inadm_cod" ;
$vecinmb_admin[2]="inadm_stat_ofer" ;
/**************************************/
$vlString = "";
$vlString = $vlString . " UPDATE " . $vecinmb_admin[0] ;
$vlString = $vlString . " SET " . $vecinmb_admin[2] . " = " . $vtActiv . " " ;
$vlString = $vlString . " WHERE " . $vecinmb_admin[1] . " = " . trim($vtCod) ;
//------------
//echo " vlString : " . $vlString . "
" ;
//exit();
//------------
fm_query_gen($vlString);
}
/********************************************************************************/
?>