Udalosť OnBeforeEditItem

Deklarácia

Globálna obsluha:

ENTRY OnBeforeEditItem(IN INT _refId, IN INT _row, _col, RECORD (*STRUCTURE DEFINITION*) _rowData,  BOOL _bAllowEdit)
  ; akcie
END OnBeforeEditItem

Špeciálna obsluha:

ENTRY XXX_OnBeforeEditItem(IN INT _row, _col, RECORD (*STRUCTURE DEFINITION*) _rowData,  BOOL _bAllowEdit)
 ; akcie
END XXX_OnBeforeEditItem

Parametre

_refId	Pre globálnu obsluhu - povinný vstupný parameter typu Int.
XXX	Meno Referenčnej premennej pripojenej ku grafickému objektu bez úvodného znaku "_".
_row, _col	Riadok, stĺpec políčka, ktorému je potrebné odsúhlasiť hodnotu.
_rowData	štruktúta predstavujúca editovaný riadok
_bAllowEdit	Výstupný parameter - príznak povolenia editácie hodnoty.

Popis

Udalosť je generovaná zobrazovačom tyou Browser, v momente pred začatím editácie políčka. Políčko je identifikované jeho riadkom (_row) a stĺpcom (_col).

Používa sa v prípade, že je potrebné predvyplniť hodnotu políčka v editačnom okienku. V takomto prípade obsluha nastaví políčko v parametri _rowData na požadovanú hodnotu. Táto nastavená hodnota sa potom užívateľovi predvyplní pri začatí editácie políčka. Nastavenie políčka _rowData v inom stĺpci ako _col je ignorované.

Ak obsluha udalosti nastaví výstupný parameter _bAllowEdit na hodnotu @FALSE, užívateľovi nebude povolené editovať políčko.
Ak obsluha udalosti nastaví výstupný parameter _bAllowEdit na hodnotu @TRUE, dôjde k edtiácii políčka.

Príklad

V príklade obsluha udalosti zobrazovača typu Browser s pridelenou referenčnou premennou _browser a pripojenou štruktúrovanou premennou typu SD.Params predvyplní položku "Name"

ENTRY browser_OnBeforeEditItem(IN INT _row, IN INT _col, RECORD (SD.Params) _rowData, BOOL _bAllowEdit)
  IF _row = 1 THEN
    _rowData[1]^Name:= "Name1"
  ENDIF
END browser_OnBeforeEditItem

Globálna obsluha udalosti podobne:

ENTRY OnBeforeEditItem(IN INT _refId, IN INT _row, IN INT _col, RECORD (SD.Params) _rowData, BOOL _bAllowEdit)
  IF _refId = _browser THEN      ;test určujúci, v ktorom zobrazovači došlo k udalosti
    IF _row = 1 THEN
      _rowData[1]^Name:= "Name1"
    ENDIF
  ENDIF
END OnBeforeEditItem

Obsluha udalosti
Udalosti