#if.empty i XAL

Du erklærer en variabel, der pr definition er tom, så de nførste box burde komme frem. Prøv med SET BOX(1,"1",1)

Nej, det undrer også mig,men det gør den ikke. Hvad kan det så være?

Så vidt jeg kan se, når du ikke at se den box der er i focus, enten skal du lave en PAUSE til sidst i koden eller lave en box med svar muligheder.

Det virker stadig ikke :-(

Hvad er grunden til du ikke bare skriver:
IF &Tmp <> "" THEN
  SET Box(1,"1",0)
ENDIF

Jeg kan godt forstå, at du stiller spørgsmålet ud fra det foreliggende materiale. Dog er jeg inde i en makro, hvor jeg ikke ved, om en variabel eksisterer. Derfor undersøges der på det!

Så skal du overføre variablen ved kald af makroen.
Derefter kan du bruge:
#IF.EMPTY(%1)

Hejsa,

problemet er at konstruktionen:

#IF.EMPTY
#ENDIF

er noget som kompilerens preprocessor reagerer på.
D.v.s. at på kompileringstidspunktet, fanger kompileren at hvis
direktivet og vil så inkludere koden hvis det der står i parantesen "ikke er tom".

Normalt er det noget man anvender, når man skriver makroer, til at få inkluderet kode, hvis en bestemt makro argument er blevet givet ved brugen af lokalmakroen.

Et eksempel:

#LOCALMACRO.WarningOrSelectionBox
#IF.EMPTY(%2)
SET BOX(2,%1,0)
#ENDIF
#IFNOT.EMPTY(&2)
IF SET BOX(3,%1+'\n'+"Vil du fortsætte ?",0) == 0 THEN
    RETURN
ENDIF
#ENDIF
#ENDMACRO

Hvis denne localmakro er inkluderet i koden, og du skriver:
#WarningOrSelectionBox("Der er noget galt");
Får du en warningbox med meddelelsen "Der er noget galt".

Men hvis du i koden skriver:
#WarningOrSelectionBox("Der er noget galt",TRUE);
Får du en warningbox med meddelelsen "Der er noget galt. Vil du fortsætte", men med to knapper som giver brugeren mulighed for enten at fortsætte eller afbryde (RETURN)

D.v.s. altså sige, at hvis du anvender makroen med ET argument, får du inkluderet en stump kode i det (i XAL-miljøet) eksekverbare program (nemlig den kode der står efter
#IF.EMPTY(%2).
Og hvis du anvender makroen med TO argumenter, får du inkluderet en stump kode i det (i XAL-miljøet) eksekverbare program (nemlig den kode der står efter
#IFNOT.EMPTY(%2).

HVIS du vil checke runtime om en given variabel har en bestemt værdi, vil jeg foreslå at du følger colaands råd og skriver:

IF &Tmp <> "" THEN
  SET Box(1,"1",0)
ENDIF

M.h.t. andre compiler-direktiver, så findes de vist nok (så vidt jeg husker) i det dersens lille supplement der følger med programmerings manualerne til XAL/C5. Jeg kan bare ikke lige huske hvad den hedder på stående fod (er på arbejde - og har ikke lige manualerne her).

/Jasman

Er det ikke lukketid her ?

Ups. Du har ret.

Løsningen var den rigtige, selvom det ikke var entydigt.