";
}
echo "| ".$ls_numordpagmin." | ";
echo "".$ls_codban.' - '.$ls_nomban." | ";
echo "".$ls_ctaban.' - '.$ls_denctaban." | ";
echo "".number_format($ld_monordpagmin,2,',','.')." | ";
echo "".number_format($ld_porrepfon,2,',','.')." | ";
echo "".number_format($ld_totporcon,2,',','.')." | ";
echo "".number_format($ld_monmaxmov,2,',','.')." | ";
echo "
";
}
$rs_data->MoveNext();
}
$io_sql->free_result($rs_data);
}
unset($io_include,$io_conexion,$io_sql,$io_mensajes,$io_funciones,$ls_codemp);
}// end function uf_print_ordenespago
//-----------------------------------------------------------------------------------------------------------------------------------
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_obtenervalor($as_valor,$as_valordefecto)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_obtenervalor
// Access: public
// Arguments: as_valor // Variable que deseamos obtener
// as_valordefecto // Valor por defecto de la variable
// Returns: valor contenido de la variable
// Description: Función que obtiene el valor de una variable que viene de un submit y si no trae valor coloca el
// por defecto
// Creado Por: Ing. Néstor Falcón
// Fecha Creación: 01/02/2007 Fecha Última Modificación :
//////////////////////////////////////////////////////////////////////////////
$valor="";
if(array_key_exists($as_valor,$_POST))
{
$valor=$_POST[$as_valor];
}
if(trim($valor)=="")
{
$valor=$as_valordefecto;
}
return $valor;
}// end function uf_obtenervalor
//-----------------------------------------------------------------------------------------------------------------------------------
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_load_monto_consumido($as_numordpagmin,$as_codtipfon)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_load_monto_consumido
// Access: private
// Arguments:
// Description: Método que imprime el resultado de la busqueda de las Ordenes de Pago Ministerio.
// Creado Por: Ing. Néstor Falcón
// Fecha Creación: 11/02/2009. Fecha Última Modificación : 11/02/2009.
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
require_once("../../shared/class_folder/class_sql.php");
require_once("../../shared/class_folder/sigesp_include.php");
require_once("../../shared/class_folder/class_mensajes.php");
require_once("../../shared/class_folder/class_funciones.php");
$io_include = new sigesp_include();
$io_mensajes = new class_mensajes();
$io_funciones = new class_funciones();
$io_conexion = $io_include->uf_conectar();
$io_sql = new class_sql($io_conexion);
$ld_totmoncon = 0;//Sumatoria de los Consumos de Movimientos asociados a la Orden de Pago Ministerio.
$ld_moncon = 0;
switch ($_SESSION["ls_gestor"])
{
case "MYSQLT":
$ls_aux_where=" AND CONCAT(cxp_rd.codemp,cxp_rd.numrecdoc,cxp_rd.codtipdoc,cxp_rd.cod_pro,cxp_rd.ced_bene) ".
" NOT IN (SELECT CONCAT(cxp_rd.codemp,cxp_rd.numrecdoc,cxp_rd.codtipdoc,cxp_rd.cod_pro,cxp_rd.ced_bene)".
" FROM cxp_rd,cxp_dt_solicitudes,cxp_sol_banco".
" WHERE cxp_rd.codemp=cxp_dt_solicitudes.codemp".
" AND cxp_rd.numrecdoc=cxp_dt_solicitudes.numrecdoc".
" AND cxp_rd.codtipdoc=cxp_dt_solicitudes.codtipdoc".
" AND cxp_rd.cod_pro=cxp_dt_solicitudes.cod_pro".
" AND cxp_rd.ced_bene=cxp_dt_solicitudes.ced_bene".
" AND cxp_dt_solicitudes.codemp=cxp_sol_banco.codemp".
" AND cxp_dt_solicitudes.numsol=cxp_sol_banco.numsol) ";
break;
case "POSTGRES":
$ls_aux_where =" AND cxp_rd.codemp||cxp_rd.numrecdoc||cxp_rd.codtipdoc||cxp_rd.cod_pro||cxp_rd.ced_bene".
" NOT IN (SELECT (cxp_rd.codemp||cxp_rd.numrecdoc||cxp_rd.codtipdoc||cxp_rd.cod_pro||cxp_rd.ced_bene)".
" FROM cxp_rd,cxp_dt_solicitudes,cxp_sol_banco".
" WHERE cxp_rd.codemp=cxp_dt_solicitudes.codemp".
" AND cxp_rd.numrecdoc=cxp_dt_solicitudes.numrecdoc".
" AND cxp_rd.codtipdoc=cxp_dt_solicitudes.codtipdoc".
" AND cxp_rd.cod_pro=cxp_dt_solicitudes.cod_pro".
" AND cxp_rd.ced_bene=cxp_dt_solicitudes.ced_bene".
" AND cxp_dt_solicitudes.codemp=cxp_sol_banco.codemp".
" AND cxp_dt_solicitudes.numsol=cxp_sol_banco.numsol) ";
break;
}
$ls_sql = "SELECT SUM(monto) as moncon
FROM scb_movbco
WHERE numordpagmin<>'-'
AND numordpagmin<>''
AND numordpagmin = '".$as_numordpagmin."'
AND codtipfon = '".$as_codtipfon."'
AND (codope='CH' OR codope='ND')
GROUP BY numordpagmin,codtipfon
UNION
SELECT SUM(montotdoc) as moncon
FROM cxp_rd
WHERE numordpagmin = '".$as_numordpagmin."'
AND codtipfon = '".$as_codtipfon."' $ls_aux_where
GROUP BY numordpagmin";
$rs_data=$io_sql->select($ls_sql);//echo $ls_sql.'
Agregar Otros Crédito