Example #1
1
$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
Example #2
1
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;
}
Example #3
1
    
    $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=""; 
    
   
Example #4
0
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;
}
Example #5
0
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;
}
Example #6
0
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;
   }
Example #7
0
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;
}
Example #8
0
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;
    }
Example #9
0
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;
    }
Example #10
0
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;
    }
Example #11
0
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;
}
Example #12
0
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";
    }
}
Example #13
0
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;
}
Example #14
0
<?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;
}
?>

Example #15
0
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'];
    }
Example #16
0
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']."\">&nbsp;<input type=\"submit\" name=\"anteprima\" value=\"".$script_transl['view']."!\">&nbsp;</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"])." &nbsp;</td>\n";
             echo "<td class=\"FacetDataTD\" align=\"center\">".$row["caumag"]." - ".$row["descri"]."</td>\n";
Example #17
0
$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'),
Example #18
0
 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;
 }
Example #19
0
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&agrave; 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");
Example #20
0
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)) {
Example #21
0
// 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>&nbsp;".$a_row['id_agente']."</a></td>";
        echo "<td class=\"FacetDataTD\">".$a_row["ragso1"]." ".$a_row["ragso2"]." &nbsp;</td>";
        echo "<td class=\"FacetDataTD\" align=\"center\">".$a_row["telefo"]."&nbsp;</td>";
        echo "<td class=\"FacetDataTD\" align=\"center\">".$a_row["fax"]." &nbsp;</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>&nbsp;</a></td>";
        echo "<td class=\"FacetDataTD\" align=\"center\">".$a_row["base_percent"]." &nbsp;</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>&nbsp;</a></td>";
        echo "</tr>\n";
}
?>
</form>
</table>
</body>
</html>
Example #22
0
 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;
 }
Example #23
0
<?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'];
Example #25
0
<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&agrave;" => "citspe",
            "Telefono" => "telefo",
            "P.IVA - C.F." => "",
            "Privacy" => "" ,
            "Riscuoti" => "" ,
            "Visualizza <br /> e/o stampa" => "",
            "Cancella" => ""
            );
$linkHeaders = new linkHeaders($headers_);
$linkHeaders -> output();
Example #26
0
 $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+";
      }
Example #27
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>&nbsp;".$a_row["codice"]."</a> &nbsp</td>";
    print "<td class=\"FacetDataTD\">".$a_row["descri"]." &nbsp;</td>";
    print "<td class=\"FacetDataTD\" align=\"center\">".$a_row["weight"]." &nbsp;</td>";
    print "<td class=\"FacetDataTD\" align=\"center\">".$a_row["annota"]." &nbsp;</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>
Example #28
0
                 $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+" ;
Example #29
0
          } 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 {
Example #30
0
$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>