Ejemplo n.º 1
0
					  $object[$li_i][4] = "<input type=text     name=txtsaldo".$li_i."     id=txtsaldo".$li_i."     value='".number_format($ld_montotsal,2,",",".")."' class=sin-borde readonly style=text-align:right  size=18 maxlength=18 onClick=javascript:uf_registrar($li_i,'$ls_numsol','$ld_montotsal','$ls_fecemisol','$ls_codproben',this);><input type=hidden name=hidmondis".$li_i." value='".number_format($ld_totmondis,2,',','.')."';>";
					  $object[$li_i][5] = "<input type=text     name=txtfecsol".$li_i."    id=txtfecsol".$li_i."    value='".$ls_fecemisol."'                          class=sin-borde readonly style=text-align:center size=10 maxlength=10 onClick=javascript:uf_registrar($li_i,'$ls_numsol','$ld_montotsal','$ls_fecemisol','$ls_codproben',this);>"; 
					  $object[$li_i][6] = "<input type=hidden   name=txtcodproben".$li_i." id=txtcodproben".$li_i." value='".$ls_codproben."'><input type=text name=txtnomprovbene".$li_i." value='".$ls_nomproben."' title='".$ls_nomproben."'    class=sin-borde readonly style=text-align:left size=60 maxlength=60 onClick=javascript:uf_registrar($li_i,'$ls_numsol','$ld_montotsal','$ls_fecemisol','$ls_codproben',this);>";			
					  $object[$li_i][7] = "<input type=text     name=txtfecprog".$li_i."   id=txtfecprog".$li_i."   value=''  class=sin-borde readonly style=text-align:center size=10 maxlength=10 onClick=javascript:uf_registrar($li_i,'$ls_numsol','$ld_montotsal','$ls_fecemisol','$ls_codproben',this);><input type=hidden name=hidprocede".$li_i." value='".$ls_procede."' class=sin-borde readonly style=text-align:left size=10 maxlength=6;>";
					}//fin del if ($ls_valor==0 && $li_estciescg==0)					
			     $rs_solpag->MoveNext();
			   }
		  $li_totsolpag = $li_i;
		  if ($li_i==0)
		     {
               uf_clear_grid(&$li_totsolpag,&$object);
			 }    
		}
	 else
	    {
          uf_clear_grid(&$li_totsolpag,&$object);
		}
   }

function uf_clear_grid(&$li_totsolpag,&$object)
{
  ////////////////////////////////////////////////////////////////////////////////////////////////////////
  // Funcion     = uf_clear_grid.
  // Descripcion = Método que permite imprimir el grid en blanco cuando no haya registros para mostrar.
  // Creación    = 10/09/2008.
  // Creado Por  = Ing. Néstor Falcón.
  ///////////////////////////////////////////////////////////////////////////////////////////////////////
  global $ls_disabled,$ldec_total_prog;
   
  $li_totsolpag = $i = 1;
  $ldec_total_prog = 0;
	$la_datos["cedben"] = $ls_cedben;
	$la_datos["nomben"] = $ls_nomben;
	$la_datos["nombenalt"] = $ls_nombenalt;
	$la_datos["fecmov"] = $ls_fecmov;
	$la_datos["mondoc"] = $ld_mondoc;
	$la_datos["conmov"] = $ls_conmov;	
	$la_datos["chevau"] = $ls_chevau;
	$la_datos["docnum"] = $ls_docnum;
	$la_datos["monret"] = $ld_monret;
	if (!$lb_existe)
	   {
		 $lb_valido = $io_scb->uf_procesar_liquidacion($ls_rutfil.'/'.$ls_filnam,$la_datos,$li_totrows,$li_totrowscg,$la_seguridad);
		 if ($lb_valido)
		    {
			  uf_limpiar_variables();
			  uf_clear_grid();
		    }
	   }
  break;
}
?>
<form id="sigesp_scb_p_liquidacion_creditos.php" name="form1" method="post" action="">
<?php
//////////////////////////////////////////////         SEGURIDAD               /////////////////////////////////////////////
	$io_fun_scb->uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'");
	unset($io_fun_scb);
//////////////////////////////////////////////         SEGURIDAD               /////////////////////////////////////////////
?>
  <table width="557" border="0" align="center" cellpadding="0" cellspacing="0" class="formato-blanco">
    <tr class="titulo-ventana">
      <td height="22" colspan="5" class="titulo-ventana"><input name="hidmesabi" type="hidden" id="hidmesabi" value="true" />