CDSAtmpF.cpp 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123
  1. //---------------------------------------------------------------------------
  2. #pragma hdrstop
  3. #include "CDSAtmpF.h"
  4. #include "VMSOprMainLibF.h"
  5. //---------------------------------------------------------------------------
  6. #pragma package(smart_init)
  7. //---------------------------------------------------------------------------
  8. void TCDSAtmp::Init()
  9. {
  10. SUCCESS = false;
  11. MSRM_DT = "";
  12. MSRM_SYST_NM = "";
  13. SO2_VAL = "";
  14. CO_VAL = "";
  15. NO2_VAL = "";
  16. O3_VAL = "";
  17. PM10_VAL = "";
  18. PM10_24HH_VAL = "";
  19. PM25_VAL = "";
  20. PM25_24HH_VAL = "";
  21. INTG_ATMP_VAL = "";
  22. INTG_ATMP_GRAD = "";
  23. SO2_GRAD = "";
  24. CO_GRAD = "";
  25. O3_GRAD = "";
  26. NO2_GRAD = "";
  27. PM10_24HH_GRAD = "";
  28. PM25_24HH_GRAD = "";
  29. PM10_1HH_GRAD = "";
  30. PM25_1HH_GRAD = "";
  31. }
  32. //---------------------------------------------------------------------------
  33. TCDSAtmpManager *CDSAtmpManager = NULL;
  34. //---------------------------------------------------------------------------
  35. /*
  36. * Manager
  37. */
  38. TCDSAtmpManager::TCDSAtmpManager()
  39. {
  40. }
  41. //---------------------------------------------------------------------------
  42. TCDSAtmpManager::~TCDSAtmpManager()
  43. {
  44. FLists.RemoveAll();
  45. }
  46. //---------------------------------------------------------------------------
  47. void TCDSAtmpManager::Init()
  48. {
  49. FOR_STL(TCDSAtmp*, pObj, FLists)
  50. {
  51. pObj->Init();
  52. }
  53. }
  54. //---------------------------------------------------------------------------
  55. bool TCDSAtmpManager::LoadFromDb(TADOConnection *ADbConn)
  56. {
  57. String sQry;
  58. TADOQuery *pADO = NULL;
  59. sQry = "SELECT * \r\n"
  60. " FROM TB_ATMP_PLTN_STTN \r\n";
  61. FLists.Lock();
  62. try
  63. {
  64. try
  65. {
  66. pADO = new TADOQuery(NULL);
  67. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  68. pADO->SQL->Clear();
  69. pADO->SQL->Text = sQry;
  70. pADO->Prepared = true;
  71. pADO->Open();
  72. for( ; !pADO->Eof; pADO->Next())
  73. {
  74. String ATMP_STTN_NMBR = pADO->FieldByName("ATMP_STTN_NMBR")->AsString.Trim();
  75. TCDSAtmp *pObj = FLists.Find(ATMP_STTN_NMBR);
  76. if (!pObj)
  77. {
  78. pObj = new TCDSAtmp();
  79. pObj->ATMP_STTN_NMBR = ATMP_STTN_NMBR;
  80. FLists.Push(pObj->ATMP_STTN_NMBR, pObj);
  81. }
  82. pObj->ATMP_STTN_NM = pADO->FieldByName("ATMP_STTN_NM")->AsString.Trim();
  83. pObj->VMS_DISP_NM = pADO->FieldByName("VMS_DISP_NM")->AsString.Trim();
  84. pObj->ATMP_STTN_ADDR = pADO->FieldByName("ATMP_STTN_ADDR")->AsString.Trim();
  85. pObj->DEL_YN = pADO->FieldByName("DEL_YN")->AsString.Trim();
  86. }
  87. }
  88. catch(EDatabaseError &E)
  89. {
  90. DBERRORMSG("TCDSAtmpManager::LoadFromDb", String(E.ClassName()), E.Message, sQry);
  91. throw Exception(String(E.ClassName()) + E.Message);
  92. }
  93. catch(Exception &e)
  94. {
  95. DBERRORMSG("TCDSAtmpManager::LoadFromDb", String(e.ClassName()), e.Message, sQry);
  96. throw Exception(String(e.ClassName()) + e.Message);
  97. }
  98. }
  99. __finally
  100. {
  101. if (pADO)
  102. {
  103. pADO->Close();
  104. delete pADO;
  105. }
  106. FLists.UnLock();
  107. }
  108. return true;
  109. }
  110. //---------------------------------------------------------------------------