VMS.SQL 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380
  1. sQry = "SELECT TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS') AS S_DATE \r\n"
  2. " FROM DUAL \r\n";
  3. sQry = "SELECT SYST_ID, SYST_TYPE, \r\n"
  4. " SYST_IP_1, PRGM_PORT \r\n"
  5. " FROM TB_UNIT_SYST \r\n"
  6. " WHERE DEL_YN = 'N' \r\n"
  7. " ORDER BY SYST_ID \r\n";
  8. sQry = "SELECT PORT \r\n"
  9. " FROM PROCESS \r\n"
  10. " WHERE PROCESSID = :p01 \r\n";
  11. sQry = "SELECT A.*, \r\n"
  12. " (SELECT NVL(ATRB1, '320') \r\n"
  13. " FROM TB_CMMN_CD \r\n"
  14. " WHERE CMMN_CLSF_CD = 'VMP' \r\n"
  15. " AND CMMN_CD = A.VMS_TYPE_CD) AS FORMW, \r\n"
  16. " (SELECT NVL(ATRB2, '64') \r\n"
  17. " FROM TB_CMMN_CD \r\n"
  18. " WHERE CMMN_CLSF_CD = 'VMP' \r\n"
  19. " AND CMMN_CD = A.VMS_TYPE_CD) AS FORMH \r\n"
  20. " FROM TB_VMS_CTLR A \r\n"
  21. " WHERE A.DEL_YN = 'N' \r\n";
  22. sQry = "SELECT A.* \r\n"
  23. " FROM TB_VMS_STTS_PRST A, \r\n"
  24. " TB_VMS_CTLR B \r\n"
  25. " WHERE B.DEL_YN = 'N' \r\n"
  26. " AND A.VMS_CTLR_NMBR = B.VMS_CTLR_NMBR \r\n";
  27. sQry = "SELECT A.VMS_CTLR_NMBR, B.VMS_IFSC_ID, \r\n"
  28. " B.DSPL_PRRT, C.AXIS_YN \r\n"
  29. " FROM TB_VMS_CTLR A, \r\n"
  30. " TB_VMS_IFSC_RLTN B, \r\n"
  31. " TB_VMS_IFSC C \r\n"
  32. " WHERE A.VMS_CTLR_NMBR = B.VMS_CTLR_NMBR \r\n"
  33. " AND B.VMS_IFSC_ID = C.VMS_IFSC_ID \r\n"
  34. " AND C.EDTN_CD <> 'EDI2' \r\n"
  35. " AND A.DEL_YN = 'N' \r\n"
  36. " ORDER BY A.VMS_CTLR_NMBR, B.DSPL_PRRT \r\n";
  37. sQry = "SELECT A.VMS_CTLR_NMBR, \r\n"
  38. " A.PANL_ON_TIME, \r\n"
  39. " A.PANL_OFF_TIME \r\n"
  40. " FROM TB_VMS_CTLR A \r\n"
  41. " WHERE A.DEL_YN = 'N' \r\n";
  42. //-->용인에서만 사용함
  43. sQry = "SELECT A.VMS_CTLR_NMBR, A.SCH_TIME, A.LUMINANCE \r\n"
  44. " FROM TB_VMS_LUM_SET_SCH A, \r\n"
  45. " TB_VMS_CTLR B \r\n"
  46. " WHERE A.VMS_CTLR_NMBR = B.VMS_CTLR_NMBR \r\n"
  47. " AND B.DEL_YN = 'N' \r\n"
  48. " AND A.USE_YN = 'Y' \r\n"
  49. " AND A.SCH_TIME = TO_CHAR(SYSDATE, 'HH24MI') \r\n";
  50. //사용안함
  51. sQry = "SELECT A.VMS_CTLR_NMBR, A.RGST_DT, \r\n"
  52. " A.FILETYPE, A.FILEID \r\n"
  53. " FROM TB_VMS_DOWNLOAD A \r\n"
  54. " WHERE A.SENDSTARTDATE <= TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS') \r\n"
  55. " AND A.SENDRESULT = 0 \r\n"
  56. " ORDER BY A.VMS_CTLR_NMBR, A.RGST_DT DESC, A.FILETYPE, A.FILEID \r\n";
  57. sQry = "SELECT A.* \r\n"
  58. " FROM TB_VMS_SYMB_LIB A \r\n";
  59. sQry = "SELECT B.* \r\n"
  60. " FROM TB_VMS_SYMB_LIB A, \r\n"
  61. " TB_VMS_SYMB_IFSC B \r\n"
  62. " WHERE A.SYMBLIB_NMBR = B.SYMBLIB_NMBR \r\n"
  63. " ORDER BY B.SYMBLIB_NMBR, B.CELL_ID \r\n";
  64. sQry = "SELECT A.* \r\n"
  65. " FROM TB_VMS_FORM A \r\n";
  66. sQry = "SELECT B.*, NVL(C.IMAG_DATA, B.VMS_DSPL_FIGR) AS IMAG_DATA \r\n"
  67. " FROM TB_VMS_FORM A, \r\n"
  68. " TB_VMS_FORM_OBJECT B, \r\n"
  69. " TB_VMS_SYMB_LIB C \r\n"
  70. " WHERE A.VMS_FORM_ID = B.VMS_FORM_ID \r\n"
  71. " AND B.SYMBLIB_NMBR = C.SYMBLIB_NMBR(+) \r\n"
  72. " ORDER BY B.VMS_FORM_ID, B.FORM_OBJECT_ID \r\n";
  73. sQry = "SELECT A.VMS_IFSC_ID, A.VMS_IFSC_NM, A.DSPL_STRT_NODE_NM, A.DSPL_END_NODE_NM, \r\n"
  74. " A.ROAD_NM, A.SPOT_NM, \r\n"
  75. " A.DETR_ID, A.AXIS_YN, \r\n"
  76. " NVL(B.RGST_DT, '') AS RGST_DT, \r\n"
  77. " NVL(B.CMTR_GRAD_CD, '0') AS CMTR_GRAD_CD, \r\n"
  78. " NVL(B.SPED, 0) AS SPED, \r\n"
  79. " NVL(B.TRVL_HH, 0) AS TRVL_HH \r\n"
  80. " FROM TB_VMS_IFSC A, \r\n"
  81. " (SELECT * \r\n"
  82. " FROM TB_VMS_CMTRINFR \r\n"
  83. " WHERE RGST_DT >= TO_CHAR(SYSDATE-10/1440, 'YYYYMMDDHH24MISS') ) B \r\n"
  84. " WHERE A.VMS_IFSC_ID = B.VMS_IFSC_ID(+) \r\n";
  85. sQry = "SELECT B.*, DECODE(B.TRFC_SITU_TYPE_CD, '0', 7, \r\n"
  86. " '1', 3, \r\n"
  87. " '2', 4, \r\n"
  88. " '3', 5, \r\n"
  89. " '4', 6, \r\n"
  90. " '5', 1, \r\n"
  91. " '6', 0, \r\n"
  92. " '7', 8, 9) AS SCHPRIT \r\n"
  93. " FROM TB_VMS_CTLR A, \r\n"
  94. " TB_VMS_TRFC_INFR_DSPL_SCH B, \r\n"
  95. " TB_VMS_FORM C \r\n"
  96. " WHERE A.DEL_YN = 'N' \r\n"
  97. " AND A.VMS_CTLR_NMBR = B.VMS_CTLR_NMBR \r\n"
  98. " AND B.VMS_FORM_ID = C.VMS_FORM_ID \r\n"
  99. " AND B.USE_YN = 'Y' \r\n"
  100. " AND TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS') BETWEEN \r\n"
  101. " B.DSPL_STRT_HH AND B.DSPL_END_HH \r\n";
  102. sQry = "SELECT * \r\n"
  103. " FROM ( \r\n" + sQry +
  104. " ) \r\n"
  105. " ORDER BY VMS_CTLR_NMBR ASC, SCHPRIT ASC, PHASE ASC \r\n";
  106. sQry = "SELECT V.VMS_CTLR_NMBR, V.LINK_ID, V.IFSC_ID, V.VMS_IFSC_ID, \r\n"
  107. " V.VMS_IFSC_NM, V.DSPL_STRT_NODE_NM, V.DSPL_END_NODE_NM, \r\n"
  108. " V.DETR_ID, V.DSPL_PRRT, I.INCD_OCRR_ID, I.STRT_LCTN_NM, \r\n"
  109. " V.ROAD_NM, V.SPOT_NM, \r\n"
  110. " I.END_LCTN_NM, I.OCRR_LCTN_NM, \r\n"
  111. " (SELECT CMMN_CD_KOR_NM \r\n"
  112. " FROM TB_CMMN_CD \r\n"
  113. " WHERE CMMN_CD = I.VMS_INCD_TYPE_CD \r\n"
  114. " AND CMMN_CLSF_CD = 'VIT') AS VMS_INCD_TYPE_NM, \r\n"
  115. " I.VMS_INCD_TYPE_CD, \r\n"
  116. " CASE WHEN I.VMS_INCD_TYPE_CD = 'VIT1' THEN \r\n"
  117. " (SELECT CMMN_CD_KOR_NM \r\n"
  118. " FROM TB_CMMN_CD \r\n"
  119. " WHERE CMMN_CD = I.VMS_INCD_DETL_TYPE_CD \r\n"
  120. " AND CMMN_CLSF_CD = 'IDT') \r\n"
  121. " ELSE \r\n"
  122. " (SELECT CMMN_CD_KOR_NM \r\n"
  123. " FROM TB_CMMN_CD \r\n"
  124. " WHERE CMMN_CD = I.VMS_INCD_DETL_TYPE_CD \r\n"
  125. " AND CMMN_CLSF_CD = 'EDT') \r\n"
  126. " END AS VMS_INCD_DETL_NM, \r\n"
  127. " I.VMS_INCD_DETL_TYPE_CD, \r\n"
  128. " (SELECT CMMN_CD_KOR_NM \r\n"
  129. " FROM TB_CMMN_CD \r\n"
  130. " WHERE CMMN_CD = I.CMTR_GRAD_CD \r\n"
  131. " AND CMMN_CLSF_CD = 'LTC') AS CMTR_GRAD_NM, \r\n"
  132. " I.CMTR_GRAD_CD, \r\n"
  133. " I.INCD_CLSR_LANE, \r\n"
  134. " I.INCD_STRT_DT, \r\n"
  135. " I.INCD_END_PRAR_DT \r\n"
  136. " FROM (SELECT D.VMS_CTLR_NMBR, A.LINK_ID, \r\n"
  137. " A.IFSC_ID, B.VMS_IFSC_ID, \r\n"
  138. " C.VMS_IFSC_NM, \r\n"
  139. " C.DSPL_STRT_NODE_NM, \r\n"
  140. " C.DSPL_END_NODE_NM, \r\n"
  141. " NVL(C.DETR_ID, 0) AS DETR_ID, \r\n"
  142. " C.ROAD_NM, C.SPOT_NM, \r\n"
  143. " D.DSPL_PRRT \r\n"
  144. " FROM TB_IFSC_LINK_RLTN A, \r\n"
  145. " TB_VMS_LINK_IFSC B, \r\n"
  146. " TB_VMS_IFSC C, \r\n"
  147. " TB_VMS_IFSC_RLTN D \r\n"
  148. " WHERE A.IFSC_ID = B.IFSC_ID \r\n"
  149. " AND B.VMS_IFSC_ID = C.VMS_IFSC_ID \r\n"
  150. " AND C.VMS_IFSC_ID = D.VMS_IFSC_ID ) V, \r\n"
  151. " (SELECT * \r\n"
  152. " FROM TB_INCD_OCRR_VMS \r\n"
  153. " WHERE INCD_PRGR_STEP_CD = 'ISS2' \r\n"
  154. " AND VMS_DSPL_YN = 'Y' \r\n"
  155. " AND VMS_INCD_TYPE_CD IN ('VIT1', 'VIT2') ) I \r\n"
  156. " WHERE V.LINK_ID = I.LINK_ID \r\n"
  157. " ORDER BY V.VMS_CTLR_NMBR \r\n";
  158. sQry = "SELECT A.VMS_CTLR_NMBR, A.OPER_MODE, \r\n"
  159. " NVL(A.VMS_MAX_PHSE_NUM, 16) AS VMS_MAX_PHSE_NUM \r\n"
  160. " FROM TB_VMS_CTLR A \r\n"
  161. " WHERE A.DEL_YN = 'N' \r\n";
  162. sQry = "MERGE INTO TB_VMS_STTS_PRST L \r\n"
  163. "USING (SELECT :p01 AS VMS_CTLR_NMBR, \r\n"
  164. " :p02 AS RGST_DT, \r\n"
  165. " :p03 AS CONN_STTS_CD, \r\n"
  166. " :p04 AS CBOXDOOR_OPEN_STTS_CD, \r\n"
  167. " :p05 AS PWER_STTS_CD, \r\n"
  168. " :p06 AS CBOX_TMPR, \r\n"
  169. " :p07 AS CBOX_HMDT, \r\n"
  170. " :p08 AS FAN_STTS_CD, \r\n"
  171. " :p09 AS HETR_STTS_CD, \r\n"
  172. " :p10 AS CBOXFAN_STTS_CD \r\n"
  173. " FROM DUAL) M \r\n"
  174. "ON (L.VMS_CTLR_NMBR = M.VMS_CTLR_NMBR) \r\n"
  175. "WHEN MATCHED THEN \r\n"
  176. " UPDATE SET L.RGST_DT = M.RGST_DT, \r\n"
  177. " L.CONN_STTS_CD = M.CONN_STTS_CD, \r\n"
  178. " L.CBOXDOOR_OPEN_STTS_CD = M.CBOXDOOR_OPEN_STTS_CD, \r\n"
  179. " L.PWER_STTS_CD = M.PWER_STTS_CD, \r\n"
  180. " L.CBOX_TMPR = M.CBOX_TMPR, \r\n"
  181. " L.CBOX_HMDT = M.CBOX_HMDT, \r\n"
  182. " L.FAN_STTS_CD = M.FAN_STTS_CD, \r\n"
  183. " L.HETR_STTS_CD = M.HETR_STTS_CD, \r\n"
  184. " L.CBOXFAN_STTS_CD = M.CBOXFAN_STTS_CD \r\n"
  185. "WHEN NOT MATCHED THEN \r\n"
  186. " INSERT (L.VMS_CTLR_NMBR, \r\n"
  187. " L.RGST_DT, \r\n"
  188. " L.CONN_STTS_CD, \r\n"
  189. " L.CBOXDOOR_OPEN_STTS_CD, \r\n"
  190. " L.PWER_STTS_CD, \r\n"
  191. " L.CBOX_TMPR, \r\n"
  192. " L.CBOX_HMDT, \r\n"
  193. " L.FAN_STTS_CD, \r\n"
  194. " L.HETR_STTS_CD, \r\n"
  195. " L.CBOXFAN_STTS_CD) \r\n"
  196. " VALUES (M.VMS_CTLR_NMBR, \r\n"
  197. " M.RGST_DT, \r\n"
  198. " M.CONN_STTS_CD, \r\n"
  199. " M.CBOXDOOR_OPEN_STTS_CD, \r\n"
  200. " M.PWER_STTS_CD, \r\n"
  201. " M.CBOX_TMPR, \r\n"
  202. " M.CBOX_HMDT, \r\n"
  203. " M.FAN_STTS_CD, \r\n"
  204. " M.HETR_STTS_CD, \r\n"
  205. " M.CBOXFAN_STTS_CD) \r\n";
  206. iQry = "INSERT INTO TB_VMS_STTS_HS \r\n"
  207. " (VMS_CTLR_NMBR, \r\n"
  208. " RGST_DT, \r\n"
  209. " CONN_STTS_CD, \r\n"
  210. " CBOXDOOR_OPEN_STTS_CD, \r\n"
  211. " PWER_STTS_CD, \r\n"
  212. " CBOX_TMPR, \r\n"
  213. " CBOX_HMDT, \r\n"
  214. " FAN_STTS_CD, \r\n"
  215. " HETR_STTS_CD, \r\n"
  216. " CBOXFAN_STTS_CD) \r\n"
  217. " VALUES (:p01, \r\n"
  218. " :p02, \r\n"
  219. " :p03, \r\n"
  220. " :p04, \r\n"
  221. " :p05, \r\n"
  222. " :p06, \r\n"
  223. " :p07, \r\n"
  224. " :p08, \r\n"
  225. " :p09, \r\n"
  226. " :p10) \r\n";
  227. sQry = "MERGE INTO TB_VMS_STTS_PRST L \r\n"
  228. "USING (SELECT :p01 AS VMS_CTLR_NMBR, \r\n"
  229. " :p02 AS RGST_DT, \r\n"
  230. " :p03 AS CONN_STTS_CD, \r\n"
  231. " :p04 AS CBOXDOOR_OPEN_STTS_CD, \r\n"
  232. " :p05 AS PWER_STTS_CD, \r\n"
  233. " :p06 AS CBOX_TMPR, \r\n"
  234. " :p07 AS CBOX_HMDT, \r\n"
  235. " :p08 AS FAN_STTS_CD, \r\n"
  236. " :p09 AS HETR_STTS_CD, \r\n"
  237. " :p10 AS CBOXFAN_STTS_CD \r\n"
  238. " FROM DUAL) M \r\n"
  239. "ON (L.VMS_CTLR_NMBR = M.VMS_CTLR_NMBR) \r\n"
  240. "WHEN MATCHED THEN \r\n"
  241. " UPDATE SET L.RGST_DT = M.RGST_DT, \r\n"
  242. " L.CONN_STTS_CD = M.CONN_STTS_CD, \r\n"
  243. " L.CBOXDOOR_OPEN_STTS_CD = M.CBOXDOOR_OPEN_STTS_CD, \r\n"
  244. " L.PWER_STTS_CD = M.PWER_STTS_CD, \r\n"
  245. " L.CBOX_TMPR = M.CBOX_TMPR, \r\n"
  246. " L.CBOX_HMDT = M.CBOX_HMDT, \r\n"
  247. " L.FAN_STTS_CD = M.FAN_STTS_CD, \r\n"
  248. " L.HETR_STTS_CD = M.HETR_STTS_CD, \r\n"
  249. " L.CBOXFAN_STTS_CD = M.CBOXFAN_STTS_CD \r\n"
  250. "WHEN NOT MATCHED THEN \r\n"
  251. " INSERT (L.VMS_CTLR_NMBR, \r\n"
  252. " L.RGST_DT, \r\n"
  253. " L.CONN_STTS_CD, \r\n"
  254. " L.CBOXDOOR_OPEN_STTS_CD, \r\n"
  255. " L.PWER_STTS_CD, \r\n"
  256. " L.CBOX_TMPR, \r\n"
  257. " L.CBOX_HMDT, \r\n"
  258. " L.FAN_STTS_CD, \r\n"
  259. " L.HETR_STTS_CD, \r\n"
  260. " L.CBOXFAN_STTS_CD) \r\n"
  261. " VALUES (M.VMS_CTLR_NMBR, \r\n"
  262. " M.RGST_DT, \r\n"
  263. " M.CONN_STTS_CD, \r\n"
  264. " M.CBOXDOOR_OPEN_STTS_CD, \r\n"
  265. " M.PWER_STTS_CD, \r\n"
  266. " M.CBOX_TMPR, \r\n"
  267. " M.CBOX_HMDT, \r\n"
  268. " M.FAN_STTS_CD, \r\n"
  269. " M.HETR_STTS_CD, \r\n"
  270. " M.CBOXFAN_STTS_CD) \r\n";
  271. sQry = "MERGE INTO TB_VMS_DSPL_PRST L \r\n"
  272. "USING (SELECT :p01 AS VMS_CTLR_NMBR, \r\n"
  273. " :p02 AS PHASE, \r\n"
  274. " :p03 AS DSPL_DT, \r\n"
  275. " :p04 AS VMS_DSPL_MSG_DATA, \r\n"
  276. " :p05 AS VMS_DSPL_MSG_TXT, \r\n"
  277. " :p06 AS TRFC_SITU_TYPE_CD, \r\n"
  278. " :p07 AS VMS_MSG_DSPL_DRCT_CD, \r\n"
  279. " :p08 AS VMS_MSG_DSPL_MTHD_CD, \r\n"
  280. " :p09 AS DSPL_HH, \r\n"
  281. " :p10 AS VMS_FORM_ID, \r\n"
  282. " :p11 AS DNLD_YN \r\n"
  283. " FROM DUAL) M \r\n"
  284. " ON (L.VMS_CTLR_NMBR = M.VMS_CTLR_NMBR AND L.PHASE = M.PHASE) \r\n"
  285. "WHEN MATCHED THEN \r\n"
  286. "UPDATE SET L.DSPL_DT = M.DSPL_DT, \r\n"
  287. " L.VMS_DSPL_MSG_DATA = M.VMS_DSPL_MSG_DATA, \r\n"
  288. " L.VMS_DSPL_MSG_TXT = M.VMS_DSPL_MSG_TXT, \r\n"
  289. " L.TRFC_SITU_TYPE_CD = M.TRFC_SITU_TYPE_CD, \r\n"
  290. " L.VMS_MSG_DSPL_DRCT_CD = M.VMS_MSG_DSPL_DRCT_CD, \r\n"
  291. " L.VMS_MSG_DSPL_MTHD_CD = M.VMS_MSG_DSPL_MTHD_CD, \r\n"
  292. " L.DSPL_HH = M.DSPL_HH, \r\n"
  293. " L.VMS_FORM_ID = M.VMS_FORM_ID, \r\n"
  294. " L.DNLD_YN = M.DNLD_YN \r\n"
  295. "WHEN NOT MATCHED THEN \r\n"
  296. "INSERT (VMS_CTLR_NMBR, PHASE, DSPL_DT, \r\n"
  297. " VMS_DSPL_MSG_DATA, VMS_DSPL_MSG_TXT, \r\n"
  298. " TRFC_SITU_TYPE_CD, VMS_MSG_DSPL_DRCT_CD, \r\n"
  299. " VMS_MSG_DSPL_MTHD_CD, DSPL_HH, \r\n"
  300. " VMS_FORM_ID, DNLD_YN) \r\n"
  301. "VALUES (M.VMS_CTLR_NMBR, M.PHASE, M.DSPL_DT, \r\n"
  302. " M.VMS_DSPL_MSG_DATA, M.VMS_DSPL_MSG_TXT, \r\n"
  303. " M.TRFC_SITU_TYPE_CD, M.VMS_MSG_DSPL_DRCT_CD, \r\n"
  304. " M.VMS_MSG_DSPL_MTHD_CD, M.DSPL_HH, \r\n"
  305. " M.VMS_FORM_ID, M.DNLD_YN) \r\n";
  306. uQry = "UPDATE TB_VMS_DSPL_PRST \r\n"
  307. " SET VMS_DSPL_MSG_IMAG = :p03 \r\n"
  308. " WHERE VMS_CTLR_NMBR = :p01 \r\n"
  309. " AND PHASE = :p02 \r\n";
  310. sQry = "INSERT INTO TB_UNIT_SYST_STTS_HS(SYST_ID, CRTN_DT, SYST_STTS_CD) \r\n"
  311. " VALUES(:p01, TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS'), :p02) \r\n";
  312. sQry = "INSERT INTO TB_VMS_DSPL_HS \r\n"
  313. " (VMS_CTLR_NMBR, DSPL_PHASE_NUM, DSPL_DT, \r\n"
  314. " VMS_DSPL_MSG_DATA, VMS_DSPL_MSG_TXT, \r\n"
  315. " TRFC_SITU_TYPE_CD, VMS_MSG_DSPL_DRCT_CD, \r\n"
  316. " VMS_MSG_DSPL_MTHD_CD, DSPL_HH, \r\n"
  317. " VMS_FORM_ID, DNLD_YN) \r\n"
  318. "SELECT VMS_CTLR_NMBR, PHASE, DSPL_DT, \r\n"
  319. " VMS_DSPL_MSG_DATA, VMS_DSPL_MSG_TXT, \r\n"
  320. " TRFC_SITU_TYPE_CD, VMS_MSG_DSPL_DRCT_CD, \r\n"
  321. " VMS_MSG_DSPL_MTHD_CD, DSPL_HH, \r\n"
  322. " VMS_FORM_ID, DNLD_YN \r\n"
  323. " FROM TB_VMS_DSPL_PRST \r\n"
  324. " WHERE VMS_CTLR_NMBR = :p01 \r\n"
  325. " AND PHASE <= :p02 \r\n";
  326. sQry = "UPDATE TB_VMS_CTLR \r\n"
  327. " SET VMS_PHSE_CHNG_CYCL = :p01, \r\n"
  328. " VMS_CMNC_ERR_BASS_VAL = :p02, \r\n"
  329. " FAN_MTNS_TMPR = :p03, \r\n"
  330. " HETR_MTNS_TMPR = :p04, \r\n"
  331. " VMS_MODL_ERR_RATE = :p05 \r\n"
  332. " WHERE VMS_CTLR_NMBR = :p06 \r\n";
  333. sQry = "UPDATE TB_VMS_DOWNLOAD \r\n"
  334. " SET SENDENDDATE = :p05, \r\n"
  335. " SENDSTEP = :p06, \r\n"
  336. " SENDRESULT = :p07 \r\n"
  337. " WHERE RGST_DT = :p01 \r\n"
  338. " AND VMS_CTLR_NMBR = :p02 \r\n"
  339. " AND FILETYPE = :p03 \r\n"
  340. " AND FILEID = :p04 \r\n";
  341. sQry = "UPDATE TB_VMS_DSPL_PRST \r\n"
  342. " SET DSPL_DT = :p03, \r\n"
  343. " DNLD_YN = :p04 \r\n"
  344. " WHERE VMS_CTLR_NMBR = :p01 \r\n"
  345. " AND PHASE <= :p02 \r\n";