| Sistema de Configuración | |
|
||||
|
||||
|
";
}
$li_totrowche = $li_x;
$object_usu[1][1] = "";
$object_usu[1][2] = "";
$object_usu[1][3] = "";
$object_usu[1][4] = "";
$li_totrowusu = 1;
}
if($ls_operacion == "GUARDAR")
{
$li_totrowche = $_POST["total"];
$lb_existe = $io_chequera->uf_select_chequera($ls_empresa,$ls_codban,$ls_ctaban,$ls_chequera);
if ($lb_existe)
{
if ($ls_status=="N")//Nuevo
{
$msg->message("Este Número de Chequera ya está Registrado para este Banco y Cuenta Bancaria !!!");
$lb_valido = false;
$ls_operacion = "PINTAR";
}
elseif($ls_status=="G")//Grabado
{
$lb_valido = true;
for ($li_i=1;($li_i<=$li_totrowche) && $lb_valido;$li_i++)
{
$ls_numche = $_POST["txtnumrefche".$li_i];
$ls_codusu = $_POST["txtcodusuche".$li_i];
$lb_valido = $io_chequera->uf_update_chequera($ls_empresa,$ls_codban,$ls_ctaban,$ls_chequera,$ls_numche,$ls_codusu,$li_i);
}
if ($lb_valido)
{
$io_chequera->io_sql->commit();
$msg->message("Registro Actualizado !!!");
$ls_status = "N";
$ls_operacion = "NUEVO";
}
else
{
$io_chequera->io_sql->rollback();
$msg->message("Error en Actualización !!!");
$ls_operacion = "PINTAR";
}
}
}
else
{
$lb_existe = true;
for ($li_i=1;$li_i<=$li_totrowche;$li_i++)
{
$ls_numche = $_POST["txtnumrefche".$li_i];
$lb_existe = $io_chequera->uf_validar_cheque($ls_empresa,$ls_codban,$ls_ctaban,$ls_numche);
if ($lb_existe)
{
break;
}
}
if (!$lb_existe)
{
$lb_valido = true;
for ($li_x=1;($li_x<=$li_totrowche) && $lb_valido;$li_x++)
{
$ls_numche = $_POST["txtnumrefche".$li_x];
$ls_codusu = $_POST["txtcodusuche".$li_x];
$lb_valido = $io_chequera->uf_guardar_cheques($ls_empresa,$ls_codban,$ls_ctaban,$ls_tipcta,$ls_chequera,$ls_numche,$ls_codusu,0,$li_x);
}
if ($lb_valido)
{
$io_chequera->io_sql->commit();
$msg->message("Registro Incluido !!!");
$ls_status = "N";
$ls_operacion = "NUEVO";
}
else
{
$io_chequera->io_sql->rollback();
$msg->message("Error en Inclusión !!!");
$ls_operacion = "PINTAR";
}
}
else
{
$ls_operacion = "PINTAR";
$msg->message("Existen Números de Cheques Repetidos para esta Cuenta Bancaria, Por Favor Verifique !!!");
}
}
}
if($ls_operacion=="DELETE_DT")
{
require_once("sigesp_scb_c_chequera.php");
$in_classchequera=new sigesp_scb_c_chequera($la_security);
$li_fila_delete=$_POST["fila_delete"];
$ls_cheque=$_POST["txtnumrefche".$li_fila_delete];
if(array_key_exists("chk".$li_fila_delete,$_POST))
{
$msg->message("No puede eliminar el cheque, ya esta asociado a un pago");
}
else
{
$lb_valido=$in_classchequera->uf_delete_cheques($ls_chequera,$ls_codban,$ls_ctaban,$ls_cheque);
if($lb_valido)
{
$msg->message("Cheque eliminado satisfactoriamente");
}
else
{
$msg->message("No puede eliminar el cheque,".$in_classchequera->is_msg_error);
}
}
$ls_operacion='CARGAR';
}
if($ls_operacion=="DELETE_ALL")
{
require_once("sigesp_scb_c_chequera.php");
$in_classchequera=new sigesp_scb_c_chequera($la_security);
$li_total=$_POST["total"];
for($li_x=1;$li_x<=$li_total;$li_x++)
{
$ls_cheque=$_POST["txtnumrefche".$li_x];
if(array_key_exists("chk".$li_x,$_POST))
{
$msg->message("No puede eliminar el cheque ".$ls_cheque.", ya esta asociado a un pago");
}
else
{
$lb_valido = $in_classchequera->uf_delete_cheques($ls_chequera,$ls_codban,$ls_ctaban,$ls_cheque);
if (!$lb_valido)
{
break;
}
}
}
$ls_operacion="NUEVO";
}
if($ls_operacion == "AGREGAR_CTAS")
{
$total=1;
$ls_status="N";
$i=1;
$li_totrowche = $_POST["total"];
for ($li_i=1;$li_i<=$li_totrowche;$li_i++)
{
$ls_numrefche = $_POST["txtnumrefche".$li_i];
$ls_estche = uf_obtenervalor("chk".$li_i,0);
$ls_codusuche = $_POST["txtcodusuche".$li_i];
//Object que contiene los objetos y valores iniciales del grid.
$object[$li_i][1] = "";
$object[$li_i][2] = "";
if ($ls_estche=='0')
{
$object[$li_i][3] = "";
}
elseif($ls_estche=='1')
{
$object[$li_i][3] = "";
}elseif($ls_estche=='on')
{
$object[$li_i][3] = "";
}
$object[$li_i][4] = "";
}
$object[$li_i][1] = "";
$object[$li_i][2] = "";
$object[$li_i][3] = "";
$object[$li_i][4] = "";
$li_totrowche++;
$li_totrowusu = $_POST["totrows"];
for ($li_i=1;$li_i<$li_totrowusu;$li_i++)
{
$ls_codusu = trim($_POST["txtcodusu".$li_i]);
$ls_nomusu = $_POST["txtnomusu".$li_i];
$ls_apeusu = $_POST["txtapeusu".$li_i];
$object_usu[$li_i][1] = "";
$object_usu[$li_i][2] = "";
$object_usu[$li_i][3] = "";
$object_usu[$li_i][4] = "";
}
$object_usu[$li_totrowusu][1] = "";
$object_usu[$li_totrowusu][2] = "";
$object_usu[$li_totrowusu][3] = "";
$object_usu[$li_totrowusu][4] = "";
}
if($ls_operacion == "NUEVO")
{
$ls_chequera = "";
$ls_tipcta = "";
$ls_dentipcta = "";
$ls_codban = "";
$ls_denban = "";
$ls_ctaban = "";
$ls_dencuenta_banco="";
$ls_ctaban = "";
$ls_denctaban="";
$ls_numcheque= "";
$ls_desde= "";
$ls_hasta= "";
$li_status = 0;
$checked="";
$readonly="";
$li_totrowche = 1;
$ls_status="N";
$li_lastrow=0;
$li_totrowusu = 1;
$i=1;
//Object que contiene los objetos y valores iniciales del grid.
$object[1][1] = "";
$object[1][2] = "";
$object[1][3] = "";
$object[1][4] = "";
$object_usu[1][1] = "";
$object_usu[1][2] = "";
$object_usu[1][3] = "";
$object_usu[1][4] = "";
}
if($ls_operacion=="CARGAR")
{
require_once("sigesp_scb_c_chequera.php");
$in_classchequera=new sigesp_scb_c_chequera($la_security);
$in_classchequera->uf_cargar_cheques($ls_codban,$ls_ctaban,$ls_chequera,$ls_empresa,$li_totrowche,$object,$li_totrowusu,$object_usu);
if ($li_totrowche>=1 && $li_totrowusu>1)
{
$ls_status = 'G';//Para simular que la carga de los Cheques proviene del Catálogo.
}
}
if ($ls_operacion=="DELETE_DT_USU")
{
$li_totrowche = $_POST["total"];
for ($li_i=1;$li_i<=$li_totrowche;$li_i++)
{
$ls_numrefche = $_POST["txtnumrefche".$li_i];
$ls_codusuche = $_POST["txtcodusuche".$li_i];
$ls_estche = uf_obtenervalor("chk".$li_i,0);
$object[$li_i][1] = "";
$object[$li_i][2] = "";
if ($ls_estche=='0')
{
$object[$li_i][3] = "";
}
elseif($ls_estche=='1')
{
$object[$li_i][3] = "";
}elseif($ls_estche=='on')
{
$object[$li_i][3] = "";
}
$object[$li_i][4] = "";
}
$li_totrowusu = $_POST["totrows"]-1;
$li_rowdel = $_POST["filadel"];
$li_temp = 0;
for ($li_i=1;$li_i<=$li_totrowusu;$li_i++)
{
if ($li_i!=$li_rowdel)
{
$li_temp++;
$ls_codusu = $_POST["txtcodusu".$li_i];
$ls_nomusu = $_POST["txtnomusu".$li_i];
$ls_apeusu = $_POST["txtapeusu".$li_i];
$object_usu[$li_temp][1] = "";
$object_usu[$li_temp][2] = "";
$object_usu[$li_temp][3] = "";
$object_usu[$li_temp][4] = "";
}
else
{
$li_rowdelete=0;
}
}
$li_temp++;
$object_usu[$li_temp][1]="";
$object_usu[$li_temp][2]="";
$object_usu[$li_temp][3]="";
$object_usu[$li_temp][4] ="";
}
if ($ls_operacion=="PINTAR")
{
$li_totrowche = $_POST["total"];
for ($li_i=1;$li_i<=$li_totrowche;$li_i++)
{
$ls_numrefche = $_POST["txtnumrefche".$li_i];
$ls_estche = uf_obtenervalor("chk".$li_i,0);
$ls_codusuche = $_POST["txtcodusuche".$li_i];
//Object que contiene los objetos y valores iniciales del grid.
$object[$li_i][1] = "";
$object[$li_i][2] = "";
if ($ls_estche=='0')
{
$object[$li_i][3] = "";
}
elseif($ls_estche=='1')
{
$object[$li_i][3] = "";
}
elseif($ls_estche=='on')
{
$object[$li_i][3] = "";
}
$object[$li_i][4] = "";
}
$li_totrowusu = $_POST["totrows"];
for ($li_i=1;$li_i<$li_totrowusu;$li_i++)
{
$ls_codusu = trim($_POST["txtcodusu".$li_i]);
$ls_nomusu = $_POST["txtnomusu".$li_i];
$ls_apeusu = $_POST["txtapeusu".$li_i];
$object_usu[$li_i][1] = "";
$object_usu[$li_i][2] = "";
$object_usu[$li_i][3] = "";
$object_usu[$li_i][4] = "";
}
$object_usu[$li_totrowusu][1] = "";
$object_usu[$li_totrowusu][2] = "";
$object_usu[$li_totrowusu][3] = "";
$object_usu[$li_totrowusu][4] = "";
}
?>