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

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

#pragma hdrstop

#include "CDSVmsCtlrF.h"
#include "ITSUtilF.h"
#include "VmsCommonLibF.h"

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

#pragma package(smart_init)

//---------------------------------------------------------------------------
TVmsIfscRltn::TVmsIfscRltn()
{
}
//---------------------------------------------------------------------------
TVmsIfscRltn::~TVmsIfscRltn()
{
}
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
TVmsEvspRltn::TVmsEvspRltn()
{
}
//---------------------------------------------------------------------------
TVmsEvspRltn::~TVmsEvspRltn()
{
}
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
TVmsMsg::TVmsMsg()
{
    for (int ii = 0; ii < INT_VMS_MAX_FORM; ii++)
    {
        PHASE[ii].pVmsBmp = NULL;
    }
    Init();
};
//---------------------------------------------------------------------------
TVmsMsg::~TVmsMsg()
{
    for (int ii = 0; ii < INT_VMS_MAX_FORM; ii++)
    {
        if (PHASE[ii].pVmsBmp)
        {
            PHASE[ii].pVmsBmp->FreeImage();
            PHASE[ii].pVmsBmp->Assign(NULL);
            delete PHASE[ii].pVmsBmp;
            PHASE[ii].pVmsBmp = NULL;
        }
    }
};
//---------------------------------------------------------------------------

void TVmsMsg::Init()
{
    Total    = 0;
    Curr     = 0;
    OFFER_DT = "19990101000000";
    OFFER_YN = false;
    IsLoading= true;
    for (int ii = 0; ii < INT_VMS_MAX_FORM; ii++)
    {
        PHASE[ii].DSPL_HH = 4;        //표출시간
        PHASE[ii].DNLD_YN = "N";      //다운로드성공여부
        PHASE[ii].DSPL_CD = "";       //표출방법
        PHASE[ii].VMS_SCH_FORM_TYPE = 0;
        PHASE[ii].VMS_DSPL_MSG_TXT  = "";
    }
};
//---------------------------------------------------------------------------

void VmsInitStatus(INT_VMS_STATE *AState)
{
    int ii;
	if (AState->Comm != vms_comm_normal && AState->Wcomm != vms_wcomm_normal)
	{
        AState->DoorStatus          = vms_door_unknown; /* 도어상태정보코드,     0:열림 1:닫힘 2:알수없음 */
        AState->ModulePowerStatus   = vms_module_power_unknown; /* 모듈전원상태정보코드, 0:켜짐 1:꺼짐 2:알수없음 */
        AState->BodyTemp            = 0;           /* 함체온도값(℃), 범위(-128~127) */
        AState->LuminanceStatus     = 0;           /* 화면의 밝기값 (최대 휘도값을 100으로 했을 때의 백분율 값), 범위(0~100) */
        AState->FanStatus           = vms_fan_unknown; /* Fan 동작상태정보코드,    0:켜짐, 1:꺼짐 2:알수없음 */
        AState->HeaterStatus        = vms_heater_unknown; /* Heater 동작상태정보코드, 0:켜짐, 1:꺼짐 2:알수없음 */

        AState->ExternalLightStatus = vms_unknown; /* 선택 외부조명 동작상태정보코드 0:켜짐, 1:꺼짐, 2:자동(공단은 미사용) */
        AState->AlarmLightStatus    = vms_unknown; /* 선택 경광등 동작상태정보코드   0:켜짐, 1:꺼짐 */
        AState->SpeakerStatus       = vms_unknown; /* 선택 스피커 동작상태정보코드   0:켜짐, 1:꺼짐 */
        //memset(&AState->ControllerCurrentTime, 0x00, sizeof(AState->ControllerCurrentTime));  /*선택 제어기 시간 (YYYYMMDDHHMMSS) */

        AState->Voltage = 0;                       /* 전압, 범위(0~255), 사용안함 */

//        AState->ModuleState      = vms_unknown;    /* 모듈 상태, 0:정상 1:장애 2:알수없음 */
#if 0
        //AState->ModuleHorizontal = 0;              /* 가로 모듈수 */
        //AState->ModuleVertical   = 0;              /* 세로 모듈수 */
        for (ii = 0; ii < INT_VMS_MAX_MODULE_BIT; ii++)
            AState->ModuleStatus[ii] = 0xFF;//vms_unknown; /* 모듈 개별 상태, 0:정상 1:장애 2:알수없음 */
        //AState->PowerCount       = 0;               /* 전원 갯수 */
        for (ii = 0; ii < INT_VMS_MAX_POWER_BIT; ii++)
            AState->PowerStatus[ii] = 0xFF;//vms_unknown; /* 전원 개별 상태, 0:켜짐 1:꺼짐 2:알수없음 */
#endif

#if 0
        AState->ScheduledMessageOperatingTime   = 0; /* 필수 계획된 메시지의 동작시간(초) */
        AState->ModuleOperatingTemperature      = 0; /* 필수 모듈 전원이 꺼지는 온도값(℃) */
        AState->FanOperatingTemperature         = 0; /* 필수 Fan 동작 기준 온도값(℃) */
        AState->HeaterOperatingTemperature      = 0; /* 필수 Heater 동작 기준 온도값(℃) */
        AState->ExternalLightOperatingLuminance = 0; /* 선택 외부전등 동작 기준 휘도값 */
        AState->ModuleBasicFailureRate          = 0; /* 선택 모듈 장애율 (한 개의 모듈을 장애로 처리하기 위한 픽셀의 백분율값) */
        AState->MaximumRetry                    = 0; /* 선택 최대 재시도 횟수(회) */
        AState->ResponseTimeOut                 = 0; /* 선택 최대응답대기시간 (초) */
        AState->BlinkingCycleTime               = 0; /* 선택 점멸시간 주기 ( 1/10초단위) */
#endif
    }

#if 0
    for (ii = 0; ii < INT_VMS_MAX_MODULE_BIT; ii++)
        AState->ModuleStatus[ii] = 0xFF;//vms_unknown; /* 모듈 개별 상태, 0:정상 1:장애 2:알수없음 */
    //AState->PowerCount       = 0;               /* 전원 갯수 */
    for (ii = 0; ii < INT_VMS_MAX_POWER_BIT; ii++)
        AState->PowerStatus[ii] = 0xFF;//vms_unknown; /* 전원 개별 상태, 0:켜짐 1:꺼짐 2:알수없음 */
#endif
}
//---------------------------------------------------------------------------

TVmsStts::TVmsStts(String AVMS_CTLR_ID)
{
    VMS_CTLR_ID = AVMS_CTLR_ID;
    Init();
};
//---------------------------------------------------------------------------
TVmsStts::~TVmsStts()
{
};
//---------------------------------------------------------------------------

void TVmsStts::Init()
{
    IsLoading = false;
};
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
TVmsCtlr::TVmsCtlr()
{
    memset(&STATE, 0x00, sizeof(STATE));
    STATE.Comm = vms_comm_error;
    VmsInitStatus(&STATE);
    STATE.Comm = vms_comm_error;

    InitFormCount();

    VmsMsg = NULL;
    VmsMsg = new TVmsMsg();
    VmsMsg->Init();

    RunState = state_error;
}
//---------------------------------------------------------------------------

TVmsCtlr::~TVmsCtlr()
{
    FIfscRltn.RemoveAll();
}
//---------------------------------------------------------------------------
void TVmsCtlr::Lock()
{
    //EnterCriticalSection(&FCS);
}
//---------------------------------------------------------------------------
void TVmsCtlr::UnLock()
{
    //LeaveCriticalSection(&FCS);
}
//---------------------------------------------------------------------------
void TVmsCtlr::CheckRunState()
{
    RunState = STATE.Comm;
    if (STATE.Comm == vms_comm_normal && STATE.Wcomm != vms_wcomm_normal)
    {
        STATE.DoorStatus        = vms_door_unknown;
        STATE.ModulePowerStatus = vms_module_power_unknown;
        STATE.PowerCtrlStatus   = vms_module_power_unknown;
        STATE.BodyTemp          = 0;
        STATE.LuminanceStatus   = 0;
        STATE.FanStatus         = vms_fan_unknown;
        STATE.HeaterStatus      = vms_heater_unknown;
    }
}
//---------------------------------------------------------------------------

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

TVmsSize::TVmsSize()
{
}
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
TVmsCtlrManager *VmsCtlrManager = NULL;
//---------------------------------------------------------------------------

TVmsCtlrManager::TVmsCtlrManager()
{
    FImgStream = NULL;
}
//---------------------------------------------------------------------------
TVmsCtlrManager::~TVmsCtlrManager()
{
    FVmsSize.RemoveAll();
    FLists.RemoveAll();
    if (FImgStream) delete FImgStream;
    FImgStream = NULL;
}
//---------------------------------------------------------------------------
void TVmsCtlrManager::InitFormCount()
{
    FLists.Lock();
    try
    {
        FOR_STL(TVmsCtlr*, pObj, FLists)
        {
            pObj->InitFormCount();
        }
    }
    __finally
    {
        FLists.UnLock();
    }
};
//---------------------------------------------------------------------------

#if 0
void TVmsCtlrManager::FillVmsType(TcxComboBox *cboBox, bool bAddAll/*=false*/)
{
    String     sQry;
    TStrings  *pStrItems;
    TADOQuery *pADO = NULL;

    if (!VmsTypeManager)
    {
        VmsTypeManager = new TVmsTypeManager();
        VmsTypeManager->LoadFromDb();
    }

    APP_DelVmsSizeCombo(cboBox);

    pStrItems = ((TcxComboBox *)cboBox)->Properties->Items;
    ((TcxComboBox *)cboBox)->Properties->Items->Clear();

    FOR_STL(TVmsType*, pObj, VmsTypeManager->FLists)
    {
        String sTypeCd = pObj->VMS_MODL_KIND;
        String sTypeNm = pObj->VMS_MODL_KIND_NM;
        int nW = pObj->VMS_WDTH;
        int nH = pObj->VMS_HGHT;
        int nR = pObj->VMS_MODL_ROW;
        int nC = pObj->VMS_MODL_COL;
        pStrItems->AddObject(" [" + sTypeCd + "] " + sTypeNm + " (" + String(nW) + "x" + String(nH) + ")", new TVmsSizeType(sTypeCd, sTypeNm, nW, nH, nR, nC) );
    }
    if (bAddAll)
    {
        String sAllName = "전체";
        pStrItems->AddObject(" [ALL] 전체" , new TVmsSizeType("ALL", sAllName, 384, 64, 2, 12));
    }
    cboBox->ItemIndex = 0;
}
//---------------------------------------------------------------------------

void TVmsCtlrManager::FillVmsModlSizeType(TcxComboBox *cboBox, bool bAddAll/*=false*/)
{
    String     sQry;
    TStrings  *pStrItems;
    TADOQuery *pADO = NULL;

    if (!VmsTypeManager)
    {
        VmsTypeManager = new TVmsTypeManager();
        VmsTypeManager->LoadFromDb();
    }

    APP_DelVmsSizeCombo(cboBox);

    pStrItems = ((TcxComboBox *)cboBox)->Properties->Items;
    ((TcxComboBox *)cboBox)->Properties->Items->Clear();

    FOR_STL(TVmsType*, pObj, VmsTypeManager->FLists)
    {
        String sTypeCd = pObj->VMS_MODL_KIND;
        String sTypeNm = pObj->VMS_MODL_KIND_NM;
        int nW = pObj->VMS_WDTH;
        int nH = pObj->VMS_HGHT;
        int nR = pObj->VMS_MODL_ROW;
        int nC = pObj->VMS_MODL_COL;
        pStrItems->AddObject(" [" + sTypeCd + "] " + sTypeNm + " (" + String(nW) + "x" + String(nH) + ")", new TVmsSizeType(sTypeCd, sTypeNm, nW, nH, nR, nC) );
    }
    if (bAddAll)
    {
        String sAllName = "전체";
        pStrItems->AddObject(" [ALL] 전체" , new TVmsSizeType("ALL", sAllName, 384, 64, 2, 12));
    }
    cboBox->ItemIndex = 0;
}
//---------------------------------------------------------------------------
#endif

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

    FVmsSize.Lock();
    try
    {
        FVmsSize.RemoveAll();
    }
    __finally
    {
        FVmsSize.UnLock();
    }

    sQry = "SELECT T1.VMS_MODL_KIND, T1.VMS_MODL_KIND_NM,               \r\n"
           "       T1.VMS_MODL_COL * T1.MODL_PIXL_WDTH AS VMS_WDTH,     \r\n"
           "       T1.VMS_MODL_ROW * T1.MODL_PIXL_HGHT AS VMS_HGHT      \r\n"
           "  FROM TB_VMS_MODL_KIND T1                                  \r\n"
           " WHERE 1=1                                                  \r\n"
           "   AND T1.USE_YN = 'Y'                                      \r\n"
           " ORDER BY T1.VMS_MODL_KIND                                  \r\n";

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

            pADO->Prepared = true;
			pADO->Open();
            for( ; !pADO->Eof; pADO->Next())
            {
				TVmsSize *pObj = new TVmsSize();

                pObj->TypeCd = pADO->FieldByName("VMS_MODL_KIND")->AsString;
                pObj->TypeNm = pADO->FieldByName("VMS_MODL_KIND_NM")->AsString;
                pObj->Width  = pADO->FieldByName("VMS_WDTH")->AsInteger;
                pObj->Height = pADO->FieldByName("VMS_HGHT")->AsInteger;

				FVmsSize.Push(pObj->TypeCd, pObj);
            }
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::LoadVmsModlSize", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::LoadVmsModlSize", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
        FVmsSize.UnLock();
    }

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

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

    FMinWidth = 1000;
    FMinHeight= 1000;
    FMaxWidth = 0;
    FMaxHeight= 0;

    sQry = "SELECT T1.*,                                                                  \r\n"
           "       T2.VMS_MODL_KIND_NM,                                                   \r\n"
           "       T2.VMS_MODL_COL,  T2.MODL_PIXL_WDTH,                                   \r\n"
           "       T2.VMS_MODL_ROW,  T2.MODL_PIXL_HGHT, T2.MODL_CLR,                      \r\n"
           "       NVL(TRIM(T1.CMRA_IMG_ADDR), '-') AS VMS_RTSP_ADDR,                     \r\n"
           "       T3.CMNC_IP AS VMS_CTLR_IP,                                             \r\n"
           "       NVL(T4.CD_NM, T1.VMS_TYPE  || '-?-') AS VMS_TYPE_NM,                   \r\n"
           "       NVL(T5.CD_NM, T1.OPER_MODE || '-?-') AS OPER_MODE_NM                   \r\n"
           "  FROM TB_VMS_CTLR T1, TB_VMS_MODL_KIND T2, TB_FCLT T3,                       \r\n"
           "       (SELECT * FROM TB_SYS_CD T4 WHERE T4.CLSS_CD = 'VMS_TYPE_CD') T4,      \r\n"
           "       (SELECT * FROM TB_SYS_CD T4 WHERE T4.CLSS_CD = 'VMS_OPER_MODE_CD') T5  \r\n"
           " WHERE 1=1                                                                    \r\n"
           "   AND T1.USE_YN = 'Y'                                                        \r\n"
           "   AND T1.VMS_MODL_KIND = T2.VMS_MODL_KIND                                    \r\n"
           "   AND T1.FCLT_ID       = T3.FCLT_ID                                          \r\n"
           "   AND T1.VMS_TYPE      = T4.CODE_NO(+)                                       \r\n"
           "   AND T1.OPER_MODE     = T5.CODE_NO(+)                                       \r\n"
           " ORDER BY VMS_CTLR_ID                                                         \r\n";

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

            pADO->Prepared = true;
			pADO->Open();
            for( ; !pADO->Eof; pADO->Next())
            {
				TVmsCtlr *pObj = new TVmsCtlr();

                pObj->VMS_CTLR_ID       = pADO->FieldByName("VMS_CTLR_ID")->AsString; 	        //N	VARCHAR2(10)	N			VMS제어기ID
                pObj->FCLT_ID           = pADO->FieldByName("FCLT_ID")->AsString;     	        //N	VARCHAR2(10)	N			시설물ID
                pObj->VMS_NM            = pADO->FieldByName("VMS_NM")->AsString;      	        //N	VARCHAR2(32)	N			VMS명
                pObj->VMS_TYPE          = pADO->FieldByName("VMS_TYPE")->AsString;    	        //N	VARCHAR2(3)	    N			VMS유형
                pObj->STD_SECT_ID       = pADO->FieldByName("STD_SECT_ID")->AsString; 	        //N	CHAR(10)	    N			표준구간ID
                pObj->INSTL_MILE        = pADO->FieldByName("INSTL_MILE")->AsInteger;  	        //N	NUMBER(5)	    Y			설치이정
                pObj->CRDN_X            = pADO->FieldByName("CRDN_X")->AsFloat;      	        //N	NUMBER(13,10)	N			좌표X
                pObj->CRDN_Y            = pADO->FieldByName("CRDN_Y")->AsFloat;      	        //N	NUMBER(12,10)	N			좌표Y
                pObj->VMS_MODL_KIND     = pADO->FieldByName("VMS_MODL_KIND")->AsString;	        //N	VARCHAR2(10)	N			VMS모듈종류
                pObj->CMNC_PORT         = pADO->FieldByName("CMNC_PORT")->AsInteger;   	        //N	NUMBER(5)	    N			통신포트
                pObj->EQMT_NO           = pADO->FieldByName("EQMT_NO")->AsInteger;     	        //N	NUMBER(3)	    N			장비번호
                pObj->OPER_MODE         = pADO->FieldByName("OPER_MODE")->AsString;   	        //N	VARCHAR2(3)	    N			운영모드
                pObj->CMRA_IND          = pADO->FieldByName("CMRA_IND")->AsString;    	        //N	CHAR(1)	        N			카메라유무
                pObj->CMRA_IMG_ADDR     = pADO->FieldByName("CMRA_IMG_ADDR")->AsString;	        //N	VARCHAR2(128)	Y			카메라영상주소
                pObj->CMRA_LGIN_ID      = pADO->FieldByName("CMRA_LGIN_ID")->AsString;	        //N	VARCHAR2(32)	Y			카메라로그인ID
                pObj->CMRA_LGIN_PW      = pADO->FieldByName("CMRA_LGIN_PW")->AsString;	        //N	VARCHAR2(32)	Y			카메라로그인암호
                pObj->VMS_SCNR_ID       = pADO->FieldByName("VMS_SCNR_ID")->AsString; 	        //N	VARCHAR2(10)	Y			VMS시나리오ID
                pObj->VMS_ON_HM         = pADO->FieldByName("VMS_ON_HM")->AsString;   	        //N	CHAR(4)	        Y			VMS ON시분
                pObj->VMS_OFF_HM        = pADO->FieldByName("VMS_OFF_HM")->AsString;  	        //N	CHAR(4)	        Y			VMS OFF시분
                pObj->MAX_DSPL_FORM_CNT = pADO->FieldByName("MAX_DSPL_FORM_CNT")->AsInteger;	//N	NUMBER(2)	    N			최대표출폼수
                pObj->USE_YN            = pADO->FieldByName("USE_YN")->AsString;

                pObj->VMS_CTLR_IP       = pADO->FieldByName("VMS_CTLR_IP")->AsString;
                pObj->WEB_CMRA_IP       = "";
                pObj->VMS_RTSP_ADDR     = pADO->FieldByName("VMS_RTSP_ADDR")->AsString;
                if (pObj->VMS_RTSP_ADDR == "-") {
                    pObj->VMS_RTSP_ADDR = "";
                }
                pObj->VMS_TYPE_NM       = pADO->FieldByName("VMS_TYPE_NM")->AsString;
                pObj->OPER_MODE_NM      = pADO->FieldByName("OPER_MODE_NM")->AsString;

                pObj->FULL_STRM_SESN_NM = pObj->VMS_RTSP_ADDR;

                pObj->VMS_MODL_KIND_NM = pADO->FieldByName("VMS_MODL_KIND_NM")->AsString.Trim();

                pObj->VMS_MODL_ROW   = pADO->FieldByName("VMS_MODL_ROW")->AsInteger;
                pObj->VMS_MODL_COL   = pADO->FieldByName("VMS_MODL_COL")->AsInteger;
                pObj->MODL_PIXL_WDTH = pADO->FieldByName("MODL_PIXL_WDTH")->AsInteger;
                pObj->MODL_PIXL_HGHT = pADO->FieldByName("MODL_PIXL_HGHT")->AsInteger;
                pObj->POWR_MODL_ROW  = 2;//pADO->FieldByName("POWR_ROW_NUM")->AsInteger;
                pObj->POWR_MODL_COL  = 6;//pADO->FieldByName("POWR_COL_NUM")->AsInteger;
                pObj->MODL_CLR       = pADO->FieldByName("MODL_CLR")->AsString.Trim();

                pObj->WIDTH  = pObj->VMS_MODL_COL * pObj->MODL_PIXL_WDTH;
                pObj->HEIGHT = pObj->VMS_MODL_ROW * pObj->MODL_PIXL_HGHT;

                pObj->Stts = new TVmsStts(pObj->VMS_CTLR_ID);

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

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

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

    sQry = "SELECT T1.*,                                                       \r\n"
           "       TO_CHAR(T1.LAST_DT, 'YYYY-MM-DD HH24:MI:SS') AS LAST_DT_FMT \r\n"
           "  FROM TB_VMS_CTLR_STTS_PRST T1                                    \r\n";

    FLists.Lock();
    try
    {
        TVmsCtlr *pVmsCtlr = NULL;

        FOR_STL(TVmsCtlr*, pVms, FLists) {
            pVms->Stts->IsLoading = false;
        }

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

            pADO->Prepared = true;
            pADO->Open();
            for( ; !pADO->Eof; pADO->Next())
            {
                String VMS_CTLR_ID = pADO->FieldByName("VMS_CTLR_ID")->AsString;
                pVmsCtlr = FLists.Find(VMS_CTLR_ID);
                if (pVmsCtlr == NULL) {
                    continue;
                }

                TVmsStts* Stts = pVmsCtlr->Stts;

                Stts->LAST_DT       = pADO->FieldByName("LAST_DT")->AsString;         //	N	DATE	    N			최종일시
                Stts->LAST_DT_FMT   = pADO->FieldByName("LAST_DT_FMT")->AsString;     //	N	DATE	    N			최종일시
                Stts->RPRS_STTS     = pADO->FieldByName("RPRS_STTS")->AsString;       //	N	VARCHAR2(3)	N			대표상태
                Stts->CMNC_STTS     = pADO->FieldByName("CMNC_STTS")->AsString;       //	N	VARCHAR2(3)	Y			통신상태
                Stts->PS_STTS       = pADO->FieldByName("PS_STTS")->AsString;         //	N	VARCHAR2(3)	Y			전원상태
                Stts->FAN_STTS      = pADO->FieldByName("FAN_STTS")->AsString;        //	N	VARCHAR2(3)	Y			팬상태
                Stts->HTER_STTS     = pADO->FieldByName("HTER_STTS")->AsString;       //	N	VARCHAR2(3)	Y			히터상태
                Stts->BOX_DOOR_STTS = pADO->FieldByName("BOX_DOOR_STTS")->AsString;   //	N	VARCHAR2(3)	Y			함체문상태
                Stts->BOX_FAN_STTS  = pADO->FieldByName("BOX_FAN_STTS")->AsString;    //	N	VARCHAR2(3)	Y			함체팬상태
                Stts->BOX_HTER_STTS = pADO->FieldByName("BOX_HTER_STTS")->AsString;   //	N	VARCHAR2(3)	Y			함체히터상태
                Stts->SGNBRD_ON     = pADO->FieldByName("SGNBRD_ON")->AsString;       //	N	VARCHAR2(3)	Y			전광판ON
                Stts->SGNBRD_STTS   = pADO->FieldByName("SGNBRD_STTS")->AsString;     //	N	VARCHAR2(3)	Y			전광판상태
                Stts->BOX_TMPR      = pADO->FieldByName("BOX_TMPR")->AsInteger;       //	N	NUMBER(3)	Y			함체온도
                Stts->BOX_HMD       = pADO->FieldByName("BOX_HMD")->AsInteger;        //	N	NUMBER(3)	Y			함체습도
                Stts->VMS_TMPR      = pADO->FieldByName("VMS_TMPR")->AsInteger;       //    N	NUMBER(3)	Y			VMS온도

                Stts->IsLoading = true;
            }
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::LoadStatusFromDb", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::LoadStatusFromDb", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
        FLists.UnLock();
    }

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

bool TVmsCtlrManager::DeleteVms(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String     sQry;
    TADOQuery *pADO = NULL;

    sQry = "UPDATE TB_VMS_CTLR        \r\n"
           "   SET USE_YN = 'N'       \r\n"
           " WHERE VMS_CTLR_ID = :p01 \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->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
			pADO->ExecSQL();

            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::DeleteVms", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::DeleteVms", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }

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

bool TVmsCtlrManager::InsertVms(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String     sQry;
    TADOQuery *pADO = NULL;

#if 0
    sQry = "INSERT INTO TB_VMS_CTLR         \r\n"
           "          (                     \r\n"
           "           VMS_CTLR_ID,       \r\n"
           "           VMS_CTLR_ID,         \r\n"
           "           VMS_NM,              \r\n"
           "           VMS_CTLR_IP,         \r\n"
           "           VMS_CTLR_PORT,       \r\n"
           "           VMS_CTLR_LOCAL_NO,   \r\n"
           "           VMS_MODL_KIND,         \r\n"
           "           ISTL_LCTN_NM,        \r\n"
           "           X_CRDN,              \r\n"
           "           Y_CRDN,              \r\n"
           "           DEL_YN,              \r\n"
           "           WEB_CMRA_IP,         \r\n"
           "           WEB_CMRA_PORT,       \r\n"
           "           WEB_CMRA_ID,         \r\n"
           "           WEB_CMRA_PWD,        \r\n"
           "           STRM_SESN_NM,        \r\n"
           "           VMS_MAX_PHSE_NUM,    \r\n"
           "           VMS_OFF_HM,        \r\n"
           "           VMS_OFF_HM,       \r\n"
           "           ISTL_LCTN_ADDR       \r\n"
           "          )                     \r\n"
           "   VALUES (:p01,                \r\n"
           "           :p02,                \r\n"
           "           :p03,                \r\n"
           "           :p04,                \r\n"
           "           :p05,                \r\n"
           "           :p06,                \r\n"
           "           :p07,                \r\n"
           "           :p08,                \r\n"
           "           :p09,                \r\n"
           "           :p10,                \r\n"
           "           :p11,                \r\n"
           "           :p12,                \r\n"
           "           :p13,                \r\n"
           "           :p14,                \r\n"
           "           :p15,                \r\n"
           "           :p16,                \r\n"
           "           :p17,                \r\n"
           "           :p18,                \r\n"
           "           :p19,                \r\n"
           "           :p20)                \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->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
            pADO->Parameters->ParamByName("p02")->Value = AObj->VMS_CTLR_ID;
            pADO->Parameters->ParamByName("p03")->Value = AObj->VMS_NM;
            pADO->Parameters->ParamByName("p04")->Value = AObj->VMS_CTLR_IP;
            pADO->Parameters->ParamByName("p05")->Value = AObj->VMS_CTLR_PORT;
            pADO->Parameters->ParamByName("p06")->Value = AObj->VMS_CTLR_LOCAL_NO;
            pADO->Parameters->ParamByName("p07")->Value = AObj->VMS_MODL_KIND;
            pADO->Parameters->ParamByName("p08")->Value = AObj->ISTL_LCTN_NM;
            pADO->Parameters->ParamByName("p09")->Value = AObj->X_CRDN;
            pADO->Parameters->ParamByName("p10")->Value = AObj->Y_CRDN;
            pADO->Parameters->ParamByName("p11")->Value = AObj->DEL_YN;
            pADO->Parameters->ParamByName("p12")->Value = AObj->WEB_CMRA_IP;
            pADO->Parameters->ParamByName("p13")->Value = AObj->WEB_CMRA_PORT;
            pADO->Parameters->ParamByName("p14")->Value = AObj->WEB_CMRA_ID;
            pADO->Parameters->ParamByName("p15")->Value = AObj->WEB_CMRA_PWD;
            pADO->Parameters->ParamByName("p16")->Value = AObj->STRM_SESN_NM;
            pADO->Parameters->ParamByName("p17")->Value = AObj->VMS_MAX_PHSE_NUM;
            pADO->Parameters->ParamByName("p18")->Value = AObj->VMS_ON_HM;
            pADO->Parameters->ParamByName("p19")->Value = AObj->VMS_OFF_HM;
            pADO->Parameters->ParamByName("p20")->Value = AObj->ISTL_LCTN_ADDR;

			pADO->ExecSQL();

            return MergeFcltInfo(AObj, ADbConn);
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::InsertVms", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::InsertVms", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

bool TVmsCtlrManager::UpdateVms(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    return MergeVms(AObj, ADbConn);
}
//---------------------------------------------------------------------------

bool TVmsCtlrManager::MergeVms(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

#if 0
    sQry = "MERGE INTO TB_VMS_CTLR L                   \r\n"
           "USING (SELECT :p01 AS VMS_CTLR_ID,       \r\n"
           "              :p02 AS VMS_CTLR_ID,         \r\n"
           "              :p03 AS VMS_NM,              \r\n"
           "              :p04 AS VMS_CTLR_IP,         \r\n"
           "              :p05 AS VMS_CTLR_PORT,       \r\n"
           "              :p06 AS VMS_CTLR_LOCAL_NO,   \r\n"
           "              :p07 AS VMS_MODL_KIND,         \r\n"
           "              :p08 AS ISTL_LCTN_NM,        \r\n"
           "              :p09 AS X_CRDN,              \r\n"
           "              :p10 AS Y_CRDN,              \r\n"
           "              :p11 AS DEL_YN,              \r\n"
           "              :p12 AS WEB_CMRA_IP,         \r\n"
           "              :p13 AS WEB_CMRA_PORT,       \r\n"
           "              :p14 AS WEB_CMRA_ID,         \r\n"
           "              :p15 AS WEB_CMRA_PWD,        \r\n"
           "              :p16 AS STRM_SESN_NM,        \r\n"
           "              :p17 AS VMS_MAX_PHSE_NUM,    \r\n"
           "              :p18 AS VMS_OFF_HM,        \r\n"
           "              :p19 AS VMS_OFF_HM,       \r\n"
           "              :p20 AS ISTL_LCTN_ADDR       \r\n"
           "         FROM DUAL) M                                     \r\n"
           "        ON (L.VMS_CTLR_ID = M.VMS_CTLR_ID)            \r\n"
           "WHEN MATCHED THEN                                         \r\n"
           "   UPDATE SET L.VMS_CTLR_ID       = M.VMS_CTLR_ID,        \r\n"
           "              L.VMS_NM            = M.VMS_NM,             \r\n"
           "              L.VMS_CTLR_IP       = M.VMS_CTLR_IP,        \r\n"
           "              L.VMS_CTLR_PORT     = M.VMS_CTLR_PORT,      \r\n"
           "              L.VMS_CTLR_LOCAL_NO = M.VMS_CTLR_LOCAL_NO,  \r\n"
           "              L.VMS_MODL_KIND       = M.VMS_MODL_KIND,        \r\n"
           "              L.ISTL_LCTN_NM      = M.ISTL_LCTN_NM,       \r\n"
           "              L.X_CRDN            = M.X_CRDN,             \r\n"
           "              L.Y_CRDN            = M.Y_CRDN,             \r\n"
           "              L.DEL_YN            = M.DEL_YN,             \r\n"
           "              L.WEB_CMRA_IP       = M.WEB_CMRA_IP,        \r\n"
           "              L.WEB_CMRA_PORT     = M.WEB_CMRA_PORT,      \r\n"
           "              L.WEB_CMRA_ID       = M.WEB_CMRA_ID,        \r\n"
           "              L.WEB_CMRA_PWD      = M.WEB_CMRA_PWD,       \r\n"
           "              L.STRM_SESN_NM      = M.STRM_SESN_NM,       \r\n"
           "              L.VMS_MAX_PHSE_NUM  = M.VMS_MAX_PHSE_NUM,   \r\n"
           "              L.VMS_OFF_HM      = M.VMS_OFF_HM,       \r\n"
           "              L.VMS_OFF_HM     = M.VMS_OFF_HM,      \r\n"
           "              L.ISTL_LCTN_ADDR    = M.ISTL_LCTN_ADDR      \r\n"
           "WHEN NOT MATCHED THEN                                     \r\n"
           "   INSERT (                     \r\n"
           "           VMS_CTLR_ID,       \r\n"
           "           VMS_CTLR_ID,         \r\n"
           "           VMS_NM,              \r\n"
           "           VMS_CTLR_IP,         \r\n"
           "           VMS_CTLR_PORT,       \r\n"
           "           VMS_CTLR_LOCAL_NO,   \r\n"
           "           VMS_MODL_KIND,         \r\n"
           "           ISTL_LCTN_NM,        \r\n"
           "           X_CRDN,              \r\n"
           "           Y_CRDN,              \r\n"
           "           DEL_YN,              \r\n"
           "           WEB_CMRA_IP,         \r\n"
           "           WEB_CMRA_PORT,       \r\n"
           "           WEB_CMRA_ID,         \r\n"
           "           WEB_CMRA_PWD,        \r\n"
           "           STRM_SESN_NM,        \r\n"
           "           VMS_MAX_PHSE_NUM,    \r\n"
           "           VMS_OFF_HM,        \r\n"
           "           VMS_OFF_HM,       \r\n"
           "           ISTL_LCTN_ADDR       \r\n"
           "          )                     \r\n"
           "   VALUES (                     \r\n"
           "           M.VMS_CTLR_ID,     \r\n"
           "           M.VMS_CTLR_ID,       \r\n"
           "           M.VMS_NM,            \r\n"
           "           M.VMS_CTLR_IP,       \r\n"
           "           M.VMS_CTLR_PORT,     \r\n"
           "           M.VMS_CTLR_LOCAL_NO, \r\n"
           "           M.VMS_MODL_KIND,       \r\n"
           "           M.ISTL_LCTN_NM,      \r\n"
           "           M.X_CRDN,            \r\n"
           "           M.Y_CRDN,            \r\n"
           "           M.DEL_YN,            \r\n"
           "           M.WEB_CMRA_IP,       \r\n"
           "           M.WEB_CMRA_PORT,     \r\n"
           "           M.WEB_CMRA_ID,       \r\n"
           "           M.WEB_CMRA_PWD,      \r\n"
           "           M.STRM_SESN_NM,      \r\n"
           "           M.VMS_MAX_PHSE_NUM,  \r\n"
           "           M.VMS_OFF_HM,      \r\n"
           "           M.VMS_OFF_HM,     \r\n"
           "           M.ISTL_LCTN_ADDR     \r\n"
           "          )                     \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->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
            pADO->Parameters->ParamByName("p02")->Value = AObj->VMS_CTLR_ID;
            pADO->Parameters->ParamByName("p03")->Value = AObj->VMS_NM;
            pADO->Parameters->ParamByName("p04")->Value = AObj->VMS_CTLR_IP;
            pADO->Parameters->ParamByName("p05")->Value = AObj->VMS_CTLR_PORT;
            pADO->Parameters->ParamByName("p06")->Value = AObj->CMNC_PORT;
            pADO->Parameters->ParamByName("p07")->Value = AObj->VMS_MODL_KIND;
            pADO->Parameters->ParamByName("p08")->Value = AObj->ISTL_LCTN_NM;
            pADO->Parameters->ParamByName("p09")->Value = AObj->X_CRDN;
            pADO->Parameters->ParamByName("p10")->Value = AObj->Y_CRDN;
            pADO->Parameters->ParamByName("p11")->Value = AObj->DEL_YN;
            pADO->Parameters->ParamByName("p12")->Value = AObj->WEB_CMRA_IP;
            pADO->Parameters->ParamByName("p13")->Value = AObj->WEB_CMRA_PORT;
            pADO->Parameters->ParamByName("p14")->Value = AObj->WEB_CMRA_ID;
            pADO->Parameters->ParamByName("p15")->Value = AObj->WEB_CMRA_PWD;
            pADO->Parameters->ParamByName("p16")->Value = AObj->STRM_SESN_NM;
            pADO->Parameters->ParamByName("p17")->Value = AObj->VMS_MAX_PHSE_NUM;
            pADO->Parameters->ParamByName("p18")->Value = AObj->VMS_ON_HM;
            pADO->Parameters->ParamByName("p19")->Value = AObj->VMS_OFF_HM;
            pADO->Parameters->ParamByName("p20")->Value = AObj->ISTL_LCTN_ADDR;

			pADO->ExecSQL();

            return MergeFcltInfo(AObj, ADbConn);
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::MergeVms", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::MergeVms", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

bool TVmsCtlrManager::MergeFcltInfo(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

#if 0
    sQry = "MERGE INTO TB_FCLT_INFR L                                         \r\n"
           "USING (SELECT :p01 AS FCLT_ID,                                    \r\n"
           "              :p02 AS FCLT_TYPE,                                  \r\n"
           "              :p03 AS FCLT_LCTN                                   \r\n"
           "         FROM DUAL) M                                             \r\n"
           "        ON (L.FCLT_ID = M.FCLT_ID AND L.FCLT_TYPE = M.FCLT_TYPE)  \r\n"
           "WHEN MATCHED                                                      \r\n"
           "THEN                                                              \r\n"
           "   UPDATE SET L.FCLT_LCTN = M.FCLT_LCTN,                          \r\n"
           "              L.DEL_YN    = 'N'                                   \r\n"
           "WHEN NOT MATCHED                                                  \r\n"
           "THEN                                                              \r\n"
           "   INSERT (  FCLT_ID,   FCLT_TYPE,   FCLT_LCTN)                   \r\n"
           "   VALUES (M.FCLT_ID, M.FCLT_TYPE, M.FCLT_LCTN)                   \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->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
			pADO->Parameters->ParamByName("p02")->Value = "VMS";
			pADO->Parameters->ParamByName("p03")->Value = AObj->VMS_NM;
			pADO->ExecSQL();

            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::MergeFcltInfo", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::MergeFcltInfo", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

bool TVmsCtlrManager::GetNextVmsId(int &ANmbr, int &AId, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

#if 0
    sQry = "SELECT NVL(MAX(VMS_CTLR_ID), 10000) + 1 AS NEWID FROM TB_VMS_CTLR \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->Prepared = true;
			pADO->Open();
            ANmbr = pADO->FieldByName("NEWID")->AsInteger;
            AId = ANmbr / 10000;
            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("VmsCtlrManager::GetNextVmsId", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("VmsCtlrManager::GetNextVmsId", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return false;
}
//---------------------------------------------------------------------------

bool TVmsCtlrManager::UpdateCtlrInfo(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

    sQry = "UPDATE TB_VMS_CTLR         \r\n"
           "   SET VMS_ON_HM   = :p01, \r\n"
           "       VMS_OFF_HM  = :p02  \r\n"
           " WHERE USE_YN = 'Y'        \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->Parameters->ParamByName("p01")->Value = AObj->VMS_ON_HM;
			pADO->Parameters->ParamByName("p02")->Value = AObj->VMS_ON_HM;

			pADO->ExecSQL();
            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::UpdateCtlrInfo", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::UpdateCtlrInfo", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }

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

bool TVmsCtlrManager::UpdateIfscCngsSpeedInfo(int ACngsSpd, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

#if 0
    sQry = "UPDATE TB_VMS_RLTN_IFSC         \r\n"
           "   SET CNGS_CNFM_SPED = :p01    \r\n";
    try
    {
        try
        {
            String sGradCd;
            pADO = new TADOQuery(NULL);
			pADO->Close();
            pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;

            pADO->Parameters->ParamByName("p01")->Value = ACngsSpd;
            pADO->ExecSQL();

            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORLOG("TVmsCtlrManager::UpdateIfscCngsSpeedInfo", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORLOG("TVmsCtlrManager::UpdateIfscCngsSpeedInfo", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

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

#if 0
    FLists.Lock();
    try
    {
        FOR_STL(TVmsCtlr*, pObj, FLists)
        {
            pObj->FIfscRltn.RemoveAll();
        }
    }
    __finally
    {
        FLists.UnLock();
    }

    sQry = "SELECT A.VMS_CTLR_ID, B.VMS_IFSC_ID, B.DSPL_PRRT, \r\n"
           "       B.CNGS_CNFM_YN, B.CNGS_CNFM_SPED             \r\n"
           "  FROM TB_VMS_CTLR      A,                          \r\n"
           "       TB_VMS_RLTN_IFSC B,                          \r\n"
           "       TB_VMS_IFSC      C                           \r\n"
           " WHERE A.VMS_CTLR_ID = B.VMS_CTLR_ID            \r\n"
           "   AND B.VMS_IFSC_ID   = C.VMS_IFSC_ID              \r\n"
           " ORDER BY A.VMS_CTLR_ID, B.DSPL_PRRT              \r\n";

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

            pADO->Prepared = true;
			pADO->Open();
            for( ; !pADO->Eof; pADO->Next())
            {
                VMS_CTLR_ID = pADO->FieldByName("VMS_CTLR_ID")->AsString;
				TVmsCtlr *pVms = FLists.Find(String(VMS_CTLR_ID));
                if (!pVms) continue;

                TVmsIfscRltn *pObj = new TVmsIfscRltn();
                if (pObj)
                {
                    pObj->VMS_CTLR_ID = VMS_CTLR_ID;
                    pObj->VMS_IFSC_ID   = pADO->FieldByName("VMS_IFSC_ID")->AsInteger;
                    pObj->DSPL_PRRT     = pADO->FieldByName("DSPL_PRRT")->AsInteger;
                    pObj->CNGS_CNFM_YN  = pADO->FieldByName("CNGS_CNFM_YN")->AsString;
                    pObj->CNGS_CNFM_SPED= pADO->FieldByName("CNGS_CNFM_SPED")->AsInteger;

                    pVms->FIfscRltn.Push(pObj->DSPL_PRRT, pObj);
                }
            }
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::LoadIfscRltn", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::LoadIfscRltn", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
        FLists.UnLock();
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

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

#if 0
    FLists.Lock();
    try
    {
        FOR_STL(TVmsCtlr*, pObj, FLists)
        {
            pObj->FEvspRltn.RemoveAll();
        }
    }
    __finally
    {
        FLists.UnLock();
    }

    sQry = "SELECT A.VMS_CTLR_ID, B.VMS_EVSP_ID, B.DSPL_PRRT, \r\n"
           "       B.CNGS_CNFM_YN, B.CNGS_CNFM_SPED             \r\n"
           "  FROM TB_VMS_CTLR      A,                          \r\n"
           "       TB_VMS_RLTN_EVSP B,                          \r\n"
           "       TB_VMS_EVSP      C                           \r\n"
           " WHERE A.VMS_CTLR_ID = B.VMS_CTLR_ID            \r\n"
           "   AND B.VMS_EVSP_ID   = C.VMS_EVSP_ID              \r\n"
           " ORDER BY A.VMS_CTLR_ID, B.DSPL_PRRT              \r\n";

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

            pADO->Prepared = true;
			pADO->Open();
            for( ; !pADO->Eof; pADO->Next())
            {
                VMS_CTLR_ID = pADO->FieldByName("VMS_CTLR_ID")->AsString;
				TVmsCtlr *pVms = FLists.Find(String(VMS_CTLR_ID));
                if (!pVms) continue;

                TVmsEvspRltn *pObj = new TVmsEvspRltn();
                if (pObj)
                {
                    pObj->VMS_CTLR_ID = VMS_CTLR_ID;
                    pObj->VMS_EVSP_ID   = pADO->FieldByName("VMS_EVSP_ID")->AsInteger;
                    pObj->DSPL_PRRT     = pADO->FieldByName("DSPL_PRRT")->AsInteger;
                    pObj->CNGS_CNFM_YN  = pADO->FieldByName("CNGS_CNFM_YN")->AsString;
                    pObj->CNGS_CNFM_SPED= pADO->FieldByName("CNGS_CNFM_SPED")->AsInteger;

                    pVms->FEvspRltn.Push(pObj->DSPL_PRRT, pObj);
                }
            }
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::LoadIfscRltn", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::LoadIfscRltn", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
        FLists.UnLock();
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

bool TVmsCtlrManager::SaveIfscRltn(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

    int ii;

#if 0
    try
    {
        try
        {
            pADO = new TADOQuery(NULL);
			pADO->Close();
            pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();

sQry = "DELETE FROM TB_VMS_RLTN_IFSC WHERE VMS_CTLR_ID = :p01";
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;
			pADO->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
			pADO->ExecSQL();

sQry = "INSERT INTO TB_VMS_RLTN_IFSC(VMS_CTLR_ID, VMS_IFSC_ID, DSPL_PRRT, CNGS_CNFM_YN, CNGS_CNFM_SPED) VALUES(:p01, :p02, :p03, :p04, :p05)";
            ii = 0;
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;
            FOR_STL(TVmsIfscRltn *, pLink, AObj->FIfscRltn)
            {
                pADO->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
                pADO->Parameters->ParamByName("p02")->Value = pLink->VMS_IFSC_ID;
                pADO->Parameters->ParamByName("p03")->Value = String(ii+1);
                pADO->Parameters->ParamByName("p04")->Value = pLink->CNGS_CNFM_YN;
                pADO->Parameters->ParamByName("p05")->Value = pLink->CNGS_CNFM_SPED;
    			pADO->ExecSQL();
                ii++;
            }
            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::SaveIfscRltn", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::SaveIfscRltn", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return true;
}
//---------------------------------------------------------------------------
bool TVmsCtlrManager::SaveEvspRltn(TVmsCtlr *AObj, TADOConnection *ADbConn/*=NULL*/)
{
    String sQry;
    TADOQuery *pADO = NULL;

    int ii;

#if 0
    try
    {
        try
        {
            pADO = new TADOQuery(NULL);
			pADO->Close();
            pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();

sQry = "DELETE FROM TB_VMS_RLTN_EVSP WHERE VMS_CTLR_ID = :p01";
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;
			pADO->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
			pADO->ExecSQL();

sQry = "INSERT INTO TB_VMS_RLTN_EVSP(VMS_CTLR_ID, VMS_EVSP_ID, DSPL_PRRT, CNGS_CNFM_YN, CNGS_CNFM_SPED) VALUES(:p01, :p02, :p03, :p04, :p05)";
            ii = 0;
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;
            FOR_STL(TVmsEvspRltn *, pLink, AObj->FEvspRltn)
            {
                pADO->Parameters->ParamByName("p01")->Value = AObj->VMS_CTLR_ID;
                pADO->Parameters->ParamByName("p02")->Value = pLink->VMS_EVSP_ID;
                pADO->Parameters->ParamByName("p03")->Value = String(ii+1);
                pADO->Parameters->ParamByName("p04")->Value = pLink->CNGS_CNFM_YN;
                pADO->Parameters->ParamByName("p05")->Value = pLink->CNGS_CNFM_SPED;
    			pADO->ExecSQL();
                ii++;
            }
            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::SaveEvspRltn", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::SaveEvspRltn", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
#endif
    return true;
}
//---------------------------------------------------------------------------

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

    sQry = "SELECT A.*,                                                     \r\n"
           "       TO_CHAR(SYSDATE - 8/1440, 'YYYYMMDDHH24MISS') AS SVC_DT  \r\n"
           "  FROM TB_VMS_DSPL_PRST A,                                      \r\n"
           "       (SELECT VMS_CTLR_ID, MAX(DSPL_DT) AS DSPL_DT           \r\n"
           "          FROM TB_VMS_DSPL_PRST                                 \r\n"
           "         GROUP BY VMS_CTLR_ID) B                              \r\n"
           " WHERE A.VMS_CTLR_ID = B.VMS_CTLR_ID                        \r\n"
           "   AND A.DSPL_DT       = B.DSPL_DT                              \r\n"
           " ORDER BY A.VMS_CTLR_ID, A.PHASE                              \r\n";

    FLists.Lock();
    try
    {
        FOR_STL(TVmsCtlr*, pTmpObj, FLists)
        {
            //pTmpObj->Lock();
            pTmpObj->VmsMsg->Init();
            //pTmpObj->UnLock();
        }
    }
    __finally
    {
        FLists.UnLock();
    }

    TVmsCtlr *pObj = NULL;
    String    sOldVmsNmbr = "";
    int       nPhase = 0;
    try
    {
        try
        {
            pADO = new TADOQuery(NULL);
			pADO->Close();
            pADO->Connection = (NULL != ADbConn) ? ADbConn : ITSDb_GetConnection();
			pADO->SQL->Clear();
			pADO->SQL->Text = sQry;

            pADO->Prepared = true;
			pADO->Open();
            for( ; !pADO->Eof; pADO->Next())
            {
                String sVmsNmbr = pADO->FieldByName("VMS_CTLR_ID")->AsString;
                if (sVmsNmbr != sOldVmsNmbr)
                {
                    if (pObj)
                    {
                        pObj->VmsMsg->Total = nPhase;
                        pObj->VmsMsg->Curr  = 0;
                        pObj->VmsMsg->IsLoading = false;
                        //pObj->UnLock();
                    }
                    pObj = FLists.Find(sVmsNmbr);
                    if (pObj)
                    {
                        //pObj->Lock();
                        nPhase = 0;
                        sOldVmsNmbr = sVmsNmbr;
                    }
                    else continue;
                }
                if (!pObj) continue;

                if (nPhase >= INT_VMS_MAX_FORM) continue;

                SAFE_DELETE(FImgStream);
                FImgStream = pADO->CreateBlobStream(pADO->FieldByName("VMS_DSPL_MSG_IMAG"), bmRead);
                if (FImgStream && FImgStream->Size > 0)
                {
                    try
                    {
                        if (!pObj->VmsMsg->PHASE[nPhase].pVmsBmp)
                        {
                            pObj->VmsMsg->PHASE[nPhase].pVmsBmp = new Graphics::TBitmap();
                        }
                        pObj->VmsMsg->PHASE[nPhase].pVmsBmp->FreeImage();
                        pObj->VmsMsg->PHASE[nPhase].pVmsBmp->LoadFromStream(FImgStream);

                        int    PHASE   = pADO->FieldByName("PHASE")->AsInteger;

                        pObj->VmsMsg->PHASE[nPhase].DSPL_HH = pADO->FieldByName("DSPL_HH")->AsInteger;
                        pObj->VmsMsg->PHASE[nPhase].DNLD_YN = pADO->FieldByName("DNLD_YN")->AsString;
                        pObj->VmsMsg->PHASE[nPhase].DSPL_CD = pADO->FieldByName("VMS_FORM_DSPL_MTHD_CD")->AsString;
                        pObj->VmsMsg->PHASE[nPhase].VMS_SCH_FORM_TYPE = pADO->FieldByName("VMS_SCH_FORM_TYPE")->AsInteger;

                        if (pObj->VmsMsg->PHASE[nPhase].VMS_SCH_FORM_TYPE == eSchTp_video  ||
                            pObj->VmsMsg->PHASE[nPhase].VMS_SCH_FORM_TYPE == eSchTp_stream )
                        {
                            pObj->VmsMsg->PHASE[nPhase].VMS_DSPL_MSG_TXT = pADO->FieldByName("VMS_DSPL_MSG_TXT")->AsString.Trim();
                        }

                        if (pObj->VmsMsg->PHASE[nPhase].DSPL_HH <=  0) pObj->VmsMsg->PHASE[nPhase].DSPL_HH = 3;
                        //if (pObj->VmsMsg->PHASE[nPhase].DSPL_HH >= 10) pObj->VmsMsg->PHASE[nPhase].DSPL_HH = 10;

                        String DSPL_DT = pADO->FieldByName("DSPL_DT")->AsString;
                        String SVC_DT  = pADO->FieldByName("SVC_DT")->AsString;

                        pObj->VmsMsg->OFFER_DT = DSPL_DT;
                        if (DSPL_DT >= SVC_DT)
                        {
                             pObj->VmsMsg->OFFER_YN = true;
                        }
                        else
                        {
                             pObj->VmsMsg->OFFER_YN = false;
                        }
                        if (pObj->VmsMsg->PHASE[nPhase].DNLD_YN == "N")
                        {
                            pObj->VmsMsg->OFFER_YN = false;
                        }

                        //TODO
                        if (pObj->STATE.Comm != vms_comm_normal)
                        {
                            pObj->VmsMsg->OFFER_YN = false;
                        }

                        nPhase++;
                    }
                    catch(Exception &e)
                    {
                    }
                }
            }

            if (pObj)
            {
                pObj->VmsMsg->Total = nPhase;
                pObj->VmsMsg->Curr  = 0;
                //pObj->UnLock();
            }
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::LoadVmsMsg", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::LoadVmsMsg", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }

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

bool TVmsCtlrManager::LoadVmsFormUsage(TADOConnection *ADbConn/*=NULL*/)
{
    InitFormCount();

    String sQry;
    TADOQuery *pADO = NULL;

    sQry = "SELECT A.VMS_CTLR_ID,                                  \r\n"
           "       A.VMS_SCH_TYPE,                                   \r\n"
           "       A.VMS_SCH_FORM_TYPE,                              \r\n"
           "       A.DSPL_STRT_HH,                                   \r\n"
           "       A.DSPL_END_HH,                                    \r\n"
           "       TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS') AS CURR_HH,  \r\n"
           "       A.USE_YN                                          \r\n"
           "  FROM TB_VMS_DSPL_SCH A,                                \r\n"
           "       TB_VMS_FORM     B                                 \r\n"
           " WHERE 1=1                                               \r\n"
           "   AND A.VMS_FORM_ID = B.VMS_FORM_ID                     \r\n";
//           "   AND B.VALID_YN    = 'Y'                               \r\n"

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

            ITSDb_SQLText(pADO, sQry);
            ITSDb_SQLOpen(pADO);

            TVmsCtlr *pObj;
            int nSchType, nFormType;

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

                String sVmsNmbr = pADO->FieldByName("VMS_CTLR_ID")->AsString;

                pObj = FLists.Find(sVmsNmbr);
                if (!pObj) continue;

                String sSchType = pADO->FieldByName("VMS_SCH_TYPE")->AsString.Trim();
                if      (sSchType == "A") nSchType = enScheduleAuto;
                else if (sSchType == "F") nSchType = enScheduleFix;
                else if (sSchType == "B") nSchType = enScheduleBase;
                else continue;

                nFormType = pADO->FieldByName("VMS_SCH_FORM_TYPE")->AsInteger;
                if (nFormType < eSchTp_traffic && nFormType >= eSchTp_max) continue;

                pObj->FormCnt[nSchType].Total[nFormType]++;  //등록되어있는 전체 폼 숫자

                if (pADO->FieldByName("USE_YN")->AsString != 'Y') continue;

                //사용하는 것중에 현재시각이 제공시각안에 들어있는것은 카운트하지 않음.
                String sStrHH = pADO->FieldByName("DSPL_STRT_HH")->AsString;
                String sEndHH = pADO->FieldByName("DSPL_END_HH")->AsString;
                String sCurHH = pADO->FieldByName("CURR_HH")->AsString;
                if (sCurHH >= sStrHH && sCurHH <= sEndHH)
                {
                    if (nFormType >= eSchTp_traffic && nFormType < eSchTp_max) {
                        pObj->FormCnt[nSchType].Use[nFormType]++;  //사용가능 폼 숫자
                    }
                }
            }
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::LoadVmsFormUsage", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::LoadVmsFormUsage", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }

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

bool TVmsCtlrManager::InsVmsControlHs(String ACtlDt, String AVmsNmbr, String ACtlType, String ACtlVal, String ACtlRes, String AUserId, TADOConnection *ADbConn/*=NULL*/)
{
    String     sQry;
    TADOQuery *pADO = NULL;

    sQry = "INSERT INTO TB_VMS_CTRL_HS(                \r\n"
           "                          CTRL_DT,         \r\n"
           "                          VMS_CTLR_ID,   \r\n"
           "                          CTRL_TYPE,       \r\n"
           "                          CTRL_VAL,        \r\n"
           "                          CTRL_RESULT,     \r\n"
           "                          USER_ID          \r\n"
           "                         )                 \r\n"
           "                   VALUES(                 \r\n"
           "                          :p01,            \r\n"
           "                          :p02,            \r\n"
           "                          :p03,            \r\n"
           "                          :p04,            \r\n"
           "                          :p05,            \r\n"
           "                          :p06             \r\n"
           "                         )                 \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->Parameters->ParamByName("p01")->Value = ACtlDt;
            pADO->Parameters->ParamByName("p02")->Value = AVmsNmbr;
            pADO->Parameters->ParamByName("p03")->Value = ACtlType;
            pADO->Parameters->ParamByName("p04")->Value = ACtlVal;
            pADO->Parameters->ParamByName("p05")->Value = ACtlRes;
            pADO->Parameters->ParamByName("p06")->Value = AUserId;
            pADO->ExecSQL();
            return true;
        }
        catch(EDatabaseError &E)
        {
            DBERRORMSG("TVmsCtlrManager::InsVmsControlHs", String(E.ClassName()), E.Message, sQry);
            throw Exception(String(E.ClassName()) + E.Message);
        }
        catch(Exception &e)
        {
            DBERRORMSG("TVmsCtlrManager::InsVmsControlHs", String(e.ClassName()), e.Message, sQry);
            throw Exception(String(e.ClassName()) + e.Message);
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }

    return true;
}
//---------------------------------------------------------------------------
int VmsGetFormTypeIdx(int AFormType)
{
    int nFormTypeIdx = -1;
    switch(AFormType)
    {
    case eFormTp_traf_1:    //	소통상황(1단)
    case eFormTp_traf_2:    //	소통상황(2단)
    case eFormTp_traf_3:    //	소통상황(3단)
    case eFormTp_traf_4:    //	소통상황(4단)
    case eFormtp_figure:    //	소통상황(도형식배경소통정보)
        nFormTypeIdx = eSchTp_traffic;
        break;
    case eFormTp_congest:    //	정체소통상황
        nFormTypeIdx = eSchTp_congest;
        break;
    case eFormTp_incident:    //	돌발문안
        nFormTypeIdx = eSchTp_incident;
        break;
    case eFormTp_gongsa:    //	공사/행사문안
        nFormTypeIdx = eSchTp_gongsa;
        break;
    case eFormTp_hongbo:    //	홍보문안
        nFormTypeIdx = eSchTp_hongbo;
        break;
    case eFormTp_deture:    //	우회도로
        nFormTypeIdx = eSchTp_deture;
        break;
    case eFormTp_safe:    //	재난안전
        nFormTypeIdx = eSchTp_safe;
        break;
    case eFormTp_video:    //	동영상
        nFormTypeIdx = eSchTp_video;
        break;
    case eFormTp_stream:    //	스트리밍영상
        nFormTypeIdx = eSchTp_stream;
        break;
    case eFormTp_atmp:    //	대기환경
        nFormTypeIdx = eSchTp_atmp;
        break;
    case eFormTp_park:    //	주차정보
        nFormTypeIdx = eSchTp_park;
        break;
    //TODO: 2023PRJ S
    case eFormTp_evehicle:  // 긴급차량우선신호
        nFormTypeIdx = eSchTp_evehicle;
        break;
    //TODO: 2023PRJ E
    default: break;
    }
    return nFormTypeIdx;
}