query($query) ; while ($db->next_record()) $nomefornitore = $db->f("Nome") ; $dbtt = new FC_SQL ; if ($fornitore == $idsarzi) { } else { /******************************************************************************************************** * NO SARZI * Mi costruisco un array in cui ci vado a mettere i codici dei prodotti che fanno parte di questo ordine **********************************************************************************************************/ $np = 0 ; // numero prodotti ?? $idprod = array() ; $dbt = new FC_SQL ; $query = " select *, (P.QAssegnata - P.QUtilizzata) as Qres from dettagli D, prodotti P where P.Anno = $anno and D.Anno = $anno and D.IdOrdine = $idordine and D.IdProdotto = IdProdotti order by P.nome" ; debug (0, $query) ; $dbt->query($query) ; while ($dbt->next_record()) { $np ++ ; if ($dbt->f("PrezzoForzato") != '' && $dbt->f("PrezzoForzato")!= '0.00') $pFor[] = nfe($dbt->f("PrezzoForzato")) ; else $pFor[] = '' ; $desc[] = $dbt->f("DescDettaglio") ; $qres[] = $dbt->f("Qres") ; $ncar[] = $dbt->f("NumCartoni") ; $conf[] = $dbt->f("ConfezioniDa") ; $scontoprd[] = $dbt->f("ScontoPrd") ; $idprod[] = $dbt->f("IdProdotto") . "^0" ; $scomer[] = "0" ; if ($dbt->f("Iva") != 0) $arrIva[] = $dbt->f("Iva") ; else $arrIva[] = "22" ; if ($dbt->f("Esaurito") == 0) { if ($dbt->f("DescDettaglio") != '') $newprd[] = sprintf ("%s", stripslashes($dbt->f("DescDettaglio"))) ; else $newprd[] = sprintf ("%s", stripslashes($dbt->f("Nome"))) ; } else { $newprd[] = sprintf ("E S A U R I T O (%s - %s)", stripslashes($dbt->f("Nome")), $dbt->f("Annata")) ; } } /***************************************************************************************************** * dopo aver recuperato i prodotti 'venduti', recupero anche i prodotti che compongono lo sconto merce ******************************************************************************************************/ $dbsm = new FC_SQL ; $query = " select *, (P.QAssegnata - P.QUtilizzata) as Qres from scontomerce SM, prodotti P where P.Anno = $anno and SM.Anno = $anno and SM.IdOrdine = $idordine and SM.IdProdotto = P.IdProdotti order by P.nome " ; $dbsm->query($query) ; while ($dbsm->next_record()) { $np ++ ; $pFor[] = '' ; $desc[] = $dbsm->f("DescDettaglio") ; $qres[] = $dbsm->f("Qres") ; $ncar[] = $dbsm->f("NumCartoni") ; $conf[] = $dbsm->f("ConfezioniDa") ; $idprod[] = $dbsm->f("IdProdotto") . "^SM" ; $scomer[] = "1" ; $arrIva[] = $dbsm->f("Iva") ; if ($dbsm->f("Esaurito") == 0) { if ($dbsm->f("DescDettaglio") != '') $newprd[] = sprintf ("%s", stripslashes($dbsm->f("DescDettaglio"))) ; else $newprd[] = sprintf ("%s", stripslashes($dbsm->f("Nome"))) ; } else { $newprd[] = sprintf ("E S A U R I T O (%s - %s)", stripslashes($dbsm->f("Nome")), $dbsm->f("Annata")) ; } } if ($np > 0) { reset ($idprod) ; for ($i=0; $i<=7; $i++) { $idp = $idprod[$i] ; $ss = $prd[0][$i] ; } } } } else { $db->query("select Nome from fornitori where idfornitori = $oldfornitore") ; while ($db->next_record()) $vecchionome = $db->f("Nome") ; } $db->query("select Nome from clienti where idclienti = $cliente") ; while ($db->next_record()) $nomecliente = $db->f("Nome") ; $str = "" ; if ($oldfornitore == $fornitore) { for ($riga=1; $riga<=count($idprod); $riga ++) { { $idprodotto = $idprod[$riga-1] ; $str .= "" ; $str .= "" . htmlspecialchars($newprd[$riga-1]) . "" ; $str .= "" . $qres[$riga-1] . "" ; $str .= "" . $pFor[$riga-1] . "" ; $str .= "" . $ncar[$riga-1] . "" ; $str .= "" . $conf[$riga-1] . "" ; $str .= "" . $scontoprd[$riga-1] . "" ; $str .= "" . $arrIva[$riga-1]. "" ; $str .= "" . $scomer[$riga-1] . "" ; $str .= "" ; } } } $str .= "" ; $header = "Prodotto,Q.Res,Prezzo,N. Cart,Conf Da,% Sconto Prd,IVA,Sconto Merce" ; $strSort = "na,na,na,na,na,na,na,na" ; $iniWP = "40,5,9,9,9,11,6,10" ; $setColType = "ed,ro,ed,ed,ed,ed,ed,ch" ; $setColAlign = "left,center,center,center,center,center,center,center" ; /**************************************************************************** * mi devo ricavare dei valori che mi servono per la fase di memorizzazione ****************************************************************************/ $qord = " select *, O.bancaordine as BancaOrdini, O.idagente as IdAgente, A.nome as NomeAgente, C.Nome as NomeCliente, F.Nome as NomeFornitore, T.idtipologie as IdTipologia from ordini O, pagamenti P, clienti C, fornitori F, agenti A, tipologie T where O.IdCliente = C.IdClienti and O.IdFornitore = F.IdFornitori and O.IdPagamento = P.IdPagamenti and O.idagente = A.idagenti and C.idtipologia = T.idtipologie and O.IdOrdini = $idordine and O.Anno = $anno " ; list($nord, $dord) = $db->RecuperaDati($qord) ; ?> <? echo TITLE ?>
Anno
Sei in: Dettagli Ordine n.