PHP gaz_dbi_dyn_query函数代码示例

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 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 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 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 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 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;
}

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";
    }
}

          } 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 {

                 $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+" ;

 $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+";
      }

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'];
    }

$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>