FrmRunTimeRptCw.xml 27 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "运行年月收发存">
  3. <query id = "FrmRunTimeRptCw.getOriginalLast" desc = "获取期初重量">
  4. <![CDATA[
  5. select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  6. sum(nvl(t.ACT_COUNT,0))count,
  7. sum(nvl(t.ACT_WEIGHT, 0)) weight
  8. from ydm_zc_initial t
  9. where 1=1 and t.HANDLE_LOG = '1' and t.BAL_YEAR_MONTH LIKE '%'||?||'%'
  10. --and T.JUDGE_STOVE_NO = '012602'
  11. #condtions#
  12. ]]>
  13. </query>
  14. <query id = "FrmRunTimeRptCw.getThisIn" desc = "本期入库量">
  15. <![CDATA[
  16. select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  17. nvl(sum(case
  18. when t.BAL_YEAR_MONTH = ? then
  19. nvl(t.count, 0)
  20. end),
  21. 0) weight_monthcount,
  22. nvl(sum(case
  23. when t.BAL_YEAR_MONTH = ? then
  24. nvl(t.weight, 0)
  25. end),
  26. 0) weight_month
  27. from (select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,t.BELONG_CODE,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  28. t.BAL_YEAR_MONTH,
  29. nvl(t.ACT_COUNT,0)count,
  30. nvl(t.ACT_WEIGHT, 0) weight
  31. from ydm_zc_inlist t
  32. where t.validflag = '1'
  33. and t.INSTOCK_TYPE_CODE in ('800701','800702','800704','800706','800707','800712')
  34. and t.BAL_YEAR_MONTH = ?
  35. --and T.JUDGE_STOVE_NO = '012602'
  36. #condtions#
  37. )t where 1=1
  38. ]]>
  39. </query>
  40. <query id = "FrmRunTimeRptCw.getThisOut" desc = "本期出库量">
  41. <![CDATA[
  42. select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  43. nvl(sum(case
  44. when t.BAL_YEAR_MONTH = ? then
  45. nvl(t.count, 0)
  46. end),
  47. 0) weight_monthcount,
  48. nvl(sum(case
  49. when t.BAL_YEAR_MONTH = ? then
  50. nvl(t.weight, 0)
  51. end),
  52. 0) weight_month
  53. from (select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,t.BELONG_CODE,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  54. t.BAL_YEAR_MONTH,
  55. nvl(t.ACT_COUNT,0)count,
  56. case when t.PONDER_NO is null
  57. then nvl(t.ACT_WEIGHT, 0)
  58. else nvl(t.PONDER_GROSS_WT, 0) end as weight
  59. from ydm_zc_outlist t
  60. where t.OUTSTOCK_TYPE_CODE in ('800805','800804','800802','800808','800806','800812')
  61. and t.validflag = '1'
  62. --and T.JUDGE_STOVE_NO = '012602'
  63. and t.BAL_YEAR_MONTH = ?
  64. #condtions#
  65. )t where 1=1
  66. ]]>
  67. </query>
  68. <query id = "FrmRunTimeRptCw.getAdjust" desc = "本期调差量">
  69. <![CDATA[
  70. select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  71. sum(nvl(t.weight, 0)) aweight
  72. from (select t.JUDGE_STOVE_NO,t.BATCH_NO,t.BATCH_GROUD_NO,t.BELONG_CODE,T.PRODUCNAME,T.STD_STYLE_DESC,T.STEELNAME,T.SPEC_NAME,T.MODEL_DESC,
  73. nvl(t.ACT_WEIGHT, 0) weight
  74. from ydm_zc_stocktakinglist t
  75. where 1=1
  76. and t.VALIDFLAG = '1'
  77. and t.BAL_YEAR_MONTH = ?
  78. --and T.JUDGE_STOVE_NO = '012602'
  79. #condtions#)t where 1=1
  80. ]]>
  81. </query>
  82. <query id = "FrmRunTimeRptCw.insertTal" desc = "中转期初数据">
  83. INSERT INTO YDM_ZC_TIAL(
  84. JUDGE_STOVE_NO,
  85. BATCH_NO,
  86. BATCH_GROUD_NO,
  87. ACT_COUNT,
  88. ACT_WEIGHT,
  89. ORIGINAL_DATE,
  90. BAL_YEAR_MONTH,
  91. HANDLE_LOG,
  92. ORD_PK,
  93. ORD_LN_PK,
  94. ORD_LN_DLY_PK,
  95. BELONG_CODE,
  96. BELONG_NAME)
  97. VALUES(
  98. ?,
  99. ?,
  100. ?,
  101. ?,
  102. ?,
  103. ?,
  104. ?,
  105. ?,
  106. ?,
  107. ?,
  108. ?,
  109. ?,?)
  110. </query>
  111. <query id = "FrmRunTimeRptCw.SelectMatZc" desc = "查询库存信息">
  112. <![CDATA[
  113. SELECT
  114. sum(T.Act_Count)Act_Count,
  115. sum(T.Act_Weight)Act_Weight,
  116. T.BELONG_CODE,
  117. T.BELONG_NAME
  118. --T.Ord_Pk,
  119. --T.Ord_Ln_Pk,
  120. --T.Ord_Ln_Dly_Pk
  121. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS B
  122. LEFT JOIN YDM_BS_STORAGE C ON C.STORAGE_NO = B.STORAGE_NO
  123. WHERE T.MAT_NO = B.MAT_NO
  124. AND T.JUDGE_STOVE_NO = ?
  125. AND T.BATCH_NO = ?
  126. AND T.BATCH_GROUD_NO = ?
  127. group by T.BELONG_CODE,
  128. T.BELONG_NAME
  129. --T.Ord_Pk,
  130. --T.Ord_Ln_Pk,
  131. --T.Ord_Ln_Dly_Pk
  132. ]]>
  133. </query>
  134. <query id = "FrmRunTimeRptCw.getTal" desc = "获取中转数据">
  135. SELECT
  136. INITIAL_ID,
  137. JUDGE_STOVE_NO,
  138. BATCH_NO,
  139. BATCH_GROUD_NO,
  140. ACT_COUNT,
  141. ACT_WEIGHT,
  142. ORIGINAL_DATE,
  143. BAL_YEAR_MONTH,
  144. DECODE(HANDLE_LOG,'0','未结转','1','已结转')HANDLE_LOG,
  145. ORD_PK,
  146. ORD_LN_PK,
  147. ORD_LN_DLY_PK,
  148. BELONG_CODE,
  149. BELONG_NAME
  150. FROM YDM_ZC_TIAL
  151. WHERE BAL_YEAR_MONTH LIKE '%'||?||'%'
  152. and JUDGE_STOVE_NO LIKE '%'||?||'%'
  153. and HANDLE_LOG = '0'
  154. </query>
  155. <query id = "FrmRunTimeRptCw.insertInital" desc = "插入期初数据">
  156. <![CDATA[
  157. INSERT INTO YDM_ZC_INITIAL(
  158. JUDGE_STD_NAME,
  159. INSTOCK_TIME,
  160. BELONG_CODE,
  161. BELONG_NAME,
  162. MEMO1,
  163. JUDGE_STOVE_NO,
  164. BATCH_NO,
  165. BATCH_GROUD_NO,
  166. MATERIAL_NO,
  167. MATERIAL_NAME,
  168. PRODUCCODE,
  169. PRODUCNAME,
  170. STEELCODE,
  171. STEELNAME,
  172. SPEC_CODE,
  173. SPEC_NAME,
  174. MODEL_CODE,
  175. MODEL_DESC,
  176. STD_CODE,
  177. STD_NAME,
  178. STD_STYLE,
  179. STD_STYLE_DESC,
  180. DIMATER,
  181. HEIGHT,
  182. LEN,
  183. LEN_MIN,
  184. LEN_MAX,
  185. ACT_COUNT,
  186. ACT_WEIGHT,
  187. STORAGE_NO,
  188. ORD_PK,
  189. ORD_LN_PK,
  190. ORD_LN_DLY_PK,
  191. ORDER_NO,
  192. ORDER_SEQ,
  193. ORDER_SEQ_NO,
  194. DEPARTMENT_CODE,
  195. DEPARTMENT_DESC,
  196. MANAGEMENT_NO,
  197. MANAGEMENT_NAME,
  198. MEMO,
  199. CREATE_NAME,
  200. CREATE_TIME,
  201. ORIGINAL_DATE,
  202. BAL_YEAR_MONTH,
  203. GRADECODE,
  204. GRADENAME,
  205. PLINE_CODE,
  206. PLINE_NAME,
  207. HANDLE_LOG)
  208. VALUES(
  209. ?,
  210. to_date(?,'yyyy-MM-dd HH24:mi:ss'),
  211. ?,
  212. ?,
  213. ?,
  214. ?,
  215. ?,
  216. ?,
  217. ?,
  218. ?,
  219. ?,
  220. ?,
  221. ?,
  222. ?,
  223. ?,
  224. ?,
  225. ?,
  226. ?,
  227. ?,
  228. ?,
  229. ?,
  230. ?,
  231. nvl(?,'0'),
  232. nvl(?,'0'),
  233. nvl(?,'0'),
  234. nvl(?,'0'),
  235. nvl(?,'0'),
  236. ?,
  237. ?,
  238. ?,
  239. ?,
  240. ?,
  241. ?,
  242. ?,
  243. ?,
  244. ?,
  245. ?,
  246. ?,
  247. ?,
  248. ?,
  249. ?,
  250. ?,
  251. SYSDATE,
  252. ?,
  253. ?,
  254. ?,
  255. ?,
  256. ?,
  257. ?,
  258. ?
  259. )
  260. ]]>
  261. </query>
  262. <query id = "FrmRunTimeRptCw.selectInitalMat" desc = "查询材料信息">
  263. SELECT sum(T.Act_Count) Act_Count,
  264. sum(T.Act_Weight) Act_Weight,
  265. sum(T.ACT_LEN) ACT_LEN,
  266. T.ACT_DIMATER,
  267. T.ACT_HEIGHT,
  268. max(T.ACT_LEN_MIN) ACT_LEN_MIN,
  269. max(T.ACT_LEN_MAX) ACT_LEN_MAX,
  270. T.BELONG_CODE,
  271. T.BELONG_NAME,
  272. max(TO_CHAR(T.INSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) INSTOCK_TIME,
  273. T.MEMO,
  274. T.JUDGE_STD_NAME,
  275. T.PIPMEMO,
  276. T.JUDGE_STOVE_NO,
  277. T.BATCH_NO,
  278. T.BATCH_GROUD_NO,
  279. T.MATERIAL_NO,
  280. T.MATERIAL_NAME,
  281. T.PRODUCCODE,
  282. T.PRODUCNAME,
  283. T.STEELCODE,
  284. T.STEELNAME,
  285. T.GRADECODE,
  286. T.GRADENAME,
  287. T.SPEC_CODE,
  288. T.SPEC_NAME,
  289. T.MODEL_CODE,
  290. T.MODEL_DESC,
  291. T.STD_CODE,
  292. T.STD_NAME,
  293. T.STD_STYLE,
  294. T.STD_STYLE_DESC,
  295. T.PLINE_CODE,
  296. T.PLINE_NAME,
  297. max(B.STORAGE_NO)STORAGE_NO
  298. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS B
  299. LEFT JOIN YDM_BS_STORAGE C ON C.STORAGE_NO = B.STORAGE_NO
  300. WHERE T.MAT_NO = B.MAT_NO
  301. AND T.JUDGE_STOVE_NO = ?
  302. AND T.BATCH_NO = ?
  303. AND T.BATCH_GROUD_NO = ?
  304. group by T.ACT_DIMATER,
  305. T.ACT_HEIGHT,
  306. T.BELONG_CODE,
  307. T.BELONG_NAME,
  308. T.MEMO,
  309. T.JUDGE_STD_NAME,
  310. T.PIPMEMO,
  311. T.JUDGE_STOVE_NO,
  312. T.BATCH_NO,
  313. T.BATCH_GROUD_NO,
  314. T.MATERIAL_NO,
  315. T.MATERIAL_NAME,
  316. T.PRODUCCODE,
  317. T.PRODUCNAME,
  318. T.STEELCODE,
  319. T.STEELNAME,
  320. T.GRADECODE,
  321. T.GRADENAME,
  322. T.SPEC_CODE,
  323. T.SPEC_NAME,
  324. T.MODEL_CODE,
  325. T.MODEL_DESC,
  326. T.STD_CODE,
  327. T.STD_NAME,
  328. T.STD_STYLE,
  329. T.STD_STYLE_DESC,
  330. T.PLINE_CODE,
  331. T.PLINE_NAME
  332. --B.STORAGE_NO
  333. </query>
  334. <query id = "FrmRunTimeRptCw.updateTal" desc = "修改中转表">
  335. update ydm_zc_tial t set t.HANDLE_LOG = '1' where t.INITIAL_ID = ?
  336. </query>
  337. <query id = "FrmRunTimeRptCw.getIntal" desc = "查询中转数据是否存在">
  338. SELECT COUNT(1) ACOUNT
  339. FROM YDM_ZC_TIAL T
  340. WHERE T.JUDGE_STOVE_NO = ?
  341. AND T.BATCH_NO = ?
  342. AND T.BATCH_GROUD_NO = ?
  343. AND T.BAL_YEAR_MONTH = ?
  344. </query>
  345. <query id = "FrmRunTimeRptCw.doQueryTail" desc = "查询是否已存在结转年月的中转数据了">
  346. SELECT COUNT(1) ACOUNT
  347. FROM YDM_ZC_TIAL T
  348. WHERE T.BAL_YEAR_MONTH = ?
  349. </query>
  350. <query id = "FrmRunTimeRptCw.getIntalJZ" desc = "查询是否已存在结转年月的结转数据了">
  351. SELECT COUNT(1) ACOUNT
  352. FROM YDM_ZC_INITIAL T
  353. WHERE T.BAL_YEAR_MONTH = ?
  354. AND T.SUPPLY_UNIT_CODE = ?
  355. </query>
  356. <query id = "FrmRunTimeRptCw.insertTal_" desc = "插入">
  357. <![CDATA[
  358. declare
  359. v_Act_count NUMBER := 0;
  360. v_Act_Weight NUMBER := 0;
  361. v_BELONG_CODE VARCHAR2(20) := '';
  362. v_BELONG_NAME VARCHAR2(20) := '';
  363. v_s number := 0;
  364. begin
  365. select count(1) into v_s from MAT_ZC_M T , YDM_ZC_BUTTRESS B
  366. WHERE T.MAT_NO = B.MAT_NO
  367. AND T.JUDGE_STOVE_NO = ?
  368. AND T.BATCH_NO = ?
  369. AND T.BATCH_GROUD_NO = ?
  370. AND T.BELONG_CODE IN ('100101','100102','100103');
  371. if v_s >0 then
  372. SELECT sum(T.Act_Count) Act_Count,
  373. sum(T.Act_Weight) Act_Weight,
  374. T.BELONG_CODE,
  375. T.BELONG_NAME
  376. INTO v_Act_count, v_Act_Weight, v_BELONG_CODE, v_BELONG_NAME
  377. FROM MAT_ZC_M T,YDM_ZC_BUTTRESS B
  378. WHERE T.MAT_NO = B.MAT_NO
  379. AND T.JUDGE_STOVE_NO = ?
  380. AND T.BATCH_NO = ?
  381. AND T.BATCH_GROUD_NO = ?
  382. and rownum = 1
  383. #condtions#
  384. group by T.BELONG_CODE, T.BELONG_NAME;
  385. else
  386. SELECT sum(T.Act_Count) Act_Count,
  387. sum(T.Act_Weight) Act_Weight,
  388. T.BELONG_CODE,
  389. T.BELONG_NAME
  390. INTO v_Act_count, v_Act_Weight, v_BELONG_CODE, v_BELONG_NAME
  391. FROM YDM_ZC_INLIST T
  392. where T.JUDGE_STOVE_NO = ?
  393. AND T.BATCH_NO = ?
  394. AND T.BATCH_GROUD_NO = ?
  395. AND T.INSTOCK_TYPE_CODE = '800701'
  396. and rownum = 1
  397. #condtions#
  398. group by T.BELONG_CODE, T.BELONG_NAME;
  399. end if;
  400. INSERT INTO YDM_ZC_TIAL
  401. (JUDGE_STOVE_NO,
  402. BATCH_NO,
  403. BATCH_GROUD_NO,
  404. ACT_COUNT,
  405. ACT_WEIGHT,
  406. ORIGINAL_DATE,
  407. BAL_YEAR_MONTH,
  408. HANDLE_LOG,
  409. BELONG_CODE,
  410. BELONG_NAME)
  411. VALUES
  412. (?, ?, ?, ?, ?, ?, ?, ?, v_BELONG_CODE, v_BELONG_NAME);
  413. end;
  414. ]]>
  415. </query>
  416. <query id = "FrmRunTimeRptCw.insertInital_" desc = "结转插入">
  417. <![CDATA[
  418. declare
  419. v_Act_count mat_zc_m.act_count%type :=null;
  420. v_Act_Weight mat_zc_m.act_weight%type:= null;
  421. v_ACT_LEN mat_zc_m.act_len%type:= null;
  422. v_ACT_DIMATER mat_zc_m.act_dimater%type:= null;
  423. v_ACT_HEIGHT mat_zc_m.act_height%type := null;
  424. v_ACT_LEN_MIN mat_zc_m.act_len_min%type := null;
  425. v_ACT_LEN_MAX mat_zc_m.act_len_max%type := null;
  426. v_INSTOCK_TIME mat_zc_m.instock_time%type := null;
  427. v_MEMO mat_zc_m.memo%type := null;
  428. v_JUDGE_STD_NAME mat_zc_m.judge_std_name%type := null;
  429. v_PIPMEMO mat_zc_m.pipmemo%type := null;
  430. v_MATERIAL_NO mat_zc_m.material_no%type := null;
  431. v_MATERIAL_NAME mat_zc_m.material_name%type := null;
  432. v_PRODUCCODE mat_zc_m.produccode%type := null;
  433. v_PRODUCNAME mat_zc_m.producname%type := null;
  434. v_STEELCODE mat_zc_m.steelcode%type := null;
  435. v_STEELNAME mat_zc_m.steelname%type := null;
  436. v_GRADECODE mat_zc_m.gradecode%type := null;
  437. v_GRADENAME mat_zc_m.gradename%type := null;
  438. v_SPEC_CODE mat_zc_m.spec_code%type := null;
  439. v_SPEC_NAME mat_zc_m.spec_name%type := null;
  440. v_MODEL_CODE mat_zc_m.model_code%type := null;
  441. v_MODEL_DESC mat_zc_m.model_desc%type := null;
  442. v_STD_CODE mat_zc_m.std_code%type := null;
  443. v_STD_NAME mat_zc_m.std_name%type := null;
  444. v_STD_STYLE mat_zc_m.std_style%type := null;
  445. v_STD_STYLE_DESC mat_zc_m.std_style_desc%type := null;
  446. v_PLINE_CODE mat_zc_m.pline_code%type := null;
  447. v_PLINE_NAME mat_zc_m.pline_name%type := null;
  448. v_STORAGE_NO ydm_zc_buttress.storage_no%type := null;
  449. v_count number :=0;
  450. begin
  451. SELECT count(1) into v_count FROM MAT_ZC_M T, YDM_ZC_BUTTRESS B
  452. WHERE T.MAT_NO = B.MAT_NO
  453. AND T.JUDGE_STOVE_NO = ?
  454. AND T.BATCH_NO = ?
  455. AND T.BATCH_GROUD_NO = ?
  456. AND T.BELONG_CODE IN ('100101','100102','100103')
  457. AND ROWNUM = 1;
  458. if v_count > 0 then
  459. SELECT sum(T.Act_Count) Act_Count,
  460. sum(T.Act_Weight) Act_Weight,
  461. sum(T.ACT_LEN) ACT_LEN,
  462. T.ACT_DIMATER,
  463. T.ACT_HEIGHT,
  464. max(T.ACT_LEN_MIN) ACT_LEN_MIN,
  465. max(T.ACT_LEN_MAX) ACT_LEN_MAX,
  466. max(T.INSTOCK_TIME) INSTOCK_TIME,
  467. T.MEMO,
  468. T.JUDGE_STD_NAME,
  469. T.PIPMEMO,
  470. T.MATERIAL_NO,
  471. T.MATERIAL_NAME,
  472. T.PRODUCCODE,
  473. T.PRODUCNAME,
  474. T.STEELCODE,
  475. T.STEELNAME,
  476. T.GRADECODE,
  477. T.GRADENAME,
  478. T.SPEC_CODE,
  479. T.SPEC_NAME,
  480. T.MODEL_CODE,
  481. T.MODEL_DESC,
  482. T.STD_CODE,
  483. T.STD_NAME,
  484. T.STD_STYLE,
  485. T.STD_STYLE_DESC,
  486. T.PLINE_CODE,
  487. T.PLINE_NAME,
  488. max(B.STORAGE_NO) STORAGE_NO
  489. into v_Act_count,v_Act_Weight,v_ACT_LEN,v_ACT_DIMATER,v_ACT_HEIGHT,v_ACT_LEN_MIN,v_ACT_LEN_MAX,v_INSTOCK_TIME,
  490. v_MEMO,
  491. v_JUDGE_STD_NAME ,
  492. v_PIPMEMO ,
  493. v_MATERIAL_NO ,
  494. v_MATERIAL_NAME ,
  495. v_PRODUCCODE ,
  496. v_PRODUCNAME ,
  497. v_STEELCODE ,
  498. v_STEELNAME ,
  499. v_GRADECODE ,
  500. v_GRADENAME ,
  501. v_SPEC_CODE ,
  502. v_SPEC_NAME ,
  503. v_MODEL_CODE,
  504. v_MODEL_DESC ,
  505. v_STD_CODE ,
  506. v_STD_NAME ,
  507. v_STD_STYLE ,
  508. v_STD_STYLE_DESC ,
  509. v_PLINE_CODE ,
  510. v_PLINE_NAME,
  511. v_STORAGE_NO
  512. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS B
  513. WHERE T.MAT_NO = B.MAT_NO
  514. AND T.JUDGE_STOVE_NO = ?
  515. AND T.BATCH_NO = ?
  516. AND T.BATCH_GROUD_NO = ?
  517. AND T.BELONG_CODE IN ('100101','100102','100103')
  518. AND ROWNUM = 1
  519. group by T.ACT_DIMATER,
  520. T.ACT_HEIGHT,
  521. T.MEMO,
  522. T.JUDGE_STD_NAME,
  523. T.PIPMEMO,
  524. T.MATERIAL_NO,
  525. T.MATERIAL_NAME,
  526. T.PRODUCCODE,
  527. T.PRODUCNAME,
  528. T.STEELCODE,
  529. T.STEELNAME,
  530. T.GRADECODE,
  531. T.GRADENAME,
  532. T.SPEC_CODE,
  533. T.SPEC_NAME,
  534. T.MODEL_CODE,
  535. T.MODEL_DESC,
  536. T.STD_CODE,
  537. T.STD_NAME,
  538. T.STD_STYLE,
  539. T.STD_STYLE_DESC,
  540. T.PLINE_CODE,
  541. T.PLINE_NAME;
  542. else
  543. SELECT sum(T.Act_Count) Act_Count,
  544. sum(T.Act_Weight) Act_Weight,
  545. sum(T.ACT_LEN) ACT_LEN,
  546. T.ACT_DIMATER,
  547. T.ACT_HEIGHT,
  548. max(T.ACT_LEN_MIN) ACT_LEN_MIN,
  549. max(T.ACT_LEN_MAX) ACT_LEN_MAX,
  550. max(T.INSTOCK_TIME) INSTOCK_TIME,
  551. T.MEMO,
  552. T.JUDGE_STD_NAME,
  553. T.PIPMEMO,
  554. T.MATERIAL_NO,
  555. T.MATERIAL_NAME,
  556. T.PRODUCCODE,
  557. T.PRODUCNAME,
  558. T.STEELCODE,
  559. T.STEELNAME,
  560. T.GRADECODE,
  561. T.GRADENAME,
  562. T.SPEC_CODE,
  563. T.SPEC_NAME,
  564. T.MODEL_CODE,
  565. T.MODEL_DESC,
  566. T.STD_CODE,
  567. T.STD_NAME,
  568. T.STD_STYLE,
  569. T.STD_STYLE_DESC,
  570. T.PLINE_CODE,
  571. T.PLINE_NAME
  572. into v_Act_count,v_Act_Weight,v_ACT_LEN,v_ACT_DIMATER,v_ACT_HEIGHT,v_ACT_LEN_MIN,v_ACT_LEN_MAX,v_INSTOCK_TIME,
  573. v_MEMO,
  574. v_JUDGE_STD_NAME ,
  575. v_PIPMEMO ,
  576. v_MATERIAL_NO ,
  577. v_MATERIAL_NAME ,
  578. v_PRODUCCODE ,
  579. v_PRODUCNAME ,
  580. v_STEELCODE ,
  581. v_STEELNAME ,
  582. v_GRADECODE ,
  583. v_GRADENAME ,
  584. v_SPEC_CODE ,
  585. v_SPEC_NAME ,
  586. v_MODEL_CODE,
  587. v_MODEL_DESC ,
  588. v_STD_CODE ,
  589. v_STD_NAME ,
  590. v_STD_STYLE ,
  591. v_STD_STYLE_DESC ,
  592. v_PLINE_CODE ,
  593. v_PLINE_NAME
  594. FROM YDM_ZC_INLIST T
  595. WHERE T.JUDGE_STOVE_NO = ?
  596. AND T.BATCH_NO = ?
  597. AND T.BATCH_GROUD_NO = ?
  598. AND T.BELONG_CODE IN ('100101','100102','100103')
  599. AND T.INSTOCK_TYPE_CODE = '800701'
  600. AND ROWNUM = 1
  601. group by T.ACT_DIMATER,
  602. T.ACT_HEIGHT,
  603. T.MEMO,
  604. T.JUDGE_STD_NAME,
  605. T.PIPMEMO,
  606. T.MATERIAL_NO,
  607. T.MATERIAL_NAME,
  608. T.PRODUCCODE,
  609. T.PRODUCNAME,
  610. T.STEELCODE,
  611. T.STEELNAME,
  612. T.GRADECODE,
  613. T.GRADENAME,
  614. T.SPEC_CODE,
  615. T.SPEC_NAME,
  616. T.MODEL_CODE,
  617. T.MODEL_DESC,
  618. T.STD_CODE,
  619. T.STD_NAME,
  620. T.STD_STYLE,
  621. T.STD_STYLE_DESC,
  622. T.PLINE_CODE,
  623. T.PLINE_NAME;
  624. end if;
  625. INSERT INTO YDM_ZC_INITIAL(
  626. JUDGE_STD_NAME,
  627. INSTOCK_TIME,
  628. BELONG_CODE,
  629. BELONG_NAME,
  630. MEMO1,
  631. JUDGE_STOVE_NO,
  632. BATCH_NO,
  633. BATCH_GROUD_NO,
  634. MATERIAL_NO,
  635. MATERIAL_NAME,
  636. PRODUCCODE,
  637. PRODUCNAME,
  638. STEELCODE,
  639. STEELNAME,
  640. SPEC_CODE,
  641. SPEC_NAME,
  642. MODEL_CODE,
  643. MODEL_DESC,
  644. STD_CODE,
  645. STD_NAME,
  646. STD_STYLE,
  647. STD_STYLE_DESC,
  648. DIMATER,
  649. HEIGHT,
  650. LEN,
  651. LEN_MIN,
  652. LEN_MAX,
  653. ACT_COUNT,
  654. ACT_WEIGHT,
  655. STORAGE_NO,
  656. MEMO,
  657. CREATE_NAME,
  658. CREATE_TIME,
  659. ORIGINAL_DATE,
  660. BAL_YEAR_MONTH,
  661. GRADECODE,
  662. GRADENAME,
  663. PLINE_CODE,
  664. PLINE_NAME,
  665. HANDLE_LOG)
  666. VALUES(
  667. v_JUDGE_STD_NAME,
  668. v_INSTOCK_TIME,
  669. ?,
  670. ?,
  671. v_PIPMEMO,
  672. ?,
  673. ?,
  674. ?,
  675. v_MATERIAL_NO,
  676. v_MATERIAL_NAME,
  677. v_PRODUCCODE,
  678. v_PRODUCNAME,
  679. v_STEELCODE,
  680. v_STEELNAME,
  681. v_SPEC_CODE,
  682. v_SPEC_NAME,
  683. v_MODEL_CODE,
  684. v_MODEL_DESC,
  685. v_STD_CODE,
  686. v_STD_NAME,
  687. v_STD_STYLE,
  688. v_STD_STYLE_DESC,
  689. nvl(v_ACT_DIMATER,'0'),
  690. nvl(v_ACT_HEIGHT,'0'),
  691. nvl(v_ACT_LEN,'0'),
  692. nvl(v_ACT_LEN_MIN,'0'),
  693. nvl(v_ACT_LEN_MAX,'0'),
  694. nvl(?,'0'),
  695. nvl(?,'0'),
  696. v_STORAGE_NO,
  697. v_MEMO,
  698. ?,
  699. SYSDATE,
  700. ?,
  701. ?,
  702. v_GRADECODE,
  703. v_GRADENAME,
  704. v_PLINE_CODE,
  705. v_PLINE_NAME,
  706. ?
  707. );
  708. end;
  709. ]]>
  710. </query>
  711. <query id = "FrmRunTimeRptCw.insertInital1_" desc = "结转">
  712. DECLARE BEGIN
  713. DELETE FROM YDM_ZC_INITIAL_CW WHERE BAL_YEAR_MONTH = TO_CHAR(ADD_MONTHS(TO_DATE(?, 'YYYYMM'),1),'YYYYMM');
  714. FOR MYROW IN ( SELECT * FROM YDM_ZC_INITIAL_CW_R WHERE BAL_YEAR_MONTH = ? AND END_COUNT != 0 )
  715. LOOP
  716. INSERT INTO YDM_ZC_INITIAL_CW (
  717. JUDGE_STOVE_NO,
  718. BATCH_NO,
  719. BATCH_GROUD_NO,
  720. PRODUCNAME,
  721. STEELNAME,
  722. SPEC_NAME,
  723. MODEL_DESC,
  724. STD_NAME,
  725. STD_STYLE_DESC,
  726. GRADENAME,
  727. BAL_YEAR_MONTH,
  728. BELONG_CODE,
  729. BELONG_NAME,
  730. SUPPLY_UNIT_CODE,
  731. SUPPLY_UNIT,
  732. IS_DEALER,
  733. ACT_COUNT,
  734. ACT_WEIGHT,INSTOCK_TIME
  735. )
  736. VALUES
  737. (
  738. MYROW.JUDGE_STOVE_NO,
  739. MYROW.BATCH_NO,
  740. MYROW.BATCH_GROUD_NO,
  741. MYROW.PRODUCNAME,
  742. MYROW.STEELNAME,
  743. MYROW.SPEC_NAME,
  744. MYROW.MODEL_DESC,
  745. MYROW.STD_NAME,
  746. MYROW.STD_STYLE_DESC,
  747. MYROW.GRADENAME,
  748. TO_CHAR(ADD_MONTHS(TO_DATE(MYROW.BAL_YEAR_MONTH, 'YYYYMM'),1),'YYYYMM'),
  749. MYROW.BELONG_CODE,
  750. MYROW.BELONG_NAME,
  751. MYROW.SUPPLY_UNIT_CODE,
  752. MYROW.SUPPLY_UNIT,
  753. MYROW.IS_DEALER,
  754. MYROW.END_COUNT,
  755. MYROW.END_AMOUNT,MYROW.INSTOCK_TIME
  756. ) ;
  757. END LOOP;
  758. END;
  759. </query>
  760. <query id = "FrmRunTimeRptCw.updateQcmFlag" desc = "修改结转标识">
  761. UPDATE QCM_ZG_JUGDE_APPLY T
  762. SET T.IS_CARRY_VOER = '1'
  763. WHERE T.BAL_YEAR_MONTH = ?
  764. AND ((T.VALIDFLAG = '20' AND T.JUDGE_RESULT_CODE = '40740701') OR
  765. (T.VALIDFLAG = '00' AND T.INSTANCY_FLAG = '1'))
  766. AND T.IS_FLAG = '0'
  767. AND T.TARGET = 'A'
  768. #BELONG_CODE_JUDGE#
  769. </query>
  770. <query id = "FrmRunTimeRptCw.getQueryData" desc = "查询">
  771. SELECT JUDGE_STOVE_NO,
  772. BATCH_NO,
  773. BATCH_GROUD_NO,
  774. PRODUCNAME,
  775. STD_STYLE_DESC,
  776. STEELNAME,
  777. SPEC_NAME,
  778. MODEL_DESC,
  779. BELONG_CODE,
  780. BELONG_NAME,
  781. GRADENAME,
  782. DECODE(IS_DEALER,'0','自售','1','双经销','2','来料加工','3','定销订购')IS_DEALER,
  783. SUM(ORIGINAL_COUNT) ORIGINAL_COUNT,
  784. SUM(ORIGINAL_AMOUNT) ORIGINAL_AMOUNT,
  785. SUM(MONTH_1COUNT) MONTH_1COUNT,
  786. SUM(MONTH_1) MONTH_1,
  787. SUM(MONTH_2COUNT) MONTH_2COUNT,
  788. SUM(MONTH_2) MONTH_2,
  789. SUM(AWEIGHT) AWEIGHT,
  790. SUM((ORIGINAL_COUNT + MONTH_1COUNT - MONTH_2COUNT)) AS END_COUNT,
  791. SUM((ORIGINAL_AMOUNT + MONTH_1 - MONTH_2 + AWEIGHT)) AS END_AMOUNT
  792. FROM (SELECT JUDGE_STOVE_NO,
  793. BATCH_NO,
  794. BATCH_GROUD_NO,
  795. PRODUCNAME,
  796. STD_STYLE_DESC,
  797. STEELNAME,
  798. SPEC_NAME,
  799. MODEL_DESC,
  800. BELONG_CODE,
  801. BELONG_NAME,
  802. GRADENAME,
  803. NVL(IS_DEALER,'0')IS_DEALER,
  804. NVL(SUM(ACT_COUNT), 0) ORIGINAL_COUNT,
  805. NVL(SUM(ACT_WEIGHT), 0) ORIGINAL_AMOUNT,
  806. 0 MONTH_1COUNT,
  807. 0 MONTH_1,
  808. 0 MONTH_2COUNT,
  809. 0 MONTH_2,
  810. 0 AWEIGHT
  811. FROM YDM_ZC_INITIAL_CW T
  812. WHERE T.BAL_YEAR_MONTH = '#BAL_YEAR_MONTH#' #CONDTIONS#
  813. GROUP BY T.JUDGE_STOVE_NO,
  814. T.BATCH_NO,
  815. T.BATCH_GROUD_NO,
  816. T.PRODUCNAME,
  817. T.STD_STYLE_DESC,
  818. T.STEELNAME,
  819. T.SPEC_NAME,
  820. T.MODEL_DESC,
  821. T.BELONG_CODE,
  822. T.BELONG_NAME,
  823. T.GRADENAME,
  824. T.IS_DEALER
  825. UNION ALL
  826. SELECT JUDGE_STOVE_NO,
  827. BATCH_NO,
  828. BATCH_GROUD_NO,
  829. PRODUCNAME,
  830. STD_STYLE_DESC,
  831. STEELNAME,
  832. SPEC_NAME,
  833. MODEL_DESC,
  834. BELONG_CODE,
  835. BELONG_NAME,
  836. GRADENAME,
  837. NVL(IS_DEALER,'0')IS_DEALER,
  838. 0 ORIGINAL_COUNT,
  839. 0 ORIGINAL_AMOUNT,
  840. NVL(SUM(ACT_COUNT), 0) MONTH_1COUNT,
  841. NVL(SUM(ACT_WEIGHT), 0) MONTH_1,
  842. 0 MONTH_2COUNT,
  843. 0 MONTH_2,
  844. 0 AWEIGHT
  845. FROM YDM_ZC_INLIST T
  846. WHERE INSTOCK_TYPE_CODE IN
  847. ('800701', '800702', '800704', '800706', '800707', '800712')
  848. AND T.BAL_YEAR_MONTH = '#BAL_YEAR_MONTH#' #CONDTIONS#
  849. GROUP BY T.JUDGE_STOVE_NO,
  850. T.BATCH_NO,
  851. T.BATCH_GROUD_NO,
  852. T.PRODUCNAME,
  853. T.STD_STYLE_DESC,
  854. T.STEELNAME,
  855. T.SPEC_NAME,
  856. T.MODEL_DESC,
  857. T.BELONG_CODE,
  858. T.BELONG_NAME,
  859. T.GRADENAME,
  860. T.IS_DEALER
  861. UNION ALL
  862. SELECT
  863. T.JUDGE_STOVE_NO,
  864. T.BATCH_NO,
  865. T.BATCH_GROUD_NO,
  866. T.PRODUCNAME,
  867. T.STD_STYLE_DESC,
  868. T.STEELNAME,
  869. T.SPEC_NAME,
  870. T.MODEL_DESC,
  871. T.BELONG_CODE,
  872. T.BELONG_NAME,
  873. T.GRADENAME,
  874. NVL( T.IS_DEALER, '0' ) IS_DEALER,
  875. 0 ORIGINAL_COUNT,
  876. 0 ORIGINAL_AMOUNT,
  877. 0 MONTH_1COUNT,
  878. 0 MONTH_1,
  879. NVL( SUM( T.ACT_COUNT ), 0 ) MONTH_2COUNT,
  880. NVL(
  881. SUM( CASE WHEN T.PONDER_NO IS NULL THEN NVL( T.ACT_WEIGHT, 0 ) ELSE NVL( T.PONDER_GROSS_WT, 0 ) END ),
  882. 0
  883. ) MONTH_2,
  884. 0 AWEIGHT
  885. FROM
  886. SLM_BALANCEINFO A
  887. LEFT JOIN (SELECT B.* FROM YDM_ZC_BILL_M A LEFT JOIN YDM_ZC_BILL_C B ON A.BILL_NO = B.BILL_NO AND A.ORD_LN_DLY_PK = B.ORD_LN_DLY_PK) BILL ON A.ASKPLAN_ID = BILL.BILL_NO
  888. LEFT JOIN YDM_ZC_OUTLIST T ON T.MAT_NO = BILL.MAT_NO AND (T.BILL_NO = BILL.BILL_NO OR T.m_BILL_NO= BILL.BILL_NO)
  889. WHERE
  890. T.OUTSTOCK_TYPE_CODE IN ( '800805', '800804', '800802', '800808', '800806', '800812' )
  891. AND A.BALANCESTATUS = '3'
  892. AND GET_FISCAL_MONTH1(A.INVOICEDATE)= '#BAL_YEAR_MONTH#'
  893. AND T.BELONG_CODE IN ( '100101' )
  894. AND ( T.SUPPLY_UNIT_CODE = '120501' OR T.SUPPLY_UNIT_CODE IS NULL )
  895. GROUP BY
  896. T.JUDGE_STOVE_NO,
  897. T.BATCH_NO,
  898. T.BATCH_GROUD_NO,
  899. T.PRODUCNAME,
  900. T.STD_STYLE_DESC,
  901. T.STEELNAME,
  902. T.SPEC_NAME,
  903. T.MODEL_DESC,
  904. T.BELONG_CODE,
  905. T.BELONG_NAME,
  906. T.GRADENAME,
  907. T.IS_DEALER
  908. ) K
  909. GROUP BY JUDGE_STOVE_NO,
  910. BATCH_NO,
  911. BATCH_GROUD_NO,
  912. PRODUCNAME,
  913. STD_STYLE_DESC,
  914. STEELNAME,
  915. SPEC_NAME,
  916. MODEL_DESC,
  917. BELONG_CODE,
  918. BELONG_NAME,
  919. GRADENAME,
  920. IS_DEALER
  921. </query>
  922. <query id = "FrmRunTimeRptCw.getQueryData1" desc = "查询">
  923. SELECT T.*,DECODE(T.IS_DEALER,'0','自售','1','双经销','2','来料加工','3','定销订购')IS_DEALER FROM YDM_ZC_INITIAL_CW_R t WHERE T.BAL_YEAR_MONTH = '#BAL_YEAR_MONTH#'
  924. </query>
  925. <query id = "FrmRunTimeRptCw.selectMatCount" desc = "查询库存信息">
  926. SELECT SUM(ACOUNT)ACOUNT
  927. FROM (SELECT COUNT(1) ACOUNT
  928. FROM MAT_ZC_M T, YDM_ZC_BUTTRESS S
  929. WHERE T.MAT_NO = S.MAT_NO
  930. AND T.JUDGE_STOVE_NO = ?
  931. AND T.BATCH_NO = ?
  932. AND T.BATCH_GROUD_NO = ?
  933. AND NVL(T.PRODUCNAME, '/') = NVL(?, '/')
  934. AND NVL(T.STD_STYLE_DESC, '/') = NVL(?, '/')
  935. AND NVL(T.STEELNAME, '/') = NVL(?, '/')
  936. AND NVL(T.SPEC_NAME, '/') = NVL(?, '/')
  937. AND NVL(T.MODEL_DESC, '/') = NVL(?, '/')
  938. AND T.BELONG_CODE = ?
  939. --#CONDITIONS#
  940. UNION ALL
  941. SELECT COUNT(1) ACOUNT
  942. FROM YDM_ZC_OUTLIST T
  943. WHERE T.JUDGE_STOVE_NO = ?
  944. AND T.BATCH_NO = ?
  945. AND T.BATCH_GROUD_NO = ?
  946. AND NVL(T.PRODUCNAME, '/') = NVL(?, '/')
  947. AND NVL(T.STD_STYLE_DESC, '/') = NVL(?, '/')
  948. AND NVL(T.STEELNAME, '/') = NVL(?, '/')
  949. AND NVL(T.SPEC_NAME, '/') = NVL(?, '/')
  950. AND NVL(T.MODEL_DESC, '/') = NVL(?, '/')
  951. AND T.BELONG_CODE = ?
  952. --#CONDITIONS#
  953. )
  954. </query>
  955. </queryMap>