$datadop = date("Ymd",$utsdop); //Carica i dati del bilancio IV direttiva CEE //Legge le linee del file $data = array(); $descon = array(); $lines=file('IVdirCEE.bil'); foreach($lines as $line) { $nuova = explode(';',$line,2); $descon[trim($nuova[0])] = $nuova[1]; $data[] = trim($nuova[0]); } $data = array_slice($data,1); $where = "datreg BETWEEN '$dataini' AND '$datafin' AND caucon <> 'CHI' AND caucon <> 'APE' OR (caucon = 'APE' AND datreg BETWEEN '$dataini' AND '$datadop') GROUP BY codcon "; $orderby = " codcon "; $rs_castel = gaz_dbi_dyn_query("codcon, ragso1, SUM(import*(darave='D')-import*(darave='A')) AS saldo, ceedar, ceeave", $gTables['rigmoc']." LEFT JOIN ".$gTables['tesmov']." ON ".$gTables['rigmoc'].".id_tes = ".$gTables['tesmov'].".id_tes LEFT JOIN ".$gTables['clfoco']." ON ".$gTables['rigmoc'].".codcon = ".$gTables['clfoco'].".codice LEFT JOIN ".$gTables['anagra']." ON ".$gTables['anagra'].".id = ".$gTables['clfoco'].".id_anagra", $where, $orderby); //procedura per la creazione dell'array dei conti riclassificati while ($castel = gaz_dbi_fetch_array($rs_castel)) { if ($castel["saldo"] > 0) { //se l'eccedenza è in dare if (! in_array(trim($castel['ceedar']),$data)) {//se non e' riclassificato // vedo se c'è la riclassificazione sul mastro $mastro = gaz_dbi_get_row($gTables['clfoco'],'codice',substr($castel['codcon'],0,3)."000000"); $castel['ceedar']=trim($mastro['ceedar']); if (! in_array($castel['ceedar'],$data)) {//se non e' riclassificato neanche il mastro $castel['ceedar']=$castel['codcon']; } } $conti[$castel['codcon']] = array($castel["saldo"],$castel["ragso1"],$castel["ceedar"]); } if ($castel["saldo"] < 0) {//se l'eccedenza è in avere
function getMovements($vat_section,$vat_reg,$date_ini,$date_fin) { global $gTables,$admin_aziend; $m=array(); $where = "datreg BETWEEN $date_ini AND $date_fin AND seziva = $vat_section AND regiva = $vat_reg"; $orderby="datreg, protoc"; $rs=gaz_dbi_dyn_query("YEAR(datreg) AS ctrl_sr, DATE_FORMAT(datdoc,'%d-%m-%Y') AS dd, DATE_FORMAT(datreg,'%d-%m-%Y') AS dr, CONCAT(".$gTables['anagra'].".ragso1, ' ',".$gTables['anagra'].".ragso2) AS ragsoc,clfoco,codiva, protoc,numdoc,datreg,caucon,regiva,operat,imponi,impost,periva, ".$gTables['tesmov'].".descri AS descri, ".$gTables['aliiva'].".descri AS desvat, ".$gTables['tesmov'].".id_tes AS id_tes, ".$gTables['aliiva'].".tipiva AS tipiva", $gTables['rigmoi']." LEFT JOIN ".$gTables['tesmov']." ON ".$gTables['rigmoi'].".id_tes = ".$gTables['tesmov'].".id_tes LEFT JOIN ".$gTables['clfoco']." ON ".$gTables['tesmov'].".clfoco = ".$gTables['clfoco'].".codice LEFT JOIN ".$gTables['anagra']." ON ".$gTables['anagra'].".id = ".$gTables['clfoco'].".id_anagra LEFT JOIN ".$gTables['aliiva']." ON ".$gTables['rigmoi'].".codiva = ".$gTables['aliiva'].".codice",$where,$orderby); $c_sr=0; $c_id=0; $c_p=0; $c_ndoc=array(); while ($r=gaz_dbi_fetch_array($rs)) { // inizio controllo errori di numerazione if (empty($r['tipiva'])){ // errore: aliquota IVA non tipizzata $r['err_t']='ERROR'; } if ($c_sr!=($r['ctrl_sr'])){ // devo azzerare tutto perchè è cambiato l'anno $c_sr=0; $c_id=0; $c_p=0; $c_ndoc=array(); if ($r['protoc']<>1){ // errore: il protocollo non è 1 // non lo rilevo in quanto i registri IVA non sono annuali } } else { $ex=$c_p+1; if ($r['protoc']<>$ex && $r['id_tes']<>$c_id){ // errore: il protocollo non è consecutivo $r['err_p']=$ex; } } if ($r['regiva']<4){ // il controllo sul numero solo per i registri delle fatture if ($r['caucon'] == 'FAD'){ $r['caucon'] = 'FAI'; } if (isset($c_ndoc[$r['caucon']])){ // controllo se il numero precedente è questo-1 $ex=$c_ndoc[$r['caucon']]+1; if ($r['numdoc']<>$ex && $c_id<>$r['id_tes']){ // errore: il numero non è consecutivo $r['err_n']=$ex; } } else { // dal primo documento di questo tipo ci si aspetta il n.1 if ($r['numdoc']<>1){ // errore: il numero non è 1 // non lo rilevo in quanto i registri IVA non sono annuali } } } $c_ndoc[$r['caucon']]=$r['numdoc']; $c_sr=$r['ctrl_sr']; $c_id=$r['id_tes']; $c_p=$r['protoc']; // fine controllo errori di numerazione $m[] = $r; } return $m; }
$result = $xpath->query("//ProgressivoInvio")->item(0); $progressivo_invio = $result->textContent; $sev_iva =substr($progressivo_invio,2,1); $protocollo =substr($progressivo_invio,3); $where = " protoc = ".$protocollo . ' and seziva = '. $sev_iva . " and datemi = '". $data_ora_ricezione . "'"; $result = gaz_dbi_dyn_query ("*", $gTables['tesdoc'], $where, $orderby, $limit, $passo); $r = gaz_dbi_fetch_array($result); if ($r == false) { $id_tes = 0; } else { $id_tes = $r['id_tes']; } echo $progressivo_invio . "_" . $sev_iva . "_" . $protocollo . "_" .$id_tes . "<br/>"; $errore = ""; $status="";
function getMovements($account_ini,$account_fin,$date_ini,$date_fin) { global $gTables; if ($account_ini==$account_fin || $account_fin==0 ) { if ($account_fin==0) { $account_fin=$account_ini; } $where = " codcon = $account_ini AND datreg BETWEEN $date_ini AND $date_fin"; $orderby = " datreg, id_tes ASC "; $select = $gTables['tesmov'].".id_tes,".$gTables['tesmov'].".descri AS tesdes,datreg,codice,protoc,numdoc,datdoc,".$gTables['clfoco'].".descri,import*(darave='D') AS dare,import*(darave='A') AS avere"; } else { $where = $gTables['clfoco'].".codice BETWEEN $account_ini AND $account_fin AND datreg BETWEEN $date_ini AND $date_fin GROUP BY ".$gTables['clfoco'].".codice"; $orderby = " codice ASC "; $select = "codice,".$gTables['clfoco'].".descri AS tesdes, COUNT(id_rig) AS rows, SUM(import*(darave='D')) AS dare, SUM(import*(darave='A')) AS avere"; } $table = $gTables['clfoco']." LEFT JOIN ".$gTables['rigmoc']." ON ".$gTables['clfoco'].".codice = ".$gTables['rigmoc'].".codcon " ."LEFT JOIN ".$gTables['tesmov']." ON ".$gTables['rigmoc'].".id_tes = ".$gTables['tesmov'].".id_tes "; $m=array(); $rs=gaz_dbi_dyn_query ($select, $table, $where, $orderby); while ($r = gaz_dbi_fetch_array($rs)) { $m[] = $r; } return $m; }
function getDocRef($data){ global $gTables; $r=''; switch ($data['caucon']) { case "FAI": case "FND": case "FNC": $tesdoc_result = gaz_dbi_dyn_query ('*',$gTables['tesdoc'], "id_con = ".$data["id_tes"], 'id_tes DESC',0,1); $tesdoc_r = gaz_dbi_fetch_array ($tesdoc_result); if ($tesdoc_r) { $r="../vendit/stampa_docven.php?id_tes=".$tesdoc_r["id_tes"]; } break; case "FAD": $tesdoc_result = gaz_dbi_dyn_query ('*',$gTables['tesdoc'], "tipdoc = \"".$data["caucon"]."\" AND seziva = ".$data["seziva"]." AND protoc = ".$data["protoc"]." AND numfat = '".$data["numdoc"]."' AND datfat = \"".$data["datdoc"]."\"", 'id_tes DESC'); $tesdoc_r = gaz_dbi_fetch_array ($tesdoc_result); if ($tesdoc_r) { $r="../vendit/stampa_docven.php?td=2&si=".$tesdoc_r["seziva"]."&pi=".$tesdoc_r['protoc']."&pf=".$tesdoc_r['protoc']."&di=".$tesdoc_r["datfat"]."&df=".$tesdoc_r["datfat"] ; } break; case "RIB": case "TRA": $effett_result = gaz_dbi_dyn_query ('*',$gTables['effett'],"id_con = ".$data["id_tes"],'id_tes',0,1); $effett_r = gaz_dbi_fetch_array ($effett_result); if ($effett_r) { $r="../vendit/stampa_effett.php?id_tes=".$effett_r["id_tes"]; } break; } return $r; }
function getLastDoc($item_code) { global $gTables; $rs=false; $rs_last_doc = gaz_dbi_dyn_query("*", $gTables['files'], " item_ref ='".$item_code."'",'id_doc DESC',0,1); $last_doc = gaz_dbi_fetch_array($rs_last_doc); // se e' il primo documento dell'anno, resetto il contatore if ($last_doc) { $rs=$last_doc; } return $rs; }
function getLastId($date,$seziva) { global $gTables; // ricavo l'ultimo id del giorno $rs_last = gaz_dbi_dyn_query("id_tes", $gTables['tesdoc'], "tipdoc = 'VCO' AND datemi = '".$date."' AND seziva = ".intval($seziva),'numdoc DESC',0,1); $last = gaz_dbi_fetch_array($rs_last); $id = 0; if ($last) { $id = $last['id_tes']; } return $id; }
function getMovements($date_ini,$date_fin) { global $gTables,$admin_aziend; $m=array(); $where="datreg BETWEEN $date_ini AND $date_fin"; $what=$gTables['movmag'].".*, ". $gTables['caumag'].".codice, ".$gTables['caumag'].".descri, ". $gTables['artico'].".codice, ".$gTables['artico'].".descri AS desart, ".$gTables['artico'].".unimis, ".$gTables['artico'].".scorta, ".$gTables['artico'].".catmer "; $table=$gTables['movmag']." LEFT JOIN ".$gTables['caumag']." ON (".$gTables['movmag'].".caumag = ".$gTables['caumag'].".codice) LEFT JOIN ".$gTables['artico']." ON (".$gTables['movmag'].".artico = ".$gTables['artico'].".codice)"; $rs=gaz_dbi_dyn_query ($what,$table,$where, 'datreg ASC, clfoco ASC'); while ($r = gaz_dbi_fetch_array($rs)) { $m[] = $r; } return $m; }
function getMovements($date_ini,$date_fin,$num_ini=1,$num_fin=999999999) { global $gTables,$admin_aziend; $m=array(); $where="scaden BETWEEN ".$date_ini." AND ".$date_fin." AND progre BETWEEN ".$num_ini." AND ".$num_fin; $what=$gTables['effett'].".*, ". $gTables['clfoco'].".codice, ". $gTables['banapp'].".descri AS desban, ". $gTables['anagra'].".ragso1, ".$gTables['anagra'].".ragso2 "; $table=$gTables['effett']." LEFT JOIN ".$gTables['clfoco']." ON ".$gTables['effett'].".clfoco = ".$gTables['clfoco'].".codice LEFT JOIN ".$gTables['anagra']." ON ".$gTables['anagra'].".id = ".$gTables['clfoco'].".id_anagra LEFT JOIN ".$gTables['banapp']." ON ".$gTables['banapp'].".codice = ".$gTables['effett'].".banapp"; $rs=gaz_dbi_dyn_query ($what,$table,$where,"tipeff ASC, scaden ASC, progre ASC"); while ($r = gaz_dbi_fetch_array($rs)) { $m[] = $r; } return $m; }
function getErrors($year) { global $gTables,$admin_aziend; $e=array(); $where="regiva > 0 and YEAR(datreg) = ".$year; $orderby="seziva, regiva, datreg, protoc "; $rs=gaz_dbi_dyn_query("*,(seziva*10+regiva) AS ctrl_sr, DATE_FORMAT(datdoc,'%d-%m-%Y') AS dd, DATE_FORMAT(datreg,'%d-%m-%Y') AS dr", $gTables['tesmov'],$where,$orderby); $c_sr=0; $c_p=0; $c_ndoc=array(); while ($r=gaz_dbi_fetch_array($rs)) { if ($c_sr!=($r['ctrl_sr'])){ // devo azzerare tutto perchè è cambiata la sezione o il registro $c_sr=0; $c_p=0; $c_ndoc=array(); if ($r['protoc']<>1){ // errore: il protocollo non è 1 $e[]=array('err'=>'P','id'=>$r['id_tes'],'rg'=>$r['regiva'],'pr'=>$r['protoc'],'nd'=>$r['numdoc'],'dd'=>$r['dd'],'sz'=>$r['seziva'],'ty'=>$r['caucon'],'ex'=>1,'de'=>$r['descri'],'dr'=>$r['dr']); } } else { $ex=$c_p+1; if ($r['protoc']<>$ex){ // errore: il protocollo non è consecutivo $e[]=array('err'=>'P','id'=>$r['id_tes'],'rg'=>$r['regiva'],'pr'=>$r['protoc'],'nd'=>$r['numdoc'],'dd'=>$r['dd'],'sz'=>$r['seziva'],'ty'=>$r['caucon'],'ex'=>$ex,'de'=>$r['descri'],'dr'=>$r['dr']); } } if ($r['regiva']<4){ // il controllo sul numero solo per i registri delle fatture if (isset($c_ndoc[$r['caucon']])){ // controllo se il numero precedente è questo-1 $ex=$c_ndoc[$r['caucon']]+1; if ($r['numdoc']<>$ex){ // errore: il numero non è consecutivo $e[]=array('err'=>'N','id'=>$r['id_tes'],'rg'=>$r['regiva'],'pr'=>$r['protoc'],'nd'=>$r['numdoc'],'dd'=>$r['dd'],'sz'=>$r['seziva'],'ty'=>$r['caucon'],'ex'=>$ex,'de'=>$r['descri'],'dr'=>$r['dr']); } } else { // dal primo documento di questo tipo ci si aspetta il n.1 if ($r['numdoc']<>1){ // errore: il numero non è 1 $e[]=array('err'=>'N','id'=>$r['id_tes'],'rg'=>$r['regiva'],'pr'=>$r['protoc'],'nd'=>$r['numdoc'],'dd'=>$r['dd'],'sz'=>$r['seziva'],'ty'=>$r['caucon'],'ex'=>1,'de'=>$r['descri'],'dr'=>$r['dr']); } } } $c_ndoc[$r['caucon']]=$r['numdoc']; $c_sr=$r['ctrl_sr']; $c_p=$r['protoc']; } return $e; }
function accountValue($last_closing,$date_closing) //funzione per la creazione dell'array dei conti con saldo diverso da 0 e ordinati per tipo e numero di conto { global $gTables; $where = "datreg BETWEEN $last_closing AND $date_closing GROUP BY codcon"; $orderby = " codcon ASC "; $select = $gTables['clfoco'].".descri AS name,codcon,(SUM(import*(darave='D')) - SUM(import*(darave='A'))) AS val"; $table = $gTables['clfoco']." LEFT JOIN ".$gTables['rigmoc']." ON ".$gTables['clfoco'].".codice = ".$gTables['rigmoc'].".codcon " ."LEFT JOIN ".$gTables['tesmov']." ON ".$gTables['rigmoc'].".id_tes = ".$gTables['tesmov'].".id_tes "; $rs=gaz_dbi_dyn_query($select, $table, $where, $orderby); $result=array(); $result['att']=array(); $result['pas']=array(); $result['cos']=array(); $result['ric']=array(); $result['tot']['cos']=0; $result['tot']['ric']=0; $result['tot']['att']=0; $result['tot']['pas']=0; while ($r = gaz_dbi_fetch_array($rs)) { if ($r['val'] <> 0) { $type='pas'; switch (substr($r['codcon'],0,1)) { case 4: //economici case 3: if ($r['val'] > 0) { $type='cos'; } else { $type='ric'; } break; default: //patrimoniali if ($r['val'] > 0) { $type='att'; } break; } $result[$type][$r['codcon']]=$r; $result['tot'][$type]+=$r['val']; } } return $result; }
function selectCompany($name,$val,$strSearch='',$val_hiddenReq='',$mesg,$class='FacetSelect') { global $gTables,$admin_aziend; $table=$gTables['aziend'].' LEFT JOIN '. $gTables['admin_module'].' ON '.$gTables['admin_module'].'.enterprise_id = '.$gTables['aziend'].'.codice'; $where=$gTables['admin_module'].'.adminid=\''.$admin_aziend['Login'].'\' GROUP BY enterprise_id'; if ($val>0 && $val<1000) { // vengo da una modifica della precedente select case quindi non serve la ricerca $co_rs=gaz_dbi_dyn_query("*",$table,'enterprise_id = '.$val.' AND '.$where,"ragso1 ASC"); $co=gaz_dbi_fetch_array($co_rs); changeEnterprise(intval($val)); echo "\t<input type=\"hidden\" name=\"$name\" value=\"$val\">\n"; echo "\t<input type=\"hidden\" name=\"search[$name]\" value=\"%%\">\n"; echo "\t<input type=\"submit\" value=\"".$co['ragso1']."\" name=\"change\" onclick=\"this.form.$name.value='0'; this.form.hidden_req.value='change';\" title=\"$mesg[2]\">\n"; } else { if (strlen($strSearch) >= 2) { //sto ricercando un nuovo partner echo "\t<select name=\"$name\" class=\"FacetSelect\" onchange=\"this.form.hidden_req.value='$name'; this.form.submit();\">\n"; $co_rs=gaz_dbi_dyn_query("*",$table,"ragso1 LIKE '".addslashes($strSearch)."%' AND ". $where,"ragso1 ASC"); if ($co_rs){ echo "<option value=\"0\"> ---------- </option>"; while ($r = gaz_dbi_fetch_array($co_rs)) { $selected = ''; if ($r['enterprise_id'] == $val) { $selected = "selected"; } echo "\t\t <option value=\"".$r['enterprise_id']."\" $selected >".intval($r['enterprise_id'])."-".$r["ragso1"]."</option>\n"; } echo "\t </select>\n"; } else { $msg = $mesg[0]; } } else { $msg = $mesg[1]; echo "\t<input type=\"hidden\" name=\"$name\" value=\"$val\">\n"; } echo "\t<input type=\"text\" name=\"search[$name]\" value=\"".$strSearch."\" maxlength=\"15\" size=\"6\" class=\"FacetInput\">\n"; if (isset($msg)) { echo "<input type=\"text\" style=\"color: red; font-weight: bold;\" size=\"".strlen($msg)."\" disabled value=\"$msg\">"; } echo "\t<input type=\"image\" align=\"middle\" name=\"search_str\" src=\"../../library/images/cerbut.gif\">\n"; } }
function getMovements($date_ini,$date_fin) { global $gTables,$admin_aziend; $where = "datreg BETWEEN $date_ini AND $date_fin GROUP BY seziva,regiva,codiva"; $orderby="seziva, regiva, datreg, protoc"; $rs=gaz_dbi_dyn_query("seziva,regiva,codiva,periva,operat, SUM((imponi*(operat = 1) - imponi*(operat = 2))*(-2*(regiva > 5)+1)) AS imp, SUM((impost*(operat = 1) - impost*(operat = 2))*(-2*(regiva > 5)+1)) AS iva, ".$gTables['aliiva'].".descri AS desvat, ".$gTables['aliiva'].".tipiva AS tipiva", $gTables['rigmoi']." LEFT JOIN ".$gTables['tesmov']." ON ".$gTables['rigmoi'].".id_tes = ".$gTables['tesmov'].".id_tes LEFT JOIN ".$gTables['aliiva']." ON ".$gTables['rigmoi'].".codiva = ".$gTables['aliiva'].".codice",$where,$orderby); $m=array(); $m['tot']=0; while ($r=gaz_dbi_fetch_array($rs)) { if ($r['tipiva']=='D'){ // iva indetraibile $r['isp']=0; $r['ind']=$r['iva']; $r['iva']=0; } elseif ($r['tipiva']=='T'){ // iva split payment $r['isp']=$r['iva']; $r['ind']=0; $r['iva']=0; } else { // iva normale $r['ind']=0; $r['isp']=0; } $m['data'][]=$r; if (!isset($m['tot_rate'][$r['codiva']])) { $m['tot_rate'][$r['codiva']]=$r; } else { $m['tot_rate'][$r['codiva']]['imp']+=$r['imp']; $m['tot_rate'][$r['codiva']]['iva']+=$r['iva']; $m['tot_rate'][$r['codiva']]['ind']+=$r['ind']; $m['tot_rate'][$r['codiva']]['isp']+=$r['isp']; } $m['tot']+=$r['iva']; } return $m; }
<?php require("../../library/include/datlib.inc.php"); $admin_aziend=checkAdmin(); $return_arr = array(); $term = filter_var(substr($_GET['term'],0,20),FILTER_SANITIZE_MAGIC_QUOTES); if(strlen($term) >1) { $result = gaz_dbi_dyn_query("id,ragso1,citspe",$gTables['anagra'],"ragso1 LIKE '%".$term."%'",'ragso1'); while($row = gaz_dbi_fetch_array($result)) { $r['id']=$row['id']; $r['label']=$row['ragso1']; $r['value']=$row['ragso1']; array_push($return_arr,$r); } echo json_encode($return_arr); } else { return; } ?>
function getExtremeValue($table_name,$min_max='MIN') { $rs=gaz_dbi_dyn_query ($min_max.'(codice) AS value',$table_name); $data=gaz_dbi_fetch_array($rs); return $data['value']; }
echo "\t </select>\n"; echo "\t <select name=\"annfin\" class=\"FacetSelect\" onchange=\"this.form.submit()\">\n"; for( $counter = date("Y")-10; $counter <= date("Y")+10; $counter++ ){ $selected = ""; if($counter == $_GET['annfin']) $selected = "selected"; echo "\t\t <option value=\"$counter\" $selected >$counter</option>\n"; } echo "\t </select></td></tr>\n"; if ($msg == "") { echo "<tr><td class=\"FacetFieldCaptionTD\"></td><td align=\"right\" colspan=\"4\" class=\"FacetFooterTD\"> <input type=\"submit\" name=\"Return\" value=\"".$script_transl['return']."\"> <input type=\"submit\" name=\"anteprima\" value=\"".$script_transl['view']."!\"> </td></tr>\n"; } echo "</table>\n"; if (isset($_GET['anteprima']) and $msg == "") { $result = gaz_dbi_dyn_query($gTables['rigdoc'].".*,".$gTables['tesdoc'].".id_tes,".$gTables['tesdoc'].".tipdoc,".$gTables['tesdoc'].".numdoc,".$gTables['tesdoc'].".datemi,".$gTables['tesdoc'].".datfat,".$gTables['tesdoc'].".imball,".$gTables['tesdoc'].".clfoco,".$gTables['tesdoc'].".caumag,".$gTables['tesdoc'].".sconto as scochi", $gTables['rigdoc']." LEFT JOIN ".$gTables['tesdoc']." ON ".$gTables['rigdoc'].".id_tes = ".$gTables['tesdoc'].".id_tes LEFT JOIN ".$gTables['caumag']." ON ".$gTables['tesdoc'].".caumag = ".$gTables['caumag'].".codice", "tiprig = 0 AND id_mag = 0 AND caumag > 0 AND datemi BETWEEN $datainizio AND $datafine ", " datemi ASC, ".$gTables['tesdoc'].".id_tes ASC, id_rig ASC"); $numrow = gaz_dbi_num_rows($result); echo "<table class=\"Tlarge\">"; if ($numrow > 0) { echo "<tr><td class=\"FacetFieldCaptionTD\" colspan=\"6\" >$numrow ".$script_transl[5]."</td></tr>"; require("../../modules/vendit/lang.".$admin_aziend['lang'].".php"); $desdoc = $strScript["admin_docven.php"][0]; require("../../modules/acquis/lang.".$admin_aziend['lang'].".php"); $desdoc += $strScript["admin_docacq.php"][0]; while ($row = gaz_dbi_fetch_array($result)) { echo "<tr>\n"; $valore = CalcolaImportoRigo($row['quanti'], $row['prelis'], $row['sconto']) ; $valore = CalcolaImportoRigo(1, $valore, $row['scochi']) ; $descri = $desdoc[$row['tipdoc']]." n.".$row['numdoc']; echo "<td class=\"FacetDataTD\" align=\"center\">".gaz_format_date($row["datemi"])." </td>\n"; echo "<td class=\"FacetDataTD\" align=\"center\">".$row["caumag"]." - ".$row["descri"]."</td>\n";
$mesfin = substr($_GET['rf'],2,2); $annfin = substr($_GET['rf'],4,4); $utsfin= mktime(0,0,0,$mesfin,$giofin,$annfin); $datafine = date("Ymd",$utsfin); if ($_GET['rp'] <> 'S') { $ristampa = "status <> 'DISTINTATO' and "; } else { $ristampa = "(banacc = '".intval($_GET['ba'])."' or banacc = 0) and "; } $luogo_data=$admin_aziend['citspe'].", lì "; $where = $ristampa." scaden BETWEEN '".$datainizio."' AND '".$datafine."' AND progre BETWEEN '".intval($_GET['ni'])."' AND '".intval($_GET['nf'])."'"; $result = gaz_dbi_dyn_query("*", $gTables['effett'],$where,"tipeff, scaden, id_tes"); $anagrafica = new Anagrafica(); $banacc = $anagrafica->getPartner(intval($_GET['ba'])); $descbanacc = $banacc['ragso1']; if (isset($_GET['de'])) { $luogo_data .= ucwords(strftime("%d %B %Y",$utsemi)); } else { $luogo_data .=ucwords(strftime("%d %B %Y", mktime (0,0,0,date("m"),date("d"),date("Y")))); } $title = array('luogo_data'=>$luogo_data, 'title'=>'Distinta effetti dal '.strftime("%d %B %Y",$utsini).' al '.strftime("%d %B %Y",$utsfin), 'hile'=>array(array('lun' => 18,'nam'=>'Scadenza'), array('lun' => 18,'nam'=>'Effetto'), array('lun' => 100,'nam'=>'Cliente / Indirizzo,P.IVA / Fattura'), array('lun' => 30,'nam'=>'Appoggio'),
function getProtocol($type,$year,$sezione) // questa funzione trova l'ultimo numero di protocollo { // controllando sia l'archivio documenti che il global $gTables; // registro IVA acquisti $rs_ultimo_tesdoc = gaz_dbi_dyn_query("*", $gTables['tesdoc'],"YEAR(datemi) = $year AND tipdoc LIKE '".substr($type,0,2)."_' AND seziva = $sezione","protoc DESC",0,1); $ultimo_tesdoc = gaz_dbi_fetch_array($rs_ultimo_tesdoc); $rs_ultimo_tesmov = gaz_dbi_dyn_query("*", $gTables['tesmov'],"YEAR(datreg) = $year AND regiva = 6 AND seziva = $sezione","protoc DESC",0,1); $ultimo_tesmov = gaz_dbi_fetch_array($rs_ultimo_tesmov); $lastProtocol=0; if ($ultimo_tesdoc) { $lastProtocol = $ultimo_tesdoc['protoc']; } if ($ultimo_tesmov) { if ($ultimo_tesmov['protoc'] > $lastProtocol){ $lastProtocol = $ultimo_tesmov['protoc']; } } return $lastProtocol+1; }
if (isset($_POST['Delete'])) { $testata = gaz_dbi_get_row($gTables['tesdoc'], "id_tes", $_GET['id_tes']); if (substr($testata['tipdoc'],0,2) == 'DD'){ $where = "tipdoc LIKE 'DD_' AND seziva = '".$testata['seziva']."' AND numfat = 0" ; } elseif (substr($testata['tipdoc'],0,2) == 'AF'){ $where = "tipdoc LIKE 'AF_'"; } elseif (substr($testata['tipdoc'],0,2) == 'AD'){ $where = "tipdoc LIKE 'AD_'"; } $rs_ultimo_documento = gaz_dbi_dyn_query("*", $gTables['tesdoc'], $where,"id_tes DESC",0,1); $ultimo_documento = gaz_dbi_fetch_array($rs_ultimo_documento); // ricavo il progressivo annuo, ma se e' il primo documento dell'anno, resetto il contatore if ($ultimo_documento and $ultimo_documento['id_tes'] == $testata['id_tes']) { //allora procedo all'eliminazione della testata e dei righi... gaz_dbi_del_row($gTables['tesdoc'], "id_tes", $testata['id_tes']); $rs_righidel = gaz_dbi_dyn_query("*", $gTables['rigdoc'], "id_tes = '".$testata['id_tes']."'","id_tes desc"); while ($a_row = gaz_dbi_fetch_array($rs_righidel)) { gaz_dbi_del_row($gTables['rigdoc'], "id_rig", $a_row['id_rig']); if (intval($a_row['id_mag']) > 0){ //se c'è stato un movimento di magazzino lo azzero $upd_mm->uploadMag('DEL',$testata['tipdoc'],'','','','','','','','','','',$a_row['id_mag'],$admin_aziend['stock_eval_method']); } } header("Location: ".$_POST['ritorno']); exit; } else { $message = "Si stà tentando di eliminare un documento diverso dall'ultimo emesso !".$ultimo_documento['tipdoc'].$ultimo_documento['id_tes']; } } if (isset($_POST['Return'])) { header("Location: report_ddtacq.php");
if (!isset($_GET['flag_order'])) { $orderby = " id_doc DESC"; } print "<div align=\"center\" class=\"FacetFormHeaderFont\">".$script_transl['title']."</div>\n"; print "<form method=\"GET\">"; print '<table class="Tlarge">'; echo "<tr><td></td><td class=\"FacetFieldCaptionTD\" >".$script_transl['item'].":\n"; echo "<input type=\"text\" name=\"auxil\" value=\""; if ($auxil != "&all=yes"){ echo $auxil; } echo "\" maxlength=\"6\" size=\"3\" tabindex=\"1\" class=\"FacetInput\"></td>\n"; echo "<td><input type=\"submit\" name=\"search\" value=\"".$script_transl['search']."\" tabindex=\"1\" onClick=\"javascript:document.report.all.value=1;\"></td>\n"; echo "<td><input type=\"submit\" name=\"all\" value=\"".$script_transl['vall']."\" onClick=\"javascript:document.report.all.value=1;\"></td></tr>\n"; $result = gaz_dbi_dyn_query ('*',$gTables['files']." LEFT JOIN ".$gTables['artico']." ON ".$gTables['files'].".item_ref = ".$gTables['artico'].".codice", $where, $orderby, $limit, $passo); // creo l'array (header => campi) per l'ordinamento dei record $headers_mov = array ( "ID" => "id_doc", $script_transl['item'] => "item_ref", $script_transl['table_name_ref'] => "table_name_ref", $script_transl['note'] => "title", $script_transl['ext'] => "extension", 'Download' => "", $script_transl['delete'] => "" ); $linkHeaders = new linkHeaders($headers_mov); $linkHeaders -> output(); $recordnav = new recordnav($gTables['files'], $where, $limit, $passo); $recordnav -> output(); while ($a_row = gaz_dbi_fetch_array($result)) {
// creo l'array (header => campi) per l'ordinamento dei record $headers_tesdoc = array ( 'N.' => 'id_agente', $script_transl[3] => 'ragso1', $script_transl[4]=> 'telefo', $script_transl[5]=> 'fax', $script_transl[19] => '', $script_transl[6] => 'base_percent', $script_transl['delete'] => '' ); $linkHeaders = new linkHeaders($headers_tesdoc); $linkHeaders -> output(); ?> </tr> <?php $result = gaz_dbi_dyn_query($gTables['agenti'].".*,".$gTables['anagra'].".telefo,".$gTables['anagra'].".ragso1,".$gTables['anagra'].".ragso2,".$gTables['anagra'].".fax", $gTables['agenti']." LEFT JOIN ".$gTables['clfoco']." on ".$gTables['agenti'].".id_fornitore = ".$gTables['clfoco'].".codice LEFT JOIN ".$gTables['anagra'].' ON '.$gTables['clfoco'].'.id_anagra = '.$gTables['anagra'].'.id', $where, $orderby,$limit, $passo); while ($a_row = gaz_dbi_fetch_array($result)) { echo "<tr><td class=\"FacetDataTD\" align=\"center\"><a class=\"btn btn-xs btn-default btn-edit\" href=\"admin_agenti.php?id_agente=".$a_row['id_agente']."&Update\"><i class=\"glyphicon glyphicon-edit\"></i> ".$a_row['id_agente']."</a></td>"; echo "<td class=\"FacetDataTD\">".$a_row["ragso1"]." ".$a_row["ragso2"]." </td>"; echo "<td class=\"FacetDataTD\" align=\"center\">".$a_row["telefo"]." </td>"; echo "<td class=\"FacetDataTD\" align=\"center\">".$a_row["fax"]." </td>"; echo "<td class=\"FacetDataTD\" align=\"center\"><a class=\"btn btn-xs btn-default\" href=\"select_provvigioni.php?id_agente=".$a_row['id_agente']."\"><i class=\"glyphicon glyphicon-print\"></i> </a></td>"; echo "<td class=\"FacetDataTD\" align=\"center\">".$a_row["base_percent"]." </td>"; echo "<td class=\"FacetDataTD\" align=\"center\"><a class=\"btn btn-xs btn-default btn-elimina\" href=\"delete_agenti.php?id_agente=".$a_row['id_agente']."\"><i class=\"glyphicon glyphicon-remove\"></i> </a></td>"; echo "</tr>\n"; } ?> </form> </table> </body> </html>
function getModule($login,$enterprise_id) { global $gTables,$admin_aziend; //trovo i moduli installati $mod_found=array(); $relativePath = '../../modules'; if ($handle = opendir($relativePath)) { while ($exist_mod = readdir($handle)) { if ($exist_mod == "." || $exist_mod == ".." || $exist_mod == ".svn" || $exist_mod == "root" ) continue; $rs_mod = gaz_dbi_dyn_query(" am.access ,am.moduleid, module.name", $gTables['admin_module'].' AS am LEFT JOIN '.$gTables['module']. ' AS module ON module.id=am.moduleid ', " am.adminid = '".$login."' AND module.name = '$exist_mod' AND am.enterprise_id = '$enterprise_id'","am.adminid",0,1); require("../../modules/$exist_mod/menu.".$admin_aziend['lang'].".php"); $row = gaz_dbi_fetch_array($rs_mod); if (!isset($row['moduleid'])){ $row['name']=$exist_mod; $row['moduleid']=0; $row['access']=0; } $row['transl_name'] = $transl[$exist_mod]['name']; $mod_found[$exist_mod] = $row; } closedir($handle); } return $mod_found; }
<?php require("../../library/include/datlib.inc.php"); $admin_aziend=checkAdmin(); $rs_row = gaz_dbi_dyn_query('codice,image', $gTables['artico'], "image NOT LIKE ''"); while ($r = gaz_dbi_fetch_array($rs_row)) { $img=imagecreatefromstring($r['image']); imagepng($img,$_SERVER['DOCUMENT_ROOT'].'/temp.png'); $png = addslashes(file_get_contents($_SERVER['DOCUMENT_ROOT']."/temp.png", "r")); gaz_dbi_put_row($gTables['artico'],'codice',$r['codice'],'image',$png); } $rs_row = gaz_dbi_dyn_query('codice,image', $gTables['catmer'], "image NOT LIKE ''"); while ($r = gaz_dbi_fetch_array($rs_row)) { $img=imagecreatefromstring($r['image']); imagepng($img,$_SERVER['DOCUMENT_ROOT'].'/temp.png'); $png = addslashes(file_get_contents($_SERVER['DOCUMENT_ROOT']."/temp.png", "r")); gaz_dbi_put_row($gTables['catmer'],'codice',$r['codice'],'image',$png); } $rs_row = gaz_dbi_dyn_query('codice,image', $gTables['aziend'], "image NOT LIKE ''"); while ($r = gaz_dbi_fetch_array($rs_row)) { $img=imagecreatefromstring($r['image']); imagepng($img,$_SERVER['DOCUMENT_ROOT'].'/temp.png'); $png = addslashes(file_get_contents($_SERVER['DOCUMENT_ROOT']."/temp.png", "r")); gaz_dbi_put_row($gTables['aziend'],'codice',$r['codice'],'image',$png); } print 'Se durante l\'esecuzione di questo script non si sono verificati errori, dovresti aver convertito i file JPG del logo, degli articoli e delle categorie merceologiche in PNG, clicca <A HREF="admin.php" > QUI </A> per tornare alla home page';
//$script_transl['export']; echo '" tabindex="100" >'; echo "\t </td>\n"; echo "\t </tr>\n"; echo "</table>\n"; echo "</form>\n"; } else { $utsdate= mktime(0,0,0,$form['this_date_M'],$form['this_date_D'],$form['this_date_Y']); $date = date("Y-m-d",$utsdate); $where="catmer = ".$form["catmer"]; if ($form['catmer'] == 100) { $where=1; } $ctrl_cm=0; $result = gaz_dbi_dyn_query($gTables['artico'].'.*, '.$gTables['catmer'].'.descri AS descat,'.$gTables['catmer'].'.annota AS anncat', $gTables['artico'].' LEFT JOIN '.$gTables['catmer'].' ON catmer = '.$gTables['catmer'].'.codice', $where,'catmer ASC, '.$gTables['artico'].'.codice ASC'); if ($result) { // Imposto totale valore giacenza by DF $tot_val_giac = 0; while ($r = gaz_dbi_fetch_array($result)) { if ($r['catmer']<>$ctrl_cm ){ gaz_set_time_limit (30); $ctrl_cm=$r['catmer']; } $mv=$gForm->getStockValue(false,$r['codice'],$date,null,$admin_aziend['decimal_price']); $magval=array_pop($mv); if ( $magval['q_g'] > 0 ) { $form['a'][$r['codice']]['i_d'] = $r['descri']; $form['a'][$r['codice']]['i_u'] = $r['unimis'];
<tr> <td class="FacetFieldCaptionTD"> <input placeholder="Cerca" class="input-xs form-control" type="text" name="auxil1" value="<?php echo $auxil1 ?>" maxlength="6" size="7" tabindex="1" class="FacetInput"> </td> <td class="FacetFieldCaptionTD"> <input placeholder="Cerca Ragione Sociale" class="input-xs form-control" type="text" name="auxil" value="<?php if ($auxil != "&all=yes") echo $auxil; ?>" maxlength="6" size="7" tabindex="1" class="FacetInput"> </td> <td> <input type="submit" class="btn btn-xs btn-default" name="search" value="Cerca" tabindex="1" onClick="javascript:document.report.all.value=1;"> </td> <td colspan="3"> <input type="submit" class="btn btn-xs btn-default" name="all" value="Mostra tutti" onClick="javascript:document.report.all.value=1;"> </td> </tr> <?php $result = gaz_dbi_dyn_query ('*', $gTables['clfoco'].' LEFT JOIN '.$gTables['anagra'].' ON '.$gTables['clfoco'].'.id_anagra = '.$gTables['anagra'].'.id', $where, $orderby, $limit, $passo); // creo l'array (header => campi) per l'ordinamento dei record $headers_ = array ( "Codice" => "codice", "Ragione Sociale" => "ragso1", "Tipo" => "sexper", "Città" => "citspe", "Telefono" => "telefo", "P.IVA - C.F." => "", "Privacy" => "" , "Riscuoti" => "" , "Visualizza <br /> e/o stampa" => "", "Cancella" => "" ); $linkHeaders = new linkHeaders($headers_); $linkHeaders -> output();
$form["pay_schedule"] = intval($_POST["pay_schedule"]); $chk_acc=true; for ($i=1; $i<=6; $i++) { $form["contr".$i] = intval($_POST["contr".$i]); if ($form["contr".$i]>100 && $chk_acc==true) { $chk_acc=false; } $form["tipim".$i] = substr($_POST["tipim".$i],0,1); $form["daav_".$i] = substr($_POST["daav_".$i],0,1); } if (isset($_POST['submit'])) { if ($toDo == 'insert') { //se è un'inserimento if ($chk_acc) $msg .= "3+"; if (empty($form["descri"])) $msg .= "1+"; if (!empty($form["codice"])) { $rs_cau = gaz_dbi_dyn_query("*", $gTables['caucon'], "codice = '".$form["codice"]."'","codice DESC",0,1); $rs = gaz_dbi_fetch_array($rs_cau); if ($rs) { $msg .= "2+"; } switch ($form["codice"]) { case "CHI": $msg .= "4+"; break; case "APE": $msg .= "5+"; break; } } else { $msg .= "0+"; }
?> <div align="center" class="FacetFormHeaderFont"><?php echo $script_transl['report']; ?></div> <?php $recordnav = new recordnav($gTables['imball'], $where, $limit, $passo); $recordnav -> output(); ?> <table class="Tlarge"> <?php $headers_imball = array ( $script_transl['codice'] => "codice", $script_transl['descri'] => "descri", $script_transl['weight'] => "weight", $script_transl['annota'] => "annota", $script_transl['delete'] => "" ); $linkHeaders = new linkHeaders($headers_imball); $linkHeaders -> output(); $result = gaz_dbi_dyn_query ('*', $gTables['imball'], $where, $orderby, $limit, $passo); while ($a_row = gaz_dbi_fetch_array($result)) { print "<tr>"; print "<td class=\"FacetDataTD\" align=\"center\"><a class=\"btn btn-xs btn-default\" href=\"admin_imball.php?Update&codice=".$a_row["codice"]."\"><i class=\"glyphicon glyphicon-edit\"></i> ".$a_row["codice"]."</a>  </td>"; print "<td class=\"FacetDataTD\">".$a_row["descri"]." </td>"; print "<td class=\"FacetDataTD\" align=\"center\">".$a_row["weight"]." </td>"; print "<td class=\"FacetDataTD\" align=\"center\">".$a_row["annota"]." </td>"; print "<td class=\"FacetDataTD\" align=\"center\"><a class=\"btn btn-xs btn-default btn-elimina\" href=\"delete_imball.php?codice=".$a_row["codice"]."\"><i class=\"glyphicon glyphicon-remove\"></i></a></td>"; print "</tr>"; } ?> </table> </body> </html>
$anagra=$anagra_with_same_pi; $msg .= '15+'; } } } if (!empty($r_cf)) { $msg .= "11+"; } if (!($form['codfis']=="") && !($form['codfis']=="00000000000")) { $partner_with_same_cf=$anagrafica->queryPartners('*', "codice <> ".$real_code." AND codice BETWEEN ".$admin_aziend['mascli']."000000 AND ".$admin_aziend['mascli']."999999 AND codfis = '".$form['codfis']."'","codfis DESC",0,1); if ($partner_with_same_cf) { // c'è già un cliente sul piano dei conti if ($partner_with_same_cf[0]['fe_cod_univoco'] == $form['fe_cod_univoco']) { // c'è già un cliente sul piano dei conti ed è anche lo stesso ufficio ( amministrativo della PA ) $msg .= "12+"; } } elseif ($form['id_anagra']==0) { // è un nuovo cliente senza anagrafica $rs_anagra_with_same_cf=gaz_dbi_dyn_query('*',$gTables['anagra']," codfis = '".$form['codfis']."'","codfis DESC",0,1); $anagra_with_same_cf=gaz_dbi_fetch_array($rs_anagra_with_same_cf); if($anagra_with_same_cf) { // c'è già un'anagrafica con lo stesso CF non serve reinserirlo ma avverto // devo attivare tutte le interfacce per la scelta! $anagra=$anagra_with_same_cf; $msg .= '16+'; } } } if (empty($form['codfis'])) { if ($form['sexper'] == 'G') { $msg .= "13+" ; $form['codfis'] = $form['pariva']; } else { $msg .= "14+" ;
} elseif ($toDo == 'update') { gaz_dbi_table_update('spediz',$form['codice'],$form); } header("Location: report_spediz.php"); exit; } } elseif (isset($_POST['Return'])) { // torno indietro header("Location: ".$form['ritorno']); exit; } } elseif (!isset($_POST['Update']) && isset($_GET['Update'])) { //se e' il primo accesso per UPDATE $form = gaz_dbi_get_row($gTables['spediz'], 'codice', intval($_GET['codice'])); $form['ritorno']=$_SERVER['HTTP_REFERER']; } elseif (!isset($_POST['Insert'])) { //se e' il primo accesso per INSERT $form['ritorno']=$_SERVER['HTTP_REFERER']; $rs_last = gaz_dbi_dyn_query('codice',$gTables['spediz'],'1','codice DESC',0,1); $last = gaz_dbi_fetch_array($rs_last); $form['codice'] = $last['codice']+1; $form['descri'] = ''; $form['annota'] = ''; } require("../../library/include/header.php"); $script_transl = HeadMain(); echo "<form method=\"POST\">"; echo "<input type=\"hidden\" name=\"ritorno\" value=\"".$form['ritorno']."\">\n"; echo "<input type=\"hidden\" name=\"".ucfirst($toDo)."\" value=\"\">"; $gForm = new GAzieForm(); if ($toDo == 'insert') { echo "<div align=\"center\" class=\"FacetFormHeaderFont\">".$script_transl['ins_this']."</div>\n"; } else {
$where = "codcon not like '%000000' group by ".$gTables['rigmoc'].".id_tes"; $result = gaz_dbi_dyn_query ($gTables['tesmov'].".id_tes, ".$gTables['rigmoc'].".codcon as accnum,descri,sum(import*(darave='D')) as dare,sum(import*(darave='A')) as avere", $gTables['rigmoc']." left join ".$gTables['tesmov']." on ".$gTables['rigmoc'].".id_tes = ".$gTables['tesmov'].".id_tes ", $where, 1); $message = '<tr><th class="FacetFieldCaptionTD">Numero ID</th><th class="FacetFieldCaptionTD">Descrizione </th><th class="FacetFieldCaptionTD">DARE </th><th class="FacetFieldCaptionTD">AVERE </th><th class="FacetFieldCaptionTD">SBILANCIO</th></tr> <tr><td class="FacetDataTDred" align="left" colspan="5">I seguenti movimenti contabili presentano degli errori e quindi sono da modificare cliccando sul numero di ID :</td></tr>'; while ($a_row = gaz_dbi_fetch_array($result)) { if ($a_row['dare'] != $a_row['avere']){ if ($message != "") { echo $message; $message = ""; } echo "<tr><td class=\"FacetDataTD\" align=\"center\"><a href=\"../contab/admin_movcon.php?Update&id_tes=".$a_row["id_tes"]."\" title=\"Modifica il movimento\" >".$a_row["id_tes"]."</a></td><td class=\"FacetDataTD\">".$a_row["descri"]."</td><td class=\"FacetDataTD\" align=\"right\">".$a_row["dare"]."</td><td class=\"FacetDataTD\" align=\"right\">".$a_row["avere"]."</td><td class=\"FacetDataTDred\" align=\"right\">".gaz_format_number($a_row["dare"]-$a_row["avere"])."</td></tr>\n"; } } $where = "codcon < 1"; $result = gaz_dbi_dyn_query ($gTables['tesmov'].".id_tes, ".$gTables['rigmoc'].".codcon as accnum, id_rig,descri ", $gTables['rigmoc']." left join ".$gTables['tesmov']." on ".$gTables['rigmoc'].".id_tes = ".$gTables['tesmov'].".id_tes ", $where, 1); while ($a_row = gaz_dbi_fetch_array($result)) { if ($a_row['accnum'] < 100000000 ){ if ($message != "") { echo $message; $message = ""; } echo "<tr><td class=\"FacetDataTD\" align=\"center\"><a href=\"../contab/admin_movcon.php?Update&id_tes=".$a_row["id_tes"]."\" title=\"Modifica il movimento\" >".$a_row["id_tes"]."</a></td><td class=\"FacetDataTD\">".$a_row["descri"]."</td><td class=\"FacetDataTDred\" colspan=\"3\" align=\"center\">Il rigo ".$a_row["id_rig"]." non ha il conto di riferimento</td></tr>\n"; } } if ($message != "") { echo "<tr><td class=\"FacetFormHeaderFont\" align=\"center\" colspan=\"5\">Il controllo effettuato non ha evidenziato movimenti con sbilanci DARE/AVERE !</td></tr>\n"; } ?> </table>