ITS0020MF.cpp 31 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #include "ITSSkinF.h"
  4. #include "ITSUtilF.h"
  5. #include "ITSDbF.h"
  6. #include "WindowMsgF.h"
  7. #include "AppGlobalF.h"
  8. #include "CDSCodeF.h"
  9. #include "CDSNodeF.h"
  10. #include "CDSLinkF.h"
  11. #include "CDSIfscF.h"
  12. #include "ITSSEL0MF.h"
  13. #include "ITSSEL1MF.h"
  14. #include "ITSSEL2MF.h"
  15. #include "ITSSEL3MF.h"
  16. #include "ITSSELAMF.h"
  17. #include "ITSLangTransF.h"
  18. #include "ITS_OPLibF.h"
  19. #pragma hdrstop
  20. #include "ITS0020MF.h"
  21. //---------------------------------------------------------------------------
  22. #pragma package(smart_init)
  23. #pragma link "cxButtons"
  24. #pragma link "cxCalc"
  25. #pragma link "cxCalendar"
  26. #pragma link "cxCheckBox"
  27. #pragma link "cxClasses"
  28. #pragma link "cxContainer"
  29. #pragma link "cxControls"
  30. #pragma link "cxCustomData"
  31. #pragma link "cxData"
  32. #pragma link "cxDataStorage"
  33. #pragma link "cxEdit"
  34. #pragma link "cxFilter"
  35. #pragma link "cxGraphics"
  36. #pragma link "cxGrid"
  37. #pragma link "cxGridCustomTableView"
  38. #pragma link "cxGridCustomView"
  39. #pragma link "cxGridLevel"
  40. #pragma link "cxGridTableView"
  41. #pragma link "cxLabel"
  42. #pragma link "cxLookAndFeelPainters"
  43. #pragma link "cxLookAndFeels"
  44. #pragma link "cxSpinEdit"
  45. #pragma link "cxStyles"
  46. #pragma link "cxTextEdit"
  47. #pragma link "dxSkinBlack"
  48. #pragma link "dxSkinBlue"
  49. #pragma link "dxSkinsCore"
  50. #pragma link "dxSkinscxPCPainter"
  51. #pragma link "dxSkinMcSkin"
  52. #pragma resource "*.dfm"
  53. TITS0020M *ITS0020M = NULL;
  54. //---------------------------------------------------------------------------
  55. __fastcall TITS0020M::TITS0020M(TComponent* Owner)
  56. : TForm(Owner)
  57. {
  58. LangTrans->Translate(this, ITSDb_GetConnection());
  59. ITSSkin_Load(this);
  60. CMM_LoadForm(g_sFormsDir, this);
  61. FTitle = Caption;//"소통정보제보 관리";
  62. FLinkLevel = 2; //서비스링크레벨로 제보소통정보를 관리
  63. if (FLinkLevel == 1)
  64. Column01->Caption = lblLvl1->Caption;//"링크 ID";
  65. else if (FLinkLevel == 2)
  66. Column01->Caption = lblLvl2->Caption;//"서비스링크 ID";
  67. }
  68. //---------------------------------------------------------------------------
  69. void __fastcall TITS0020M::FormClose(TObject *Sender, TCloseAction &Action)
  70. {
  71. CommClose();
  72. ITS0020M = NULL;
  73. Action = caFree;
  74. }
  75. //---------------------------------------------------------------------------
  76. void __fastcall TITS0020M::CommClose()
  77. {
  78. try
  79. {
  80. if (ItsTrafficOprLinkManager)
  81. {
  82. delete ItsTrafficOprLinkManager;
  83. ItsTrafficOprLinkManager = NULL;
  84. }
  85. CMM_SaveForm(g_sFormsDir, this);
  86. }
  87. catch(...)
  88. {
  89. }
  90. }
  91. //---------------------------------------------------------------------------
  92. void __fastcall TITS0020M::FormShow(TObject *Sender)
  93. {
  94. Refresh();
  95. FormInit();
  96. TmrShow->Enabled = true;
  97. }
  98. //---------------------------------------------------------------------------
  99. void __fastcall TITS0020M::FormInit()
  100. {
  101. m_pGDC = TvList->DataController;
  102. TvList->OptionsView->NoDataToDisplayInfoText = FrmLang->lblNoInfo->Caption;//"<현재 제보 소통 정보가 없습니다>";
  103. if (!ItsTrafficOprLinkManager)
  104. {
  105. ItsTrafficOprLinkManager = new TItsTrafficOprLinkManager();
  106. }
  107. TcxDateEditProperties *pcxColumn02 = (TcxDateEditProperties*)Column02->Properties;
  108. //pcxColumn02->Kind = ;
  109. pcxColumn02->DisplayFormat = STR_DATETIME;
  110. }
  111. //---------------------------------------------------------------------------
  112. void __fastcall TITS0020M::TmrShowTimer(TObject *Sender)
  113. {
  114. TmrShow->Enabled = false;
  115. BtnSearchClick((TObject*)BtnSearch);
  116. }
  117. //---------------------------------------------------------------------------
  118. void __fastcall TITS0020M::BtnSearchClick(TObject *Sender)
  119. {
  120. Application->ProcessMessages();
  121. TSqlCursor sqlCrs((TControl*)BtnSearch);
  122. RefreshData();
  123. }
  124. //---------------------------------------------------------------------------
  125. void __fastcall TITS0020M::RefreshData()
  126. {
  127. ItsTrafficOprLinkManager->LoadFromDb();
  128. SelListData();
  129. if (TvList->DataController->RecordCount > 0)
  130. BtnAllDelete->Enabled = true;
  131. else
  132. BtnAllDelete->Enabled = false;
  133. }
  134. //---------------------------------------------------------------------------
  135. void __fastcall TITS0020M::SelListData()
  136. {
  137. FUpdate = false;
  138. CMM_ClearGridTableView(TvList);
  139. try
  140. {
  141. TvList->BeginUpdate();
  142. try
  143. {
  144. ItsTrafficOprLinkManager->FLists.Lock();
  145. FOR_STL(TItsTrafficOprLink*, pObj, ItsTrafficOprLinkManager->FLists)
  146. {
  147. pObj->EditMode = DB_INIT; // 미리초기화해준다.(삭제된것)
  148. pObj->Completed = true;
  149. AddObjectItem(pObj, "-");
  150. }
  151. }
  152. __finally
  153. {
  154. ItsTrafficOprLinkManager->FLists.UnLock();
  155. }
  156. }
  157. __finally
  158. {
  159. LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
  160. TvList->EndUpdate();
  161. TvList->DataController->GotoFirst();
  162. TvList->DataController->FocusedRecordIndex = 0;
  163. //CxList->SetFocus();
  164. }
  165. }
  166. //---------------------------------------------------------------------------
  167. void __fastcall TITS0020M::BtnCloseClick(TObject *Sender)
  168. {
  169. Close();
  170. }
  171. //---------------------------------------------------------------------------
  172. void __fastcall TITS0020M::BtnExlSaveClick(TObject *Sender)
  173. {
  174. TcxGrid *pGrid = CxList;
  175. TcxGridTableView *pView = TvList;
  176. String sTitle= Caption;//"소통정보제보정보";
  177. CMM_ExportToExcelFile(sTitle, pGrid, pView, this);
  178. }
  179. //---------------------------------------------------------------------------
  180. void __fastcall TITS0020M::BtnInsertClick(TObject *Sender)
  181. {
  182. PopupAddLink->Popup(BtnInsert->ClientOrigin.x, BtnInsert->ClientOrigin.y + BtnInsert->Height);
  183. }
  184. //---------------------------------------------------------------------------
  185. void __fastcall TITS0020M::BtnDeleteClick(TObject *Sender)
  186. {
  187. int nIdx = m_pGDC->FocusedRecordIndex;
  188. if (nIdx < 0) return;
  189. int nMemPtr = m_pGDC->Values[nIdx][Column99->Index];
  190. TItsTrafficOprLink *pObj = (TItsTrafficOprLink*)nMemPtr;
  191. pObj->EditMode = DB_DELETE;
  192. m_pGDC->Values[nIdx][Column00->Index] = FrmLang->lblDelete->Caption;//"삭제";
  193. }
  194. //---------------------------------------------------------------------------
  195. void __fastcall TITS0020M::BtnEditClick(TObject *Sender)
  196. {
  197. TListFocus tvFocus(TvList);
  198. if (BtnEdit->Caption == FrmLang->lblCancel->Caption)//"취소")
  199. {
  200. CxList->SetFocus();
  201. Application->ProcessMessages();
  202. SaveData();
  203. }
  204. FrmLang->ITSSkin_ButtonClick(BtnSearch, BtnEdit, BtnInsert, BtnDelete, BtnApply);
  205. ChangeEditMode(BtnEdit->Down);
  206. RefreshData();
  207. }
  208. //---------------------------------------------------------------------------
  209. void __fastcall TITS0020M::ChangeEditMode(bool AEdit)
  210. {
  211. bool bEditing = AEdit;
  212. try
  213. {
  214. TvList->BeginUpdate();
  215. Column00->Visible = bEditing;
  216. Column03->Options->Editing = bEditing;
  217. Column04->Options->Editing = bEditing;
  218. Column06->Options->Editing = bEditing;
  219. Column08->Options->Editing = bEditing;
  220. }
  221. __finally
  222. {
  223. TvList->EndUpdate();
  224. if (bEditing)
  225. {
  226. BtnEdit->Caption = FrmLang->lblCancel->Caption;//"취소";
  227. BtnEdit->Hint = FrmLang->lblCancel->Hint;//데이터 편집 취소";
  228. }
  229. else
  230. {
  231. BtnEdit->Caption = FrmLang->lblEdit->Caption;//"편집";
  232. BtnEdit->Hint = FrmLang->lblEdit->Hint;//데이터 편집";
  233. }
  234. }
  235. if (TvList->DataController->RecordCount > 0)
  236. BtnAllDelete->Enabled = true;
  237. else
  238. BtnAllDelete->Enabled = false;
  239. }
  240. //---------------------------------------------------------------------------
  241. void __fastcall TITS0020M::BtnBestFitClick(TObject *Sender)
  242. {
  243. try
  244. {
  245. TvList->BeginUpdate();
  246. TvList->ApplyBestFit(NULL, false, false);
  247. }
  248. __finally
  249. {
  250. TvList->EndUpdate();
  251. }
  252. }
  253. //---------------------------------------------------------------------------
  254. void __fastcall TITS0020M::ChkAutoWidthPropertiesChange(TObject *Sender)
  255. {
  256. try
  257. {
  258. TvList->BeginUpdate();
  259. TvList->OptionsView->ColumnAutoWidth = ChkAutoWidth->Checked;
  260. BtnBestFit->Visible = !ChkAutoWidth->Checked;
  261. }
  262. __finally
  263. {
  264. TvList->EndUpdate();
  265. }
  266. }
  267. //---------------------------------------------------------------------------
  268. void __fastcall TITS0020M::MnuDeleteCancelClick(TObject *Sender)
  269. {
  270. //
  271. }
  272. //---------------------------------------------------------------------------
  273. void __fastcall TITS0020M::BtnApplyClick(TObject *Sender)
  274. {
  275. FUpdate = true;
  276. BtnEdit->Down = false;
  277. BtnEdit->Click();
  278. }
  279. //---------------------------------------------------------------------------
  280. void __fastcall TITS0020M::MnuListAddClick(TObject *Sender)
  281. {
  282. TListBox *SelList = NULL;
  283. TITSSEL1M *pSelForm1 = NULL;
  284. TITSSEL2M *pSelForm2 = NULL;
  285. try {
  286. if (FLinkLevel == 1)
  287. {
  288. pSelForm1 = new TITSSEL1M(this);
  289. pSelForm1->m_bSelected = false;
  290. pSelForm1->MultiSelect = true;
  291. pSelForm1->ShowModal();
  292. if (pSelForm1->m_bSelected)
  293. {
  294. SelList = pSelForm1->SelList;
  295. }
  296. }
  297. else if (FLinkLevel == 2)
  298. {
  299. pSelForm2 = new TITSSEL2M(this);
  300. pSelForm2->m_bSelected = false;
  301. pSelForm2->MultiSelect = true;
  302. pSelForm2->ShowModal();
  303. if (pSelForm2->m_bSelected)
  304. {
  305. SelList = pSelForm2->SelList;
  306. }
  307. }
  308. else return;
  309. try
  310. {
  311. TItsLink *pLink;
  312. TvList->BeginUpdate();
  313. for (int ii = 0; ii < SelList->Items->Count; ii++)
  314. {
  315. String sLinkId = SelList->Items->Strings[ii];
  316. if (FLinkLevel == 1)
  317. {
  318. TItsLink *pLink = ItsLinkManager->FLists.Find(sLinkId);
  319. if (!pLink) continue;
  320. }
  321. else if (FLinkLevel == 2)
  322. {
  323. TItsIfsc *pIfsc = ItsIfscManager->FLists.Find(sLinkId);
  324. if (!pIfsc) continue;
  325. }
  326. TItsTrafficOprLink *pOprLink = new TItsTrafficOprLink();
  327. pOprLink->LINK_ID = sLinkId;
  328. pOprLink->CRTN_DT = Now().FormatString("yyyymmddhhnnss");
  329. pOprLink->APLY_STRT_DT = Now().FormatString("yyyymmddhhnnss");
  330. pOprLink->APLY_END_DT = IncHour(Now(), 1).FormatString("yyyymmddhhnnss");
  331. pOprLink->TFVL = "0";
  332. pOprLink->SPED = "20";
  333. pOprLink->OCPY_RATE = "0";
  334. pOprLink->TRVL_HH = "0";
  335. ItsTrafficOprLinkManager->FLists.Push(String(ItsTrafficOprLinkManager->FDataSeq++), pOprLink);
  336. pOprLink->Completed = false;
  337. AddObjectItem(pOprLink, FrmLang->lblNew->Caption);//"신규");
  338. pOprLink->EditMode = DB_NEW;
  339. }
  340. }
  341. __finally
  342. {
  343. LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
  344. TvList->EndUpdate();
  345. TvList->DataController->GotoFirst();
  346. TvList->DataController->FocusedRecordIndex = 0;
  347. }
  348. if (FLinkLevel == 1)
  349. {
  350. delete pSelForm1;
  351. }
  352. else if (FLinkLevel == 2)
  353. {
  354. delete pSelForm2;
  355. }
  356. } catch(...) { }
  357. }
  358. //---------------------------------------------------------------------------
  359. void __fastcall TITS0020M::MnuGisAddClick(TObject *Sender)
  360. {
  361. try {
  362. TITSSELAM *pSelForm = new TITSSELAM(this);
  363. pSelForm->MultiSelect = true;
  364. pSelForm->LinkLevel = FLinkLevel;
  365. pSelForm->ShowModal();
  366. Application->ProcessMessages();
  367. if (pSelForm->Selected)
  368. {
  369. try
  370. {
  371. TvList->BeginUpdate();
  372. for (int ii = 0; ii < pSelForm->TvList->DataController->RecordCount; ii++)
  373. {
  374. String sLinkId = pSelForm->TvList->DataController->Values[ii][pSelForm->Column01->Index];
  375. if (FLinkLevel == 1)
  376. {
  377. TItsLink *pLink = ItsLinkManager->FLists.Find(sLinkId);
  378. if (!pLink) continue;
  379. }
  380. else if (FLinkLevel == 2)
  381. {
  382. TItsIfsc *pIfsc = ItsIfscManager->FLists.Find(sLinkId);
  383. if (!pIfsc) continue;
  384. }
  385. TItsTrafficOprLink *pOprLink = new TItsTrafficOprLink();
  386. pOprLink->LINK_ID = sLinkId;
  387. pOprLink->CRTN_DT = Now().FormatString("yyyymmddhhnnss");
  388. pOprLink->APLY_STRT_DT = Now().FormatString("yyyymmddhhnnss");
  389. pOprLink->APLY_END_DT = IncHour(Now(), 1).FormatString("yyyymmddhhnnss");
  390. pOprLink->TFVL = "0";
  391. pOprLink->SPED = "20";
  392. pOprLink->OCPY_RATE = "0";
  393. pOprLink->TRVL_HH = "0";
  394. ItsTrafficOprLinkManager->FLists.Push(String(ItsTrafficOprLinkManager->FDataSeq++), pOprLink);
  395. pOprLink->Completed = false;
  396. AddObjectItem(pOprLink, FrmLang->lblNew->Caption);//"신규");
  397. pOprLink->EditMode = DB_NEW;
  398. }
  399. }
  400. __finally
  401. {
  402. LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
  403. TvList->EndUpdate();
  404. TvList->DataController->GotoFirst();
  405. TvList->DataController->FocusedRecordIndex = 0;
  406. }
  407. }
  408. delete pSelForm;
  409. } catch(...) { }
  410. }
  411. //---------------------------------------------------------------------------
  412. void __fastcall TITS0020M::TvListCustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  413. bool &ADone)
  414. {
  415. if (AViewInfo)
  416. {
  417. String sType = AViewInfo->GridRecord->DisplayTexts[Column00->Index];
  418. if (sType == FrmLang->lblModify->Caption)//"수정")
  419. {
  420. ACanvas->Brush->Color = clOlive;
  421. }
  422. else if (sType == FrmLang->lblDelete->Caption)//"삭제")
  423. {
  424. ACanvas->Brush->Color = clRed;
  425. }
  426. else if (sType == FrmLang->lblNew->Caption)//"신규")
  427. {
  428. ACanvas->Brush->Color = clLime;
  429. if (AViewInfo->Focused) ACanvas->Font->Color = clBlack;
  430. }
  431. }
  432. }
  433. //---------------------------------------------------------------------------
  434. bool __fastcall TITS0020M::AddObjectItem(TItsTrafficOprLink *pObj, String AMode)
  435. {
  436. TItsNode *pNode;
  437. TItsLink *pLink;
  438. TItsIfsc *pIfsc;
  439. int nRow;
  440. String sFNode;
  441. String sTNode;
  442. try
  443. {
  444. if (FLinkLevel == 1)
  445. {
  446. pLink = ItsLinkManager->FLists.Find(pObj->LINK_ID);
  447. if (!pLink) return false;
  448. sFNode = "[" + pLink->F_NODE_ID + "] ";
  449. sTNode = "[" + pLink->T_NODE_ID + "] ";
  450. pNode = ItsNodeManager->FLists.Find(pLink->F_NODE_ID);
  451. if (pNode) sFNode = sFNode + pNode->NODE_NAME;
  452. pNode = ItsNodeManager->FLists.Find(pLink->T_NODE_ID);
  453. if (pNode) sTNode = sTNode + pNode->NODE_NAME;
  454. }
  455. else if (FLinkLevel == 2)
  456. {
  457. pIfsc = ItsIfscManager->FLists.Find(pObj->LINK_ID);
  458. if (!pIfsc) return false;
  459. sFNode = pIfsc->STRT_NM;
  460. sTNode = pIfsc->END_NM;
  461. }
  462. else return false;
  463. nRow = m_pGDC->AppendRecord();
  464. pObj->FGridIndex = nRow;
  465. m_pGDC->Values[nRow][Column00->Index] = AMode;
  466. m_pGDC->Values[nRow][Column01->Index] = pObj->LINK_ID;
  467. m_pGDC->Values[nRow][Column10->Index] = "";
  468. m_pGDC->Values[nRow][Column11->Index] = "";
  469. m_pGDC->Values[nRow][Column10->Index] = sFNode;
  470. m_pGDC->Values[nRow][Column11->Index] = sTNode;
  471. m_pGDC->Values[nRow][Column02->Index] = ITSUtil_StrToDateTime(pObj->CRTN_DT);//.FormatString(STR_DATETIME); //TODO
  472. m_pGDC->Values[nRow][Column03->Index] = "";
  473. m_pGDC->Values[nRow][Column04->Index] = "";
  474. if (pObj->APLY_STRT_DT.Length() == 14)
  475. m_pGDC->Values[nRow][Column03->Index] = ITSUtil_StrToDateTime(pObj->APLY_STRT_DT);//.FormatString(STR_DATETIME); //TODO
  476. if (pObj->APLY_END_DT.Length() == 14)
  477. m_pGDC->Values[nRow][Column04->Index] = ITSUtil_StrToDateTime(pObj->APLY_END_DT);//.FormatString(STR_DATETIME); //TODO
  478. //m_pGDC->Values[nRow][Column05->Index] = pObj->TFVL; //교통량
  479. m_pGDC->Values[nRow][Column06->Index] = pObj->SPED; //속도
  480. //m_pGDC->Values[nRow][Column07->Index] = pObj->OCPY_RATE; //점유율
  481. m_pGDC->Values[nRow][Column08->Index] = pObj->TRVL_HH; //통행시간
  482. m_pGDC->Values[nRow][Column99->Index] = (int)pObj;
  483. return true;
  484. }
  485. catch(...)
  486. {
  487. }
  488. return false;
  489. }
  490. //---------------------------------------------------------------------------
  491. void __fastcall TITS0020M::ColumnPropertiesValidate(TObject *Sender, Variant &DisplayValue, TCaption &ErrorText, bool &Error)
  492. {
  493. if (TvList->Controller->FocusedRow->IsFilterRow) return;
  494. int nIndex = m_pGDC->FocusedRecordIndex;
  495. if (nIndex < 0) return;
  496. int nMemPtr = TvList->DataController->Values[nIndex][Column99->Index];
  497. TItsTrafficOprLink *pObj = (TItsTrafficOprLink*)nMemPtr;
  498. if (pObj->Completed == false)
  499. {
  500. //신규이거나 삭제인 경우 편집 내용에 따른 변화가 필요없다.
  501. return;
  502. }
  503. String sStTime = "";
  504. String sEdTime = "";
  505. if (!VarIsNull(m_pGDC->Values[nIndex][Column03->Index]))
  506. {
  507. TDateTime dtTmp = m_pGDC->Values[nIndex][Column03->Index];
  508. sStTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
  509. }
  510. if (!VarIsNull(m_pGDC->Values[nIndex][Column04->Index]))
  511. {
  512. TDateTime dtTmp = m_pGDC->Values[nIndex][Column04->Index];
  513. sEdTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
  514. }
  515. String sSped = VarToStrDef(m_pGDC->Values[nIndex][Column06->Index], "0");
  516. String sTrvTm = VarToStrDef(m_pGDC->Values[nIndex][Column08->Index], "0");
  517. TcxGridColumn *pColumn = TvList->Controller->FocusedColumn;
  518. if (pColumn == Column03)
  519. {
  520. TDateTime dtTmp = DisplayValue;
  521. sStTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
  522. }
  523. else
  524. if (pColumn == Column04)
  525. {
  526. TDateTime dtTmp = DisplayValue;
  527. sEdTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
  528. }
  529. else
  530. if (pColumn == Column06)
  531. sSped = DisplayValue;
  532. else
  533. if (pColumn == Column08)
  534. sTrvTm = DisplayValue;
  535. if (sStTime != pObj->APLY_STRT_DT ||
  536. sEdTime != pObj->APLY_END_DT ||
  537. sSped != pObj->SPED ||
  538. sTrvTm != pObj->TRVL_HH )
  539. {
  540. m_pGDC->Values[nIndex][Column00->Index] = FrmLang->lblModify->Caption;//"수정";
  541. pObj->EditMode = DB_UPDATE;
  542. }
  543. else
  544. {
  545. m_pGDC->Values[nIndex][Column00->Index] = "-";
  546. pObj->EditMode = DB_INIT;
  547. }
  548. #if 0
  549. String sDisplayValue = DisplayValue;
  550. if (sDisplayValue != pDb->FData[pColumn->Index])
  551. {
  552. //cxGrid_DataTV->DataController->Values[cxGrid_DataTV->DataController->FocusedRecordIndex][enGridPosition_EditMode] = FrmLang->lblModify->Caption;//"수정";
  553. }
  554. #endif
  555. }
  556. //---------------------------------------------------------------------------
  557. bool __fastcall TITS0020M::IsUpdate()
  558. {
  559. try
  560. {
  561. ItsTrafficOprLinkManager->FLists.Lock();
  562. FOR_STL(TItsTrafficOprLink*, pObj, ItsTrafficOprLinkManager->FLists)
  563. {
  564. if (pObj->Completed && pObj->EditMode != DB_INIT)
  565. return true;
  566. if (!pObj->Completed && pObj->EditMode == DB_NEW)
  567. return true;
  568. }
  569. }
  570. __finally
  571. {
  572. ItsTrafficOprLinkManager->FLists.UnLock();
  573. }
  574. return false;
  575. }
  576. //---------------------------------------------------------------------------
  577. void __fastcall TITS0020M::SaveData()
  578. {
  579. if (!IsUpdate()) return;
  580. if (!FUpdate)
  581. {
  582. if (Application->MessageBox(FrmLang->lblEidtConfirm->Caption.c_str(),//L"변경된 정보가 있습니다.\r\n변경된 정보를 적용 하시겠습니까?",
  583. FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return;
  584. }
  585. TADOQuery *pADOI = NULL;
  586. TADOQuery *pADOU = NULL;
  587. TADOQuery *pADOD = NULL;
  588. String sQryI;
  589. String sQryU;
  590. String sQryD;
  591. int nEditMode;
  592. try
  593. {
  594. sQryI = "INSERT INTO TB_LINK_SYOP_TRAF ( \r\n"
  595. " LINK_ID , \r\n"
  596. " CRTN_DT , \r\n"
  597. " APLY_STRT_DT , \r\n"
  598. " APLY_END_DT , \r\n"
  599. " TFVL , \r\n"
  600. " SPED , \r\n"
  601. " OCPY_RATE , \r\n"
  602. " TRVL_HH ) \r\n"
  603. " VALUES ( \r\n"
  604. " :p01, \r\n"
  605. " :p02, \r\n"
  606. " :p03, \r\n"
  607. " :p04, \r\n"
  608. " :p05, \r\n"
  609. " :p06, \r\n"
  610. " :p07, \r\n"
  611. " :p08 ) \r\n";
  612. sQryU = "UPDATE TB_LINK_SYOP_TRAF \r\n"
  613. " SET APLY_STRT_DT = :p03, \r\n"
  614. " APLY_END_DT = :p04, \r\n"
  615. " TFVL = :p05, \r\n"
  616. " SPED = :p06, \r\n"
  617. " OCPY_RATE = :p07, \r\n"
  618. " TRVL_HH = :p08 \r\n"
  619. " WHERE LINK_ID = :p01 \r\n"
  620. " AND CRTN_DT = :p02 \r\n";
  621. sQryD = "DELETE TB_LINK_SYOP_TRAF \r\n"
  622. " WHERE LINK_ID = :p01 \r\n"
  623. " AND CRTN_DT = :p02 \r\n";
  624. int nRow;
  625. TvList->BeginUpdate();
  626. try
  627. {
  628. pADOI = new TADOQuery(NULL);
  629. pADOI->Close();
  630. pADOI->Connection = ITSDb_GetConnection();
  631. pADOU = new TADOQuery(NULL);
  632. pADOU->Close();
  633. pADOU->Connection = ITSDb_GetConnection();
  634. pADOD = new TADOQuery(NULL);
  635. pADOD->Close();
  636. pADOD->Connection = ITSDb_GetConnection();
  637. ITSDb_SQLText(pADOI, sQryI);
  638. ITSDb_SQLText(pADOU, sQryU);
  639. ITSDb_SQLText(pADOD, sQryD);
  640. ITSDb_GetConnection()->BeginTrans();
  641. try
  642. {
  643. ItsTrafficOprLinkManager->FLists.Lock();
  644. FOR_STL(TItsTrafficOprLink*, pObj, ItsTrafficOprLinkManager->FLists)
  645. {
  646. if (pObj->FGridIndex < 0) continue;
  647. if (pObj->Completed && pObj->EditMode == DB_INIT)
  648. continue;
  649. if (!pObj->Completed && pObj->EditMode != DB_NEW)
  650. continue;
  651. nRow = pObj->FGridIndex;
  652. String sLinkId = VarToStr(m_pGDC->Values[nRow][Column01->Index]);
  653. TDateTime dtCrTime = m_pGDC->Values[nRow][Column02->Index];
  654. TDateTime dtStTime = m_pGDC->Values[nRow][Column03->Index];
  655. TDateTime dtEdTime = m_pGDC->Values[nRow][Column04->Index];
  656. String sSped = VarToStrDef(m_pGDC->Values[nRow][Column06->Index], "0");
  657. String sTrvTm = VarToStrDef(m_pGDC->Values[nRow][Column08->Index], "0");
  658. String sCrTime = dtCrTime.FormatString("YYYYMMDDHHNNSS");
  659. String sStTime = dtStTime.FormatString("YYYYMMDDHHNNSS");
  660. String sEdTime = dtEdTime.FormatString("YYYYMMDDHHNNSS");
  661. pObj->LINK_ID = sLinkId;
  662. pObj->CRTN_DT = sCrTime;
  663. pObj->APLY_STRT_DT = sStTime;
  664. pObj->APLY_END_DT = sEdTime;
  665. //pObj->TFVL = "0";
  666. pObj->SPED = sSped;
  667. //pObj->OCPY_RATE = "0";
  668. pObj->TRVL_HH = sTrvTm;
  669. nEditMode = pObj->EditMode;
  670. if (pObj->Completed)
  671. {
  672. if (pObj->EditMode == DB_DELETE)
  673. {
  674. //delete
  675. ITSDb_SQLBind(pADOD, "p01", pObj->LINK_ID);
  676. ITSDb_SQLBind(pADOD, "p02", pObj->CRTN_DT);
  677. ITSDb_SQLExec(pADOD);
  678. }
  679. else
  680. if (pObj->EditMode == DB_UPDATE)
  681. {
  682. //update
  683. ITSDb_SQLBind(pADOU, "p01", pObj->LINK_ID);
  684. ITSDb_SQLBind(pADOU, "p02", pObj->CRTN_DT);
  685. ITSDb_SQLBind(pADOU, "p03", pObj->APLY_STRT_DT);
  686. ITSDb_SQLBind(pADOU, "p04", pObj->APLY_END_DT);
  687. ITSDb_SQLBind(pADOU, "p05", pObj->TFVL);
  688. ITSDb_SQLBind(pADOU, "p06", pObj->SPED);
  689. ITSDb_SQLBind(pADOU, "p07", pObj->OCPY_RATE);
  690. ITSDb_SQLBind(pADOU, "p08", pObj->TRVL_HH);
  691. ITSDb_SQLExec(pADOU);
  692. }
  693. }
  694. else
  695. {
  696. if (pObj->EditMode == DB_NEW)
  697. {
  698. //insert
  699. ITSDb_SQLBind(pADOI, "p01", pObj->LINK_ID);
  700. ITSDb_SQLBind(pADOI, "p02", pObj->CRTN_DT);
  701. ITSDb_SQLBind(pADOI, "p03", pObj->APLY_STRT_DT);
  702. ITSDb_SQLBind(pADOI, "p04", pObj->APLY_END_DT);
  703. ITSDb_SQLBind(pADOI, "p05", pObj->TFVL);
  704. ITSDb_SQLBind(pADOI, "p06", pObj->SPED);
  705. ITSDb_SQLBind(pADOI, "p07", pObj->OCPY_RATE);
  706. ITSDb_SQLBind(pADOI, "p08", pObj->TRVL_HH);
  707. ITSDb_SQLExec(pADOI);
  708. }
  709. }
  710. pObj->Completed = true;
  711. }
  712. }
  713. __finally
  714. {
  715. ItsTrafficOprLinkManager->FLists.UnLock();
  716. }
  717. ITSDb_GetConnection()->CommitTrans();
  718. Application->MessageBox(lblSave->Caption.c_str(),//L"제보소통정보를 적용 하였습니다.",
  719. FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL);
  720. }
  721. catch(EDatabaseError &E)
  722. {
  723. ITSDb_GetConnection()->RollbackTrans();
  724. if (nEditMode == DB_DELETE)
  725. DBERRORMSG(Caption, String(E.ClassName()), E.Message, pADOD->SQL->Text);
  726. else
  727. if (nEditMode == DB_UPDATE)
  728. DBERRORMSG(Caption, String(E.ClassName()), E.Message, pADOU->SQL->Text);
  729. else
  730. if (nEditMode == DB_NEW)
  731. DBERRORMSG(Caption, String(E.ClassName()), E.Message, pADOI->SQL->Text);
  732. throw Exception(String(E.ClassName()) + E.Message);
  733. }
  734. catch(Exception &e)
  735. {
  736. ITSDb_GetConnection()->RollbackTrans();
  737. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  738. if (nEditMode == DB_DELETE)
  739. DBERRORMSG(Caption, String(e.ClassName()), e.Message, pADOD->SQL->Text);
  740. else
  741. if (nEditMode == DB_UPDATE)
  742. DBERRORMSG(Caption, String(e.ClassName()), e.Message, pADOU->SQL->Text);
  743. else
  744. if (nEditMode == DB_NEW)
  745. DBERRORMSG(Caption, String(e.ClassName()), e.Message, pADOI->SQL->Text);
  746. throw Exception(String(e.ClassName()) + e.Message);
  747. }
  748. }
  749. __finally
  750. {
  751. if (pADOI)
  752. {
  753. pADOI->Close();
  754. delete pADOI;
  755. }
  756. if (pADOU)
  757. {
  758. pADOU->Close();
  759. delete pADOU;
  760. }
  761. if (pADOD)
  762. {
  763. pADOD->Close();
  764. delete pADOD;
  765. }
  766. TvList->EndUpdate();
  767. }
  768. }
  769. //---------------------------------------------------------------------------
  770. void __fastcall TITS0020M::FormCloseQuery(TObject *Sender, bool &CanClose)
  771. {
  772. SaveData();
  773. }
  774. //---------------------------------------------------------------------------
  775. void __fastcall TITS0020M::TvListKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
  776. {
  777. if (Key == VK_DELETE)
  778. {
  779. if (BtnDelete->Enabled) BtnDeleteClick(Sender);
  780. }
  781. }
  782. //---------------------------------------------------------------------------
  783. void __fastcall TITS0020M::TvListDataControllerFilterChanged(TObject *Sender)
  784. {
  785. CMM_SetFilterLike(TvList);
  786. LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
  787. }
  788. //---------------------------------------------------------------------------
  789. void __fastcall TITS0020M::BtnMoveGisClick(TObject *Sender)
  790. {
  791. TcxDataController *pGDC = TvList->DataController;
  792. int nRow = pGDC->FocusedRecordIndex;
  793. if( nRow <= -1 )
  794. return;
  795. String sLinkId = pGDC->Values[nRow][Column01->Index];
  796. if (sLinkId.IsEmpty()) return;
  797. g_SelLink.pForm = this;
  798. g_SelLink.Level = FLinkLevel;
  799. g_SelLink.Id = sLinkId;
  800. POST_MSG(Application->MainForm->Handle, WM_PLUGINFORM, WP_MSG_15, LP_MSG_15);
  801. }
  802. //---------------------------------------------------------------------------
  803. void __fastcall TITS0020M::BtnAllApplyClick(TObject *Sender)
  804. {
  805. TcxButton *pBtn = (TcxButton*)Sender;
  806. String sMsg;
  807. if (pBtn->Tag == 0)
  808. {
  809. //All Apply
  810. sMsg = pBtn->Caption + "\r\n" + lblAllApply->Caption;//"\r\n모든 구간에 대하여 소통정보 제보를 적용 하시겠습니까?";
  811. }
  812. else
  813. {
  814. //All Delete
  815. sMsg = pBtn->Caption + "\r\n" + lblAllClear->Caption;//"\r\n모든 구간에 대하여 소통정보 제보를 해제 하시겠습니까?";
  816. }
  817. if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return;
  818. TSqlCursor sqlCrs((TControl*)pBtn);
  819. //Application->ProcessMessages();
  820. bool bResult = false;
  821. bResult = ItsTrafficOprLinkManager->AllDelete();
  822. //Application->ProcessMessages();
  823. if (bResult)
  824. {
  825. if (pBtn->Tag == 0)
  826. {
  827. TSqlCursor sqlCrs((TControl*)pBtn);
  828. ItsTrafficOprLinkManager->AllApply(FLinkLevel);
  829. Application->ProcessMessages();
  830. }
  831. }
  832. if (bResult)
  833. {
  834. Application->MessageBox(lblAll->Caption.c_str(),//L"모든 구간에 대하여 소통정보 제보 적용/해제 하였습니다.",
  835. FTitle.c_str(), MB_OK | MB_ICONINFORMATION | MB_APPLMODAL);
  836. }
  837. //Application->ProcessMessages();
  838. //ChangeEditMode(BtnEdit->Down);
  839. RefreshData();
  840. }
  841. //---------------------------------------------------------------------------