An alternative approach you could try is based on the GroupWise token ItemGetSource:
const SRC_MAILBOX = 1 const SRC_SENT_ITEMS = 2 const SRC_PERSONAL = 3 Sub Main(Client, GWEvent) dim iPersonal dim oMsg set oMsg = GroupWise.ComposingItem if not (oMsg is nothing) then iPersonal = (oMsg.ClassName = "GW.MESSAGE.TASK") _ and (GroupWise.ItemGetSource("X00") = SRC_PERSONAL) msgbox "ClassName: " & oMsg.ClassName & ", Personal: " & iPersonal end if End Sub
It may be that there is a defect in the GroupWise client (or in your co-worker’s installation), causing it to report the box type/message source in error.
In addition, it may be that your co-worker’s local copy of the relevant view has been edited in some way that alters the type reported by GroupWise. Perhaps you can experiment with replacing that view with your own ‘working’ view file. If you wish, send us the view file to analyze, at email@example.com.