Tracking if the task is closed and then allow user to open new task

[Sandy1992]

Hi All,

Thank you so much for helping me till now in solving so many issues.

-------

My application is almost done, just one thing which I find challenging (or may be am not able to figure out the proper logic for it).

Before heading to the question , I would like to give the overview.

There are 2 forms:
1) Form1
2) Tasks

On "Form1" their is a button which open form "Tasks".

On form "Tasks" the logged in user can save the starting and ending time.
While it is not always mandatory to save the ending time.

All these details are stored in Table : "TasksD"
Fields are like :
ID(Autonu)
EmpId(Numeric)
start(text)
end(text)
Duration(Text)

Now, when the user saves the end time, the difference between the start and end time is been calculated and captured in Duration field.

What I really want to achieve is:

Until the user has saved the end time of the previous task, he/she cant open the form "Tasks".

I tried implementing some logics but they are not serving the requirement.

All the suggestions are accepted. :)

[Seth Schrock]

How would they enter the End time if they can't open the Tasks form? One way would be to count how many records they have that don't have an End value. If that number is greater than 0, then don't open the form.

[Sandy1992]

Thanks Seth for replying :)

Answer to your question.

If the user has saved only the start time , then the end time can be saved.

I have a report which have the particular column (which works like a hyperlink) which redirects to that particular task and allow the user to save the end time.

What I really want is bound the user to save the end time first and than only start new task.

I tried using a variable to check the table for the "duration" column, if it is Null than don't allow otherwise allow to start new task.

But it turned out flop.

Your suggestion sounds good, can you please highlight it little more.

[Seth Schrock]

You mentioned having a button on Form1 that opens the Tasks form. In that button's OnClick event, have an If-Then-Else statement that uses the DCount() function to check if there are any records that don't have the End value set. Something like this:

If DCount("*", "TasksD", "End Is Null") > 0 Then
    MsgBox "You can't add another task because you haven't finished the last one."
Else
    DoCmd.OpenForm "Tasks"
End If

[Sandy1992]

Hi Seth,

I tried implementing it.

but it is not working. It is not even doing anything.

I would like to know how will it figure out that if the end value is null field.

See what I mean to say is:
As I mentioned earlier, there is a field "EmployeeId". So the values are saved according to the logged in employeeId.

So, there will be duplicate employee id right.

Just want to understand the logic well.

[Seth Schrock]

So you would need to add the EmployeeID to the criteria of the DCount() function (the third parameter).

DCount("*", "TasksD", "End Is Null And EmployeeID = " & SomeVariable)

You would replace SomeVariable with whatever you are using to store the currently logged in user ID.

[Sandy1992]

Hi Seth,

I am using an unbound control to fetch the current user.

I replaced my previous line with this line.

DCount("*", "TasksD", "End Is Null And EmployeeId = " & Me.txtUserID) > 0

Note: EmployeeId is numeric field.

But still it is not working.

I tried placing new button to my form and placed this code under on click event , but it is not doing anything.

Neither of the things.

[Seth Schrock]

Do you get an error or what happens when "it doesn't work"?

[Sandy1992]

No Seth.

I am not getting any kind of errors.

But it seems the button is not working.

It only blinks as I click on it. and it does nothing

[Seth Schrock]

If you go into design view and look at the events for the button, is there anything listed for the OnClick event? If so, click on the ellipsis button (three dots) and make sure that it takes you to your code. Then put a break point on the If-Then line and then click the button and us the F8 key to step through your code to see what is happening.

[Sandy1992]

Hi Seth,

Even though, I am inserting break points and clicking the button.

It is not allowing me to debug. As I usually check using break points , but this is not even going to it. It only blinks and does nothing.

[Seth Schrock]

Did you verify that the button's OnClick event is pointing to your code? This happens occasionally where a control will lose its mapping to the code that it is supposed to run and it has to be recreated.

[Sandy1992]

Yes it is pointing to my code only.

[Seth Schrock]

Try closing out of the database, getting back in and see if you get a message asking to enable code.

Before you do that, go into Access Options > Trust Center and then select the Message Bar tab on the side. Make sure that the Show the Message Bar... option is selected.

[Sandy1992]

Ohk. I did what you suggested.

But no change.

Instead I would like to know if I can use the same code on some other event?

As the code which you provided , I am using under new button.

As , the actual command button already have Embedded macro under Onclick event.

so, if it works, can we put the code under some other event.

Just in case it helps. Atleast actual button opens the form

[Seth Schrock]

So you created a new button to test the code and it isn't working in its OnClick event. You can try it in the button's GotFocus event.

[Sandy1992]

Hi Seth,

I tried on GotFocus event, its not working either.

[Seth Schrock]

I don't know what to tell you. Try deleting your control and then recreating it and add the On Click event and see if it runs.