jeśli chodzi o towary to pole TW.vatsp ma taką samą wartość jak pole XT.subtyp ze stawki VAT (XT.subtypi to integer a TW.vatsp to string) . Nawet raport "Zmiana stawki VAT" używa subtypi do identyfikacji stawki a pole long jest użyte do sortowania. Ale z tego nie wynika, że pole long tylko do tego jest używane
.
Oto pętla listująca stawki z raportu "Zmiana stawek VAT dla towarów"
Kod:
While !nErr
if BasXT.GetKeySeg("kod") && BasXT.GetKeySeg("super")==10000 && (BasXT.GetField("flag") & XTflagACTIVE) == XTflagACTIVE then
if sVat(2) then grow sVat,1 : grow iVat,1 : i+=1
sVat(i)=Spacje(BasXT.GEtfield("kod"))+BasXT.Getfield("nazwa")
iVat(i)=ToInt(BasXT.Getfield(funField("subtypi")))
mSortVat.Set((using "%06d", BasXT.GetField("long")), i)
endif
nErr=BasXT.GetRec(NX)
wend
... i sposób pobierania ich do podstawianej w towarze zmiennej nVAT
Kod:
int sub funFind()
int i
for i=1 to i>size(sVat)
if sVat(i)==sVatElem then nVat=iVat(i) : exit
next i
endsub
PS.
Zapewne 70 u nas to jak 30 u Was
w tym Roku chcę zaatakować trasy w Górach Izerskich i wówczas będę miał jakieś porównanie
tutaj jest kilka tras w liczbach
sports-tracker
a tu kilka opisów moich rowerowych wypraw
wycieczkirowerowe.net