mibuso.com

hi all,

Great day to every one.

I like to know whether it is possible to restrict WORKDATE for a particular user. can any one help me how to do this?

For Example

I am having Five users,

In that only two users will be able to change the WORKDATE and the remaining three can not.

Not so easy, but I have an idea, but I didn't test it:

Create a singleinstance codeunit. This codeunit you have to launch in Codeunit 1 function LogInStart().

globals :

OnRun() of your singleinstance codeunit:


autTimer::Timer(Milliseconds : Integer)


PS : you need to create field recUserSetup."User May Change WORKDATE".

There are some topics about this on www.mbsonline.org

For example:

http://www.mbsonline.org/forum/topic.as ... kdate,user

Thanx a lot

I will work on it and update you.

Hi

For Another developer with same problem.


http://www.mibuso.com/forum/viewtopic.php?p=52893#52893


==================================
Richard

Here is a slightly different approach from a non-developer point of view,
you goal is to not let certain employees post transactions with a different date then "Today" correct.

So, you need to change the user setup allow to-from posting date to always be today. For this I would create a processing only report that updates the user setup table 91 to have the current date, run the report in the job scheduler or NAS and you are done. I would run this each evening so when the employee came in in the morning they would be ready to go. You filter it to run just on the restricted employees. You could add a field to the user setup table, a check box that you would check if they were restricted.


dt := TODAY + 1 // today plus 1 if you run it at night for the next day.

"User Setup" OnAfterGetRecord()
"Allow Posting From" := dt;
"Allow Posting To" := dt;
Modify;

dear kriki,

Thanks for providing the its working fine.

Regards,
Aniruddha

IS THERE A WAY TO GET THE SERVER DATE AND PUT THAT DATE IN ALL CLIENTS?

I got solution for SQL DB that i have created one Date field in Company Info Table and written stored procedure in SQL to populate date in to Date field. Executing procedure by using JOBS. Now as suggested by kriki i have written code which is working fine.
In case of FDB I am using Jog Queue, but I am facing some problem with Job QUEUE.

Dear Kriki

I had gone through you Code, but I am not able to configure 2nd line of below code ! Would you help me out to do this.

recUserSetup Record - I had define the field in User Setup table as well as Singleinstance codeunit as global variable.

autTimer - where I need to configure autTimer

Code: Select all
recUserSetup Record "User Setup"
autTimer Automation 'Navision Timer 1.0'.Timer (property WithEvents=Yes)

regds

Rupesh Verma

In the global variables of the codeunit, you need to create a variable of type automation and select the Navision timer (you need to have NAV installed in a correct way or otherwise you need to registrate the dll yourself in Windows).

Hi Kriki

Thanks for giving us the solutions, you solutions is working fine.
regds
Rupesh Verma
Kortek Electronics

Kriki provided good solution. But still i would go ahead with themave solution with minor modification. Instead of creating a report and running it through NAS , write the same code to update "Allow posting from" and "allow posting to" as today through Application management code unit on LogInStart function. That will make life simple.



Regards,
Faisal Bukhari

Dear Kriki

Thanks for giving me the solutions to restrict/allowed the Users to change the Work Date.

Rupesh Verma