123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973 |
- //---------------------------------------------------------------------------
- #include <vcl.h>
- #include "ITSSkinF.h"
- #include "ITSUtilF.h"
- #include "ITSDbF.h"
- #include "WindowMsgF.h"
- #include "AppGlobalF.h"
- #include "CDSCodeF.h"
- #include "CDSNodeF.h"
- #include "CDSLinkF.h"
- #include "ITSSEL0MF.h"
- #include "ITSSEL1MF.h"
- #include "ITSSEL2MF.h"
- #include "ITSSEL3MF.h"
- #include "ITSSELAMF.h"
- #pragma hdrstop
- #include "ITS0020MF.h"
- //---------------------------------------------------------------------------
- #pragma package(smart_init)
- #pragma link "cxButtons"
- #pragma link "cxCalc"
- #pragma link "cxCalendar"
- #pragma link "cxCheckBox"
- #pragma link "cxClasses"
- #pragma link "cxContainer"
- #pragma link "cxControls"
- #pragma link "cxCustomData"
- #pragma link "cxData"
- #pragma link "cxDataStorage"
- #pragma link "cxEdit"
- #pragma link "cxFilter"
- #pragma link "cxGraphics"
- #pragma link "cxGrid"
- #pragma link "cxGridCustomTableView"
- #pragma link "cxGridCustomView"
- #pragma link "cxGridLevel"
- #pragma link "cxGridTableView"
- #pragma link "cxLabel"
- #pragma link "cxLookAndFeelPainters"
- #pragma link "cxLookAndFeels"
- #pragma link "cxSpinEdit"
- #pragma link "cxStyles"
- #pragma link "cxTextEdit"
- #pragma link "dxSkinBlack"
- #pragma link "dxSkinBlue"
- #pragma link "dxSkinCaramel"
- #pragma link "dxSkinCoffee"
- #pragma link "dxSkinDarkRoom"
- #pragma link "dxSkinDarkSide"
- #pragma link "dxSkinFoggy"
- #pragma link "dxSkinGlassOceans"
- #pragma link "dxSkiniMaginary"
- #pragma link "dxSkinLilian"
- #pragma link "dxSkinLiquidSky"
- #pragma link "dxSkinLondonLiquidSky"
- #pragma link "dxSkinMcSkin"
- #pragma link "dxSkinMoneyTwins"
- #pragma link "dxSkinOffice2007Black"
- #pragma link "dxSkinOffice2007Blue"
- #pragma link "dxSkinOffice2007Green"
- #pragma link "dxSkinOffice2007Pink"
- #pragma link "dxSkinOffice2007Silver"
- #pragma link "dxSkinOffice2010Black"
- #pragma link "dxSkinOffice2010Blue"
- #pragma link "dxSkinOffice2010Silver"
- #pragma link "dxSkinsCore"
- #pragma link "dxSkinscxPCPainter"
- #pragma link "dxSkinSeven"
- #pragma link "dxSkinSharp"
- #pragma link "dxSkinSilver"
- #pragma link "dxSkinStardust"
- #pragma resource "*.dfm"
- TITS0020M *ITS0020M = NULL;
- //---------------------------------------------------------------------------
- __fastcall TITS0020M::TITS0020M(TComponent* Owner)
- : TForm(Owner)
- {
- ITSSkin_Load(this);
- CMM_LoadForm(g_sFormsDir, this);
- FTitle = "소통정보제보 관리";
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::FormClose(TObject *Sender, TCloseAction &Action)
- {
- CommClose();
- ITS0020M = NULL;
- Action = caFree;
- }
- //---------------------------------------------------------------------------
- /*
- * 닫기버튼 이나 x버튼 클릭시 공통으로 처리하는 로직이들어간다..
- * Form과 DataModule class를 delete시킨다.
- * arguments
- *
- * return
- * void
- */
- void __fastcall TITS0020M::CommClose()
- {
- try
- {
- if (ItsTrafficOprLinkManager)
- {
- delete ItsTrafficOprLinkManager;
- ItsTrafficOprLinkManager = NULL;
- }
- CMM_SaveForm(g_sFormsDir, this);
- }
- catch(...)
- {
- }
- }
- //---------------------------------------------------------------------------
- /*
- * Form을 보여줄때 호출되는 event 메서드이다.
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::FormShow(TObject *Sender)
- {
- Refresh();
- FormInit();
- TmrShow->Enabled = true;
- }
- //---------------------------------------------------------------------------
- /*
- * form 초기화
- *
- * arguments
- *
- * return
- * void
- */
- void __fastcall TITS0020M::FormInit()
- {
- m_pGDC = TvList->DataController;
- TvList->OptionsView->NoDataToDisplayInfoText = "<현재 제보 소통 정보가 없습니다>";
- if (!ItsTrafficOprLinkManager)
- {
- ItsTrafficOprLinkManager = new TItsTrafficOprLinkManager();
- }
- TcxDateEditProperties *pcxColumn02 = (TcxDateEditProperties*)Column02->Properties;
- //pcxColumn02->Kind = ;
- pcxColumn02->DisplayFormat = STR_DATETIME;
- }
- //---------------------------------------------------------------------------
- /*
- * Form이 Show되고 난 후 최초 1회 수행되는 타이머 이벤트
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::TmrShowTimer(TObject *Sender)
- {
- TmrShow->Enabled = false;
- BtnSearchClick((TObject*)BtnSearch);
- }
- //---------------------------------------------------------------------------
- /*
- * Search 버튼 클릭 이벤트 핸들러
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::BtnSearchClick(TObject *Sender)
- {
- Application->ProcessMessages();
- TSqlCursor sqlCrs((TControl*)BtnSearch);
- RefreshData();
- }
- //---------------------------------------------------------------------------
- /*
- * Refresh Data Event Function
- * arguments
- *
- * return
- * void
- */
- void __fastcall TITS0020M::RefreshData()
- {
- ItsTrafficOprLinkManager->LoadFromDb();
- SelListData();
- if (TvList->DataController->RecordCount > 0)
- BtnAllDelete->Enabled = true;
- else
- BtnAllDelete->Enabled = false;
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::SelListData()
- {
- FUpdate = false;
- CMM_ClearGridTableView(TvList);
- try
- {
- TvList->BeginUpdate();
- TItsLink *pLink;
- try
- {
- ItsTrafficOprLinkManager->FLists.Lock();
- FOR_STL(TItsTrafficOprLink*, pObj, ItsTrafficOprLinkManager->FLists)
- {
- pObj->EditMode = DB_INIT; // 미리초기화해준다.(삭제된것)
- pObj->Completed = true;
- //pLink = ItsLinkManager->FLists.Find(pOprTrf->LINK_ID);
- //if (!pLink) continue;
- AddObjectItem(pObj, "-");
- }
- }
- __finally
- {
- ItsTrafficOprLinkManager->FLists.UnLock();
- }
- }
- __finally
- {
- LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
- TvList->EndUpdate();
- TvList->DataController->GotoFirst();
- TvList->DataController->FocusedRecordIndex = 0;
- //CxList->SetFocus();
- }
- }
- //---------------------------------------------------------------------------
- /*
- * Close 버튼 클릭 이벤트 핸들러
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::BtnCloseClick(TObject *Sender)
- {
- Close();
- }
- //---------------------------------------------------------------------------
- /*
- * 저장 버튼 클릭 이벤트 핸들러
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::BtnExlSaveClick(TObject *Sender)
- {
- TcxGrid *pGrid = CxList;
- TcxGridTableView *pView = TvList;
- String sTitle= "소통정보제보정보";
- CMM_ExportToExcelFile(sTitle, pGrid, pView, this);
- }
- //---------------------------------------------------------------------------
- /*
- * 등록 버튼 클릭 이벤트 핸들러
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::BtnInsertClick(TObject *Sender)
- {
- PopupAddLink->Popup(BtnInsert->ClientOrigin.x, BtnInsert->ClientOrigin.y + BtnInsert->Height);
- }
- //---------------------------------------------------------------------------
- /*
- * 삭제 버튼 클릭 이벤트 핸들러
- * arguments
- * Sender : event handler 객체
- * return
- * void
- */
- void __fastcall TITS0020M::BtnDeleteClick(TObject *Sender)
- {
- int nIdx = m_pGDC->FocusedRecordIndex;
- if (nIdx < 0) return;
- int nMemPtr = m_pGDC->Values[nIdx][Column99->Index];
- TItsTrafficOprLink *pObj = (TItsTrafficOprLink*)nMemPtr;
- pObj->EditMode = DB_DELETE;
- m_pGDC->Values[nIdx][Column00->Index] = "삭제";
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::BtnEditClick(TObject *Sender)
- {
- TListFocus tvFocus(TvList);
- if (BtnEdit->Caption == "취소")
- {
- CxList->SetFocus();
- Application->ProcessMessages();
- SaveData();
- }
- ITSSkin_ButtonClick(BtnSearch, BtnEdit, BtnInsert, BtnDelete, BtnApply);
- ChangeEditMode(BtnEdit->Down);
- RefreshData();
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::ChangeEditMode(bool AEdit)
- {
- bool bEditing = AEdit;
- try
- {
- TvList->BeginUpdate();
-
- Column00->Visible = bEditing;
-
- Column03->Options->Editing = bEditing;
- Column04->Options->Editing = bEditing;
- Column06->Options->Editing = bEditing;
- Column08->Options->Editing = bEditing;
- }
- __finally
- {
- TvList->EndUpdate();
- if (bEditing)
- {
- BtnEdit->Caption = "취소";
- BtnEdit->Hint = "데이터 편집 취소";
- }
- else
- {
- BtnEdit->Caption = "편집";
- BtnEdit->Hint = "데이터 편집";
- }
- }
- if (TvList->DataController->RecordCount > 0)
- BtnAllDelete->Enabled = true;
- else
- BtnAllDelete->Enabled = false;
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::BtnBestFitClick(TObject *Sender)
- {
- try
- {
- TvList->BeginUpdate();
- TvList->ApplyBestFit(NULL, false, false);
- }
- __finally
- {
- TvList->EndUpdate();
- }
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::ChkAutoWidthPropertiesChange(TObject *Sender)
- {
- try
- {
- TvList->BeginUpdate();
- TvList->OptionsView->ColumnAutoWidth = ChkAutoWidth->Checked;
- BtnBestFit->Visible = !ChkAutoWidth->Checked;
- }
- __finally
- {
- TvList->EndUpdate();
- }
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::MnuDeleteCancelClick(TObject *Sender)
- {
- //
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::BtnApplyClick(TObject *Sender)
- {
- FUpdate = true;
- BtnEdit->Down = false;
- BtnEdit->Click();
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::MnuListAddClick(TObject *Sender)
- {
- try {
- TITSSEL1M *pSelForm = new TITSSEL1M(this);
- pSelForm->m_bSelected = false;
- pSelForm->MultiSelect = true;
- pSelForm->ShowModal();
- if (pSelForm->m_bSelected)
- {
- try
- {
- TItsLink *pLink;
- TvList->BeginUpdate();
- for (int ii = 0; ii < pSelForm->SelList->Items->Count; ii++)
- {
- String sLinkId = pSelForm->SelList->Items->Strings[ii];
- pLink = ItsLinkManager->FLists.Find(sLinkId);
- if (!pLink) continue;
- TItsTrafficOprLink *pOprLink = new TItsTrafficOprLink();
- pOprLink->FLINK_ID = sLinkId;
- pOprLink->FCRTN_DT = Now().FormatString("yyyymmddhhnnss");
- pOprLink->FAPLY_STRT_DT = Now().FormatString("yyyymmddhhnnss");
- pOprLink->FAPLY_END_DT = IncHour(Now(), 1).FormatString("yyyymmddhhnnss");
- pOprLink->FTFVL = "0";
- pOprLink->FSPED = "20";
- pOprLink->FOCPY_RATE = "0";
- pOprLink->FTRVL_HH = "0";
- ItsTrafficOprLinkManager->FLists.Push(String(ItsTrafficOprLinkManager->FDataSeq++), pOprLink);
- pOprLink->Completed = false;
- AddObjectItem(pOprLink, "신규");
- pOprLink->EditMode = DB_NEW;
- }
- }
- __finally
- {
- LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
- TvList->EndUpdate();
- TvList->DataController->GotoFirst();
- TvList->DataController->FocusedRecordIndex = 0;
- }
- }
- delete pSelForm;
- } catch(...) { }
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::MnuGisAddClick(TObject *Sender)
- {
- try {
- TITSSELAM *pSelForm = new TITSSELAM(this);
- pSelForm->MultiSelect = true;
- pSelForm->LinkLevel = 1;
- pSelForm->ShowModal();
- Application->ProcessMessages();
- if (pSelForm->Selected)
- {
- try
- {
- TItsLink *pLink;
- TvList->BeginUpdate();
- for (int ii = 0; ii < pSelForm->TvList->DataController->RecordCount; ii++)
- {
- String sLinkId = pSelForm->TvList->DataController->Values[ii][pSelForm->Column01->Index];
- pLink = ItsLinkManager->FLists.Find(sLinkId);
- if (!pLink) continue;
- TItsTrafficOprLink *pOprLink = new TItsTrafficOprLink();
- pOprLink->FLINK_ID = sLinkId;
- pOprLink->FCRTN_DT = Now().FormatString("yyyymmddhhnnss");
- pOprLink->FAPLY_STRT_DT = Now().FormatString("yyyymmddhhnnss");
- pOprLink->FAPLY_END_DT = IncHour(Now(), 1).FormatString("yyyymmddhhnnss");
- pOprLink->FTFVL = "0";
- pOprLink->FSPED = "20";
- pOprLink->FOCPY_RATE = "0";
- pOprLink->FTRVL_HH = "0";
- ItsTrafficOprLinkManager->FLists.Push(String(ItsTrafficOprLinkManager->FDataSeq++), pOprLink);
- pOprLink->Completed = false;
- AddObjectItem(pOprLink, "신규");
- pOprLink->EditMode = DB_NEW;
- }
- }
- __finally
- {
- LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
- TvList->EndUpdate();
- TvList->DataController->GotoFirst();
- TvList->DataController->FocusedRecordIndex = 0;
- }
- }
- delete pSelForm;
- } catch(...) { }
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::TvListCustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
- bool &ADone)
- {
- if (AViewInfo)
- {
- String sType = AViewInfo->GridRecord->DisplayTexts[Column00->Index];
- if (sType == "수정")
- {
- ACanvas->Brush->Color = clOlive;
- }
- else if (sType == "삭제")
- {
- ACanvas->Brush->Color = clRed;
- }
- else if (sType == "신규")
- {
- ACanvas->Brush->Color = clLime;
- if (AViewInfo->Focused) ACanvas->Font->Color = clBlack;
- }
- }
- }
- //---------------------------------------------------------------------------
- bool __fastcall TITS0020M::AddObjectItem(TItsTrafficOprLink *pObj, String AMode)
- {
- TItsNode *pNode;
- TItsLink *pLink;
- int nRow;
- try
- {
- pLink = ItsLinkManager->FLists.Find(pObj->LINK_ID);
- if (!pLink) return false;
- nRow = m_pGDC->AppendRecord();
- pObj->FGridIndex = nRow;
- m_pGDC->Values[nRow][Column00->Index] = AMode;
- m_pGDC->Values[nRow][Column01->Index] = pObj->LINK_ID;
- m_pGDC->Values[nRow][Column10->Index] = "";
- m_pGDC->Values[nRow][Column11->Index] = "";
- if (pLink)
- {
- String sFNode = "[" + pLink->F_NODEID + "] ";
- String sTNode = "[" + pLink->T_NODEID + "] ";
- pNode = ItsNodeManager->FLists.Find(pLink->F_NODEID);
- if (pNode) sFNode = sFNode + pNode->NODE_NAME;
- m_pGDC->Values[nRow][Column10->Index] = sFNode;
- pNode = ItsNodeManager->FLists.Find(pLink->T_NODEID);
- if (pNode) sTNode = sTNode + pNode->NODE_NAME;
- m_pGDC->Values[nRow][Column11->Index] = sTNode;
- }
- m_pGDC->Values[nRow][Column02->Index] = ITSUtil_StrToDateTime(pObj->CRTN_DT);//.FormatString(STR_DATETIME); //TODO
- m_pGDC->Values[nRow][Column03->Index] = "";
- m_pGDC->Values[nRow][Column04->Index] = "";
- if (pObj->APLY_STRT_DT.Length() == 14)
- m_pGDC->Values[nRow][Column03->Index] = ITSUtil_StrToDateTime(pObj->APLY_STRT_DT);//.FormatString(STR_DATETIME); //TODO
- if (pObj->APLY_END_DT.Length() == 14)
- m_pGDC->Values[nRow][Column04->Index] = ITSUtil_StrToDateTime(pObj->APLY_END_DT);//.FormatString(STR_DATETIME); //TODO
- //m_pGDC->Values[nRow][Column05->Index] = pObj->TFVL; //교통량
- m_pGDC->Values[nRow][Column06->Index] = pObj->SPED; //속도
- //m_pGDC->Values[nRow][Column07->Index] = pObj->OCPY_RATE; //점유율
- m_pGDC->Values[nRow][Column08->Index] = pObj->TRVL_HH; //통행시간
- m_pGDC->Values[nRow][Column99->Index] = (int)pObj;
- return true;
- }
- catch(...)
- {
- }
- return false;
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::ColumnPropertiesValidate(TObject *Sender, Variant &DisplayValue, TCaption &ErrorText, bool &Error)
- {
- if (TvList->Controller->FocusedRow->IsFilterRow) return;
- int nIndex = m_pGDC->FocusedRecordIndex;
- if (nIndex < 0) return;
- int nMemPtr = TvList->DataController->Values[nIndex][Column99->Index];
- TItsTrafficOprLink *pObj = (TItsTrafficOprLink*)nMemPtr;
- if (pObj->Completed == false)
- {
- //신규이거나 삭제인 경우 편집 내용에 따른 변화가 필요없다.
- return;
- }
- String sStTime = "";
- String sEdTime = "";
- if (!VarIsNull(m_pGDC->Values[nIndex][Column03->Index]))
- {
- TDateTime dtTmp = m_pGDC->Values[nIndex][Column03->Index];
- sStTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
- }
- if (!VarIsNull(m_pGDC->Values[nIndex][Column04->Index]))
- {
- TDateTime dtTmp = m_pGDC->Values[nIndex][Column04->Index];
- sEdTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
- }
- String sSped = VarToStrDef(m_pGDC->Values[nIndex][Column06->Index], "0");
- String sTrvTm = VarToStrDef(m_pGDC->Values[nIndex][Column08->Index], "0");
- TcxGridColumn *pColumn = TvList->Controller->FocusedColumn;
- if (pColumn == Column03)
- {
- TDateTime dtTmp = DisplayValue;
- sStTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
- }
- else
- if (pColumn == Column04)
- {
- TDateTime dtTmp = DisplayValue;
- sEdTime = dtTmp.FormatString("YYYYMMDDHHNNSS");
- }
- else
- if (pColumn == Column06)
- sSped = DisplayValue;
- else
- if (pColumn == Column08)
- sTrvTm = DisplayValue;
- if (sStTime != pObj->APLY_STRT_DT ||
- sEdTime != pObj->APLY_END_DT ||
- sSped != pObj->SPED ||
- sTrvTm != pObj->TRVL_HH )
- {
- m_pGDC->Values[nIndex][Column00->Index] = "수정";
- pObj->EditMode = DB_UPDATE;
- }
- else
- {
- m_pGDC->Values[nIndex][Column00->Index] = "-";
- pObj->EditMode = DB_INIT;
- }
- #if 0
- String sDisplayValue = DisplayValue;
- if (sDisplayValue != pDb->FData[pColumn->Index])
- {
- //cxGrid_DataTV->DataController->Values[cxGrid_DataTV->DataController->FocusedRecordIndex][enGridPosition_EditMode] = "수정";
- }
- #endif
- }
- //---------------------------------------------------------------------------
- bool __fastcall TITS0020M::IsUpdate()
- {
- try
- {
- ItsTrafficOprLinkManager->FLists.Lock();
- FOR_STL(TItsTrafficOprLink*, pObj, ItsTrafficOprLinkManager->FLists)
- {
- if (pObj->Completed && pObj->EditMode != DB_INIT)
- return true;
- if (!pObj->Completed && pObj->EditMode == DB_NEW)
- return true;
- }
- }
- __finally
- {
- ItsTrafficOprLinkManager->FLists.UnLock();
- }
- return false;
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::SaveData()
- {
- if (!IsUpdate()) return;
- if (!FUpdate)
- {
- if (Application->MessageBox(L"변경된 정보가 있습니다.\r\n변경된 정보를 적용 하시겠습니까?",
- FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return;
- }
- TADOQuery *pADOI = NULL;
- TADOQuery *pADOU = NULL;
- TADOQuery *pADOD = NULL;
- String sQryI;
- String sQryU;
- String sQryD;
- try
- {
- sQryI = "INSERT INTO TB_LINK_SYOP_TRAF ( \r\n"
- " LINK_ID , \r\n"
- " CRTN_DT , \r\n"
- " APLY_STRT_DT , \r\n"
- " APLY_END_DT , \r\n"
- " TFVL , \r\n"
- " SPED , \r\n"
- " OCPY_RATE , \r\n"
- " TRVL_HH ) \r\n"
- " VALUES ( \r\n"
- " :p01, \r\n"
- " :p02, \r\n"
- " :p03, \r\n"
- " :p04, \r\n"
- " :p05, \r\n"
- " :p06, \r\n"
- " :p07, \r\n"
- " :p08 ) \r\n";
- sQryU = "UPDATE TB_LINK_SYOP_TRAF \r\n"
- " SET APLY_STRT_DT = :p03, \r\n"
- " APLY_END_DT = :p04, \r\n"
- " TFVL = :p05, \r\n"
- " SPED = :p06, \r\n"
- " OCPY_RATE = :p07, \r\n"
- " TRVL_HH = :p08 \r\n"
- " WHERE LINK_ID = :p01 \r\n"
- " AND CRTN_DT = :p02 \r\n";
- sQryD = "DELETE TB_LINK_SYOP_TRAF \r\n"
- " WHERE LINK_ID = :p01 \r\n"
- " AND CRTN_DT = :p02 \r\n";
- int nRow;
- TvList->BeginUpdate();
- try
- {
- pADOI = new TADOQuery(NULL);
- pADOI->Close();
- pADOI->Connection = ITSDb_GetConnection();
- pADOU = new TADOQuery(NULL);
- pADOU->Close();
- pADOU->Connection = ITSDb_GetConnection();
- pADOD = new TADOQuery(NULL);
- pADOD->Close();
- pADOD->Connection = ITSDb_GetConnection();
- ITSDb_SQLText(pADOI, sQryI);
- ITSDb_SQLText(pADOU, sQryU);
- ITSDb_SQLText(pADOD, sQryD);
- ITSDb_GetConnection()->BeginTrans();
- try
- {
- ItsTrafficOprLinkManager->FLists.Lock();
- FOR_STL(TItsTrafficOprLink*, pObj, ItsTrafficOprLinkManager->FLists)
- {
- if (pObj->FGridIndex < 0) continue;
- if (pObj->Completed && pObj->EditMode == DB_INIT)
- continue;
- if (!pObj->Completed && pObj->EditMode != DB_NEW)
- continue;
- nRow = pObj->FGridIndex;
- String sLinkId = VarToStr(m_pGDC->Values[nRow][Column01->Index]);
- TDateTime dtCrTime = m_pGDC->Values[nRow][Column02->Index];
- TDateTime dtStTime = m_pGDC->Values[nRow][Column03->Index];
- TDateTime dtEdTime = m_pGDC->Values[nRow][Column04->Index];
- String sSped = VarToStrDef(m_pGDC->Values[nRow][Column06->Index], "0");
- String sTrvTm = VarToStrDef(m_pGDC->Values[nRow][Column08->Index], "0");
- String sCrTime = dtCrTime.FormatString("YYYYMMDDHHNNSS");
- String sStTime = dtStTime.FormatString("YYYYMMDDHHNNSS");
- String sEdTime = dtEdTime.FormatString("YYYYMMDDHHNNSS");
- pObj->FLINK_ID = sLinkId;
- pObj->FCRTN_DT = sCrTime;
- pObj->FAPLY_STRT_DT = sStTime;
- pObj->FAPLY_END_DT = sEdTime;
- //pObj->FTFVL = "0";
- pObj->FSPED = sSped;
- //pObj->FOCPY_RATE = "0";
- pObj->FTRVL_HH = sTrvTm;
- if (pObj->Completed)
- {
- if (pObj->EditMode == DB_DELETE)
- {
- //delete
- ITSDb_SQLBind(pADOD, "p01", pObj->FLINK_ID);
- ITSDb_SQLBind(pADOD, "p02", pObj->FCRTN_DT);
- ITSDb_SQLExec(pADOD);
- }
- else
- if (pObj->EditMode == DB_UPDATE)
- {
- //update
- ITSDb_SQLBind(pADOU, "p01", pObj->FLINK_ID);
- ITSDb_SQLBind(pADOU, "p02", pObj->FCRTN_DT);
- ITSDb_SQLBind(pADOU, "p03", pObj->FAPLY_STRT_DT);
- ITSDb_SQLBind(pADOU, "p04", pObj->FAPLY_END_DT);
- ITSDb_SQLBind(pADOU, "p05", pObj->FTFVL);
- ITSDb_SQLBind(pADOU, "p06", pObj->FSPED);
- ITSDb_SQLBind(pADOU, "p07", pObj->FOCPY_RATE);
- ITSDb_SQLBind(pADOU, "p08", pObj->FTRVL_HH);
- ITSDb_SQLExec(pADOU);
- }
- }
- else
- {
- if (pObj->EditMode == DB_NEW)
- {
- //insert
- ITSDb_SQLBind(pADOI, "p01", pObj->FLINK_ID);
- ITSDb_SQLBind(pADOI, "p02", pObj->FCRTN_DT);
- ITSDb_SQLBind(pADOI, "p03", pObj->FAPLY_STRT_DT);
- ITSDb_SQLBind(pADOI, "p04", pObj->FAPLY_END_DT);
- ITSDb_SQLBind(pADOI, "p05", pObj->FTFVL);
- ITSDb_SQLBind(pADOI, "p06", pObj->FSPED);
- ITSDb_SQLBind(pADOI, "p07", pObj->FOCPY_RATE);
- ITSDb_SQLBind(pADOI, "p08", pObj->FTRVL_HH);
- ITSDb_SQLExec(pADOI);
- }
- }
- pObj->Completed = true;
- }
- }
- __finally
- {
- ItsTrafficOprLinkManager->FLists.UnLock();
- }
- ITSDb_GetConnection()->CommitTrans();
- Application->MessageBox(L"제보소통정보를 적용 하였습니다.",
- FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL);
- }
- catch(EDatabaseError &E)
- {
- ITSDb_GetConnection()->RollbackTrans();
- ShowMessage(String(E.ClassName()) + E.Message);
- }
- catch(Exception &exception)
- {
- ITSDb_GetConnection()->RollbackTrans();
- ShowMessage(String(exception.ClassName()) + exception.Message);
- }
- catch(...)
- {
- ITSDb_GetConnection()->RollbackTrans();
- ShowMessage("데이터 삭제 중에 알수없는 DB 오류가 발생하였습니다.");
- }
- }
- __finally
- {
- if (pADOI)
- {
- pADOI->Close();
- delete pADOI;
- }
- if (pADOU)
- {
- pADOU->Close();
- delete pADOU;
- }
- if (pADOD)
- {
- pADOD->Close();
- delete pADOD;
- }
- TvList->EndUpdate();
- }
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::FormCloseQuery(TObject *Sender, bool &CanClose)
- {
- SaveData();
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::TvListKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
- {
- if (Key == VK_DELETE)
- {
- if (BtnDelete->Enabled) BtnDeleteClick(Sender);
- }
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::TvListDataControllerFilterChanged(TObject *Sender)
- {
- CMM_SetFilterLike(TvList);
- LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::BtnMoveGisClick(TObject *Sender)
- {
- TcxDataController *pGDC = TvList->DataController;
- int nRow = pGDC->FocusedRecordIndex;
- if( nRow <= -1 )
- return;
- String sLinkId = pGDC->Values[nRow][Column01->Index];
- if (sLinkId.IsEmpty()) return;
- g_SelLink.pForm = this;
- g_SelLink.Level = 1;
- g_SelLink.Id = sLinkId;
- POST_MSG(Application->MainForm->Handle, WM_PLUGINFORM, WP_MSG_15, LP_MSG_15);
- }
- //---------------------------------------------------------------------------
- void __fastcall TITS0020M::BtnAllApplyClick(TObject *Sender)
- {
- TcxButton *pBtn = (TcxButton*)Sender;
- String sMsg;
- if (pBtn->Tag == 0)
- {
- //All Apply
- sMsg = pBtn->Caption + "\r\n모든 구간에 대하여 소통정보 제보를 적용 하시겠습니까?";
- }
- else
- {
- //All Delete
- sMsg = pBtn->Caption + "\r\n모든 구간에 대하여 소통정보 제보를 해제 하시겠습니까?";
- }
- if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return;
- TSqlCursor sqlCrs((TControl*)pBtn);
- //Application->ProcessMessages();
- bool bResult = false;
- bResult = ItsTrafficOprLinkManager->AllDelete();
- //Application->ProcessMessages();
- if (bResult)
- {
- if (pBtn->Tag == 0)
- {
- TSqlCursor sqlCrs((TControl*)pBtn);
- ItsTrafficOprLinkManager->AllApply();
- Application->ProcessMessages();
- }
- }
- if (bResult)
- {
- Application->MessageBox(L"모든 구간에 대하여 소통정보 제보 적용/해제 하였습니다.", FTitle.c_str(), MB_OK | MB_ICONINFORMATION | MB_APPLMODAL);
- }
- //Application->ProcessMessages();
- //ChangeEditMode(BtnEdit->Down);
- RefreshData();
- }
- //---------------------------------------------------------------------------
|