[엑셀VBA] 이베스트투자증권 xingAPI 조회 기능 사용하기

조회는 TR을 사용한다

이베스트투자증권에서 데이터 조회를 위해서는 TR(Transaction)을 사용한다. 현재가조회, 잔고조회 등을 TR을 통해 할 수 있다. 매수/매도 등 주문에도 TR이 사용된다.

TR 목록과 각 TR의 입력, 출력은 Devcenter를 활용할 수 있다.

TR을 사용하기 위해서는 XAQuery 생성 > Res 등록 > 데이터입력 > 요청 > 받기 > 데이터 가져오기 순으로 진행하면 된다(이베스트투자증권 XingAPI COM 개발 가이드 발췌)

1. XAQuery 생성

Dim WithEvents XAQuery_t1101 As XAQuery

Set XAQuery_t1101 = CreateObject( “XA_DataSet.XAQuery” )

2. Res 등록

XAQuery_t1101.ResFileName = “C:\eBEST\XingAPI\Res\t1101.res”

3. 데이터 입력

XAQuery_t1101.SetFieldData( “t1101InBlock”, “shcode”, 0, “078020” )

4. 요청

XAQuery_t1101.Request( False )

5. 받기

XAQuery_t1101_ReceiveData( ByVal szTrCode As String )

6. 데이터 가져오기

sName = XAQuery_t1101.GetFieldData( “t1101”, “t1101OutBlock”, “hname”, 0 )