<?

if (isset($this) && is_a($this,"gara") && isset($settings)) {
    $partecipanti = $this->getPartecipantiForAnomalia();
    usort($partecipanti,"sortPartecipantiTotale");
    if (!empty($partecipanti)) {
      $numero_partecipanti = count($partecipanti);
      $numSoglia = ceil($numero_partecipanti * 10 /100);
      $taglioAli = [];
      $i = 0;
      $contatore = 0;
      $punteggioAttuale = "";
      while($i < $numSoglia) {
        $partecipante = $partecipanti[$contatore];
        $taglioAli[] = $partecipante["codice"];
        if ($punteggioAttuale != $partecipante["totale"]) {
          $punteggioAttuale = $partecipante["totale"];
          $i++;
        }
        $contatore++;
      }
      if (isset($partecipanti[$contatore]) && $partecipanti[$contatore]["totale"] === $punteggioAttuale) {
        while($partecipanti[$contatore]["totale"] === $punteggioAttuale) {
          $partecipante = $partecipanti[$contatore];
          $taglioAli[] = $partecipante["codice"];
          $contatore++;
        }
      }
      $i = 0;
      $contatore = $numero_partecipanti -1;
      $punteggioAttuale = "";
      while($i < $numSoglia) {
        $partecipante = $partecipanti[$contatore];
        $taglioAli[] = $partecipante["codice"];
        if ($punteggioAttuale != $partecipante["totale"]) {
          $punteggioAttuale = $partecipante["totale"];
          $i++;
        }
        $contatore--;
      }
      if (isset($partecipanti[$contatore]) && $partecipanti[$contatore]["totale"] === $punteggioAttuale) {
        while($partecipanti[$contatore]["totale"] === $punteggioAttuale) {
          $partecipante = $partecipanti[$contatore];
          $taglioAli[] = $partecipante["codice"];
          $contatore--;
        }
      }
      reset($partecipanti);
      $somma = 0;
      $contatore = 0;
      foreach($partecipanti AS $partecipante) {
        if (in_array($partecipante["codice"],$taglioAli) === false) {
          $somma += $partecipante["totale"];
          $contatore++;
        }
      }
      $media = $somma / $contatore;
      if (!$soloSoglia) {
        if ($arrotondamento) {
          $somma = number_format($somma,$decimali);
          $media = number_format($media,$decimali);
        } else {
          $somma = truncate($somma,$decimali);
          $media = truncate($media,$decimali);
        }
      }
      reset($partecipanti);
      $contatore = 0;
      $sommaSuperiore = 0;
      foreach($partecipanti AS $partecipante) {
        if (in_array($partecipante["codice"],$taglioAli) === false && $partecipante["totale"] > $media) {
          $sommaSuperiore += $partecipante["totale"];
          $contatore++;
        }
      }
      $scarto_medio = ($sommaSuperiore - ($media * $contatore)) / $contatore;

      if (!$soloSoglia) {
        if ($arrotondamento) {
          $scarto_medio = number_format($scarto_medio,$decimali);
        } else {
          $scarto_medio = truncate($scarto_medio,$decimali);
        }
      }

      $rapporto = bcdiv($scarto_medio,$media,9);
      if (!$soloSoglia) { 
        if ($arrotondamento) {
          $rapporto = number_format($rapporto,$decimali);
        } else {
          $rapporto = truncate($rapporto,$decimali);
        }
      } 

      if ($rapporto <= 0.15) {
        $soglia_anomalia = $media * 1.20;
      } else {
        $soglia_anomalia = $media + $scarto_medio;
      }

      if ($arrotondamento) {
        $soglia_anomalia = number_format($soglia_anomalia,$decimali);
      } else {
        $soglia_anomalia = truncate($soglia_anomalia,$decimali);
      }

      $esclusione_automatica = false;
      $partecipanti_esclusione_automatica = 10;
      $firstRound = $this->getRounds()[0];
      if (strtotime($firstRound["pubblicazione"]) >= strtotime('2020-07-16')) {
        $partecipanti_esclusione_automatica = 5;
        if ($this->info["procedura"] == "aperta" || $this->info["procedura"] == "ristretta") {
          $partecipanti_esclusione_automatica = 10;
        }
      }
      if (strtotime($firstRound["pubblicazione"]) > strtotime('2019-04-18') && $numero_partecipanti >= $partecipanti_esclusione_automatica) {
        $esclusione_automatica = true;
        if ((strpos($this->info["tipologia"],"L") !== false && $this->info["prezzoRiferimento"] >= 5548000) || (strpos($this->info["tipologia"],"L") === false && $this->info["prezzoRiferimento"] >= 221000)) {
          $esclusione_automatica = false;
        }
      }

      $infoAnomalia = [];
      $infoAnomalia["somma"] = $somma;
      $infoAnomalia["media"] = $media;
      $infoAnomalia["scarto_medio"] = $scarto_medio;
      $infoAnomalia["rapporto"] = $rapporto;
      $infoAnomalia["soglia"] = $soglia_anomalia;
      $infoAnomalia["esclusione_automatica"] = $esclusione_automatica;
      $infoAnomalia["riepilogo"] = "Anomalia calcolata ai sensi dell'art. 97 c. 2-bis del D.lgs 50/2016 - Sommatoria: {$somma} - Media: {$media} - Scarto medio: {$scarto_medio} - Rapporto: {$rapporto} - Soglia individuata: {$soglia_anomalia}";
      $extraInfo = ["set-anomalia-{$this->round["codice"]}"=>json_encode($settings,JSON_PRETTY_PRINT),"info-anomalia-{$this->round["codice"]}"=>json_encode($infoAnomalia,JSON_PRETTY_PRINT)];
      
      reset($partecipanti);
      $salva = new salva();
      $salva->debug = false;
      
      $salva->nome_tabella = "r_partecipanti_gare";
      $salva->operazione = "UPDATE";
      foreach($partecipanti AS $partecipante) {
        if ($partecipante["totale"] >= $soglia_anomalia) {
          $partecipante["anomalia"] = "S";
          $partecipante["a_facoltativa"] = "N";
          $partecipante["motivazione_anomalia"] = "Calcolo automatico";
          if ($esclusione_automatica) {
            $partecipante["escluso"] = "S";
            $partecipante["esclusione_automatica"] = "S";
            $partecipante["motivazione"] = "Calcolo automatico anomalia";
          }
          $salva->oggetto = $partecipante;
          $salva->save();
        }
      }
      $errors = "";
    } else {
      $errors = __("Nessun partecipante ammesso");
    }
  } 
?>