use "lang.vl"
|
use "win.vl"
|
use "treeview.vm"
|
use "dev:vm[xutil.vm]"
|
use "dev:vm[xdwtable.vm]"
|
use "dev:vm[xdwgrid.vm]"
|
use "dev:vm[combobox.vm]"
|
use "frame.vl"
|
use "file.vl"
|
use "dev:vm[xlayersheet.vm]"
|
use "publiccode.vl"
|
|
unit vbusiness.vpage
|
[
|
DataConfig is extend frame;
|
about DataConfig
|
[
|
field:
|
|
method:
|
[
|
treeview__ dw_tree;
|
xdwgrid__ dw_list;
|
xdwgrid__ dw_role;
|
combobox__ dw_ddlb;
|
xlayersheet__ m_sheet;
|
|
int alert(string str)
|
{
|
TApp::alert(this,str,3);
|
return 0;
|
}
|
int createTree(msxml::IXMLDOMElement e, int parentItem)
|
{
|
if(treeview__::GetChildItem(dw_tree.GetId(), parentItem) > 0) return 0;
|
|
var list=e.selectNodes("item");
|
int i=0,s=list.length;
|
msxml::IXMLDOMElement xitem;
|
for (i=0;i<s;i++)
|
{
|
xitem= list.item(s - i - 1);
|
string Name=xitem.selectSingleNode("name").text;
|
string image = xitem.selectSingleNode("image").text;
|
int curItem=treeview__::InsertItem(dw_tree.GetId(), parentItem,0,Name,xitem,image.toInt());
|
string child=xitem.selectSingleNode("child").text;
|
if (child != "0")
|
treeview__::SetItemChild1(dw_tree.GetId(), curItem,1);
|
}
|
return 1;
|
}
|
|
int OnTreeExpanding(ref TNotifyEvent evt,int p)
|
{
|
ref NMTREEVIEW nmtv = evt.pnmh;
|
int sitem = nmtv.itemNew.hItem;
|
|
int i = combobox__::GetCurSel(dw_ddlb.GetId());
|
msxml::IXMLDOMElement e = treeview__::GetItemData(dw_tree.GetId(), sitem);
|
string id = e.selectSingleNode("id").text;
|
string xid = e.selectSingleNode("tree").text;
|
int hCursor = xutil__::SetCursorWait();
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("pid",id);
|
arg.AddArg("tree",xid);
|
//if(xaserver__::ExecXQuery(GetServerUrl(),"[selectRoleInt.xq]",arg.GetString(),x)!=1)
|
if(url::get("/sale/data/Role.config/pref/user/select",arg.GetString(),x)!=1)
|
{
|
trace("´íÎó·µ»Ø="+x.GetXml());
|
return -1;
|
}
|
|
msxml::IXMLDOMElement ele = x.GetXmlDoc().documentElement;
|
createTree(ele, sitem);
|
xutil__::RestoreCursor(hCursor);
|
return 1;
|
}
|
|
int OnRetrieve(string id)
|
{
|
int hIcon= xutil__::SetCursorWait();
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("id",id);
|
trace(id);
|
arg.AddArg("flag","-1");
|
//if(xaserver__::ExecXQuery(GetServerUrl(),"[selectRoleInt.xq]",arg.GetString(),x)!=1)
|
if(url::get("/sale/data/Role.config/pref/maint/data",arg.GetString(),x)!=1)
|
{
|
trace("´íÎó·µ»Ø1="+x.GetXml());
|
return -1;
|
}
|
|
if(x.GetXml() == "")
|
x.LoadXml("<root><items/><roles/></root>");
|
|
xml__ x1 = new xml__;
|
x1.setNativePointer(xml__ ::CreateInstance());
|
if(x.GetXmlDoc().selectSingleNode("root/items"))
|
{
|
dw_list.Retrieve(x.GetXmlDoc().selectSingleNode("root/items"));
|
dw_list.SetReadOnly(true);
|
dw_list.Redraw();
|
}
|
else
|
{
|
x1.LoadXml("<items/>");
|
dw_list.Retrieve(x1);
|
dw_list.SetReadOnly(true);
|
dw_list.Redraw();
|
}
|
if(x.GetXmlDoc().selectSingleNode("root/roles"))
|
{
|
dw_role.Retrieve(x.GetXmlDoc().selectSingleNode("root/roles"));
|
dw_role.SetReadOnly(true);
|
dw_role.Redraw();
|
}
|
else
|
{
|
x1.LoadXml("<roles/>");
|
dw_role.Retrieve(x1);
|
dw_role.SetReadOnly(true);
|
dw_role.Redraw();
|
}
|
xutil__::RestoreCursor(hIcon);
|
return 1;
|
}
|
|
int OnTreeSelecded( ref TNotifyEvent evt,int p)
|
{
|
ref NMTREEVIEW nmtv = evt.pnmh;
|
int hItem = nmtv.itemNew.hItem;
|
int wid = dw_tree.GetId();
|
msxml::IXMLDOMElement ele =treeview__::GetItemData(wid,hItem);
|
|
string id = ele.SelectSingleNode("id").text;
|
OnRetrieve(id);
|
|
return 1;
|
}
|
|
int OnSelect()
|
{
|
int nIndex = combobox__::GetCurSel(dw_ddlb.GetId());
|
|
combobox__ dw_ddlbdata = new combobox__;
|
dw_ddlbdata.setNativePointer(this.GetControl("dw_ddlbdata"));
|
int h = combobox__::FindString(dw_ddlbdata.GetId(), nIndex.toString());
|
param p;
|
xnode__ bnode;
|
xnode__ anode = new xnode__;
|
anode.setNativePointer(GetAgentNode("tree"));
|
if(h < 0)
|
{
|
string str = "<vbox><xtree name='dw_tree"+nIndex.toString()+"' imagelist='0'/></vbox>";
|
bnode = new xnode__;
|
bnode.setNativePointer(SetAgentNodeContent(anode,str));
|
|
p = combobox__::GetItemData(dw_ddlb.GetId(), nIndex);
|
msxml::IXMLDOMElement ele = p;
|
|
dw_tree = new treeview__;
|
dw_tree.setNativePointer(this.GetControl("dw_tree"+nIndex.toString()));
|
|
createTree(ele, 0);
|
AttachEvent("dw_tree"+nIndex.toString(), "TVN_ITEMEXPANDING",OnTreeExpanding);
|
AttachEvent("dw_tree"+nIndex.toString(), "TVN_SELCHANGED",OnTreeSelecded);
|
|
int sk = combobox__::AddItem(dw_ddlbdata.GetId(), nIndex.toString());
|
p = bnode;
|
combobox__::SetItemData(dw_ddlbdata.GetId(), sk, p);
|
}
|
else
|
{
|
p = combobox__::GetItemData(dw_ddlbdata.GetId(), h);
|
bnode = p;
|
SetAgentNodeContent(anode,bnode);
|
|
dw_tree = new treeview__;
|
dw_tree.setNativePointer(this.GetControl("dw_tree"+nIndex.toString()));
|
}
|
|
return 1;
|
}
|
|
int OnSave()
|
{
|
int m = treeview__::GetSelectedItem(dw_tree.GetId());
|
if(m == 0) return 0;
|
|
int wid = dw_tree.GetId();
|
int hItem=treeview__::GetSelectedItem(wid);
|
msxml::IXMLDOMElement ele =treeview__::GetItemData(wid,hItem);
|
string id = ele.SelectSingleNode("id").text;
|
string tpy = ele.SelectSingleNode("type").text;
|
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
dw_list.DwUpdateAllToEx(x.GetXmlDoc());
|
msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement;
|
e.SetAttribute("id", id);
|
e.SetAttribute("type", tpy);
|
|
xml__ x1 = new xml__;
|
x1.setNativePointer(xml__ ::CreateInstance());
|
dw_role.DwUpdateAllToEx(x1.GetXmlDoc());
|
msxml::IXMLDOMElement e1 = x1.GetXmlDoc().documentElement;
|
e.AppendChild(e1);
|
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("content", e.xml);
|
arg.AddArg("dbmap", "Data.config.dbmap");
|
//if(xaserver__::ExecXAction(GetServerUrl(),"[onSave.xa]",arg.GetString(),x)!=1)
|
if(url::get("/sale/data/Role.config/pref/save",arg.GetString(),x)!=1)
|
//if(url::get("/workflow/action/datarole.resource/bill.update",arg.GetString(),x)!=1)
|
{
|
trace("error:"+x.GetXml());
|
alert("±£´æ³ö´í!");
|
return 0;
|
}
|
if(x.GetXmlDoc().selectSingleNode("error"))
|
{
|
alert("±£´æ³ö´í2!");
|
return 0;
|
}
|
dw_list.ResetUpdateStatus();
|
dw_role.ResetUpdateStatus();
|
alert("±£´æ³É¹¦!");
|
|
return 1;
|
}
|
|
int OnSelectDdlb(ref TNotifyEvent evt,int p)
|
{
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
dw_list.DwUpdateAllToEx(x.GetXmlDoc());
|
msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement;
|
if(e)
|
{
|
var list = e.SelectNodes("//*[@update.new='1' or @update.modify='1' or @update.delete='1']");
|
int s = list.length;
|
if(s>0)
|
{
|
int ret = win__::MessageBox(this.GetHWND(), "µ±Ç°Ð޸ļÇ¼δ±£´æ£¬ÊÇ·ñ±£´æ£¿","Ìáʾ",4);
|
if(ret == 6)
|
OnSave();
|
}
|
}
|
|
OnSelect();
|
|
int m = treeview__::GetSelectedItem(dw_tree.GetId());
|
string id;
|
if(m == 0)
|
{
|
id = "";
|
}
|
else
|
{
|
msxml::IXMLDOMElement ele =treeview__::GetItemData(dw_tree.GetId(),m);
|
id = ele.SelectSingleNode("id").text;
|
}
|
OnRetrieve(id);
|
|
return 1;
|
}
|
|
int createTreeRoot()
|
{
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("pid","");
|
arg.AddArg("tree","0");
|
//if(xaserver__::ExecXQuery(GetServerUrl(),"[selectRoleInt.xq]",arg.GetString(),x)!=1)
|
if(url::get("/sale/data/Role.config/pref/user/select",arg.GetString(),x)!=1)
|
{
|
trace("´íÎó·µ»Ø="+x.GetXml());
|
return -1;
|
}
|
msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement;
|
var list = e.SelectNodes("*");
|
int i;
|
int len = list.length;
|
msxml::IXMLDOMElement ele;
|
for(i=0; i<len; i++)
|
{
|
ele= list.item(i);
|
string name = ele.selectSingleNode("@tree").text;
|
int sk = combobox__::AddItem(dw_ddlb.GetId(), name);
|
param p = ele;
|
combobox__::SetItemData(dw_ddlb.GetId(), sk, p);
|
}
|
if(len > 0)
|
{
|
combobox__::SetCurSel(dw_ddlb.GetId(), 0);
|
OnSelect();
|
}
|
OnRetrieve("");
|
return 1;
|
}
|
|
int OnSetFocus(ref TEvent evt,int p)
|
{
|
SetAgent("data");
|
return 1;
|
}
|
|
string GetPath()
|
{
|
int h = treeview__::GetSelectedItem(dw_tree.GetId());
|
if(h == 0) return 0;
|
|
int tv = dw_tree.GetId();
|
string str = treeview__::GetItemLabel(tv, h);
|
int k = treeview__::GetParentItem(tv, h);
|
while(k > 0)
|
{
|
string tmp = treeview__::GetItemLabel(tv, k);
|
str = tmp+"\\" + str;
|
k = treeview__::GetParentItem(tv, k);
|
}
|
return str;
|
}
|
|
int OnAddRole()
|
{
|
int m = treeview__::GetSelectedItem(dw_tree.GetId());
|
if(m == 0) return -1;
|
msxml::IXMLDOMElement ele =treeview__::GetItemData(dw_tree.GetId(),m);
|
string tpy=""+ele.selectSingleNode("type").text;
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("dataUrl","/sale/data/Role.config/pref/model/select");
|
openUrl("/sale/view/Role.config/xpage/role/select/user", arg);
|
string str = arg.GetArgString("item");
|
if(str == "") return -1;
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
x.LoadXml(str);
|
var list=x.GetXmlDoc().selectNodes("items/item");
|
int i=0,s=list.length;
|
msxml::IXMLDOMElement xitem;
|
int row = dw_role.GetRowCount() + 1;
|
string treepath = GetPath();
|
for (i=0;i<s;i++)
|
{
|
xitem= list.item(i);
|
string id = ""+xitem.selectSingleNode("@id").text;
|
string name=""+xitem.selectSingleNode("@name").text;
|
//string tpy=""+xitem.selectSingleNode("@type").text;
|
dw_role.InsertRow(0);
|
dw_role.SetItemString(row + i, "id", id);
|
dw_role.SetItemString(row + i, "name", ""+treepath);
|
dw_role.SetItemDisplayString(row + i, "name", name);
|
dw_role.SetItemString(row + i, "type", tpy);
|
}
|
return 1;
|
}
|
|
int OnAddRow()
|
{
|
int m = treeview__::GetSelectedItem(dw_tree.GetId());
|
if(m == 0) return 0;
|
|
int k = m_sheet.GetSheetIndex();
|
if(k == 0)
|
//openUrl("/sale/view/role.config/xpage/data/select/resource", dw_list);
|
OpenWindow("dev:xpage[Resource.select.data.config.vx]", dw_list);
|
else
|
OnAddRole();
|
|
return 1;
|
}
|
|
int OnDelRow()
|
{
|
int k = m_sheet.GetSheetIndex();
|
int row;
|
string hr_type;
|
msxml::IXMLDOMElement e;
|
if(k == 0)
|
{
|
row = dw_list.GetRow();
|
if(row<1 || row > dw_list.GetRowCount()) return -1;
|
e = dw_list.GetRowElement(row);
|
if(e.selectSingleNode("fromparent"))
|
{
|
hr_type = e.selectSingleNode("fromparent").text;
|
if(hr_type != "")
|
{
|
alert("¼Ì³ÐµÄȨÏÞÎÞȨɾ³ý£¡");
|
return 0;
|
}
|
}
|
dw_list.DeleteRow(row);
|
}
|
else
|
{
|
row = dw_role.GetRow();
|
if(row<1 || row > dw_role.GetRowCount()) return -1;
|
e = dw_role.GetRowElement(row);
|
if(e.selectSingleNode("fromparent"))
|
{
|
hr_type = e.selectSingleNode("fromparent").text;
|
if(hr_type != "")
|
{
|
alert("¼Ì³ÐµÄȨÏÞÎÞȨɾ³ý£¡");
|
return 0;
|
}
|
}
|
dw_role.DeleteRow(row);
|
}
|
|
return 1;
|
}
|
|
int OnSetCopy(xdwgrid__ dw, msxml::IXMLDOMElement e, string name)
|
{
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
msxml::IXMLDOMElement ele;
|
bool f = false;
|
|
int count = dw.GetRowCount();
|
if(count == 0)
|
{
|
x.LoadXml("<" + name + "s/>");
|
ele = x.GetXmlDoc().documentElement;
|
}
|
else
|
{
|
msxml::IXMLDOMElement e1 = dw.GetRowElement(1);
|
ele = e1.parentNode;
|
}
|
var li = e.SelectNodes(name);
|
int i;
|
int len = li.length;
|
string treepath = GetPath();
|
for(i=0; i<len; i++)
|
{
|
msxml::IXMLDOMElement ele1= li.item(i);
|
if(ele1.selectSingleNode("fromparent"))
|
{
|
string str = ele1.selectSingleNode("fromparent").text;
|
if(str != "") continue;
|
}
|
xml__ x1 = new xml__;
|
x1.setNativePointer(xml__::CreateInstance());
|
x1.LoadXml(ele1.xml);
|
msxml::IXMLDOMElement ele2 = x1.GetXmlDoc().documentElement;
|
ele2.setAttribute("update.new","1");
|
ele2.setAttribute("update.modify","1");
|
ele2.setAttribute("guid",publiccode::GetGuid());
|
if(ele2.selectSingleNode("name"))
|
ele2.selectSingleNode("name").text = treepath;
|
//ele1.selectSingleNode("@guid").text = publiccode::GetGuid();
|
//ele1.selectSingleNode("@update.new").text = "1";
|
//ele1.selectSingleNode("@update.modify").text = "1";
|
ele.appendChild(ele2);
|
}
|
dw.Retrieve(ele);
|
dw.SetReadOnly(true);
|
dw.Redraw();
|
|
return 1;
|
}
|
|
int OnCopy()
|
{
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
int p = arg.__nativept;
|
OpenWindow("dev:xpage[Data.config.copy.vx]", p);
|
string id = arg.GetArgString("id");
|
string f = arg.GetArgString("flag");
|
if(id == "") return 1;
|
|
xml__ x = new xml__;
|
x.setNativePointer(xml__ ::CreateInstance());
|
if(url::get("/sale/data/Role.config/pref/maint/data",arg.GetString(),x)!=1)
|
{
|
trace("´íÎó·µ»Ø="+x.GetXml());
|
return -1;
|
}
|
|
if(x.GetXml() == "")
|
x.LoadXml("<root><items/><roles/></root>");
|
|
msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement;
|
|
if(f == "0" || f == "1")
|
{
|
msxml::IXMLDOMElement ele1 = e.selectSingleNode("items");
|
OnSetCopy(dw_list, ele1, "item");
|
}
|
|
if(f == "0" || f == "2")
|
{
|
msxml::IXMLDOMElement ele2 = e.selectSingleNode("roles")
|
OnSetCopy(dw_role, ele2, "role");
|
}
|
|
return 1;
|
}
|
|
int OnCmdDispatch(string comdid)
|
{
|
if(comdid == "Config")
|
openUrl("/sale/view/role.config/xpage/data/resource/config");
|
if(comdid == "RightQuery")
|
openUrl("/sale/view/role.config/xpage/data/modulerightquery");
|
else if(comdid == "New")
|
OnAddRow();
|
else if(comdid == "Del")
|
OnDelRow();
|
else if(comdid == "Save")
|
OnSave();
|
else if(comdid == "Copy")
|
OnCopy();
|
else if(comdid == "xmProdDivi")
|
openUrl("/sale/view/RoleAccount3/xpage/data/proddivi");
|
return 0;
|
}
|
|
int OnXCommand(ref TXCommandEvent evt,int p)
|
{
|
return OnCmdDispatch(evt.pStrID);
|
}
|
|
int onload()
|
{
|
SetAgent("data");
|
|
dw_list = new xdwgrid__;
|
dw_list.setNativePointer(GetControl("dw_list"));
|
dw_list.openUrl("/sale/view/Role.config/template/data/config/resourceOrg");
|
dw_list.SetReadOnly(false);
|
|
dw_role = new xdwgrid__;
|
dw_role.setNativePointer(GetControl("dw_role"));
|
//dw_role.SetDataObject(GetServerUrl(), "dev:sheet[leftFrame.tpl/role]");
|
//dw_role.openUrl(m_vface+"/template/role/config/role");
|
dw_role.openUrl("/sale/view/Role.config/template/role/config/role");
|
dw_role.SetReadOnly(false);
|
|
dw_ddlb = new combobox__;
|
dw_ddlb.setNativePointer(this.GetControl("dw_ddlb"));
|
|
m_sheet = new xlayersheet__;
|
m_sheet.setNativePointer(this.GetControl("m_sheet"));
|
|
AttachEvent("WM_XCOMMAND",OnXCommand);
|
AttachEvent("WM_SETFOCUS",OnSetFocus);
|
AttachEvent("dw_ddlb","CBN_SELCHANGE",OnSelectDdlb);
|
|
createTreeRoot();
|
|
return 1;
|
}
|
]
|
]
|
]
|
