7. September 2006 14:11
IF USERID = 'CHECKOUT' THEN BEGIN
CurrForm.EDITABLE(FALSE);
END;
IF USERID = 'CHECKOUT' THEN BEGIN
CurrForm.Name.EDITABLE(FALSE);
CurrForm."No.".EDITABLE(FALSE);
CurrForm."Name 2".EDITABLE(FALSE);
CurrForm.Address.EDITABLE(FALSE);
END;
7. September 2006 14:30
CurrForm.EDITABLE(USERID <> 'CHECKOUT');
7. September 2006 14:40
7. September 2006 14:48
7. September 2006 14:50
7. September 2006 15:21
7. September 2006 20:36
OnOpenForm()
IF NOT UserSetup.GET(USERID) THEN
UserSetup.INIT;
CurrForm.EDITABLE(UserSetup."Customer Card Editable");
OnOpenForm()
CurrForm.EDITABLE(WRITEPERMISSION);