";
print "close();";
print "opener.document.form1.submit();";
print "";
}
//----------------------------------------------------------------------------------------------------------------------------
function uf_imprimirresultados($as_codcom)
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_imprimirresultados
// Access: private
// Arguments: as_codcom // Número de Comprobante
// Description: Función que Imprime los detalles del comprobante
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 31/10/2006 Fecha Última Modificación :
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $in_class_mis;
require_once("../shared/class_folder/sigesp_include.php");
$in=new sigesp_include();
$con=$in->uf_conectar();
require_once("../shared/class_folder/class_mensajes.php");
$io_mensajes=new class_mensajes();
require_once("../shared/class_folder/class_sql.php");
$io_sql=new class_sql($con);
require_once("../shared/class_folder/class_sql.php");
$io_sql2=new class_sql($con);
require_once("../shared/class_folder/class_funciones.php");
$io_funciones=new class_funciones();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
require_once("../shared/class_folder/class_sigesp_int.php");
require_once("../shared/class_folder/class_sigesp_int_int.php");
require_once("../shared/class_folder/class_sigesp_int_scg.php");
require_once("../shared/class_folder/class_sigesp_int_spg.php");
$io_int_spg=new class_sigesp_int_spg();
$ls_sql="SELECT siv_despacho.codemp, siv_despacho.numorddes, MAX(obsdes) as obsdes,fecdes ".
" FROM siv_despacho,siv_dt_scg ".
" WHERE siv_despacho.codemp = '".$ls_codemp."' ".
" AND siv_dt_scg.codcmp='".$as_codcom."'".
" AND siv_despacho.codemp=siv_dt_scg.codemp ".
" AND siv_despacho.numorddes=siv_dt_scg.codcmp ".
" GROUP BY siv_despacho.codemp, siv_despacho.numorddes,fecdes".
" ORDER BY numorddes ";
$rs_data=$io_sql->select($ls_sql);
if($rs_data===false)
{
$io_mensajes->message("ERROR 1->".$io_funciones->uf_convertirmsg($io_sql->message));
}
else
{
if(!$rs_data->EOF)
{
$ls_comprobante=$rs_data->fields["numorddes"];
$ls_descripcion=$rs_data->fields["obsdes"];
$_SESSION["fechacomprobante"]=$rs_data->fields["fecdes"];
print "
";
print " ";
print " | Información del Comprobante | ";
print "
";
print "
";
print "";
$config=false;
$ls_sql="SELECT value".
" FROM sigesp_config".
" WHERE codemp='".$ls_codemp."'".
" AND codsis='SIV'".
" AND seccion='CONFIG '".
" AND entry='CENTRO_COSTOS '";
$rs_data4=$io_sql2->select($ls_sql);
if($rs_data4===false)
{
$io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql2->message));
$lb_valido=false;
}
else
{
if($row=$io_sql2->fetch_row($rs_data4))
{
$as_value=$row["value"];
if($as_value=="1"){
$config=true;
}
}
$io_sql2->free_result($rs_data4);
}
if ($config) {
$ls_sql="SELECT codestpro1, codestpro2, codestpro3, codestpro4, codestpro5, estcla, spg_cuenta, monto ".
" FROM siv_dt_spg ".
" WHERE codemp='".$ls_codemp."' ".
" AND numorddes='".$as_codcom."' ";
$rs_data2=$io_sql2->select($ls_sql);
if($rs_data2===false)
{
$io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql2->message));
}
else
{
$ls_titulo="";
$li_len1=0;
$li_len2=0;
$li_len3=0;
$li_len4=0;
$li_len5=0;
$in_class_mis->uf_loadmodalidad($li_len1,$li_len2,$li_len3,$li_len4,$li_len5,$ls_titulo);
print "";
}
$io_sql2->free_result($rs_data2);
}
$ls_sql="SELECT sc_cuenta, debhab, monto ".
" FROM siv_despacho,siv_dt_scg ".
" WHERE siv_despacho.codemp = '".$ls_codemp."' ".
" AND siv_dt_scg.codcmp = '".$as_codcom."' ".
" AND siv_despacho.codemp=siv_dt_scg.codemp ".
" AND siv_despacho.numorddes=siv_dt_scg.codcmp ";
$rs_data2=$io_sql2->select($ls_sql);
if($rs_data2===false)
{
$io_mensajes->message("ERROR 2->".$io_funciones->uf_convertirmsg($io_sql2->message));
}
else
{
$li_total_deb=0;
$li_total_hab=0;
print "";
}
$io_sql2->free_result($rs_data2);
print "
";
}
}
$io_sql->free_result($rs_data);
}
//----------------------------------------------------------------------------------------------------------------------------
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_disponibilidad($ls_codemp,$rs_data2,$io_int_spg,&$ls_imagen,&$li_disponibilidad)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_disponibilidad
// Access: public
// Argument: uf_disponibilidad // data
// Description: busca la disponibilidad presupuiestaria
// Returns: mensaje
// Creado Por: Ing. Yesenia Moreno
// Modificado Por: Ing. Yesenia Moreno Fecha Última Modificación :
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$ls_cuenta=$rs_data2->fields["spg_cuenta"];
$ls_estprog[0]=$rs_data2->fields["codestpro1"];
$ls_estprog[1]=$rs_data2->fields["codestpro2"];
$ls_estprog[2]=$rs_data2->fields["codestpro3"];
$ls_estprog[3]=$rs_data2->fields["codestpro4"];
$ls_estprog[4]=$rs_data2->fields["codestpro5"];
$ls_estprog[5]=$rs_data2->fields["estcla"];
$la_empresa=$_SESSION["la_empresa"];
$ls_vali_nivel=$la_empresa["vali_nivel"];
if($ls_vali_nivel==5)
{
$ls_formpre=str_replace("-","",$la_empresa["formpre"]);
$ls_vali_nivel=$io_int_spg->uf_spg_obtener_nivel($ls_formpre);
}
if($_SESSION["la_empresa"]["estvaldis"]==0)
{
$ls_vali_nivel=0;
}
$lb_valido=true;
$li_nivel=$io_int_spg->uf_spg_obtener_nivel($ls_cuenta);
if ($li_nivel <= $ls_vali_nivel)
{
$ls_status="";
$li_asignado=0;
$li_aumento=0;
$li_disminucion=0;
$li_precomprometido=0;
$li_comprometido=0;
$li_causado=0;
$li_pagado=0;
$io_int_spg->uf_spg_saldo_select($ls_codemp,$ls_estprog,$ls_cuenta,$ls_status,$li_asignado,$li_aumento,$li_disminucion,
$li_precomprometido,$li_comprometido,$li_causado,$li_pagado,'ACTUAL');
$li_disponibilidad=(($li_asignado + $li_aumento) - ( $li_disminucion + $li_comprometido + $li_precomprometido));
if(round($rs_data2->fields["monto"],2) >= round($li_disponibilidad,2))
{
$ls_imagen='failed.png';
$lb_valido=false;
}
if($lb_valido)
{
$ls_status="";
$li_asignado=0;
$li_aumento=0;
$li_disminucion=0;
$li_precomprometido=0;
$li_comprometido=0;
$li_causado=0;
$li_pagado=0;
$io_int_spg->uf_spg_saldo_select($ls_codemp,$ls_estprog,$ls_cuenta,$ls_status,$li_asignado,$li_aumento,$li_disminucion,
$li_precomprometido,$li_comprometido,$li_causado,$li_pagado,'COMPROBANTE');
$li_disponibilidad=(($li_asignado + $li_aumento) - ( $li_disminucion + $li_comprometido + $li_precomprometido));
if(round($rs_data2->fields["monto"],2) >= round($li_disponibilidad,2))
{
$ls_imagen='failed.png';
$lb_valido=false;
}
}
}
return true;
} // end function uf_show_error_disponible
//-----------------------------------------------------------------------------------------------------------------------------------
?>
Detalle Comprobante