[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Zmiana pola w browserze
Witam,
Ja stosuję troszkę inną technikę:
1) Query FOR EACH pracownik,
2) Dodaję kolumnę kalkulacyjną typu CHAR np. cWydzNz
3) W zdarzeniu ROW-DISPLAY wstawiam fragment:
cWydzNz = "".
FIND Wydzial WHERE wydzial.id-wydz = pracownik.id-wydz NO-LOCK NO-ERROR.
IF AVAIALBLE Wydzial THEN cWydzNz = Wydzial.Nazwa.
4) Dodaję zdarzenie:
ON VALUE-CHANGED OF Pracownik.id-wydz in browse {&BROWSE-NAME}
DO:
DEF VAR id AS CHARACTER.
id = INPUT BROWSE {&BROWSE-NAME} Pracownik.id-wydz.
cWydzNz = "".
FIND Wydzial WHERE wydzial.id-wydz = pracownik.id-wydz NO-LOCK NO-ERROR.
IF AVAIALBLE Wydzial THEN cWydzNz = Wydzial.Nazwa.
DISPALY cWydzNz WITH BROWSE {&BROWSE-NAME}.
END.
W przypadku. gdy chcemy ograniczyć ilośc odczytów tabeli Wydzial (co
wyświetlenie linii robimy FIND) można cache'ować tabelę Wydzial do
TEMP-TABLE lub zmiennej tekstowej.
Pozdrawiam,
Sergiusz
----- Original Message -----
From: "Rafał Mazur"
To: "Progress"