/* ----- Notes ----- 

	Last Modified:	2006-02-16
	HTML files:		*
	Framework:		StudioWorks for Omnis Studio
	Written by: 	Doug Kuyvenhoven, doug@vencor.ca
	Copyright: 		Vencor Software 2006, www.vencor.ca 
*/

// ----- Action Methods -----

function prepareForm(prForm,pMethodName) {

	var CGI = OmnisCGI() ;
	var Port = OmnisPort();
	var Lib = OmnisLib();
	var Class = OmnisClass();

	prForm.action = CGI;
	prForm.method = "post";
		

	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.getElementById(pName);
//	if (newElem == null) {
	newElem = document.createElement("input");
	newElem.type = "hidden" ;
	newElem.name = pName ;
	newElem.value = pValue;
	prForm.appendChild(newElem);
//	}
//	else {
//	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 ischecked = document.getElementById(Property).checked;
	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);
		return pFormText;

}


function addParamInput(pFormText,pName,pValue) {

	pFormText = pFormText+"&"+pName+"="+pValue;
		return pFormText;


}