<?php

include_once __DIR__.'/../../core.php';
include_once(DOCROOT."/modules/fatture/modutil.php");

switch (post('op')) {
	
    case 'export-bulk':
	
        $dir = DOCROOT.'/files/export_interventi/';
        directory($dir.'tmp/');

        // Rimozione dei contenuti precedenti
        $files = glob($dir.'/*.zip');
        foreach ($files as $file) {
            delete($file);
        }

        // Selezione delle fatture da stampare
        $records = $dbo->fetchArray('SELECT in_interventi.id, in_interventi.codice, data_richiesta, ragione_sociale FROM in_interventi INNER JOIN an_anagrafiche ON in_interventi.idanagrafica=an_anagrafiche.idanagrafica WHERE in_interventi.id IN('.implode(',', $id_records).')');

        if (!empty($records)) {
            foreach ($records as $r) {
                //$numero = !empty($r['numero_esterno']) ? $r['numero_esterno'] : $r['numero'];
                $numero = $r['codice'];

                $numero = str_replace(['/', '\\'], '-', $numero);

                // Gestione della stampa
                $rapportino_nome = sanitizeFilename($numero.' '.date('Y_m_d', strtotime($r['data_richiesta'])).' '.$r['ragione_sociale'].'.pdf');
                $filename = slashes($dir.'tmp/'.$rapportino_nome);

                $_GET['idintervento'] = $r['id']; // Fix temporaneo per la stampa
                $idintervento = $r['id']; // Fix temporaneo per la stampa
                //$ptype = ($r['descrizione'] == 'Fattura accompagnatoria di vendita') ? 'fatture_accompagnatorie' : 'fatture';

                $ptype = 'interventi';

                require DOCROOT.'/pdfgen.php';
            }

            $dir = slashes($dir);
            $file = slashes($dir.'interventi_'.time().'.zip');

            // Creazione zip
            if (extension_loaded('zip')) {
                create_zip($dir.'tmp/', $file);

                // Invio al browser dello zip
                download($file);

                // Rimozione dei contenuti
                delete($dir.'tmp/');
            }
        }

	break;
		
    case 'creafatturavendita':
	
        $rs_idanagrafica = $dbo->fetchArray("SELECT idanagrafica FROM in_interventi WHERE id='".$id_records[0]."'");
        
        $idanagrafica = $rs_idanagrafica[0]['idanagrafica'];
        $data = date('Y-m-d');
        $dir = 'entrata';
        $idtipodocumento = '2';


        if (empty($_SESSION['m'.Modules::get('Fatture di vendita')['id']]['id_segment'])){
			$rs = $dbo->fetchArray("SELECT id  FROM zz_segments WHERE predefined = 1 AND id_module = ".prepare(Modules::get('Fatture di vendita')['id'])."LIMIT 0,1");
			$_SESSION['m'.Modules::get('Fatture di vendita')['id']]['id_segment'] = $rs[0]['id'];
		}

        $id_segment = $_SESSION['m'.Modules::get('Fatture di vendita')['id']]['id_segment'];

        $numero = get_new_numerofattura($data);

        $numero_esterno = get_new_numerosecondariofattura($data);
        $idconto = get_var('Conto predefinito fatture di vendita');

        $campo = ($dir == 'entrata') ? 'idpagamento_vendite' : 'idpagamento_acquisti';

        // Tipo di pagamento predefinito dall'anagrafica
        $query = 'SELECT id FROM co_pagamenti WHERE id=(SELECT '.$campo.' AS pagamento FROM an_anagrafiche WHERE idanagrafica='.prepare($idanagrafica).')';
        $rs = $dbo->fetchArray($query);
        $idpagamento = $rs[0]['id'];

        // Se la fattura è di vendita e non è stato associato un pagamento predefinito al cliente leggo il pagamento dalle impostazioni
        if ($dir == 'entrata' && $idpagamento == '') {
            $idpagamento = get_var('Tipo di pagamento predefinito');
        }
		
		
		$n_interventi = 0;
		
		//inserisco righe
        for( $i=0; $i<sizeof($id_records); $i++ ){
			
            $idintervento = $id_records[$i];

            $q = "SELECT id, in_interventi.descrizione,
                IFNULL( (SELECT MIN(orario_inizio) FROM in_interventi_tecnici WHERE in_interventi_tecnici.idintervento=in_interventi.id), data_richiesta) AS data,
                (SELECT costo_orario FROM in_tipiintervento WHERE idtipointervento=in_interventi.idtipointervento) AS costo_ore_unitario,
                (SELECT costo_km FROM in_tipiintervento WHERE idtipointervento=in_interventi.idtipointervento) AS costo_km_unitario,
                (SELECT SUM(prezzo_dirittochiamata) FROM in_interventi_tecnici GROUP BY idintervento HAVING idintervento=in_interventi.id) AS dirittochiamata,
                (SELECT SUM(km) FROM in_interventi_tecnici GROUP BY idintervento HAVING idintervento=in_interventi.id) AS km,
                (SELECT SUM(TIME_TO_SEC(TIMEDIFF(orario_fine, orario_inizio))) FROM in_interventi_tecnici GROUP BY idintervento HAVING idintervento=in_interventi.id) AS t1,
                (SELECT SUM(prezzo_ore_consuntivo) FROM in_interventi_tecnici GROUP BY idintervento HAVING idintervento=in_interventi.id) AS `tot_ore_consuntivo`,
                (SELECT SUM(prezzo_km_consuntivo) FROM in_interventi_tecnici GROUP BY idintervento HAVING idintervento=in_interventi.id) AS `tot_km_consuntivo`
                FROM in_interventi WHERE id=\"".$idintervento."\" AND idanagrafica=\"".$idanagrafica."\" AND id NOT IN (SELECT idintervento FROM co_righe_documenti WHERE idintervento != 'NULL') ";

            $rs = $dbo->fetchArray($q);
		
			if (count($rs)>0){
				
				//al primo ciclo preparo la fattura
				if ($n_interventi == 0){
					//preparo fattura
					$dbo->query('INSERT INTO co_documenti (numero, numero_esterno, idanagrafica, idconto, idtipodocumento, idpagamento, data, idstatodocumento, idsede, id_segment) VALUES ('.prepare($numero).', '.prepare($numero_esterno).', '.prepare($idanagrafica).', '.prepare($idconto).', '.prepare($idtipodocumento).', '.prepare($idpagamento).', '.prepare($data).", (SELECT `id` FROM `co_statidocumento` WHERE `descrizione`='Bozza'), (SELECT idsede_fatturazione FROM an_anagrafiche WHERE idanagrafica=".prepare($idanagrafica).'), '.$id_segment.' )');
					$iddocumento = $dbo->lastInsertedID();
				}
				
				$n_interventi++;
				
				$subtot_consuntivo = $rs[0]['tot_ore_consuntivo'] + $rs[0]['tot_km_consuntivo'];

				//Calcolo sconto se è stato arrotondato il prezzo
				$subtot = $subtot_consuntivo;
				$sconto = 0;

				//Aggiungo un'eventuale sconto in base al listino del cliente
				if( $prc_sconto < 0 ){
					$sconto += $subtot/100*abs($prc_sconto);
				}

				$descrizione = "Intervento numero ".$rs[0]['id']." del ".date( "d/m/Y", strtotime($rs[0]['data']) )."\n".html_entity_decode ( $rs[0]['descrizione'] );

				//Aggiunta impianti
				$rsi = $dbo->fetchArray("SELECT * FROM my_impianti_interventi INNER JOIN my_impianti ON my_impianti.id=my_impianti_interventi.idimpianto WHERE idintervento=\"".$rs[0]['id']."\"");
				if( sizeof($rsi) > 0 ){
					$descrizione .= "\nIMPIANTI:\n";

					for( $b=0; $b<sizeof($rsi); $b++ ){
						$descrizione .= $rsi[$b]['matricola']." - ".str_replace( "&quot;", "&amp;quot;",$rsi[$b]['nome'])."\n";
					}
				}
				//Aggiunta articoli utilizzati
				$rsa = $dbo->fetchArray("SELECT mg_articoli.descrizione, mg_articoli.codice, mg_articoli.prezzo_vendita, mg_articoli_interventi.qta, mg_articoli_interventi.sconto FROM mg_articoli_interventi INNER JOIN mg_articoli ON mg_articoli_interventi.idarticolo=mg_articoli.id WHERE idintervento=\"".$rs[0]['id']."\"");

				if( sizeof($rsa) > 0 ){
					$descrizione .= "\nARTICOLI UTILIZZATI:\n";

					for( $a=0; $a<sizeof($rsa); $a++ ){
						$descrizione .= $rsa[$a]['codice']." - ".$rsa[$a]['descrizione']." (x".number_format($rsa[$a]['qta'], 2, ",", "." ).")\n";
						$subtot += $rsa[$a]['prezzo_vendita'];
						$sconto += $rsa[$a]['sconto']*$rsa[$a]['qta'];
					}
				}

				//Aggiunta spese aggiuntive
				$rsa = $dbo->fetchArray("SELECT descrizione, qta, prezzo_vendita FROM in_righe_interventi WHERE idintervento=\"".$rs[0]['id']."\"");

				if( sizeof($rsa) > 0 ){
					$descrizione .= "\nALTRI COSTI:\n";

					for( $a=0; $a<sizeof($rsa); $a++ ){
						$descrizione .= $rsa[$a]['descrizione']." (x".number_format($rsa[$a]['qta'], 2, ",", "." ).")\n";
						$subtot += $rsa[$a]['prezzo'] * $rsa[$a]['qta'];
						$sconto += $rsa[$a]['sconto'];
					}
				}

				//Leggo l'anagrafica del cliente
				$rs = $dbo->fetchArray("SELECT idanagrafica, (SELECT MIN(orario_inizio) FROM in_interventi_tecnici WHERE idintervento='".$rs[0]['id']."') AS data FROM `in_interventi` WHERE id='".$rs[0]['id']."'");
				$idanagrafica = $rs[0]['idanagrafica'];
				$data = $rs[0]['data'];


				//Calcolo iva
				$idiva = get_var("Iva predefinita");
				$query = "SELECT * FROM co_iva WHERE id='".$idiva."'";
				$rs = $dbo->fetchArray($query);

				$iva = ($subtot-$sconto)/100*$rs[0]['percentuale'];
				$iva_indetraibile = $iva/100*$rs[0]['indetraibile'];
				$desc_iva = $rs[0]['descrizione'];

				//Calcolo rivalsa inps
				$query = "SELECT * FROM co_rivalsainps WHERE id='".get_var("Percentuale rivalsa INPS")."'";
				$rs = $dbo->fetchArray($query);
				$rivalsainps = ($subtot - $sconto) / 100 * $rs[0]['percentuale'];

				//Calcolo ritenuta d'acconto
				$query = "SELECT * FROM co_ritenutaacconto WHERE id='".get_var("Percentuale ritenuta d'acconto")."'";
				$rs = $dbo->fetchArray($query);
				$ritenutaacconto = ($subtot+$rivalsainps) / 100 * $rs[0]['percentuale'];


				//Aggiunta riga intervento sul documento
				$query1 = "INSERT INTO co_righe_documenti( iddocumento, idintervento, idiva, desc_iva, iva, iva_indetraibile, descrizione, subtotale, sconto, um, qta, idrivalsainps, rivalsainps, idritenutaacconto, ritenutaacconto ) VALUES( \"$iddocumento\", \"$idintervento\", \"".$idiva."\", \"$desc_iva\", \"$iva\", \"$iva_indetraibile\", \"$descrizione\", \"$subtot\", \"".$sconto."\", \"ore\", \"1\", \"".get_var("Percentuale rivalsa INPS")."\", \"".$rivalsainps."\", \"".get_var("Percentuale ritenuta d'acconto")."\", \"".$ritenutaacconto."\" )";
				if( $dbo->query( $query1 ) ){
					
					//Ricalcolo inps, ritenuta e bollo
					if( $dir=='entrata' ){
						ricalcola_costiagg_fattura($iddocumento);
					}else{
						ricalcola_costiagg_fattura($iddocumento, 0, 0, 0);
					}

					//Metto l'intervento in stato "Fatturato"
					$dbo->query("UPDATE in_interventi SET idstatointervento='FAT' WHERE id='$idintervento'");

				}
				
			}
        }
		
	
        if ($n_interventi>0) {
			
			$_SESSION['infos'][] = tr('Fattura _NUM_ creata!', [
				'_NUM_' => $numero_esterno,
			]);
			
			$_SESSION['infos'][] = tr('_NUM_ interventi fatturati!', [
				'_NUM_' => $n_interventi,
			]);
			
		}else{
			$_SESSION['warnings'][] = tr('Nessuna attività fatturata!');
		}
			
			
	break;
}

return [

	'export-bulk' => [
        'text' => tr('Esporta stampe'),
        'data' => [
            'msg' => tr('Vuoi davvero esportare queste stampe in un archivio?'),
            'button' => tr('Procedi'),
            'class' => 'btn btn-lg btn-warning',
            'blank' => true,
        ],
    ],
		
    'creafatturavendita' => [
        'text' => tr('Crea fattura'),
        'data' => [
            'msg' => tr('Vuoi davvero generare le fatture per questi interventi?'),
            'button' => tr('Procedi'),
            'class' => 'btn btn-lg btn-warning',
            'blank' => false,
        ],
    ],
	
];

?>