| Caja y Banco | |
|
|||||||||||||||
|
|||||||||||||||
|
|
|
|
|
|
|
|||||||||
";
global $li_temp_spg;
$li_temp_spg=1;
$objectSpg[$li_temp_spg][1] = "";
$objectSpg[$li_temp_spg][2] = "";
$objectSpg[$li_temp_spg][3] = "";
$objectSpg[$li_temp_spg][4] = "";
$objectSpg[$li_temp_spg][5] = "";
$objectSpg[$li_temp_spg][6] = "";
$objectSpg[$li_temp_spg][7] = "";
$objectSpg[$li_temp_spg][8] = "";
global $li_temp_spi;
$li_temp_spi=1;
$objectSpi[$li_temp_spi][1] = "";
if ($li_estpreing==1)
{
$objectSpi[$li_temp_spi][2] = "";
$objectSpi[$li_temp_spi][3] = "";
$objectSpi[$li_temp_spi][4] = "";
$objectSpi[$li_temp_spi][5] = "";
$objectSpi[$li_temp_spi][6] = "";
$objectSpi[$li_temp_spi][7] = "";
$objectSpi[$li_temp_spi][8] = "";
}
else
{
$objectSpi[$li_temp_spi][2] = "";
$objectSpi[$li_temp_spi][3] = "";
$objectSpi[$li_temp_spi][4] = "";
$objectSpi[$li_temp_spi][5] = "";
$objectSpi[$li_temp_spi][6] = "";
$objectSpi[$li_temp_spi][7] = "";
}
}
$title2[1]="Cuenta"; $title2[2]="Documento"; $title2[3]="Descripción"; $title2[4]="Procede"; $title2[5]="Debe/Haber"; $title2[6]="Monto"; $title2[7]="Deduccion"; $title2[8]="Edición";
$title[1]="Cuenta"; $title[2]="Programático"; $title[3]="Documento"; $title[4]="Descripción"; $title[5]="Procede"; $title[6]="Operación"; $title[7]="Monto"; $title[8]="Edición";
$titleSpi[1] = "Cuenta";
if ($li_estpreing==1)
{
$titleSpi[2] = "Programático";
$titleSpi[3] = "Documento";
$titleSpi[4] = "Descripción";
$titleSpi[5] = "Procede";
$titleSpi[6] = "Operación";
$titleSpi[7] = "Monto";
$titleSpi[8] = "Edición";
}
else
{
$titleSpi[2] = "Descripción";
$titleSpi[3] = "Procede";
$titleSpi[4] = "Documento";
$titleSpi[5] = "Operación";
$titleSpi[6] = "Monto";
$titleSpi[7] = "Edición";
}
$gridSpi="grid_Spi";
$grid2="gridscg";
$grid1="grid_SPG";
if($ls_operacion == "NUEVO")
{
$ls_numcontint="";
$ls_operacion= "" ;
uf_nuevo();
$ls_numcarord="";
$ls_docmov="";
//Genera Numero
require_once("../shared/class_folder/sigesp_c_generar_consecutivo.php");
$io_keygen= new sigesp_c_generar_consecutivo();
$ls_numcontint= $io_keygen->uf_generar_numero_nuevo("SCB","scb_movbco","numconint","SCBBRE",15,"valinimovban","","");
if($ls_numcontint===false)
{
print "";
}
unset($io_keygen);
//Genera Numeros
}
if($ls_operacion=="PRINT_CARTAORDEN")
{
$ls_tipo=$_POST["rb_provbene"];
uf_cargar_dt();
$ls_codigo=$in_classconfig->uf_buscar_seleccionado();
if ($ls_codigo!="000")
{
$ls_pagina = "reportes/".$ls_report."?codigo=$ls_codigo&codban=$ls_codban&ctaban=$ls_cuenta_banco&numdoc=$ls_numcarord&chevau=&codope=ND&tipproben=$ls_tipo";
}
else
$ls_pagina="reportes/sigesp_scb_rpp_voucher_pdf.php?codban=$ls_codban&ctaban=$ls_cuenta_banco&numdoc=$ls_docmov&chevau=&codope=ND";
?>
benefalt=$_POST["txtbenealt"];
$in_classmovbco->codmon = $_POST["txtcodmon"];
$in_classmovbco->denmon = $_POST["txtdenmon"];
$in_classmovbco->tascam = $io_conexiones->formato_numerico_us($_POST['txttascamordcom']);
$in_classmovbco->tascam = $in_classmovbco->tascam?$in_classmovbco->tascam:'0';
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_guardar_automatico($ls_codban,$ls_cuenta_banco,$ls_docmov,$ls_mov_operacion,$ld_fecha,$ls_desmov,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_desproben,$ldec_montomov,$ldec_monobjret,$ldec_montoret,$ls_chevau,$ls_estmov,$li_estint,"$ls_opepre",$ls_estbpd,'SCBMOV',$ls_estreglib,$ls_estdoc,$ls_tipo,$ls_codfuefin,$ls_numordpagmin,$ls_codtipfon,$li_estcob,$ls_numcontint,$li_esttranoreglib);
if($lb_valido)
{
$in_classmovbco->io_sql->commit();
}
else
{
$in_classmovbco->io_sql->rollback();
}
$msg->message($in_classmovbco->is_msg_error);
uf_cargar_dt();
}
if ($ls_operacion == "ELIMINAR")
{
$lb_valido = true;
$in_classmovbco->io_sql->begin_transaction();
if ($ls_mov_operacion=='DP' || $ls_mov_operacion=='NC')
{
$ls_numordpagmin=trim($ls_numordpagmin);
if (!empty($ls_numordpagmin) || !empty($ls_codtipfon))
{
$lb_valido = $in_classmovbco->uf_load_documentos_asociados($ls_numordpagmin,$ls_codtipfon);
if (!$lb_valido)
{
uf_cargar_dt();
}
}
}
if ($lb_valido)
{
$lb_valido = $in_classmovbco->uf_delete_all_movimiento($ls_docmov,$ls_codban,$ls_cuenta_banco,$ls_mov_operacion,$ls_estmov);
if ($lb_valido)
{
$in_classmovbco->io_sql->commit();
}
else
{
$in_classmovbco->io_sql->rollback();
}
$msg->message($in_classmovbco->is_msg_error);
$ls_docmov="";
uf_nuevo();
}
}
if($ls_operacion=="DELETESCG")
{
$li_row_delete = $_POST["delete_scg"];
$ls_codded = trim($_POST["txtcodded".$li_row_delete]);
$ls_cuentascg = trim($_POST["txtcontable".$li_row_delete]);
$ls_debhab = trim($_POST["txtdebhab".$li_row_delete]);
$ls_numdoc = $_POST["txtdocscg".$li_row_delete];
$ldec_montoscg = $_POST["txtmontocont".$li_row_delete];
$ldec_montoscg = str_replace(".","",$ldec_montoscg);
$ldec_montoscg = str_replace(",",".",$ldec_montoscg);
$arr_movbco["codban"]=$ls_codban;
$arr_movbco["ctaban"]=$ls_cuenta_banco;
$arr_movbco["mov_document"]=$ls_docmov;
$ld_fecdb=$fun->uf_convertirdatetobd($ld_fecha);
$arr_movbco["codope"]=$ls_mov_operacion;
$arr_movbco["fecha"]=$ld_fecha;
$arr_movbco["estmov"]=$ls_estmov;
if($ls_tipo=="P")
{
$arr_movbco["codpro"] =$ls_provbene;
$arr_movbco["cedbene"]="----------";
}
else
{
$arr_movbco["cedbene"]=$ls_provbene;
$arr_movbco["codpro"] ="----------";
}
$arr_movbco["monto_mov"]=$ldec_montomov;
$arr_movbco["objret"] =$ldec_monobjret;
$arr_movbco["retenido"] =$ldec_montoret;
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_delete_dt_scg($ls_docmov,$ls_codban,$ls_cuenta_banco,$ls_mov_operacion,$ls_estmov,$ls_numdoc,$ls_cuentascg,$ls_debhab,$ls_codded,$ldec_montoscg,'SCG');
if($ls_codded!="00000")
{
if(($ls_mov_operacion=="ND")||($ls_mov_operacion=="RE")||($ls_mov_operacion=="CH"))
{
$ls_operacioncon="H";
}
else
{
$ls_operacioncon="D";
}
$ldec_monto=$ldec_montoscg;
$lb_valido=$in_classmovbco->uf_update_montodelete($arr_movbco,$ls_cuenta_scg,'SCBMOV',$ls_desmov,$ls_docmov,$ls_operacioncon,$ldec_montoscg,$ldec_monobjret,'00000');
$ldec_montoret=$ldec_montoret-$ldec_monto;
}
$msg->message($in_classmovbco->is_msg_error);
if($lb_valido)
{
$in_classmovbco->io_sql->commit();
}
else
{
$in_classmovbco->io_sql->rollback();
}
uf_cargar_dt();
}
if ($ls_operacion=="DELETESPG")
{
$li_row_delete = $_POST["delete_spg"];
$ls_cuenta_spg = trim($_POST["txtcuenta".$li_row_delete]);
$ls_programatica = trim($_POST["txtprogramatico".$li_row_delete]);
$ls_estcla = trim($_POST["hidestcla".$li_row_delete]);
$ls_codestpro1 = substr($ls_programatica,0,$li_loncodestpro1);
$ls_codestpro2 = substr($ls_programatica,$li_loncodestpro1+1,$li_loncodestpro2);
$ls_codestpro3 = substr($ls_programatica,$li_loncodestpro1+$li_loncodestpro2+2,$li_loncodestpro3);
$ls_codestpro1 = trim(str_pad($ls_codestpro1,25,0,0));
$ls_codestpro2 = trim(str_pad($ls_codestpro2,25,0,0));
$ls_codestpro3 = trim(str_pad($ls_codestpro3,25,0,0));
if ($as_estmodest==2)
{
$ls_codestpro4 = substr($ls_programatica,$li_loncodestpro1+$li_loncodestpro2+$li_loncodestpro3+3,$li_loncodestpro4);
$ls_codestpro5 = substr($ls_programatica,$li_loncodestpro1+$li_loncodestpro2+$li_loncodestpro3+$li_loncodestpro4+4,$li_loncodestpro5);
$ls_codestpro4 = trim(str_pad($ls_codestpro4,25,0,0));
$ls_codestpro5 = trim(str_pad($ls_codestpro5,25,0,0));
}
else
{
$ls_codestpro4 = $ls_codestpro5 = str_pad("",25,0,0);
}
$ls_programatica = $ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5;
$ls_numdoc = $_POST["txtdocumento".$li_row_delete];
$ls_operacion = $_POST["txtoperacion".$li_row_delete];
$ldec_montospg = $_POST["txtmonto".$li_row_delete];
$ldec_montospg = str_replace(".","",$ldec_montospg);
$ldec_montospg = str_replace(",",".",$ldec_montospg);
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_delete_dt_spg($ls_docmov,$ls_codban,$ls_cuenta_banco,$ls_mov_operacion,$ls_estmov,$ls_numdoc,$ls_cuenta_spg,$ls_operacion,$ls_programatica,$ldec_montospg,$ls_estcla);
$msg->message($in_classmovbco->is_msg_error);
if ($lb_valido)
{
$in_classmovbco->io_sql->commit();
}
else
{
$in_classmovbco->io_sql->rollback();
}
uf_cargar_dt();
}
if($ls_operacion=="DELETESPI")
{
$li_row_delete = $_POST["delete_spi"];
$ls_cuenta_spi = trim($_POST["txtcuentaspi".$li_row_delete]);
$ls_numdoc = $_POST["txtdocspi".$li_row_delete];
$ls_operacion = trim($_POST["txtopespi".$li_row_delete]);
$ldec_montospg = $_POST["txtmontospi".$li_row_delete];
if ($li_estpreing==1)
{
$ls_estcla = trim($_POST["hidestclaspi".$li_row_delete]);
$ls_codestpro = $_POST["txtcodestprospi".$li_row_delete];
$ls_codestpro1 = substr($ls_codestpro,0,$li_loncodestpro1);
$ls_codestpro2 = substr($ls_codestpro,$li_loncodestpro1+1,$li_loncodestpro2);
$ls_codestpro3 = substr($ls_codestpro,$li_loncodestpro1+$li_loncodestpro2+2,$li_loncodestpro3);
$ls_codestpro1 = trim(str_pad($ls_codestpro1,25,0,0));
$ls_codestpro2 = trim(str_pad($ls_codestpro2,25,0,0));
$ls_codestpro3 = trim(str_pad($ls_codestpro3,25,0,0));
if ($as_estmodest==2)
{
$ls_codestpro4 = substr($ls_codestpro,$li_loncodestpro1+$li_loncodestpro2+$li_loncodestpro3+3,$li_loncodestpro4);
$ls_codestpro5 = substr($ls_codestpro,-$li_loncodestpro5);
$ls_codestpro4 = trim(str_pad($ls_codestpro4,25,0,0));
$ls_codestpro5 = trim(str_pad($ls_codestpro5,25,0,0));
}
else
{
$ls_codestpro4 = $ls_codestpro5 = str_pad("",25,0,0);
}
}
else
{
$ls_estcla = '-';
$ls_codestpro1 = $ls_codestpro2 = $ls_codestpro3 = $ls_codestpro4 = $ls_codestpro5 = str_pad('',25,'-',0);
}
$ldec_montospg = str_replace(".","",$ldec_montospg);
$ldec_montospg = str_replace(",",".",$ldec_montospg);
$in_classmovbco->io_sql->begin_transaction();
$lb_valido=$in_classmovbco->uf_delete_dt_spi($ls_docmov,$ls_codban,$ls_cuenta_banco,$ls_mov_operacion,$ls_estmov,$ls_numdoc,$ls_cuenta_spi,$ls_operacion,$ldec_montospg,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,$ls_estcla);
$msg->message($in_classmovbco->is_msg_error);
if($lb_valido)
{
$in_classmovbco->io_sql->commit();
}
else
{
$in_classmovbco->io_sql->rollback();
}
uf_cargar_dt();
}
if($ls_operacion == "CAMBIO_OPERA" || $ls_operacion == "CAMBIO_CONCEPTO")//MODIFICADO POR OFIMATICA DE VENEZUELA EL 01-06-2011 SE AGREGA OPERACION CAMBIO_CONCEPTO
{
uf_cargar_dt();
}
if($ls_operacion == "VERIFICAR_VAUCHER")
{
$ls_chevaux=$_POST["txtchevau"];
$lb_existe=$in_classmovbco->uf_select_voucher($ls_chevaux);
if($lb_existe)
{
$msg->message("Nº de Voucher ya existe, favor indicar otro");
uf_cargar_dt();
}
else
{
uf_cargar_dt();
$ls_chevau=$ls_chevaux;
}
}
if($ls_operacion == "TIPO_CONCEPTO")
{
$ls_mov_operacion=$_POST["cmboperacion"];
$ls_codcon=str_pad($_POST["codcon"],3,"0",0);
if(!empty($ls_codcon))
{
$ls_codconmov=$ls_codcon;
}
$funciones_banco->buscar_banco_cta($ls_codcon, $ls_codban, $ls_nomban, $ls_ctaban, $ls_denctaban);
uf_cargar_dt();
}
if($ls_mov_operacion=='ND')
{
$lb_nd="selected";
$lb_nc="";
$lb_dp="";
$lb_re="";
$lb_ch="";
if($li_esttranoreglib==1)
{
$lb_chktranoreglib="checked";
}
else
{
$lb_chktranoreglib="";
}
}
if($ls_mov_operacion=='NC')
{
$lb_nd="";
$lb_nc="selected";
$lb_dp="";
$lb_re="";
$lb_ch="";
if($li_estint==1)
{
$lb_checked="checked";
}
else
{
$lb_checked="";
}
if($li_estcob==1)
{
$lb_checkedcob="checked";
}
else
{
$lb_checkedcob="";
}
if($li_esttranoreglib==1)
{
$lb_chktranoreglib="checked";
}
else
{
$lb_chktranoreglib="";
}
}
if($ls_mov_operacion=='DP')
{
$lb_nd="";
$lb_nc="";
$lb_dp="selected";
$lb_re="";
$lb_ch="";
if($li_esttranoreglib==1)
{
$lb_chktranoreglib="checked";
}
else
{
$lb_chktranoreglib="";
}
}
if($ls_mov_operacion=='RE')
{
$lb_nd="";
$lb_nc="";
$lb_dp="";
$lb_re="selected";
$lb_ch="";
}
if($ls_mov_operacion=='CH')
{
$lb_nd="";
$lb_nc="";
$lb_dp="";
$lb_re="";
$lb_ch="selected";
if(($ls_operacion=="NUEVO")||($ls_operacion=="CAMBIO_OPERA")||($ls_operacion=="CAMBIO_CONCEPTO"))//MODIFICADO POR OFIMATICA DE VENEZUELA EL 01-06-2011 SE AGREGA OPERACION CAMBIO_CONCEPTO
{
$ls_chevau=$in_classmovbco->uf_generar_voucher($ls_empresa);
}
}
if($ls_tipo=='-')
{
$rb_n="checked";
$rb_p="";
$rb_b="";
}
if($ls_tipo=='P')
{
$rb_n="";
$rb_p="checked";
$rb_b="";
}
if($ls_tipo=='B')
{
$rb_n="";
$rb_p="";
$rb_b="checked";
}
if($ls_estdoc=='C')
{
$ls_readOnly_doc="readonly";
$ls_readOnly_ban="readonly";
$ls_readOnly_cta="readonly";
$ls_readOnly_ctascg="readonly";
$ls_readOnly_ope="onClick='return false'";
}
else
{
$ls_readOnly_doc="";
$ls_readOnly_ban="";
$ls_readOnly_cta="";
$ls_readOnly_ctascg="";
$ls_readOnly_ope="";
}
?>