<%@ $Language=JScript /* No Tocar, (Interdev & PHP) */ %><%
/*
Este módulo muestra los banners
Requiere predefinir las variables xrb_pos (posición del banner en la pagina) y
xrb_tip (tipo de pagina). Ver como referencia la tabla RU_PAU
Tambien muestra los banners del tipo adforce, pero es necesario cargar
el codigo en BA_HTM y no ponerle imagen ni URL//Matias 17/03/00
*/
if( $xrb_pos=="" or !isset($xrb_pos))
{
$xrb_pos="B";
}if($ejeID)
{
$xrb_tip = "EJE";}
if( $xrb_tip=="" or !isset($xrb_tip))
{
$xrb_tip="DEF";
}
/* Selecciona banners por pauta de banners activos, segun posicion y tipo solicitado */
$sqlba1 = "select A.banUrl,A.banID, A.banPublic,bapTipo, bapPosicion, bapID "
. "from Banners A, BannersPara B "
. "where A.banActivo='S' and (B.bapFbaja IS NULL OR B.bapFbaja > '$condate' or B.bapFbaja = '0000-00-00 00:00') and B.banID=A.banID";
/*07-03-2000 Le agregue "OR B.BP_FBA< '1980-01-01 00:00:00'" por que cuando das de alta el banner en bapa no pone fecha NULL Matias*/
if($xrb_tip=="EJE"){
$sqlba = $sqlba1 . " and B.bapPosicion='$xrb_pos' and B.bapTipo='$xrb_tip' and B.bapEjeID='$ancestro' ";
}else{ $sqlba = $sqlba1 . " and B.bapPosicion='$xrb_pos' and B.bapTipo='$xrb_tip' ";}
/* toma el de ultima aparicion mas antigua y limita la búsqueda al primero */
$sqlba = $sqlba . " order by bapUltimaVez limit 1";
/*echo "*sqlba=*$sqlba*";*/
$qryba = $conn->Execute( $sqlba );
$rowsba = $qryba->numrows;
/* Si no encontro ninguno, asume DEF y E y rehace la consulta //LO CAMBIE A PEDIDO DE TOBA*/
if( $rowsba == 0)
{
$sqlba = $sqlba1 . " and B.bapPosicion='$xrb_pos' and B.bapTipo='DEF' order by bapUltimaVez limit 1";
$qryba = $conn->Execute( $sqlba );
$rowsba = $qryba->numrows;
//$qryba->display(); }
if( $rowsba > 0)
{
$ba_url = $qryba->field( "banUrl" );
//$ba_ima = $qryba->field( "banImagen" );
$ba_id = $qryba->field( "banID" );
$pa_tip = $qryba->field( "bapTipo" );
$pa_pos = $qryba->field( "bapPosicion" );
//$ba_htm = $qryba->field( "banHtm" ); $bap_id = $qryba->field( "bapID" );
$ba_publi=$qryba->field( "banPublic");
$ba_upd = "UPDATE BannersPara SET bapContador=bapContador+1, bapUltimaVez='$condate' where bapID='$bap_id'";
$conn->Execute( $ba_upd );
/*$ba_add = "INSERT INTO jmtLogBanners VALUES(0, $bap_id, '$PHP_SELF', '$condate')";
$conn->Execute($ba_add);*/
//echo "$ba_url";
if($ba_url != "")
{
//echo "";
/*
Verifico si es un mailto
*/
if (substr($ba_url,0,6) != "mailto")
{
// Lo redirecciono a traves de la pagina banner_redir.php3 para contabilizar los cliks por banner
if ($ba_publi=="S")
{echo "";}
else
{echo "";}
}
else
{
echo "";
}
}
/*
$ba_htm = trim($ba_htm);
if (isset($ba_htm) && ($ba_htm!="")) {
$ba_htm = eregi_replace("valor",strval($bap_id),$ba_htm);
$ba_htm = eregi_replace("pagina",strval($PHP_SELF),$ba_htm);
$ba_htm = eregi_replace("ruta",strval($var_path),$ba_htm);
echo "$ba_htm";
}
else
{*/ //echo "![](".$var_path."images/banners/$ba_ima)
";
ver_foto("Banners",$ba_id,1);
//}
if($ba_url != "")
{
//echo "
"; echo "";
}
}
%>