var CONT_TOKEN = "#cmscont#";var DEF_WRAP	= "cont";var CONT_SCR	= "container-scripts:"var cms_info;/* -------------------- clone calls ------------------------ */function cloneDoc( unid, uname ) {	if (ajax == null) ajax = new Ajax();	ajax.async = true;	var rand = "&randkey=" + Math.random();	var dbpath = document.getElementById("dbpath");	var url = "/" + dbpath.innerHTML + "/$cloneDoc.xml!Openagent&doc=" + unid + "&user=" + uname + rand;		ajax.setMimeType('text/xml');	ajax.doGet( url, cloneHand, "xml");}var cloneHand = function(xml) {	var res = XMLParse.xml2ObjArray(xml, 'xml');	if (res[0].status.code == "OK"){		alert( "Document Cloned OK with new code: " + res[0].newCode + "\n\nClick OK to open and edit it." );		var dbpath = document.getElementById("dbpath");		var url = "/" + dbpath.innerHTML + "/uni/" + res[0].unid + "?editdocument&sub=" + res[0].formPref;		window.location.href = url;	} else {		alert(res[0].status.msg)	}}/* -------------------- misc calls ------------------------ */function strLeft(sourceStr, keyStr){	return (sourceStr.indexOf(keyStr) == -1 | keyStr=='') ? '' : sourceStr.split(keyStr)[0];}function strRight(sourceStr, keyStr){	idx = sourceStr.indexOf(keyStr);	return (idx == -1 | keyStr=='') ? '' : sourceStr.substr(idx+ keyStr.length);}function insertCSS() {	var headID = document.getElementsByTagName("head")[0];         	var cssNode = document.createElement('link');	cssNode.type = 'text/css';	cssNode.rel = 'stylesheet';	cssNode.href = cms_info[1];	cssNode.media = 'screen';		headID.appendChild(cssNode);}function insertScripLib( scriptLibName ) {	if (scriptLibName == "") return;	var headID = document.getElementsByTagName("head")[0];         	var scriptNode = document.createElement('script');	scriptNode.type = 'text/javascript';	scriptNode.src = scriptLibName;		headID.appendChild(scriptNode);}var handleWrap = function(str) {	var scripts;	var wrap1 = strLeft( str, CONT_TOKEN )	var wrap2 = strRight( str, CONT_TOKEN )	if (wrap2.indexOf( CONT_SCR ) > -1) {		var scriptStr = strRight( wrap2, CONT_SCR )		wrap2 = strLeft( wrap2, CONT_SCR )		scripts = scriptStr.split( "##" )	}	var body = document.getElementsByTagName("body")[0];	body.innerHTML = wrap1 + body.innerHTML + wrap2;		insertCSS();	try {		for (i=0;i<scripts.length;i++) insertScripLib(scripts[i]);	}	catch (e){}}function insertCMSwrapper( wName, langCode ) {	var cmsinfo	= "";	var container	= "";	try {		cmsinfo = document.getElementById("cmsinfo").innerHTML;		container = document.getElementById("container").innerHTML;	}	catch (e) {}			cms_info = cmsinfo.split("::");	if (wName == null || wName == "") wName = DEF_WRAP;	if (container != "") wName = container;	if (container == "NONE") {		insertCSS();	}	else {		var ajax = new Ajax();		ajax.async = true;		var url = cms_info[0] + "/conts/" + wName + "!opendocument";			ajax.setMimeType('text/xml');		ajax.doGet( url, handleWrap, "text");	}}