GetNumvalFromLCode Overigefunctie

Met GetNumvalFromLCode kan de numerieke waarde van een LCode (Account lettercode) bepaald binnen een gegeven bereik. Indien succesvol dan resulteert de functie in de numerieke waarde behorende bij de opgegeven LCode en anders in de waarde 0.

GetNumvalFromLCode (LCode, LowVal, HighVal )

LCode (MergedString)
In LCode wordt de Account lettercode vermeld waarvan de numerieke waarde moet worden bepaald.

LowVal (Expressie)
In LowVal wordt de ondergrens (de minimale waarde) van de resulterende numerieke waarde vermeld.

HighVal (Expressie)
In HighVal wordt de bovengrens (de maximale waarde) van de resulterende numerieke waarde vermeld.

Voorbeeld: Openenen nieuwe rekening met de Account OLE DB Provider
{
 Integer iRekNr
 String sLCode
 OleQuery "Provider=FaOleDb.FaProv;Data Source=c:\astona\demo.adm", OLE
 OLE
 OpenTable(info)
 Laag = [DebiteurenNrLaag]
 Hoog = [DebiteurenNrHoog]
 iRekNr = GetNumvalFromLCode("Test",Laag,Hoog)
 If iRekNr>0
  OpenTable(Debiteuren.idx)
  SetAdoFilter(RekeningNr=[iRekNr])
  While First()
   iRekNr = iRekNr + 1
   SetAdoFilter(RekeningNr=[iRekNr])
  Wend
  GetLCodeFromNumval(sLCode,iRekNr,Laag,Hoog)
 Endif
 if AddEmptyRecord(RekeningNr,[iRekNr])
  SetAdoFilter(RekeningNr=[iRekNr])
  Copy(Naam*,Test[iRekNr])
}
  RekeningNr: [iRekNr] ([sLCode]) is geopend op naam van: [Naam*]
{
 Endif
}

Resultaat:
RekeningNr: 257947 (TESZb) is geopend op naam van: Test257947