htmlTable

S_HTML_TABLE * psTab;

		//
		// Definisco la tabella
		//
		psTab=tableCreate("{class:'tabGrid', attribute:'border=1'}");

		tableSetTitle(psTab,1,"{class:'tit3', style:'background:#dd7'}");
		tableSetTitle(psTab,2,"{class:'tit2', style:'background:#ee8'}");
		tableSetTitle(psTab,3,"{class:'tit1', style:'background:#ff9'}");

		tableAddCol(psTab,"IDPRAT","{name:'idPrat', class:'tc', level:3}");
		tableAddCol(psTab,"IDUSER","{name:'idUser', class:'tc', level:3}");
		tableAddCol(psTab,"RAFOR","{name:'Ragione Sociale', class:'bo', level:3}");
		
		tableAddGroup(psTab,"CONT","{name:'Referenti', colspan:6}");
			tableAddGroup(psTab,"QM","{name:'Quality Manager',  level:2, colspan:2}");
				tableAddCol(psTab,"EM_AS","{name:'email', level:3}");
				tableAddCol(psTab,"TE_AS","{name:'tel', level:3}");

			tableAddGroup(psTab,"QM","{name:'Production Manager',  level:2, colspan:2}");
				tableAddCol(psTab,"EM_RP","{name:'email', level:3}");
				tableAddCol(psTab,"TE_RP","{name:'tel', level:3}");

			tableAddGroup(psTab,"QM","{name:'RASFF',  level:2, colspan:2}");
				tableAddCol(psTab,"EM_RR","{name:'email', level:3}");
				tableAddCol(psTab,"TE_RR","{name:'tel', level:3}");

S_HTML_TABLE * psTab;

// Creazione tabelle definizione delle colonne

	psTab=tableCreate(NULL);
	tableAddCol(psTab,"EAN","");
	tableAddCol(psTab,"P/N","");
	tableAddCol(psTab,"CODICE FORNITORE","");
	tableAddCol(psTab,"MODELLO","");
	tableAddCol(psTab,"IVA","");
	tableAddCol(psTab,"ACQUISTO","");
	tableAddCol(psTab,"PUBBLICO","");
	tableAddCol(psTab,"RAEE","");
	tableAddCol(psTab,"SIAE","");
	tableAddCol(psTab,"QTA","");

// Inserimento delle righe e scrittura delle celle

	sql_query(	"SELECT bo.*,ar.CODEFORN,ar.CODEBAR "
				"FROM bolleCorpo bo,articoli ar "
				"WHERE (bo.IDBOLLA=%d AND bo.idArt=ar.IDCODE) ORDER BY ORDINE",idDoc);

	rsBody=sql_store();
	while (sql_fetch(rsBody)) {
	
		double dQta,dIva,dAliquotaIva,dPrezzoNetto,dPrezzoLordo;
		tableAddRow(psTab);
		tableWrite(psTab,"EAN",sql_ptr(rsBody,"CODEBAR"),"");
		tableWrite(psTab,"P/N",sql_ptr(rsBody,"CODEFORN"),"");
		tableWrite(psTab,"CODICE FORNITORE",sql_ptr(rsBody,"CODART"),"");
		tableWrite(psTab,"MODELLO",sql_ptr(rsBody,"DESCR"),"");
		
		dQta=sql_num(rsBody,"QTA"); if (dQta==0) ehError();
		dIva=sql_num(rsBody,"IVA");	// Totale iva dell riga
		dAliquotaIva=sql_num(rsBody,"ALIVA");
		dPrezzoNetto=sql_num(rsBody,"PREZZO");
		dPrezzoLordo=dPrezzoNetto+(dIva/dQta);//*100/121; // Scorporo L'iva

		sprintf(szServ,"%.0f",dAliquotaIva);
		tableWrite(psTab,"IVA",szServ,"");

		sprintf(szServ,"%.2f",dPrezzoNetto);
		tableWrite(psTab,"ACQUISTO",szServ,"");

		sprintf(szServ,"%.2f",dPrezzoLordo);
		tableWrite(psTab,"PUBBLICO",szServ,"");
		tableWrite(psTab,"RAEE","","");
		tableWrite(psTab,"SIAE","","");
		sprintf(szServ,"%.0f",dQta);
		tableWrite(psTab,"QTA",szServ,"");
	
	}
	sql_free(rsBody);

// Conversione in CSV e scrittura del file

	psz=tableCSV(psTab);
	sprintf(szFileName,"/temp/MusicalBox_ddt_%s_%s.csv",sql_ptr(rsHead,"NUMERO"),sql_ptr(rsHead,"D_BOL"));
	fileStrWrite(szFileName,psz);
	psTab=tableDestroy(psTab);
	ehFree(psz);