ITS_OP/VmsCommonLib/FRAME/FRAME_VmsStateF.cpp

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

#include <vcl.h>
#include "AppGlobalF.h"
#include "ITSSkinF.h"
#include "ITSUtilF.h"
#pragma hdrstop

#include "FRAME_VmsStateF.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxButtons"
#pragma link "cxCalc"
#pragma link "cxCheckBox"
#pragma link "cxClasses"
#pragma link "cxContainer"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxStyles"
#pragma link "cxTextEdit"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinOffice2010Silver"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSilver"
#pragma link "dxSkinStardust"
#pragma link "cxGridBandedTableView"
#pragma link "cxGridCardView"
#pragma link "cxGridCustomLayoutView"
#pragma link "cxGroupBox"
#pragma link "cxRadioGroup"
#pragma link "cxLabel"
#pragma resource "*.dfm"
//TFRAMEVmsStateList *FRAMEVmsStateList;
//---------------------------------------------------------------------------
__fastcall TFRAMEVmsState::TFRAMEVmsState(TComponent* Owner)
    : TFrame(Owner)
{
    FSelVmsObj = NULL;

    TcxDataController *pGDC = TvVmsInfo->DataController;
    try {
        pGDC->BeginUpdate();
        while(pGDC->RecordCount > 0) {
            pGDC->DeleteRecord(0);
        }
        pGDC->AppendRecord();
    }
    __finally {
        pGDC->EndUpdate();
    }
}
//---------------------------------------------------------------------------

void __fastcall TFRAMEVmsState::UpdateList()
{
}
//---------------------------------------------------------------------------

void __fastcall TFRAMEVmsState::SetVmsObject(TVmsCtlr *ASelVmsObj)
{
    FSelVmsObj = ASelVmsObj;
    RefreshStatus();
}
//---------------------------------------------------------------------------

void __fastcall TFRAMEVmsState::RefreshStatus()
{
    CxVmsInfo->LayoutChanged();
}
//---------------------------------------------------------------------------

void __fastcall TFRAMEVmsState::OnCloseQuery(bool &CanClose)
{
}
//---------------------------------------------------------------------------

void __fastcall TFRAMEVmsState::ColVmsIdGetDataText(TcxCustomGridTableItem *Sender,
          int ARecordIndex, UnicodeString &AText)
{
    if (!FSelVmsObj)
    {
        AText = "";
        return;
    }

#if 0
    TVmsCtlr *pObj = FSelVmsObj;
    switch(Sender->Tag)
    {
    case 0: AText = pObj->VMS_CTLR_ID;
        break;
    case 1: AText = pObj->VMS_MODL_KIND_NM;
        break;
    case 2: AText = pObj->VMS_CTLR_ID + "-" + pObj->VMS_NM;
        break;
    case 3: //운영모드
        AText = VmsOperMode(pObj);
        break;
    case 4: //통신
        AText = VmsComm(pObj);
        break;
    case 5: //모듈상태
        //AText = VmsModuleState(pObj);
        AText = VmsModulePower(pObj);
        break;
    case 6: //모듈전원상태
        AText = VmsModulePower(pObj);
        break;
    case 7: //모듈휘도값
        AText = VmsModuleLuminance(pObj);
        break;
    case 8: //도어상태
        AText = VmsModuleDoor(pObj);
        break;
    case 9: //팬상태
        AText = VmsModuleFan(pObj);
        break;
    case 10: //히터상태
        AText = VmsModuleHeater(pObj);
        break;
    case 11: //온도값
        AText = VmsModuleTemp(pObj);
        break;
    }
#endif
}
//---------------------------------------------------------------------------

void __fastcall TFRAMEVmsState::BtnControl0Click(TObject *Sender)
{
#if 0
    //전광판제어
    String sTitle = lblText1->Caption;//"전광판/제어기 제어";
    String sMsg   = "";

    int nOkCnt  = 0;
    if (!FSelVmsObj)
    {
        sMsg = lblText2->Caption;//"VMS가 선택되지 않았습니다.\r\nVMS를 선택하십시요.";
        Application->MessageBox(sMsg.c_str(), sTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        CxVmsInfo->SetFocus();
        return;
    }
    if (FSelVmsObj->STATE.Comm != vms_comm_normal)
    {
        sMsg = lblText3->Caption;//"현재 통신이 비정상인 VMS는 선택하실 수 없습니다.\r\n통신상태가 정상인 VMS를 선택하십시요.";
        Application->MessageBox(sMsg.c_str(), sTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        CxVmsInfo->SetFocus();
        return;
    }

    int nCmdIdx;
    if (RdbOn->Checked)
    {
        nCmdIdx = vms_req_board_power_on;
        sMsg = lblText4->Caption + "\r\n" + cxLabel9->Caption;//"선택하신 VMS에 VMS 전광판 전원 ON 명령을 전송하시겠습니까?\r\n(통신상태에 따라 명령이 실행되지 않을 수 있습니다.)";
    }
    else
    if (RdbOff->Checked)
    {
        nCmdIdx = vms_req_board_power_off;
        sMsg = lblText5->Caption + "\r\n" + cxLabel9->Caption;//"선택하신 VMS에 VMS 전광판 전원 OFF 명령을 전송하시겠습니까?\r\n(통신상태에 따라 명령이 실행되지 않을 수 있습니다.)";
    }
    else
    if (RdbReset->Checked)
    {
        nCmdIdx = 2;
        sMsg = lblText6->Caption + "\r\n" + cxLabel9->Caption;//"선택하신 VMS에 VMS 제어기 리셋 명령을 전송하시겠습니까?\r\n(통신상태에 따라 명령이 실행되지 않을 수 있습니다.)";
    }
    if (Application->MessageBox(sMsg.c_str(), sTitle.c_str(), MB_YESNO|MB_ICONWARNING|MB_APPLMODAL) != IDYES) return;

    String sCmdUser = g_AppCfg.OPER_ID;
    String sCmdTime = Now().FormatString("yyyymmddhhnnss");

    int result;
    String sVmsNmbr = String(FSelVmsObj->VMS_CTLR_ID);

    if (nCmdIdx == vms_req_board_power_on || nCmdIdx == vms_req_board_power_off)
    {
        // 전광판 On(=0)/Off(=1)
        INT_VMS_POWER_CTL_REQ VmsPowerCtl;
        BYTE                  MsgSeq;

        memset(&VmsPowerCtl, 0x00, sizeof(VmsPowerCtl));

        MsgSeq = (BYTE)0x10;                                                            // 제어명령 일련번호-결과값을 받아서 처리할때 필요함

        memcpy(VmsPowerCtl.CmdTime, AnsiString(sCmdTime).c_str(), INT_VMS_MAX_DATETIME); /* 명령수행시각 */
        memcpy(VmsPowerCtl.OperId,  AnsiString(sCmdUser).c_str(), INT_VMS_MAX_OPER_ID);  /* 운영자 ID */
        //VmsPowerCtl.VMS_CTLR_ID = sVmsNmbr;
        VmsPowerCtl.Command = (BYTE)nCmdIdx;                                            /* 제어 구분, 0:켜짐 1:꺼짐 */

        String sOprCode  = (nCmdIdx == vms_req_board_power_on) ? "V01" : "V02";
        String sCmdValue = (nCmdIdx == vms_req_board_power_on) ? "On"  : "Off";

#if 0
        result = CComm_VmsPowerControlReq(&VmsPowerCtl, MsgSeq);
        if (VERR_NONE == result)
        {
            VmsCtlrManager->InsVmsControlHs(sCmdTime, sVmsNmbr, sOprCode, sCmdValue, "1", sCmdUser);
            nOkCnt++;
        }
        else
        {
            VmsCtlrManager->InsVmsControlHs(sCmdTime, sVmsNmbr, sOprCode, sCmdValue, "0", sCmdUser);
        }
#endif
    }
    else
    {
        // 제어기 리셋
        INT_VMS_RESET_REQ VmsReset;
        BYTE              MsgSeq;

        memset(&VmsReset, 0x00, sizeof(VmsReset));

        MsgSeq = (BYTE)0x20;
        memcpy(VmsReset.CmdTime, AnsiString(sCmdTime).c_str(), INT_VMS_MAX_DATETIME); /* 명령수행시각 */
        memcpy(VmsReset.OperId,  AnsiString(sCmdUser).c_str(), INT_VMS_MAX_OPER_ID);  /* 운영자 ID */
        //VmsReset.VMS_CTLR_ID = sVmsNmbr;

        result = 0;//CComm_VmsResetReq(&VmsReset, MsgSeq);
        if (VERR_NONE == result)
        {
            VmsCtlrManager->InsVmsControlHs(sCmdTime, sVmsNmbr, "V03", "Reset", "1", sCmdUser);
            nOkCnt++;
        }
        else
        {
            VmsCtlrManager->InsVmsControlHs(sCmdTime, sVmsNmbr, "V03", "Reset", "0", sCmdUser);
        }
    }

    sMsg = lblText7->Caption;//"VMS로 전광판/제어기 제어 명령을 요청하였습니다.";
    Application->MessageBox(sMsg.c_str(), sTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL);
#endif
}
//---------------------------------------------------------------------------