FrmOutStore.xml 37 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc = "管坯出库管理">
  3. <query id = "FrmOutStore.doQueryMatData" desc = "查询余材库存数据">
  4. SELECT
  5. T.STOVE_NO,
  6. T.JUDGE_STOVE_NO,
  7. T.MATERIAL_NO,
  8. T.MATERIAL_NAME,
  9. T.GRADECODE,
  10. T.GRADENAME,
  11. T.PLINE_CODE,
  12. T.PLINE_NAME,
  13. T.DIMATER,
  14. T.ACT_LEN,
  15. T.FIX_NUM,
  16. T.FIX_LEN,
  17. SUM(T.ACT_COUNT) ACT_COUNT,
  18. SUM(T.ACT_WEIGHT) ACT_WEIGHT,
  19. T.BELONG_CODE,
  20. T.BELONG_NAME,
  21. (SELECT C.STORAGE_NAME
  22. FROM YDM_BS_STORAGE C
  23. WHERE C.STORAGE_NO = S.STORAGE_NO) STORAGE_NAME,
  24. S.STORAGE_NO,
  25. S.LOCATION_NAME,
  26. S.LOCATION_NO,
  27. DECODE(T.QCM_STAUS,'00','合格','11','待处理','22','废品')QCM_STAUS,
  28. DECODE(T.GPTYPE,'1','铸坯','2','锻坯')GPTYPE,
  29. T.FURNACENO,
  30. T.SEQUENCENO,
  31. T.PRO_PLAN_ID,
  32. T.GX_PLAN_NO,
  33. T.SUPPLY_UNIT_CODE,
  34. T.SUPPLY_UNIT,
  35. (SELECT T1.BASENAME FROM COM_BASE_INFO T1 WHERE T1.BASECODE = T.JUDGE_RESULT_CODE)JUDGE_RESULT_CODE
  36. FROM MAT_GP_M T, YDM_GP_BUTTRESS S
  37. WHERE T.MAT_NO = S.MAT_NO
  38. AND T.QCM_STAUS = '00'
  39. AND T.IS_SETFOOT = '0'
  40. </query>
  41. <query id = "FrmOutStore.doQueryHistory" desc = "查询历史出库记录">
  42. SELECT
  43. T.OUTSTOCK_DOC,
  44. T.OUTSTOCK_TYPE_CODE,
  45. T.OUTSTOCK_TYPE_NAME,
  46. T.STOVE_NO,
  47. T.JUDGE_STOVE_NO,
  48. T.MATERIAL_NO,
  49. T.MATERIAL_NAME,
  50. T.GRADECODE,
  51. T.GRADENAME,
  52. T.DIMATER,
  53. T.HEIGHT,
  54. T.ACT_LEN,
  55. T.FIX_NUM,
  56. T.FIX_LEN,
  57. SUM(T.ACT_COUNT)ACT_COUNT,
  58. SUM(T.ACT_WEIGHT)ACT_WEIGHT,
  59. T.PLINE_CODE,
  60. T.PLINE_NAME,
  61. T.BELONG_CODE,
  62. T.BELONG_NAME,
  63. T.STORAGE_NO,
  64. (SELECT T1.STORAGE_NAME FROM YDM_BS_STORAGE T1 WHERE T1.STORAGE_NO = T.STORAGE_NO)STORAGE_NAME,
  65. T.LOCATION_NO,
  66. T.LARY_NO,
  67. T.LOC_NO,
  68. T.BAL_YEAR_MONTH,
  69. MAX(TO_CHAR(T.OUTSTOCK_TIME, 'YYYY-MM-DD HH24:MI:SS')) OUTSTOCK_TIME,
  70. T.PRO_PLAN_ID,
  71. T.GX_PLAN_NO,
  72. T.FURNACENO,
  73. T.SEQUENCENO,
  74. T.GPTYPE,
  75. T.PRO_PLAN_ID_ZG,
  76. T.GX_PLAN_NO_ZG,
  77. T.SUPPLY_UNIT_CODE,
  78. T.SUPPLY_UNIT,
  79. (SELECT T1.LOCATION_NAME FROM YDM_BS_LOCATION T1 WHERE T1.LOCATION_NO = T.LOCATION_NO)LOCATION_NAME
  80. FROM YDM_GP_OUTLIST T
  81. WHERE T.OUTSTOCK_TYPE_CODE IN('800804','800805')
  82. </query>
  83. <query id = "FrmOutStore.selectMatActCount" desc = "查询该炉支数">
  84. SELECT COUNT(1)ACOUNT
  85. FROM MAT_GP_M T, YDM_GP_BUTTRESS S
  86. WHERE T.MAT_NO = S.MAT_NO
  87. AND NVL(T.STOVE_NO, '/') = NVL('#STOVE_NO#', '/')
  88. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  89. AND T.FIX_NUM = '#FIX_NUM#'
  90. AND T.PRO_PLAN_ID_ZG IS NULL
  91. AND S.STORAGE_NO = '#STORAGE_NO#'
  92. AND S.LOCATION_NO = '#LOCATION_NO#'
  93. AND T.INSTOCK_FLAG = '1'
  94. AND T.QCM_STAUS = '00'
  95. AND T.IS_SETFOOT = '0'
  96. </query>
  97. <query id = "FrmOutStore.getOutListDoc" desc = "生成出库单号">
  98. SELECT ?|| TO_CHAR(SYSDATE, 'YYMMDD') ||
  99. LPAD(NVL(MAX(SUBSTR(OUTSTOCK_DOC, 11)), 0) + 1, 5, 0) OUTSTOCK_DOC
  100. FROM YDM_GP_OUTLIST T
  101. WHERE T.OUTSTOCK_TYPE_CODE = ?
  102. AND T.OUTSTOCK_DOC LIKE ?|| TO_CHAR(SYSDATE, 'YYMMDD')|| '_____'
  103. </query>
  104. <query id = "FrmOutStore.queryInDoc" desc = "生成入库单号">
  105. SELECT ?|| TO_CHAR(SYSDATE, 'YYMMDD') ||
  106. LPAD(NVL(MAX(SUBSTR(T.INSTOCK_DOC, 11)), 0) + 1, 5, 0) INSTOCK_DOC
  107. FROM YDM_ZC_INLIST T
  108. WHERE T.INSTOCK_TYPE_CODE = ?
  109. AND T.INSTOCK_DOC LIKE ?|| TO_CHAR(SYSDATE, 'YYMMDD')|| '_____'
  110. </query>
  111. <query id = "FrmOutStore.insertYdmZcIn" desc = "转销售入成品表">
  112. <![CDATA[
  113. DECLARE
  114. V_INSTOCK_DOC YDM_ZC_INLIST.INSTOCK_DOC%TYPE := NULL; --入库单号
  115. V_INTSTOCK_SQE YDM_ZC_INLIST.INSTOCK_SQE%TYPE := NULL; --入库流水
  116. V_OCOUNT NUMBER := 1;
  117. V_TIME YDM_ZC_INLIST.CREATE_TIME%TYPE := SYSDATE;
  118. V_BATHYEAR YDM_ZC_INLIST.BAL_YEAR_MONTH%TYPE := TO_CHAR(SYSDATE, 'YYYYMM');
  119. BEGIN
  120. --生成入库单号
  121. V_INSTOCK_DOC := '#INSTOCK_DOC#';
  122. SELECT TO_NUMBER(LPAD((NVL(MAX(SUBSTR(T.INSTOCK_SQE, 13)), 0) + 1), 4, 0)) INSTOCK_SQE
  123. INTO V_OCOUNT
  124. FROM YDM_ZC_INLIST T
  125. WHERE T.INSTOCK_DOC = '#INSTOCK_DOC#';
  126. FOR MYROW IN (SELECT * FROM (SELECT T.*,
  127. S.STORAGE_NO,
  128. S.LOCATION_NO,
  129. S.LARY_NO,
  130. S.STORAGE_ATTR,
  131. S.STORAGE_ATTR_NAME,
  132. S.STORAGE_TYPE_NO,
  133. S.STORAGE_TYPE_NAME
  134. FROM MAT_GP_M T, YDM_GP_BUTTRESS S
  135. WHERE T.MAT_NO = S.MAT_NO
  136. AND NVL(T.STOVE_NO,'/') = NVL('#STOVE_NO#','/')
  137. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  138. AND T.FIX_NUM = '#FIX_NUM#'
  139. AND NVL(S.STORAGE_NO,'/') = NVL('#STORAGE_NO#','/')
  140. AND T.QCM_STAUS = '00'
  141. AND S.LOCATION_NO = '#LOCATION_NO#'
  142. AND T.PRO_PLAN_ID_ZG IS NULL
  143. AND T.INSTOCK_FLAG = '1'
  144. AND T.SUPPLY_UNIT_CODE = '#SUPPLY_UNIT_CODE#'
  145. ORDER BY T.MAT_NO DESC)WHERE ROWNUM <= #ACT_COUNT#) LOOP
  146. V_INTSTOCK_SQE := V_INSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  147. INSERT INTO YDM_ZC_INLIST(
  148. INSTOCK_SQE,
  149. INSTOCK_DOC,
  150. INSTOCK_TYPE_CODE,
  151. INSTOCK_TYPE_NAME,
  152. MAT_NO,
  153. STOVE_NO,
  154. JUDGE_STOVE_NO,
  155. BATCH_NO,
  156. BATCH_GROUD_NO,
  157. MATERIAL_NO,
  158. MATERIAL_NAME,
  159. PRODUCCODE,
  160. PRODUCNAME,
  161. GRADECODE,
  162. GRADENAME,
  163. SPEC_CODE,
  164. SPEC_NAME,
  165. PRO_ORDER_NO,
  166. PLINE_CODE,
  167. PLINE_NAME,
  168. ACT_DIMATER,
  169. ACT_LEN,
  170. ACT_COUNT,
  171. ACT_WEIGHT,
  172. ACT_THEORY_WEIGHT,
  173. BELONG_CODE,
  174. BELONG_NAME,
  175. STORAGE_NO,
  176. LOCATION_NO,
  177. LARY_NO,
  178. INSTOCK_TIME,
  179. CREATE_NAME,
  180. CREATE_TIME,
  181. PRODUCT_FLAG,
  182. MAT_STATUS,
  183. IN_TIME_F,
  184. BAL_YEAR_MONTH,
  185. QCM_STAUS,
  186. ACT_LEN_MIN,
  187. ACT_LEN_MAX,
  188. SUPPLY_UNIT_CODE,
  189. SUPPLY_UNIT,IN_MOLD,IN_TYPE)
  190. VALUES(
  191. V_INTSTOCK_SQE,
  192. V_INSTOCK_DOC,
  193. '#INSTOCK_TYPE_CODE#',
  194. '#INSTOCK_TYPE_NAME#',
  195. MYROW.MAT_NO,
  196. MYROW.STOVE_NO,
  197. MYROW.JUDGE_STOVE_NO,
  198. '#BATCH_NO#',
  199. '#BATCH_GROUD_NO#',
  200. MYROW.MATERIAL_NO,
  201. MYROW.MATERIAL_NAME,
  202. '#PRODUCCODE#',
  203. '#PRODUCNAME#',
  204. MYROW.GRADECODE,
  205. MYROW.GRADENAME,
  206. '#SPEC_CODE#',
  207. MYROW.DIMATER,
  208. MYROW.ORDER_NO ||'/'||MYROW.ORDER_SEQ,
  209. 'C071',
  210. '制造管理部',
  211. MYROW.DIMATER,
  212. MYROW.ACT_LEN/1000,
  213. MYROW.ACT_COUNT,
  214. MYROW.ACT_WEIGHT,
  215. MYROW.ACT_THEORY_WEIGHT,
  216. '#BELONG_CODE#',
  217. '#BELONG_NAME#',
  218. MYROW.STORAGE_NO,
  219. MYROW.LOCATION_NO,
  220. MYROW.LARY_NO,
  221. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  222. '#CREATE_NAME#',
  223. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  224. '#PRODUCT_FLAG#',
  225. '#MAT_STATUS#',
  226. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  227. '#BAL_YEAR_MONTH#',
  228. '00',
  229. MYROW.ACT_LEN/1000,
  230. MYROW.ACT_LEN/1000,
  231. MYROW.SUPPLY_UNIT_CODE,
  232. MYROW.SUPPLY_UNIT,'801701','802201');
  233. INSERT INTO YDM_ZC_INLIST_XS(
  234. INSTOCK_SQE,
  235. INSTOCK_DOC,
  236. INSTOCK_TYPE_CODE,
  237. INSTOCK_TYPE_NAME,
  238. MAT_NO,
  239. STOVE_NO,
  240. JUDGE_STOVE_NO,
  241. BATCH_NO,
  242. BATCH_GROUD_NO,
  243. MATERIAL_NO,
  244. MATERIAL_NAME,
  245. PRODUCCODE,
  246. PRODUCNAME,
  247. GRADECODE,
  248. GRADENAME,
  249. SPEC_CODE,
  250. SPEC_NAME,
  251. PRO_ORDER_NO,
  252. PLINE_CODE,
  253. PLINE_NAME,
  254. ACT_DIMATER,
  255. ACT_LEN,
  256. ACT_COUNT,
  257. ACT_WEIGHT,
  258. ACT_THEORY_WEIGHT,
  259. BELONG_CODE,
  260. BELONG_NAME,
  261. STORAGE_NO,
  262. LOCATION_NO,
  263. LARY_NO,
  264. INSTOCK_TIME,
  265. CREATE_NAME,
  266. CREATE_TIME,
  267. PRODUCT_FLAG,
  268. MAT_STATUS,
  269. IN_TIME_F,
  270. BAL_YEAR_MONTH,
  271. QCM_STAUS,
  272. ACT_LEN_MIN,
  273. ACT_LEN_MAX,
  274. SUPPLY_UNIT_CODE,
  275. SUPPLY_UNIT,IN_MOLD,IN_TYPE)
  276. VALUES(
  277. V_INTSTOCK_SQE,
  278. V_INSTOCK_DOC,
  279. '#INSTOCK_TYPE_CODE#',
  280. '#INSTOCK_TYPE_NAME#',
  281. MYROW.MAT_NO,
  282. MYROW.STOVE_NO,
  283. MYROW.JUDGE_STOVE_NO,
  284. '#BATCH_NO#',
  285. '#BATCH_GROUD_NO#',
  286. MYROW.MATERIAL_NO,
  287. MYROW.MATERIAL_NAME,
  288. '#PRODUCCODE#',
  289. '#PRODUCNAME#',
  290. MYROW.GRADECODE,
  291. MYROW.GRADENAME,
  292. '#SPEC_CODE#',
  293. MYROW.DIMATER,
  294. MYROW.ORDER_NO ||'/'||MYROW.ORDER_SEQ,
  295. 'C071',
  296. '制造管理部',
  297. MYROW.DIMATER,
  298. MYROW.ACT_LEN/1000,
  299. MYROW.ACT_COUNT,
  300. MYROW.ACT_WEIGHT,
  301. MYROW.ACT_THEORY_WEIGHT,
  302. '#BELONG_CODE#',
  303. '#BELONG_NAME#',
  304. MYROW.STORAGE_NO,
  305. MYROW.LOCATION_NO,
  306. MYROW.LARY_NO,
  307. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  308. '#CREATE_NAME#',
  309. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  310. '#PRODUCT_FLAG#',
  311. '#MAT_STATUS#',
  312. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  313. '#BAL_YEAR_MONTH#',
  314. '00',
  315. MYROW.ACT_LEN/1000,
  316. MYROW.ACT_LEN/1000,
  317. MYROW.SUPPLY_UNIT_CODE,
  318. MYROW.SUPPLY_UNIT,'801701','802201');
  319. INSERT INTO CRM_ZC_INLIST(
  320. STORAGE_NAME,
  321. MAT_NO,
  322. INSTOCK_SQE,
  323. INSTOCK_DOC,
  324. ORDER_NO,
  325. ORDER_SEQ,
  326. DELIVERY_NO,
  327. ORD_PK,
  328. ORD_LN_PK,
  329. ORD_LN_DLY_PK,
  330. PRODUCT_FLAG,
  331. JUDGE_STOVE_NO,
  332. BATCH_NO,
  333. BATCH_GROUD_NO,
  334. MATERIAL_NO,
  335. MATERIAL_NAME,
  336. PRODUCCODE,
  337. PRODUCNAME,
  338. STD_CODE,
  339. STD_NAME,
  340. GRADECODE,
  341. GRADENAME,
  342. STEELCODE,
  343. STEELNAME,
  344. STD_STYLE,
  345. STD_STYLE_DESC,
  346. SPEC_CODE,
  347. SPEC_NAME,
  348. MODEL_CODE,
  349. MODEL_DESC,
  350. PLINE_CODE,
  351. PLINE_NAME,
  352. ACT_LEN,
  353. ACT_LEN_MIN,
  354. ACT_LEN_MAX,
  355. ACT_COUNT,
  356. ACT_WEIGHT,
  357. STORAGE_NO,
  358. IN_MOLD,
  359. PACK_NO,
  360. INSTOCK_TIME,
  361. CREATE_TIME,
  362. SUPPLY_UNIT_CODE,
  363. SUPPLY_UNIT,
  364. BAL_YEAR_MONTH,
  365. ACT_DIMATER,
  366. ACT_HEIGHT,
  367. BELONG_CODE,
  368. BELONG_NAME,
  369. INSTOCK_TYPE_CODE,
  370. INSTOCK_TYPE_NAME
  371. )
  372. VALUES(
  373. (SELECT S1.STORAGE_NAME FROM YDM_BS_STORAGE S1 WHERE S1.STORAGE_NO = MYROW.STORAGE_NO),
  374. MYROW.MAT_NO,
  375. V_INTSTOCK_SQE,
  376. V_INSTOCK_DOC,
  377. '',
  378. '',
  379. '',
  380. '',
  381. '',
  382. '',
  383. (SELECT F.BASENAME FROM COM_BASE_INFO F WHERE F.BASECODE = '#PRODUCT_FLAG#'),
  384. MYROW.JUDGE_STOVE_NO,
  385. '#BATCH_NO#',
  386. '#BATCH_GROUD_NO#',
  387. MYROW.MATERIAL_NO,
  388. MYROW.MATERIAL_NAME,
  389. '#PRODUCCODE#',
  390. '#PRODUCNAME#',
  391. MYROW.STD_CODE,
  392. MYROW.STD_NAME,
  393. MYROW.GRADECODE,
  394. MYROW.GRADENAME,
  395. MYROW.STEELCODE,
  396. MYROW.STEELNAME,
  397. '',
  398. '',
  399. '#SPEC_CODE#',
  400. MYROW.DIMATER,
  401. '',
  402. '',
  403. 'C071',
  404. '制造管理部',
  405. MYROW.ACT_LEN/1000,
  406. MYROW.ACT_LEN/1000,
  407. MYROW.ACT_LEN/1000,
  408. MYROW.ACT_COUNT,
  409. MYROW.ACT_WEIGHT,
  410. MYROW.STORAGE_NO,
  411. (SELECT F.BASENAME FROM COM_BASE_INFO F WHERE F.BASECODE = ''),
  412. '',
  413. TO_DATE('#INSTOCK_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  414. TO_DATE('#INSTOCK_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  415. MYROW.SUPPLY_UNIT_CODE,
  416. MYROW.SUPPLY_UNIT,
  417. '#BAL_YEAR_MONTH#',
  418. MYROW.DIMATER,
  419. '',
  420. '#BELONG_CODE#',
  421. '#BELONG_NAME#',
  422. '#INSTOCK_TYPE_CODE#',
  423. '#INSTOCK_TYPE_NAME#'
  424. );
  425. INSERT INTO MAT_ZC_M(
  426. MAT_NO,
  427. PRODUCT_FLAG,
  428. MAT_STATUS,
  429. STOVE_NO,
  430. JUDGE_STOVE_NO,
  431. BATCH_NO,
  432. BATCH_GROUD_NO,
  433. MATERIAL_NO,
  434. MATERIAL_NAME,
  435. PRODUCCODE,
  436. PRODUCNAME,
  437. GRADECODE,
  438. GRADENAME,
  439. SPEC_CODE,
  440. SPEC_NAME,
  441. PLINE_CODE,
  442. PLINE_NAME,
  443. ACT_DIMATER,
  444. ACT_HEIGHT,
  445. ACT_LEN,
  446. ACT_COUNT,
  447. ACT_WEIGHT,
  448. ACT_THEORY_WEIGHT,
  449. BELONG_CODE,
  450. BELONG_NAME,
  451. INSTOCK_FLAG,
  452. INSTOCK_TIME,
  453. CREATE_NAME,
  454. CREATE_TIME,
  455. BAL_YEAR_MONTH,
  456. QCM_STAUS,
  457. ZBS_FLAG,
  458. JUDGE_RESULT_CODE,
  459. JUDGE_RESULT,
  460. JUDGE_RESULT_TIME,
  461. JUDGE_MAKER,
  462. FIX_NUM,
  463. FIX_LEN,
  464. PRO_ORDER_NO,
  465. ACT_LEN_MIN,
  466. ACT_LEN_MAX,
  467. SUPPLY_UNIT_CODE,
  468. SUPPLY_UNIT,IN_MOLD,IN_TYPE)
  469. VALUES(
  470. MYROW.MAT_NO,
  471. '#PRODUCT_FLAG#',
  472. '#MAT_STATUS#',
  473. MYROW.STOVE_NO,
  474. MYROW.JUDGE_STOVE_NO,
  475. '#BATCH_NO#',
  476. '#BATCH_GROUD_NO#',
  477. MYROW.MATERIAL_NO,
  478. MYROW.MATERIAL_NAME,
  479. '#PRODUCCODE#',
  480. '#PRODUCNAME#',
  481. MYROW.GRADECODE,
  482. MYROW.GRADENAME,
  483. '#SPEC_CODE#',
  484. MYROW.DIMATER,
  485. 'C071',
  486. '制造管理部',
  487. MYROW.DIMATER,
  488. '0',
  489. MYROW.ACT_LEN/1000,
  490. MYROW.ACT_COUNT,
  491. MYROW.ACT_WEIGHT,
  492. MYROW.ACT_THEORY_WEIGHT,
  493. '#BELONG_CODE#',
  494. '#BELONG_NAME#',
  495. '1',
  496. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  497. '#CREATE_NAME#',
  498. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  499. '#BAL_YEAR_MONTH#',
  500. '00',
  501. '2',
  502. MYROW.JUDGE_RESULT_CODE,
  503. '合格',
  504. MYROW.JUDGE_RESULT_TIME,
  505. MYROW.JUDGE_MAKER,
  506. '#FIX_NUM#',
  507. '#FIX_LEN#',
  508. MYROW.PRO_PLAN_ID,
  509. MYROW.ACT_LEN/1000,
  510. MYROW.ACT_LEN/1000,
  511. MYROW.SUPPLY_UNIT_CODE,
  512. MYROW.SUPPLY_UNIT,'801701','802201');
  513. INSERT INTO MAT_ZC_M_XS(
  514. MAT_NO,
  515. PRODUCT_FLAG,
  516. MAT_STATUS,
  517. STOVE_NO,
  518. JUDGE_STOVE_NO,
  519. BATCH_NO,
  520. BATCH_GROUD_NO,
  521. MATERIAL_NO,
  522. MATERIAL_NAME,
  523. PRODUCCODE,
  524. PRODUCNAME,
  525. GRADECODE,
  526. GRADENAME,
  527. SPEC_CODE,
  528. SPEC_NAME,
  529. PLINE_CODE,
  530. PLINE_NAME,
  531. ACT_DIMATER,
  532. ACT_HEIGHT,
  533. ACT_LEN,
  534. ACT_COUNT,
  535. ACT_WEIGHT,
  536. ACT_THEORY_WEIGHT,
  537. BELONG_CODE,
  538. BELONG_NAME,
  539. INSTOCK_FLAG,
  540. INSTOCK_TIME,
  541. CREATE_NAME,
  542. CREATE_TIME,
  543. BAL_YEAR_MONTH,
  544. QCM_STAUS,
  545. ZBS_FLAG,
  546. JUDGE_RESULT_CODE,
  547. JUDGE_RESULT,
  548. JUDGE_RESULT_TIME,
  549. JUDGE_MAKER,
  550. FIX_NUM,
  551. FIX_LEN,
  552. PRO_ORDER_NO,
  553. ACT_LEN_MIN,
  554. ACT_LEN_MAX,
  555. SUPPLY_UNIT_CODE,
  556. SUPPLY_UNIT,IN_MOLD,IN_TYPE)
  557. VALUES(
  558. MYROW.MAT_NO,
  559. '#PRODUCT_FLAG#',
  560. '#MAT_STATUS#',
  561. MYROW.STOVE_NO,
  562. MYROW.JUDGE_STOVE_NO,
  563. '#BATCH_NO#',
  564. '#BATCH_GROUD_NO#',
  565. MYROW.MATERIAL_NO,
  566. MYROW.MATERIAL_NAME,
  567. '#PRODUCCODE#',
  568. '#PRODUCNAME#',
  569. MYROW.GRADECODE,
  570. MYROW.GRADENAME,
  571. '#SPEC_CODE#',
  572. MYROW.DIMATER,
  573. 'C071',
  574. '制造管理部',
  575. MYROW.DIMATER,
  576. '0',
  577. MYROW.ACT_LEN/1000,
  578. MYROW.ACT_COUNT,
  579. MYROW.ACT_WEIGHT,
  580. MYROW.ACT_THEORY_WEIGHT,
  581. '#BELONG_CODE#',
  582. '#BELONG_NAME#',
  583. '1',
  584. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  585. '#CREATE_NAME#',
  586. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  587. '#BAL_YEAR_MONTH#',
  588. '00',
  589. '2',
  590. MYROW.JUDGE_RESULT_CODE,
  591. '合格',
  592. MYROW.JUDGE_RESULT_TIME,
  593. MYROW.JUDGE_MAKER,
  594. '#FIX_NUM#',
  595. '#FIX_LEN#',
  596. MYROW.PRO_PLAN_ID,
  597. MYROW.ACT_LEN/1000,
  598. MYROW.ACT_LEN/1000,
  599. MYROW.SUPPLY_UNIT_CODE,
  600. MYROW.SUPPLY_UNIT,'801701','802201');
  601. INSERT INTO YDM_ZC_BUTTRESS(
  602. MAT_NO,
  603. JUDGE_STOVE_NO,
  604. BATCH_NO,
  605. BATCH_GROUD_NO,
  606. STORAGE_NO,
  607. LOCATION_NO,
  608. LARY_NO,
  609. STORAGE_ATTR,
  610. STORAGE_ATTR_NAME,
  611. STORAGE_TYPE_NO,
  612. STORAGE_TYPE_NAME,
  613. CREATE_NAME,
  614. CREATE_TIME)
  615. VALUES(
  616. MYROW.MAT_NO,
  617. MYROW.JUDGE_STOVE_NO,
  618. '#BATCH_NO#',
  619. '#BATCH_GROUD_NO#',
  620. MYROW.STORAGE_NO,
  621. MYROW.LOCATION_NO,
  622. MYROW.LARY_NO,
  623. MYROW.STORAGE_ATTR,
  624. MYROW.STORAGE_ATTR_NAME,
  625. MYROW.STORAGE_TYPE_NO,
  626. MYROW.STORAGE_TYPE_NAME,
  627. '#CREATE_NAME#',
  628. TO_DATE('#INSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'));
  629. INSERT INTO CRM_MAT_ZC(
  630. MAT_NO,
  631. PRODUCT_FLAG,
  632. MAT_STATUS,
  633. LOT_NO,
  634. STOVE_NO,
  635. JUDGE_STOVE_NO,
  636. BATCH_NO,
  637. BATCH_GROUD_NO,
  638. MATERIAL_NO,
  639. MATERIAL_NAME,
  640. PRODUCCODE,
  641. PRODUCNAME,
  642. STEELCODE,
  643. STEELNAME,
  644. GRADECODE,
  645. GRADENAME,
  646. SPEC_CODE,
  647. SPEC_NAME,
  648. MODEL_CODE,
  649. MODEL_DESC,
  650. STD_CODE,
  651. STD_NAME,
  652. STD_STYLE,
  653. STD_STYLE_DESC,
  654. PRO_ORDER_NO,
  655. ORDER_NO,
  656. ORDER_SEQ,
  657. ORDER_SEQ_NO,
  658. ORD_PK,
  659. ORD_LN_PK,
  660. ORD_LN_DLY_PK,
  661. PLINE_CODE,
  662. PLINE_NAME,
  663. ACT_DIMATER,
  664. ACT_HEIGHT,
  665. ACT_LEN,
  666. ACT_LEN_MIN,
  667. ACT_LEN_MAX,
  668. ACT_COUNT,
  669. ACT_WEIGHT,
  670. BELONG_CODE,
  671. BELONG_NAME,
  672. IN_MOLD,
  673. INSTOCK_TIME,
  674. STORAGE_NO,
  675. LOCATION_NO,
  676. STORAGE_NAME,
  677. LOCATION_NAME,
  678. SUPPLY_UNIT_CODE,
  679. SUPPLY_UNIT,
  680. CREATE_TIME)
  681. VALUES(
  682. MYROW.MAT_NO,
  683. (SELECT F.BASENAME FROM COM_BASE_INFO F WHERE F.BASECODE = '#PRODUCT_FLAG#'),
  684. (SELECT F.BASENAME FROM COM_BASE_INFO F WHERE F.BASECODE = '#MAT_STATUS#'),
  685. '',
  686. MYROW.STOVE_NO,
  687. MYROW.JUDGE_STOVE_NO,
  688. '#BATCH_NO#',
  689. '#BATCH_GROUD_NO#',
  690. MYROW.MATERIAL_NO,
  691. MYROW.MATERIAL_NAME,
  692. '#PRODUCCODE#',
  693. '#PRODUCNAME#',
  694. MYROW.STEELCODE,
  695. MYROW.STEELNAME,
  696. MYROW.GRADECODE,
  697. MYROW.GRADENAME,
  698. '#SPEC_CODE#',
  699. MYROW.DIMATER,
  700. '',
  701. '',
  702. MYROW.STD_CODE,
  703. MYROW.STD_NAME,
  704. '',
  705. '',
  706. MYROW.PRO_ORDER_NO,
  707. '',
  708. '',
  709. '',
  710. '',
  711. '',
  712. '',
  713. 'C071',
  714. '制造管理部',
  715. MYROW.DIMATER,
  716. '',
  717. MYROW.ACT_LEN/1000,
  718. MYROW.ACT_LEN/1000,
  719. MYROW.ACT_LEN/1000,
  720. MYROW.ACT_COUNT,
  721. MYROW.ACT_WEIGHT,
  722. '#BELONG_CODE#',
  723. '#BELONG_NAME#',
  724. (SELECT F.BASENAME FROM COM_BASE_INFO F WHERE F.BASECODE = ''),
  725. TO_DATE('#INSTOCK_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  726. MYROW.STORAGE_NO,
  727. MYROW.LOCATION_NO,
  728. (SELECT S1.STORAGE_NAME FROM YDM_BS_STORAGE S1 WHERE S1.STORAGE_NO = MYROW.STORAGE_NO),
  729. (SELECT S2.LOCATION_NAME FROM YDM_BS_LOCATION S2 WHERE S2.LOCATION_NO = MYROW.LOCATION_NO),
  730. MYROW.SUPPLY_UNIT_CODE,
  731. MYROW.SUPPLY_UNIT,
  732. TO_DATE('#INSTOCK_TIME#', 'YYYY-MM-DD HH24:MI:SS'));
  733. V_OCOUNT := V_OCOUNT + 1;
  734. END LOOP;
  735. END;
  736. ]]>
  737. </query>
  738. <query id ="FrmOutStore.insertOutListOH" desc = "销售出库插入出库表">
  739. <![CDATA[
  740. DECLARE
  741. V_OUTSTOCK_DOC YDM_GP_OUTLIST.OUTSTOCK_DOC%TYPE := NULL; --出库单号
  742. V_OUTSTOCK_SQE YDM_GP_OUTLIST.OUTSTOCK_SQE%TYPE := NULL; --出库流水
  743. V_OCOUNT NUMBER := 1;
  744. V_TIME YDM_GP_OUTLIST.CREATE_TIME%TYPE := SYSDATE;
  745. V_BATHYEAR MAT_GP_M.BAL_YEAR_MONTH%TYPE := TO_CHAR(SYSDATE, 'YYYYMM');
  746. BEGIN
  747. --生成出库单号
  748. V_OUTSTOCK_DOC := '#OUTSTOCK_DOC#';
  749. SELECT TO_NUMBER(LPAD((NVL(MAX(SUBSTR(T.OUTSTOCK_SQE, 13)), 0) + 1), 4, 0)) OUTSTOCK_SQE
  750. INTO V_OCOUNT
  751. FROM YDM_GP_OUTLIST T
  752. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  753. FOR MYROW IN (SELECT * FROM (SELECT T.*,
  754. S.STORAGE_NO,
  755. S.LOCATION_NO,
  756. S.LARY_NO,
  757. S.STORAGE_ATTR,
  758. S.STORAGE_ATTR_NAME,
  759. S.STORAGE_TYPE_NO,
  760. S.STORAGE_TYPE_NAME
  761. FROM MAT_GP_M T, YDM_GP_BUTTRESS S
  762. WHERE T.MAT_NO = S.MAT_NO
  763. AND NVL(T.STOVE_NO,'/') = NVL('#STOVE_NO#','/')
  764. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  765. AND T.FIX_NUM = '#FIX_NUM#'
  766. AND NVL(S.STORAGE_NO,'/') = NVL('#STORAGE_NO#','/')
  767. AND T.QCM_STAUS = '00'
  768. AND S.LOCATION_NO = '#LOCATION_NO#'
  769. AND T.PRO_PLAN_ID_ZG IS NULL
  770. AND T.INSTOCK_FLAG = '1'
  771. AND T.SUPPLY_UNIT_CODE = '#SUPPLY_UNIT_CODE#'
  772. ORDER BY T.MAT_NO DESC)WHERE ROWNUM <= #ACT_COUNT#) LOOP
  773. V_OUTSTOCK_SQE := V_OUTSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  774. INSERT INTO YDM_GP_OUTLIST(
  775. OUTSTOCK_SQE,
  776. OUTSTOCK_PLAN_NO,
  777. OUTSTOCK_DOC,
  778. OUTSTOCK_TYPE_CODE,
  779. OUTSTOCK_TYPE_NAME,
  780. VEHICLE_NO,
  781. MAT_NO,
  782. PRODUCT_FLAG,
  783. MAT_STATUS,
  784. STOVE_NO,
  785. FLAG_STOVE_NO,
  786. JUDGE_STOVE_NO,
  787. CAST_NO,
  788. CCMID,
  789. MATERIAL_NO,
  790. MATERIAL_NAME,
  791. GRADECODE,
  792. GRADENAME,
  793. STD_CODE,
  794. STD_NAME,
  795. DIMATER,
  796. HEIGHT,
  797. ACT_LEN,
  798. FIX_NUM,
  799. FIX_LEN,
  800. ACT_COUNT,
  801. ACT_WEIGHT,
  802. ACT_THEORY_WEIGHT,
  803. PLINE_CODE,
  804. PLINE_NAME,
  805. PRO_ORDER_NO,
  806. BELONG_CODE,
  807. BELONG_NAME,
  808. STORAGE_NO,
  809. LOCATION_NO,
  810. LARY_NO,
  811. TAR_REC_FLAG,
  812. BAL_YEAR_MONTH,
  813. OUTSTOCK_TIME,
  814. OUT_BC,
  815. OUT_BZ,
  816. STORAGE_ATTR,
  817. STORAGE_ATTR_NAME,
  818. STORAGE_TYPE_NO,
  819. STORAGE_TYPE_NAME,
  820. MEMO,
  821. CREATE_NAME,
  822. CREATE_TIME,
  823. GROUD_NO,
  824. ICCAR_NO,
  825. FURNACENO,
  826. SEQUENCENO,
  827. PRO_PLAN_ID,
  828. GX_PLAN_NO,
  829. DRIVER,
  830. PRO_PLAN_ID_ZG,
  831. GX_PLAN_NO_ZG,
  832. SUPPLY_UNIT_CODE,
  833. SUPPLY_UNIT,
  834. BACK_FLAG,
  835. IS_DEALER)
  836. VALUES(
  837. V_OUTSTOCK_SQE,
  838. '',
  839. V_OUTSTOCK_DOC,
  840. '#OUTSTOCK_TYPE_CODE#',
  841. '#OUTSTOCK_TYPE_NAME#',
  842. '',
  843. MYROW.MAT_NO,
  844. MYROW.PRODUCT_FLAG,
  845. MYROW.MAT_STATUS,
  846. MYROW.STOVE_NO,
  847. MYROW.FLAG_STOVE_NO,
  848. MYROW.JUDGE_STOVE_NO,
  849. MYROW.CAST_NO,
  850. MYROW.CCMID,
  851. MYROW.MATERIAL_NO,
  852. MYROW.MATERIAL_NAME,
  853. MYROW.GRADECODE,
  854. MYROW.GRADENAME,
  855. MYROW.STD_CODE,
  856. MYROW.STD_NAME,
  857. MYROW.DIMATER,
  858. MYROW.HEIGHT,
  859. MYROW.ACT_LEN,
  860. MYROW.FIX_NUM,
  861. MYROW.FIX_LEN,
  862. MYROW.ACT_COUNT,
  863. MYROW.ACT_WEIGHT,
  864. MYROW.ACT_THEORY_WEIGHT,
  865. MYROW.PLINE_CODE,
  866. MYROW.PLINE_NAME,
  867. MYROW.PRO_ORDER_NO,
  868. MYROW.BELONG_CODE,
  869. MYROW.BELONG_NAME,
  870. MYROW.STORAGE_NO,
  871. MYROW.LOCATION_NO,
  872. MYROW.LARY_NO,
  873. '0',
  874. '#BAL_YEAR_MONTH#',
  875. TO_DATE('#OUTSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  876. '1',
  877. '1',
  878. MYROW.STORAGE_ATTR,
  879. MYROW.STORAGE_ATTR_NAME,
  880. MYROW.STORAGE_TYPE_NO,
  881. MYROW.STORAGE_TYPE_NAME,
  882. MYROW.MEMO,
  883. '#CREATE_NAME#',
  884. TO_DATE('#OUTSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  885. MYROW.GROUD_NO,
  886. '',
  887. MYROW.FURNACENO,
  888. MYROW.SEQUENCENO,
  889. MYROW.PRO_PLAN_ID,
  890. MYROW.GX_PLAN_NO,
  891. '',
  892. MYROW.PRO_PLAN_ID_ZG,
  893. MYROW.GX_PLAN_NO_ZG,
  894. MYROW.SUPPLY_UNIT_CODE,
  895. MYROW.SUPPLY_UNIT,
  896. MYROW.BACK_FLAG,
  897. MYROW.IS_DEALER);
  898. V_OCOUNT := V_OCOUNT + 1;
  899. END LOOP;
  900. END;
  901. ]]>
  902. </query>
  903. <query id = "FrmOutStore.insertOutListCQ" desc = "产权出库">
  904. <![CDATA[
  905. DECLARE
  906. V_OUTSTOCK_DOC YDM_GP_OUTLIST.OUTSTOCK_DOC%TYPE := NULL; --出库单号
  907. V_OUTSTOCK_SQE YDM_GP_OUTLIST.OUTSTOCK_SQE%TYPE := NULL; --出库流水
  908. V_OCOUNT NUMBER := 1;
  909. V_TIME YDM_GP_OUTLIST.CREATE_TIME%TYPE := SYSDATE;
  910. V_BATHYEAR MAT_GP_M.BAL_YEAR_MONTH%TYPE := TO_CHAR(SYSDATE, 'YYYYMM');
  911. BEGIN
  912. --生成出库单流水号
  913. V_OUTSTOCK_DOC := '#OUTSTOCK_DOC#';
  914. SELECT TO_NUMBER(LPAD((NVL(MAX(SUBSTR(T.OUTSTOCK_SQE, 13)), 0) + 1), 4, 0)) OUTSTOCK_SQE
  915. INTO V_OCOUNT
  916. FROM YDM_GP_OUTLIST T
  917. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#';
  918. FOR MYROW IN (SELECT * FROM (SELECT T.*,
  919. S.STORAGE_NO,
  920. S.LOCATION_NO,
  921. S.LARY_NO,
  922. S.STORAGE_ATTR,
  923. S.STORAGE_ATTR_NAME,
  924. S.STORAGE_TYPE_NO,
  925. S.STORAGE_TYPE_NAME
  926. FROM MAT_GP_M T, YDM_GP_BUTTRESS S
  927. WHERE T.MAT_NO = S.MAT_NO
  928. AND NVL(T.STOVE_NO,'/') = NVL('#STOVE_NO#','/')
  929. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  930. AND T.FIX_NUM = '#FIX_NUM#'
  931. AND NVL(S.STORAGE_NO,'/') = NVL('#STORAGE_NO#','/')
  932. AND T.QCM_STAUS = '00'
  933. AND S.LOCATION_NO = '#LOCATION_NO#'
  934. AND T.PRO_PLAN_ID_ZG IS NULL
  935. AND T.INSTOCK_FLAG = '1'
  936. AND T.SUPPLY_UNIT_CODE = '#SUPPLY_UNIT_CODE#'
  937. ORDER BY T.MAT_NO DESC)WHERE ROWNUM <= #ACT_COUNT#) LOOP
  938. V_OUTSTOCK_SQE := V_OUTSTOCK_DOC || LPAD(V_OCOUNT, 4, 0);
  939. INSERT INTO YDM_GP_OUTLIST(
  940. OUTSTOCK_SQE,
  941. OUTSTOCK_PLAN_NO,
  942. OUTSTOCK_DOC,
  943. OUTSTOCK_TYPE_CODE,
  944. OUTSTOCK_TYPE_NAME,
  945. VEHICLE_NO,
  946. MAT_NO,
  947. PRODUCT_FLAG,
  948. MAT_STATUS,
  949. STOVE_NO,
  950. FLAG_STOVE_NO,
  951. JUDGE_STOVE_NO,
  952. CAST_NO,
  953. CCMID,
  954. MATERIAL_NO,
  955. MATERIAL_NAME,
  956. GRADECODE,
  957. GRADENAME,
  958. STD_CODE,
  959. STD_NAME,
  960. DIMATER,
  961. HEIGHT,
  962. ACT_LEN,
  963. FIX_NUM,
  964. FIX_LEN,
  965. ACT_COUNT,
  966. ACT_WEIGHT,
  967. ACT_THEORY_WEIGHT,
  968. PLINE_CODE,
  969. PLINE_NAME,
  970. PRO_ORDER_NO,
  971. BELONG_CODE,
  972. BELONG_NAME,
  973. STORAGE_NO,
  974. LOCATION_NO,
  975. LARY_NO,
  976. TAR_REC_FLAG,
  977. BAL_YEAR_MONTH,
  978. OUTSTOCK_TIME,
  979. OUT_BC,
  980. OUT_BZ,
  981. STORAGE_ATTR,
  982. STORAGE_ATTR_NAME,
  983. STORAGE_TYPE_NO,
  984. STORAGE_TYPE_NAME,
  985. MEMO,
  986. CREATE_NAME,
  987. CREATE_TIME,
  988. GROUD_NO,
  989. ICCAR_NO,
  990. FURNACENO,
  991. SEQUENCENO,
  992. PRO_PLAN_ID,
  993. GX_PLAN_NO,
  994. DRIVER,
  995. PRO_PLAN_ID_ZG,
  996. GX_PLAN_NO_ZG,
  997. MAT_GOWHERE_CODE,
  998. MAT_GOWHERE_NAME,
  999. SUPPLY_UNIT_CODE,
  1000. SUPPLY_UNIT,
  1001. IS_DEALER,
  1002. BACK_FLAG)
  1003. VALUES(
  1004. V_OUTSTOCK_SQE,
  1005. '',
  1006. V_OUTSTOCK_DOC,
  1007. '#OUTSTOCK_TYPE_CODE#',
  1008. '#OUTSTOCK_TYPE_NAME#',
  1009. '',
  1010. MYROW.MAT_NO,
  1011. MYROW.PRODUCT_FLAG,
  1012. MYROW.MAT_STATUS,
  1013. MYROW.STOVE_NO,
  1014. MYROW.FLAG_STOVE_NO,
  1015. MYROW.JUDGE_STOVE_NO,
  1016. MYROW.CAST_NO,
  1017. MYROW.CCMID,
  1018. MYROW.MATERIAL_NO,
  1019. MYROW.MATERIAL_NAME,
  1020. MYROW.GRADECODE,
  1021. MYROW.GRADENAME,
  1022. MYROW.STD_CODE,
  1023. MYROW.STD_NAME,
  1024. MYROW.DIMATER,
  1025. MYROW.HEIGHT,
  1026. MYROW.ACT_LEN,
  1027. MYROW.FIX_NUM,
  1028. MYROW.FIX_LEN,
  1029. MYROW.ACT_COUNT,
  1030. MYROW.ACT_WEIGHT,
  1031. MYROW.ACT_THEORY_WEIGHT,
  1032. MYROW.PLINE_CODE,
  1033. MYROW.PLINE_NAME,
  1034. MYROW.PRO_ORDER_NO,
  1035. MYROW.BELONG_CODE,
  1036. MYROW.BELONG_NAME,
  1037. MYROW.STORAGE_NO,
  1038. MYROW.LOCATION_NO,
  1039. MYROW.LARY_NO,
  1040. '0',
  1041. '#BAL_YEAR_MONTH#',
  1042. TO_DATE('#OUTSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  1043. '1',
  1044. '1',
  1045. MYROW.STORAGE_ATTR,
  1046. MYROW.STORAGE_ATTR_NAME,
  1047. MYROW.STORAGE_TYPE_NO,
  1048. MYROW.STORAGE_TYPE_NAME,
  1049. MYROW.MEMO,
  1050. '#CREATE_NAME#',
  1051. TO_DATE('#OUTSTOCK_TIME#','YYYY-MM-DD HH24:MI:SS'),
  1052. MYROW.GROUD_NO,
  1053. '',
  1054. MYROW.FURNACENO,
  1055. MYROW.SEQUENCENO,
  1056. MYROW.PRO_PLAN_ID,
  1057. MYROW.GX_PLAN_NO,
  1058. '',
  1059. MYROW.PRO_PLAN_ID_ZG,
  1060. MYROW.GX_PLAN_NO_ZG,
  1061. '#MAT_GOWHERE_CODE#',
  1062. '#MAT_GOWHERE_NAME#',
  1063. MYROW.SUPPLY_UNIT_CODE,
  1064. MYROW.SUPPLY_UNIT,
  1065. MYROW.IS_DEALER,
  1066. MYROW.BACK_FLAG);
  1067. INSERT INTO MAT_GP_M_HISTORY SELECT * FROM MAT_GP_M T WHERE T.MAT_NO = MYROW.MAT_NO;
  1068. DELETE FROM YDM_GP_BUTTRESS S WHERE S.MAT_NO = MYROW.MAT_NO;
  1069. DELETE FROM MAT_GP_M T WHERE T.MAT_NO = MYROW.MAT_NO;
  1070. V_OCOUNT := V_OCOUNT + 1;
  1071. END LOOP;
  1072. END;
  1073. ]]>
  1074. </query>
  1075. <query id = "FrmOutStore.cancelOutStore" desc = "撤销出库">
  1076. DECLARE
  1077. V_JUDGE_STOVE_NO_LG YDM_GP_BUTTRESS.JUDGE_STOVE_NO_LG%TYPE := NULL;
  1078. V_CREATE_NAME MAT_GP_M_HISTORY.CREATE_NAME%TYPE := NULL;
  1079. V_CREATE_TIME MAT_GP_M_HISTORY.CREATE_TIME%TYPE := NULL;
  1080. V_INSTOCK_SQE YDM_GP_INLIST.INSTOCK_SQE%TYPE := NULL;
  1081. V_INSTOCK_DOC YDM_GP_INLIST.INSTOCK_DOC%TYPE := NULL;
  1082. BEGIN
  1083. FOR MYROW IN (SELECT *
  1084. FROM YDM_GP_OUTLIST T
  1085. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
  1086. AND T.STOVE_NO = '#STOVE_NO#'
  1087. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1088. AND T.OUTSTOCK_TYPE_CODE = '#OUTSTOCK_TYPE_CODE#'
  1089. ORDER BY T.MAT_NO DESC) LOOP
  1090. SELECT T1.JUDGE_STOVE_NO_LG, T1.CREATE_NAME, T1.CREATE_TIME
  1091. INTO V_JUDGE_STOVE_NO_LG, V_CREATE_NAME, V_CREATE_TIME
  1092. FROM MAT_GP_M_HISTORY T1
  1093. WHERE T1.MAT_NO = MYROW.MAT_NO;
  1094. INSERT INTO MAT_GP_M
  1095. SELECT * FROM MAT_GP_M_HISTORY T WHERE T.MAT_NO = MYROW.MAT_NO;
  1096. INSERT INTO YDM_GP_BUTTRESS
  1097. (MAT_NO,
  1098. STOVE_NO,
  1099. JUDGE_STOVE_NO,
  1100. STORAGE_NO,
  1101. LOCATION_NO,
  1102. LARY_NO,
  1103. LOC_NO,
  1104. CREATE_NAME,
  1105. CREATE_TIME,
  1106. GROUD_NO,
  1107. LOCATION_NAME,
  1108. JUDGE_STOVE_NO_LG)
  1109. VALUES
  1110. (MYROW.MAT_NO,
  1111. MYROW.STOVE_NO,
  1112. MYROW.JUDGE_STOVE_NO,
  1113. MYROW.STORAGE_NO,
  1114. MYROW.LOCATION_NO,
  1115. MYROW.LARY_NO,
  1116. MYROW.LOC_NO,
  1117. V_CREATE_NAME,
  1118. V_CREATE_TIME,
  1119. MYROW.GROUD_NO,
  1120. (SELECT S.LOCATION_NAME
  1121. FROM YDM_BS_LOCATION S
  1122. WHERE S.LOCATION_NO = MYROW.LOCATION_NO),
  1123. V_JUDGE_STOVE_NO_LG);
  1124. DELETE FROM MAT_GP_M_HISTORY T WHERE T.MAT_NO = MYROW.MAT_NO;
  1125. DELETE FROM YDM_GP_OUTLIST T
  1126. WHERE T.MAT_NO = MYROW.MAT_NO
  1127. AND T.OUTSTOCK_SQE = MYROW.OUTSTOCK_SQE
  1128. AND T.OUTSTOCK_TYPE_CODE = '800805';
  1129. DELETE FROM YDM_GP_OUTLIST T
  1130. WHERE T.OUTSTOCK_SQE =
  1131. (SELECT T1.OUTSTOCK_SQE
  1132. FROM YDM_GP_OUTLIST T1
  1133. WHERE T1.MAT_NO = MYROW.MAT_NO
  1134. AND T1.OUTSTOCK_TYPE_CODE = '800809'
  1135. AND T1.MAT_GOWHERE_CODE = '800805')
  1136. AND T.OUTSTOCK_TYPE_CODE = '800809'
  1137. AND T.MAT_NO = MYROW.MAT_NO;
  1138. IF ('#OUTSTOCK_TYPE_CODE#' = '800805') THEN
  1139. DELETE FROM MAT_ZC_M T WHERE T.MAT_NO = MYROW.MAT_NO;
  1140. DELETE FROM YDM_ZC_BUTTRESS T WHERE T.MAT_NO = MYROW.MAT_NO;
  1141. DELETE FROM YDM_ZC_INLIST T
  1142. WHERE T.MAT_NO = MYROW.MAT_NO
  1143. AND T.INSTOCK_TYPE_CODE = '800701';
  1144. INSERT INTO CRM_ZC_INLIST
  1145. (STORAGE_NAME,
  1146. CREATE_TIME,
  1147. MAT_NO,
  1148. INSTOCK_SQE,
  1149. INSTOCK_DOC,
  1150. ORDER_NO,
  1151. ORDER_SEQ,
  1152. DELIVERY_NO,
  1153. ORD_PK,
  1154. ORD_LN_PK,
  1155. ORD_LN_DLY_PK,
  1156. PRODUCT_FLAG,
  1157. JUDGE_STOVE_NO,
  1158. BATCH_NO,
  1159. BATCH_GROUD_NO,
  1160. MATERIAL_NO,
  1161. MATERIAL_NAME,
  1162. PRODUCCODE,
  1163. PRODUCNAME,
  1164. STD_CODE,
  1165. STD_NAME,
  1166. GRADECODE,
  1167. GRADENAME,
  1168. STEELCODE,
  1169. STEELNAME,
  1170. STD_STYLE,
  1171. STD_STYLE_DESC,
  1172. SPEC_CODE,
  1173. SPEC_NAME,
  1174. MODEL_CODE,
  1175. MODEL_DESC,
  1176. PLINE_CODE,
  1177. PLINE_NAME,
  1178. ACT_LEN,
  1179. ACT_LEN_MIN,
  1180. ACT_LEN_MAX,
  1181. ACT_COUNT,
  1182. ACT_WEIGHT,
  1183. STORAGE_NO,
  1184. IN_MOLD,
  1185. PACK_NO,
  1186. INSTOCK_TIME,
  1187. Data_Status,
  1188. SUPPLY_UNIT_CODE,
  1189. SUPPLY_UNIT,
  1190. BAL_YEAR_MONTH,
  1191. ACT_DIMATER,
  1192. ACT_HEIGHT,
  1193. BELONG_CODE,
  1194. BELONG_NAME,
  1195. INSTOCK_TYPE_CODE,
  1196. INSTOCK_TYPE_NAME)
  1197. SELECT STORAGE_NAME,
  1198. TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1199. MAT_NO,
  1200. INSTOCK_SQE,
  1201. INSTOCK_DOC,
  1202. ORDER_NO,
  1203. ORDER_SEQ,
  1204. DELIVERY_NO,
  1205. ORD_PK,
  1206. ORD_LN_PK,
  1207. ORD_LN_DLY_PK,
  1208. PRODUCT_FLAG,
  1209. JUDGE_STOVE_NO,
  1210. BATCH_NO,
  1211. BATCH_GROUD_NO,
  1212. MATERIAL_NO,
  1213. MATERIAL_NAME,
  1214. PRODUCCODE,
  1215. PRODUCNAME,
  1216. STD_CODE,
  1217. STD_NAME,
  1218. GRADECODE,
  1219. GRADENAME,
  1220. STEELCODE,
  1221. STEELNAME,
  1222. STD_STYLE,
  1223. STD_STYLE_DESC,
  1224. SPEC_CODE,
  1225. SPEC_NAME,
  1226. MODEL_CODE,
  1227. MODEL_DESC,
  1228. PLINE_CODE,
  1229. PLINE_NAME,
  1230. ACT_LEN,
  1231. ACT_LEN_MIN,
  1232. ACT_LEN_MAX,
  1233. ACT_COUNT,
  1234. ACT_WEIGHT,
  1235. STORAGE_NO,
  1236. IN_MOLD,
  1237. PACK_NO,
  1238. INSTOCK_TIME,
  1239. '2',
  1240. SUPPLY_UNIT_CODE,
  1241. SUPPLY_UNIT,
  1242. BAL_YEAR_MONTH,
  1243. ACT_DIMATER,
  1244. ACT_HEIGHT,
  1245. BELONG_CODE,
  1246. BELONG_NAME,
  1247. INSTOCK_TYPE_CODE,
  1248. INSTOCK_TYPE_NAME
  1249. FROM (SELECT *
  1250. FROM CRM_ZC_INLIST T
  1251. WHERE T.MAT_NO = MYROW.MAT_NO
  1252. AND T.DATA_STATUS = '0'
  1253. ORDER BY T.CREATE_TIME DESC)
  1254. WHERE ROWNUM = 1;
  1255. INSERT INTO CRM_MAT_ZC
  1256. (MAT_NO,
  1257. PRODUCT_FLAG,
  1258. MAT_STATUS,
  1259. LOT_NO,
  1260. STOVE_NO,
  1261. JUDGE_STOVE_NO,
  1262. BATCH_NO,
  1263. BATCH_GROUD_NO,
  1264. MATERIAL_NO,
  1265. MATERIAL_NAME,
  1266. PRODUCCODE,
  1267. PRODUCNAME,
  1268. STEELCODE,
  1269. STEELNAME,
  1270. GRADECODE,
  1271. GRADENAME,
  1272. SPEC_CODE,
  1273. SPEC_NAME,
  1274. MODEL_CODE,
  1275. MODEL_DESC,
  1276. STD_CODE,
  1277. STD_NAME,
  1278. STD_STYLE,
  1279. STD_STYLE_DESC,
  1280. PRO_ORDER_NO,
  1281. ORDER_NO,
  1282. ORDER_SEQ,
  1283. ORDER_SEQ_NO,
  1284. ORD_PK,
  1285. ORD_LN_PK,
  1286. ORD_LN_DLY_PK,
  1287. PLINE_CODE,
  1288. PLINE_NAME,
  1289. ACT_DIMATER,
  1290. ACT_HEIGHT,
  1291. ACT_LEN,
  1292. ACT_LEN_MIN,
  1293. ACT_LEN_MAX,
  1294. ACT_COUNT,
  1295. ACT_WEIGHT,
  1296. BELONG_CODE,
  1297. BELONG_NAME,
  1298. IN_MOLD,
  1299. INSTOCK_TIME,
  1300. STORAGE_NO,
  1301. LOCATION_NO,
  1302. STORAGE_NAME,
  1303. LOCATION_NAME,
  1304. SUPPLY_UNIT_CODE,
  1305. SUPPLY_UNIT,
  1306. CREATE_TIME,
  1307. DATA_STATUS)
  1308. SELECT MAT_NO,
  1309. PRODUCT_FLAG,
  1310. MAT_STATUS,
  1311. LOT_NO,
  1312. STOVE_NO,
  1313. JUDGE_STOVE_NO,
  1314. BATCH_NO,
  1315. BATCH_GROUD_NO,
  1316. MATERIAL_NO,
  1317. MATERIAL_NAME,
  1318. PRODUCCODE,
  1319. PRODUCNAME,
  1320. STEELCODE,
  1321. STEELNAME,
  1322. GRADECODE,
  1323. GRADENAME,
  1324. SPEC_CODE,
  1325. SPEC_NAME,
  1326. MODEL_CODE,
  1327. MODEL_DESC,
  1328. STD_CODE,
  1329. STD_NAME,
  1330. STD_STYLE,
  1331. STD_STYLE_DESC,
  1332. PRO_ORDER_NO,
  1333. ORDER_NO,
  1334. ORDER_SEQ,
  1335. ORDER_SEQ_NO,
  1336. ORD_PK,
  1337. ORD_LN_PK,
  1338. ORD_LN_DLY_PK,
  1339. PLINE_CODE,
  1340. PLINE_NAME,
  1341. ACT_DIMATER,
  1342. ACT_HEIGHT,
  1343. ACT_LEN,
  1344. ACT_LEN_MIN,
  1345. ACT_LEN_MAX,
  1346. ACT_COUNT,
  1347. ACT_WEIGHT,
  1348. BELONG_CODE,
  1349. BELONG_NAME,
  1350. IN_MOLD,
  1351. INSTOCK_TIME,
  1352. STORAGE_NO,
  1353. LOCATION_NO,
  1354. STORAGE_NAME,
  1355. LOCATION_NAME,
  1356. SUPPLY_UNIT_CODE,
  1357. SUPPLY_UNIT,
  1358. TO_DATE('#CREATE_TIME#', 'YYYY-MM-DD HH24:MI:SS'),
  1359. '2'
  1360. FROM (SELECT *
  1361. FROM CRM_MAT_ZC T
  1362. WHERE T.MAT_NO = MYROW.MAT_NO
  1363. AND T.DATA_STATUS = '0'
  1364. ORDER BY T.CREATE_TIME DESC)
  1365. WHERE ROWNUM = 1;
  1366. END IF;
  1367. END LOOP;
  1368. END;
  1369. </query>
  1370. <query id = "FrmOutStore.selectSpecCode" desc = "查询规格代码">
  1371. SELECT T.SPEC_CODE FROM COM_BASE_SPEC T WHERE T.SPEC_NAME = ?
  1372. </query>
  1373. <query id = "FrmOutStore.selectSyncFlag" desc = "查询财务系统同步信息">
  1374. SELECT *
  1375. FROM FMIS_GP_OUTLIST T
  1376. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
  1377. AND T.STOVE_NO = '#STOVE_NO#'
  1378. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1379. AND T.OUTSTOCK_TYPE_CODE = '800809'
  1380. </query>
  1381. <query id = "FrmOutStore.deleteFmisOutLlist" desc = "删除财务系统同步信息">
  1382. DELETE FROM FMIS_GP_OUTLIST T
  1383. WHERE T.OUTSTOCK_DOC = '#OUTSTOCK_DOC#'
  1384. AND T.STOVE_NO = '#STOVE_NO#'
  1385. AND T.JUDGE_STOVE_NO = '#JUDGE_STOVE_NO#'
  1386. AND T.OUTSTOCK_TYPE_CODE = '800809'
  1387. AND T.SYNC_FLAG = '0'
  1388. </query>
  1389. </queryMap>