File "Funciones.php"

Full path: /home/dsvchile/public_html/equote/Funciones.php
File size: 17.96 B
MIME-type: text/x-php
Charset: utf-8

Download   Open   Edit   Advanced Editor   Back

<?
include("db.php");



/// FUNCION QUE RETORNA SI LA ORDEN DE COMPRA SE ENCUENTRA EN EL FLUJO VIGENTE

function ConsultaPO($PO)
{

	dbconnect();

	$SQL_O = dbquery("SELECT ord_id FROM Orden WHERE ord_numero_orden='$PO'");
	$ARRAY_O=mysql_fetch_array($SQL_O);

	if($ARRAY_O[ord_id]!="")
	{

		$SQL = dbquery("SELECT
						pen_usu_id
					FROM
						PendienteUsuario
					WHERE
						pen_usu_ord_id='$ARRAY_O[ord_id]' AND
						pen_usu_tar_id=98");

		$ARRAY = mysql_fetch_array($SQL);

		if($ARRAY[pen_usu_id]!="")
		{

			return "NO";

		}else
		{

			return "SI";
		}


	}else
	{

		return "NO";
	}


}

/// FUNCION QUE RETORNA LOS PAISES QUE TIENE EL EJECUTIVO

function ReturnPaisUsuario($IdUsuario)
{

	dbconnect();

	$SQL = dbquery("
					SELECT
						pai_nombre,
						pai_id
					FROM
						Usuario
						INNER JOIN UsuarioPais ON usu_pai_usu_id = usu_id
						INNER JOIN Pais ON pai_id = usu_pai_pai_id
					WHERE
						usu_pai_usu_id='$IdUsuario'");
	while($ARRAY=mysql_fetch_array($SQL))
	{

		 ?>
        	<option value="<?=$ARRAY[pai_id];?>"><?=$ARRAY[pai_nombre];?></option>
          <?


	}



}


/// FUNCION QUE RETORNA SI EXISTE EL COSTEO

function ReturnMontoCosteo($COSTEO_ID,$ITEM_ID,$IdConcepto)
{

	dbconnect();

		$Sql=dbquery("SELECT det_cos_monto FROM DetalleCosteo WHERE det_cos_cos_id='$COSTEO_ID' AND det_cos_ite_id='$ITEM_ID' AND det_cos_con_id='$IdConcepto'");
	$Array=mysql_fetch_array($Sql);


	return $Array[det_cos_monto];

}




/// FUNCION RETORNA VALOR CON ,

function FormatNumberProComa($Numero)
{
	$numero=str_replace(".",",",$Numero);

	return "$numero";

}

/// FUNCION RETORNA FORMATO SIN .


function FormatNumberPro($Numero)
{
	$NuevoFormato=number_format($Numero,0, ',' ,'');
	return "$NuevoFormato";

}


/// FUNCION QUE ELIMINA LOS ACENTOS

function normaliza ($cadena){

    $originales = 'ÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖØÙÚÛÜÝÞ
ßàáâãäåæçèéêëìíîïðñòóôõöøùúûýýþÿŔŕ';
    $modificadas = 'aaaaaaaceeeeiiiidnoooooouuuuy
bsaaaaaaaceeeeiiiidnoooooouuuyybyRr';
    $cadena = utf8_decode($cadena);
    $cadena = strtr($cadena, utf8_decode($originales), $modificadas);
    $cadena = strtolower($cadena);
    return utf8_encode($cadena);
}

/// FUNCION QUE RETORNA LOS ADJUNTOS DEL SISTEMA


function SelectAttachment($IdOrden)
{

	dbconnect();

   $Sql=dbquery("SELECT adj_ord_id,adj_ord_tip_adj_id,adj_ord_nombre,adj_ord_archivo FROM AdjuntoOrden WHERE adj_ord_ord_id='$IdOrden' ORDER BY adj_ord_nombre ASC");
   while($Array=mysql_fetch_array($Sql))
   {

   		$TipoAdj=ReturnQuery($Array[adj_ord_tip_adj_id],tip_adj_id,TipoAdjunto,tip_adj_nombre)
      ?>
        	<option value="<?=$Array[adj_ord_id];?>"><?=$TipoAdj;?>/<?=$Array[adj_ord_nombre];?>/<?=$Array[adj_ord_archivo];?></option>
          <?
   }


}

/// FUNCION QUE RETORNA EL FOLIO DEL INGRESO DEL SHIPPED

function ReturnFolioInvoice()
{
        dbconnect();

        dbquery("INSERT INTO FolioInvoiceInstruction (fol_inv_ins_id) VALUES('fol_inv_ins_id+1')");
        $Sql=dbquery("SELECT LAST_INSERT_ID( ) FROM FolioInvoiceInstruction ");
        $Array=mysql_fetch_array($Sql);

        return $Array[0];
}



/// FUNCION QUE RETORNA EL RESPONSABLE DEL PENDIENTE

function ReturnResponsablePendiente($IdOrden,$IdTarea)
{
	$Sql=dbquery("SELECT CONCAT(Usuario.usu_nombre,' ',Usuario.usu_appaterno) FROM Usuario,PendienteUsuario  WHERE PendienteUsuario.pen_usu_ord_id='$IdOrden' AND PendienteUsuario.pen_usu_tar_id='$IdTarea' AND PendienteUsuario.pen_usu_usu_id=Usuario.usu_id AND PendienteUsuario.pen_usu_estado='P'");
	$Array=mysql_fetch_array($Sql);

	return $Array[0];

}

///FUNCION QUE RETORNA EL NUMERO DE LA SEMANA

function ReturnWeek($Fecha)
 {

	  $Sql=dbquery("SELECT WEEK('$Fecha')");
      $Array=mysql_fetch_array($Sql);

	  return $Array[0];

}


/// FUNCION QUE RESTA DOS FECHAS PARA EL SEMAFORO

function ReturnSubFechaSemaforo($Fecha1,$Fecha2)
{
        $Sql=dbquery("SELECT DATEDIFF('$Fecha1','$Fecha2')");
        $Array=mysql_fetch_array($Sql);


        $SqlSF=dbquery("SELECT DATE_SUB('$Fecha1', INTERVAL '$Array[0]' DAY)");
        $ArraySF=mysql_fetch_array($SqlSF);




	return $ArraySF[0];
}


/// FUNCION QUE RESTA DOS FECHAS

function ReturnSubFecha($Fecha1,$Fecha2)
{
        $Sql=dbquery("SELECT DATEDIFF('$Fecha1','$Fecha2')");
        $Array=mysql_fetch_array($Sql);


	return $Array[0];
}





/// FUNCION QUE MUESTRA UN MENSAJE DE ERROR

function MensajeError($Mensaje)
{
 ;?>
 <div id="MarcoError">

	    <TABLE align="CENTER" style="width:500px;margin-left:400px;">
					    <TR>
					     <th>
						     <div align="CENTER">
							     	<IMG src="../images/db_status.png">
					        </div>
					     </th>
					        </TR>
					    <TR>
					     <th>
						     <div align="CENTER">
							     <font color="#000000" size="3">
								 	<?=$Mensaje;?>
								 </font>
						     </div>
					     </th>
					    </TR>
					    <TR>
						    <TH>
							    <div align="center">
									<input type="button" value=" Back " onClick="history.go(-1)" class="BotonFormulario" name='button'>
							   </div>
						    </TH>
					    </TR>
					    </TABLE>


				</div>
<?
				 exit();
}



/// FUNCION QUE RETORNA EL FOLIO DEL INGRESO DEL SHIPPED

function ReturnFolioShipped()
{
        dbconnect();

        dbquery("INSERT INTO FolioShipped (fol_shi_id) VALUES('fol_shi_id+1')");
        $Sql=dbquery("SELECT LAST_INSERT_ID( ) FROM FolioShipped ");
        $Array=mysql_fetch_array($Sql);

        return $Array[0];
}
/// FUNCION QUE PERMITE SABER SI EXISTE UN DATO EN UN CAMPO

function ExisteDatoTabla($Tabla,$Variable,$CampoTabla)
{
        dbconnect();
        $Sql=dbquery("SELECT $CampoTabla FROM $Tabla WHERE $CampoTabla='$Variable'");
        $Array=mysql_fetch_array($Sql);

        if($Array[$CampoTabla]!="")
        {
         	return "SI";
        }else
	{

                return "NO";
	}

}


/// FUNCION QUE RETORNA EL FOLIO DEL INGRESO DEL BOOKED

function ReturnFolioBooked()
{
        dbconnect();

        dbquery("INSERT INTO FolioBooked (fol_boo_id) VALUES('fol_boo_id+1')");
        $Sql=dbquery("SELECT LAST_INSERT_ID( ) FROM FolioBooked ");
        $Array=mysql_fetch_array($Sql);

        return $Array[0];
}

/// FUNCION QUE RETORNA LAS FECHAS DE INICIO Y TERMINO DE LA TAREA

function ReturnFechaTarea($IdOrden,$IdTarea,$Tipo)
{
	dbconnect();

	$Sql=dbquery("SELECT ala_tar_fecha_inicio,ala_tar_fecha_termino FROM AlarmaTarea WHERE ala_tar_ord_id='$IdOrden' AND ala_tar_tar_id='$IdTarea'");
	$Array=mysql_fetch_array($Sql);

	if($Tipo=="Inicio")
	{

	 return $Array[ala_tar_fecha_inicio];

	}elseif($Tipo=="Termino")
	{

	 return $Array[ala_tar_fecha_termino];
	}

}

/// FUNCION QUE CREA UN SELECT  DE LOS EVENTOS DEPENDIENDO DE LA TAREA

function SelectResponsableTarea($IdTarea)
{

   dbconnect();

   $SqlR=dbquery("SELECT tar_rol_rol_id FROM TareaRol WHERE tar_rol_tar_id='$IdTarea'");
   while($ArrayR=mysql_fetch_array($SqlR))
   {

   	$Sql=dbquery("SELECT Usuario.usu_id,CONCAT(Usuario.usu_nombre,' ',Usuario.usu_appaterno,' ',Usuario.usu_apmaterno) FROM Usuario,UsuarioRol WHERE UsuarioRol.usu_rol_rol_id='$ArrayR[tar_rol_rol_id]' AND UsuarioRol.usu_rol_usu_id=Usuario.usu_id");
   	while($Array=mysql_fetch_array($Sql))
   	{
      ?>
        	<option value="<?=$Array[0];?>" ><?=$Array[1];?></option>
          <?
   	}
   }


}


/// FUNCION QUE EXTRAE EL RESPONSABLE DE LA TAREA HIJA

function SelectResponsableTareaH($IdTarea)
{

   dbconnect();

    $RolTarea=ReturnQuery($IdTarea,tar_rol_tar_id,TareaRol,tar_rol_rol_id);


   	$Sql=dbquery("SELECT Usuario.usu_id FROM Usuario,UsuarioRol WHERE UsuarioRol.usu_rol_rol_id='$RolTarea' AND UsuarioRol.usu_rol_usu_id=Usuario.usu_id");
    $Array=mysql_fetch_array($Sql);

   return $Array[0];


}


/// FUNCION QUE EXTRAE SI EL CAMPO ES EDITABLE O NO SEGUN LA TAREA

function ReturnCampoEdit($IdTarea,$NCampo)
{

   dbconnect();

   $Sql=dbquery("SELECT cam_edi_tar_editable FROM CampoEditableTarea WHERE cam_edi_tar_tar_id='$IdTarea' AND cam_edi_tar_nombre ='$NCampo'");
   $Array=mysql_fetch_array($Sql);

   $Respuesta=$Array[cam_edi_tar_editable];


	return $Respuesta;
}



/// FUNCION QUE CREA UN SELECT  DE LOS EVENTOS DEPENDIENDO DE LA TAREA

function SelectEventos($IdTarea)
{

   dbconnect();

   $Sql=dbquery("SELECT eve_id,eve_nombre,eve_tar_des_id  FROM Evento WHERE eve_tar_id='$IdTarea'");
   while($Array=mysql_fetch_array($Sql))
   {

      ?>
      	  <option value="<?=$Array[eve_id];?>" ><?=$Array[eve_nombre];?></option>


      <?

   }

}



/// FUNCION QUE CREA UN SELECT DEPENDIENDO DE LOS PLANNERS

function SelectTablaPlanner()
{

   dbconnect();

   $Sql=dbquery("SELECT pla_id,CONCAT(pla_nombre,' ',pla_appaterno) FROM Planner ORDER BY pla_nombre ASC");
   while($Array=mysql_fetch_array($Sql))
   {
      ?>
        	<option value="<?=$Array[pla_id];?>" ><?=$Array[1];?></option>
          <?
   }

}

/// FUNCION QUE CREA UN SELECT DEPENDIENDO DE LA TABLA

function SelectTabla($Tabla,$Orden,$IdTabla,$Campo)
{

   dbconnect();

   $Sql=dbquery("SELECT $IdTabla,$Campo FROM $Tabla ORDER BY $Orden ASC");
   while($Array=mysql_fetch_array($Sql))
   {
      ?>
        	<option value="<?=$Array[$IdTabla];?>"><?=$Array[$Campo];?></option>
          <?
   }

}
/// FUNCION QUE RETORNA LAS FECHAS DE LAS ALARMAS DE LAS TAREAS

function ReturnFechaAlarmaTarea($IdTarea,$IdOrden,$Fecha)
{

		dbconnect();
		$SqlAT=dbquery("SELECT ala_tar_fecha_inicio,ala_tar_fecha_termino FROM  AlarmaTarea WHERE ala_tar_tar_id='$IdTarea' AND ala_tar_ord_id='$IdOrden'");
		$ArrayAT=mysql_fetch_array($SqlAT);

		if($Fecha=="Inicio")
		{
			return "$ArrayAT[ala_tar_fecha_inicio]";

		}elseif($Fecha=="Termino")
		{

			return "$ArrayAT[ala_tar_fecha_termino]";

		}

}

 /// FUNCION QUE RETORNA EL FOLIO DEL INGRESO DE LA ORDEN

function ReturnFolioOC()
{
        dbconnect();

        dbquery("INSERT INTO FolioOrden (fol_ord_id) VALUES('fol_ord_id+1')");
        $Sql=dbquery("SELECT LAST_INSERT_ID( ) FROM FolioOrden ");
        $Array=mysql_fetch_array($Sql);

        return $Array[0];
}



 ///   Funcion que permite mostrar datos de una tabla mediante parametros

function ReturnQuery($Id,$IdTabla,$Tabla,$Campo)
 	{

        dbconnect();

		$Sql=dbquery("SELECT $Campo FROM $Tabla WHERE $IdTabla='$Id'");
                $Array = mysql_fetch_array($Sql);
                $Query=$Array[$Campo];
                return $Query;

        }


 /// FUNCION QUE RETORNA EL FOLIO DEL INGRESO DEL CONTRATO DEL CARRIER COSTO FCL SFE

function ReturnFolioFileCliente()
{
        dbconnect();

        dbquery("INSERT INTO FolioFileCliente(fol_fil_cli_id) VALUES('fol_fil_cli_id+1')");
        $Sql=dbquery("SELECT LAST_INSERT_ID( ) FROM FolioFileCliente");
        $Array=mysql_fetch_array($Sql);

        return $Array[0];
}

//// FUNCION QUE CONVIERTE UNA FECHA PARA INGRESARLA A LA BD

function ConvertirFechaBD($fecha)
 {

   $dato=explode("-",$fecha);
   $ano=$dato[2];
   $mes=$dato[1];
   $dia=$dato[0];

   return "$ano-$mes-$dia";


 }


//// FUNCION QUE EXTRAE LA FECHA DE UNA FECHA CON HORA

function ConvertirFecha($fecha)
 {

   $dato=explode("-",$fecha);
   $ano=$dato[0];
   $mes=$dato[1];
   $dia=$dato[2];

   return "$dia-$mes-$ano";


 }



//// FUNCION QUE EXTRAE LA FECHA DE UNA FECHA CON HORA

function ConvertirFechaHora($fecha)
 {
   $datos=explode(" ",$fecha);
   $Fecha=$datos[0];
   $Hora=$datos[1];
   $dato=explode("-",$Fecha);
   $ano=$dato[0];
   $mes=$dato[1];
   $dia=$dato[2];

   return "$dia-$mes-$ano $Hora";


 }




/// FUNCION QUE RETORNA ALGUN DATO DEL USUARIO
dbconnect();

function ReturnDatoUsuario($Campo)
{

	$administrador = $_COOKIE["Admin"];
	$administrador= unserialize(base64_decode($administrador));
	$Username=$administrador["usu_username"];

    $Sql=mysql_query("SELECT $Campo FROM Usuario WHERE usu_username='$Username'");
	$Array=mysql_fetch_array($Sql);

    return $Array[$Campo];


}



/// DEVUELVE PASSWORD ENCRIPTADO

function ReturnPasswordCrypt($Password)
{
  $CryptPassword=crypt($Password,"Semilla");

  return $CryptPassword;

}

/*  Funcion que permite mostrar datos de una tabla mediante parametros de ticket */
function ReturnQueryTicket($Id,$IdTabla,$Tabla,$Campo)
{

 	$dbhost = "localhost";
	$dbuname = "sistema_oc";
	$dbpass = "agldbprod2015$";
	$dbname = "sistema_OC_HENKEL";
        mysql_connect($dbhost, $dbuname, $dbpass);
        @mysql_select_db("$dbname") or die("Error seleccionando base de datos");

        $Sql=mysql_query("SELECT $Campo FROM $Tabla WHERE $IdTabla='$Id'");
	$Array = mysql_fetch_array($Sql);
	$Query=$Array[$Campo];
	return $Query;


}


/// FUNCION QUE CREA UN SELECT DEPENDIENDO DE LOS PARAMETROS TRASAPADOS en TICKET

function SelectTablaTicket($Tabla,$Orden,$IdTabla,$Campo)
{

	$dbhost = "localhost";
	$dbuname = "sistema";
	$dbpass = "agilityC";
	$dbname = "OC_HENKEL";
  mysql_connect($dbhost, $dbuname, $dbpass);
 @mysql_select_db("$dbname") or die("Error seleccionando base de datos");

   $Sql=mysql_query("SELECT $IdTabla,$Campo FROM $Tabla ORDER BY $Orden ASC");
   while($Array=mysql_fetch_array($Sql))
   {
      ?>
        	<option value="<?=$Array[$IdTabla];?>"><?=$Array[$Campo];?></option>
	  <?
   }

}

/// RETORNO FECHA MAS X DIAS

function ReturnAddFecha($Fecha,$Dias)
{

	$Sql=dbquery("SELECT DATE_ADD('$Fecha',INTERVAL '$Dias' DAY)");
	$Array=mysql_fetch_array($Sql);


	return $Array[0];
}



function ReturnSubDays($Fecha,$Dias)
{
	$Sql=dbquery("SELECT DATE_SUB('$Fecha',INTERVAL '$Dias' DAY)");
	$Array=mysql_fetch_array($Sql);


	return $Array[0];
}




function Semaforo($IdItem)
{

	$IdOrden =  ReturnQuery($IdItem,ite_id,Item,ite_ord_id);


	$HOY = date("Y-m-d");

	dbconnect();



	### CONFIRMADA

	$SQL_C = dbquery("SELECT pen_usu_id FROM PendienteUsuario WHERE pen_usu_ord_id = '$IdOrden' AND pen_usu_tar_id='2' AND pen_usu_estado='T' ");
	$ARRAY_C = mysql_fetch_array($SQL_C);

	if($ARRAY_C[pen_usu_id]>0)
		$ESTADO="C";




	### ARRIBADA O BOOKEADA


	$SQL_A = dbquery("SELECT
							boo_eta
						FROM
							Booked
							INNER JOIN DetalleBooked ON boo_id = det_boo_boo_id
							INNER JOIN Item	ON det_boo_ite_id = ite_id
						WHERE
							ite_id = '$IdItem'
						");

	$ARRAY_A = mysql_fetch_array($SQL_A);

	$FECHA_ETA = $ARRAY_A[boo_eta];

	if($FECHA_ETA !="" && $FECHA_ETA !="0000-00-00")
	{

		if($FECHA_ETA>$HOY)
			$ESTADO="A";
		else
			$ESTADO="B";

	}


	$SQL_A = dbquery("SELECT
							boo_eta
						FROM
							Booked
							INNER JOIN DetalleBooked ON boo_id = det_boo_boo_id
							INNER JOIN Item	ON det_boo_ite_id = ite_id
						WHERE
							ite_ord_orig_ite_id = '$IdItem'
						");

	$ARRAY_A = mysql_fetch_array($SQL_A);

	$FECHA_ETA = $ARRAY_A[boo_eta];

	if($FECHA_ETA !="" && $FECHA_ETA !="0000-00-00")
	{

		if($FECHA_ETA>$HOY)
			$ESTADO="A";
		else
			$ESTADO="B";

	}



	### OFICIALIZADA

	$SQL_OF = dbquery("SELECT
							shi_di
						FROM
							Item
							INNER JOIN DetalleBooked ON det_boo_ite_id = ite_id
							INNER JOIN DetalleShipped ON  det_boo_boo_id = det_shi_boo_id
							INNER JOIN Shipped ON det_shi_shi_id = shi_id
						WHERE
							ite_id = '$IdItem'
						");

	$ARRAY_OF = mysql_fetch_array($SQL_OF);

	$NUMERO_DI = $ARRAY_OF[shi_di];

	if($NUMERO_DI !="")
	{

		$ESTADO="O";
	}





	### CUMPLIDA

	$SQL_CA = dbquery("SELECT
							shi_date_wh_henkel
						FROM
							Item
							INNER JOIN DetalleBooked ON det_boo_ite_id = ite_id
							INNER JOIN DetalleShipped ON  det_boo_boo_id = det_shi_boo_id
							INNER JOIN Shipped ON det_shi_shi_id = shi_id
						WHERE
							ite_id = '$IdItem'
						");

	$ARRAY_CA = mysql_fetch_array($SQL_CA);

	$FECHA_WH_HENKEL = $ARRAY_CA[shi_date_wh_henkel];

	if($FECHA_WH_HENKEL !="" && $FECHA_WH_HENKEL !="0000-00-00")
	{

		$ESTADO="W";
	}



	return $ESTADO;



}








/*
function Semaforo($IdOrden)
{

	dbconnect();

	$IncoID="";
	$PaisID="";
	$ViaTraID="";
	$ArrivalDATE="";
	$DDate="";
	$DDateA="";


	$IncoID=ReturnQuery($IdOrden,ord_id,Orden,ord_inc_id);
	$PaisID=ReturnQuery($IdOrden,ord_id,Orden,ord_pai_id);
	$ViaTraID=ReturnQuery($IdOrden,ord_id,Orden,ord_via_tra_id);
	$ArrivalDATE=ReturnQuery($IdOrden,ite_ord_id,Item,ite_arrival_date);
	$DDate=ReturnQuery($IdOrden,ite_ord_id,Item,ite_delivery_date);
	$DDateA=ReturnQuery($IdOrden,ite_ord_id,Item,ite_delivery_date_ammended);

	$PContacto=ReturnQuery($IdOrden,ord_id,Orden,ord_primer_contacto_vendedor);
	$SContacto=ReturnQuery($IdOrden,ord_id,Orden,ord_segundo_contacto_vendedor);

	if($DDateA!="0000-00-00")
	{

		$Fecha=$DDateA;

	}else
	{

		$Fecha=$DDate;
	}


	$SqlTT=dbquery("SELECT tie_tra_total_dias FROM TiempoTransito WHERE tie_tra_inc_id='$IncoID' AND tie_tra_pai_id='$PaisID' AND tie_tra_via_tra_id='$ViaTraID' ");
	$ArrayTT=mysql_fetch_array($SqlTT);

	/// VERDE


	$FechaV=ReturnAddFecha($Fecha,$ArrayTT[tie_tra_total_dias]);

	#
	#
	# SI NO HAY FECHA DE ARRIBO INGRESADA AUTOMATICAMENTE SE PINTA DE ROJO
	#
	#


	if($ArrivalDATE=="0000-00-00")
	{

		$Res="Red";
		return $Res;

	}else
	{

		#
		#
		#SI LA FECHA DELIVERY DATE MAS LOS DIAS DE TRANSITO SON MENORES A LA FECHA DE ARRIBO, EL SEMAFORO SE PINTA DE VERDE
		#
		#
		if($FechaV<$ArrivalDATE)
		{

			$Res="Green";
			return $Res;
		}

		/// AMARILLO


		$FAmarillo=ReturnSubFechaSemaforo($Fecha,$PContacto);

		$FechaA=ReturnAddFecha($FAmarillo,$ArrayTT[tie_tra_total_dias]);

		#
		#
		# OBTENGO LA DELIVERY DATE MENOS LA FECHA DE CONTACTO , AL RESULTANTE LE SUMO LOS DIAS DE TRANSITO Y SI ES MENOR A LA FECHA DE ARRIBO ES AMARILLA
		#
		#

		if($FechaA<$ArrivalDATE)
		{

			$Res="Yellow";
			return $Res;
		}

		/// ROJO


		$FRojo=ReturnSubFechaSemaforo($Fecha,$SContacto);

		$FechaR=ReturnAddFecha($FRojo,$ArrayTT[tie_tra_total_dias]);


		#
		#
		# OBTENGO LA DELIVERY DATE MENOS LA FECHA DE CONTACTO , AL RESULTANTE LE SUMO LOS DIAS DE TRANSITO Y SI ES MAYOR A LA FECHA DE ARRIBO ES AMARILLA
		#
		#

		if($FechaR>$ArrivalDATE)
		{

			$Res="Red";
			return $Res;
		}


	}




}
*/


function SelectCausal($IdEvento,$TipoCausal)
{

   dbconnect();

   $Sql=dbquery("SELECT cau_id, cau_nombre FROM CausalEvento, Causal WHERE cau_eve_eve_id='$IdEvento' AND cau_eve_tipo='$TipoCausal' AND cau_eve_cau_id=cau_id ORDER BY cau_nombre ASC");
   while($Array=mysql_fetch_array($Sql))
   {
      ?>
        	<option value="<?=$Array[cau_id];?>"><?=$Array[cau_nombre];?></option>
          <?
   }

}

;?>