$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(0,25);
				$ls_est5 = $io_function->uf_cerosizquierda(0,25);
			}
            $ls_estcla = $_POST["estcla"];
			$ls_documento   = $_POST["txtdocumento"];
			$ls_denominacion= $_POST["txtdenominacion"];
			$ls_procede     = $_POST["txtprocedencia"];
			$ls_operacionpre= $_POST["txtoperacion"];
			$ld_monto       = $_POST["txtmonto"];
			$ldec_monto=str_replace(".","",$ld_monto);
			$ldec_monto=str_replace(",",".",$ldec_monto);
			//$in_classcmp->io_int_scg->io_sql->begin_transaction();
			$lb_valido=$in_classcmp->uf_guardar_movimientos($arr_cmp,$ls_est1,$ls_est2,$ls_est3,$ls_est4,$ls_est5,$ls_cuenta,$ls_procede,$ls_descripcion,$ls_documento,$ls_operacionpre,0,$ldec_monto,"C",$ls_codban,$ls_ctaban,$ls_estcla);
			if($lb_valido)
			{
				$ls_codemp=$_SESSION["la_empresa"]["codemp"];
				$ls_codestpro[0]=$ls_est1;
                $ls_codestpro[1]=$ls_est2;
                $ls_codestpro[2]=$ls_est3;
                $ls_codestpro[3]=$ls_est4;
                $ls_codestpro[4]=$ls_est5;
                $ls_codestpro[5]=$ls_estcla;
				/*$lb_valido=$in_classcmp->uf_update_bsf_sigespcmp(0,$ls_codemp,$ls_procede,$ls_comprobante,
				                                                 $ld_fecdb,$ls_codban,$ls_ctaban,$la_security);				
                if($lb_valido)
				{
					$lb_valido=$in_classcmp->uf_update_bsf_spgdtcmp($ldec_monto,$ls_codemp,$ls_procede,$ls_comprobante,
																	$ld_fecdb,$ls_codban,$ls_ctaban,$ls_codestpro,
					 }
				$ld_disponible=0;				
				$lb_valido=$in_classcmp->uf_spg_select_disponibilidad($ls_cuenta,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,
				                                                      $ld_disponible,$ls_operacion,$ls_monto,$ls_estcla);
				if(($ld_disponible<$ls_monto)&&($lb_valido))
				{
				   $io_msg->message(" La Cuenta  ".trim($ls_cuenta)."  no tiene disponibilidad " ); 
				   $ls_cuentaplan= "";
				   $ls_denominacion= "";
				   $ls_descripcion= "";
				   $lb_valido=false;
				}
				else
				{
				    $lb_valido=$in_classcmp->uf_guardar_movimientos($arr_cmp,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3,$ls_codestpro4,$ls_codestpro5,
					                                                $ls_cuenta,$ls_procede,$ls_descripcion,$ls_documento,
																	$ls_operacion,0,$ls_monto,"C",$ls_codban,$ls_ctaban,
																	$ls_estcla);
					if (!$lb_valido)
					{
						$lb_valido=false;						
						//return false;
					}					
				}// fin de disponibilidad
				
			}// fin del for 
		}// fin del Valido (guardar detalle presupuestarios)	
		
		if ($lb_valido)
		{
			$totalcon=$_POST["totcon"];