";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
$ls_logusr=$_SESSION["la_logusr"];
require_once("class_funciones_banco.php");
$io_fun_banco= new class_funciones_banco();
$io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_elimin_chq.php",$ls_permisos,$la_seguridad,$la_permisos);
$li_diasem = date('w');
switch ($li_diasem){
case '0': $ls_diasem='Domingo';
break;
case '1': $ls_diasem='Lunes';
break;
case '2': $ls_diasem='Martes';
break;
case '3': $ls_diasem='Miércoles';
break;
case '4': $ls_diasem='Jueves';
break;
case '5': $ls_diasem='Viernes';
break;
case '6': $ls_diasem='Sábado';
break;
}
?>
Eliminación de Cheques no Contabilizados
uf_conectar();
$io_sql = new class_sql($ls_conect);
$msg = new class_mensajes();
$fun = new class_funciones();
$lb_guardar = true;
$io_grid = new grid_param();
$ls_empresa = $_SESSION["la_empresa"]["codemp"];
require_once("sigesp_scb_c_elimin_chq.php");
$io_cheques=new sigesp_scb_c_elimin_chq($la_seguridad);
if( array_key_exists("operacion",$_POST))//Cuando aplicamos alguna operacion
{
$ls_operacion= $_POST["operacion"];
if(array_key_exists("rb_provbene",$_POST))
{
$ls_tipo=$_POST["rb_provbene"];
}
else
{
$ls_tipo="-";
}
}
else//Caso de apertura de la pagina o carga inicial
{
$ls_operacion= "NUEVO" ;
}
//Declaración de parametros del grid.
$titleProg[1]="";
$titleProg[2]="Documento";
$titleProg[3]="Concepto";
$titleProg[4]="Monto";
$titleProg[5]="Fecha";
$titleProg[6]="Proveedor";
$titleProg[7]="Beneficiario";
$titleProg[8]="Nombre Prov./Bene.";
$gridProg="grid_prog";
if($ls_operacion == "PROCESAR")
{
$li_total=$_POST["totdoc"];
$lb_valido=true;
$li_entro=0;
$io_cheques->SQL->begin_transaction();
$lb_conciliado=false;
$ls_tipo = "-";
for ($i=1;($i<=$li_total)&&($lb_valido);$i++)
{
if (array_key_exists("chksel".$i,$_POST))
{
$ls_estcon=$_POST["estcon".$i];
$ls_numdoc=$_POST["txtnumdoc".$i];
if ($ls_estcon==0)
{
$li_entro++;
$ls_codban = $_POST["codban".$i];
$ls_ctaban = $_POST["ctaban".$i];
$ls_codope = 'CH';
$ls_prov = $_POST["txtprov".$i];
$ls_estprosol='S';
$ls_estprogpago='P';
$lb_valido=$io_cheques->uf_procesar_eliminacion($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope,$ls_prov,$ls_tipo,$ls_estprosol,$ls_estprogpago);
}
else
{
$msg->message("El Cheque $ls_numdoc no puede ser eliminado, ya fue Conciliado");
$lb_conciliado=true;
}
}
}
if($li_entro>0)
{
if($lb_valido)
{
$io_cheques->SQL->commit();
$msg->message("Proceso realizado correctamente !!!");
$ls_operacion="NUEVO";
}
else
{
$io_cheques->SQL->rollback();
$msg->message("Error en operación !!!");
$ls_operacion="NUEVO";
}
}
else
{
if(!$lb_conciliado)
$msg->message("No se seleccionaron Cheques !!!");
$ls_operacion="NUEVO";
}
}
if($ls_operacion=="NUEVO")
{
$ls_mov_operacion="NC";
$ls_seleccionado="";
$ls_tipo='-';
$ls_desproben="Ninguno";
$lastspg = 0;
$array_fecha=getdate();
$ls_dia=$array_fecha["mday"];
$ls_mes=$array_fecha["mon"];
$ls_ano=$array_fecha["year"];
$ld_fecha=$fun->uf_cerosizquierda($ls_dia,2)."/".$fun->uf_cerosizquierda($ls_mes,2)."/".$ls_ano;
$lastscg=0;
$ls_documento="";
$ld_fechadesde="";
$ld_fechahasta="";
$ldec_total_prog=0;
$i=1;
$object[$i][1] = "";
$object[$i][2] = "";
$object[$i][3] = "";
$object[$i][4] = "";
$object[$i][5] = "";
$object[$i][6] = "";
$object[$i][7] = "";
$object[$i][8] = "";
$li_total=1;
}
if($ls_operacion=="CAMBIO_TIPO")
{
$ld_fechadesde = $_POST["txtfechadesde"];
$ld_fechahasta = $_POST["txtfechahasta"];
$ls_documento = $_POST["txtdocumento"];
$rs_data = $io_cheques->uf_cargar_cheques_filtrados($ls_empresa,$ls_tipo,$ld_fechadesde,$ld_fechahasta,$ls_documento,$lb_valido);
if ($lb_valido)
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
$li_i = 0;
while($row=$io_sql->fetch_row($rs_data))
{
$li_i++;
$ls_numdoc = $row["numdoc"];
$ld_monmov = $row["monto"];
$ld_fecmov = $fun->uf_formatovalidofecha($row["fecmov"]);
$ld_fecmov = $fun->uf_convertirfecmostrar($ld_fecmov);
$ls_codpro = $row["cod_pro"];
$ls_cedben = $row["ced_bene"];
$ls_nomproben = $row["nomproben"];
$ls_codban = $row["codban"];
$ls_ctaban = $row["ctaban"];
$ls_conmov = $row["conmov"];
$ls_estcon = $row["estcon"];
$ld_fecpropag = '';
$object[$li_i][1] = "";
$object[$li_i][2] = " ";
$object[$li_i][3] = "";
$object[$li_i][4] = "";
$object[$li_i][5] = "";
$object[$li_i][6] = "";
$object[$li_i][7] = "";
$object[$li_i][8] = "";
}
$li_total = $li_i;
}
else
{
$li_i = 1;
$object[$li_i][1] = "";
$object[$li_i][2] = "";
$object[$li_i][3] = "";
$object[$li_i][4] = "";
$object[$li_i][5] = "";
$object[$li_i][6] = "";
$object[$li_i][7] = "";
$object[$li_i][8] = "";
$li_total=1;
}
}
}
if ($ls_tipo=='P')
{
$rb_prov = "checked";
$rb_bene = "";
}
elseif($ls_tipo=='B')
{
$rb_prov="";
$rb_bene="checked";
}
else
{
$rb_prov = "";
$rb_bene = "";
}
?>