d9b435ecf91931e89d3cb116c7ff627c6ea87813.svn-base 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224
  1. using System;
  2. using System.Drawing;
  3. using System.Collections;
  4. using System.ComponentModel;
  5. using System.Windows.Forms;
  6. using Core.Mes.ClientFrameWork;
  7. using Core.Mes.IBaseInterface;
  8. using System.Data;
  9. namespace Core.XgMes.Client.JGKC.SteelPlateManager
  10. {
  11. public partial class FrmOrdernoAcliat : Mes.ClientFrameWork.FrmBase
  12. {
  13. public FrmOrdernoAcliat()
  14. {
  15. InitializeComponent();
  16. }
  17. private void InitCombo()
  18. {
  19. string strSQL = "";
  20. string strout = "";
  21. DataSet ds;
  22. try
  23. {
  24. //合同类型
  25. strSQL = "select ID_ ,Name_ from KCJ_BASEDATA where Sort_Code='8091' ";
  26. ds = (DataSet)ClientCommon._RemotingHelp.ExecuteMethod("BJZWStuff", "Core.XgMes.Server.JGKC.SteelPlateManager.Common", "GetDataSet",
  27. new object[] { strSQL }, out strout);
  28. if (strout != "") { MessageBox.Show(strout); return; }
  29. Comm.FillComboEditor(ref this.ultrCmb_PactNo, ds);
  30. strSQL = "SELECT BUYERCODE,BUYERNAME FROM SEL_BUYERBASEINFO UNION SELECT CUST_CD BUYERCODE, CUST_NM BUYERNAME FROM TBZ00_CUSTOMER WHERE REC_TP='01' AND REC_STS='1' ";
  31. ds = (DataSet)ClientCommon._RemotingHelp.ExecuteMethod("BJZWStuff", "Core.XgMes.Server.JGKC.SteelPlateManager.Common", "GetDataSet",
  32. new object[] { strSQL }, out strout);
  33. if (strout != "") { MessageBox.Show(strout); return; }
  34. Comm.Init_ComboControl(this.Cmb_Buy, "SEL_BUYERBASEINFO", "BUYERNAME", "BUYERCODE", ref ds);
  35. Comm.FillComboEditor(ref this.qBuyer, ds);
  36. Comm.SetGridDropDownList(this.ultraGrid1, ds, "SEL_BUYERBASEINFO", "BUYERCODE", "BUYERNAME", "BUYERCODE");
  37. strSQL = "SELECT INCEPTCORPCODE,INCEPTCORPNAME FROM SEL_INCEPTCORPINFO UNION SELECT CUST_CD INCEPTCORPNAME, CUST_NM BUYERNAME FROM TBZ00_CUSTOMER WHERE REC_TP='02' AND REC_STS='1' ";
  38. ds = (DataSet)ClientCommon._RemotingHelp.ExecuteMethod("BJZWStuff", "Core.XgMes.Server.JGKC.SteelPlateManager.Common", "GetDataSet",
  39. new object[] { strSQL }, out strout);
  40. if (strout != "") { MessageBox.Show(strout); return; }
  41. Comm.Init_ComboControl(this.Cmb_Inco, "SEL_INCEPTCORPINFO", "INCEPTCORPNAME", "INCEPTCORPCODE", ref ds);
  42. Comm.SetGridDropDownList(this.ultraGrid1, ds, "SEL_BUYERBASEINFO", "INCEPTCORPCODE", "INCEPTCORPNAME", "BUYERCODE");
  43. Comm.FillComboEditor(ref this.qIncep, ds);
  44. }
  45. catch { }
  46. }
  47. private void FrmOrdernoAcliat_Load(object sender, EventArgs e)
  48. {
  49. dte_TimeB.Value = DateTime.Now;
  50. dte_TimeE.Value = DateTime.Now;
  51. uCob_LX.Value = "0";
  52. InitCombo();
  53. }
  54. private void Query()
  55. {
  56. string sql = "";
  57. string strOut = "";
  58. string strWhere = "";
  59. if (chk_Intime.Checked == false && checkPactNo.Checked == false)
  60. {
  61. MessageBox.Show("请选择任意条件进行查询!!!!!");
  62. }
  63. if (chk_Intime.Checked )
  64. {
  65. if (dte_TimeB.Enabled && dte_TimeE.Enabled)
  66. {
  67. strWhere += " WHERE INTIME BETWEEN TO_DATE('" + Convert.ToDateTime(this.dte_TimeB.Value).ToString("yyyy-MM-dd") + "','yyyy-MM-dd') "
  68. + " AND TO_DATE('" + Convert.ToDateTime(this.dte_TimeE.Value).ToString("yyyy-MM-dd") + " 23:59:59','yyyy-MM-dd hh24:mi:ss') ";
  69. }
  70. }
  71. if (checkPactNo.Checked)
  72. {
  73. if (strWhere == "")
  74. {
  75. strWhere += " WHERE (PACTNO LIKE '" + PactNo.Text.Trim() + "%')";
  76. }
  77. else
  78. {
  79. strWhere += " AND (PACTNO LIKE '" + PactNo.Text.Trim() + "%' OR ORDERNO LIKE '" + PactNo.Text.Trim() + "%' )";
  80. }
  81. }
  82. DataSet ds = new DataSet();
  83. sql = "SELECT MAX(PACTNO)PACTNO,ORDERNO,MAX(BUYERCODE)BUYERCODE,MAX(INCEPTCORPCODE)INCEPTCORPCODE,MAX(BUYERCODE1)BUYERCODE1,MAX(INCEPECODE1)INCEPECODE1,RECODER,PACTNOLX,RECODERTIME,MAX(INTIME)INTIME FROM ("
  84. + "SELECT SUBSTR(T.ORDERNO, 1, LENGTH(T.ORDERNO) - 3)PACTNO,T.ORDERNO,"
  85. + " CASE WHEN (SELECT COUNT(1) FROM SEL_PACTDETAIL WHERE ORDERNO=T.ORDERNO)>0 THEN "
  86. + "(SELECT BUYERCODE FROM SEL_PACTDETAIL WHERE ORDERNO=T.ORDERNO) "
  87. + "WHEN (SELECT COUNT(1) FROM SEL_PACTINFO_CLEAR AA WHERE AA.PACTNO = SUBSTR(T.ORDERNO, 1, LENGTH(T.ORDERNO) - 3))>0 THEN "
  88. + "(SELECT AA.BUYERCODE FROM SEL_PACTINFO_CLEAR AA WHERE AA.PACTNO = SUBSTR(T.ORDERNO, 1, LENGTH(T.ORDERNO) - 3)) "
  89. + " WHEN T.ORDERNO LIKE '17%' THEN '106' END BUYERCODE,"
  90. + "CASE WHEN (SELECT COUNT(1) FROM SEL_PACTDETAIL WHERE ORDERNO=T.ORDERNO)>0 THEN "
  91. + "(SELECT INCEPTCORPCODE FROM SEL_PACTDETAIL WHERE ORDERNO=T.ORDERNO) "
  92. + "WHEN (SELECT COUNT(1) FROM SEL_PACTINFO_CLEAR AA WHERE AA.PACTNO = SUBSTR(T.ORDERNO, 1, LENGTH(T.ORDERNO) - 3))>0 THEN "
  93. + "(SELECT AA.INCEPTCORPCODE FROM SEL_PACTINFO_CLEAR AA WHERE AA.PACTNO = SUBSTR(T.ORDERNO, 1, LENGTH(T.ORDERNO) - 3)) "
  94. + "WHEN T.ORDERNO LIKE '17%' THEN '201112020001' END INCEPTCORPCODE,"
  95. +"T.INTIME,"
  96. +"(SELECT BUYERCODE FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORDERNO AND ISVALID='1')BUYERCODE1, "
  97. + "(SELECT INCEPECODE FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORDERNO AND ISVALID='1')INCEPECODE1,"
  98. + "(SELECT RECODER FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORDERNO AND ISVALID='1')RECODER,"
  99. + "(SELECT PACTNOLX FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORDERNO AND ISVALID='1')PACTNOLX,"
  100. + "(SELECT TO_CHAR(RECODERTIME,'YYYY-MM-DD HH24:MI') FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORDERNO AND ISVALID='1')RECODERTIME "
  101. +" FROM KCJ_STORAGELIST_ZW T "
  102. + " UNION "
  103. + " SELECT B.ORD_NO PACTNO,B.ORD_NO||B.ORD_SEQ ORDERNO,A.CUST_CD BUYERCODE,A.ORDCUST_CD INCEPTCORPCODE,T.INTIME, "
  104. + "(SELECT BUYERCODE FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORD_NO||T.ORD_SEQ AND ISVALID='1')BUYERCODE1, "
  105. + "(SELECT INCEPECODE FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORD_NO||T.ORD_SEQ AND ISVALID='1')INCEPECODE1,"
  106. + "(SELECT RECODER FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORD_NO||T.ORD_SEQ AND ISVALID='1')RECODER,"
  107. + "(SELECT PACTNOLX FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORD_NO||T.ORD_SEQ AND ISVALID='1')PACTNOLX,"
  108. + "(SELECT TO_CHAR(RECODERTIME,'YYYY-MM-DD HH24:MI') FROM KCJ_PACTNOLX_ZW WHERE ORDERNO=T.ORD_NO||T.ORD_SEQ AND ISVALID='1')RECODERTIME "
  109. + "FROM KCJ3_STUFFLIST_ZW T ,TBA01_ORD_COMM A,TBA01_ORD_LINE B WHERE T.ORD_NO=B.ORD_NO AND T.ORD_SEQ=B.ORD_SEQ AND A.ORD_NO=B.ORD_NO)"
  110. + strWhere
  111. + " GROUP BY ORDERNO,RECODER,PACTNOLX,RECODERTIME ";
  112. ds = (DataSet)ClientCommon._RemotingHelp.ExecuteMethod("BJZWStuff", "Core.XgMes.Server.JGKC.SteelPlateManager.Common", "GetDataSet",
  113. new object[] { sql }, out strOut);
  114. if (ds != null)
  115. {
  116. ultraGrid1.DataSource = ds;
  117. }
  118. }
  119. public void Add()
  120. {
  121. try
  122. {
  123. string strErr = "";
  124. if (this.ultrCmb_PactNo.Text.Trim() == "")
  125. {
  126. MessageBox.Show("请选择合同类型!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
  127. return;
  128. }
  129. ArrayList alorderno = new ArrayList();
  130. foreach (Infragistics.Win.UltraWinGrid.UltraGridRow row in this.ultraGrid1.Selected.Rows)
  131. {
  132. alorderno.Add(row.Cells["ORDERNO"].Value.ToString());
  133. }
  134. ArrayList al = new ArrayList();
  135. al.Add(ultrCmb_PactNo.Value.ToString());
  136. al.Add(qBuyer.Value.ToString());
  137. al.Add(qIncep.Value.ToString());
  138. al.Add(uCob_LX.Value.ToString());
  139. al.Add(ClientCommon._UserInfo.UserName.ToString());
  140. DataSet ds = (DataSet)Core.Mes.ClientFrameWork.ClientCommon._RemotingHelp.ExecuteMethod("BJZWStuff", "Core.XgMes.Server.JGKC.SteelPlateManager.SendManager", "addDJ", new object[] { alorderno, al }, out strErr);
  141. if (strErr != "")
  142. {
  143. MessageBox.Show(strErr);
  144. return;
  145. }
  146. }
  147. catch (System.Exception ex)
  148. {
  149. System.Diagnostics.Debug.WriteLine(ex.ToString());
  150. }
  151. }
  152. private void DoExc(Infragistics.Win.UltraWinGrid.UltraGrid _gd, string _title)
  153. {
  154. try
  155. {
  156. string filename = _title + @".xls";
  157. this.excelExporter.Export(_gd, filename);
  158. System.Diagnostics.ProcessStartInfo st = new System.Diagnostics.ProcessStartInfo(filename);
  159. st.WindowStyle = System.Diagnostics.ProcessWindowStyle.Maximized;
  160. System.Diagnostics.Process.Start(st);
  161. }
  162. catch (System.Exception ex)
  163. {
  164. System.Diagnostics.Debug.WriteLine(ex.ToString());
  165. }
  166. }
  167. private void ultraToolbars_ToolClick(object sender, Infragistics.Win.UltraWinToolbars.ToolClickEventArgs e)
  168. {
  169. switch (e.Tool.Key)
  170. {
  171. case "Confirm":
  172. Query();
  173. break;
  174. case "Add":
  175. Add();
  176. break;
  177. case "Close":
  178. this.Close();
  179. break;
  180. case "Excel":
  181. DoExc(this.ultraGrid1,this.Text);
  182. break;
  183. }
  184. }
  185. private void chk_Intime_CheckedChanged(object sender, EventArgs e)
  186. {
  187. dte_TimeB.Enabled = dte_TimeE.Enabled = chk_Intime.Checked;
  188. }
  189. private void checkPactNo_CheckedChanged(object sender, EventArgs e)
  190. {
  191. PactNo.Enabled = checkPactNo.Checked;
  192. }
  193. private void ultraGrid1_AfterRowActivate(object sender, EventArgs e)
  194. {
  195. if (this.ultraGrid1.Rows.Count > 0)
  196. {
  197. ultrCmb_PactNo.Value = Comm.ObjToStr(this.ultraGrid1.ActiveRow.Cells["PACTNOLX"].Value);
  198. qBuyer.Value = Comm.ObjToStr(this.ultraGrid1.ActiveRow.Cells["BUYERCODE"].Value);
  199. qIncep.Value = Comm.ObjToStr(this.ultraGrid1.ActiveRow.Cells["INCEPTCORPCODE"].Value);
  200. }
  201. }
  202. }
  203. }