";
print "location.href='../sigesp_inicio_sesion.php'";
print "";
}
?>
Entrada de Movimientos Contables
uf_conectar();
$fun = new class_funciones();
$io_sql = new class_sql($con);
$arre = $_SESSION["la_empresa"];
$ls_contintmovban= $_SESSION["la_empresa"]["contintmovban"];
$ls_empresa = $arre["codemp"];
if (array_key_exists("operacion",$_POST))
{
$ls_operacion = $_POST["operacion"];
$ls_cuentaplan = $_POST["txtcuenta"];
$ls_procedencia= $_POST["txtprocedencia"];
$ls_descripcion= $_POST["txtdescripcion"];
$ldec_monto = $_POST["txtmonto"];
$ls_denominacion=$_POST["txtdenominacion"];
$ls_mov_document=$_POST["mov_document"];
$ls_mov_procede=$_POST["procede"];
$ld_fecha=$_POST["fecha"];
$ls_provbene=$_POST["provbene"];
$ls_tipo=$_POST["tipo"];
$ls_mov_descripcion=$_POST["descripcion"];
$ls_codban=$_POST["codban"];
$ls_ctaban=$_POST["ctaban"];
$ls_cuenta_scg=$_POST["cuenta_scg"];
$ls_codope=$_POST["mov_operacion"];
$ldec_monto_mov=$_POST["monto"];
$ldec_objret=$_POST["objret"];
$ldec_retenido=$_POST["retenido"];
$ls_chevau=$_POST["chevau"];
$li_estint=$_POST["estint"];
$li_estcob=$_POST["estcob"];
$li_cobrapaga=$_POST["cobrapaga"];
$ls_estbpd=$_POST["estbpd"];
$ls_nomproben=$_POST["txtnomproben"];
$ls_estmov=$_POST["estmov"];
$ls_codconmov=$_POST["codconmov"];
$ls_estreglib=$_POST["tip_mov"];
$ls_opener =$_POST["opener"];
$ls_estdoc =$_POST["estdoc"];
$ls_codfuefin =$_POST["codfuefin"];
$ls_anticipo= $_POST["anticipo"];
$ls_codtipfon = $_POST["hidcodtipfon"];
$ls_numordpagmin = $_POST["hidnumordpagmin"];
$ls_controlnocontabil = $_POST["nocontabiliza"];
if ($ls_contintmovban==0)
{
$ls_numconint=" ";
}
else
{
$ls_numconint=$_POST["numconint"];
}
$ls_reglibro=$_POST["reglibro"];
}
else
{
$ls_operacion="";
$ls_cuentaplan = "";
$ls_procedencia= $_GET["txtprocedencia"];
$ls_denominacion="";
$ld_fecha = "";
$ldec_monto = "";
$ls_mov_document=$_GET["mov_document"];
$ls_mov_procede=$_GET["procede"];
$ld_fecha=$_GET["fecha"];
$ls_provbene=$_GET["provbene"];
$ls_tipo=$_GET["tipo"];
$ls_mov_descripcion=$_GET["descripcion"];
$ls_descripcion= $ls_mov_descripcion;
$ls_codban=$_GET["codban"];
$ls_ctaban=$_GET["ctaban"];
$ls_cuenta_scg=$_GET["cuenta_scg"];
$ls_codope=$_GET["mov_operacion"];
$ldec_monto_mov=$_GET["monto"];
$ldec_objret=$_GET["objret"];
$ldec_retenido=$_GET["retenido"];
$ls_chevau=$_GET["chevau"];
$li_estint=$_GET["estint"];
$li_estcob=$_GET["estcob"];
$li_cobrapaga=$_GET["cobrapaga"];
$ls_estbpd=$_GET["estbpd"];
$ls_nomproben=$_GET["txtnomproben"];
$ls_estmov=$_GET["estmov"];
$ls_codconmov=$_GET["codconmov"];
$ls_estreglib=$_GET["tip_mov"];
$ls_opener =$_GET["opener"];
$ls_estdoc =$_GET["estdoc"];
$ls_codfuefin =$_GET["codfuefin"];
$ls_anticipo= $_GET["anticipo"];
$ls_codtipfon = $_GET["codtipfon"];
$ls_numordpagmin = $_GET["numordpagmin"];
$ls_controlnocontabil = $_GET["nocontabiliza"];
if ($ls_contintmovban==0)
{
$ls_numconint=" ";
}
else
{
$ls_numconint=$_GET["numconint"];
}
$ls_reglibro=$_GET["reglibro"];
}
if($ls_codfuefin=="")
{
$ls_codfuefin="--";
}
$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",$ls_opener,$ls_permisos,$la_seguridad,$la_permisos);
require_once("sigesp_scb_c_movbanco.php");
$in_classmovbanco=new sigesp_scb_c_movbanco($la_seguridad);
if(($ls_codope=="ND")||($ls_codope=="RE")||($ls_codope=="CH"))
{
$ls_operacioncon="H";
$lb_seldeb="selected";
$lb_selhab="";
}
else
{
$ls_operacioncon="D";
$lb_seldeb="";
$lb_selhab="selected";
}
if ($ls_operacion=="GUARDAR")
{
$ldec_monto = $_POST["txtmonto"];
if ($ls_tipo=="P")
{
$ls_codpro = $ls_provbene;
$ls_cedbene = "----------";
}
else
{
$ls_cedbene = $ls_provbene;
$ls_codpro = "----------";
}
$ldec_objret = str_replace(".","",$ldec_objret);
$ldec_objret = str_replace(",",".",$ldec_objret);
$ls_nomproben = $_POST["txtnomproben"];
$ls_anticipo = $_POST["anticipo"];
if ($ls_anticipo=='1')
{
$ls_docant = '---------------';
$ls_monamo = 0;
$lb_valido = $in_classmovbanco->uf_guardar_automatico2($ls_codban,$ls_ctaban,$ls_mov_document,$ls_codope,$ld_fecha,$ls_mov_descripcion,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_monto_mov,$ldec_objret, $ldec_retenido,$ls_chevau,$ls_estmov,$li_estint,$li_cobrapaga,$ls_estbpd,$ls_mov_procede,' ',$ls_estdoc,$ls_tipo,$ls_codfuefin, $ls_anticipo,$ls_docant,
$ls_monamo,$li_estcob);
}
else
{
$lb_valido=$in_classmovbanco->uf_guardar_automatico($ls_codban,$ls_ctaban,$ls_mov_document,$ls_codope,$ld_fecha,$ls_mov_descripcion,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_monto_mov,$ldec_objret, $ldec_retenido,$ls_chevau,$ls_estmov,$li_estint,$li_cobrapaga,$ls_estbpd,$ls_mov_procede,' ',$ls_estdoc,$ls_tipo,$ls_codfuefin,$ls_numordpagmin,$ls_codtipfon,$li_estcob,$ls_numconint,$ls_reglibro);
}
$arr_movbco["codban"] = $ls_codban;
$arr_movbco["ctaban"] = $ls_ctaban;
$arr_movbco["mov_document"] = $ls_mov_document;
$ld_fecdb = $fun->uf_convertirdatetobd($ld_fecha);
$arr_movbco["codope"] = $ls_codope;
$arr_movbco["fecha"] = $ld_fecha;
$arr_movbco["codpro"] = $ls_codpro;
$arr_movbco["cedbene"] = $ls_cedbene;
$arr_movbco["monto_mov"] = $ldec_monto_mov;
$arr_movbco["objret"] = $ldec_objret;
$arr_movbco["retenido"] = $ldec_retenido;
$arr_movbco["estmov"] = $ls_estmov;
$ls_codded = "00000";
if ($lb_valido)
{
$lb_valido = $in_classmovbanco->uf_procesar_dt_contable($arr_movbco,$ls_cuenta_scg,$ls_procedencia,$ls_mov_descripcion,$ls_mov_document,$ls_operacioncon,$ldec_monto_mov,$ldec_objret,true,$ls_codded);
$ls_cuenta = $_POST["txtcuenta"];
$ls_denominacion = $_POST["txtdescripcion"];
$ls_operacioncon = $_POST["txtoperacion"];
$ld_monto = $_POST["txtmonto"];
$ldec_monto = str_replace(".","",$ld_monto);
$ldec_monto = str_replace(",",".",$ldec_monto);
if ($lb_valido)
{
$lb_valido = $in_classmovbanco->uf_procesar_dt_contable($arr_movbco,$ls_cuenta,$ls_procedencia,$ls_descripcion,$ls_mov_document,$ls_operacioncon,$ldec_monto,$ldec_objret,false,$ls_codded);
///------------------------------CUANDO ES UN ANTICIPO--------------------------------------------------------
if (($ls_anticipo=='1')&&($ls_operacioncon=="D"))
{
$lb_valido=$in_classmovbanco->uf_procesar_anticipo($arr_movbco,$ls_cuenta,$ls_procedencia,$ls_descripcion,$ls_mov_document,$ls_operacioncon,$ldec_monto,$ldec_objret);
}
//------------------------------------------------------------------------------------------------------------
if (!$lb_valido)
{
$in_classmovbanco->io_sql->rollback();
$io_msg->message($in_classmovbanco->is_msg_error);
}
else
{
$in_classmovbanco->io_sql->commit();
$ls_estdoc='C';
print "";
}
}
else
{
$in_classmovbanco->io_sql->rollback();
$io_msg->message($in_classmovbanco->is_msg_error);
}
}
else
{
$in_classmovbanco->io_sql->rollback();
$io_msg->message($in_classmovbanco->is_msg_error);
}
}
?>