use "xcontrol.vframe.vbusiness.vd"
|
use "xbase.vframe.vbusiness.vd"
|
use "publiccode.vutil.vbusiness.vd"
|
|
unit business
|
[
|
class CommentaryEx : public xframe
|
{
|
string m_EntityID;
|
string m_EntityType;
|
string m_EntityConnect;
|
string m_ConnectID;
|
|
xcontrol m_Edit;
|
htmlctrl m_Html;
|
xcombobox m_cb;
|
|
int Init()
|
{
|
if (m_EntityID == "") return -1;
|
|
xml x = new xml;
|
x.setNativePointer(x.CreateInstance());
|
xaserverarg arg = new xaserverarg;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("EntityID", m_EntityID);
|
arg.AddArg("EntityType", m_EntityType);
|
arg.AddArg("EntityConnect", m_EntityConnect);
|
if (url::get("/sale/data/Commentary/entity/notelist", arg.GetString(), x) == 1)
|
{
|
m_Html.SetContent(x.GetXml());
|
m_Html.Redraw();
|
}
|
return 1;
|
}
|
|
int AppendItem(xml x, msxml::IXMLDOMElement r, string name, string value)
|
{
|
msxml::IXMLDOMElement e = x.GetXmlDoc().createElement(name);
|
e.text = value;
|
r.appendChild(e);
|
return 1;
|
}
|
|
int showAtt()
|
{
|
xnode anode = GetAgentNode("att");
|
int s = xcombobox::GetCount(m_cb.GetId());
|
xml x = new xml;
|
x.setNativePointer(xml::CreateInstance());
|
x.LoadXml("<vbox/>");
|
msxml::IXMLDOMElement ele = x.GetXmlDoc().documentElement;
|
int i = 0;
|
for (i = 0; i < s; i++)
|
{
|
string tmp = xcombobox::GetLBText(m_cb.GetId(), i);
|
msxml::IXMLDOMElement e = x.GetXmlDoc().createElement("hbox");
|
e.setAttribute("height", "20");
|
msxml::IXMLDOMElement l = x.GetXmlDoc().createElement("xlabel");
|
l.setAttribute("caption", "" + tmp);
|
msxml::IXMLDOMElement b = x.GetXmlDoc().createElement("xtoolbutton");
|
b.setAttribute("width", "18");
|
b.setAttribute("name", "att_" + i.toString());
|
b.setAttribute("image", "1,5");
|
e.appendChild(l);
|
e.appendChild(b);
|
ele.appendChild(e);
|
msxml::IXMLDOMElement g = x.GetXmlDoc().createElement("xlabel");
|
g.setAttribute("height", "2");
|
g.setAttribute("style", "background-color:#000000");
|
ele.appendChild(g);
|
}
|
SetAgentNodeContent(anode, ele.xml);
|
anode.SetWidthHeight(-1, i * 20 + 1);
|
return 1;
|
}
|
|
int addAtt()
|
{
|
string guid = publiccode::GetGuid();
|
string str = guid.left(2);
|
string ret = xaserver::UploadFile("attachment" + str, guid + ".jpg", this.GetHWND(), "", false);
|
int nIndex = xcombobox::AddItem(m_cb.GetId(), ret, guid + ".jpg");
|
showAtt();
|
return 1;
|
}
|
|
int delAtt(string no)
|
{
|
int nIndex = no.toInt();
|
xcombobox::DeleteItem(m_cb.GetId(), nIndex);
|
showAtt();
|
return 1;
|
}
|
|
msxml::IXMLDOMElement getAtt()
|
{
|
int s = xcombobox::GetCount(m_cb.GetId());
|
xml x = new xml;
|
x.setNativePointer(xml::CreateInstance());
|
x.LoadXml("<Attachment/>");
|
msxml::IXMLDOMElement ele = x.GetXmlDoc().documentElement;
|
int i = 0;
|
for (i = 0; i < s; i++)
|
{
|
string tmp = xcombobox::GetLBText(m_cb.GetId(), i);
|
string tmp2 = xcombobox::GetItemData(m_cb.GetId(), i);
|
msxml::IXMLDOMElement e = x.GetXmlDoc().createElement("item");
|
e.setAttribute("name", "" + tmp);
|
e.setAttribute("file", "" + tmp2);
|
ele.appendChild(e);
|
}
|
return ele;
|
}
|
//ÃüÁî·¢²¼º¯Êý
|
int OnCmdDispatch(string comdid)
|
{
|
if (comdid == "xmOK")
|
{
|
if (m_EntityID == "") return 1;
|
|
xml x = new xml;
|
x.setNativePointer(xml::CreateInstance());
|
xaserverarg arg = new xaserverarg;
|
arg.setNativePointer(arg.CreateInstance());
|
string value = m_Edit.GetText();
|
if (value == "")
|
{
|
alert("ÇëÌîдÅú×¢£¡");
|
return 1;
|
}
|
|
x.LoadXml("<Commentary update.new='1' update.modify='1'/>");
|
msxml::IXMLDOMElement ele = x.GetXmlDoc().documentElement;
|
AppendItem(x, ele, "CommentaryID", publiccode::GetGuid());
|
AppendItem(x, ele, "EntityID", m_EntityID);
|
AppendItem(x, ele, "EntityType", m_EntityType);
|
AppendItem(x, ele, "Remark", value);
|
AppendItem(x, ele, "ParentConnect", m_EntityConnect);
|
AppendItem(x, ele, "ParentCommentaryID", m_ConnectID);
|
AppendItem(x, ele, "CreatorID", xaserver::GetUserId());
|
ele.appendChild(getAtt());
|
|
arg.AddArg("content", "<root>" + ele.xml + "</root>");
|
|
if (getUrl("/workflow/action/Commentary/bill.update", arg.GetString(), x) == 1)
|
{
|
m_Edit.SetText("");
|
xcombobox::ResetContent(m_cb.GetId());
|
Init();
|
showAtt();
|
return 1;
|
}
|
else
|
{
|
alert("Ìí¼Óʧ°Ü!");
|
return -1;
|
}
|
}
|
else if (comdid == "xmAtt")
|
{
|
addAtt();
|
}
|
else if (comdid.left(4) == "att_")
|
{
|
delAtt(comdid.right(comdid.length() - 4));
|
}
|
else
|
{
|
CloseWindow();
|
}
|
return 1;
|
}
|
|
//ÃüÁî´¦Àíʼþ
|
int OnXCommand(ref TXCommandEvent evt, int param)
|
{
|
return OnCmdDispatch(evt.pStrID);
|
}
|
|
int OnHtmlClick(ref TNotifyEvent evt, int pr)
|
{
|
ref HTMLNMHDR p = evt.pnmh;
|
const string d = m_Html.GetData(p.object);
|
if (d == "") return -1;
|
string file = d.mid(0, d.find("|##@@|", 0));
|
string name = d.mid(d.find("|##@@|", 0) + 6, d.length());
|
|
|
xaserver::CreateDirectory("C:/Temp");
|
string str = file.left(2);
|
string ext = "";
|
if (name.find(".") >= 0) ext = name.mid(name.find("."), name.length());
|
string sfile = file.left(file.length() - 4);
|
//trace("--"+ext +" " + "/business/attachment/"+str+"/"+ file);
|
//int openRet = xaserver::DownLoadFile(GetServerUrl(),"/business/attachment/"+str+"/"+ file,name,"C:/Temp/"+name);
|
int openRet = xaserver::DownLoadFile(GetServerUrl(), "/business/attachment/" + str + "/" + file, "", "C:/Temp/" + sfile + ext);
|
if (openRet < 0)
|
{
|
alert("Îļþ´ò¿ªÊ§°Ü1£¡");
|
return -1;
|
}
|
//openRet = win32::ShellExecute(0,"open","C:/Temp/"+name,"","",5);
|
openRet = win32::ShellExecute(0, "open", "C:/Temp/" + sfile + ext, "", "", 5);
|
if (openRet < 32)
|
{
|
alert("Îļþ´ò¿ªÊ§°Ü2£¡");
|
return -1;
|
}
|
|
return -1;
|
}
|
|
int OnAttachEvent()
|
{
|
//°ó¶¨¹¤¾ßÌõµã»÷ʼþ
|
AttachEvent("WM_XCOMMAND", OnXCommand);
|
AttachEvent("note", "HTC_OBJECTCLICKED", OnHtmlClick);
|
}
|
|
int onload()
|
{
|
OnAttachEvent();
|
|
m_Edit = GetControl("Txt");
|
|
m_Html = GetControl("note");
|
|
m_cb = GetControl("attlist");
|
|
m_EntityID = "";
|
m_EntityType = "";
|
m_EntityConnect = "";
|
m_ConnectID = "";
|
|
if (this.GetParam())
|
{
|
//xaserverarg arg = new xaserverarg;
|
//arg.setNativePointer(GetParam());
|
xaserverarg arg = GetParam();
|
m_EntityID = arg.GetArgString("EntityID");
|
m_EntityType = arg.GetArgString("m_EntityType");
|
m_EntityConnect = arg.GetArgString("m_EntityConnect");
|
}
|
Init();
|
|
return 1;
|
}
|
};
|
]
|
