Temat: Łatwy sposób na unikaty z tabeli

Witam ponownie ;)

Mam pewną tabelę AAA a w niej pola A1 i A2.

Sprawdzanie w niej unikatów dla łączonych pól A1 i A2 robię poprzez temt-table:
def temp-table tbl
field t1 like A1
field t2 like A2
index t1 is primary t1 ascending.
.
for each tbl: delete tbl. end.

def var i as integer.

for each AAA no-lock:

find first tbl where
t1 = A1 and
t2 = A2
use-index t1
no-error.

if available tbl then do:
i = i + 1.
end. else do:
create tbl.
t1 = A1.
t2 = A2.
end.
end.
display i.

I to działa bez problemu, ale czy jest w progressie coś w stylu DISTINCT jak w SQL?Maciej Popławski edytował(a) ten post dnia 21.02.12 o godzinie 12:35

konto usunięte

Temat: Łatwy sposób na unikaty z tabeli

Użyj funkcji AMBIGUOUS

Przykład:

FIND customer WHERE name = cname NO-ERROR.

IF AVAILABLE customer
THEN DISPLAY postal-code.
ELSE IF AMBIGUOUS customer
THEN MESSAGE "Istnieje więcej niż jeden rekord".
ELSE MESSAGE "Nie można odnaleźć rekordu".

Temat: Łatwy sposób na unikaty z tabeli

Dzięki. Nie znałem, przyda się. :-)



Wyślij zaproszenie do