if($li_estmodest==2)
{
$ls_est4 = $_POST["codestpro4"];
$ls_est5 = $_POST["codestpro5"];
$ls_est1=$io_function->uf_cerosizquierda($ls_est1,25);
$ls_est2=$io_function->uf_cerosizquierda($ls_est2,25);
$ls_est3=$io_function->uf_cerosizquierda($ls_est3,25);
$ls_est4=$io_function->uf_cerosizquierda($ls_est4,25);
$ls_est5=$io_function->uf_cerosizquierda($ls_est5,25);
}
else
{
$ls_est4 = $io_function->uf_cerosizquierda(0,25);
$ls_est5 = $io_function->uf_cerosizquierda(0,25);
}
$lb_valido=$in_classcmp->uf_validar_cuenta_presupuestaria($arr_cmp,$ls_est1,$ls_est2,$ls_est3,$ls_est4,$ls_est5,$ls_cuenta);
if (!$lb_valido)
{
$io_msg->message(" La Cuenta ".$ls_cuenta." no existe" );
$$ls_cuentaplan = "";
}
else
{
$$ls_cuentaplan = $_POST["txtcuenta"];
$ls_est1 = $_POST["codestpro1"];
$ls_est2 = $_POST["codestpro2"];
$ls_est3 = $_POST["codestpro3"];
$ls_estcla = $_POST["estcla"];
$ls_redfon =$_POST["renfon"];
$ls_codfuefin =$_POST["codfuefin"];
if($li_estmodest==2)
