CDSMonitoringObjF.cpp 15 KB

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