/* ----- Notes ----- 	Last Modified:	2011-09-30	HTML files:		*	Framework:		StudioWorks for Omnis Studio	Written by: 	Doug Kuyvenhoven, doug@vencor.ca amended by Andy Hilton	Copyright: 		Vencor Software 2006, www.vencor.ca / Totally Brilliant Software Inc 2011*/// ----- Action Methods -----function prepareForm(prForm,pMethodName) {	var AppURL = OmnisURL() ;	var CGI = OmnisCGI() ;	var Port = OmnisPort();	var Lib = OmnisLib();	var Class = OmnisClass();	prForm.action = AppURL+CGI;	prForm.method = "post";	var winW = 630, winH = 460;	if (parseInt(navigator.appVersion)>3) {	 if (navigator.appName=="Netscape") {	  winW = window.innerWidth;	  winH = window.innerHeight;	 }	 if (navigator.appName.indexOf("Microsoft")!=-1) {	  winW = document.body.offsetWidth;	  winH = document.body.offsetHeight;	 }	}		addHiddenInput(prForm,"FormWidth",winW);	addHiddenInput(prForm,"FormHeight",winH);	addHiddenInput(prForm,"OmnisServer",Port);	addHiddenInput(prForm,"OmnisLibrary",Lib);	addHiddenInput(prForm,"OmnisClass",Class);	addHiddenInput(prForm,"MethodName",pMethodName);	// Add the SessionID input	var Property = "SessionID";	Value = document.getElementById(Property).value;	addHiddenInput(prForm,Property,Value);}function addWinInstInputs(prForm) {	// Add the WinInstID input	var Property = "WinInstID";	Value = document.getElementById(Property).value;	addHiddenInput(prForm,Property,Value);		// Add the SQLClassName input	Property = "SQLClassName";	Value = document.getElementById(Property).value;	addHiddenInput(prForm,Property,Value);		// Add the Mode input	Property = "Mode";	Value = document.getElementById(Property).value;	addHiddenInput(prForm,Property,Value);}function addHiddenInput(prForm,pName,pValue) {	newElem = document.createElement("input");	newElem.type = "hidden" ;	newElem.name = pName ;	newElem.value = pValue;	prForm.appendChild(newElem);}// ----- Property Methods -----function OmnisURL() { return document.getElementById("WebAppServerURL").value ; }function OmnisCGI() { return document.getElementById("WebAppServerCGI").value ; }function OmnisClass() { return document.getElementById("OmnisClass").value ; }function OmnisLib() { return document.getElementById("WebAppLibName").value ; }function OmnisPort() { return document.getElementById("WebAppServerPort").value ; }// ----- Programmer Test Methods -----function ping_omnisserverform() { alert("ping"); }function test_omnisserverform() {	alert("test");	// Add test code here , or a call to specific function	}/* ----- MODIFICATIONS -----@MOD:1 Created file for submit forms to Omnis web app server functions use by the SW framework ;; 2006-02-16 Doug K*/function prepareXML(pFormText,pMethodName) {	var URL = OmnisURL();	var CGI = OmnisCGI();	var Port = OmnisPort();	var Lib = OmnisLib();	var Class = OmnisClass();	// Add the SessionID input	var Property = "SessionID";	Value = document.getElementById(Property).value;	pFormText = URL+CGI+"?OmnisLibrary="+Lib+"&OmnisServer="+Port+"&OmnisClass="+Class+"&MethodName="+pMethodName+"&SessionID="+Value;	Property = "setXML";	var setXMLField = document.getElementById(Property);	var ischecked;	if (setXMLField != null) {	ischecked = setXMLField.checked;	} else {	ischecked = false;	}	if (ischecked == true) 	{		pFormText = pFormText+"&bXMLData=1";	}	else {		pFormText = pFormText+"&bXML=1";	}	return pFormText;}function addXMLWinInstInputs(pFormText) {	// Add the WinInstID input	var Property = "WinInstID";	Value = document.getElementById(Property).value;	pFormText = addParamInput(pFormText,Property,Value);		// Add the SQLClassName input	Property = "SQLClassName";	Value = document.getElementById(Property).value;	pFormText = addParamInput(pFormText,Property,Value);		// Add the Mode input	Property = "Mode";	Value = document.getElementById(Property).value;	pFormText = addParamInput(pFormText,Property,Value);	// Add the TabWinInstID for tabs	Property = "TabWinInstID";	var	PropField = document.getElementById(Property);	if (PropField !== null) {	Value = PropField.value;		if (Value !== "###TabWinInstID###"){			pFormText = addParamInput(pFormText,Property,Value);		}	}	// Add the TabNumber for tabs	Property = "TabNumber";	var	PropField = document.getElementById(Property);	if (PropField !== null) {	Value = PropField.value;		if (Value !== "###TabNumber###"){			pFormText = addParamInput(pFormText,Property,Value);		}	}	return pFormText;}function addParamInput(pFormText,pName,pValue) {	pFormText = pFormText+"&"+pName+"="+pValue;		return pFormText;}
