mooAWAttach
mooAWAttach("[aw name]", "[position]")
Attaches an Analytic Workspace in the specified position if it exists
Syntax
mooAWAttach("[aw name]", "[position]")
where [aw name] is the fully referenced analytic workspace name
[position] is the position the referenced aw should be attached.
FIRST makes the aw you are attaching the current one.
LAST makes the aw you are attaching the last in the list excluding the express aw.
BEFORE puts the aw you are attaching before an aw which is already in the list.
AFTER puts the aw you are attaching after an aw which is already in the list.
Return Value
BOOLEAN
Example
Public Sub mooAwAttach()
'Attach Analytic Workspaces
Dim boo As Boolean
If Not oregistered Then: boo = regQ:
'Check Im connected if not connect
If Not o.connected Then
boo = o.connect
boo = o.connected
Else
boo = True
End If
If boo = True Then
boo = o.mooAwAttach("GLOBAL.GLOBAL", "FIRST")
boo = o.mooAwAttach("GLOBAL.GLOBAL", "AFTER EXPRESS")
Else
Debug.Print "Unable to Connect"
Debug.Print o.getlastmooerr
End If
End Sub