Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako napraviti izvjestaj u delphiu

[es] :: Pascal / Delphi / Kylix :: Kako napraviti izvjestaj u delphiu

[ Pregleda: 2216 | Odgovora: 0 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

smjesko
Niko Nikogovic
bangladesh

Član broj: 18272
Poruke: 358
*.as54.tz.bih.net.ba.

Sajt: www.autotuning.ba


+1 Profil

icon Kako napraviti izvjestaj u delphiu06.02.2004. u 20:15 - pre 231 meseci
Ehh jos jedno jedino (nadam se) pitanje :)
Kao prvo hvala svima koji su mi dosad pomogli, imam jos jedno pitanje kako da napravim report u delphiu znaci treba iz baze da mi izvlaci polja kao npr. ppu, ruc itd. uradio sam nesto davno sto radi kako treba, no kako sam poceo da doradujem program zaboravio sam dosta toga i sada koji dio koda da dodam da mi doda polje ppu u izvjestaj a kod do sada izgleda ovako:

caption:='Rekapitulacija poreza';
if podtip=0 then SetDates else begin
DatumOD.Items.Add(datetostr(date));
DatumDo.Items.Add(datetostr(date));
end;
dm.IBQuery1.Close;
case podtip of
0,1:dm.IBQuery1.SQL.Text:='select r.tarifa,t.naziv,sum(r.kolicina*r.cijena),'+
{ 'sum(cast(r.kolicina*r.cijena*(1-1/(1+(r.osnovni*0.01)))*100 as integer))*0.01 ,'+
'sum(cast(RacunPPU*(racunMALPRCIJ.asfloat-dm.racunnc) as integer))*0.01,'+
'sum(cast(r.kolicina*r.cijena*(1/(1+(r.mpporez+r.osnovni)*0.01))as integer))*0.01 '
} 'sum((r.kolicina*r.cijena/(1+(r.mpporez+r.osnovni)*0.01))*r.osnovni*0.01) ,'+
'sum((r.kolicina*r.cijena/(1+(r.mpporez+r.osnovni)*0.01))*r.mpporez*0.01),'+
'sum((r.kolicina*r.cijena/(1+(r.mpporez+r.osnovni)*0.01))) '
+'from racun r, tarifa t where t.id=r.tarifa and r.datum>=:d1 and r.datum<=:d2 group by r.tarifa,t.naziv order by 2';
2:exit;
end;
DatumOD.ItemIndex:=DatumOD.Items.Count-1;
DatumDO.itemIndex:=DatumDO.Items.Count-1;
DatumOdChange(nil);


sada u sve ovo trebam dodat da mi vuce iz polja racunppu porez i da mi ga prikazuje u izvjestaju
Ako neznas pitaj... ako mozes pomozi..
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Kako napraviti izvjestaj u delphiu

[ Pregleda: 2216 | Odgovora: 0 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.