SAPDataLogic.cs 112 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376
  1. 
  2. using System;
  3. using System.Collections.Generic;
  4. using System.Data;
  5. using System.ServiceModel.Security;
  6. using Dongke.IBOSS.PRD.Basics.BaseResources;
  7. using Dongke.IBOSS.PRD.Basics.DataAccess;
  8. using Dongke.IBOSS.PRD.Basics.Library;
  9. using Dongke.IBOSS.PRD.Service.DataModels;
  10. using Dongke.IBOSS.PRD.Service.SAPHegiiDataService.HGSAPDK_ZPPFM008;
  11. using Dongke.IBOSS.PRD.Service.SAPHegiiDataService.HGSAPDK_ZPPFM010;
  12. using Dongke.IBOSS.PRD.WCF.DataModels;
  13. using Oracle.DataAccess.Client;
  14. namespace Dongke.IBOSS.PRD.Service.SAPHegiiDataService
  15. {
  16. public class SAPDataLogic
  17. {
  18. /// <summary>
  19. /// 获取同步最后一次同步成功的日期
  20. /// </summary>
  21. /// <returns></returns>
  22. public static ServiceResultEntity GetLastDateByCode(string dataCode)
  23. {
  24. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  25. ServiceResultEntity sre = new ServiceResultEntity();
  26. try
  27. {
  28. string sqlString =
  29. "select max(t.yyyymmdd) yyyymmdd\n" +
  30. " from tsap_hegii_datalog t\n" +
  31. " where t.logtype = '2'\n" +
  32. " and t.datastuts = 'S'\n" +
  33. " and t.datacode = :dataCode";
  34. OracleParameter[] oracleParameter = new OracleParameter[]
  35. {
  36. new OracleParameter(":dataCode",OracleDbType.Varchar2, dataCode, ParameterDirection.Input),
  37. };
  38. string lastDate = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  39. sre.Result = lastDate;
  40. return sre;
  41. }
  42. catch (Exception ex)
  43. {
  44. throw ex;
  45. }
  46. }
  47. /// <summary>
  48. /// 获取成品交接同步数据
  49. /// </summary>
  50. /// <returns></returns>
  51. public static ServiceResultEntity GetWorkData60(DateTime date)
  52. {
  53. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  54. ServiceResultEntity sre = new ServiceResultEntity();
  55. try
  56. {
  57. string yyyymmdd = date.ToString("yyyyMMdd");
  58. string sqlString =
  59. "select t.logid\n" +
  60. " from tsap_hegii_datalog t\n" +
  61. " where t.logtype = '2'\n" +
  62. " and t.datastuts = 'S'\n" +
  63. " and t.yyyymmdd = :yyyymmdd\n" +
  64. " and t.datacode = '60'";
  65. OracleParameter[] oracleParameter = new OracleParameter[]
  66. {
  67. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  68. };
  69. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  70. if (!string.IsNullOrEmpty(logid))
  71. {
  72. sqlString = "select t.yyyymmdd\n" +
  73. " ,t.goodscode\n" +
  74. " ,t.sapcode\n" +
  75. " ,t.usercode\n" +
  76. " ,t.ordercode\n" +
  77. " ,t.orderitem\n" +
  78. " ,t.outputnum\n" +
  79. " ,t.recoverynum\n" +
  80. " ,t.createtime\n" +
  81. " ,t.ztype\n" +
  82. " ,t.zmsg\n" +
  83. " ,t.ZTIME\n" +
  84. " from tsap_hegii_workdata t\n" +
  85. //" where t.yyyymmdd = :yyyymmdd\n" +
  86. //" and t.datacode = '60'\n" +
  87. " where t.logid = :logid\n" +
  88. " order by t.goodscode,t.sapcode,t.usercode,t.ordercode,t.orderitem";
  89. oracleParameter = new OracleParameter[]
  90. {
  91. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  92. };
  93. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  94. sre.Result = 1;
  95. return sre;
  96. }
  97. sqlString =
  98. "select :yyyymmdd yyyymmdd, sysdate createtime\n" +
  99. " ,tt.GoodsCode\n" +
  100. " ,tt.SAPCode\n" +
  101. " ,tt.usercode\n" +
  102. " ,tt.ordercode\n" +
  103. " ,tt.orderitem\n" +
  104. " ,to_char(tt.OutputNum) OutputNum\n" +
  105. " ,to_char(tt.RecoveryNum) RecoveryNum\n" +
  106. " from (\n" +
  107. "select t.GoodsCode\n" +
  108. " ,t.SAPCode\n" +
  109. " ,t.usercode\n" +
  110. " ,t.ordercode\n" +
  111. " ,t.orderitem\n" +
  112. " ,sum(decode(t.RecyclingFlag\n" +
  113. " ,'1'\n" +
  114. " ,0\n" +
  115. " ,decode(t.DataType, 51, 1, -1))) OutputNum\n" +
  116. " ,sum(decode(t.RecyclingFlag\n" +
  117. " ,'0'\n" +
  118. " ,0\n" +
  119. " ,decode(t.DataType, 51, 1, -1))) RecoveryNum\n" +
  120. " from ( select gh.GoodsCode,gh.SAPCode,u.usercode,o.orderno,gdd.RecyclingFlag,gh.DataType \n" +
  121. " ,case\n" +
  122. " when o.orderid is null or o.orderno like 'HEGII%' then\n" +
  123. " ' '\n" +
  124. " when instr(o.orderno, '/') = 0 then\n" +
  125. " to_char(o.orderno)\n" +
  126. " else\n" +
  127. " to_char(substr(o.orderno, 1, instr(o.orderno, '/') - 1))\n" +
  128. " end ordercode -- 销售凭证\n" +
  129. " ,case\n" +
  130. " when o.orderid is null or o.orderno like 'HEGII%' or\n" +
  131. " instr(o.orderno, '/') = 0 then\n" +
  132. " '0'\n" +
  133. " when instr(o.orderno, '#') = 0 then\n" +
  134. " to_char(substr(o.orderno, instr(o.orderno, '/') + 1))\n" +
  135. " else\n" +
  136. " to_char(substr(o.orderno, instr(o.orderno, '/') + 1, instr(o.orderno, '#')-instr(o.orderno, '/')-1))\n" +
  137. " end orderitem -- 销售凭证项目\n" +
  138. " from (\n" +
  139. " select gch.GoodsCode,gch.SAPCode,decode(gch.DataType,53,51,gch.DataType) DataType,gch.userid,gch.groutingdailydetailid,gch.OTHERID from tp_pm_goodschangehistory gch\n" +
  140. " where gch.createtime >= :datebegin\n" +
  141. " and gch.createtime < :dateend\n" +
  142. " and gch.DataType in (51, 52, 53)\n" +
  143. " union all\n" +
  144. " select gch.GoodsCode,gch.SAPCode,52 DataType,gch.userid,gch.groutingdailydetailid,gch.GoodsIDAfter from tp_pm_goodschangehistory gch\n" +
  145. " where gch.createtime >= :datebegin\n" +
  146. " and gch.createtime < :dateend\n" +
  147. " and gch.DataType =53\n" +
  148. " ) gh\n" +
  149. " inner join tp_mst_user u\n" +
  150. " on u.userid = gh.userid\n" +
  151. " inner join tp_pm_groutingdailydetail gdd\n" +
  152. " on gdd.groutingdailydetailid = gh.groutingdailydetailid\n" +
  153. //" inner join tp_pm_finishedproduct fp\n" +
  154. //" on fp.barcode = gdd.barcode\n" +
  155. " left join tp_pm_order o\n" +
  156. //" on o.orderid = fp.fhorderid\n" +
  157. " on o.orderid = gh.OTHERID\n" +
  158. //" where gh.createtime >= :datebegin\n" +
  159. //" and gh.createtime < :dateend\n" +
  160. //" and gh.DataType in (51, 52)\n" +
  161. " ) t \n" +
  162. //" group by gh.GoodsCode, gh.SAPCode, u.usercode, o.orderno";
  163. " group by t.GoodsCode, t.SAPCode, t.usercode, t.ordercode, t.orderitem\n" +
  164. " ) tt where tt.OutputNum <> 0 or tt.RecoveryNum <> 0 \n" +
  165. " order by tt.GoodsCode, tt.SAPCode, tt.usercode, tt.ordercode, tt.orderitem\n";
  166. // TODO 订单变更
  167. DateTime datebegin = date.Date;
  168. DateTime dateend = date.Date.AddDays(1);
  169. oracleParameter = new OracleParameter[]
  170. {
  171. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  172. new OracleParameter(":datebegin",OracleDbType.Date, datebegin, ParameterDirection.Input),
  173. new OracleParameter(":dateend",OracleDbType.Date, dateend, ParameterDirection.Input),
  174. };
  175. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  176. sre.Result = 0;
  177. return sre;
  178. }
  179. catch (Exception ex)
  180. {
  181. throw ex;
  182. }
  183. }
  184. /// <summary>
  185. /// 同步成品交接数据(手动)
  186. /// </summary>
  187. /// <returns></returns>
  188. public static ServiceResultEntity SetWorkData60(DateTime date, DataTable workData, int userid)
  189. {
  190. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  191. ServiceResultEntity sre = new ServiceResultEntity();
  192. try
  193. {
  194. string yyyymmdd = date.ToString("yyyyMMdd");
  195. string sqlString =
  196. "select t.logid\n" +
  197. " from tsap_hegii_datalog t\n" +
  198. " where t.logtype = '2'\n" +
  199. " and t.datastuts = 'S'\n" +
  200. " and t.yyyymmdd = :yyyymmdd\n" +
  201. " and t.datacode = '60'";
  202. OracleParameter[] oracleParameter = new OracleParameter[]
  203. {
  204. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  205. };
  206. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  207. if (!string.IsNullOrEmpty(logid))
  208. {
  209. sre.Status = Constant.ServiceResultStatus.Other;
  210. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  211. return sre;
  212. }
  213. sqlString = "select workcode from tp_mst_account where rownum = 1";
  214. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  215. DateTime datebegin = date.Date;
  216. DateTime dateend = date.Date.AddDays(1);
  217. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  218. string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  219. dateend.ToString("yyyyMMdd-HHmm");
  220. sqlString = "insert into tsap_hegii_datalog\n" +
  221. " (LogID\n" +
  222. " ,LogType\n" +
  223. " ,BeginTime\n" +
  224. " ,YYYYMMDD\n" +
  225. " ,WorkCode\n" +
  226. " ,DataCode\n" +
  227. " ,DataStuts\n" +
  228. " ,DataMSG\n" +
  229. " ,CreateUserID\n" +
  230. " ,DataLogID)\n" +
  231. "values\n" +
  232. " (:LogID\n" +
  233. " ,'2'\n" +
  234. " ,sysdate\n" +
  235. " ,:YYYYMMDD\n" +
  236. " ,:WorkCode\n" +
  237. " ,'60'\n" +
  238. " ,'S'\n" +
  239. " ,:DataMSG\n" +
  240. " ,:CreateUserID\n" +
  241. " ,:LogID)";
  242. oracleParameter = new OracleParameter[]
  243. {
  244. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  245. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  246. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  247. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  248. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  249. };
  250. int r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  251. //r = oracleConn.ExecuteNonQuery("savepoint datalog");
  252. //oracleConn.SavePoint("datalog");
  253. Zppfm008 sapParameter = new Zppfm008();
  254. if (workData != null && workData.Rows.Count > 0)
  255. {
  256. sapParameter.Zsum = workData.Rows.Count;
  257. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  258. sqlString = "insert into TSAP_HEGII_WorkData\n" +
  259. " (YYYYMMDD\n" +
  260. " ,WorkCode\n" +
  261. " ,DataCode\n" +
  262. " ,GoodsCode\n" +
  263. " ,SAPCode\n" +
  264. " ,UserCode\n" +
  265. " ,OutputNum\n" +
  266. " ,RECOVERYNUM\n" +
  267. " ,ORDERCODE\n" +
  268. " ,ORDERITEM\n" +
  269. " ,LogID,createtime)\n" +
  270. "values\n" +
  271. " ('" + yyyymmdd + "'\n" +
  272. " ,'" + workcode + "'\n" +
  273. " ,'60'\n" +
  274. " ,:GoodsCode\n" +
  275. " ,:SAPCode\n" +
  276. " ,:UserCode\n" +
  277. " ,:OutputNum\n" +
  278. " ,:RECOVERYNUM\n" +
  279. " ,:ORDERCODE\n" +
  280. " ,:ORDERITEM\n" +
  281. " ," + logid + ",:createtime)";
  282. int index = 0;
  283. foreach (DataRow item in workData.Rows)
  284. {
  285. Zspp100 info100 = new Zspp100();
  286. // 工厂
  287. info100.Werks = workcode;
  288. // 型号
  289. info100.Groes = item["GoodsCode"].ToString();
  290. // 物料编号
  291. info100.Matnr = item["SAPCode"].ToString();
  292. // 生产工号
  293. info100.Zghnu = item["UserCode"].ToString();
  294. // 数据节点
  295. info100.Zjdnu = "60";
  296. // 时间戳
  297. info100.Zscnu = yyyymmdd;
  298. // 销售凭证
  299. info100.Vbeln = item["ORDERCODE"].ToString().Trim();
  300. // 销售凭证项目
  301. info100.Posnr = item["ORDERITEM"].ToString();
  302. // 产量
  303. info100.Zclng = item["OutputNum"].ToString();
  304. // 损坯
  305. info100.Zspng = "0";
  306. // 清除
  307. info100.Zqcng = "0";
  308. // 回收
  309. info100.Zhsng = item["RECOVERYNUM"].ToString();
  310. // 干补
  311. info100.Zgbng = "0";
  312. oracleParameter = new OracleParameter[]
  313. {
  314. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item["GoodsCode"], ParameterDirection.Input),
  315. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item["SAPCode"], ParameterDirection.Input),
  316. new OracleParameter(":UserCode",OracleDbType.Varchar2, item["UserCode"], ParameterDirection.Input),
  317. new OracleParameter(":OutputNum",OracleDbType.Varchar2, item["OutputNum"], ParameterDirection.Input),
  318. new OracleParameter(":RECOVERYNUM",OracleDbType.Varchar2, item["RECOVERYNUM"], ParameterDirection.Input),
  319. new OracleParameter(":ORDERCODE",OracleDbType.Varchar2, item["ORDERCODE"], ParameterDirection.Input),
  320. new OracleParameter(":ORDERITEM",OracleDbType.Varchar2, item["ORDERITEM"], ParameterDirection.Input),
  321. new OracleParameter(":createtime",OracleDbType.Date, item["createtime"], ParameterDirection.Input),
  322. };
  323. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  324. sapParameter.TableIn[index++] = info100;
  325. }
  326. }
  327. else
  328. {
  329. sapParameter.Zsum = 0;
  330. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  331. }
  332. Zppfm008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, "60");
  333. //if (result.Ztype == "E")
  334. //{
  335. // sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = 'E', DataMSG = DataMSG||:msg where logid = :logid";
  336. // oracleParameter = new OracleParameter[]
  337. // {
  338. // new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  339. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  340. // };
  341. // r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  342. //}
  343. //else
  344. {
  345. if (result.TableOut != null && result.TableOut.Length > 0)
  346. {
  347. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  348. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  349. "' and DataCode='60' and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  350. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  351. foreach (Zspp100 item in result.TableOut)
  352. {
  353. string posnr = item.Posnr.TrimStart('0');
  354. oracleParameter = new OracleParameter[]
  355. {
  356. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.Ztype, ParameterDirection.Input),
  357. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.Zmsg, ParameterDirection.Input),
  358. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.Groes, ParameterDirection.Input),
  359. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.Matnr, ParameterDirection.Input),
  360. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.Zghnu, ParameterDirection.Input),
  361. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.Vbeln) ? " " : item.Vbeln), ParameterDirection.Input),
  362. new OracleParameter(":OrderItem",OracleDbType.Varchar2, (string.IsNullOrEmpty(posnr) ? "0" : posnr), ParameterDirection.Input),
  363. };
  364. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  365. }
  366. }
  367. //:msg||chr(13)||DataMSG
  368. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =nvl2(:msg,:msg||' '||chr(13)||DataMSG,DataMSG) where logid = :logid";
  369. oracleParameter = new OracleParameter[]
  370. {
  371. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.Ztype, ParameterDirection.Input),
  372. new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  373. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  374. };
  375. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  376. }
  377. oracleConn.Commit();
  378. sre.Message = result.Zmsg;
  379. sre.Result = result.Ztype;
  380. return sre;
  381. }
  382. catch (Exception ex)
  383. {
  384. throw ex;
  385. }
  386. finally
  387. {
  388. if (oracleConn != null &&
  389. oracleConn.ConnState == ConnectionState.Open)
  390. {
  391. oracleConn.Disconnect();
  392. }
  393. }
  394. }
  395. /// <summary>
  396. /// 查询同步日志
  397. /// </summary>
  398. /// <param name="cre"></param>
  399. /// <param name="userInfo"></param>
  400. /// <returns></returns>
  401. public static ServiceResultEntity GetDataLog(ClientRequestEntity cre)
  402. {
  403. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  404. ServiceResultEntity sre = new ServiceResultEntity();
  405. try
  406. {
  407. string sqlString =
  408. "select dl.logid\n" +
  409. " ,dl.logtype\n" +
  410. " ,dl.begintime\n" +
  411. " ,dl.endtime\n" +
  412. " ,dl.yyyymmdd\n" +
  413. " ,dl.workcode\n" +
  414. " ,dl.datacode\n" +
  415. " ,dc.datacodename\n" +
  416. " ,dl.datastuts\n" +
  417. " ,dl.datamsg\n" +
  418. " ,dl.datalogid\n" +
  419. " ,u.usercode synusercode\n" +
  420. " from tsap_hegii_datalog dl\n" +
  421. " inner join tsap_hegii_datacode dc\n" +
  422. " on dc.datacode = dl.datacode\n" +
  423. " left join tp_mst_user u\n" +
  424. " on u.userid = dl.createuserid\n" +
  425. " where dl.logtype = '2'\n" +
  426. " and dl.yyyymmdd >= :datebegin\n" +
  427. " and dl.yyyymmdd <= :dateend\n";
  428. OracleParameter[] oracleParameter = new OracleParameter[]
  429. {
  430. new OracleParameter(":datebegin",OracleDbType.Varchar2, cre.Properties["datebegin"], ParameterDirection.Input),
  431. new OracleParameter(":dateend",OracleDbType.Varchar2, cre.Properties["dateend"], ParameterDirection.Input),
  432. };
  433. string datastuts = cre.Properties["datastuts"] + "";
  434. if (!string.IsNullOrEmpty(datastuts))
  435. {
  436. sqlString += " and dl.datastuts in (" + datastuts + ")\n";
  437. }
  438. string datacode = cre.Properties["datacode"] + "";
  439. if (!string.IsNullOrEmpty(datacode))
  440. {
  441. sqlString += " and dl.datacode = '" + datacode + "'\n";
  442. //sqlString += " and dl.datacode in (" + datacode + ")\n";
  443. }
  444. sqlString += " order by dl.yyyymmdd desc, dl.datacode, dl.begintime desc";
  445. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  446. return sre;
  447. }
  448. catch (Exception ex)
  449. {
  450. throw ex;
  451. }
  452. }
  453. /// <summary>
  454. /// 查询产量同步明细
  455. /// </summary>
  456. /// <param name="logid"></param>
  457. /// <param name="userInfo"></param>
  458. /// <returns></returns>
  459. public static ServiceResultEntity GetWorkDataByDataLog(int logid)
  460. {
  461. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  462. ServiceResultEntity sre = new ServiceResultEntity();
  463. try
  464. {
  465. string sqlString = "\n" +
  466. "select wd.yyyymmdd\n" +
  467. " ,wd.workcode\n" +
  468. " ,wd.datacode\n" +
  469. " ,dc.datacodename\n" +
  470. " ,wd.goodscode\n" +
  471. " ,wd.sapcode\n" +
  472. " ,wd.usercode\n" +
  473. " ,wd.ordercode\n" +
  474. " ,wd.orderitem\n" +
  475. " ,to_number(wd.outputnum) outputnum\n" +
  476. " ,to_number(wd.scrapnum) scrapnum\n" +
  477. " ,to_number(wd.cleanupnum) cleanupnum\n" +
  478. " ,to_number(wd.recoverynum) recoverynum\n" +
  479. " ,to_number(wd.repairnum) repairnum\n" +
  480. " ,wd.createtime\n" +
  481. " ,wd.ztype\n" +
  482. " ,wd.zmsg\n" +
  483. " ,wd.ztime\n" +
  484. " ,wd.logid\n" +
  485. " from tsap_hegii_workdata wd\n" +
  486. " inner join tsap_hegii_datacode dc\n" +
  487. " on dc.datacode = wd.datacode\n" +
  488. " where wd.logid = :logid \n" +
  489. " order by wd.goodscode,wd.sapcode,wd.usercode,wd.ordercode,wd.outputnum \n";
  490. OracleParameter[] oracleParameter = new OracleParameter[]
  491. {
  492. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  493. };
  494. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  495. //sqlString = "\n" +
  496. //"select wd.logid\n" +
  497. //" ,wd.goodscode\n" +
  498. //" ,wd.sapcode\n" +
  499. //" ,wd.procedureName\n" +
  500. //" ,wd.scrapnum\n" +
  501. //" ,wd.unscrapnum\n" +
  502. //" ,wd.scrapnum-wd.unscrapnum num\n" +
  503. //" from TSAP_HEGII_WORKDATA_SNum wd\n" +
  504. ////" inner join tsap_hegii_datacode dc\n" +
  505. ////" on dc.datacode = wd.datacode\n" +
  506. //" where wd.logid = :logid \n" +
  507. //" order by wd.goodscode,wd.sapcode,wd.procedureName \n";
  508. sqlString = "select decode(gid\n" +
  509. " ,3\n" +
  510. " ,'合计'\n" +
  511. " ,1\n" +
  512. " ,'小计[' || procedureName || ']'\n" +
  513. " ,procedureName) procedureName\n" +
  514. " ,decode(gid, 0, goodscode, '--') goodscode\n" +
  515. " ,decode(gid, 0, sapcode, '--') sapcode\n" +
  516. " ,decode(gid, 0, usercode, '--') usercode\n" +
  517. " ,scrapnum\n" +
  518. " ,unscrapnum\n" +
  519. " ,scrapnum - unscrapnum scrapsum\n" +
  520. " ,cleanupnum\n" +
  521. " ,uncleanupnum\n" +
  522. " ,cleanupnum - uncleanupnum cleanupsum\n" +
  523. " ,repairnum\n" +
  524. " ,recoverynum\n" +
  525. " from (select grouping_id(wd.procedureName, wd.goodscode) gid\n" +
  526. " ,wd.procedureName\n" +
  527. " ,wd.goodscode\n" +
  528. " ,wd.sapcode\n" +
  529. " ,wd.usercode\n" +
  530. " ,sum(wd.scrapnum) scrapnum\n" +
  531. " ,sum(wd.unscrapnum) unscrapnum\n" +
  532. " ,sum(wd.cleanupnum) cleanupnum\n" +
  533. " ,sum(wd.uncleanupnum) uncleanupnum\n" +
  534. " ,sum(wd.repairnum) repairnum\n" +
  535. " ,sum(wd.recoverynum) recoverynum\n" +
  536. " from TSAP_HEGII_WORKDATA_SNum wd\n" +
  537. " where wd.logid = :logid \n" +
  538. " group by grouping sets((wd.procedureName, wd.goodscode, wd.sapcode,wd.usercode),(wd.procedureName),())\n" +
  539. " order by wd.procedureName, wd.goodscode, wd.sapcode)";
  540. sre.Data.Tables.Add(oracleConn.GetSqlResultToDt(sqlString, oracleParameter));
  541. return sre;
  542. }
  543. catch (Exception ex)
  544. {
  545. throw ex;
  546. }
  547. }
  548. /// <summary>
  549. /// 查询SAP同步工序损坯明细
  550. /// </summary>
  551. /// <param name="logid"></param>
  552. /// <param name="userInfo"></param>
  553. /// <returns></returns>
  554. public static ServiceResultEntity GetWorkDataSPSumByDate(ClientRequestEntity cre)
  555. {
  556. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  557. ServiceResultEntity sre = new ServiceResultEntity();
  558. try
  559. {
  560. string sqlString = "select decode(gid\n" +
  561. " ,3\n" +
  562. " ,'合计'\n" +
  563. " ,1\n" +
  564. " ,'小计[' || procedureName || ']'\n" +
  565. " ,procedureName) procedureName\n" +
  566. " ,decode(gid, 0, goodscode, '--') goodscode\n" +
  567. " ,decode(gid, 0, sapcode, '--') sapcode\n" +
  568. " ,decode(gid, 0, usercode, '--') usercode\n" +
  569. " ,scrapnum\n" +
  570. " ,unscrapnum\n" +
  571. " ,scrapnum - unscrapnum scrapsum\n" +
  572. " ,cleanupnum\n" +
  573. " ,uncleanupnum\n" +
  574. " ,cleanupnum - uncleanupnum cleanupsum\n" +
  575. " ,repairnum\n" +
  576. " ,recoverynum\n" +
  577. " from (select grouping_id(wd.procedureName, wd.goodscode) gid\n" +
  578. " ,wd.procedureName\n" +
  579. " ,wd.goodscode\n" +
  580. " ,wd.sapcode\n" +
  581. " ,wd.usercode\n" +
  582. " ,sum(wd.scrapnum) scrapnum\n" +
  583. " ,sum(wd.unscrapnum) unscrapnum\n" +
  584. " ,sum(wd.cleanupnum) cleanupnum\n" +
  585. " ,sum(wd.uncleanupnum) uncleanupnum\n" +
  586. " ,sum(wd.repairnum) repairnum\n" +
  587. " ,sum(wd.recoverynum) recoverynum\n" +
  588. " from TSAP_HEGII_DATALOG dl\n" +
  589. " inner join TSAP_HEGII_WORKDATA_SNum wd\n" +
  590. " on wd.logid = dl.logid \n" +
  591. " where dl.logtype = '1' \n" +
  592. " and dl.yyyymmdd >= :datebegin\n" +
  593. " and dl.yyyymmdd <= :dateend\n" +
  594. " group by grouping sets((wd.procedureName, wd.goodscode, wd.sapcode,wd.usercode),(wd.procedureName),())\n" +
  595. " order by wd.procedureName, wd.goodscode, wd.sapcode)";
  596. OracleParameter[] oracleParameter = new OracleParameter[]
  597. {
  598. new OracleParameter(":datebegin",OracleDbType.Varchar2, cre.Properties["datebegin"], ParameterDirection.Input),
  599. new OracleParameter(":dateend",OracleDbType.Varchar2, cre.Properties["dateend"], ParameterDirection.Input),
  600. };
  601. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  602. return sre;
  603. }
  604. catch (Exception ex)
  605. {
  606. throw ex;
  607. }
  608. }
  609. /// <summary>
  610. /// 查询成品条码同步明细
  611. /// </summary>
  612. /// <param name="logid"></param>
  613. /// <param name="userInfo"></param>
  614. /// <returns></returns>
  615. public static ServiceResultEntity GetFinishedProductByDataLog(int logid)
  616. {
  617. IDBConnection oracleConn = ClsDbFactory.CreateDBConnection(DataBaseType.ORACLE, DataManager.ConnectionString);
  618. ServiceResultEntity sre = new ServiceResultEntity();
  619. try
  620. {
  621. string sqlString =
  622. "select fp.yyyymmdd\n" +
  623. " ,fp.workcode\n" +
  624. " ,fp.barcode\n" +
  625. " ,fp.outcode\n" +
  626. " ,fp.goodscode\n" +
  627. " ,fp.sapcode\n" +
  628. " ,fp.sapflbatchno\n" +
  629. " ,fp.sapfhundoflag\n" +
  630. " ,fp.createtime\n" +
  631. " ,fp.ztype\n" +
  632. " ,fp.zmsg\n" +
  633. " ,fp.ztime\n" +
  634. " ,fp.logid\n" +
  635. " ,fp.ordercode\n" +
  636. " ,fp.orderitem\n" +
  637. " from tsap_hegii_finishedproduct fp\n" +
  638. " where fp.logid = :logid\n" +
  639. " order by fp.ztime, fp.barcode\n";
  640. OracleParameter[] oracleParameter = new OracleParameter[]
  641. {
  642. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  643. };
  644. sre.Data = oracleConn.GetSqlResultToDs(sqlString, oracleParameter);
  645. return sre;
  646. }
  647. catch (Exception ex)
  648. {
  649. throw ex;
  650. }
  651. }
  652. /// <summary>
  653. /// 同步产量报工(手动)
  654. /// </summary>
  655. /// <param name="date"></param>
  656. /// <param name="datacode"></param>
  657. /// <param name="userid"></param>
  658. /// <returns></returns>
  659. public static ServiceResultEntity SetWorkData10_50(DateTime date, string datacode, int userid)
  660. {
  661. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  662. ServiceResultEntity sre = new ServiceResultEntity();
  663. try
  664. {
  665. string yyyymmdd = date.ToString("yyyyMMdd");
  666. string sqlString =
  667. "select t.logid\n" +
  668. " from tsap_hegii_datalog t\n" +
  669. " where t.logtype = '2'\n" +
  670. " and t.datastuts = 'S'\n" +
  671. " and t.yyyymmdd = :yyyymmdd\n" +
  672. " and t.datacode = :datacode";
  673. OracleParameter[] oracleParameter = new OracleParameter[]
  674. {
  675. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  676. new OracleParameter(":datacode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  677. };
  678. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  679. if (!string.IsNullOrEmpty(logid))
  680. {
  681. sre.Status = Constant.ServiceResultStatus.Other;
  682. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  683. return sre;
  684. }
  685. sqlString =
  686. "select t.logid\n" +
  687. " from tsap_hegii_datalog t\n" +
  688. " where t.logtype = '1'\n" +
  689. " and t.datastuts = 'S'\n" +
  690. " and t.yyyymmdd = :yyyymmdd\n" +
  691. " and t.datacode = :datacode" +
  692. " and t.createuserid is null for update";
  693. string datalogid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  694. sqlString = "select workcode from tp_mst_account where rownum = 1";
  695. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  696. //DateTime datebegin = date.Date;
  697. //DateTime dateend = date.Date.AddDays(1);
  698. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  699. string msg = null;
  700. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  701. // dateend.ToString("yyyyMMdd-HHmm");
  702. sqlString = "insert into tsap_hegii_datalog\n" +
  703. " (LogID\n" +
  704. " ,LogType\n" +
  705. " ,BeginTime\n" +
  706. " ,YYYYMMDD\n" +
  707. " ,WorkCode\n" +
  708. " ,DataCode\n" +
  709. " ,DataStuts\n" +
  710. " ,DataMSG\n" +
  711. " ,CreateUserID\n" +
  712. " ,DataLogID)\n" +
  713. "values\n" +
  714. " (:LogID\n" +
  715. " ,'2'\n" +
  716. " ,sysdate\n" +
  717. " ,:YYYYMMDD\n" +
  718. " ,:WorkCode\n" +
  719. " ,:DataCode\n" +
  720. " ,:DataStuts\n" +
  721. " ,:DataMSG\n" +
  722. " ,:CreateUserID\n" +
  723. " ,:DataLogID)";
  724. int r = 0;
  725. if (string.IsNullOrEmpty(datalogid))
  726. {
  727. oracleParameter = new OracleParameter[]
  728. {
  729. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  730. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  731. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  732. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  733. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  734. new OracleParameter(":DataMSG",OracleDbType.Varchar2, "DKMES-ERROR:NO DATA " + msg, ParameterDirection.Input),
  735. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  736. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  737. };
  738. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  739. oracleConn.Commit();
  740. sre.Status = Constant.ServiceResultStatus.Other;
  741. sre.Message = "没有同步数据";
  742. sre.Result = "E";
  743. return sre;
  744. }
  745. oracleParameter = new OracleParameter[]
  746. {
  747. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  748. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  749. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  750. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  751. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  752. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  753. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  754. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  755. };
  756. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  757. sqlString =
  758. "select wd.yyyymmdd\n" +
  759. " ,wd.workcode\n" +
  760. " ,wd.DataCode\n" +
  761. " ,wd.GoodsCode\n" +
  762. " ,wd.SAPCode\n" +
  763. " ,wd.UserCode\n" +
  764. " ,wd.ORDERCODE\n" +
  765. " ,wd.ORDERITEM\n" +
  766. " ,wd.OutputNum\n" +
  767. " ,wd.ScrapNum\n" +
  768. " ,wd.CleanupNum\n" +
  769. " ,wd.RecoveryNum\n" +
  770. " ,wd.RepairNum\n" +
  771. " from tsap_hegii_workdata wd where wd.logid = :datalogid";
  772. oracleParameter = new OracleParameter[]
  773. {
  774. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  775. };
  776. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  777. Zppfm008 sapParameter = new Zppfm008();
  778. if (workData != null && workData.Rows.Count > 0)
  779. {
  780. sapParameter.Zsum = workData.Rows.Count;
  781. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  782. int index = 0;
  783. foreach (DataRow item in workData.Rows)
  784. {
  785. Zspp100 info100 = new Zspp100();
  786. // 工厂
  787. info100.Werks = workcode;
  788. // 型号
  789. info100.Groes = item["GoodsCode"].ToString();
  790. // 物料编号
  791. info100.Matnr = item["SAPCode"].ToString();
  792. // 生产工号
  793. info100.Zghnu = item["UserCode"].ToString();
  794. // 数据节点
  795. info100.Zjdnu = item["DataCode"].ToString();
  796. // 时间戳
  797. info100.Zscnu = yyyymmdd;
  798. // 销售凭证
  799. info100.Vbeln = item["ORDERCODE"].ToString().Trim();
  800. // 销售凭证项目
  801. info100.Posnr = item["ORDERITEM"].ToString();
  802. // 产量
  803. info100.Zclng = item["OutputNum"].ToString();
  804. // 损坯
  805. info100.Zspng = item["SCRAPNUM"].ToString();
  806. // 清除
  807. info100.Zqcng = item["CLEANUPNUM"].ToString();
  808. // 回收
  809. info100.Zhsng = item["RECOVERYNUM"].ToString();
  810. // 干补
  811. info100.Zgbng = item["REPAIRNUM"].ToString();
  812. sapParameter.TableIn[index++] = info100;
  813. }
  814. }
  815. else
  816. {
  817. sapParameter.Zsum = 0;
  818. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  819. }
  820. Zppfm008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  821. //if (result.Ztype == "E")
  822. //{
  823. // sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = 'E', DataMSG = :msg||chr(13)||DataMSG where logid = :logid";
  824. // oracleParameter = new OracleParameter[]
  825. // {
  826. // new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  827. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  828. // };
  829. // r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  830. //}
  831. //else
  832. {
  833. if (result.TableOut != null && result.TableOut.Length > 0)
  834. {
  835. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + datalogid +
  836. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  837. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  838. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  839. foreach (Zspp100 item in result.TableOut)
  840. {
  841. string posnr = item.Posnr.TrimStart('0');
  842. oracleParameter = new OracleParameter[]
  843. {
  844. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.Ztype, ParameterDirection.Input),
  845. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.Zmsg, ParameterDirection.Input),
  846. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  847. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.Groes, ParameterDirection.Input),
  848. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.Matnr, ParameterDirection.Input),
  849. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.Zghnu, ParameterDirection.Input),
  850. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.Vbeln) ? " " : item.Vbeln), ParameterDirection.Input),
  851. new OracleParameter(":OrderItem",OracleDbType.Varchar2, ((string.IsNullOrEmpty(posnr)) ? "0" : posnr), ParameterDirection.Input),
  852. };
  853. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  854. }
  855. }
  856. //:msg||chr(13)||DataMSG nvl2(:msg,:msg||chr(13)||DataMS,DataMS)
  857. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  858. oracleParameter = new OracleParameter[]
  859. {
  860. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.Ztype, ParameterDirection.Input),
  861. new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  862. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  863. };
  864. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  865. if (result.Ztype == "S")
  866. {
  867. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :datalogid";
  868. oracleParameter = new OracleParameter[]
  869. {
  870. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  871. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  872. };
  873. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  874. }
  875. }
  876. oracleConn.Commit();
  877. sre.Message = result.Zmsg;
  878. sre.Result = result.Ztype;
  879. return sre;
  880. }
  881. catch (Exception ex)
  882. {
  883. throw ex;
  884. }
  885. finally
  886. {
  887. if (oracleConn != null &&
  888. oracleConn.ConnState == ConnectionState.Open)
  889. {
  890. oracleConn.Disconnect();
  891. }
  892. }
  893. }
  894. /// <summary>
  895. /// 同步成品条码(手动)
  896. /// </summary>
  897. /// <param name="date"></param>
  898. /// <param name="userid"></param>
  899. /// <returns></returns>
  900. public static ServiceResultEntity SetFP6001(DateTime date, int userid)
  901. {
  902. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  903. ServiceResultEntity sre = new ServiceResultEntity();
  904. try
  905. {
  906. string yyyymmdd = date.ToString("yyyyMMdd");
  907. string sqlString =
  908. "select t.logid\n" +
  909. " from tsap_hegii_datalog t\n" +
  910. " where t.logtype = '2'\n" +
  911. " and t.datastuts = 'S'\n" +
  912. " and t.yyyymmdd = :yyyymmdd\n" +
  913. " and t.datacode = :datacode";
  914. OracleParameter[] oracleParameter = new OracleParameter[]
  915. {
  916. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  917. new OracleParameter(":datacode",OracleDbType.Varchar2, "6001", ParameterDirection.Input),
  918. };
  919. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  920. if (!string.IsNullOrEmpty(logid))
  921. {
  922. sre.Status = Constant.ServiceResultStatus.Other;
  923. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  924. return sre;
  925. }
  926. sqlString =
  927. "select t.logid\n" +
  928. " from tsap_hegii_datalog t\n" +
  929. " where t.logtype = '1'\n" +
  930. " and t.datastuts = 'S'\n" +
  931. " and t.yyyymmdd = :yyyymmdd\n" +
  932. " and t.datacode = :datacode" +
  933. " and t.createuserid is null for update";
  934. string datalogid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  935. sqlString = "select workcode from tp_mst_account where rownum = 1";
  936. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  937. //DateTime datebegin = date.Date;
  938. //DateTime dateend = date.Date.AddDays(1);
  939. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  940. string msg = null;
  941. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  942. // dateend.ToString("yyyyMMdd-HHmm");
  943. sqlString = "insert into tsap_hegii_datalog\n" +
  944. " (LogID\n" +
  945. " ,LogType\n" +
  946. " ,BeginTime\n" +
  947. " ,YYYYMMDD\n" +
  948. " ,WorkCode\n" +
  949. " ,DataCode\n" +
  950. " ,DataStuts\n" +
  951. " ,DataMSG\n" +
  952. " ,CreateUserID\n" +
  953. " ,DataLogID)\n" +
  954. "values\n" +
  955. " (:LogID\n" +
  956. " ,'2'\n" +
  957. " ,sysdate\n" +
  958. " ,:YYYYMMDD\n" +
  959. " ,:WorkCode\n" +
  960. " ,:DataCode\n" +
  961. " ,:DataStuts\n" +
  962. " ,:DataMSG\n" +
  963. " ,:CreateUserID\n" +
  964. " ,:DataLogID)";
  965. int r = 0;
  966. if (string.IsNullOrEmpty(datalogid))
  967. {
  968. oracleParameter = new OracleParameter[]
  969. {
  970. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  971. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  972. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  973. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  974. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6001", ParameterDirection.Input),
  975. new OracleParameter(":DataMSG",OracleDbType.Varchar2, "DKMES-ERROR:NO DATA " + msg, ParameterDirection.Input),
  976. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  977. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  978. };
  979. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  980. oracleConn.Commit();
  981. sre.Status = Constant.ServiceResultStatus.Other;
  982. sre.Message = "没有同步数据";
  983. sre.Result = "E";
  984. return sre;
  985. }
  986. oracleParameter = new OracleParameter[]
  987. {
  988. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  989. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  990. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  991. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  992. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6001", ParameterDirection.Input),
  993. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  994. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  995. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  996. };
  997. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  998. sqlString =
  999. "select fp.yyyymmdd\n" +
  1000. " ,fp.workcode\n" +
  1001. " ,fp.barcode\n" +
  1002. " ,fp.outcode\n" +
  1003. " ,fp.goodscode\n" +
  1004. " ,fp.sapcode\n" +
  1005. " ,fp.sapflbatchno\n" +
  1006. " ,fp.sapfhundoflag\n" +
  1007. " ,fp.ordercode\n" +
  1008. " ,fp.orderitem\n" +
  1009. " from tsap_hegii_finishedproduct fp where fp.logid = :datalogid\n" +
  1010. " order by fp.sapflbatchno, fp.barcode";
  1011. oracleParameter = new OracleParameter[]
  1012. {
  1013. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1014. };
  1015. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1016. // 单次传输最大条数
  1017. int maxCount = 100000;
  1018. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  1019. if (fpData != null && fpData.Rows.Count > 0)
  1020. {
  1021. int index = 0;
  1022. //Zppfm010 sapParameter = new Zppfm010();
  1023. //sapParameter.Zsum = maxCount;
  1024. //sapParameter.TableIn = new Zspp110[sapParameter.Zsum];
  1025. List<ZSPP110> tableInList = new List<ZSPP110>();
  1026. foreach (DataRow item in fpData.Rows)
  1027. {
  1028. if (index >= maxCount)
  1029. {
  1030. Zppfm010 sapItem = new Zppfm010();
  1031. sapItem.ZSUM = tableInList.Count;
  1032. sapItem.TABLE_IN = tableInList.ToArray();
  1033. sapParameterList.Add(sapItem);
  1034. index = 0;
  1035. tableInList.Clear();
  1036. }
  1037. ZSPP110 info110 = new ZSPP110();
  1038. // 时间戳
  1039. info110.ZSCNU = yyyymmdd;
  1040. // 工厂
  1041. info110.WERKS = workcode;
  1042. // 生产条码
  1043. info110.ZSCTM = item["barcode"].ToString();
  1044. // 包装条码
  1045. info110.ZBZTM = item["outcode"].ToString();
  1046. // 产品编码
  1047. info110.ZCPBM = item["goodscode"].ToString();
  1048. // 物料编号
  1049. info110.MATNR = item["sapcode"].ToString();
  1050. // 包装整板标识
  1051. info110.ZBZBS = item["sapflbatchno"].ToString();
  1052. // 重新绑定标识
  1053. info110.ZCXBD = item["sapfhundoflag"].ToString();
  1054. // 销售凭证
  1055. info110.KDAUF = item["ordercode"].ToString();
  1056. // 销售凭证项目
  1057. info110.KDPOS = item["orderitem"].ToString();
  1058. if (info110.WERKS == "5011" && info110.ZCPBM == "K047L")
  1059. {
  1060. continue;
  1061. }
  1062. tableInList.Add(info110);
  1063. index++;
  1064. }
  1065. Zppfm010 sapParameter = new Zppfm010();
  1066. sapParameter.ZSUM = tableInList.Count;
  1067. sapParameter.TABLE_IN = tableInList.ToArray();
  1068. sapParameterList.Add(sapParameter);
  1069. index = 0;
  1070. tableInList.Clear();
  1071. }
  1072. else
  1073. {
  1074. Zppfm010 sapParameter = new Zppfm010();
  1075. sapParameter.ZSUM = 0;
  1076. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  1077. sapParameterList.Add(sapParameter);
  1078. }
  1079. foreach (Zppfm010 sapParameter in sapParameterList)
  1080. {
  1081. ZPPFM010Response result = HGSAPDK_ZPPFM010(sapParameter, yyyymmdd);
  1082. sre.Message = result.ZMSG;
  1083. sre.Result = result.ZTYPE;
  1084. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =:msg where logid = :logid";
  1085. oracleParameter = new OracleParameter[]
  1086. {
  1087. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  1088. new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  1089. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1090. };
  1091. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1092. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  1093. {
  1094. sqlString = "update tsap_hegii_finishedproduct t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + datalogid +
  1095. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode + "' and barcode=:barcode";
  1096. foreach (ZSPP110 item in result.TABLE_OUT)
  1097. {
  1098. oracleParameter = new OracleParameter[]
  1099. {
  1100. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  1101. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  1102. new OracleParameter(":barcode",OracleDbType.Varchar2, item.ZSCTM, ParameterDirection.Input),
  1103. };
  1104. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1105. }
  1106. }
  1107. if (result.ZTYPE != "S")
  1108. {
  1109. oracleConn.Commit();
  1110. //sre.Message = result.Zmsg;
  1111. //sre.Result = result.Ztype;
  1112. return sre;
  1113. }
  1114. }
  1115. //if (result.Ztype == "S")
  1116. {
  1117. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :datalogid";
  1118. oracleParameter = new OracleParameter[]
  1119. {
  1120. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1121. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  1122. };
  1123. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1124. }
  1125. oracleConn.Commit();
  1126. //sre.Message = result.Zmsg;
  1127. //sre.Result = result.Ztype;
  1128. return sre;
  1129. }
  1130. catch (Exception ex)
  1131. {
  1132. throw ex;
  1133. }
  1134. finally
  1135. {
  1136. if (oracleConn != null &&
  1137. oracleConn.ConnState == ConnectionState.Open)
  1138. {
  1139. oracleConn.Disconnect();
  1140. }
  1141. }
  1142. }
  1143. /// <summary>
  1144. /// 同步成品条码(手动)
  1145. /// </summary>
  1146. /// <param name="date"></param>
  1147. /// <param name="userid"></param>
  1148. /// <returns></returns>
  1149. public static ServiceResultEntity SetFP6002(DateTime date, int userid)
  1150. {
  1151. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1152. ServiceResultEntity sre = new ServiceResultEntity();
  1153. try
  1154. {
  1155. string yyyymmdd = date.ToString("yyyyMMdd");
  1156. string sqlString =
  1157. "select t.logid\n" +
  1158. " from tsap_hegii_datalog t\n" +
  1159. " where t.logtype = '2'\n" +
  1160. " and t.datastuts = 'S'\n" +
  1161. " and t.yyyymmdd = :yyyymmdd\n" +
  1162. " and t.datacode = :datacode";
  1163. OracleParameter[] oracleParameter = new OracleParameter[]
  1164. {
  1165. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1166. new OracleParameter(":datacode",OracleDbType.Varchar2, "6002", ParameterDirection.Input),
  1167. };
  1168. string logid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  1169. if (!string.IsNullOrEmpty(logid))
  1170. {
  1171. sre.Status = Constant.ServiceResultStatus.Other;
  1172. sre.Message = "日期【" + yyyymmdd + "】的数据已经同步过,不能重复同步。";
  1173. return sre;
  1174. }
  1175. sqlString =
  1176. "select t.logid, t.begintime, t.endtime\n" +
  1177. " from tsap_hegii_datalog t\n" +
  1178. " where t.logtype = '1'\n" +
  1179. " and t.datastuts = 'S'\n" +
  1180. " and t.yyyymmdd = :yyyymmdd\n" +
  1181. " and t.datacode = :datacode" +
  1182. " and t.createuserid is null for update";
  1183. //string datalogid = oracleConn.GetSqlResultToStr(sqlString, oracleParameter);
  1184. DataTable dt = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1185. string datalogid = null;
  1186. string msg = null;
  1187. if (dt.Rows.Count > 0)
  1188. {
  1189. datalogid = dt.Rows[0]["logid"] + "";
  1190. msg = Convert.ToDateTime( dt.Rows[0]["endtime"]).ToString("HH:mm ");
  1191. }
  1192. sqlString = "select workcode from tp_mst_account where rownum = 1";
  1193. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  1194. //DateTime datebegin = date.Date;
  1195. //DateTime dateend = date.Date.AddDays(1);
  1196. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  1197. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHmm") + "~" +
  1198. // dateend.ToString("yyyyMMdd-HHmm");
  1199. sqlString = "insert into tsap_hegii_datalog\n" +
  1200. " (LogID\n" +
  1201. " ,LogType\n" +
  1202. " ,BeginTime\n" +
  1203. " ,YYYYMMDD\n" +
  1204. " ,WorkCode\n" +
  1205. " ,DataCode\n" +
  1206. " ,DataStuts\n" +
  1207. " ,DataMSG\n" +
  1208. " ,CreateUserID\n" +
  1209. " ,DataLogID)\n" +
  1210. "values\n" +
  1211. " (:LogID\n" +
  1212. " ,'2'\n" +
  1213. " ,sysdate\n" +
  1214. " ,:YYYYMMDD\n" +
  1215. " ,:WorkCode\n" +
  1216. " ,:DataCode\n" +
  1217. " ,:DataStuts\n" +
  1218. " ,:DataMSG\n" +
  1219. " ,:CreateUserID\n" +
  1220. " ,:DataLogID)";
  1221. int r = 0;
  1222. if (string.IsNullOrEmpty(datalogid))
  1223. {
  1224. oracleParameter = new OracleParameter[]
  1225. {
  1226. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  1227. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  1228. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1229. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  1230. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6002", ParameterDirection.Input),
  1231. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg + "DKMES-ERROR:NO DATA " , ParameterDirection.Input),
  1232. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  1233. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  1234. };
  1235. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1236. oracleConn.Commit();
  1237. sre.Status = Constant.ServiceResultStatus.Other;
  1238. sre.Message = "没有同步数据";
  1239. sre.Result = "E";
  1240. return sre;
  1241. }
  1242. oracleParameter = new OracleParameter[]
  1243. {
  1244. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  1245. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  1246. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  1247. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  1248. new OracleParameter(":DataCode",OracleDbType.Varchar2, "6002", ParameterDirection.Input),
  1249. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  1250. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  1251. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1252. };
  1253. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1254. sqlString =
  1255. "select fp.yyyymmdd\n" +
  1256. " ,fp.workcode\n" +
  1257. " ,fp.barcode\n" +
  1258. " ,fp.outcode\n" +
  1259. " ,fp.goodscode\n" +
  1260. " ,fp.sapcode\n" +
  1261. " ,fp.sapflbatchno\n" +
  1262. " ,fp.sapfhundoflag\n" +
  1263. " ,fp.ordercode\n" +
  1264. " ,fp.orderitem\n" +
  1265. " from tsap_hegii_finishedproduct fp where fp.logid = :datalogid and (ZTYPE is null or ZTYPE <> 'S')\n" +
  1266. " order by fp.sapflbatchno, fp.barcode";
  1267. oracleParameter = new OracleParameter[]
  1268. {
  1269. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1270. };
  1271. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1272. // 单次传输最大条数
  1273. int maxCount = 100000;
  1274. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  1275. if (fpData != null && fpData.Rows.Count > 0)
  1276. {
  1277. int index = 0;
  1278. //Zppfm010 sapParameter = new Zppfm010();
  1279. //sapParameter.Zsum = maxCount;
  1280. //sapParameter.TableIn = new Zspp110[sapParameter.Zsum];
  1281. List<ZSPP110> tableInList = new List<ZSPP110>();
  1282. foreach (DataRow item in fpData.Rows)
  1283. {
  1284. if (index >= maxCount)
  1285. {
  1286. Zppfm010 sapItem = new Zppfm010();
  1287. sapItem.ZSUM = tableInList.Count;
  1288. sapItem.TABLE_IN = tableInList.ToArray();
  1289. sapParameterList.Add(sapItem);
  1290. index = 0;
  1291. tableInList.Clear();
  1292. }
  1293. ZSPP110 info110 = new ZSPP110();
  1294. // 时间戳
  1295. info110.ZSCNU = yyyymmdd;
  1296. // 工厂
  1297. info110.WERKS = workcode;
  1298. // 生产条码
  1299. info110.ZSCTM = item["barcode"].ToString();
  1300. // 包装条码
  1301. info110.ZBZTM = item["outcode"].ToString();
  1302. // 产品编码
  1303. info110.ZCPBM = item["goodscode"].ToString();
  1304. // 物料编号
  1305. info110.MATNR = item["sapcode"].ToString();
  1306. // 包装整板标识
  1307. info110.ZBZBS = item["sapflbatchno"].ToString();
  1308. // 重新绑定标识
  1309. info110.ZCXBD = item["sapfhundoflag"].ToString();
  1310. // 销售凭证
  1311. info110.KDAUF = item["ordercode"].ToString();
  1312. // 销售凭证项目
  1313. info110.KDPOS = item["orderitem"].ToString();
  1314. if (info110.WERKS == "5011" && info110.ZCPBM == "K047L")
  1315. {
  1316. continue;
  1317. }
  1318. tableInList.Add(info110);
  1319. index++;
  1320. }
  1321. Zppfm010 sapParameter = new Zppfm010();
  1322. sapParameter.ZSUM = tableInList.Count;
  1323. sapParameter.TABLE_IN = tableInList.ToArray();
  1324. sapParameterList.Add(sapParameter);
  1325. index = 0;
  1326. tableInList.Clear();
  1327. }
  1328. else
  1329. {
  1330. Zppfm010 sapParameter = new Zppfm010();
  1331. sapParameter.ZSUM = 0;
  1332. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  1333. sapParameterList.Add(sapParameter);
  1334. }
  1335. foreach (Zppfm010 sapParameter in sapParameterList)
  1336. {
  1337. ZPPFM010Response result = HGSAPDK_ZPPFM010(sapParameter, yyyymmdd);
  1338. //sre.Message = result.ZMSG;
  1339. sre.Message = $"{result.ZMSG}({sapParameter.ZSUM})";
  1340. sre.Result = result.ZTYPE;
  1341. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG =DataMSG||:msg where logid = :logid";
  1342. oracleParameter = new OracleParameter[]
  1343. {
  1344. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.ZTYPE, ParameterDirection.Input),
  1345. //new OracleParameter(":msg",OracleDbType.Varchar2, result.ZMSG, ParameterDirection.Input),
  1346. new OracleParameter(":msg",OracleDbType.Varchar2, sre.Message, ParameterDirection.Input),
  1347. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  1348. };
  1349. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1350. if (result.TABLE_OUT != null && result.TABLE_OUT.Length > 0)
  1351. {
  1352. sqlString = "update tsap_hegii_finishedproduct t set t.ZTime =sysdate, ZTYPE = nvl(:ZTYPE,'S'), ZMSG = :ZMSG where logid = " + datalogid +
  1353. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode + "' and barcode=:barcode and sapflbatchno=:sapflbatchno";
  1354. foreach (ZSPP110 item in result.TABLE_OUT)
  1355. {
  1356. oracleParameter = new OracleParameter[]
  1357. {
  1358. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.ZTYPE, ParameterDirection.Input),
  1359. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.ZMSG, ParameterDirection.Input),
  1360. new OracleParameter(":barcode",OracleDbType.Varchar2, item.ZSCTM, ParameterDirection.Input),
  1361. new OracleParameter(":sapflbatchno",OracleDbType.Varchar2, item.ZBZBS, ParameterDirection.Input),
  1362. };
  1363. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1364. }
  1365. }
  1366. if (result.ZTYPE != "S")
  1367. {
  1368. oracleConn.Commit();
  1369. //sre.Message = result.Zmsg;
  1370. //sre.Result = result.Ztype;
  1371. return sre;
  1372. }
  1373. }
  1374. //if (result.Ztype == "S")
  1375. {
  1376. sqlString = "update tsap_hegii_datalog t set t.createuserid = :userid where logid = :datalogid";
  1377. oracleParameter = new OracleParameter[]
  1378. {
  1379. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  1380. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  1381. };
  1382. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  1383. }
  1384. oracleConn.Commit();
  1385. //sre.Message = result.Zmsg;
  1386. //sre.Result = result.Ztype;
  1387. return sre;
  1388. }
  1389. catch (Exception ex)
  1390. {
  1391. throw ex;
  1392. }
  1393. finally
  1394. {
  1395. if (oracleConn != null &&
  1396. oracleConn.ConnState == ConnectionState.Open)
  1397. {
  1398. oracleConn.Disconnect();
  1399. }
  1400. }
  1401. }
  1402. /// <summary>
  1403. /// 产量接口
  1404. /// </summary>
  1405. /// <param name="sapParameter"></param>
  1406. /// <returns></returns>
  1407. private static Zppfm008Response HGSAPDK_ZPPFM008(Zppfm008 sapParameter, string yyyymmdd, string datacode)
  1408. {
  1409. Zppfm008Response sapResult = null;
  1410. try
  1411. {
  1412. using (ZPPFM008Client sapClient = new ZPPFM008Client("ZPPFM008_BIND"))
  1413. {
  1414. // 登录
  1415. UserNamePasswordClientCredential credential =
  1416. sapClient.ClientCredentials.UserName;
  1417. //credential.UserName = "hgsapdk";
  1418. //credential.Password = "Sapdk#240";
  1419. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.Config);
  1420. credential.UserName = ini.ReadIniData("SAP_HEGII", "UserName");
  1421. credential.Password = ini.ReadIniData("SAP_HEGII", "Password");
  1422. // 参数
  1423. sapParameter.ZsumSpecified = true;
  1424. sapParameter.TableOut = new Zspp100[0];
  1425. // 接口
  1426. sapResult = sapClient.Zppfm008(sapParameter);
  1427. // 结果
  1428. OutputLog.TraceLog(LogPriority.Information,
  1429. "HGSAPDK_ZPPFM008",
  1430. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.Zsum,
  1431. "Ztype:" + sapResult.Ztype + " Zmsg:" + sapResult.Zmsg,
  1432. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1433. }
  1434. }
  1435. catch (Exception ex)
  1436. {
  1437. sapResult = new Zppfm008Response();
  1438. sapResult.Ztype = "E";
  1439. if (ex is System.ServiceModel.FaultException)
  1440. {
  1441. sapResult.Zmsg = ex.Message;
  1442. }
  1443. else
  1444. {
  1445. sapResult.Zmsg = "DKMES-ERROR:" + Guid.NewGuid();
  1446. }
  1447. OutputLog.TraceLog(LogPriority.Error,
  1448. "HGSAPDK_ZPPFM008",
  1449. sapResult.Zmsg,
  1450. ex.ToString(),
  1451. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1452. }
  1453. return sapResult;
  1454. }
  1455. /// <summary>
  1456. /// 成品明细(条码接口)
  1457. /// </summary>
  1458. /// <param name="user"></param>
  1459. private static ZPPFM010Response HGSAPDK_ZPPFM010(Zppfm010 sapParameter, string yyyymmdd)
  1460. {
  1461. ZPPFM010Response sapResult = null;
  1462. try
  1463. {
  1464. using (ZPPFM010Client sapClient = new ZPPFM010Client("ZPPFM010_BIND"))
  1465. {
  1466. // 登录
  1467. UserNamePasswordClientCredential credential =
  1468. sapClient.ClientCredentials.UserName;
  1469. //credential.UserName = "hgsapdk";
  1470. //credential.Password = "Sapdk#240";
  1471. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.Config);
  1472. credential.UserName = ini.ReadIniData("SAP_HEGII", "UserName");
  1473. credential.Password = ini.ReadIniData("SAP_HEGII", "Password");
  1474. // 参数
  1475. sapParameter.ZSUMSpecified = true;
  1476. sapParameter.TABLE_OUT = new ZSPP110[0];
  1477. // 接口
  1478. sapResult = sapClient.ZPPFM010(sapParameter);
  1479. // 结果
  1480. OutputLog.TraceLog(LogPriority.Information,
  1481. "HGSAPDK_ZPPFM010",
  1482. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM,
  1483. "Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  1484. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1485. }
  1486. }
  1487. catch (Exception ex)
  1488. {
  1489. sapResult = new ZPPFM010Response();
  1490. sapResult.ZTYPE = "E";
  1491. if (ex is System.ServiceModel.FaultException)
  1492. {
  1493. sapResult.ZMSG = ex.Message;
  1494. }
  1495. else
  1496. {
  1497. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  1498. }
  1499. OutputLog.TraceLog(LogPriority.Error,
  1500. "HGSAPDK_ZPPFM010",
  1501. sapResult.ZMSG,
  1502. ex.ToString(),
  1503. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1504. }
  1505. return sapResult;
  1506. }
  1507. #region 测试
  1508. /// <summary>
  1509. /// 同步成品条码(手动)-测试
  1510. /// </summary>
  1511. /// <param name="date"></param>
  1512. /// <param name="userid"></param>
  1513. /// <returns></returns>
  1514. public static ServiceResultEntity SetFP6001_1(DateTime date, int userid)
  1515. {
  1516. /*
  1517. Zppfm008 sapParameter1 = new Zppfm008();
  1518. sapParameter1.Zsum = 0;
  1519. sapParameter1.TableIn = new Zspp100[0];
  1520. Zppfm010 sapParameter2 = new Zppfm010();
  1521. sapParameter2.ZSUM = 30;
  1522. sapParameter2.TABLE_IN = new ZSPP110[30];
  1523. for (int i = 0; i < 10; i++)
  1524. {
  1525. ZSPP110 info110 = new ZSPP110();
  1526. // 时间戳
  1527. info110.ZSCNU = "20170101";
  1528. // 工厂
  1529. info110.WERKS = "5020";
  1530. // 生产条码
  1531. info110.ZSCTM = "20170101" + i.ToString().PadLeft(3, '0');
  1532. // 包装条码
  1533. info110.ZBZTM = "CT127PD2110B0150" + info110.ZSCTM + "1";
  1534. // 产品编码
  1535. info110.ZCPBM = "H0112L";
  1536. // 物料编号
  1537. info110.MATNR = "CT127PD2110B01";
  1538. // 包装整板标识
  1539. info110.ZBZBS = "1-1-1";
  1540. // 重新绑定标识
  1541. info110.ZCXBD = "X";
  1542. // 销售凭证
  1543. info110.KDAUF = "1200032630";
  1544. // 销售凭证项目
  1545. info110.KDPOS = "10";
  1546. sapParameter2.TABLE_IN[i] = info110;
  1547. }
  1548. for (int i = 10; i < 20; i++)
  1549. {
  1550. ZSPP110 info110 = new ZSPP110();
  1551. // 时间戳
  1552. info110.ZSCNU = "20170101";
  1553. // 工厂
  1554. info110.WERKS = "5020";
  1555. // 生产条码
  1556. info110.ZSCTM = "20170101" + i.ToString().PadLeft(3, '0');
  1557. // 包装条码
  1558. info110.ZBZTM = "CT127PD2110B0150" + info110.ZSCTM + "1";
  1559. // 产品编码
  1560. info110.ZCPBM = "H0112L";
  1561. // 物料编号
  1562. info110.MATNR = "CT127PD2110B01";
  1563. // 包装整板标识
  1564. info110.ZBZBS = "1-1-1";
  1565. // 重新绑定标识
  1566. info110.ZCXBD = "";
  1567. // 销售凭证
  1568. info110.KDAUF = "1200030151";
  1569. // 销售凭证项目
  1570. info110.KDPOS = "10";
  1571. sapParameter2.TABLE_IN[i] = info110;
  1572. }
  1573. for (int i = 20; i < 30; i++)
  1574. {
  1575. ZSPP110 info110 = new ZSPP110();
  1576. // 时间戳
  1577. info110.ZSCNU = "20170101";
  1578. // 工厂
  1579. info110.WERKS = "5020";
  1580. // 生产条码
  1581. info110.ZSCTM = "20170101" + i.ToString().PadLeft(3, '0');
  1582. // 包装条码
  1583. info110.ZBZTM = "CT967ES2210N0150" + info110.ZSCTM + "1";
  1584. // 产品编码
  1585. info110.ZCPBM = "H0112L";
  1586. // 物料编号
  1587. info110.MATNR = "CT967ES2210N01";
  1588. // 包装整板标识
  1589. info110.ZBZBS = "1-1-1";
  1590. // 重新绑定标识
  1591. info110.ZCXBD = "";
  1592. // 销售凭证
  1593. info110.KDAUF = "1200032678";
  1594. // 销售凭证项目
  1595. info110.KDPOS = "10";
  1596. sapParameter2.TABLE_IN[i] = info110;
  1597. }
  1598. */
  1599. //HGSAPDK_ZPPFM008(sapParameter1, date.ToString("yyyyMMdd"), "800");
  1600. //HGSAPDK_ZPPFM008_240(sapParameter1, date.ToString("yyyyMMdd"), "240");
  1601. //HGSAPDK_ZPPFM010(sapParameter2, date.ToString("yyyyMMdd"));
  1602. //ZPPFM010Response result1 = HGSAPDK_ZPPFM010_240(sapParameter2, date.ToString("yyyyMMdd"));
  1603. //foreach (ZSPP110 item in result1.TABLE_OUT)
  1604. //{
  1605. // if (item.ZTYPE != "S" && !string.IsNullOrWhiteSpace(item.ZMSG))
  1606. // {
  1607. // OutputLog.TraceLog(LogPriority.Information,
  1608. // "HGSAPDK_ZPPFM010_240", JsonHelper.ToJson(item),
  1609. // "Ztype:" + item.ZTYPE + " Zmsg:" + item.ZMSG,
  1610. // LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1611. // }
  1612. //}
  1613. return new ServiceResultEntity();
  1614. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  1615. ServiceResultEntity sre = new ServiceResultEntity();
  1616. date = new DateTime(2019, 1, 11);
  1617. DateTime dateend = date;
  1618. INIUtility ini = INIUtility.Instance(INIUtility.IniFile.Config);
  1619. string EndDate6001 = ini.ReadIniData("SAP_HEGII", "EndDate6001");
  1620. DateTime end = DateTime.Now.Date.AddDays(-1);
  1621. if (!string.IsNullOrWhiteSpace(EndDate6001))
  1622. {
  1623. end = DateTime.ParseExact(EndDate6001, "yyyy-MM-dd", null);
  1624. }
  1625. try
  1626. {
  1627. //string sqlString =
  1628. // "select fp.yyyymmdd\n" +
  1629. // " ,fp.workcode\n" +
  1630. // " ,fp.barcode\n" +
  1631. // " ,fp.outcode\n" +
  1632. // " ,fp.goodscode\n" +
  1633. // " ,fp.sapcode\n" +
  1634. // " ,fp.sapflbatchno\n" +
  1635. // " ,fp.sapfhundoflag\n" +
  1636. // " from tsap_hegii_finishedproduct fp where fp.logid = :datalogid";
  1637. string sqlString = "select to_char(fp.fhtime, 'yyyymmdd') yyyymmdd\n" +
  1638. " ,aa.workcode workcode\n" +
  1639. " ,fp.barcode\n" +
  1640. " ,case when length(gdd.onlycode) = 7 then gdd.materialcode || 'FF' || gdd.onlycode else nvl(gdd.outlabelcode\n" +
  1641. " ,(gdd.materialcode || aa.workcode || gdd.onlycode)) end outcode\n" +
  1642. " ,gdd.goodscode\n" +
  1643. " ,nvl(gdd.materialcode, nvl(g.materialcode, g.goodscode)) sapcode\n" +
  1644. " ,nvl(fp.finishedloadbatchno, fp.fhbatchno) sapflbatchno\n" +
  1645. " ,' ' sapfhundoflag\n" +
  1646. " from tp_pm_finishedproduct fp\n" +
  1647. " inner join tp_pm_groutingdailydetail gdd\n" +
  1648. " on gdd.barcode = fp.barcode\n" +
  1649. " inner join tp_mst_goods g\n" +
  1650. " on g.goodsid = gdd.goodsid\n" +
  1651. " inner join tp_mst_account aa\n" +
  1652. " on aa.accountid = gdd.accountid\n" +
  1653. " where fp.fhtime >= :v_datebegin\n" +
  1654. " and fp.fhtime < :v_dateend\n" +
  1655. " order by fp.fhtime,fp.barcode";
  1656. while (date <= end)
  1657. {
  1658. dateend = date.AddDays(1);
  1659. OracleParameter[] oracleParameter = new OracleParameter[]
  1660. {
  1661. new OracleParameter(":v_datebegin",OracleDbType.Date, date, ParameterDirection.Input),
  1662. new OracleParameter(":v_dateend",OracleDbType.Date, dateend, ParameterDirection.Input),
  1663. };
  1664. DataTable fpData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  1665. // 单次传输最大条数
  1666. int maxCount = 10000;
  1667. List<Zppfm010> sapParameterList = new List<Zppfm010>();
  1668. if (fpData != null && fpData.Rows.Count > 0)
  1669. {
  1670. int index = 0;
  1671. List<ZSPP110> tableInList = new List<ZSPP110>();
  1672. foreach (DataRow item in fpData.Rows)
  1673. {
  1674. if (index >= maxCount)
  1675. {
  1676. Zppfm010 sapItem = new Zppfm010();
  1677. sapItem.ZSUM = tableInList.Count;
  1678. sapItem.TABLE_IN = tableInList.ToArray();
  1679. sapParameterList.Add(sapItem);
  1680. index = 0;
  1681. tableInList.Clear();
  1682. }
  1683. ZSPP110 info110 = new ZSPP110();
  1684. // 时间戳
  1685. info110.ZSCNU = item["yyyymmdd"].ToString();
  1686. // 工厂
  1687. info110.WERKS = item["workcode"].ToString();
  1688. // 生产条码
  1689. info110.ZSCTM = item["barcode"].ToString();
  1690. // 包装条码
  1691. info110.ZBZTM = item["outcode"].ToString();
  1692. // 产品编码
  1693. info110.ZCPBM = item["goodscode"].ToString();
  1694. // 物料编号
  1695. info110.MATNR = item["sapcode"].ToString();
  1696. // 包装整板标识
  1697. info110.ZBZBS = item["sapflbatchno"].ToString();
  1698. // 重新绑定标识
  1699. info110.ZCXBD = item["sapfhundoflag"].ToString();
  1700. if (info110.WERKS == "5011" && info110.ZCPBM == "K047L")
  1701. {
  1702. continue;
  1703. }
  1704. tableInList.Add(info110);
  1705. index++;
  1706. }
  1707. Zppfm010 sapParameter = new Zppfm010();
  1708. sapParameter.ZSUM = tableInList.Count;
  1709. sapParameter.TABLE_IN = tableInList.ToArray();
  1710. sapParameterList.Add(sapParameter);
  1711. index = 0;
  1712. tableInList.Clear();
  1713. }
  1714. else
  1715. {
  1716. Zppfm010 sapParameter = new Zppfm010();
  1717. sapParameter.ZSUM = 0;
  1718. sapParameter.TABLE_IN = new ZSPP110[sapParameter.ZSUM];
  1719. sapParameterList.Add(sapParameter);
  1720. }
  1721. int indexP = 0;
  1722. int ccc = sapParameterList.Count;
  1723. foreach (Zppfm010 sapParameter in sapParameterList)
  1724. //for (int i = 80; i < ccc; i++)
  1725. {
  1726. //Zppfm010 sapParameter = sapParameterList[i];
  1727. ZPPFM010Response result = HGSAPDK_ZPPFM010(sapParameter, date.ToString("yyyyMMdd") + " " + (++indexP) + "/" + ccc);
  1728. //Zppfm010Response result = HGSAPDK_ZPPFM010(sapParameter, "2018 " + (i) + "/" + ccc);
  1729. sre.Message = result.ZMSG;
  1730. sre.Result = result.ZTYPE;
  1731. if (result.ZTYPE != "S")
  1732. {
  1733. foreach (ZSPP110 item in result.TABLE_OUT)
  1734. {
  1735. if (item.ZTYPE != "S" && !string.IsNullOrWhiteSpace(item.ZMSG))
  1736. {
  1737. OutputLog.TraceLog(LogPriority.Information,
  1738. "HGSAPDK_ZPPFM010", JsonHelper.ToJson(item),
  1739. "Ztype:" + item.ZTYPE + " Zmsg:" + item.ZMSG,
  1740. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1741. }
  1742. }
  1743. return sre;
  1744. }
  1745. }
  1746. date = dateend;
  1747. }
  1748. oracleConn.Commit();
  1749. //sre.Message = result.Zmsg;
  1750. //sre.Result = result.Ztype;
  1751. return sre;
  1752. }
  1753. catch (Exception ex)
  1754. {
  1755. throw ex;
  1756. }
  1757. finally
  1758. {
  1759. if (oracleConn != null &&
  1760. oracleConn.ConnState == ConnectionState.Open)
  1761. {
  1762. oracleConn.Disconnect();
  1763. }
  1764. }
  1765. }
  1766. /// <summary>
  1767. /// 产量接口-测试
  1768. /// </summary>
  1769. /// <param name="sapParameter"></param>
  1770. /// <returns></returns>
  1771. private static Zppfm008Response HGSAPDK_ZPPFM008_240(Zppfm008 sapParameter, string yyyymmdd, string datacode)
  1772. {
  1773. Zppfm008Response sapResult = null;
  1774. try
  1775. {
  1776. using (ZPPFM008Client sapClient = new ZPPFM008Client("ZPPFM008_BIND_240"))
  1777. {
  1778. // 登录
  1779. UserNamePasswordClientCredential credential =
  1780. sapClient.ClientCredentials.UserName;
  1781. credential.UserName = "hgsapdk";
  1782. credential.Password = "Sapdk#240";
  1783. // 参数
  1784. sapParameter.ZsumSpecified = true;
  1785. sapParameter.TableOut = new Zspp100[0];
  1786. // 接口
  1787. sapResult = sapClient.Zppfm008(sapParameter);
  1788. // 结果
  1789. OutputLog.TraceLog(LogPriority.Information,
  1790. "HGSAPDK_ZPPFM008_240",
  1791. "yyyymmdd:" + yyyymmdd + " datacode:" + datacode + " Zsum:" + sapParameter.Zsum,
  1792. "Ztype:" + sapResult.Ztype + " Zmsg:" + sapResult.Zmsg,
  1793. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1794. }
  1795. }
  1796. catch (Exception ex)
  1797. {
  1798. sapResult = new Zppfm008Response();
  1799. sapResult.Ztype = "E";
  1800. if (ex is System.ServiceModel.FaultException)
  1801. {
  1802. sapResult.Zmsg = ex.Message;
  1803. }
  1804. else
  1805. {
  1806. sapResult.Zmsg = "DKMES-ERROR:" + Guid.NewGuid();
  1807. }
  1808. OutputLog.TraceLog(LogPriority.Error,
  1809. "HGSAPDK_ZPPFM008_240",
  1810. sapResult.Zmsg,
  1811. ex.ToString(),
  1812. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1813. }
  1814. return sapResult;
  1815. }
  1816. /// <summary>
  1817. /// 成品明细(条码接口)-测试
  1818. /// </summary>
  1819. /// <param name="user"></param>
  1820. private static ZPPFM010Response HGSAPDK_ZPPFM010_240(Zppfm010 sapParameter, string yyyymmdd)
  1821. {
  1822. ZPPFM010Response sapResult = null;
  1823. try
  1824. {
  1825. using (ZPPFM010Client sapClient = new ZPPFM010Client("ZPPFM010_BIND_240"))
  1826. {
  1827. // 登录
  1828. UserNamePasswordClientCredential credential =
  1829. sapClient.ClientCredentials.UserName;
  1830. credential.UserName = "hgsapdk";
  1831. credential.Password = "Sapdk#240";
  1832. // 参数
  1833. sapParameter.ZSUMSpecified = true;
  1834. sapParameter.TABLE_OUT = new ZSPP110[0];
  1835. // 接口
  1836. sapResult = sapClient.ZPPFM010(sapParameter);
  1837. // 结果
  1838. OutputLog.TraceLog(LogPriority.Information,
  1839. "HGSAPDK_ZPPFM010_240",
  1840. "yyyymmdd:" + yyyymmdd + " Zsum:" + sapParameter.ZSUM,
  1841. "Ztype:" + sapResult.ZTYPE + " Zmsg:" + sapResult.ZMSG,
  1842. LocalPath.LogExePath + "SAP_HEGII\\Info_");
  1843. }
  1844. }
  1845. catch (Exception ex)
  1846. {
  1847. sapResult = new ZPPFM010Response();
  1848. sapResult.ZTYPE = "E";
  1849. if (ex is System.ServiceModel.FaultException)
  1850. {
  1851. sapResult.ZMSG = ex.Message;
  1852. }
  1853. else
  1854. {
  1855. sapResult.ZMSG = "DKMES-ERROR:" + Guid.NewGuid();
  1856. }
  1857. OutputLog.TraceLog(LogPriority.Error,
  1858. "HGSAPDK_ZPPFM010_240",
  1859. sapResult.ZMSG,
  1860. ex.ToString(),
  1861. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1862. }
  1863. return sapResult;
  1864. }
  1865. #endregion
  1866. /// <summary>
  1867. /// 同步SAP数据(自动)
  1868. /// </summary>
  1869. /// <param name="date"></param>
  1870. public static void AutoWorkDataToSAP(DateTime date, string funCode)
  1871. {
  1872. if (string.IsNullOrWhiteSpace(funCode))
  1873. {
  1874. //return;
  1875. funCode = "ALL";
  1876. }
  1877. funCode = "," + funCode + ",";
  1878. ServiceResultEntity sre = null;
  1879. // 10 模具
  1880. if (funCode == ",ALL," || funCode.Contains(",10,"))
  1881. {
  1882. try
  1883. {
  1884. sre = SetWorkData10_50(date, "10", 0);
  1885. if (sre.Status != Constant.ServiceResultStatus.Success ||
  1886. "S" != sre.Result + "")
  1887. {
  1888. OutputLog.TraceLog(LogPriority.Warning,
  1889. "AutoWorkDataToSAP",
  1890. "10 模具 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1891. JsonHelper.ToJson(sre),
  1892. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  1893. }
  1894. }
  1895. catch (Exception ex)
  1896. {
  1897. OutputLog.TraceLog(LogPriority.Error,
  1898. "AutoWorkDataToSAP",
  1899. "10 模具 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1900. ex.ToString(),
  1901. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1902. }
  1903. }
  1904. // 20 湿坯
  1905. if (funCode == ",ALL," || funCode.Contains(",20,"))
  1906. {
  1907. try
  1908. {
  1909. sre = SetWorkData10_50(date, "20", 0);
  1910. if (sre.Status != Constant.ServiceResultStatus.Success ||
  1911. "S" != sre.Result + "")
  1912. {
  1913. OutputLog.TraceLog(LogPriority.Warning,
  1914. "AutoWorkDataToSAP",
  1915. "20 湿坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1916. JsonHelper.ToJson(sre),
  1917. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  1918. }
  1919. }
  1920. catch (Exception ex)
  1921. {
  1922. OutputLog.TraceLog(LogPriority.Error,
  1923. "AutoWorkDataToSAP",
  1924. "20 湿坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1925. ex.ToString(),
  1926. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1927. }
  1928. }
  1929. // 30 精坯
  1930. if (funCode == ",ALL," || funCode.Contains(",30,"))
  1931. {
  1932. try
  1933. {
  1934. sre = SetWorkData10_50(date, "30", 0);
  1935. if (sre.Status != Constant.ServiceResultStatus.Success ||
  1936. "S" != sre.Result + "")
  1937. {
  1938. OutputLog.TraceLog(LogPriority.Warning,
  1939. "AutoWorkDataToSAP",
  1940. "30 精坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1941. JsonHelper.ToJson(sre),
  1942. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  1943. }
  1944. }
  1945. catch (Exception ex)
  1946. {
  1947. OutputLog.TraceLog(LogPriority.Error,
  1948. "AutoWorkDataToSAP",
  1949. "30 精坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1950. ex.ToString(),
  1951. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1952. }
  1953. }
  1954. // 40 釉坯
  1955. if (funCode == ",ALL," || funCode.Contains(",40,"))
  1956. {
  1957. try
  1958. {
  1959. sre = SetWorkData10_50(date, "40", 0);
  1960. if (sre.Status != Constant.ServiceResultStatus.Success ||
  1961. "S" != sre.Result + "")
  1962. {
  1963. OutputLog.TraceLog(LogPriority.Warning,
  1964. "AutoWorkDataToSAP",
  1965. "40 釉坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1966. JsonHelper.ToJson(sre),
  1967. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  1968. }
  1969. }
  1970. catch (Exception ex)
  1971. {
  1972. OutputLog.TraceLog(LogPriority.Error,
  1973. "AutoWorkDataToSAP",
  1974. "40 釉坯 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1975. ex.ToString(),
  1976. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  1977. }
  1978. }
  1979. // 50 烧成
  1980. if (funCode == ",ALL," || funCode.Contains(",50,"))
  1981. {
  1982. try
  1983. {
  1984. sre = SetWorkData10_50(date, "50", 0);
  1985. if (sre.Status != Constant.ServiceResultStatus.Success ||
  1986. "S" != sre.Result + "")
  1987. {
  1988. OutputLog.TraceLog(LogPriority.Warning,
  1989. "AutoWorkDataToSAP",
  1990. "50 烧成 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  1991. JsonHelper.ToJson(sre),
  1992. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  1993. }
  1994. }
  1995. catch (Exception ex)
  1996. {
  1997. OutputLog.TraceLog(LogPriority.Error,
  1998. "AutoWorkDataToSAP",
  1999. "50 烧成 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  2000. ex.ToString(),
  2001. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2002. }
  2003. }
  2004. // 6001 成品明细
  2005. if (funCode == ",ALL," || funCode.Contains(",6001,"))
  2006. {
  2007. try
  2008. {
  2009. sre = SetFP6001(date, 0);
  2010. if (sre.Status != Constant.ServiceResultStatus.Success ||
  2011. "S" != sre.Result + "")
  2012. {
  2013. OutputLog.TraceLog(LogPriority.Warning,
  2014. "AutoWorkDataToSAP",
  2015. "6001 成品明细 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  2016. JsonHelper.ToJson(sre),
  2017. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  2018. }
  2019. }
  2020. catch (Exception ex)
  2021. {
  2022. OutputLog.TraceLog(LogPriority.Error,
  2023. "AutoWorkDataToSAP",
  2024. "6001 成品明细 " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  2025. ex.ToString(),
  2026. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2027. }
  2028. }
  2029. // 6001 成品明细(小时)-20分钟
  2030. if (funCode == ",6002,")
  2031. {
  2032. try
  2033. {
  2034. sre = SetFP6002(date, 0);
  2035. if (sre.Status != Constant.ServiceResultStatus.Success ||
  2036. "S" != sre.Result + "")
  2037. {
  2038. OutputLog.TraceLog(LogPriority.Warning,
  2039. "AutoWorkDataToSAP",
  2040. "6002 成品明细(小时) " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  2041. JsonHelper.ToJson(sre),
  2042. LocalPath.LogExePath + "SAP_HEGII\\Warn_");
  2043. }
  2044. }
  2045. catch (Exception ex)
  2046. {
  2047. OutputLog.TraceLog(LogPriority.Error,
  2048. "AutoWorkDataToSAP",
  2049. "6002 成品明细(小时) " + date.ToString("yyyy-MM-dd HH:mm:ss"),
  2050. ex.ToString(),
  2051. LocalPath.LogExePath + "SAP_HEGII\\Error_");
  2052. }
  2053. }
  2054. }
  2055. /*
  2056. public static ServiceResultEntity AutoWorkData(DateTime date)
  2057. {
  2058. IDBTransaction oracleConn = ClsDbFactory.CreateDBTransaction(DataBaseType.ORACLE, DataManager.ConnectionString);
  2059. ServiceResultEntity sre = new ServiceResultEntity();
  2060. try
  2061. {
  2062. string yyyymmdd = date.ToString("yyyyMMdd");
  2063. string sqlString =
  2064. "select t.logid, t.datacode\n" +
  2065. " from tsap_hegii_datalog t\n" +
  2066. " where t.logtype = '1'\n" +
  2067. " and t.datastuts = 'S'\n" +
  2068. " and t.yyyymmdd = :yyyymmdd\n" +
  2069. " and t.createuserid is null for update";
  2070. OracleParameter[] oracleParameter = new OracleParameter[]
  2071. {
  2072. new OracleParameter(":yyyymmdd",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  2073. };
  2074. DataTable datalog = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  2075. if (datalog == null || datalog.Rows.Count == 0)
  2076. {
  2077. sre.Result = 0;
  2078. return sre;
  2079. }
  2080. sqlString = "select workcode from tp_mst_account where rownum = 1";
  2081. string workcode = oracleConn.GetSqlResultToStr(sqlString);
  2082. Zppfm008 sapParameter = new Zppfm008();
  2083. List<Zspp100> info = new List<Zspp100>();
  2084. foreach (DataRow item in datalog.Rows)
  2085. {
  2086. string datacode = item["datacode"].ToString();
  2087. logid = oracleConn.GetSqlResultToStr("select SEQ_SAP_HEGII_DataLog_ID.Nextval from dual");
  2088. string msg = null;
  2089. //string msg = "data:" + datebegin.ToString("yyyyMMdd-HHm") + "~" +
  2090. // dateend.ToString("yyyyMMdd-HHmm");
  2091. sqlString = "insert into tsap_hegii_datalog\n" +
  2092. " (LogID\n" +
  2093. " ,LogType\n" +
  2094. " ,BeginTime\n" +
  2095. " ,YYYYMMDD\n" +
  2096. " ,WorkCode\n" +
  2097. " ,DataCode\n" +
  2098. " ,DataStuts\n" +
  2099. " ,DataMSG\n" +
  2100. " ,CreateUserID\n" +
  2101. " ,DataLogID)\n" +
  2102. "values\n" +
  2103. " (:LogID\n" +
  2104. " ,'2'\n" +
  2105. " ,sysdate\n" +
  2106. " ,:YYYYMMDD\n" +
  2107. " ,:WorkCode\n" +
  2108. " ,:DataCode\n" +
  2109. " ,:DataStuts\n" +
  2110. " ,:DataMSG\n" +
  2111. " ,:CreateUserID\n" +
  2112. " ,:DataLogID)";
  2113. int r = 0;
  2114. if (string.IsNullOrEmpty(datalogid))
  2115. {
  2116. oracleParameter = new OracleParameter[]
  2117. {
  2118. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  2119. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  2120. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  2121. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  2122. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  2123. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg + " DKMES-ERROR:NO DATA", ParameterDirection.Input),
  2124. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "E", ParameterDirection.Input),
  2125. new OracleParameter(":DataLogID",OracleDbType.Int32, 0, ParameterDirection.Input),
  2126. };
  2127. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  2128. sre.Status = Constant.ServiceResultStatus.Other;
  2129. sre.Message = "没有同步数据";
  2130. sre.Result = "E";
  2131. return sre;
  2132. }
  2133. oracleParameter = new OracleParameter[]
  2134. {
  2135. new OracleParameter(":LogID",OracleDbType.Int32, logid, ParameterDirection.Input),
  2136. new OracleParameter(":CreateUserID",OracleDbType.Int32, userid, ParameterDirection.Input),
  2137. new OracleParameter(":YYYYMMDD",OracleDbType.Varchar2, yyyymmdd, ParameterDirection.Input),
  2138. new OracleParameter(":WorkCode",OracleDbType.Varchar2, workcode, ParameterDirection.Input),
  2139. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  2140. new OracleParameter(":DataMSG",OracleDbType.Varchar2, msg, ParameterDirection.Input),
  2141. new OracleParameter(":DataStuts",OracleDbType.Varchar2, "S", ParameterDirection.Input),
  2142. new OracleParameter(":DataLogID",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  2143. };
  2144. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  2145. sqlString =
  2146. "select fp.yyyymmdd\n" +
  2147. " ,fp.workcode\n" +
  2148. " ,fp.DataCode\n" +
  2149. " ,fp.GoodsCode\n" +
  2150. " ,fp.SAPCode\n" +
  2151. " ,fp.UserCode\n" +
  2152. " ,fp.ORDERCODE\n" +
  2153. " ,fp.ORDERITEM\n" +
  2154. " ,fp.OutputNum\n" +
  2155. " ,fp.ScrapNum\n" +
  2156. " ,fp.CleanupNum\n" +
  2157. " ,fp.RecoveryNum\n" +
  2158. " ,fp.RepairNum\n" +
  2159. " from tsap_hegii_workdata wd where wd.logid = :datalogid";
  2160. oracleParameter = new OracleParameter[]
  2161. {
  2162. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  2163. };
  2164. DataTable workData = oracleConn.GetSqlResultToDt(sqlString, oracleParameter);
  2165. if (workData != null && workData.Rows.Count > 0)
  2166. {
  2167. sapParameter.Zsum = workData.Rows.Count;
  2168. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  2169. int index = 0;
  2170. foreach (DataRow item in workData.Rows)
  2171. {
  2172. Zspp100 info100 = new Zspp100();
  2173. // 工厂
  2174. info100.Werks = workcode;
  2175. // 型号
  2176. info100.Groes = item["GoodsCode"].ToString();
  2177. // 物料编号
  2178. info100.Matnr = item["SAPCode"].ToString();
  2179. // 生产工号
  2180. info100.Zghnu = item["UserCode"].ToString();
  2181. // 数据节点
  2182. info100.Zjdnu = item["DataCode"].ToString();
  2183. // 时间戳
  2184. info100.Zscnu = yyyymmdd;
  2185. // 销售凭证
  2186. info100.Vbeln = item["ORDERCODE"].ToString();
  2187. // 销售凭证项目
  2188. info100.Posnr = item["ORDERITEM"].ToString();
  2189. // 产量
  2190. info100.Zclng = item["OutputNum"].ToString();
  2191. // 损坯
  2192. info100.Zspng = item["SCRAPNUM"].ToString();
  2193. // 清除
  2194. info100.Zqcng = item["CLEANUPNUM"].ToString();
  2195. // 回收
  2196. info100.Zhsng = item["RECOVERYNUM"].ToString();
  2197. // 干补
  2198. info100.Zgbng = item["REPAIRNUM"].ToString();
  2199. sapParameter.TableIn[index++] = info100;
  2200. }
  2201. }
  2202. else
  2203. {
  2204. sapParameter.Zsum = 0;
  2205. sapParameter.TableIn = new Zspp100[sapParameter.Zsum];
  2206. }
  2207. Zppfm008Response result = HGSAPDK_ZPPFM008(sapParameter, yyyymmdd, datacode);
  2208. //if (result.Ztype == "E")
  2209. //{
  2210. // sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = 'E', DataMSG = DataMSG||:msg where logid = :logid";
  2211. // oracleParameter = new OracleParameter[]
  2212. // {
  2213. // new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  2214. // new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  2215. // };
  2216. // r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  2217. //}
  2218. //else
  2219. {
  2220. sqlString = "update tsap_hegii_datalog t set t.EndTime = sysdate, DataStuts = :DataStuts, DataMSG = DataMSG||:msg where logid = :logid";
  2221. oracleParameter = new OracleParameter[]
  2222. {
  2223. new OracleParameter(":DataStuts",OracleDbType.Varchar2, result.Ztype, ParameterDirection.Input),
  2224. new OracleParameter(":msg",OracleDbType.Varchar2, result.Zmsg, ParameterDirection.Input),
  2225. new OracleParameter(":logid",OracleDbType.Int32, logid, ParameterDirection.Input),
  2226. };
  2227. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  2228. if (result.Ztype == "S")
  2229. {
  2230. sqlString = "update tsap_hegii_datalog t set t.createtime = :userid where logid = :datalogid";
  2231. oracleParameter = new OracleParameter[]
  2232. {
  2233. new OracleParameter(":datalogid",OracleDbType.Int32, datalogid, ParameterDirection.Input),
  2234. new OracleParameter(":userid",OracleDbType.Int32, userid, ParameterDirection.Input),
  2235. };
  2236. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  2237. }
  2238. if (result.TableOut != null && result.TableOut.Length > 0)
  2239. {
  2240. sqlString = "update TSAP_HEGII_WorkData t set t.ZTime =sysdate, ZTYPE = :ZTYPE, ZMSG = :ZMSG where logid = " + logid +
  2241. " \n and YYYYMMDD='" + yyyymmdd + "' and WorkCode='" + workcode +
  2242. "' and DataCode=:DataCode and GoodsCode=:GoodsCode and SAPCode=:SAPCode and UserCode=:UserCode \n" +
  2243. "and OrderCode=:OrderCode and OrderItem=:OrderItem";
  2244. foreach (Zspp100 item in result.TableOut)
  2245. {
  2246. oracleParameter = new OracleParameter[]
  2247. {
  2248. new OracleParameter(":ZTYPE",OracleDbType.Varchar2, item.Ztype, ParameterDirection.Input),
  2249. new OracleParameter(":ZMSG",OracleDbType.Varchar2, item.Zmsg, ParameterDirection.Input),
  2250. new OracleParameter(":DataCode",OracleDbType.Varchar2, datacode, ParameterDirection.Input),
  2251. new OracleParameter(":GoodsCode",OracleDbType.Varchar2, item.Groes, ParameterDirection.Input),
  2252. new OracleParameter(":SAPCode",OracleDbType.Varchar2, item.Matnr, ParameterDirection.Input),
  2253. new OracleParameter(":UserCode",OracleDbType.Varchar2, item.Zghnu, ParameterDirection.Input),
  2254. new OracleParameter(":OrderCode",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.Vbeln)? " " : item.Vbeln), ParameterDirection.Input),
  2255. new OracleParameter(":OrderItem",OracleDbType.Varchar2, (string.IsNullOrEmpty(item.Posnr)? " " : item.Posnr), ParameterDirection.Input),
  2256. };
  2257. r = oracleConn.ExecuteNonQuery(sqlString, oracleParameter);
  2258. }
  2259. }
  2260. }
  2261. oracleConn.Commit();
  2262. sre.Message = result.Zmsg;
  2263. sre.Result = result.Ztype;
  2264. return sre;
  2265. }
  2266. catch (Exception ex)
  2267. {
  2268. throw ex;
  2269. }
  2270. }
  2271. */
  2272. }
  2273. }