Merge branch 'master' of http://116.62.18.175:6699/r/mis-prj

xj qian

2024-07-15 4988c8950db8640eaeb2498b51aca2dfed2c685b

 jrj/project/business/Company/CompanyList.cpp

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,214 @@
use "win.vl"
use "treeview.vm"
use "dev:vm[xdwgrid.vm]"
use "dev:vm[xdwtable.vm]"
use "pref.vl"
use "dev:vm[xml.vm]"
use "dev:vm[xaserverarg.vm]"
use "dev:vm[xaserver.vm]"
use "dev:vm[xutil.vm]"
use "list.vl"
unit vbusiness.xpage
[
   CompanyList is extend list;
   about CompanyList
      [
         control:

      method:
         [
            xdwgrid__   dw_list;
            string   m_agentCond;   //Agent Node

            int SetAgent()
            {
               string xfNodeAgentArea = "agentarea";
               xnode__ anode = new xnode__;
               anode.setNativePointer(GetAgentNode(xfNodeAgentArea));
               var xframeElement = GetElement();
               var agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "[1]/*");
               if (agent)
               {
                  string s = agent.xml;
                  SetAgentNodeContent(anode, s);
               }
               return 1;
            }

            //焦点激活处理函数
            int OnSetFocus(ref TEvent evt, int p)
            {
               SetAgent();

               //重置工具条
               return 1;
            }

            int  OnRetrieve()
            {
               xml__ x = new xml__;
               x.setNativePointer(x.CreateInstance());
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               //arg.AddArg("sType",c_type);
               if (url::get("OrganizationStruct/list.CompanyInfo", arg.GetString(), x) != 1)
               {
                  trace(x.GetXmlDoc().text);
                  return -1;
               }
               else
               {
                  //trace(x.GetXml());
                  dw_list.Retrieve(x);
                  dw_list.Redraw();
               }
               dw_list.SetReadOnly(true);
               return 1;
            }

            //xgridex双击
            int OnDoubleClicked(ref TNotifyEvent evt, int p)
            {
               ref DWNMHDR  hdr = evt.pnmh;
               int row = hdr.row;
               if (row < 1 || row > dw_list.GetRowCount())
                  return 1;
               msxml::IXMLDOMElement e = dw_list.GetRowElement(row);
               string sguid = e.SelectSingleNode("@guid").text;
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg.AddArg("operate", "modify");
               arg.AddArg("guid", sguid);
               //trace(sguid);
               //trace(row.toString());
               //win__::OpenWindow("dev:xpage[CompanyMaint.vx]",arg);
               openUrl("组织架构.vface/xpage/CompanyInfo/maint", arg);
               return 1;
            }

            //命令发布函数
            int OnCmdDispatch(string comdid)
            {
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               msxml::IXMLDOMElement e;
               string sguid;
               string sName;

               if (comdid == "AddRow")
               {
                  arg.AddArg("operate", "new0");
                  arg.AddArg("guid", "");
                  //win__::OpenWindow("dev:xpage[CompanyMaint.vx]",arg);
                  openUrl("组织架构.vface/xpage/CompanyInfo/maint", arg);
               }
               else if (comdid == "ModifyRow")
               {
                  int row = dw_list.GetNextSelectRow(1);
                  if (row < 1)
                  {
                     row = dw_list.GetRow();
                     if (row < 1)
                     {
                        win__::MessageBox(GetHWND(), "请选中要修改的公司行！", "提示", 0);
                        return -1;
                     }
                  }
                  e = dw_list.GetRowElement(row);
                  sguid = e.SelectSingleNode("@guid").text;
                  arg.AddArg("operate", "modify");
                  arg.AddArg("guid", sguid);
                  //win__::OpenWindow("dev:xpage[CompanyMaint.vx]",arg);
                  openUrl("组织架构.vface/xpage/CompanyInfo/maint", arg);
               }
               else if (comdid == "DeleteRow")
               {
                  int row = dw_list.GetNextSelectRow(1);
                  if (row < 1)
                  {
                     row = dw_list.GetRow();
                     if (row < 1)
                     {
                        win__::MessageBox(GetHWND(), "请选中要删除的公司行！", "提示", 0);
                        return -1;
                     }
                  }
                  e = dw_list.GetRowElement(row);

                  sguid = e.SelectSingleNode("@guid").text;
                  sName = e.selectSingleNode("Name").text;

                  sName += "";
                  int  MB_YESNO = 0x00000004;
                  int  IDYES = 6;
                  if (win__::MessageBox(GetHWND(), "确认要删除公司 " + sName + " çš„信息吗？", "提示", MB_YESNO) != IDYES) return 1;
                  arg.AddArg("guid", sguid);
                  trace(sguid);
                  xml__ x1 = new xml__;
                  x1.setNativePointer(x1.CreateInstance());
                  if (url::post("OrganizationStruct/delete.CompanyInfo", arg.GetString(), x1) != 1)
                  {
                     string error = x1.GetXmlDoc().text;
                     trace(error);
                  }
                  else
                  {
                     win__::MessageBox(GetHWND(), "删除成功！", "提示", 0);
                     dw_list.DeleteRow(row);
                  }

               }
               else if (comdid == "Refresh")
               {
                  OnRetrieve();
               }
               return 0;
            }

            //命令处理事件
            int OnXCommand(ref TXCommandEvent evt, int p)
            {
               return OnCmdDispatch(evt.pStrID);
            }

            int OnAttachEvent()
            {
               //绑定工具条点击事件
               AttachEvent("WM_XCOMMAND", OnXCommand);
               //获取焦点事件，用于重置工具条
               AttachEvent("WM_SETFOCUS", OnSetFocus);
               //双击
               AttachEvent("dw_list", "DWV_DOUBLECLICKED", OnDoubleClicked);
            }

            int OnInitial()
            {
               SetAgent();
               OnAttachEvent();

               return 1;
            }

            int onload()
            {
               dw_list = new xdwgrid__;
               dw_list.setNativePointer(this.GetControl("dw_list"));

               //xaserverarg__ args = new xaserverarg__;
               //args.setNativePointer(args.CreateInstance());		
               //args.AddArg("type","CompanyList");
               //dw_list.SetDataObject(GetServerUrl(),pref::getPref("HumanResource/GetHrObject",args.GetString()));
               dw_list.openUrl("组织架构.vface/template/company/list");
               dw_list.SetSelectionMode(1);
               dw_list.SetReadOnly(true);

               OnInitial();
               OnRetrieve();

               return 1;
            }

         ]

      ]
]