Jeg vil gerne have systemet chekket for ens bilags nummer men kun fra d. 01.01.2004, det vil sige hvis der findes et identisk nummer fra før denne dato skal systemet ikke reager.
Så er det bare at kode en Search med en variabel, er skifter NejJa, og hvis ja, så kommer med en box, der skriver noget med "bilaget brugt efter 1.1.2004". Det kan sagtens lade sig gøre.
Ok, bare du ikke sladrer til min arbejdsgiver ;-) Øverst: INT &INt1
Nederst: WHILE &int1 == 0 SEARCH FinPost USING DatoIdx WHERE Finpost.Dato > Str2Date("01.01.2004",123) AND &Int1 == 0 IF Finpost.Bilag == Finkladde.Bilag THEN SET BOX(1,"Bilagsnr er tidligere andvendt.",1) SET &Int1 = 1 ENDIF END SET &int1 = 1 END
1.000 tak - min mund er lukket med syv sejl :-), du har ret det tager lang tid, vi har har 326.500 finposter, så hver linie skift tager ca. 60 sek. - kan det evt. laves så det tager noget hurtigere - kan det sættes et andet sted i C5.
Efter koden (i post-record triggeren) hvor der bliver konstanteret at bilagsnummeret bliver brugt kan du prøve med følgende search og index istedet for IF FinPost[BilagIdx,FinKladde.Bilag].Løbenummer THEN SEARCH FinPost USING BilagIdx WHERE FinPost.Bilag == FinKladde.Bilag AND FinPost.Dato > 01\01\2004
SET Box(1,"bla bla" .... Break
END ENDIF Det burde ikke tage så lang tid - kun hvis I har rigtig mange posteringer med samme bilagsnummer!
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.