function keywordPickerSingle(returnType,returnName,Type,Collection,multi,fields,category)
{
//Returntype = If function should return selected persons to a fireld or a function. Takes Field or Function as value
//ReturnName = Name of function or Field to return value to
//Type = Type of keyword to return . Trade, area etc.
//Collection = Indicates if collection should contain all or used information
//Category = Category to use in Lookup
//multi = If Yes, then function will return multiple values
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
strSelected='';
column = '';
if (typeof (multi) != 'undefined')
{
form ='frmKeywordPickerMulti';
width='500';
}
else
{
width='280';
form ='frmKeywordPicker';
}
if (typeof (fields) != 'undefined')  {
strSelected=fields
}
if (Type=="Area")
{
title = 'Select area';
if (typeof (Collection) != 'undefined')    	
{
if (Collection=='All')
{
dbfp ='69';
view='.vieAreaLookup'
}
else if (Collection=='')
{
view='.vieAreaLookup';
dbfp ='21';
category='Area';
}
else
{
view='.vieAreaLookupToday'
dbfp ='69';
}
}
else {
	           view='.vieAreaLookup';
dbfp ='21';
category='Area';
	
}
}
else if (Type=="Trade")
{
title = 'Select trade';
if (typeof (Collection) != undefined)
{
if (Collection=='All')
{
view='.vieAreaLookup'
dbfp ='21';
category='Trade'
}
else if (Collection=="")
{
view='.vieAreaLookup'
dbfp ='21';
category='Trade'
}
else if (Collection=='ExtDist'){
view='.vieTradeExtDistLookup';
dbfp ='69';
}
else
{
view='.vieTradeLookupToday'
dbfp ='69';
}
}
else{
	           view='.vieAreaLookup'
dbfp ='21';
category='Trade'
	
}
}
else if (Type=="Vessel")
{
title = 'Select vessel';
if (typeof (Collection) != undefined)
{
if (Collection=='All')
{
dbfp ='69';
view='.vieVesselLookup'
}
else if (Collection=='ExtDist'){
dbfp = '69'
view='.vieVesselLookupExtDist'
}
else
{
view='.vieVesselLookupToday'
dbfp ='69';
}
}
else{
	              dbfp ='70';
view='.vieVesselLookup'
	
}
}
else if (Type=="Family")
{
dbfp ='85';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieLookupFamily'
title = 'Select Family'
}
else if (Type=="Corporation")
{
dbfp ='85';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieLookupCorp'
form='frmKeywordPicker';
title = 'Select Corporation'
}
else if (Type=="Country")
{
dbfp ='21';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieAreaLookup';
title = 'Select country';
category='Country';
}
else if (Type=="Brand")
{
dbfp ='71';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieLookupBrand';
title = 'Select brand';
}
else if (Type=="Equipment")
{
dbfp ='68';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieLookupEquipmentByPort';
title = 'Select equipment';
form ='frmKeywordPicker';
width='280';
}
else if (Type=="Dischargeport")
{
dbfp ='69';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieLookupPortbyVoyage';
title = 'Select discharge port';
form ='frmKeywordPicker';
width='280';
}
else if (Type=="Singleport")
{
dbfp ='21';
dbfpkeyword ="Web/Basic/hualweb_resources.nsf";
view='.vieLookupSinglePort';
title = 'Select port';
form ='frmKeywordPicker';
width='280';
}
else if (Type=="GeneralTariff") {
// alert('General Tariff')
dbfp ='81';
view='TariffsByTradeLookup';
title = 'Select tariff';
column = '1'
form ='frmKeywordPicker';
width='280';
}
else
{
return
}
url = '/'+dbfpkeyword+'/'+form+'?openform'
url=url+'&returnType='+returnType+'&returnName='+returnName;
url= url+'&db='+dbfp+'&view='+view;
url= url+'&Title='+title;
if (typeof (category) != 'undefined')  {
if (category!='')
{
url = url + '&Category=' + category
}
}
if (strSelected!='')
{
url= url +'&selected=' + strSelected
}
if (column != '') url = url + '&Column=' + column
window.open(url,'','height=380,width='+width+',scrollbars=no','')
}
function Execute()
{
	var strName, ViewName, strStartPort, strValgtStartPort, strEndPort, strValgtEndPort, strVessel, strValgtVessel, strToday
	var strDateFrom, strValgtDateFrom, strDateTo, strValgtDateTo,sVoyage
	var strTradecode, strValgtTradecode, strStartArea, strValgtStartArea, strEndArea, strValgtEndArea, strPath, strTemp
	
	strValgtStartPort = document.forms[0].StartPortCode.value
	strValgtEndPort = document.forms[0].EndPortCode.value
	strValgtVessel = document.forms[0].VesselCode.value
	strValgtDateFrom = document.forms[0].DateFrom.value
	strValgtDateTo = document.forms[0].DateTo.value
//strValgtDateFrom = '12.02.2006'
//strValgtDateTo ='12.03.2006'
	strValgtTradecode = document.forms[0].TradeCodeValue.value
	strValgtStartArea = document.forms[0].StartPortCode.value
	strValgtEndArea = document.forms[0].EndPortCode.value
var Obj=document.forms[0].Voyage
var selIndex = Obj.selectedIndex
strValgtVoyage = Obj.options[selIndex].value
//showObj = document.forms[0].Voyage
sSort = document.forms[0].SortSearch.value
	
if (strValgtDateFrom=="") {
		strDateFrom = ""
	}
	else {
		strDateFrom = "&DateFrom=" + strValgtDateFrom
	}
	
	if (strValgtDateTo=="") {
		strDateTo = ""
	}
	else {
		strDateTo = "&DateTo=" + strValgtDateTo
	}
	
	if (strValgtStartPort=="") {
		strStartPort = ""
	}
	else {
		strStartPort = "&StartPort=" + strValgtStartPort
	}	
	
	if (strValgtEndPort=="") {
		strEndPort = ""
	}
	else {
		strEndPort = "&EndPort=" + strValgtEndPort
	}
	
	if (strValgtVessel=="") {
		strVessel = ""
	}
	else {
		strVessel = "&Vessel=" + strValgtVessel
	}
	
	if (strValgtTradecode=="") {
		strTradecode = ""
	}
	else {
		strTradecode = "&Tradename=" + strValgtTradecode
	}
	
	if (strValgtStartArea=="") {
		strStartArea = ""
	}
	else {
		strStartArea = "&AreaFrom=" + strValgtStartArea
	}
	
	if (strValgtEndArea=="") {
		strEndArea = ""
	}
	else {
		strEndArea = "&AreaTo=" + strValgtEndArea
	}
	
	if(document.forms[0].AreaOrPortStart[1].checked) {
if (strValgtStartPort==""){
strStartArea = ""
}
else
{
strStartArea = "&AreaFrom=" + strValgtStartPort
}
	strStartPort = ""
	                }
	else      {
strStartArea=""
if (strValgtStartPort=="") {
		strStartPort = ""
}
else {
strStartPort = "&StartPort=" + strValgtStartPort
}
	}
		if(document.forms[0].AreaOrPortEnd[0].checked) {
if (strValgtEndPort==""){
strEndArea = ""
}
else
{
strEndArea = "&AreaTo=" + strValgtEndPort
}
	strEndPort = ""
	                }
	else      {
strEndArea=""
if (strValgtEndPort=="") {
		strEndPort = ""
}
else {
strEndPort = "&EndPort=" + strValgtEndPort
}
	}
		
if(sSort=="") {
		sSort = ""	
	}
	else {
		sSort = "&Sort=" + sSort
	}
if (strValgtVoyage!='All'){
sVoyage = '&Voyage='+strValgtVoyage
}
else {
sVoyage =''
}
	pro = window.location.protocol
	host = window.location.hostname
	
	strTemp = location.pathname
	if(strStartPort =="" &  strEndPort ==""   & strVessel =="" & strDateFrom ==""  & strDateTo =="" & strTradecode =="" & strStartArea =="" & strEndArea=="" ){
	var d=new Date()
	var date = d.getDate() + "-"
	var month = d.getMonth() + "-"
	var year = d.getFullYear()
	var aDate = date+month+year
	if('nei'=='ja'){
	parent.frames['fra_ViewListing'].location.href="/"+sCmsDb+"/pages/Systemportalpages_Extranet_Extranet_Schedules_AutCRM.pro?open";
	}else{
if (document.forms[0].SortSearch.value=='vessel')
{
parent.frames['fra_ViewListing'].location.href="http://10.202.112.23/web/chain/hual_schedules.nsf/vie_SchedulesByVessel?open&Expand=1&RestrictToCategory=All&Count=-1"
}
else
	{parent.frames['fra_ViewListing'].location.href="http://10.202.112.23/web/chain/hual_schedules.nsf/vie_SchedulesByVoyage?open&Expand=1&RestrictToCategory=All&Count=-1"}
	}
	}else{
	parent.frames['fra_ViewListing'].location.href=pro +"//" + host + "/" + strPath_DbName + "/SearchSchedule?openagent" + strStartPort + strEndPort + strVessel + strDateFrom + strDateTo + strTradecode + strStartArea + strEndArea+sSort+sVoyage+"&crm=y";
}
}
//--------------------------------------------------------------------------
function CutomerMulti(callbackfunction)
{
// text lookupDb - dbpath that contains frameset (Required)
// text view - view name (Required)
// text callbackfield - field for selection on OK (Required if no callback function)
// text callbackfunction - function called on OK with selected text parameter (Required if no callback field)
// text title - title of window ( Optional, "" if none )
// text frameset - frameset name (Optional, defaults to PickList )
// text viewtemplate - viewtemplate name (Optional, defaults to PickListBottom )
// text scale -  ABCDEFGHIJKLMNOPQRSTUVWXYZ - ( Default or "", "0" if none required )
// number height - height of window, defaults to 400 if "" (Optional)
// number width - width of window, defaults to 480 if "" (Optional )
lookupDb="web/basic/customers.nsf"
if (callbackfunction == "")
{
	alert("Both Callback field and function cannot be empty");
	return;
}
height='550'
width='650'
frameset = "PickListCustomer"
	var url= "/" + lookupDb + "/" +  frameset + "?OpenFrameSet"
url= url + '&Function=' + callbackfunction;
//+ "&" + catName
	pwin=window.open( url, "", "HEIGHT=" + height +",WIDTH=" + width + ",SCROLLBARS=NO" );
}
//--------------------------------------------------------------------------
function predefinedPorts(callbackfunction,Area,selected)
{
lookupDb="web/basic/hualweb_resources.nsf"
areaFields = Area.split('$')
passArea=eval('document.forms[0].'+areaFields[0] +'.value')
passCode=eval('document.forms[0].'+areaFields[1] +'.value')
if (callbackfunction == "")
{
	alert("Both Callback field and function cannot be empty");
	return;
}
if (passArea == "")
{
	alert("You must select an Area first");
	return;
}
height='450'
width='600'
frameset = 'frs_PredefinedPorts'
	var url= "/" + lookupDb + "/" +  frameset + "?OpenFrameSet"
url= url + '&Function=' + callbackfunction+ '&Area=' + passArea+'&AreaCode='+passCode+'&preSelected='+selected;
	pwin=window.open( url, "", "HEIGHT=" + height +",WIDTH=" + width + ",SCROLLBARS=NO" );
}
function selectportcall(callbackfunction)
{
lookupDb="Web/Chain/hual_schedules.nsf"
form = "(frmPortCallPicker2)"
if (callbackfunction == "")
{
	alert("Both Callback field and function cannot be empty");
	return;
}
height='400'
width='600'
url= "/" + lookupDb + "/" +  form + "?OpenForm&returnName="+callbackfunction
pwin=window.open( url, "", "HEIGHT=" + height +",WIDTH=" + width + ",SCROLLBARS=NO" );
}
function selectvoyage(callbackfunction)
{
lookupDb="Web/Chain/hual_schedules.nsf"
form = "(frmVoyagePicker)"
if (callbackfunction == "")
{
	alert("Both Callback field and function cannot be empty");
	return;
}
height='400'
width='350'
url= "/" + lookupDb + "/" +  form + "?OpenForm&returnName="+callbackfunction
pwin=window.open( url, "", "HEIGHT=" + height +",WIDTH=" + width + ",SCROLLBARS=NO" );
}
function portcallSingle(callbackfunction,VoyageId)
{
lookupDb="Web/Chain/hual_schedules.nsf"
form = "LookupPort"
if (callbackfunction == "")
{
	alert("Both Callback field and function cannot be empty");
	return;
}
if (VoyageId == "")
{
	alert("You have to select a voyage first");
	return;
}
height='400'
width='300'
url= "/" + lookupDb + "/" +  form + "?OpenView&RestrictToCategory="+VoyageId+"&returnName="+callbackfunction
pwin=window.open( url, "", "HEIGHT=" + height +",WIDTH=" + width + ",SCROLLBARS=NO" );
}
//------------------------------------------
function portPicker(returnType,returnName,Currentids,seperator,preSelected,showValue,PortDB)
{
//Returntype = If function should return selected persons to a fireld or a function. Takes Field or Function as value
//ReturnName = Name of function or Field to return value to
//Currentids = CompanyKey of Customers that shall be shown under Current Customer choice
//Seperator = What to use as a seperator. If "," then "1" will be sent in the url, ";" = 2
//preSelected = Field which holds values that should be preSelected
//showVakue - determins if the rightmost selectbox should shov value or option.Takes 1 or 2 as parameter
//showCurrent Determins if Ports from Schedule or Keyword will be used. 1= All Ports, 2 = Schedule
dbfp = "web/basic/hualweb_resources.nsf";
//dbfpKeyWords ="Web\Basic\esymfkeys.nsf";
dbfpKeyWords='Web/Basic/esymfkeys.nsf'
dbfpSchedule ="web/chain/hual_schedules.nsf";
url = '/'+dbfp+'/frs_selectPort?OpenFrameset&selview=.viePortLookup';
url=url+'&returnType='+returnType+'&returnName='+returnName;
if (Currentids)
{
url = url +'&participants=' + Currentids;
}
if (seperator)
{
if (seperator==";")
{
seperator=2
}
else{
seperator=1
}
url = url +'&seperator=' + seperator;
}
else{
url = url +'&seperator=' + 1;
}
if (preSelected)
{
url = url + '&preSelected='+preSelected
}
if (showValue)
{
url = url + '&showValue='+showValue
}
else{
url = url + '&showValue=1'
}
if (PortDB){
if (PortDB==1)
{openDB = dbfpKeyWords}
else
{openDB = dbfpSchedule }
url = url + '&PortDB'+showValue+'&frame=viewresult&src='+'/'+dbfpKeyWords+'/.viePortLookup?openview##count=-1'
}
else{
url = url + '&PortDB=1&2=http://www.vg.no'
}
alert(url);
window.open(url,'','height=800,width=850,scrollbars=yes','')
}
//-----------------------