tas/vam

def composeMail (to, subject = None, body = None, cc = None, bcc = None):      for toAddress in to:     		settextvalue ('frmComposeMessage', 'txtto', toAddress)	   	if len (to) > 1 	                appendtext ('frmComposeMessage', 'txtto', ',')	if subject != None:		settextvalue ('frmComposeMessage', 'txtsubject', subject [0])		setcontext ('frmComposeMessage', subject [0])	if body != None:		settextvalue ('frmComposeMessage', 'txtbody', body [0])      if cc != None:            menucheck ('frmComposeMessage','mnuView;mnuCcField')            for toCc in cc:			     settextvalue ('frmComposeMessage', 'txtcc', toCc)            if len (cc) > 1                	     appendtext ('frmComposeMessage', 'txtcc', ',')		if bcc != None:             menucheck ('frmComposeMessage','mnuView;mnuBccField')	    	 for toBcc in bcc:				settextvalue ('frmComposeMessage', 'txtbcc', toBcc)	    	 if len (bcc) > 1                		appendtext ('frmComposeMessage', 'txtbcc', ',')def composeHtmlMail (to, subject = None, body = None, cc = None, bcc = None):             menucheck ('windowName', 'mnuformat;mnuHtml')             composeMail (to, subject, body, cc, bcc)