Streng som index i Introduce Del 2

Kom nu Broholm.

Jeg dirrer af forventning ;)

Fair nok - her kommer det:

STR 30 &Nummer="49450265"
STR 30 &Kontoindex="KontoIdx"

STR 30 &Feltnavn = "Navn"

SET &MacroText = &Nummer
INTRODUCE DebKart[RecId==SysInfo(1250,'DebKart['+&Kontoindex+==&MacroText].RecId']

// Til Mariaf
PRINT DebKart.(FieldName2Id(FileNum(DebKart),&Feltnavn))
PAUSE

Sorry.. Jeg fandt lige en fejl

STR 30 &Nummer="49450265"
STR 30 &Kontoindex="KontoIdx"

STR 30 &Feltnavn = "Navn"

SET &MacroText = &Nummer
INTRODUCE DebKart[RecId==Str2Int(SysInfo(1250,'DebKart['+&Kontoindex+==&MacroText].RecId'))]

// Til Mariaf
PRINT DebKart.(FieldName2Id(FileNum(DebKart),&Feltnavn))
PAUSE

Og hvis du også først kender kartoteket runtime, så kan det også lade sig gøre...

Endnu en fejl... Måske skulle jeg lave det i C5 istedet for i hovedet...

INTRODUCE DebKart[RecId==Str2Int(SysInfo(1250,'DebKart['+&Kontoindex+'==&MacroText].RecId'))]

Jeg synes ikke

PRINT SysInfo(1250,'DebKart['+&Kontoindex+'==&MacroText].RecId')

virker.

Den virker godt nok til matematiske udtryk med både konstanter og variabler, men jeg synes ikke det virker med direkte opslag.

Du skal huske at sætte &MacroText til &Nummer inden...

Ok, Broholm har ret.
Men husk som jeg skrev i del 1 af dette spørgsmål (http://www.eksperten.dk/spm/600719) at strengværdier skal omgives af " og derfor skal man anvende

\"'+&MacroText+'\"

istedet for

'+&MacroText+'

Så


STR 30 &Feltnavn = "Navn"

INTRODUCE DebKart[RecId==Str2Int(SysInfo(1250,'DebKart['+&Kontoindex+'==\"'+&MacroText+'\"].RecId'))]

// Til Mariaf
PRINT DebKart.(FieldName2Id(FileNum(DebKart),&Feltnavn))
PAUSE

vil virke

Nej! Det er lige netop derfor at jeg bruger &MacroText. SysInfo(1250) kan 'se' de globale variabler direkte. Derved undgår man problemer med ' og " i variablelværdien.

Jeg bruger ikke

'+&MacroText+'

Jeg bruger

&MacroText

&MacroText        => DebKart[KontoIdx==&MacroText].RecID
'+&MacroText+'    => DebKart[KontoIdx==49450265].RecId  <--- Syntax-fejl
\"'+&MacroText+'\" => DebKart[KontoIdx=="49450265"].RecId <--- Problemer, hvis der er " i &macrotext

Ok. Got it. ;)

Then gimme ;-)

Øhm... det skal du sige til laasby ;)

Laasby: givehim ;)

Du må sige til, hvis du vil have den med runtime-bestemmelse af kartoteket

Ha ha... Sorry :D

Hvis trickset med runtime-bestemmelse af kartoteket kommer, er der fuldt point til broholm

Er alle enige om det (især jasman)?

/Laasby

Hey! Det var ikke en aftalen :-)

Undskyld - Så misforstod jeg

Der kommer 60 til broholm og 30 til jasman

No bad feelings - I hope

Jeg kan ikke finde ud af at give points - håber at det går

Ha ha.. Nej nej - bare rolig :D

Men opskriften er COMMON + SysInfo(1250)

<--- Du skal bare klikke ude ved svaret her

Ah - nu forstår jeg.

jasman - Du skal lige skrive et svar, så du kan få point for dit første svar (som lovet tidligere).

Jeg går ud fra at jeg ikke kan fordele points før jeg har fået et svar fra jasman

Ja undskyld, men jeg er som tidligere skrevet helt ny her.

/Laasby

Ok.
Et svar.

Her er point - Tak for hjælpen

Hm... I må bære over med mig ang. points. Jeg kan ikke lige finde ud af at dele dem som jeg gerne vil (60/30). Jeg prøver igen, og håber at det lykkedes.

Giv mig lige besked hvis det var forkert.

/Laasby

Sorry broholm - Hvad gør man så ? Opretter et nyt spørgsmål og giver point derefter ?

Det går nok :D

Tak til broholm og jasman for en meget interessant løsning! Den var undgået min opmærksomhed!