{
	 $ls_disabled = "disabled";		 
   }
if (($li_estciespg==1 || $li_estciespi==1) && $li_estciescg==0 && $ls_operacion=="NUEVO")
   {
	 $io_msg->message("Ya fué procesado el Cierre Presupuestario, sólo serán cargadas Programaciones de Pago asociadas a Recepciones de Documentos netamente Contables !!!");	   
   }
elseif($li_estciespg==1 && $li_estciespi==1 && $li_estciescg==1 && $ls_operacion=="NUEVO")
   {
     $io_msg->message("Ya fué procesado el Cierre Contable, No pueden efectuarse movimientos, Contacte al Administrador del Sistema !!!");
   }
	
if ($ls_operacion=="VERIFICAR_VAUCHER")
   {
     $ls_chevaux = $_POST["txtchevau"];
	 $lb_existe  = $in_classmovbco->uf_select_voucher($ls_chevaux);
	 if ($lb_existe)
		{
		  $io_msg->message("Nº de Voucher ya existe, favor indicar otro");	
		  $ls_chevau="";		
		}
	 $ls_operacion="CARGAR_DT";
   }
	
if ($ls_operacion=="CARGAR_DT")
   {
     $io_emiche->uf_cargar_programaciones($ls_tipproben,$ls_provbene,$ls_codban,$ls_ctaban,$object,$li_rows,$ls_desmov,$ls_numordpagmin,$ls_codtipfon);
	 if ($li_rows>0 && !empty($ls_codban) && !empty($ls_ctaban))
		{
		  if ($_SESSION["la_empresa"]["confi_ch"]==1)
		     {
function uf_load_variables($aa_seguridad)
{
	//////////////////////////////////////////////////////////////////////////////
	//	     Function: uf_load_variables
	//		   Access: private
	//	  Description: Función que carga todas las variables necesarias en la página
	//	   Creado Por: Ing. Néstor Falcón.
	// Fecha Creación: 22/07/2007		   Fecha Última Modificación : 22/07/2007.
	//////////////////////////////////////////////////////////////////////////////
	global $li_totrows,$ls_filnam,$ls_numdoc,$ls_codban,$ls_ctaban,$ls_nomban,$ls_denctaban,$ls_cedben,$ls_nomben,$ls_docnum;
	global $ls_nombenalt,$ls_codope,$ls_scgcta,$ls_fecmov,$ld_mondoc,$li_totrowscg,$ls_conmov,$ls_disabled,$io_fun_scb,$ls_chevau;
	global $lb_existe,$ld_monret;
	
	$ls_codban    = $_POST["txtcodban"];
	$ls_nomban    = $_POST["txtnomban"];
	$ls_ctaban    = $_POST["txtctaban"];
	$ls_denctaban = $_POST["txtdenctaban"];
	$ls_cedben    = $_POST["txtcedben"];
	$ls_nomben    = $_POST["txtnomben"];
	$ls_nombenalt = $_POST["hidnombenalt"];
	$ls_numdoc    = $_POST["txtnumdoc"];
	$ls_docnum    = $_POST["hiddocnum"];	
	$ls_filnam    = $_POST["hidfilnam"];
	$li_totrows   = $_POST["hidtotrow"];
	$li_totrowscg = $_POST["hidtotrowscg"];
	$ls_codope    = $_POST["hidcodope"];
	$ld_monret    = $_POST["hidmonret"];	
	$lb_existe    = false;
	if ($ls_codope=='CH')
	   {
	   	 require_once("sigesp_scb_c_movbanco.php");
	     $io_movbco = new sigesp_scb_c_movbanco($aa_seguridad);
		 
		 $ls_disabled = "";
		 $ls_operacion = $io_fun_scb->uf_obteneroperacion();
		 if ($ls_operacion=='CARGAR_DT')
		    {
		      $ls_chevau = $io_movbco->uf_generar_voucher($_SESSION["la_empresa"]["codemp"]);
			}
	     elseif($ls_operacion=='PROCESAR')
		    {
			  $ls_chevau = $_POST["txtchevau"];
			  $lb_existe = $io_movbco->uf_select_voucher($ls_chevau);
		      if ($lb_existe)
		         {
			       require_once("../shared/class_folder/class_mensajes.php");
				   $io_msg = new class_mensajes();
				   
				   $io_msg->message("Nº de Voucher ya existe, favor indicar otro");
			       unset($io_msg);
				 }
	        }
	     unset($io_movbco);
	   }
	else
	   {
	     $ls_disabled = "disabled";
	   }
	$ls_fecmov    = $_POST["txtfecmov"];
	$ld_mondoc    = $_POST["txtmonmov"];
	$ls_conmov    = $_POST["txtconmov"];
	$ls_scgcta    = $_POST["hidscgcta"];//Cuenta Contable asociada a la Cuenta Bancaria.
	$li_estciespg = $_POST["hidestciespg"];//Estatus del Cierre Presupuestario de Gasto.
	$li_estciespi = $_POST["hidestciespi"];//Estatus del Cierre Presupuestario de Ingresos.
}