CDSHolidayF.cpp 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113
  1. //---------------------------------------------------------------------------
  2. #pragma hdrstop
  3. #include "CDSHolidayF.h"
  4. #include "ITSDbF.h"
  5. #include "AppGlobalF.h"
  6. //---------------------------------------------------------------------------
  7. #pragma package(smart_init)
  8. TItsHoliday::TItsHoliday()
  9. {
  10. FCompleted = false;
  11. FEditMode = DB_INIT;
  12. FGridIndex = -1;
  13. DEL_YN = "N";
  14. //Clear();
  15. }
  16. //---------------------------------------------------------------------------
  17. void TItsHoliday::Clear()
  18. {
  19. YMD = ""; //VARCHAR2(8) N 년월일
  20. DAY_TYPE_CD = ""; //VARCHAR2(7) Y 요일 유형 코드
  21. LEGL_HLDY_NM = ""; //VARCHAR2(30) Y 공휴일 명
  22. RMRK = ""; //VARCHAR2(200) Y 비고
  23. DEL_YN = "N";
  24. }
  25. //---------------------------------------------------------------------------
  26. TItsHoliday::~TItsHoliday()
  27. {
  28. }
  29. //---------------------------------------------------------------------------
  30. //---------------------------------------------------------------------------
  31. TItsHolidayManager *ItsHolidayManager = NULL;
  32. //---------------------------------------------------------------------------
  33. /*
  34. * Holiday Manager
  35. */
  36. TItsHolidayManager::TItsHolidayManager()
  37. {
  38. }
  39. //---------------------------------------------------------------------------
  40. TItsHolidayManager::~TItsHolidayManager()
  41. {
  42. FLists.RemoveAll();
  43. }
  44. //---------------------------------------------------------------------------
  45. bool TItsHolidayManager::LoadFromDb(TADOConnection *ADbConn/*=NULL*/)
  46. {
  47. String sQry;
  48. TADOQuery *pADO = NULL;
  49. sQry = "SELECT YMD, DAY_TYPE_CD, LEGL_HLDY_NM, RMRK \r\n"
  50. " FROM TB_LEGL_HLDY_INFR \r\n";
  51. //" ORDER BY YMD, DAY_TYPE_CD, LEGL_HLDY_NM \r\n";
  52. try
  53. {
  54. FLists.RemoveAll();
  55. try
  56. {
  57. pADO = new TADOQuery(NULL);
  58. pADO->Close();
  59. pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
  60. pADO->SQL->Clear();
  61. pADO->SQL->Text = sQry;
  62. pADO->Prepared = true;
  63. pADO->Open();
  64. for( ; !pADO->Eof; pADO->Next())
  65. {
  66. TItsHoliday *pObj = new TItsHoliday();
  67. pObj->YMD = pADO->FieldByName("YMD")->AsString;
  68. pObj->DAY_TYPE_CD = pADO->FieldByName("DAY_TYPE_CD")->AsString;
  69. pObj->LEGL_HLDY_NM = pADO->FieldByName("LEGL_HLDY_NM")->AsString;
  70. pObj->RMRK = pADO->FieldByName("RMRK")->AsString;
  71. FLists.Push(pObj->YMD, pObj);
  72. pObj->Completed = true;
  73. pObj->DEL_YN = "N";
  74. }
  75. }
  76. catch(EDatabaseError &E)
  77. {
  78. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  79. DBERRORMSG("TItsHolidayManager::LoadFromDb", String(E.ClassName()), E.Message, sQry);
  80. throw Exception(String(E.ClassName()) + E.Message);
  81. }
  82. catch(Exception &e)
  83. {
  84. ::PostMessage(Application->MainForm->Handle, (UINT)(WM_USER+0xF4), (WPARAM)0xB2, (LPARAM)0xB2);
  85. DBERRORMSG("TItsHolidayManager::LoadFromDb", String(e.ClassName()), e.Message, sQry);
  86. throw Exception(String(e.ClassName()) + e.Message);
  87. }
  88. }
  89. __finally
  90. {
  91. if (pADO)
  92. {
  93. pADO->Close();
  94. delete pADO;
  95. }
  96. }
  97. return true;
  98. }
  99. //---------------------------------------------------------------------------