CDSMonitoringObjF.cpp 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430
  1. //---------------------------------------------------------------------------
  2. #pragma hdrstop
  3. #include "AppGlobalF.h"
  4. #include "CDSMonitoringObjF.h"
  5. //---------------------------------------------------------------------------
  6. #pragma package(smart_init)
  7. //---------------------------------------------------------------------------
  8. TMonitoringScreenManager *ObjScreenManager = NULL;
  9. //---------------------------------------------------------------------------
  10. TMonitoringScreenManager::TMonitoringScreenManager()
  11. {
  12. }
  13. //---------------------------------------------------------------------------
  14. TMonitoringScreenManager::~TMonitoringScreenManager()
  15. {
  16. FLists.RemoveAll();
  17. }
  18. //---------------------------------------------------------------------------
  19. void TMonitoringScreenManager::Init()
  20. {
  21. FLists.RemoveAll();
  22. }
  23. //---------------------------------------------------------------------------
  24. //---------------------------------------------------------------------------
  25. TMonitoringCtlrManager *ObjCtlrManager = NULL;
  26. //---------------------------------------------------------------------------
  27. TMonitoringCtlrManager::TMonitoringCtlrManager(int AMonitoringType)
  28. {
  29. FMonitoringType = AMonitoringType;
  30. }
  31. //---------------------------------------------------------------------------
  32. TMonitoringCtlrManager::~TMonitoringCtlrManager()
  33. {
  34. FLists.RemoveAll();
  35. }
  36. //---------------------------------------------------------------------------
  37. bool TMonitoringCtlrManager::LoadCtlrFromDb(TADOConnection *ADbConn/*=NULL*/)
  38. {
  39. String sQry;
  40. TADOQuery *pADO = NULL;
  41. try
  42. {
  43. FLists.Lock();
  44. FLists.RemoveAll();
  45. }
  46. __finally
  47. {
  48. FLists.UnLock();
  49. }
  50. sQry = "SELECT A.*, \r\n"
  51. " B.VMS_TYPE_NM, \r\n"
  52. " B.VMS_WDTH, B.VMS_HGHT, \r\n"
  53. " B.ROW_NUM, B.COL_NUM, \r\n"
  54. " B.MODL_ROW_NUM, B.MODL_COL_NUM, \r\n"
  55. " B.POWR_ROW_NUM, B.POWR_COL_NUM \r\n"
  56. " FROM TB_VMS_CTLR A, \r\n"
  57. " TB_VMS_TYPE B \r\n"
  58. " WHERE A.VMS_TYPE_CD = B.VMS_TYPE_CD \r\n"
  59. " AND A.DEL_YN = 'N' \r\n";
  60. try
  61. {
  62. FLists.Lock();
  63. try
  64. {
  65. pADO = new TADOQuery(NULL);
  66. pADO->Close();
  67. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  68. pADO->SQL->Clear();
  69. pADO->SQL->Text = sQry;
  70. pADO->Open();
  71. for( ; !pADO->Eof; pADO->Next())
  72. {
  73. TMonitoringCtlr *pObj = new TMonitoringCtlr();
  74. pObj->CTLR_NMBR = pADO->FieldByName("VMS_CTLR_NMBR")->AsInteger;
  75. pObj->ID = pADO->FieldByName("VMS_CTLR_ID")->AsString;
  76. pObj->CTLR_ID = pADO->FieldByName("VMS_CTLR_ID")->AsString;
  77. pObj->NAME = pADO->FieldByName("VMS_NM")->AsString;
  78. pObj->CTLR_IP = pADO->FieldByName("VMS_CTLR_IP")->AsString;
  79. pObj->INFO1 = pADO->FieldByName("VMS_TYPE_NM")->AsString;
  80. pObj->STRM_IP = pADO->FieldByName("WEB_CMRA_IP")->AsString;
  81. pObj->STRM_ID = pADO->FieldByName("WEB_CMRA_ID")->AsString;
  82. pObj->STRM_PSWD = pADO->FieldByName("WEB_CMRA_PWD")->AsString;
  83. pObj->STRM_ADDR = pADO->FieldByName("STRM_SESN_NM")->AsString.Trim();
  84. pObj->FULL_STRM_ADDR = pADO->FieldByName("FULL_STRM_SESN_NM")->AsString.Trim();
  85. if (pObj->FULL_STRM_ADDR == "")
  86. {
  87. pObj->FULL_STRM_ADDR = pObj->STRM_ADDR;
  88. }
  89. FLists.Push(pObj->CTLR_NMBR, pObj);
  90. }
  91. }
  92. catch(EDatabaseError &E)
  93. {
  94. DBERRORMSG("TMonitoringCtlrManager::LoadCtlrFromDb", String(E.ClassName()), E.Message, sQry);
  95. throw Exception(String(E.ClassName()) + E.Message);
  96. }
  97. catch(Exception &e)
  98. {
  99. DBERRORMSG("TMonitoringCtlrManager::LoadCtlrFromDb", String(e.ClassName()), e.Message, sQry);
  100. throw Exception(String(e.ClassName()) + e.Message);
  101. }
  102. }
  103. __finally
  104. {
  105. if (pADO)
  106. {
  107. pADO->Close();
  108. delete pADO;
  109. }
  110. FLists.UnLock();
  111. }
  112. return true;
  113. }
  114. //---------------------------------------------------------------------------
  115. bool TMonitoringCtlrManager::InitMonitoringFormFromDb(TADOConnection *ADbConn/*=NULL*/)
  116. {
  117. String sQry;
  118. TADOQuery *pADO = NULL;
  119. // 모니터링유형(1:현시,2,시나리오,3,영상)
  120. sQry = "SELECT COUNT(1) AS CNT \r\n"
  121. " FROM TB_VMS_MONITORING \r\n"
  122. " WHERE MONITORING_TYPE = :p01 \r\n";
  123. try
  124. {
  125. try
  126. {
  127. pADO = new TADOQuery(NULL);
  128. pADO->Close();
  129. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  130. pADO->SQL->Clear();
  131. pADO->SQL->Text = sQry;
  132. pADO->Parameters->ParamByName("p01")->Value = String(FMonitoringType);
  133. pADO->Open();
  134. int nFormCnt = pADO->FieldByName("CNT")->AsInteger;
  135. if (nFormCnt > 0) return true;
  136. sQry = "INSERT INTO TB_VMS_MONITORING ( \r\n"
  137. " MONITORING_TYPE, \r\n"
  138. " MONITORING_NM, \r\n"
  139. " MONITORING_SEQ, \r\n"
  140. " VMS_CTLR_NMBR, \r\n"
  141. " VIEW_MODE \r\n"
  142. " ) \r\n"
  143. " VALUES ( \r\n"
  144. " :p01, \r\n"
  145. " :p02, \r\n"
  146. " :p03, \r\n"
  147. " :p04, \r\n"
  148. " 0 \r\n"
  149. " ) \r\n";
  150. pADO->SQL->Clear();
  151. pADO->SQL->Text = sQry;
  152. String sFormName = "Default";
  153. nFormCnt = 0;
  154. FOR_STL(TMonitoringCtlr*, pObj, FLists)
  155. {
  156. if (nFormCnt++ > 64) break; /* 한화면에 최대 64개 까지 설정 */
  157. pADO->Parameters->ParamByName("p01")->Value = String(FMonitoringType);
  158. pADO->Parameters->ParamByName("p02")->Value = sFormName;
  159. pADO->Parameters->ParamByName("p03")->Value = String(nFormCnt);
  160. pADO->Parameters->ParamByName("p04")->Value = String(pObj->CTLR_NMBR);
  161. pADO->ExecSQL();
  162. //pADO->RowsAffected;
  163. }
  164. }
  165. catch(EDatabaseError &E)
  166. {
  167. DBERRORMSG("TMonitoringCtlrManager::InitMonitoringFormFromDb", String(E.ClassName()), E.Message, sQry);
  168. throw Exception(String(E.ClassName()) + E.Message);
  169. }
  170. catch(Exception &e)
  171. {
  172. DBERRORMSG("TMonitoringCtlrManager::InitMonitoringFormFromDb", String(e.ClassName()), e.Message, sQry);
  173. throw Exception(String(e.ClassName()) + e.Message);
  174. }
  175. }
  176. __finally
  177. {
  178. if (pADO)
  179. {
  180. pADO->Close();
  181. delete pADO;
  182. }
  183. }
  184. return true;
  185. }
  186. //---------------------------------------------------------------------------
  187. bool TMonitoringCtlrManager::LoadMonitoringFormFromDb(TADOConnection *ADbConn/*=NULL*/)
  188. {
  189. String sQry;
  190. TADOQuery *pADO = NULL;
  191. if (ObjScreenManager == NULL)
  192. {
  193. ObjScreenManager = new TMonitoringScreenManager();
  194. }
  195. ObjScreenManager->Init();
  196. sQry = "SELECT TRIM(A.MONITORING_NM) AS MONITORING_NM, \r\n"
  197. " A.MONITORING_SEQ, \r\n"
  198. " A.VMS_CTLR_NMBR, \r\n"
  199. " A.VIEW_MODE \r\n"
  200. " FROM TB_VMS_MONITORING A, TB_VMS_CTLR B \r\n"
  201. " WHERE B.DEL_YN = 'N' \r\n"
  202. " AND B.VMS_CTLR_NMBR = A.VMS_CTLR_NMBR \r\n"
  203. " AND A.MONITORING_TYPE = :p01 \r\n"
  204. " ORDER BY A.MONITORING_NM, A.MONITORING_SEQ \r\n";
  205. try
  206. {
  207. FLists.Lock();
  208. try
  209. {
  210. pADO = new TADOQuery(NULL);
  211. pADO->Close();
  212. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  213. pADO->SQL->Clear();
  214. pADO->SQL->Text = sQry;
  215. pADO->Parameters->ParamByName("p01")->Value = String(FMonitoringType);
  216. pADO->Open();
  217. for( ; !pADO->Eof; pADO->Next())
  218. {
  219. String MONITORING_NM = pADO->FieldByName("MONITORING_NM")->AsString;
  220. int MONITORING_SEQ = pADO->FieldByName("MONITORING_SEQ")->AsInteger;
  221. int VMS_CTLR_NMBR = pADO->FieldByName("VMS_CTLR_NMBR")->AsInteger;
  222. int VIEW_MODE = pADO->FieldByName("VIEW_MODE")->AsInteger;
  223. TMonitoringScreen *pObj = ObjScreenManager->FLists.Find(MONITORING_NM);
  224. if (!pObj)
  225. {
  226. pObj = new TMonitoringScreen();
  227. pObj->NAME = MONITORING_NM;
  228. ObjScreenManager->FLists.Push(pObj->NAME, pObj);
  229. }
  230. TScreenCtlr *pScr = new TScreenCtlr();
  231. pScr->SEQ = pObj->FLists.Size()+1;
  232. pScr->CTLR_NMBR = VMS_CTLR_NMBR;
  233. pScr->VIEW_MODE = VIEW_MODE;
  234. pObj->FLists.Push(pScr->SEQ, pScr);
  235. }
  236. }
  237. catch(EDatabaseError &E)
  238. {
  239. DBERRORMSG("TMonitoringCtlrManager::LoadMonitoringFormFromDb", String(E.ClassName()), E.Message, sQry);
  240. throw Exception(String(E.ClassName()) + E.Message);
  241. }
  242. catch(Exception &e)
  243. {
  244. DBERRORMSG("TMonitoringCtlrManager::LoadMonitoringFormFromDb", String(e.ClassName()), e.Message, sQry);
  245. throw Exception(String(e.ClassName()) + e.Message);
  246. }
  247. }
  248. __finally
  249. {
  250. if (pADO)
  251. {
  252. pADO->Close();
  253. delete pADO;
  254. }
  255. FLists.UnLock();
  256. FOR_STL(TMonitoringScreen*, pObj, ObjScreenManager->FLists)
  257. {
  258. int nCtlrCount = pObj->FLists.Size();
  259. switch(nCtlrCount)
  260. {
  261. case 0: case 1: pObj->LAYOUT = 0; break; //1*1
  262. case 2: case 3: case 4: pObj->LAYOUT = 1; break; //2*2
  263. case 5: case 6: pObj->LAYOUT = 3; break; //3*2
  264. case 7: case 8: case 9: pObj->LAYOUT = 2; break; //3*3
  265. case 10: case 11: case 12: pObj->LAYOUT = 4; break; //4*3
  266. case 13: case 14: case 15: case 16: pObj->LAYOUT = 5; break; //4*4
  267. case 17: case 18: case 19: case 20: pObj->LAYOUT = 7; break; //5*4
  268. case 21: case 22: case 23: case 24: pObj->LAYOUT = 8; break; //6*4
  269. case 25: case 26: case 27: case 28:
  270. case 29: case 30: pObj->LAYOUT = 9; break; //6*5
  271. default:
  272. if (nCtlrCount <= 42) pObj->LAYOUT = 10; //7*6
  273. else if (nCtlrCount <= 56) pObj->LAYOUT = 11; //8*7
  274. else pObj->LAYOUT = 12; //8*8
  275. break;
  276. }
  277. }
  278. }
  279. return true;
  280. }
  281. //---------------------------------------------------------------------------
  282. bool TMonitoringCtlrManager::DelMonitoringFormFromDb(String AMonitoringName, TADOConnection *ADbConn/*=NULL*/)
  283. {
  284. String sQry;
  285. TADOQuery *pADO = NULL;
  286. sQry = "DELETE TB_VMS_MONITORING \r\n"
  287. " WHERE MONITORING_TYPE = :p01 \r\n"
  288. " AND MONITORING_NM = :p02 \r\n";
  289. try
  290. {
  291. try
  292. {
  293. pADO = new TADOQuery(NULL);
  294. pADO->Close();
  295. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  296. pADO->SQL->Clear();
  297. pADO->SQL->Text = sQry;
  298. pADO->Parameters->ParamByName("p01")->Value = String(FMonitoringType);
  299. pADO->Parameters->ParamByName("p02")->Value = AMonitoringName;
  300. pADO->ExecSQL();
  301. //pADO->RowsAffected;
  302. }
  303. catch(EDatabaseError &E)
  304. {
  305. DBERRORMSG("TMonitoringCtlrManager::DelMonitoringFormFromDb", String(E.ClassName()), E.Message, sQry);
  306. throw Exception(String(E.ClassName()) + E.Message);
  307. }
  308. catch(Exception &e)
  309. {
  310. DBERRORMSG("TMonitoringCtlrManager::DelMonitoringFormFromDb", String(e.ClassName()), e.Message, sQry);
  311. throw Exception(String(e.ClassName()) + e.Message);
  312. }
  313. }
  314. __finally
  315. {
  316. if (pADO)
  317. {
  318. pADO->Close();
  319. delete pADO;
  320. }
  321. }
  322. return true;
  323. }
  324. //---------------------------------------------------------------------------
  325. bool TMonitoringCtlrManager::InsMonitoringFormFromDb(String AMonitoringName, int ASeq, String ACtlrNmbr, int AViewMode, TADOConnection *ADbConn/*=NULL*/)
  326. {
  327. String sQry;
  328. TADOQuery *pADO = NULL;
  329. sQry = "INSERT INTO TB_VMS_MONITORING ( \r\n"
  330. " MONITORING_TYPE, \r\n"
  331. " MONITORING_NM, \r\n"
  332. " MONITORING_SEQ, \r\n"
  333. " VMS_CTLR_NMBR, \r\n"
  334. " VIEW_MODE \r\n"
  335. " ) \r\n"
  336. " VALUES ( \r\n"
  337. " :p01, \r\n"
  338. " :p02, \r\n"
  339. " :p03, \r\n"
  340. " :p04, \r\n"
  341. " :p05 \r\n"
  342. " ) \r\n";
  343. try
  344. {
  345. try
  346. {
  347. pADO = new TADOQuery(NULL);
  348. pADO->Close();
  349. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  350. pADO->SQL->Clear();
  351. pADO->SQL->Text = sQry;
  352. pADO->Parameters->ParamByName("p01")->Value = String(FMonitoringType);
  353. pADO->Parameters->ParamByName("p02")->Value = AMonitoringName;
  354. pADO->Parameters->ParamByName("p03")->Value = ASeq;
  355. pADO->Parameters->ParamByName("p04")->Value = ACtlrNmbr;
  356. pADO->Parameters->ParamByName("p05")->Value = AViewMode;
  357. pADO->ExecSQL();
  358. //pADO->RowsAffected;
  359. }
  360. catch(EDatabaseError &E)
  361. {
  362. DBERRORMSG("TMonitoringCtlrManager::InsMonitoringFormFromDb", String(E.ClassName()), E.Message, sQry);
  363. throw Exception(String(E.ClassName()) + E.Message);
  364. }
  365. catch(Exception &e)
  366. {
  367. DBERRORMSG("TMonitoringCtlrManager::InsMonitoringFormFromDb", String(e.ClassName()), e.Message, sQry);
  368. throw Exception(String(e.ClassName()) + e.Message);
  369. }
  370. }
  371. __finally
  372. {
  373. if (pADO)
  374. {
  375. pADO->Close();
  376. delete pADO;
  377. }
  378. }
  379. return true;
  380. }
  381. //---------------------------------------------------------------------------