Програмирање на маски со Скрипта на маската

Со Скрипта на маската проверуваш и дополнуваш внесени податоци, без да го менуваш netERP.

Дизајн и код

Во Дизајнерот на маски F12 ја менуваш приказот помеѓу дизајн и код. F9 ја проверува скриптата, F1 ја отвора помошта „Што може скриптата?“ со 35 примери кои ги вметнуваш со двоен клик. Јазикот е Pascal (netPascalScript) со англиски имиња.

Настани

  • Маска: BeforeOpen, AfterOpen, BeforeSave, AfterSave, BeforeClose, OnValidate.
  • Поле: OnEnter, OnExit, OnChange, OnClick.

Во инспекторот на објекти (ново) на јазичето „Настани“ создаваш соодветна рутина, на пример FormBeforeSave. netERP ги отстранува празните рутини при чување.

Пример

procedure FormBeforeSave(Sender: TObject);
begin
  if Form.Field('description') = '' then
    Form.Cancel('Bitte die Bezeichnung angeben.');
end;

procedure CodeOnExit(Sender: TObject);
begin
  Form.SetField('code', UpperCase(Form.Field('code')));
  Form.SetEnabled('zip', Form.Field('country') = 'DE');
end;

Што може скриптата

Да чита и поставува полиња (Form.Field, Form.SetField), да ги прикажува или крие полињата или да ги блокира (SetVisible, SetEnabled), да го постави фокусот, да отвори секција, да прикаже пораки и прашања (Message, Confirm) и да го откаже чувањето или затворањето (Form.Cancel). Form.IsNew, Form.Module и Form.Id даваат информации за записот. Клучевите на полињата произлегуваат од дизајнот на маската.

Грешка во скриптата ќе биде пријавена еднаш; формата останува употреблива. Само Form.Cancel ја прекинува акцијата.