openstamanager/modules/ordini/actions.php

450 lines
19 KiB
PHP

<?php
include_once __DIR__.'/../../core.php';
include $docroot.'/modules/articoli/modutil.php';
include_once $docroot.'/modules/fatture/modutil.php';
$module = Modules::get($id_module);
if ($module['name'] == 'Ordini cliente') {
$dir = 'entrata';
} else {
$dir = 'uscita';
}
switch (post('op')) {
case 'add':
$idanagrafica = post('idanagrafica');
$data = $post['data'];
// Leggo se l'ordine è cliente o fornitore
$rs = $dbo->fetchArray('SELECT id FROM or_tipiordine WHERE dir='.prepare($dir));
$idtipoordine = $rs[0]['id'];
if (isset($post['idanagrafica'])) {
$numero = get_new_numeroordine($data);
if ($dir == 'entrata') {
$numero_esterno = get_new_numerosecondarioordine($data);
} else {
$numero_esterno = '';
}
$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 l'ordine è un ordine cliente 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');
}
$query = 'INSERT INTO or_ordini( numero, numero_esterno, idanagrafica, idtipoordine, idpagamento, data, idstatoordine ) VALUES ( '.prepare($numero).', '.prepare($numero_esterno).', '.prepare($idanagrafica).', '.prepare($idtipoordine).', '.prepare($idpagamento).', '.prepare($data).", (SELECT `id` FROM `or_statiordine` WHERE `descrizione`='Bozza') )";
$dbo->query($query);
$id_record = $dbo->lastInsertedID();
$_SESSION['infos'][] = tr('Aggiunto ordine numero _NUM_!', [
'_NUM_' => $numero,
]);
}
break;
case 'update':
$numero_esterno = post('numero_esterno');
$numero = post('numero');
$data = $post['data'];
$idanagrafica = post('idanagrafica');
$note = post('note');
$note_aggiuntive = post('note_aggiuntive');
$idstatoordine = post('idstatoordine');
$idpagamento = post('idpagamento');
$idsede = post('idsede');
$idconto = post('idconto');
$idagente = post('idagente');
$totale_imponibile = get_imponibile_ordine($id_record);
$totale_ordine = get_totale_ordine($id_record);
$tipo_sconto = $post['tipo_sconto_generico'];
$sconto = $post['sconto_generico'];
if ($dir == 'uscita') {
$idrivalsainps = post('idrivalsainps');
$idritenutaacconto = post('idritenutaacconto');
$bollo = post('bollo');
} else {
$idrivalsainps = 0;
$idritenutaacconto = 0;
$bollo = 0;
}
// Leggo la descrizione del pagamento
$query = 'SELECT descrizione FROM co_pagamenti WHERE id='.prepare($idpagamento);
$rs = $dbo->fetchArray($query);
$pagamento = $rs[0]['descrizione'];
// Query di aggiornamento
$query = 'UPDATE or_ordini SET idanagrafica='.prepare($idanagrafica).','.
' numero='.prepare($numero).','.
' data='.prepare($data).','.
' idagente='.prepare($idagente).','.
' idstatoordine='.prepare($idstatoordine).','.
' idpagamento='.prepare($idpagamento).','.
' idsede='.prepare($idsede).','.
' numero_esterno='.prepare($numero_esterno).','.
' note='.prepare($note).','.
' note_aggiuntive='.prepare($note_aggiuntive).','.
' idconto='.prepare($idconto).','.
' idrivalsainps='.prepare($idrivalsainps).','.
' idritenutaacconto='.prepare($idritenutaacconto).','.
' tipo_sconto_globale='.prepare($tipo_sconto).','.
' sconto_globale='.prepare($sconto).','.
' bollo=0, rivalsainps=0, ritenutaacconto=0 WHERE id='.prepare($id_record);
if ($dbo->query($query)) {
aggiorna_sconto([
'parent' => 'or_ordini',
'row' => 'or_righe_ordini',
], [
'parent' => 'id',
'row' => 'idordine',
], $id_record);
$query = 'SELECT descrizione FROM or_statiordine WHERE id='.prepare($idstatoordine);
$rs = $dbo->fetchArray($query);
// Ricalcolo inps, ritenuta e bollo (se l'ordine non è stato evaso)
if ($dir == 'entrata') {
if ($rs[0]['descrizione'] != 'Evaso') {
ricalcola_costiagg_ordine($id_record);
}
} else {
if ($rs[0]['descrizione'] != 'Evaso') {
ricalcola_costiagg_ordine($id_record, $idrivalsainps, $idritenutaacconto, $bollo);
}
}
$_SESSION['infos'][] = tr('Ordine modificato correttamente!');
}
break;
case 'addarticolo':
if (isset($post['idarticolo'])) {
$idarticolo = post('idarticolo');
$idiva = post('idiva');
$descrizione = post('descrizione');
$qta = post('qta');
$prezzo_vendita = post('prezzo');
// Calcolo dello sconto
$sconto_unitario = $post['sconto'];
$tipo_sconto = $post['tipo_sconto'];
$sconto = ($tipo_sconto == 'PRC') ? ($prezzo * $sconto_unitario) / 100 : $sconto_unitario;
$sconto = $sconto * $qta;
add_articolo_inordine($id_record, $idarticolo, $descrizione, $idiva, $qta, $post['um'], $prezzo_vendita * $qta, $sconto, $sconto_unitario, $tipo_sconto);
$_SESSION['infos'][] = tr('Articolo aggiunto!');
}
ricalcola_costiagg_ordine($id_record);
break;
case 'addriga':
// Selezione costi da intervento
$descrizione = post('descrizione');
$prezzo = post('prezzo');
$qta = post('qta');
$idiva = post('idiva');
$um = post('um');
$subtot = $prezzo * $qta;
// Calcolo dello sconto
$sconto_unitario = $post['sconto'];
$tipo_sconto = $post['tipo_sconto'];
$sconto = ($tipo_sconto == 'PRC') ? ($prezzo * $sconto_unitario) / 100 : $sconto_unitario;
$sconto = $sconto * $qta;
// Calcolo iva
$query = 'SELECT descrizione, percentuale, indetraibile FROM co_iva WHERE id='.prepare($idiva);
$rs = $dbo->fetchArray($query);
$iva = ($subtot - $sconto) / 100 * $rs[0]['percentuale'];
$iva_indetraibile = $iva / 100 * $rs[0]['indetraibile'];
$query = 'INSERT INTO or_righe_ordini(idordine, idiva, desc_iva, iva, iva_indetraibile, descrizione, subtotale, sconto, sconto_unitario, tipo_sconto, um, qta, is_descrizione, `order`) VALUES('.prepare($id_record).', '.prepare($idiva).', '.prepare($rs[0]['descrizione']).', '.prepare($iva).', '.prepare($iva_indetraibile).', '.prepare($descrizione).', '.prepare($subtot).', '.prepare($sconto).', '.prepare($sconto_unitario).', '.prepare($tipo_sconto).', '.prepare($um).', '.prepare($qta).', '.prepare(empty($qta)).', (SELECT IFNULL(MAX(`order`) + 1, 0) FROM or_righe_ordini AS t WHERE idordine='.prepare($id_record).'))';
$dbo->query($query);
// Messaggi informativi
if (!empty($idarticolo)) {
$_SESSION['infos'][] = tr('Articolo aggiunto!');
} elseif (!empty($qta)) {
$_SESSION['infos'][] = tr('Riga aggiunta!');
} else {
$_SESSION['infos'][] = tr('Riga descrittiva aggiunta!');
}
// Ricalcolo inps, ritenuta e bollo
if ($dir == 'entrata') {
ricalcola_costiagg_ordine($id_record);
} else {
ricalcola_costiagg_ordine($id_record);
}
break;
// Scollegamento articolo da ordine
case 'unlink_articolo':
$idarticolo = post('idarticolo');
$idriga = post('idriga');
if (!empty($idarticolo)) {
if (!rimuovi_articolo_daordine($idarticolo, $id_record, $idriga)) {
$_SESSION['errors'][] = tr('Alcuni serial number sono già stati utilizzati!');
return;
}
// if( $dbo->query($query) ){
// Ricalcolo inps, ritenuta e bollo
if ($dir == 'entrata') {
ricalcola_costiagg_ordine($id_record);
} else {
ricalcola_costiagg_ordine($id_record, 0, 0, 0);
}
$_SESSION['infos'][] = tr('Articolo rimosso!');
}
break;
// Scollegamento riga generica da ordine
case 'unlink_riga':
$idriga = post('idriga');
if (!empty($idriga)) {
$query = 'DELETE FROM or_righe_ordini WHERE idordine='.prepare($id_record).' AND id='.prepare($idriga);
$dbo->query($query);
// Ricalcolo inps, ritenuta e bollo
if ($dir == 'entrata') {
ricalcola_costiagg_ordine($id_record);
} else {
ricalcola_costiagg_ordine($id_record, 0, 0, 0);
}
$_SESSION['infos'][] = tr('Riga rimossa!');
}
break;
// Modifica riga
case 'editriga':
if (isset($post['idriga'])) {
$idriga = post('idriga');
$descrizione = post('descrizione');
$prezzo = post('prezzo');
$qta = post('qta');
$idiva = post('idiva');
$um = post('um');
$subtot = $prezzo * $qta;
// Calcolo dello sconto
$sconto_unitario = $post['sconto'];
$tipo_sconto = $post['tipo_sconto'];
$sconto = ($tipo_sconto == 'PRC') ? ($prezzo * $sconto_unitario) / 100 : $sconto_unitario;
$sconto = $sconto * $qta;
// Lettura idarticolo dalla riga documento
$rs = $dbo->fetchArray('SELECT idordine, idarticolo, qta, abilita_serial, is_descrizione FROM or_righe_ordini WHERE id='.prepare($idriga));
$idarticolo = $rs[0]['idarticolo'];
$old_qta = $rs[0]['qta'];
$idordine = $rs[0]['idordine'];
$abilita_serial = $rs[0]['abilita_serial'];
$is_descrizione = $rs[0]['is_descrizione'];
// Controllo per gestire i serial
if (!empty($idarticolo)) {
if (!controlla_seriali('id_riga_ordine', $idriga, $old_qta, $qta, $dir)) {
$_SESSION['errors'][] = tr('Alcuni serial number sono già stati utilizzati!');
return;
}
}
// Calcolo iva
$query = 'SELECT * FROM co_iva WHERE id='.prepare($idiva);
$rs = $dbo->fetchArray($query);
$iva = ($subtot - $sconto) / 100 * $rs[0]['percentuale'];
$iva_indetraibile = $iva / 100 * $rs[0]['indetraibile'];
$desc_iva = $rs[0]['descrizione'];
if ($is_descrizione == 0) {
// Modifica riga generica sul documento
$query = 'UPDATE or_righe_ordini SET idiva='.prepare($idiva).', desc_iva='.prepare($rs[0]['descrizione']).', iva='.prepare($iva).', iva_indetraibile='.prepare($iva_indetraibile).', descrizione='.prepare($descrizione).', subtotale='.prepare($subtot).', sconto='.prepare($sconto).', sconto_unitario='.prepare($sconto_unitario).', tipo_sconto='.prepare($tipo_sconto).', um='.prepare($um).', qta='.prepare($qta).' WHERE id='.prepare($idriga);
} else {
$query = 'UPDATE or_righe_ordini SET descrizione='.prepare($descrizione).' WHERE id='.prepare($idriga);
}
if ($dbo->query($query)) {
$_SESSION['infos'][] = tr('Riga modificata!');
// Ricalcolo inps, ritenuta e bollo
if ($dir == 'entrata') {
ricalcola_costiagg_ordine($id_record);
} else {
ricalcola_costiagg_ordine($id_record);
}
}
}
break;
// eliminazione ordine
case 'delete':
// Se ci sono degli articoli collegati (ma non collegati a preventivi o interventi) li rimetto nel magazzino
$query = 'SELECT id, idarticolo FROM or_righe_ordini WHERE idordine='.prepare($id_record).' AND NOT idarticolo=0';
$rs = $dbo->fetchArray($query);
foreach ($rs as $value) {
$non_rimovibili = seriali_non_rimuovibili('id_riga_documento', $value['id'], $dir);
if (!empty($non_rimovibili)) {
$_SESSION['errors'][] = tr('Alcuni serial number sono già stati utilizzati!');
return;
}
}
$dbo->query('DELETE FROM or_ordini WHERE id='.prepare($id_record));
$dbo->query('DELETE FROM or_righe_ordini WHERE idordine='.prepare($id_record));
$_SESSION['infos'][] = tr('Ordine eliminato!');
break;
case 'add_serial':
$idriga = $post['idriga'];
$idarticolo = $post['idarticolo'];
$serials = (array) $post['serial'];
foreach ($serials as $key => $value) {
if (empty($value)) {
unset($serials[$key]);
}
}
$dbo->sync('mg_prodotti', ['id_riga_ordine' => $idriga, 'dir' => $dir, 'id_articolo' => $idarticolo], ['serial' => $serials]);
break;
case 'update_position':
$start = filter('start');
$end = filter('end');
$id = filter('id');
if ($start > $end) {
$dbo->query('UPDATE `or_righe_ordini` SET `order`=`order` + 1 WHERE `order`>='.prepare($end).' AND `order`<'.prepare($start).' AND `idordine`='.prepare($id_record));
$dbo->query('UPDATE `or_righe_ordini` SET `order`='.prepare($end).' WHERE id='.prepare($id));
} elseif ($end != $start) {
$dbo->query('UPDATE `or_righe_ordini` SET `order`=`order` - 1 WHERE `order`>'.prepare($start).' AND `order`<='.prepare($end).' AND `idordine`='.prepare($id_record));
$dbo->query('UPDATE `or_righe_ordini` SET `order`='.prepare($end).' WHERE id='.prepare($id));
}
break;
case 'ordine_da_preventivo':
$idanagrafica = post('idanagrafica');
$idpreventivo = post('idpreventivo');
$data = $post['data'];
// Leggo se l'ordine è cliente o fornitore
$rs = $dbo->fetchArray('SELECT id FROM or_tipiordine WHERE dir='.prepare($dir));
$idtipoordine = $rs[0]['id'];
if (isset($post['idanagrafica'])) {
$numero = get_new_numeroordine($data);
if ($dir == 'entrata') {
$numero_esterno = get_new_numerosecondarioordine($data);
} else {
$numero_esterno = '';
}
$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 l'ordine è un ordine cliente 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');
}
$query = 'INSERT INTO or_ordini( numero, numero_esterno, idanagrafica, idtipoordine, idpagamento, data, idstatoordine ) VALUES ( '.prepare($numero).', '.prepare($numero_esterno).', '.prepare($idanagrafica).', '.prepare($idtipoordine).', '.prepare($idpagamento).', '.prepare($data).", (SELECT `id` FROM `or_statiordine` WHERE `descrizione`='Bozza') )";
$dbo->query($query);
$id_record = $dbo->lastInsertedID();
$_SESSION['infos'][] = tr('Aggiunto ordine numero _NUM_!', [
'_NUM_' => $numero,
]);
// Lettura di tutte le righe della tabella in arrivo
// Inserisco anche le righe descrittive
foreach ($post['evadere'] as $i => $value) {
// Processo solo le righe da evadere
if ($post['evadere'][$i] == 'on') {
$descrizione = post('descrizione')[$i];
$prezzo = post('subtot')[$i];
$qta = post('qta_da_evadere')[$i];
$idiva = post('idiva')[$i];
$um = post('um')[$i];
$subtot = $prezzo * $qta;
$idarticolo = post('idarticolo')[$i];
$sconto = post('sconto')[$i];
// Ottengo le informazioni sullo sconto
$qprc = 'SELECT tipo_sconto, sconto_unitario FROM co_righe_preventivi WHERE id='.prepare($i);
$rsprc = $dbo->fetchArray($qprc);
$sconto_unitario = $rsprc[0]['sconto_unitario'];
$tipo_sconto = $rsprc[0]['tipo_sconto'];
$sconto = $sconto * $qta;
// Calcolo iva
$query = 'SELECT descrizione, percentuale, indetraibile FROM co_iva WHERE id='.prepare($idiva);
$rs = $dbo->fetchArray($query);
$iva = ($subtot - $sconto) / 100 * $rs[0]['percentuale'];
$iva_indetraibile = $iva / 100 * $rs[0]['indetraibile'];
$query = 'INSERT INTO or_righe_ordini(idordine, idarticolo, idpreventivo, idiva, desc_iva, iva, iva_indetraibile, descrizione, subtotale, sconto, sconto_unitario, tipo_sconto, um, qta, is_descrizione, `order`) VALUES('.prepare($id_record).', '.prepare($idarticolo).', '.prepare($idpreventivo).', '.prepare($idiva).', '.prepare($rs[0]['descrizione']).', '.prepare($iva).', '.prepare($iva_indetraibile).', '.prepare($descrizione).', '.prepare($subtot).', '.prepare($sconto).', '.prepare($sconto_unitario).', '.prepare($tipo_sconto).', '.prepare($um).', '.prepare($qta).', '.prepare(empty($qta)).', (SELECT IFNULL(MAX(`order`) + 1, 0) FROM or_righe_ordini AS t WHERE idordine='.prepare($id_record).'))';
$dbo->query($query);
}
}
// Ricalcolo inps, ritenuta e bollo
if ($dir == 'entrata') {
ricalcola_costiagg_ordine($id_record);
} else {
ricalcola_costiagg_ordine($id_record);
}
}
break;
}
if (post('op') !== null && post('op') != 'update') {
aggiorna_sconto([
'parent' => 'or_ordini',
'row' => 'or_righe_ordini',
], [
'parent' => 'id',
'row' => 'idordine',
], $id_record);
}