function uf_load_servicios($as_numcot,$as_codpro)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_load_servicios
// Access: private
// Arguments: as_numsol // Numero de solicitud
// Description: Método que busca los servicios de la solicitud y los imprime
// Creado Por: Ing. Néstor Falcon.
// Fecha Creación: 17/03/2007 Fecha Última Modificación :
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_grid;
//Titulos de la tabla de Detalle Servicios
$lo_title[1] = "Código";
$lo_title[2] = "Denominación";
$lo_title[3] = "Cantidad";
$lo_title[4] = "Precio";
$lo_title[5] = "Subtotal";
$lo_title[6] = "Cargos";
$lo_title[7] = "Total";
$lo_title[8] = "Calidad";
$lo_title[9] = "";
require_once("sigesp_soc_c_registro_cotizacion.php");
$io_registro = new sigesp_soc_c_registro_cotizacion("../../");
$rs_data = $io_registro->uf_load_servicios($as_numcot,$as_codpro);
$li_fila=0;
$ls_excsel = 'selected';
$ls_buesel = '';
$ls_regsel = '';
$ls_malsel = '';
$ls_mumsel = '';
$ls_opcion = '';
$ls_disabled = '';
$lb_valido = true;
while($row=$io_registro->io_sql->fetch_row($rs_data))
{
$li_fila++;
$ls_codser = $row["codser"];
$ld_porcre = $io_registro->uf_load_porcentaje_credito($ls_codser,'S',$lb_valido);//Porcentaje del Crédito en caso de tenerlo.
$ls_denser = $row["denser"];
$ld_canser = number_format($row["canser"],2,',','.');
if ($li_fila==1)//Estatus del Registro de la Cotizacion.
{
$ls_estcot = $row["estcot"];
if ($ls_estcot==0)
{
$ls_opcion = "onKeyPress=return(ue_formatonumero(this,'.',',',event)); onBlur=ue_procesar_monto('S','".$li_fila."');";
}
else
{
$ls_opcion = "readonly";
$ls_disabled = "disabled";
}
}
$ls_calser = $row["nivcalser"];
switch ($ls_calser){
case 'E':
$ls_excsel = 'selected';
break;
case 'B':
$ls_buesel = 'selected';
break;
case 'R':
$ls_regsel = 'selected';
break;
case 'M':
$ls_malsel = 'selected';
break;
case 'P':
$ls_mumsel = 'selected';
break;
}
$ld_preser = number_format($row["monuniser"],2,',','.');
$ld_subser = number_format($row["monsubser"],2,',','.');
$ld_creser = number_format($row["moniva"],2,',','.');
$ld_totser = number_format($row["montotser"],2,',','.');
$lo_object[$li_fila][1] = "<input type=text name=txtcodser".$li_fila." id=txtcodser".$li_fila." class=sin-borde style=text-align:center size=20 value='".$ls_codser."' readonly><input type=hidden name=hidporcre".$li_fila." id=hidporcre".$li_fila." value='".$ld_porcre."'>";
$lo_object[$li_fila][2] = "<input type=text name=txtdenser".$li_fila." id=txtdenser".$li_fila." class=sin-borde style=text-align:left size=60 value='".$ls_denser."' readonly>";
$lo_object[$li_fila][3] = "<input type=text name=txtcanser".$li_fila." id=txtcanser".$li_fila." class=sin-borde style=text-align:right size=15 value='".$ld_canser."' readonly>";
$lo_object[$li_fila][4] = "<input type=text name=txtpreser".$li_fila." id=txtpreser".$li_fila." class=sin-borde style=text-align:right size=15 value='".$ld_preser."' $ls_opcion>";
$lo_object[$li_fila][5] = "<input type=text name=txtsubser".$li_fila." id=txtsubser".$li_fila." class=sin-borde style=text-align:right size=15 value='".$ld_subser."' readonly>";
$lo_object[$li_fila][6] = "<input type=text name=txtcreser".$li_fila." id=txtcreser".$li_fila." class=sin-borde style=text-align:right size=15 value='".$ld_creser."' readonly>";
$lo_object[$li_fila][7] = "<input type=text name=txttotser".$li_fila." id=txttotser".$li_fila." class=sin-borde style=text-align:right size=15 value='".$ld_totser."' readonly>";
$lo_object[$li_fila][8] = "<select name=cmbcalser".$li_fila." style='width:75px ' $ls_disabled><option value=E ".$ls_excsel.">Excelente</option><option value=B ".$ls_buesel.">Bueno</option><option value=R ".$ls_regsel.">Regular</option><option value=M ".$ls_malsel.">Malo</option><option value=P ".$ls_mumsel.">Muy Malo</option></select>";
$lo_object[$li_fila][9] ="<a href=javascript:ue_delete_servicios('".$li_fila."');><img src=../shared/imagebank/tools15/eliminar.gif title=Eliminar width=15 height=10 border=0></a>";
}
$li_fila++;
$lo_object[$li_fila][1] = "<input type=text name=txtcodser".$li_fila." id=txtcodser".$li_fila." class=sin-borde style=text-align:center size=20 value='' readonly><input type=hidden name=hidporcre".$li_fila." id=hidporcre".$li_fila." value=''>";
$lo_object[$li_fila][2] = "<input type=text name=txtdenser".$li_fila." id=txtdenser".$li_fila." class=sin-borde style=text-align:left size=60 value='' readonly>";
$lo_object[$li_fila][3] = "<input type=text name=txtcanser".$li_fila." id=txtcanser".$li_fila." class=sin-borde style=text-align:right size=15 value='' readonly>";
$lo_object[$li_fila][4] = "<input type=text name=txtpreser".$li_fila." id=txtpreser".$li_fila." class=sin-borde style=text-align:right size=15 value='' readonly>";
$lo_object[$li_fila][5] = "<input type=text name=txtsubser".$li_fila." id=txtsubser".$li_fila." class=sin-borde style=text-align:right size=15 value='' readonly>";
$lo_object[$li_fila][6] = "<input type=text name=txtcreser".$li_fila." id=txtcreser".$li_fila." class=sin-borde style=text-align:right size=15 value='' readonly>";
$lo_object[$li_fila][7] = "<input type=text name=txttotser".$li_fila." id=txttotser".$li_fila." class=sin-borde style=text-align:right size=15 value='' readonly>";
$lo_object[$li_fila][8] = "";
$lo_object[$li_fila][9] = "";
print "<p> </p>";
$io_grid->make_gridScroll($li_fila,$lo_title,$lo_object,795,"Detalle de Servicios","gridservicios",150);
unset($io_registro);
}// end function uf_load_servicios
a:visited {
color: #006699;
}
a:hover {
color: #006699;
}
a:active {
color: #006699;
}
-->
</style>
</head>
<body onLoad="writetostatus('<?php print "Base de Datos: ".$_SESSION["ls_database"].". Usuario: ".$_SESSION["la_logusr"];?>')">
<?php
require_once("class_folder/sigesp_soc_c_registro_cotizacion.php");
$io_soc=new sigesp_soc_c_registro_cotizacion("../");
uf_limpiarvariables();
switch($ls_operacion){
case 'GUARDAR':
uf_load_variables();
$lb_valido=$io_soc->uf_guardar($ls_existe,$ls_fecregcot,$ls_numcot,$ls_numsolcot,$ls_tipcot,$ls_obscot,$li_totrowbienes,$li_totrowservicios,&$ls_estcot,
$ls_forpag,$ls_codpro,$li_diaent,$ld_poriva,$ld_subtotal,$ld_creditos,$ld_total,$li_estinciva,$la_seguridad);
uf_load_data(&$ls_parametros);
switch($ls_estcot)
{
case "R":
$ls_estatus="REGISTRO";//La Cotizaci�n est� almacenada pero no ha sido tomada por un An�lisis de Cotizaci�n.
break;
case "P":
$ls_estatus="PROCESADA";//La Cotizaci�n ya fue incorporada en un An�lisis de Cotizaci�n.
break;
