//*********************************************************************************************
// Function: create_table(swidth,snumbercolumns,stitle)
// parameter: swidth = width percentage of the table
// parameter: snumbercolumns = used for the column span for the table title
// parameter: stitle = Title used for the table
// description: creates starting, and title table tags
//*********************************************************************************************
function create_table(swidth,snumbercolumns,stitle){
	var stext;
	if ( swidth == null ) {swidth=80};
	if ( snumbercolumns == null ) {snumbercolumns=1};
	if (stitle == null ) {stitle="Table"};

	document.writeln("<TABLE width="+swidth+"% cellSpacing=0 cellPadding=0 >"); 

	table_title(stitle,snumbercolumns); 

return(stext);
}


//function create_table(swidth){
//	var stext;
//	document.writeln("<TABLE width="+swidth+"% cellSpacing=0 cellPadding=0 border=1>"); 
//
//return(stext);
//}

//*********************************************************************************************
// Function: end_table()
// parameter: None
// description: creates ending table tags
//*********************************************************************************************
function end_table(){
	var stext;
	document.writeln("</TABLE>"); 

return(stext);
}

//*********************************************************************************************
// Function: table_title(stitle,swidth,scolspan)
// parameter: stitle
// parameter: scolspan - Defalut 1 column
// description: creates a table title row spanning over defined number of columns.
//*********************************************************************************************
function table_title(stitle, scolspan){
	var stext;
	if (stitle == null){ stitle="Table"};
	if (scolspan == null){ scolspan=1};

	document.writeln("<TR><TH colspan=\""+scolspan+"\">"+ stitle+"</TH></TR>"); 

return(stext);
}


//*********************************************************************************************
// Function: create_row_start
// parameter: None
// description: creates a table row starting tag
//*********************************************************************************************
function create_row_start(){
	var stext;
	document.writeln("<TR>"); 

return(stext);
}

//*********************************************************************************************
// Function: create_row_end
// parameter: None
// description: creates a table row ending tag
//*********************************************************************************************
function create_row_end(){
	var stext;
	document.writeln("</TR>"); 

return(stext);
}

//*********************************************************************************************
// Function: create_row_next
// parameter: None
// description: ends current row and starts a new row in the table
//*********************************************************************************************
function create_row_next(){
	var stext;
	document.writeln("</TR><TR>"); 

return(stext);
}


//*********************************************************************************************
// Function: table_selement(stext)
// parameter: stext
// description: creates a table element using a string value
//*********************************************************************************************
function table_selement(stext){
	var stext;
	document.writeln("<TD>"+stext+"</TD>"); 

return(stext);
}

//*********************************************************************************************
// Function: table_lelement(slink,slabel){
// parameter: slink - Hyper link URL
// parameter: slabel - Hyper Link display Value
// description: creates a table element using a hyper link
//*********************************************************************************************
function table_lelement(slink,slabel){
	var stext;
	document.writeln("<TD><a HREF=\""+slink+"\">"+slabel+"</a></TD>"); 

return(stext);
}


//*********************************************************************************************
// Function: table_single_record(slabel,stext,snumberrecordcolumns)
// parameter: stext
// parameter: snumberrecordcolumns number of records on a line, one record includes a label and
//            a text value.
// description: creates a table element using a string value
//*********************************************************************************************
function table_single_record(slabel,stext,snumberrecordcolumns){
	var stext;
	if (!snumberrecordcolumns || snumberrecordcolumns==1){
		document.writeln("<TR>"); 
	};

	if (!slabel){
		document.writeln("<TD></TD>"); 
	}
	else{
		document.writeln("<TD>"+slabel+"</TD>"); 
	};

	if (!stext){
		document.writeln("<TD></TD>"); 
        }
        else
            {
		document.writeln("<TD>"+stext+"</TD>");
	    }

	if (!snumberrecordcolumns || snumberrecordcolumns==1){
		document.writeln("</TR>"); 
	};

return(stext);
}

//*********************************************************************************************
// Function: table_record(slabel,stext,shref)
// parameter: slabel - record lable
// parameter: stext - record value
// description: creates a table element using a string value.  Used
//              if table row is managed manually to allow more than one record on a table.
//*********************************************************************************************
function table_record(slabel,stext,shref){
	if (!slabel){
		document.writeln("<TD></TD>"); 
	}
	else{
		document.writeln("<TD>"+slabel+"</TD>"); 
	};

	if (!stext){
		document.writeln("<TD></TD>"); 
	}
	else{
	    if (!shref){
		document.writeln("<TD>"+stext+"</TD>"); 
		
            }
            else
            {
		table_lelement(shref,stext);
//		document.writeln("<TD>"+stext+"</TD>");
	    }
	};

return(stext);
}

//*********************************************************************************************
// Function: table_record_link(slabel,stext,shref)
// parameter: slabel - record lable
// parameter: stext - record value
// description: creates a table element using a string value.  Used
//              if table row is managed manually to allow more than one record on a table.
//*********************************************************************************************
function table_record_link(slabel,stext,shref){
	if (!slabel){
		document.writeln("<TD></TD>"); 
	}
	else{
		document.writeln("<TD>"+slabel+"</TD>"); 
	};

	if (!stext){
		document.writeln("<TD></TD>"); 
	}
	else{
	    if (!shref){
		document.writeln("<TD>"+stext+"</TD>"); 
            }
            else
            {
		document.writeln("<TD>"+stext+"</TD>");
	    }
	};

return(stext);
}


//*********************************************************************************************
// Function: create_label(slabel)
// parameter: slabel - text value used as a label value
// description: creates a table element using a string value
//*********************************************************************************************
function create_label(slabel){
	var stext;
	stext = slabel;
	document.writeln("<TD width=200 bgcolor=darkblue><FONT COLOR=WHITE>" + "<B>" + stext + ": <B></FONT></TD>"); 

return(stext);
}

//*********************************************************************************************
// Function: create_textfield(stextfield)
// parameter: stextfield - text value used as a label value
// description: creates a table element using a string value
//*********************************************************************************************
function create_textfield(stextfield){
	var stext;
	stext = stextfield;
	document.writeln("<TD>" + stext + "</TD>"); 

return(stext);
}