CDSMonitoringObjF.cpp 14 KB

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