CDSTrafficGradeF.cpp 9.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287
  1. //---------------------------------------------------------------------------
  2. #pragma hdrstop
  3. #include "CDSTrafficGradeF.h"
  4. #include "AppGlobalF.h"
  5. //---------------------------------------------------------------------------
  6. #pragma package(smart_init)
  7. TItsTrafficSubGrade::TItsTrafficSubGrade()
  8. {
  9. TItsTrafficSubGrade("", "");
  10. }
  11. //---------------------------------------------------------------------------
  12. TItsTrafficSubGrade::TItsTrafficSubGrade(String ACode, String ASubCode)
  13. {
  14. FSECT_GRAD_CD = ACode;
  15. FCMTR_GRAD_CD = ASubCode;
  16. Clear();
  17. FModified = false;
  18. FCompleted= false;
  19. }
  20. //---------------------------------------------------------------------------
  21. TItsTrafficSubGrade::~TItsTrafficSubGrade()
  22. {
  23. }
  24. //---------------------------------------------------------------------------
  25. void TItsTrafficSubGrade::Clear()
  26. {
  27. #if 0
  28. FSECT_GRAD_CD = "";
  29. FCMTR_GRAD_CD = "";
  30. FLWST_TRVL_SPED = "";
  31. FHGHS_TRVL_SPED = "";
  32. FCNGS_GRAD_YN = "";
  33. #endif
  34. }
  35. //---------------------------------------------------------------------------
  36. void TItsTrafficSubGrade::SetValue(String &AOrgValue, String AValue)
  37. {
  38. if (AOrgValue != AValue)
  39. {
  40. AOrgValue = AValue;
  41. if (FCompleted) FModified = true;
  42. }
  43. }
  44. //---------------------------------------------------------------------------
  45. void TItsTrafficSubGrade::SetFSECT_GRAD_CD(String AValue)
  46. {
  47. SetValue(FSECT_GRAD_CD, AValue);
  48. }
  49. //---------------------------------------------------------------------------
  50. void TItsTrafficSubGrade::SetFCMTR_GRAD_CD(String AValue)
  51. {
  52. SetValue(FCMTR_GRAD_CD, AValue);
  53. }
  54. //---------------------------------------------------------------------------
  55. void TItsTrafficSubGrade::SetFLWST_TRVL_SPED(int AValue)
  56. {
  57. if (FLWST_TRVL_SPED != AValue)
  58. {
  59. FLWST_TRVL_SPED = AValue;
  60. if (FCompleted) FModified = true;
  61. }
  62. }
  63. //---------------------------------------------------------------------------
  64. void TItsTrafficSubGrade::SetFHGHS_TRVL_SPED(int AValue)
  65. {
  66. if (FHGHS_TRVL_SPED != AValue)
  67. {
  68. FHGHS_TRVL_SPED = AValue;
  69. if (FCompleted) FModified = true;
  70. }
  71. }
  72. //---------------------------------------------------------------------------
  73. void TItsTrafficSubGrade::SetFCNGS_GRAD_YN(String AValue)
  74. {
  75. SetValue(FCNGS_GRAD_YN, AValue);
  76. }
  77. //---------------------------------------------------------------------------
  78. TItsTrafficGrade::TItsTrafficGrade()
  79. {
  80. TItsTrafficGrade("");
  81. }
  82. //---------------------------------------------------------------------------
  83. TItsTrafficGrade::TItsTrafficGrade(String ACode)
  84. {
  85. FSECT_GRAD_CD = ACode;
  86. Clear();
  87. FModified = false;
  88. FCompleted= false;
  89. }
  90. //---------------------------------------------------------------------------
  91. void TItsTrafficGrade::Clear()
  92. {
  93. #if 0
  94. FSECT_GRAD_NM = "";
  95. #endif
  96. }
  97. //---------------------------------------------------------------------------
  98. TItsTrafficGrade::~TItsTrafficGrade()
  99. {
  100. FSubLists.RemoveAll();
  101. }
  102. //---------------------------------------------------------------------------
  103. void TItsTrafficGrade::SetValue(String &AOrgValue, String AValue)
  104. {
  105. if (AOrgValue != AValue)
  106. {
  107. AOrgValue = AValue;
  108. if (FCompleted) FModified = true;
  109. }
  110. }
  111. //---------------------------------------------------------------------------
  112. void TItsTrafficGrade::SetFSECT_GRAD_NM(String AValue)
  113. {
  114. SetValue(FSECT_GRAD_NM, AValue);
  115. }
  116. //---------------------------------------------------------------------------
  117. void TItsTrafficGrade::SetFSECT_GRAD_CD(String AValue)
  118. {
  119. SetValue(FSECT_GRAD_CD, AValue);
  120. }
  121. //---------------------------------------------------------------------------
  122. //---------------------------------------------------------------------------
  123. TItsTrafficGradeManager *ItsTrafficGradeManager = NULL;
  124. //---------------------------------------------------------------------------
  125. /*
  126. * Link Manager
  127. */
  128. TItsTrafficGradeManager::TItsTrafficGradeManager()
  129. {
  130. }
  131. //---------------------------------------------------------------------------
  132. TItsTrafficGradeManager::~TItsTrafficGradeManager()
  133. {
  134. }
  135. //---------------------------------------------------------------------------
  136. bool TItsTrafficGradeManager::LoadFromDb(TADOConnection *ADbConn/*=NULL*/)
  137. {
  138. FLists.RemoveAll();
  139. return (LoadTrafficGrade(ADbConn) && LoadTrafficSubGrade(ADbConn));
  140. }
  141. //---------------------------------------------------------------------------
  142. bool TItsTrafficGradeManager::LoadTrafficGrade(TADOConnection *ADbConn/*=NULL*/)
  143. {
  144. String sQry;
  145. TADOQuery *pADO = NULL;
  146. sQry = "SELECT SECT_GRAD_CD, \r\n"
  147. " SECT_GRAD_NM \r\n"
  148. " FROM TB_SECT_GRAD_CLSF \r\n";
  149. // " ORDER BY SECT_GRAD_CD \r\n";
  150. try
  151. {
  152. FLists.Lock();
  153. try
  154. {
  155. pADO = new TADOQuery(NULL);
  156. pADO->Close();
  157. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  158. pADO->SQL->Clear();
  159. pADO->SQL->Text = sQry;
  160. pADO->Open();
  161. //int nRows = pADO->RecordCount;
  162. for( ; !pADO->Eof; pADO->Next())
  163. {
  164. TItsTrafficGrade *pCode = new TItsTrafficGrade();
  165. pCode->FSECT_GRAD_CD = pADO->FieldByName("SECT_GRAD_CD")->AsString; //'구간 등급 코드';
  166. pCode->FSECT_GRAD_NM = pADO->FieldByName("SECT_GRAD_NM")->AsString; //'구간 등급 명';
  167. FLists.Push(pCode->FSECT_GRAD_CD, pCode);
  168. pCode->Completed = true;
  169. }
  170. }
  171. catch(EDatabaseError &E)
  172. {
  173. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  174. DBERRORMSG("TItsTrafficGradeManager::LoadTrafficGrade", String(E.ClassName()), E.Message, sQry);
  175. throw Exception(String(E.ClassName()) + E.Message);
  176. }
  177. catch(Exception &exception)
  178. {
  179. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  180. DBERRORMSG("TItsTrafficGradeManager::LoadTrafficGrade", String(exception.ClassName()), exception.Message, sQry);
  181. throw Exception(String(exception.ClassName()) + exception.Message);
  182. }
  183. }
  184. __finally
  185. {
  186. if (pADO)
  187. {
  188. pADO->Close();
  189. delete pADO;
  190. }
  191. FLists.UnLock();
  192. }
  193. return true;
  194. }
  195. //---------------------------------------------------------------------------
  196. bool TItsTrafficGradeManager::LoadTrafficSubGrade(TADOConnection *ADbConn/*=NULL*/)
  197. {
  198. String sQry;
  199. TADOQuery *pADO = NULL;
  200. sQry = "SELECT A.SECT_GRAD_CD, \r\n"
  201. " CMTR_GRAD_CD , \r\n"
  202. " LWST_TRVL_SPED, \r\n"
  203. " HGHS_TRVL_SPED, \r\n"
  204. " CNGS_GRAD_YN \r\n"
  205. " FROM TB_CMTR_GRAD_CLSF A, \r\n"
  206. " TB_SECT_GRAD_CLSF B \r\n"
  207. " WHERE A.SECT_GRAD_CD = B.SECT_GRAD_CD \r\n";
  208. // " ORDER BY SECT_GRAD_CD, CMTR_GRAD_CD \r\n";
  209. try
  210. {
  211. ItsTrafficGradeManager->FLists.Lock();
  212. TItsTrafficGrade *pCode = NULL;
  213. try
  214. {
  215. pADO = new TADOQuery(NULL);
  216. pADO->Close();
  217. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  218. pADO->SQL->Clear();
  219. pADO->SQL->Text = sQry;
  220. pADO->Open();
  221. //int nRows = pADO->RecordCount;
  222. for( ; !pADO->Eof; pADO->Next())
  223. {
  224. String sGradCd = pADO->FieldByName("SECT_GRAD_CD")->AsString;
  225. pCode = ItsTrafficGradeManager->FLists.Find(sGradCd);
  226. if (!pCode) continue;
  227. TItsTrafficSubGrade *pSubCode = new TItsTrafficSubGrade();
  228. pSubCode->FSECT_GRAD_CD = sGradCd;
  229. pSubCode->FCMTR_GRAD_CD = pADO->FieldByName("CMTR_GRAD_CD")->AsString;
  230. pSubCode->FLWST_TRVL_SPED = pADO->FieldByName("LWST_TRVL_SPED")->AsInteger;
  231. pSubCode->FHGHS_TRVL_SPED = pADO->FieldByName("HGHS_TRVL_SPED")->AsInteger;
  232. pSubCode->FCNGS_GRAD_YN = pADO->FieldByName("CNGS_GRAD_YN")->AsString;
  233. pCode->FSubLists.Push(pSubCode->CMTR_GRAD_CD, pSubCode);
  234. pSubCode->Completed = true;
  235. }
  236. }
  237. catch(EDatabaseError &E)
  238. {
  239. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  240. DBERRORMSG("TItsTrafficGradeManager::LoadTrafficSubGrade", String(E.ClassName()), E.Message, sQry);
  241. throw Exception(String(E.ClassName()) + E.Message);
  242. }
  243. catch(Exception &exception)
  244. {
  245. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  246. DBERRORMSG("TItsTrafficGradeManager::LoadTrafficSubGrade", String(exception.ClassName()), exception.Message, sQry);
  247. throw Exception(String(exception.ClassName()) + exception.Message);
  248. }
  249. }
  250. __finally
  251. {
  252. if (pADO)
  253. {
  254. pADO->Close();
  255. delete pADO;
  256. }
  257. ItsTrafficGradeManager->FLists.UnLock();
  258. }
  259. return true;
  260. }
  261. //---------------------------------------------------------------------------