returnere en post selvom

Det burde du fda også få med LEFT JOIN !?!?

(Brug parametre i stedet for direkte formaterede sql-scripts)

SELECT B.Client, B.Berth, B.Width, B.Length, B.Depth
  FROM berth B
  LEFT JOIN boatreg R on (R.Client = B.Client)
  WHERE (B.Client = :Client)
    AND (R.Berth = :Berth)
  ORDER BY Berth

Problemet er din "and (R:Bert = :Bert)" der kræver opslag i Bert. Mon ikke det omdefinerer din left join til en join. Arne har sikkert en kommentar til den teori.

Har du prøvet dette her:

SELECT B.Client, B.Berth, B.Width, B.Length, B.Depth
  FROM berth B
  LEFT JOIN boatreg R on (R.Client = B.Client and R.Berth = :Berth)
  WHERE (B.Client = :Client)
  ORDER BY Berth

Jeg mener godt man må angive parametre i en join - om ikke andet må du lave scriptet uden de ellers anbefalelsesværdige parametre.

Min fejl. Der er kun én parameter i dit script

SELECT B.Client, B.Berth, B.Width, B.Length, B.Depth
  FROM berth B
  LEFT JOIN boatreg R on (R.Client = B.Client AND R.Berth = B.Berth)
  WHERE B.Client = :Client
  ORDER BY Berth

SELECT B.Client, B.Berth, B.Width, B.Length, B.Depth
  FROM berth B
  LEFT JOIN boatreg R on (R.Client = B.Client AND R.Berth = B.Berth)
  WHERE (B.Client = :Client)
  ORDER BY B.Berth

Du sætter parametrene sådan:

Query.SQL.Text :=
  'SELECT B.Client, B.Berth, B.Width, B.Length, B.Depth'+
  '  FROM berth B'+
  '  LEFT JOIN boatreg R on (R.Client = B.Client AND R.Berth = B.Berth)'+
  '  WHERE (B.Client = :Client)'+
  '  ORDER BY B.Berth';

(du havde glemt B-referencen i din "order by")

// Den letteste og lidt usikre metode:
Query.Parameters.ParamByName('Client').Value := 1;

// Den lidt mere besværlige, men helt sikre (kan pakkes ind i en funktion så det bliver en en-linje operation):
with Query.Parameters.ParamByName('Client') do
begin
  DataType := ftInteger;
  ParamType := ptInput;
  Value := 1;
end;

Den omdefinerer ikke en LEFT JOIN til en INNER JOIN, men men men:

R.Berth = B.Berth

matcher aldrig når R.Berth er NULL !

SELECT B.Client, B.Berth, B.Width, B.Length, B.Depth FROM berth  B LEFT JOIN boatreg R on (R.Client = B.Client) WHERE B.Client = '+DataM.ClientSql.FieldByName('Nummer').AsString+' AND (R.Berth IS NULL OR R.Berth = B.Berth) ORDER BY Berth;

Men altså parametre er 799 gange pænere så ....

Damn mente jeg havde svaret på dette....

Jeg har skrevet koden om efter hrc, og det fungere....
er også begyndt ændre min kode således at jeg param, det giver jo noget mere skrivearbejde, jeg kan da godt se at det i nogen tilfælde er en sikre måde..


points ???

Hvad siger du Arne? Har du et bud på Finns nye spørgsmål?

Ikke rigtigt