ITS_OP/TEMP/VmsCommonLib - 복사본/CDS/CDSVmsDsplCndtF.cpp

//---------------------------------------------------------------------------

#pragma hdrstop

#include "CDSVmsDsplCndtF.h"
#include "VmsCommonLibF.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

//---------------------------------------------------------------------------
TVmsDsplCndt::TVmsDsplCndt()
{
}
//---------------------------------------------------------------------------
TVmsDsplCndt::~TVmsDsplCndt()
{
}
//---------------------------------------------------------------------------


//---------------------------------------------------------------------------
TVmsDsplCndtManager *VmsDsplCndtManager = NULL;
//---------------------------------------------------------------------------

TVmsDsplCndtManager::TVmsDsplCndtManager()
{
}
//---------------------------------------------------------------------------
TVmsDsplCndtManager::~TVmsDsplCndtManager()
{
    FLists.RemoveAll();
}
//---------------------------------------------------------------------------

bool TVmsDsplCndtManager::LoadFromDb(TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

    FLists.Lock();
    FLists.RemoveAll();

    sQry = "SELECT A.VMS_FORM_DSPL_CNDT_ID,    \r\n"
           "       A.VMS_FORM_DSPL_CNDT,        \r\n"
           "       A.VMS_FORM_DSPL_CNDT_NM      \r\n"
           "  FROM TB_VMS_FORM_DSPL_CNDT A      \r\n"
           " ORDER BY A.VMS_FORM_DSPL_CNDT_ID   \r\n";

    try {
        try {
            pADO = new TADOQuery(NULL);
			pADO->Close();
            pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;

			pADO->Open();
            for( ; !pADO->Eof; pADO->Next()) {

				TVmsDsplCndt *pObj = new TVmsDsplCndt();

                pObj->VMS_FORM_DSPL_CNDT_ID = pADO->FieldByName("VMS_FORM_DSPL_CNDT_ID")->AsString;
                pObj->VMS_FORM_DSPL_CNDT    = pADO->FieldByName("VMS_FORM_DSPL_CNDT")->AsString;
                pObj->VMS_FORM_DSPL_CNDT_NM = pADO->FieldByName("VMS_FORM_DSPL_CNDT_NM")->AsString;

				FLists.Push(pObj->VMS_FORM_DSPL_CNDT_ID, pObj);
            }
        }
        catch(EDatabaseError &E) {
            DBERRORMSG("TVmsDsplCndtManager::LoadFromDb", String(E.ClassName()), E.Message, sQry);
            return false;
        }
        catch(Exception &e) {
            DBERRORMSG("TVmsDsplCndtManager::LoadFromDb", String(e.ClassName()), e.Message, sQry);
            return false;
        }
    }
    __finally {
        if (pADO) {
            pADO->Close();
            delete pADO;
        }
        FLists.UnLock();
    }

    return true;
}
//---------------------------------------------------------------------------