C5 Version 4.3.1.282 SQL - Fritekstsøgning Lagerkartotek

Hej ,

Kunne måske se sådanher ud:  (XAL du må selv rette syntaksen til)

INT      &Session = 1234346  (Bør tildeles korrekt)
STR 254  &Søgeord

#Prompt "Indtast søgeord...: " GET(&Søgeord).
        INPUT AT 5,5
#PromptAbort

IF &Søgeord == "" THEN
  RETURN
ENDIF

SET &SøgeOrd = StrLTrim(StrRTrim(&SøgeOrd))

SEARCH Iventable USING ItemIdx
  WHERE ItemNumber <> ""
  AND  Blocked    <> 0
  IF StrScan(ItemName,  &Søgeord,1,254) <> 0 OR
      StrScan(ItemName1, &Søgeord,1,254) <> 0 OR
      StrScan(ItemName2, &Søgeord,1,254) <> 0 THEN
      INTRODUCE TmpFrmVirtuel
      SET File  = 49
      SET Record = Inventable.RecID
      SET Number = Inventable.ItemNumber
      SET Txt1  = Inventable.ItemName
      INSERT TmpFrmVirtuel
  ENDIF
END

Bagefter kan du så vise TmpFrmVirtuel i en form hvor brugeren
kan vælge den vare som ønskes og så returnere til ordreline
eller hvorfra det nu er kaldt.

Husk at nulstille TmpfrmVirtuel efter brug. 

Prøv og leg lidt med ovenstående.

God fornøjelse
Peter

Hej

Du kan bare bruge standard søge funktionen og så evt. få din forhandler til at tilrette den kode så den kan vise f.eks. 1000 resultater og medtage evt. manglende søgefelter.

Mvh
Rene, JCD A/S

Tusind tak for hurtig input :)