Hi.... Thanks Raul, perfect examples of exactly the type of thing I am trying to accomplish. Hours of struggling put to rest 2 minutes after getting your samples!
Dan.... -----Original Message----- From: Raul Acevedo [mailto:[EMAIL PROTECTED] Sent: Friday, May 30, 2003 9:21 AM To: [EMAIL PROTECTED] Subject: Re: CASE statement problem.... Here are some examples. set MailType = CASE InputBody.WfMessage.ActivityImplInvoke.ProgramID.ProgramName when 'WorkItemNotification' then 'is Ready for Your Approval' when 'RejectionNotice' then 'Has Been Disapproved' when 'ReWorkNotice ' then 'Requires Rework' when 'SendEmail' then 'Has Been Approved' else 'is In Process' end; set Environment.Variables."From" = CASE InputBody.WfMessage.ActivityImplInvoke.ProgramID.ProgramName when 'WorkItemNotification' then InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.UserEmail when 'RejectionNotice' then InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.UserEmail when 'ReWorkNotice ' then InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.UserEmail when 'SendEmail' then InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.UserEmail else InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.UserEmail end; set Environment.Variables.EmailList = CASE InputBody.WfMessage.ActivityImplInvoke.ProgramID.ProgramName when 'WorkItemNotification' then InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.ApprovalAssignments[NextIx].UserEmail when 'RejectionNotice' then InputBody.WfMessage.ActivityImplInvoke.ProgramID.OriginatorEmail when 'ReWorkNotice ' then InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.ApprovalAssignments[ReworkIx].UserEmail when 'SendEmail' then InputBody.WfMessage.ActivityImplInvoke.ProgramID.OriginatorEmail else InputBody."WfMessage"."ActivityImplInvoke".ProgramInputData.CIPData.UserEmail end; Raul L. Acevedo Consulting IT Architect Enterprise Application Integration (EAI) IBM Global Services 818-539-3203 Office (TL 396-3203) Glendale, CA 818-599-6626 Mobile [EMAIL PROTECTED] Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive Instructions for managing your mailing list subscription are provided in the Listserv General Users Guide available at http://www.lsoft.com Archive: http://vm.akh-wien.ac.at/MQSeries.archive
