mibuso.com

How to Make Visible Command Button to some user.

1) I have created a a new role. If that role exist in that user id. then only the Command Button should get visible.

2) i have created the 2 command button as "DONE" and "EDIT"

3) i have written code as follows:

Form - OnOpenForm Trigger

user.GET(USERID);
memberof.RESET;
memberof.SETRANGE(memberof."User ID",USERID);
memberof.SETRANGE(memberof."Role ID",'TC UPDATION');
IF memberof.FINDFIRST THEN
BEGIN
CurrForm.Done.Visible:= FALSE;
CurrForm.Edit.Visible:= FALSE;
END;

But the above code is not working
can somebody help me out.

Should it be
CurrForm.Done.Visible:= TRUE;
CurrForm.Edit.Visible:= TRUE;

If role found?

It does not work if you use Windows logins.
Give this one a look : http://www.mibuso.com/forum/viewtopic.php?t=38353

I have done the necessary Changes but its saying

---------------------------
Microsoft Dynamics NAV Classic
---------------------------
You have specified an unknown variable.

Done

Define the variable under 'Global C/AL symbols'.

---------------------------
OK
---------------------------

Did you set name fields for buttons?

Its a Command Button.

sorry..
I mean Name property for command button..

Yes.
But if role is not specified then also its visible.

Thanks Mohana.
Its Done.


user.GET(USERID);
memberof.RESET;
memberof.SETRANGE(memberof."User ID",USERID);
memberof.SETRANGE(memberof."Role ID",'TC UPDATION');
IF memberof.FINDFIRST THEN
BEGIN
CurrForm.Done.VISIBLE:= TRUE;
END ELSE
CurrForm.Done.VISIBLE:= FALSE;

user.GET(USERID);
memberof.RESET;
memberof.SETRANGE(memberof."User ID",USERID);
memberof.SETRANGE(memberof."Role ID",'TC UPDATION');
IF memberof.FINDFIRST THEN
BEGIN
CurrForm.Edit.VISIBLE:= TRUE;
END ELSE
CurrForm.Edit.VISIBLE:= FALSE;

Why do you need 2 times?

Thanks Mohana i have necessary changes as per request and it working fine.

Or

I prefer only one findfirst


But I once created a function in a codeunit that is "hasrole"
The same code applies, but a parameter with the rolename and a boolean return. Bam you can use it anywhere

or this