var eListForm=0
function eForm(doc){
	this.name = "eForm"+ eListForm++
	this.obj = this.name + "l"
	eval(this.obj + "=this")
	this.doc = doc
	this.options = new Array()
	this.add = eForm_add
	this.write = eForm_HTML
}
function eForm_add(val,itxt) {
	var l = this.options.length
	this.options[l]=new Object()
	this.options[l].value=val
	this.options[l].itxt=itxt
}
function eForm_HTML(label) {
	var st=''
	var i=0

	st+='<FORM ACTION="'+TTTwinowa+'/pkg_lista_eventos.lista_eventos?p_origen='+ eve.origen+'" METHOD="post" target"TTTmFrame">'
	st+='<table border="0" cellspacing="0" cellpadding="0">'
	st+='<tr>' //<td class="v10bl"><b>'+label+'&nbsp;</b></td>'
	st+='<td class="v12bkev"><SELECT NAME="claves" SIZE="1" class="v12bkev">'
	for(i=0;i<this.options.length;i++) st+='<OPTION value="'+this.options[i].value+'"><B>'+this.options[i].itxt+'</B>'
	st+='</SELECT><INPUT TYPE="hidden" NAME="p_usuario" VALUE="'+eve.usuario+'"><INPUT TYPE="hidden" NAME="p_idioma" VALUE="'+eve.langu+'"></td>'
	if (eve.origen) {
	  var css=''
    if (eve.css != 0) {css = eve.css}
	  st+='<td class="homtxt1">&nbsp;<INPUT name="ir" TYPE="image" src="'+TTTwinowa2+'/images/bot_busq_off'+css+'.gif" border="0" width="16" height="16"></td></FORM></tr>'}
	else { st+='<td class="homtxt1">&nbsp;<INPUT name="ir" TYPE="image" src="/images/bot_busq_offTTT.gif" border="0" width="16" height="16"></td></FORM></tr>'}
	st+='</table>'
	st+='<table border="0" cellpadding="0" cellspacing="0">'
	st+='<tr><td><img src="/images/cp.gif" width="1" height="5"></td></tr>'
	st+='</table>'
	return st
}