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)