submenucontainer {
	BACKGROUND-COLOR: transparent;
	MARGIN: 0px;
	WIDTH: 140px;
	padding-left : 8px;
	FLOAT: left;
	padding-top : 20px;
}

#submenu {
	FLOAT: left;
	PADDING-BOTTOM: 10px;
	PADDING-LEFT: 8px;
	PADDING-RIGHT: 5px;
	PADDING-TOP: 12px;
	}

#submenu ul {
	LINE-HEIGHT: 15px;
	MARGIN: 0px;
	PADDING-BOTTOM: 0px;
	PADDING-LEFT: 0px;
	PADDING-RIGHT: 0px;
	PADDING-TOP: 0px;
}

#submenu li {
	LIST-STYLE-TYPE: none;
	MARGIN: 0px;
}

#submenu li li {
	padding-left: 10px;
	margin-top: 2px;
	list-style-type: none; 
}

#submenu a {
	BACKGROUND-COLOR: transparent;
	COLOR: #666;
	DISPLAY: block;
	PADDING-LEFT: 5px;
	TEXT-DECORATION: none;
	WIDTH: 123px;
}

#submenu a:hover {
	BACKGROUND-COLOR : transparent;
	COLOR: #092769;
}

#submenu ul a#procat {
	BACKGROUND: transparent;
	COLOR: #092769;
}

/*end sub menu*/

Function PRDCAT(idkey)
    If cInt( Request.QueryString("id").Item ) = rsG.Fields.Item("cat_id").Value Then
	Response.Write "id=""subcurrent"""
		Else			
         Response.Write ""
     End If
End Function