Global code

[NotSoC#]

I have inherited a database, i am now trying to fully understand it. The only problem i have is the there is a module called 'Global Code'.
Can anyone please explain to me what it is doing exactly.

Global Code:

Function IsLoaded(ByVal strFormName As String) As Integer
' Returns True if the specified form is open in Form view or Datasheet view.

Const conObjStateClosed = 0
Const conDesignView = 0

If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <> conObjStateClosed Then
If Forms(strFormName).CurrentView <> conDesignView Then
IsLoaded = True
End If
End If

End Function

Any help would be great........Chris

 

[Mile-O]

Basically, all its doing is receiving a form name from somewhere else in the database and checking to see if that form is loaded. If it is then it returns a value of True.

 

[NotSoC#]

Thanx me man!

I understand now......at last.

(It will only open the payments input form if the Members details form is loaded!)

Thanx.again......Chris