ich habe ein Problem das ich nciht verstehe. es wird nach einem Datensatz gesucht, der auch definitiv in der Datenbank vorhanden ist.
hier das öffnen der Datenbank
Code: Alles auswählen
use Spfolg1 New
set index to "spfolg1.cdx"
Spfolg1->(OrdSetFocus("filiale"))
hier ist die Suchfunktion
Code: Alles auswählen
cIndex:="32"+Spproto->Artinr+aFil[j]
if spproto->Artinr = "431850015"
msgbox(cIndex)
endif
If Spfolg1->(DbSeek(cIndex))
if spproto->Artinr = "4318500015"
msgbox("Treffer")
endif
Hier der Aufbau der Indexdatei, die ausgeführt wird, wenn die CDX-Datei nicht vorhanden ist.
Code: Alles auswählen
If !File("SPFolg1.Cdx")
lIndex:=.t.
If !Netz_Use("SpFolg1.Dbf",.t.)
Quit
EndIf
Index on sa+artnr+lfdnr+filiale tag "spfolg1" to "spfolg1.cdx"
Index on sa+artnr+filiale tag "filiale" to "spfolg1.cdx"
Index on artnr tag "artnr" to "spfolg1.cdx"
Index on artnr+sa Tag "artnrsa" to "spfolg1.cdx"
Index on filiale+artnr tag "fil2" to "spfolg1.cdx"
Index on sa+filiale+artnr tag "safil" to "spfolg1.cdx"
oStatic1:caption:=(cText+"SPFOLG1")
oStatic1:configure()
EndIf
Hat jemand eine Idee ???