frmOrderReviewPrice.xml 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="合同评审价格界面查询">
  3. <query id="frmOrderReviewPrice.CoreOrderReviewPriceQuery" desc="合同价格评审信息">
  4. <![CDATA[
  5. SELECT B.ORDER_NO,B.CUSTM_ORDER_NO,B1.REVIEW_F_RS,B.ORD_PK,
  6. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.ORDER_TYP) ORDER_TYP,
  7. B.SALE_AREA_DESC SALE_AREA_NO,
  8. B.ORDER_YEAR,B.SIGN_DATE,B.SIGN_ADDRESS,
  9. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.SUPPLY_UNIT) SUPPLY_UNIT,
  10. (SELECT CUSTOMER_NM FROM SLM_BASE_CUSTOMER WHERE CUSTOMER_NO = B.STLMT_UNIT_NO) STLMT_UNIT_NO,
  11. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.MNY_ASK_TYP) MNY_ASK_TYP,
  12. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.CURRENCY) CURRENCY,
  13. B.ORDER_STS,
  14. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = ORDER_STS AND VALIDFLAG = '1' ) ORDER_STS_DESC,
  15. CLOSE_TIME,
  16. B.EFFECT_TIME,B.APPROVAL_TIME,B.DELETE_TIME,B.DELETE_NAME,B.UPDATE_TIME,B.UPDATE_NAME,
  17. B.CREATE_TIME,B.CREATE_NAME,
  18. decode(B.VALIDFLAG,'1','有效','0','无效') VALIDFLAG,
  19. B.ORDER_MODEL_NO,
  20. B.ORDER_MODEL_DESC,
  21. B.MNY_ASK_DESC,B.MANAG_NO,
  22. B.CUSTOMER_NM CUSTOMER_NO,
  23. B.SALE_ORG,
  24. B.MEMO,
  25. DECODE(LENGTH(B.PRICE_NO),15,B.PRICE_NO,'') PRICE_NO,
  26. DECODE(LENGTH(C.PRICE_NO),15,DECODE(C.PRICE_STATUS,'L','封锁','D','无效','W','待审','S','通过','F','不通过'),'') PRICE_STATUS,
  27. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.FST_DRAWEE_UNIT) FST_DRAWEE_UNIT,
  28. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.PRICE_FL) PRICE_FL,
  29. DECODE(B.CUSTOMER_MODEL_FL,'1','TRUE','FALSE') CUSTOMER_MODEL_FL, B1.REVIEW_ITM,B1.REVIEW_STATUS
  30. FROM SLM_ORDER_HEAD B, SLM_ORDER_REVIEW_ITEM_LIST B1,SLM_ORDER_PRICE C
  31. WHERE 1 = 1
  32. AND B.VALIDFLAG='1'
  33. AND B.ord_pk = B1.LIST_PK_VAL
  34. AND B1.REVIEW_ITM = 'P'
  35. and b1.is_curt_review = '1'
  36. and B.ORDER_STS in ('12020224')
  37. AND B.PRICE_NO = C.PRICE_NO(+)
  38. ]]>
  39. </query>
  40. <query id="frmOrderReviewPrice.CoreOrderReviewPriceQueryPass" desc="合同价格评审信息">
  41. <![CDATA[
  42. SELECT B.ORDER_NO,B.CUSTM_ORDER_NO,B.ORD_PK,
  43. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.ORDER_TYP) ORDER_TYP,
  44. B.SALE_AREA_DESC SALE_AREA_NO,
  45. B.ORDER_YEAR,B.SIGN_DATE,B.SIGN_ADDRESS,
  46. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.SUPPLY_UNIT) SUPPLY_UNIT,
  47. (SELECT CUSTOMER_NM FROM SLM_BASE_CUSTOMER WHERE CUSTOMER_NO = B.STLMT_UNIT_NO) STLMT_UNIT_NO,
  48. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.MNY_ASK_TYP) MNY_ASK_TYP,
  49. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.CURRENCY) CURRENCY,
  50. B.ORDER_STS,
  51. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = ORDER_STS AND VALIDFLAG = '1' ) ORDER_STS_DESC,
  52. CLOSE_TIME,
  53. B.EFFECT_TIME,B.APPROVAL_TIME,B.DELETE_TIME,B.DELETE_NAME,B.UPDATE_TIME,B.UPDATE_NAME,
  54. B.CREATE_TIME,B.CREATE_NAME,
  55. decode(B.VALIDFLAG,'1','有效','0','无效') VALIDFLAG,
  56. B.ORDER_MODEL_NO,
  57. B.ORDER_MODEL_DESC,
  58. B.MNY_ASK_DESC,B.MANAG_NO,
  59. B.CUSTOMER_NM CUSTOMER_NO,
  60. B.SALE_ORG,
  61. B.MEMO,
  62. DECODE(LENGTH(B.PRICE_NO),15,B.PRICE_NO,'') PRICE_NO,
  63. DECODE(LENGTH(C.PRICE_NO),15,DECODE(C.PRICE_STATUS,'L','封锁','D','无效','W','待审','S','通过','F','不通过'),'') PRICE_STATUS,
  64. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.FST_DRAWEE_UNIT) FST_DRAWEE_UNIT,
  65. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.PRICE_FL) PRICE_FL,
  66. DECODE(B.CUSTOMER_MODEL_FL,'1','TRUE','FALSE') CUSTOMER_MODEL_FL
  67. FROM SLM_ORDER_HEAD B,SLM_ORDER_PRICE C
  68. WHERE 1 = 1
  69. and B.ORDER_STS >='12020232'
  70. AND B.VALIDFLAG = '1'
  71. AND B.PRICE_NO = C.PRICE_NO(+)
  72. AND (SELECT TO_NUMBER(COUNT(1) -
  73. NVL(SUM(TO_NUMBER(A.BALNCE_PRICE_STS)), '0'))
  74. FROM SLM_ORDER_LINE A
  75. WHERE B.ORD_PK = A.ORD_PK
  76. AND A.VALIDFLAG = '1') >0
  77. ]]>
  78. </query>
  79. <query id="frmOrderReviewPrice.orderPriceQuery" desc="合同价格说明信息">
  80. <![CDATA[
  81. select PRICE_BASE from SLM_ORDER_PRICE where ord_pk = ?
  82. ]]>
  83. </query>
  84. <query id="frmOrderReviewPrice.orderPriceListQuery" desc="合同价格明细信息">
  85. <![CDATA[
  86. SELECT DISTINCT T.ORDER_SEQ,
  87. T.ORD_PK,
  88. T.PRODUCNAME,
  89. T.SPEC_NAME,
  90. T.MODEL_DESC,
  91. T.STD_NAME,
  92. T.LEN_DESC,
  93. T.ORDER_QTY,
  94. '(-' || TO_CHAR(DELVRY_RANGE_MIN) ||
  95. DECODE(DELVRY_RANGE_TPE, '%', '%', T.ORDER_UNIT) || ',' ||
  96. TO_CHAR(DELVRY_RANGE_MAX) ||
  97. DECODE(DELVRY_RANGE_TPE, '%', '%', T.ORDER_UNIT) || ')' DELVRY_RANGE,
  98. DELVRY_RANGE_MAX,
  99. DELVRY_RANGE_MIN,
  100. DELVRY_RANGE_TPE,
  101. T1.DELVRY_QTY,
  102. T.OUT_PRICE,
  103. T1.TRANSIT_MNY,
  104. (T.OUT_PRICE + T1.TRANSIT_MNY) SUMPRICE,
  105. (T.OUT_PRICE + T1.TRANSIT_MNY) * 1.13 SUMPRICEH,
  106. T.ORDER_QTY * (T.OUT_PRICE + T1.TRANSIT_MNY) SUMMANA,
  107. T.ORDER_QTY * (T.OUT_PRICE + T1.TRANSIT_MNY) * 1.13 SUMMANAH
  108. FROM SLM_ORDER_LINE T, SLM_ORDER_LINE_DELIVERY T1
  109. WHERE T.ORD_LN_PK = T1.ORD_LN_PK
  110. AND T.ORD_PK = ?
  111. AND T.VALIDFLAG = '1'
  112. AND T1.VALIDFLAG = '1'
  113. ORDER BY ORDER_SEQ
  114. ]]>
  115. </query>
  116. <query id="frmOrderReviewPrice.appPriceAdd" desc="合同价格评审合同头信息">
  117. <![CDATA[
  118. UPDATE SLM_ORDER_HEAD SET ORDER_STS = '12020232',ORDER_STS_DESC = '价格评审通过',APPROVAL_MAN = ?,APPROVAL_TIME = SYSDATE,UPDATE_NAME= ? , UPDATE_TIME = SYSDATE WHERE ORD_PK = ?
  119. ]]>
  120. </query>
  121. <query id="frmOrderReviewPrice.appPriceAdd2" desc="合同价格评审评审主表">
  122. <![CDATA[
  123. UPDATE SLM_ORDER_REVIEW SET REVIEW_STATUS = 'S',UPDATE_NAME = ?,UPDATE_TIME = SYSDATE WHERE ORD_PK = ?
  124. ]]>
  125. </query>
  126. <query id="frmOrderReviewPrice.appPriceAdd3" desc="合同价格评审评审项目表">
  127. <![CDATA[
  128. UPDATE SLM_ORDER_REVIEW_ITEM SET REVIEW_STATUS = 'S',UPDATE_NAME= ?,CREATE_TIME = SYSDATE WHERE REVIEW_NO =
  129. (SELECT T.REVIEW_NO FROM SLM_ORDER_REVIEW T WHERE T.ORD_PK = ?) AND REVIEW_ITM = 'P'
  130. ]]>
  131. </query>
  132. <query id="frmOrderReviewPrice.appPriceAdd4" desc="合同价格评审评审项目明细表">
  133. <![CDATA[
  134. UPDATE SLM_ORDER_REVIEW_ITEM_LIST SET REVIEW_STATUS = 'S',REVIEW_F_RS = '',REVIEW_MAN = ?,UPDATE_NAME = ?,UPDATE_TIME = SYSDATE WHERE LIST_PK_VAL = ?
  135. ]]>
  136. </query>
  137. <query id="frmOrderReviewPrice.appPriceUpdate" desc="合同价格评审不通过业务修改合同主表">
  138. <![CDATA[
  139. UPDATE SLM_ORDER_HEAD SET ORDER_STS = '12020231',ORDER_STS_DESC = '价格评审失败',APPROVAL_MAN = '',APPROVAL_TIME = '',UPDATE_NAME= '' , UPDATE_TIME = '' WHERE ORD_PK = ?
  140. ]]>
  141. </query>
  142. <query id="frmOrderReviewPrice.appPriceUpdate2" desc="合同价格评审不通过业务填写不合格原因">
  143. <![CDATA[
  144. UPDATE SLM_ORDER_REVIEW_ITEM_LIST SET REVIEW_F_RS = ?,REVIEW_STATUS = 'F',REVIEW_MAN = '',UPDATE_NAME = '',UPDATE_TIME = '' WHERE LIST_PK_VAL = ? AND REVIEW_ITM = 'P'
  145. ]]>
  146. </query>
  147. <query id="frmOrderReviewPrice.appPriceUpdate3" desc="合同价格评审不通过写评审主表">
  148. <![CDATA[
  149. UPDATE SLM_ORDER_REVIEW SET REVIEW_STATUS = 'F',UPDATE_NAME = '',UPDATE_TIME = '' WHERE ORD_PK = ?
  150. ]]>
  151. </query>
  152. <query id="frmOrderReviewPrice.appPriceUpdate4" desc="合同价格评审不通过写评审项目表">
  153. <![CDATA[
  154. UPDATE SLM_ORDER_REVIEW_ITEM SET REVIEW_STATUS = 'F',UPDATE_NAME= '',CREATE_TIME = '' WHERE REVIEW_NO =
  155. (SELECT T.REVIEW_NO FROM SLM_ORDER_REVIEW T WHERE T.ORD_PK = ?) AND REVIEW_ITM = 'P'
  156. ]]>
  157. </query>
  158. <query id="frmOrderReviewPrice.updateOutBalPrice" desc="合同价格评审不通过写评审项目表">
  159. <![CDATA[
  160. UPDATE SLM_ORDER_LINE A
  161. SET A.OUT_PRICE =
  162. (SELECT B.OUT_PRICE
  163. FROM SLM_ORDER_PRICE_LIST B
  164. WHERE B.PRICE_NO = (SELECT C.PRICE_NO
  165. FROM SLM_ORDER_HEAD C
  166. WHERE C.ORD_PK = A.ORD_PK)
  167. AND B.ORD_LN_PK = A.ORD_LN_PK),
  168. A.BALNCE_PRICE =
  169. (SELECT B.BLA_PRICE
  170. FROM SLM_ORDER_PRICE_LIST B
  171. WHERE B.PRICE_NO = (SELECT C.PRICE_NO
  172. FROM SLM_ORDER_HEAD C
  173. WHERE C.ORD_PK = A.ORD_PK)
  174. AND B.ORD_LN_PK = A.ORD_LN_PK),
  175. A.BALNCE_PRICE_STS = '0',
  176. A.BALNCE_PRICE_ORG_STS = '0'
  177. WHERE A.ORD_PK = ?
  178. ]]>
  179. </query>
  180. <!-- //////////////////////////////ChPrice销售钢贸 价格变更 国贸价格维护 ////////////、、、、、、、、。。。 -->
  181. <query id="frmOrderReviewPrice.ChgeOrderPriceQueryXSAndGM" desc="销售和钢贸合同价格变更信息查询">
  182. <![CDATA[
  183. SELECT B.ORDER_NO,
  184. B.CUSTM_ORDER_NO,
  185. B1.REVIEW_F_RS,
  186. B.ORD_PK,
  187. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.ORDER_TYP) ORDER_TYP,
  188. B.SALE_AREA_DESC SALE_AREA_NO,
  189. B.ORDER_YEAR,
  190. B.SIGN_DATE,
  191. B.SIGN_ADDRESS,
  192. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.SUPPLY_UNIT) SUPPLY_UNIT,
  193. (SELECT CUSTOMER_NM
  194. FROM SLM_BASE_CUSTOMER
  195. WHERE CUSTOMER_NO = B.STLMT_UNIT_NO) STLMT_UNIT_NO,
  196. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.MNY_ASK_TYP) MNY_ASK_TYP,
  197. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.CURRENCY) CURRENCY,
  198. B.ORDER_STS,
  199. (SELECT BASENAME
  200. FROM COM_BASE_INFO
  201. WHERE BASECODE = ORDER_STS
  202. AND VALIDFLAG = '1') ORDER_STS_DESC,
  203. CLOSE_TIME,
  204. B.EFFECT_TIME,
  205. B.APPROVAL_TIME,
  206. B.DELETE_TIME,
  207. B.DELETE_NAME,
  208. B.UPDATE_TIME,
  209. B.UPDATE_NAME,
  210. B.CREATE_TIME,
  211. B.CREATE_NAME,
  212. DECODE(B.VALIDFLAG, '1', '有效', '0', '无效') VALIDFLAG,
  213. B.ORDER_MODEL_NO,
  214. B.ORDER_MODEL_DESC,
  215. B.MNY_ASK_DESC,
  216. B.MANAG_NO,
  217. B.CUSTOMER_NM CUSTOMER_NO,
  218. B.SALE_ORG,
  219. B.MEMO,
  220. DECODE(LENGTH(B.PRICE_NO), 15, B.PRICE_NO, '') PRICE_NO,
  221. DECODE(LENGTH(C.PRICE_NO),
  222. 15,
  223. DECODE(C.PRICE_STATUS,
  224. 'L',
  225. '封锁',
  226. 'D',
  227. '无效',
  228. 'W',
  229. '待审',
  230. 'S',
  231. '通过',
  232. 'F',
  233. '不通过'),
  234. '') PRICE_STATUS,
  235. DECODE((SELECT TO_NUMBER(COUNT(1) -
  236. NVL(SUM(TO_NUMBER(A.BALNCE_PRICE_STS)), '0'))
  237. FROM SLM_ORDER_LINE A
  238. WHERE B.ORD_PK = A.ORD_PK
  239. AND B.VALIDFLAG = '1'),
  240. '0',
  241. '确认',
  242. '未确认') BAL_PRICE_STATUS,
  243. (SELECT BASENAME
  244. FROM COM_BASE_INFO
  245. WHERE BASECODE = B.FST_DRAWEE_UNIT) FST_DRAWEE_UNIT,
  246. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.PRICE_FL) PRICE_FL,
  247. DECODE(B.CUSTOMER_MODEL_FL, '1', 'TRUE', 'FALSE') CUSTOMER_MODEL_FL,
  248. B1.REVIEW_ITM,
  249. B1.REVIEW_STATUS
  250. FROM SLM_ORDER_HEAD B, SLM_ORDER_REVIEW_ITEM_LIST B1, SLM_ORDER_PRICE C
  251. WHERE 1 = 1
  252. AND B.ORD_PK = B1.LIST_PK_VAL
  253. AND B1.REVIEW_ITM = 'P'
  254. AND B1.IS_CURT_REVIEW = '1'
  255. AND B.ORDER_STS >= '12020232'
  256. AND B.VALIDFLAG = '1'
  257. AND B.CREATE_NAME IS NOT NULL
  258. AND B.PRICE_NO = C.PRICE_NO(+)
  259. ]]>
  260. </query>
  261. <query id="frmOrderReviewPrice.ChgeOrderPriceQueryIE" desc="国贸合同价格变更信息查询">
  262. <![CDATA[
  263. SELECT B.ORDER_NO,
  264. B.CUSTM_ORDER_NO,
  265. '' REVIEW_F_RS,
  266. B.ORD_PK,
  267. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.ORDER_TYP) ORDER_TYP,
  268. B.SALE_AREA_DESC SALE_AREA_NO,
  269. B.ORDER_YEAR,
  270. B.SIGN_DATE,
  271. B.SIGN_ADDRESS,
  272. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.SUPPLY_UNIT) SUPPLY_UNIT,
  273. (SELECT CUSTOMER_NM
  274. FROM SLM_BASE_CUSTOMER
  275. WHERE CUSTOMER_NO = B.STLMT_UNIT_NO) STLMT_UNIT_NO,
  276. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.MNY_ASK_TYP) MNY_ASK_TYP,
  277. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.CURRENCY) CURRENCY,
  278. B.ORDER_STS,
  279. (SELECT BASENAME
  280. FROM COM_BASE_INFO
  281. WHERE BASECODE = ORDER_STS
  282. AND VALIDFLAG = '1') ORDER_STS_DESC,
  283. CLOSE_TIME,
  284. B.EFFECT_TIME,
  285. B.APPROVAL_TIME,
  286. B.DELETE_TIME,
  287. B.DELETE_NAME,
  288. B.UPDATE_TIME,
  289. B.UPDATE_NAME,
  290. B.CREATE_TIME,
  291. B.CREATE_NAME,
  292. DECODE(B.VALIDFLAG, '1', '有效', '0', '无效') VALIDFLAG,
  293. B.ORDER_MODEL_NO,
  294. B.ORDER_MODEL_DESC,
  295. B.MNY_ASK_DESC,
  296. B.MANAG_NO,
  297. B.CUSTOMER_NM CUSTOMER_NO,
  298. B.SALE_ORG,
  299. B.MEMO,
  300. DECODE(LENGTH(B.PRICE_NO), 15, B.PRICE_NO, '') PRICE_NO,
  301. DECODE(LENGTH(C.PRICE_NO),
  302. 15,
  303. DECODE(C.PRICE_STATUS,
  304. 'L',
  305. '封锁',
  306. 'D',
  307. '无效',
  308. 'W',
  309. '待审',
  310. 'S',
  311. '通过',
  312. 'F',
  313. '不通过'),
  314. '') PRICE_STATUS,
  315. DECODE((SELECT TO_NUMBER(COUNT(1) -
  316. NVL(SUM(TO_NUMBER(A.BALNCE_PRICE_STS)), '0'))
  317. FROM SLM_ORDER_LINE A
  318. WHERE B.ORD_PK = A.ORD_PK
  319. AND B.VALIDFLAG = '1'),
  320. '0',
  321. '确认',
  322. '未确认') BAL_PRICE_STATUS,
  323. (SELECT BASENAME
  324. FROM COM_BASE_INFO
  325. WHERE BASECODE = B.FST_DRAWEE_UNIT) FST_DRAWEE_UNIT,
  326. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.PRICE_FL) PRICE_FL,
  327. DECODE(B.CUSTOMER_MODEL_FL, '1', 'TRUE', 'FALSE') CUSTOMER_MODEL_FL,
  328. '' REVIEW_ITM,
  329. '' REVIEW_STATUS
  330. FROM SLM_ORDER_HEAD B, SLM_ORDER_PRICE C
  331. WHERE B.SALE_ORG = '100102'
  332. AND B.ORDER_STS >= '12020301'
  333. AND B.VALIDFLAG = '1'
  334. AND B.CREATE_NAME IS NOT NULL
  335. AND B.PRICE_NO = C.PRICE_NO(+)
  336. ]]>
  337. </query>
  338. <query id="frmOrderReviewPrice.queryPrice" desc="合同价格说明信息">
  339. <![CDATA[
  340. SELECT A.ORD_PK,
  341. A.MANAG_NO,
  342. A.ORDER_NO,
  343. A.CUSTM_ORDER_NO,
  344. A.REVW_RPT_NO,
  345. A.ORDER_TYP,
  346. A.ORDER_TYP_DESC,
  347. A.PROTCL_NO,
  348. A.CUSTOMER_NO,
  349. A.CUSTOMER_NM,
  350. A.ABRVITION,
  351. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = A.SUPPLY_UNIT) SUPPLY_UNIT,
  352. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = A.PRICE_FL) PRICE_FL,
  353. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = A.CURRENCY) CURRENCY,
  354. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = A.MNY_ASK_TYP) MNY_ASK_TYP,
  355. A.STLMT_UNIT_NO,
  356. A.STLMT_UNIT_NM,
  357. (SELECT BASENAME
  358. FROM COM_BASE_INFO
  359. WHERE BASECODE = A.FST_DRAWEE_UNIT) FST_DRAWEE_UNIT,
  360. A.MNY_ASK_DESC,
  361. A.SALE_ORG,
  362. A.SALE_ORG_DESC,
  363. A.SALE_AREA_NO,
  364. A.SALE_AREA_DESC,
  365. A.ORDER_STS,
  366. A.ORDER_STS_DESC,
  367. A.CREATE_NAME,
  368. A.CREATE_TIME,
  369. A.PRICE_NO,
  370. TO_CHAR(A.PASS_TIME, 'YYYY-MM-DD') PASS_TIME,
  371. TO_CHAR(A.CONFIRM_TIME, 'YYYY-MM-DD') CONFIRM_TIME,
  372. B.ORD_LN_PK,
  373. B.ORDER_SEQ,
  374. A.ORDER_NO || '/' || B.ORDER_SEQ ORDER_NO_SEQ,
  375. B.PSC,
  376. B.PSC_DESC,
  377. B.MSC,
  378. B.MSC_DESC,
  379. B.MSC_STYLE,
  380. B.USE_CODE,
  381. B.USE_DESC,
  382. B.PRODUCCODE,
  383. B.PRODUCNAME,
  384. B.STD_CODE,
  385. B.STD_NAME,
  386. B.STEELCODE,
  387. B.STEELNAME,
  388. B.STD_STYLE,
  389. B.STD_STYLE_DESC,
  390. B.ORDER_SPEC_CODE,
  391. B.ORDER_SPEC_DESC,
  392. B.SPEC_CODE,
  393. B.SPEC_NAME,
  394. B.DIMATER,
  395. B.HEIGHT,
  396. B.MODEL_CODE,
  397. B.MODEL_DESC,
  398. B.LEN_DESC,
  399. B.LEN_UNIT,
  400. B.LEN_MIN,
  401. B.LEN_MAX,
  402. B.SHRT_LEN_RATO,
  403. B.SHORTEST,
  404. B.LONG_LEN_RATO,
  405. B.LONGEST,
  406. B.SHRT_STOVE,
  407. B.AVG_LEN_MIN,
  408. B.DIFRNC_LEN_MAX,
  409. B.ENDLEN_SPECSTD,
  410. B.SIGL_LEN,
  411. B.ORDER_UNIT,
  412. B.ORDER_QTY,
  413. B.ORD_ENSU_TOTL_LEN,
  414. ('(-' || TO_CHAR(B.DELVRY_RANGE_MIN) ||
  415. DECODE(B.DELVRY_RANGE_TPE, '%', '%', '') || ',' ||
  416. TO_CHAR(B.DELVRY_RANGE_MAX) ||
  417. DECODE(B.DELVRY_RANGE_TPE, '%', '%', '') || ')') DELVRY_RANGE_TPE,
  418. B.FINAL_USER,
  419. B.FINAL_USER_DESC,
  420. (SELECT BASENAME FROM COM_BASE_INFO WHERE BASECODE = B.OUTS_BILLET_FL) OUTS_BILLET_FL,
  421. (SELECT BASENAME
  422. FROM COM_BASE_INFO
  423. WHERE BASECODE = B.OUTS_STL_PIPE_FL) OUTS_STL_PIPE_FL,
  424. DECODE(B.ASSEL_FL, '1', '是', '否') ASSEL_FL,
  425. B.ORDER_ADD_DESC,
  426. B.ORDER_SPECIAL_DESC,
  427. ROUND(C.TRS_PRICE, 4) TRANS_PRICE,
  428. ROUND(C.OUT_PRICE, 4) OUT_PRICE,
  429. ROUND(C.BLA_PRICE, 4) BALNCE_PRICE,
  430. DECODE(B.BALNCE_PRICE_STS,'1','确认','未确认') BALNCE_PRICE_STS,
  431. ROUND(C.PAK_PRICE, 4) PAK_PRICE,
  432. ROUND(C.TON_PRICE, 4) TON_PRICE,
  433. B.AW,
  434. DECODE(B.KEEP_TYPE,'1','保总价','0','保单价') KEEP_TYPE,
  435. DECODE(A.CONTAIN_TAX,'1','含税','不含税') CONTAIN_TAX ,
  436. C.BLA_PRICE_ORG,
  437. ROUND(C.DDZY, 4) DDZY
  438. FROM SLM_ORDER_HEAD A, SLM_ORDER_LINE B, SLM_ORDER_PRICE_LIST C
  439. WHERE A.ORD_PK = B.ORD_PK
  440. AND A.VALIDFLAG = '1'
  441. AND B.VALIDFLAG = '1'
  442. AND A.PRICE_NO = C.PRICE_NO(+)
  443. AND B.ORD_LN_PK = C.ORD_LN_PK
  444. AND A.ORDER_STS >= '12020232'
  445. --AND A.SALE_ORG = ?
  446. AND A.ORDER_NO LIKE '%' || ? || '%'
  447. --AND A.CREATE_NAME IS NOT NULL
  448. --AND B.CREATE_NAME IS NOT NULL
  449. AND (SELECT TO_NUMBER(COUNT(1) -
  450. NVL(SUM(TO_NUMBER(D.BALNCE_PRICE_STS)), '0'))
  451. FROM SLM_ORDER_LINE D
  452. WHERE A.ORD_PK = D.ORD_PK
  453. AND D.VALIDFLAG = '1') ##ASK##
  454. ]]>
  455. </query>
  456. <query id="frmOrderReviewPrice.getOrderPriceStatus" desc="合同价格评审不通过写评审项目表">
  457. <![CDATA[
  458. SELECT T.PRICE_STATUS FROM SLM_ORDER_PRICE T
  459. WHERE T.PRICE_NO = (SELECT A.PRICE_NO FROM SLM_ORDER_HEAD A WHERE A.ORD_PK = ?)
  460. ]]>
  461. </query>
  462. <query id="frmOrderReviewPrice.getBalPriceStatus" desc="合同价格评审不通过写评审项目表">
  463. <![CDATA[
  464. SELECT NVL(SUM(T.BALNCE_PRICE_STS),'0') FROM SLM_ORDER_LINE T
  465. WHERE T.ORD_PK = ? AND T.VALIDFLAG = '1'
  466. ]]>
  467. </query>
  468. <query id="frmOrderReviewPrice.updateOrderPriceStatus" desc="合同价格评审不通过写评审项目表">
  469. <![CDATA[
  470. UPDATE SLM_ORDER_PRICE T
  471. SET T.PRICE_STATUS = 'D'
  472. WHERE T.PRICE_NO = (SELECT A.PRICE_NO
  473. FROM SLM_ORDER_HEAD A WHERE A.ORD_PK = ? AND A.VALIDFLAG = '1')
  474. ]]>
  475. </query>
  476. <query id="frmOrderReviewPrice.updateBalPriceStatus" desc="合同价格评审不通过写评审项目表">
  477. <![CDATA[
  478. UPDATE SLM_ORDER_LINE T
  479. SET T.BALNCE_PRICE_STS = '0'
  480. WHERE T.ORD_PK = ? AND T.VALIDFLAG = '1'
  481. ]]>
  482. </query>
  483. <query id="frmOrderReviewPrice.updateOrderPassTime" desc="合同价格评审不通过写评审项目表">
  484. <![CDATA[
  485. UPDATE SLM_ORDER_HEAD T
  486. SET T.PASS_TIME = SYSDATE
  487. WHERE T.ORD_PK = ? AND T.VALIDFLAG = '1'
  488. ]]>
  489. </query>
  490. <query id="frmOrderReviewPrice.updateOrderConfirmTime" desc="合同价格评审不通过写评审项目表">
  491. <![CDATA[
  492. UPDATE SLM_ORDER_HEAD T
  493. SET T.CONFIRM_TIME = SYSDATE
  494. WHERE T.ORD_PK = ? AND T.VALIDFLAG = '1'
  495. ]]>
  496. </query>
  497. <query id="frmOrderReviewPrice.UndoOrderConfirmTime" desc="合同价格评审不通过写评审项目表">
  498. <![CDATA[
  499. UPDATE SLM_ORDER_HEAD T
  500. SET T.CONFIRM_TIME = ''
  501. WHERE T.ORD_PK = ? AND T.VALIDFLAG = '1'
  502. ]]>
  503. </query>
  504. </queryMap>