[ Izgubljeni @ 01.04.2006. 08:46 ] @
Prije svega zahvaljujem Draganecuu na trudu, ali SKIP nije pomogao... bio sam neko vrijeme odustao od ovoga ali ispada da to moram riješiti... Rješio sam petlju, sada sve kvalitetno odradi, ali uvijek uzima prvi slog iz baze i neće dalje... MOLIM za pomoć. ... POMAGAJTE AKO ZNATE!!! select MPR mKolicina:=0 mUkupno :=0 mSif_mat :=MPR->SIF_MAT mNaz_Mat :=MPR->NAZ_MAT mCij_Mp :=MPR->CIJ_MP mCij_VP :=MPR->CIJ_VP FOR br_racX=val(br_rac1) TO val(br_rac2) count for val(mpr->br_rac)=br_racX to broj @PROW()+1,0 say '--------------------------------------' @PROW()+1,0 say dtoc(DATe())+' - RAČUN BR: '+transform(br_racX,'999') @PROW()+1,0 SAY broj MPR->(DBSEek(val(br_rac)==br_racX)) if !found() for racun=1 to broj @PROW()+1,0 SAY recno() @PROW()+1,0 SAY LEFT(mNaz_Mat,35) @PROW()+1,0 SAY (' ')+TRANSFORM(mKolicina,'999,999.999')+; (' ')+TRANSFORM(mCij_mP,'99,999.99')+; (' ')+TRANSFORM(mKolicina*mCij_mP,'99999.99') mUkupno+=mKolicina*mCij_vp SKIP NEXT ENDIF SKIP NEXT [Ovu poruku je menjao Izgubljeni dana 25.04.2006. u 10:27 GMT+1] |