Teste for indextilstedeværelse?

Jeg går ud fra at det er et temporært indeks du er igang med.
Du kan bruge en variabel til indeksets navn, som du sætter til noget autogenereret. Hvis variablen <> '', så er indekset oprettet...

Kan man lokke dig til at skære det ud i pap evt.? :) Jeg bruger primært 'CONTROL' kommandoerne til det - kan jeg bare sætte &noget = CONTROL "..." ?

Nu er jeg MEGET kraftig modstander af at bruge CONTROL komandoer direkte, men here goes

Init:
INT &IndexId

PreForm:
IF <vi skal oprette index> THEN
    #GetTempId(&IndexId)
    #Frm_CREIDX(<blok>,'Tmp'+Int2Str(&IndexID),<1>,<2>,<3>)
ENDIF

Exit og Abort:
IF &IndexId THEN
    #Frm_DELIDX('Tmp'+Int2Str(&IndexID))
ENDIF

Pointen er at det er kun hvis &IndexID <> 0 at indekset er oprettet

Hurra - det er nemlig &IndexId jeg søgte! :)

I øvrigt - hvad er det 'katastrofale' ved direkte CONTROL kommandoer (andet end det går i smadder hvis MS ændre på noget bagom = mere unødvendigt arbejde til mig)?

Der er kompilertjek indbygget i #Frm_XXXXXX macroerne:

#Frm_SEARCH(Fedtmule) <--- Kompiler fejl. Dette kartotek findes ikke.

CONTROL 'SEARCHTOP Fedtmule' <--- Ingen kompilerfejl. Først fejl når formen afvikles.

Hvis man f.eks. omdøber et kartotek, indeks eller felt så fejler alle #Frm_XXXXXX, som bruger det, automatisk. Det gør det ikke hvis man bruger CONTROL kommandoer