|
RSS Feed - WebSphere MQ Support
|
RSS Feed - Message Broker Support
|
 |
|
Passthrough during activity |
« View previous topic :: View next topic » |
Author |
Message
|
Milesi |
Posted: Mon Jun 10, 2002 8:07 pm Post subject: Passthrough during activity |
|
|
 Apprentice
Joined: 15 Apr 2002 Posts: 37
|
Hello,
I am trying to retrieve the user level while doing an activity.
MQWorkflow allows to have passthrough connection while being in an activity. Is there any better way to do this?
Beside under the ActiveX API, the passthrough method is under excecutionservice. How can I retrieve the excecution service during an activity without knowing what connection to use or the connection parameters. To be clearer, how tp perform a passthrough connection.
Thank you.
Cheers,
Milesi |
|
Back to top |
|
 |
Milesi |
Posted: Mon Jun 10, 2002 9:35 pm Post subject: I think I've got it |
|
|
 Apprentice
Joined: 15 Apr 2002 Posts: 37
|
I think I have answered my question. Stop me if I am wrong:
A MQWorkflow control can connect to the server, it just establish a connection without any user information.
From this point you can add an execution service to the excecution service array.
An eService is then really related to a user. Using the passthrough method on this object will specify this eService is related to the user performing the activity. I can then query the usersettings and get the level I wanted.
Milesi |
|
Back to top |
|
 |
Milesi |
Posted: Tue Jun 11, 2002 7:28 pm Post subject: |
|
|
 Apprentice
Joined: 15 Apr 2002 Posts: 37
|
I have the following test code to have a passthrough connection it returns the user level during an activity :
Public Function GetUserAuthorityLevel() As Long
Dim name As String
Dim user As Person
Dim eServiceIndex As Long
Dim eService As ExecutionService
rc = MQWorkflowCtrl1.Connect
MsgBox Str(MQWorkflowCtrl1.ExecutionServiceArray.GetSize)
eServiceIndex = MQWorkflowCtrl1.ExecutionServiceArray.Add("FMCSYS", "FMCGRP")
MsgBox Str(MQWorkflowCtrl1.ExecutionServiceArray.GetSize)
Set eService =MQWorkflowCtrl1.ExecutionServiceArray.GetAt(eServiceIndex)
rc = eService.Passthrough
MsgBox Str(rc)
eService.Refresh
Set eService = MQWorkflowCtrl1.ExecutionServiceArray.GetAt(eServiceIndex)
Set user = eService.UserSettings(rc)
MsgBox Str(rc)
MsgBox user.UserID
GetUserAuthorityLevel = user.Level
end function
The bolded line return code is 124 : FMC_ERROR_PROFILE
Thank you for the help.
cheers,
milesi |
|
Back to top |
|
 |
vedbhat |
Posted: Tue Jun 11, 2002 10:25 pm Post subject: |
|
|
 Disciple
Joined: 19 Mar 2002 Posts: 186 Location: Singapore
|
Hi,
Contact me for working sample of pass thru.
Cheers
Ved _________________ IBM Certified Solutions Expert - MQSeries Workflow
IBM Certified Specialist - MQSeries |
|
Back to top |
|
 |
|
|
 |
|
Page 1 of 1 |
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|
|
|