HMI/MMI

INTOUCH DB CONNETION 방법 스크립트

우선 ODBC 는 작성해야 되고 , ORACLE, MSSQL ,MDB ... 테스트 하신 후에...

스크립트에 아래의 형식으로 DB CONNETION 정보랑 BINDER 만 만들어서 제작하시면 됩니다.

====== 추가시 =====

DIM DB_TableName AS MESSAGE;
DIM DB_BindList AS MESSAGE;
DIM DB_WhereExpr AS MESSAGE;
DIM DB_OrderByExpr AS MESSAGE;
DIM DBC AS INTEGER;

{ INSERT 와 UPDATE 를 구분하여 입력하는 로직입니다. }
{ PramTag : TAGNAME  ,, SQLMode : I-> INSERT U -> UPDATE }
{PramAction : Action , PramPre -> PreVal‍ue , PramCur -> CurValue }

DBC = SQLConnect(DBC_ConnectionId, "DSN=*****;UID=**;Pwd=****");
DB_TableName = "USERTRAIL";
DB_BindList = "BindUserTrail";
   

IF SQLMode == "I" THEN
   mUDATE =$DateString  +  $TimeString ;
   mSERVER = "R2 HVAC";
   mCLIENT = "CCR 단말";
   mACTION = ParamAction;
   mTAGNAME1 = ParamTag;
   mPREVAL‍ = ParamPre;
   mCURVAL = ParamCur;
   DB_WhereExpr = "";
   DB_OrderByExpr = "";
  
ENDIF;

DBC = SQLInsert(DBC_ConnectionId, DB_TableName, DB_BindList );
   
IF DBC == 0 THEN   
    SQLFirst(DBC_ConnectionId );
ENDIF;

===========SELECT ======================

DB_TableName = "USERTRAIL";
DB_BindList = "BindUserTrail";
DB_WhereExpr = "TAGNAME  like '" + mtagnm + "%'  AND UDATE > '" + G_STRDT + " 00:00:00'  AND UDATE < '" + G_ENDDT + " 23:59:59'";

{--------------- Alarm Data Sort ----------------------}
 DB_OrderByExpr  ="UDATE DESC";   

DBC = SQLSelect(DBC_ConnectionId, DB_TableName, DB_BindList, DB_WhereExpr, DB_OrderByExpr );