이베스트투자증권 API : 실시간 데이터(Real) 조회

필자는 실시간 데이터는 대부분 DDE를 통해 얻어온다. 그러나 주문에 대한 체결 데이터는 Real로 조회한다.

XAReal 선언 및 생성 > RES 등록 > 데이터입력 > 실시간데이터요청하기 > 실시간데이터받기의 과정을 거친다.

아래설명에서 [이름]에 사용하고자 하는 Real 항목의 코드(예 : 주식주문체결 → SC1, KOSPI체결 → S3_)를 입력하면 된다.

XAReal 선언 및 생성

‘ 객체선언 – 실시간TR코드는 무조건 3자리이다.
Dim WithEvents XAReal_[이름] As XAReal
‘ 객체생성
Set XAReal_[이름] = CreateObject( “XA_DataSet.XAReal” )

RES등록

XAReal_[이름].ResFileName = “[경로][이름].res”

데이터입력 : Real 항목마다 입력 값이 다름, DevCenter를 통해 확인 필요)

XAReal_[이름].SetFieldData("InBlock", "[필드명]", "값")

실시간데이터 요청

XAReal_[이름].AdviseRealData()

실시간데이터 받기

‘ XAReal 객체의 ReceiveRealData 이벤트로 데이터 받음
Sub XAReal_[이름]_ReceiveRealData( ByVal szTrCode )
  ‘ 데이터 가져오기
  XAReal_[이름].GetFieldData( “OutBlock”, “[필드명]” )
End Sub

실시간데이터요청취소

XAReal_[이름].UnadviseRealData()

특정 종목 실시간 데이터 요청 취소

XAReal_[이름].UnadviseRealDataWithKey( “078020” )