Програмирање на маски со Скрипта на маската
Со Скрипта на маската проверуваш и дополнуваш внесени податоци, без да го менуваш 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 ја прекинува акцијата.
