xj qian
2024-07-01 2ae36e271599ea723348132dd7c8a7e139162d18
jrj/project/printview/Template.Print.Dialog.cpp
@@ -4,12 +4,16 @@
#include <xcontrol/xlayersheet.hpp>
#include "vbusiness/vframe/maint.vframe.vbusiness.hpp"
#include "vbusiness/vframe/maint.vframe.vbusiness.hpp"
#include "vbusiness/vframe/responsewin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
using xml = KXMLDOMDocument;
class __declspec(dllexport) TemplatePrintDialog : public responsewin
DeclWinObject_(TemplatePrintDialog, responsewin)
{
   CreateWinObject_(TemplatePrintDialog, responsewin)
public:
      xaserverarg arg_param;
      xstring m_EntityName;
@@ -20,95 +24,23 @@
      xstring strNode;
      xdwgrid  dw_list;
      xdwgrid  dw_doclist;
      xole ole_1;
      bool bupdate;
public:
   TemplatePrintDialog(void* implPtr, HWND hWnd) :maint(implPtr, hWnd) {}
   TemplatePrintDialog(void* implPtr, HWND hWnd) :responsewin(implPtr, hWnd) {}
public:
   static TemplatePrintDialog* CreateInstance(void* implPtr, void* hWnd)
   {
      TemplatePrintDialog* pWin = new TemplatePrintDialog(implPtr, (HWND)hWnd);
      return pWin;
      return new TemplatePrintDialog(implPtr, (HWND)hWnd);
   }
      int OnHtml()
      {
         xstring s1=L"<catalog>"+
          "   <book id='bk101'>"+
          "     <author>Gambardella, Matthew</author>"+
          "     <title>XML Developer's Guide</title>"+
          "     <genre>Computer</genre>"+
          "     <price>44.95</price>"+
          "     <publish_date>2000-10-01</publish_date>"+
          "     <description>An in-depth look at creating applications "+
          "     with XML.</description>"+
          "  </book>"+
          "  <book id='bk102'>"+
          "     <author>Ralls, Kim</author>"+
          "     <title>Midnight Rain</title>"+
          "     <genre>Fantasy</genre>"+
          "     <price>5.95</price>"+
          "     <publish_date>2000-12-16</publish_date>"+
          "     <description>A former architect battles corporate zombies, L"+
          "     an evil sorceress, and her own childhood to become queen "+
          "     of the world.</description>"+
          "  </book>"+
          "  </catalog>";
         xml x = new xml;
         x.setNativePointer(xml::CreateInstance());
         x.LoadXml(s1);
//trace(x.GetXml());
         //xstring s2=L"<?xml version='1.0'?>"+
         xstring s2=
         "<xsl:stylesheet version='1.0'"+
         "                xmlns:xsl='http://www.w3.org/1999/XSL/Transform' >"+
         "<xsl:output method='xml' indent='yes'/>"+
         "<xsl:template match='catalog'>"+
         "<HTML>"+
         " <HEAD>"+
         "   <TITLE>Books catalog - listing for Books.xml</TITLE>"+
         " </HEAD>"+
         " <BODY><FONT FACE='Verdana'>"+
         " <H3>My Books Catalog</H3>"+
         " <TABLE CELLPADDING='5' CELLSPACING='2'>"+
         "   <xsl:for-each select='book'>"+
         "   <TR>"+
         "      <TD ALIGN='LEFT'><FONT SIZE='2'><B>ID:</B>&#160;&#160;<xsl:value-of select='@id'/><BR/>"+
         "      <B>Author:</B>&#160;&#160;<xsl:value-of select='author'/><BR/>"+
         "      <B>Title:</B>&#160;&#160;<xsl:value-of select='title'/><BR/>"+
         "      <B>Genre:</B>&#160;&#160;<xsl:value-of select='genre'/><BR/>"+
         "      <B>Price:</B>&#160;&#160;<xsl:value-of select='price'/><BR/>"+
         "      <B>Published on:</B>&#160;&#160;<xsl:value-of select='publish_date'/><BR/>"+
         "      <B>Description:</B>&#160;&#160;<xsl:value-of select='description'/></FONT></TD>"+
         "   </TR>"+
         "   </xsl:for-each>"+
         "</TABLE>"+
         "</FONT>"+
         "</BODY>"+
         "</HTML>"+
         "</xsl:template>"+
         "</xsl:stylesheet>" ;
         xml xsl = new xml;
         xsl.setNativePointer(xml::CreateInstance());
         xsl.LoadXml(s2);
//trace(xsl.GetXml());
         xstring strHtml = x.GetXmlDoc().transformNode(xsl.GetXmlDoc());
         //strHtml = str.mid(21,99999);
         ole_1.LoadHtml(strHtml);
         //html_1.SetContent(strHtml);
         //alert(strHtml);
         return 0;
      }
public:
      int OnRetrieve()
      {
         xstring username = publiccode::GetUser().name;
      xstring username = publiccode::GetUser()->name;
         if(username != L"admin" && m_Dir != username )
         {
            bupdate = false;
         }else
      }
      else
         {
            bupdate = true;
         }
@@ -123,7 +55,8 @@
         {
            trace(x.text());
            return -1;
         }else
      }
      else
         {
            xstring s = x.xml();
            dw_list.Retrieve(x);
@@ -159,7 +92,7 @@
            arg_param.AddArg(L"xsl",sFile); 
            arg_param.AddArg(L"return",L"cancel");
            
            OpenWindow(L"dev:xpage[Maint.Template.Print.vx]",cast(arg_param.GetString() as int));
         OpenWindow(L"dev:xpage[Maint.Template.Print.vx]", arg_param);
            CloseWindow();
         
         }         
@@ -179,9 +112,9 @@
         }
         xstring sguid = publiccode::GetGuid();
         xstring sname= sguid +L".xsl";
         xstring suri= L"rpttemplate"+L"\\"+m_EntityName; //rpttemplate\SO
      xstring suri = L"rpttemplate\\" + m_EntityName; //rpttemplate\SO
         //suri = L"supplier00";
         xstring ret = xaserver::UploadFile(suri, sname, this.GetHWND(),L"",false);
      xstring ret = xaserver::UploadFile(suri, sname, GetHWND(), L"", false);
         if (ret == L"-1")
         {
            alert(L"上传的文件没选择!");
@@ -189,10 +122,8 @@
         }
         else
         {
            xml x=new xml;
            x.setNativePointer(xml::CreateInstance());
            xaserverarg args = new xaserverarg;
            args.setNativePointer(args.CreateInstance());
         xml x;
         xaserverarg args;
            args.AddArg(L"sID",sguid);         
            args.AddArg(L"sEntity",m_EntityName);         
            args.AddArg(L"sDir",m_Dir);
@@ -203,9 +134,9 @@
            
            args.AddArg(L"sTemplName",ret);         
            //trace(args.GetString());
            if (url::get(L"/sale/data/SysPrintTemplate/Save",args.GetString(),x) != 1)
         if (xurl::get(L"/sale/data/SysPrintTemplate/Save", args.GetString(), x) != 1)
            {
               trace(L"error:"+x.GetXml());
            trace((xstring)L"error:" + x.xml());
               alert(L"保存出错了!");
               return 1;
            }                  
@@ -229,18 +160,16 @@
         }
         else
         {
            if (win32::MessageBox(GetHWND(),L"确定要删除选中的模板?",L"提示",1) == 2)
         if (MessageBox(GetHWND(), L"确定要删除选中的模板?", L"提示", 1) == 2)
               return 0;               
            KXMLDOMElement ele = dw_list.GetRowElement(row);         
            xstring sguid = ele.selectSingleNode(L"ID").text;
            xml x=new xml;
            x.setNativePointer(xml::CreateInstance());
            xaserverarg args = new xaserverarg;
            args.setNativePointer(args.CreateInstance());
         xstring sguid = ele.selectSingleNode(L"ID").text();
         xml x;
         xaserverarg args;
            args.AddArg(L"sID",sguid);      
            if (url::get(L"/sale/data/SysPrintTemplate/Delete",args.GetString(),x) != 1)
         if (xurl::get(L"/sale/data/SysPrintTemplate/Delete", args.GetString(), x) != 1)
            {
               trace(L"error:"+x.GetXml());
            trace((xstring)L"error:" + x.xml());
               alert(L"删除出错了!");
               return 0;
            }                  
@@ -254,17 +183,17 @@
         return 0;
      }
      
      int OnDocListDoubleClicked(ref TNotifyEvent evt,int p)
   int OnDocListDoubleClicked(TEvent * evt, int p)
      {
         int  hCursor = xutil::SetCursorWait();
      HCURSOR  hCursor = xutil::SetCursorWait();
         OnOpenDocument();
         xutil::RestoreCursor(hCursor);
         return 1;
      }   
            
      int OnDoubleClicked(ref TNotifyEvent evt,int p)
   int OnDoubleClicked(TEvent * evt, int p)
      {
         int  hCursor = xutil::SetCursorWait();
      HCURSOR hCursor = xutil::SetCursorWait();
         OnOk();
         xutil::RestoreCursor(hCursor);
         return 1;
@@ -294,15 +223,15 @@
         {
            KXMLDOMElement ele = dw_list.GetRowElement(row);   
            trace(L"\r\n---------------");
            trace(ele.xml);
         trace(ele.xml());
         
            xstring sguid = ele.selectSingleNode(L"ID").text;
         xstring sguid = ele.selectSingleNode(L"ID").text();
            xstring pre = L"";
            if(ele.selectSingleNode(L"TemplPre")) pre = ele.selectSingleNode(L"TemplPre").text;
            xstring sTemplName = ele.selectSingleNode(L"TemplName").text;
         if (ele.selectSingleNode(L"TemplPre")) pre = ele.selectSingleNode(L"TemplPre").text();
         xstring sTemplName = ele.selectSingleNode(L"TemplName").text();
            //xstring sFile = m_filePath + sguid+L".xsl";   
            trace(sTemplName);
            xstring sFile = m_filePath + ele.selectSingleNode(L"urlPath").text;
         xstring sFile = m_filePath + ele.selectSingleNode(L"urlPath").text();
            arg_param.AddArg(L"xsl",sFile); 
            arg_param.AddArg(L"return",L"ok");
            arg_param.AddArg(L"template-name",sTemplName);
@@ -358,17 +287,17 @@
      int OnSave()
      {
         dw_list.AcceptText();
         xml x = new xml;
         x.setNativePointer(xml::CreateInstance());
         dw_list.DwUpdateAllToEx(x.GetXmlDoc());
      xml x;
         
         xaserverarg arg = new xaserverarg;
      dw_list.DwUpdateAllToEx(x);
      xaserverarg arg;
         arg.setNativePointer(xaserverarg::CreateInstance());
         arg.AddArg(L"content",x.GetXml());
      arg.AddArg(L"content", x.xml());
         
         if (url::get(L"/sale/data/SysPrintTemplate/updateinfo",arg.GetString(),x) != 1)
      if (xurl::get(L"/sale/data/SysPrintTemplate/updateinfo", arg.GetString(), x) != 1)
         {
            trace(L"error:"+x.GetXml());
         trace((xstring)L"error:" + x.xml());
            alert(L"保存出错了!");
            return 1;
         }                  
@@ -388,12 +317,12 @@
            xstring no = comdid.mid(8, 99);
            //int id = no.toInt();
            xml x = new xml;
            x.setNativePointer(xml::CreateInstance());
            x.LoadXml(strNode);
            KXMLDOMDocument doc= x.GetXmlDoc();
            KXMLDOMElement e = doc.documentElement;
            xstring slable =e.selectSingleNode(L"//xtoolbutton[@name='"+comdid+L"']/@caption").text;
         xml x;
         x.loadXML(strNode);
         KXMLDOMDocument doc = x;
         KXMLDOMElement e = doc.documentElement();
         xstring slable = e.selectSingleNode(L"//xtoolbutton[@name='" + comdid + L"']/@caption").text();
            m_Dir = slable;
            OnRetrieve();
         
@@ -404,7 +333,7 @@
         if (comdid==L"xmDelTempl" && bupdate) return OnDelTempl();
         if (comdid==L"xmMaintTempl" && bupdate) return OnMaintTempl();
         if (comdid==L"xmNewTempl" && bupdate) return OnNewTempl();
         if (comdid==L"xmHtml") return OnHtml();
      //if (comdid==L"xmHtml") return OnHtml();
         if (comdid==L"xmOk") return OnOk();
         if (comdid==L"xmSave") return OnSave();
         if(comdid==L"xmOpen") return OnOpenDocument();
@@ -425,15 +354,14 @@
         //AttachEvent(L"dw_list",L"DWV_RCLICKED",OnRClicked);   
         //AttachEvent(L"dw_list",L"DWV_ITEMCHANGED",OnItemChanged);   
         //AttachEvent(L"dw_list",L"DWV_CHILDCONTENT",OnChildContent);   
         AttachEvent(L"dw_doclist",L"DWV_DOUBLECLICKED",OnDocListDoubleClicked);
         AttachEvent(L"dw_list",L"DWV_DOUBLECLICKED",OnDoubleClicked);
      AttachEvent(L"dw_doclist", L"DWV_DOUBLECLICKED", (FEvent)&TemplatePrintDialog::OnDocListDoubleClicked);
      AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&TemplatePrintDialog::OnDoubleClicked);
         return 1;   
      }
      int SetAgent()
      {   
         PUser puser = new PUser;
         puser =  publiccode::GetUser();
      PUser& puser = *publiccode::GetUser();
         xstring susername = puser.name;
         if (susername !=L"admin")
         {
@@ -448,47 +376,48 @@
      
      int CreateDir()
      {
         PUser puser = new PUser;
         puser =  publiccode::GetUser();
      PUser& puser = *publiccode::GetUser();
         xstring susername = puser.name;
         xml x = new xml;
         x.setNativePointer(xml::CreateInstance());
         xaserverarg arg = new xaserverarg;
      xml x;
      xaserverarg arg;
         arg.setNativePointer(arg.CreateInstance());   
         arg.AddArg(L"EntityName",m_EntityName,L""); 
         arg.AddArg(L"EntityID",m_EntityID,L""); 
         arg.AddArg(L"susername",susername,L""); //
         if (url::get(L"/sale/data/SysPrintTemplate/Dir",arg.GetString(),x) != 1)
      if (xurl::get(L"/sale/data/SysPrintTemplate/Dir", arg.GetString(), x) != 1)
         {
            trace(x.GetXmlDoc().text);
         trace(x.text());
            return -1;
         }else
         {
            xstring s = x.GetXml();
         }
         KXMLDOMNodeList  nlist = x.GetXmlDoc().selectNodes(L"//Entity");
      else
      {
         xstring s = x.xml();
      }
      KXMLDOMNodeList  nlist = x.selectNodes(L"//Entity");
         int i;
         int nlen = nlist.length;
      int nlen = nlist.length();
         xstring toolStr = L"<vbox name='Dir'>";
         xstring deptName= publiccode::GetUser().deptname;
      xstring deptName = publiccode::GetUser()->deptname;
         if(deptName==L"跟单部" && m_EntityName==L"GDN3"){
            for(i=2;   i<nlen;   i++)
            {
               KXMLDOMElement e1 = nlist.item(i);
               xstring sDir1 = e1.selectSingleNode(L"@Dir").text;
               xstring str1 = L"<xtoolbutton image='15' caption='"+sDir1+L"' height='24' name='xmPanel:"+i.toString()+L"' style='background-color:none #ceecce none #ffffff'/>";
            xstring sDir1 = e1.selectSingleNode(L"@Dir").text();
            xstring str1 = L"<xtoolbutton image='15' caption='" + sDir1 + L"' height='24' name='xmPanel:" + xstring(i) + L"' style='background-color:none #ceecce none #ffffff'/>";
         
               toolStr += str1;
               if (i==2) 
                  m_Dir = sDir1;
            }
         }else if(deptName.find(L"业务")>=0 && m_EntityName==L"GDN3"  )
      }
      else if (deptName.find(L"业务") >= 0 && m_EntityName == L"GDN3")
         {
            for(i=1;   i<2;   i++)
            {
               KXMLDOMElement e2 = nlist.item(i);
               xstring sDir2 = e2.selectSingleNode(L"@Dir").text;
               xstring str2 = L"<xtoolbutton image='15' caption='"+sDir2+L"' height='24' name='xmPanel:"+i.toString()+L"' style='background-color:none #ceecce none #ffffff'/>";
            xstring sDir2 = e2.selectSingleNode(L"@Dir").text();
            xstring str2 = L"<xtoolbutton image='15' caption='" + sDir2 + L"' height='24' name='xmPanel:" + xstring(i) + L"' style='background-color:none #ceecce none #ffffff'/>";
               
               toolStr += str2;
               if (i==1) 
@@ -497,17 +426,18 @@
            for(i=4;   i<nlen;   i++)
            {
               KXMLDOMElement e3 = nlist.item(i);
               xstring sDir3 = e3.selectSingleNode(L"@Dir").text;
               xstring str3 = L"<xtoolbutton image='15' caption='"+sDir3+L"' height='24' name='xmPanel:"+i.toString()+L"' style='background-color:none #ceecce none #ffffff'/>";
            xstring sDir3 = e3.selectSingleNode(L"@Dir").text();
            xstring str3 = L"<xtoolbutton image='15' caption='" + sDir3 + L"' height='24' name='xmPanel:" + xstring(i) + L"' style='background-color:none #ceecce none #ffffff'/>";
               
               toolStr += str3;
            }
         }else{
      }
      else {
            for(i=0;   i<nlen;   i++)
            {
               KXMLDOMElement e = nlist.item(i);
               xstring sDir = e.selectSingleNode(L"@Dir").text;
               xstring str = L"<xtoolbutton image='15' caption='"+sDir+L"' height='24' name='xmPanel:"+i.toString()+L"' style='background-color:none #ceecce none #ffffff'/>";
            xstring sDir = e.selectSingleNode(L"@Dir").text();
            xstring str = L"<xtoolbutton image='15' caption='" + sDir + L"' height='24' name='xmPanel:" + xstring(i) + L"' style='background-color:none #ceecce none #ffffff'/>";
               
               toolStr += str;
               if (i==0) 
@@ -528,7 +458,7 @@
      int OnInit()
      {       
         SetAgent();
         dw_list = this.GetControl(L"dw_list");
      dw_list = GetControl(L"dw_list");
         dw_list.openUrl(L"/sale/view/view.base/template/PrintView/listDialog");
         dw_list.SetReadOnly(true);
         dw_list.SetSelectionMode(4);
@@ -540,27 +470,27 @@
         xstring sUrl = GetServerUrl();
         sUrl = sUrl.mid(0, sUrl.length() - 19);
         m_filePath = L"/business/rpttemplate";
         arg_param = new xaserverarg;
         if (GetParam())
      arg_param;
      if (GetWinParam())
         {
            int p = GetParam();
            arg_param.setNativePointer(p);
         arg_param = GetArg();
            m_EntityName = arg_param.GetArgString(L"EntityName");
            m_EntityID = arg_param.GetArgString(L"EntityID");
            m_EntityNo = arg_param.GetArgString(L"EntityNo");
         
            xaserverarg arg = new xaserverarg;
         xaserverarg arg;
            arg.setNativePointer(xaserverarg::CreateInstance());
            arg.AddArg(L"EntityName", m_EntityName);
            arg.AddArg(L"EntityID", m_EntityID);
            arg.AddArg(L"EntityNo", m_EntityNo);
            xml x =new xml;
            x.setNativePointer(xml::CreateInstance());
            if(url::get(L"/sale/data/DocumentList3/bill/doclist", arg.GetString(),x)!=1)
         if (xurl::get(L"/sale/data/DocumentList3/bill/doclist", arg.GetString(), x) != 1)
            {
               xstring error = x.GetXmlDoc().text;
            xstring error = x.text();
               trace(error);
            }else
         }
         else
            {
               dw_doclist.Retrieve(x);
               dw_doclist.SetReadOnly(true);
@@ -584,6 +514,7 @@
   int onload()
   {
      SetArg();
      responsewin::onload();
      
      /*if (GetParam())
@@ -594,20 +525,6 @@
      }
      */
      return 1;
   }
   int onloaded()
   {
      //responsewin::onload();
      /*if (GetParam())
      {
         xstring action = arg_param.GetArgString(L"action");
         if(action==L"open" || (action==L"" && dw_doclist.GetRowCount() > 0))
            SwitchLayer(L"sheet2",L"frame");
      }
      */
      return 1;
   }
};