include("../../inc/i_conect.php");
include("../../inc/i_comunes.php");
include("../inc/i_tabla.php");
include("../inc/tbl_divisa.php");
include("meta_scripts.html");
/*
-- File Name : list_divisa.php
-- Description : página para el listado de montos en dolares que se usaran
-- Programmer : Christian Díaz
-- Date : 01/May/2006
*/
/****************************************************************/
$vlLabel = "Divisa";
$vlLabels = "Lista de Divisas";
/*----------------*/
$vecCampos[0] = "tbl_divisa" ;
$vecCampos[1] = "div_cod" ;
$vecCampos[2] = "div_desc" ;
$vecCampos[3] = "div_monto" ;
$vecCampos[4] = "div_tipo" ;
$vecCampos[5] = "div_stat" ;
$vecCampos[6] = "list_divisa.php";
$vecCampos[7] = "mod_divisa.php";
/*----------------*/
if(!empty($_POST["txtDes"]))
{
if(!(fm_bus_desc2($vecCampos[2], $vecCampos[4], $vecCampos[0], $_POST["txtDes"], $_POST["cmbTipo"])))
{
fm_reg_divisa($_POST["txtDes"], $_POST["txtMonto"], $_POST["cmbTipo"], $_POST["rdActiv"]);
}else{
fm_alerta_admin("Esta descripción ya existe");
}
}
/*----------------*/
if(isset($_POST["hddStat"]) != "")
{
fm_mod_stat_divisa ($_POST["hddCod"], $_POST["hddStat"]);
}
/*----------------*/
$vlResult = fm_bus_divisa( "", "");
$vlReturn = mysql_num_rows($vlResult);
if(empty($vlReturn))
{
$vlCont = 0 ;
}
/*----------------*/
?>
..:: ::..