ITS0020MF.cpp 31 KB

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