커뮤니티
문의드립니다.
2018-06-11 14:46:04
2282
글번호 224460
항상 도움 주셔서 고맙습니다.
옵션이 아닌 Account1의 내용을 엑셀로 출력하고 싶습니다.
종목명, 종목코드,평단가,수량,현재가를 엑셀에 표시하고 싶습니다.
var a = "A";
function Main_OnStart()
{
Main.SetTimer(1, 1000);
}
function Main_OnTimer(nEventID)
{
var ItemCode = new Array(6);
var ItemPrice = new Array(6);
ItemCode[0] = "종목코드"
ItemPrice[0] = "평단가"
for(var i = 1; i <= 5; i++)
{
ItemCode[i] = Option.GetATMCallRecent(i);
ItemPrice[i] = Option.GetavgUnitCost(0, i);
}
//지정된 셀을 기준으로 우측으로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToRow(1, "C1", ItemCode);
//지정된 셀을 기준으로 우측으로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToRow(1, "C2", ItemPrice);
//지정된 셀을 기준으로 아래로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToCol(1, "C4", ItemCode);
//지정된 셀을 기준으로 아래로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToCol(1, "D4", ItemPrice);
Main.KillTimer(1);
}
잘 부탁드립니다.
답변 1
예스스탁 예스스탁 답변
2018-06-18 17:13:40
안녕하세요
예스스탁입니다.
아래 내용 참고하시기 바랍니다.
첨부된 그림과 같이 표시됩니다.
잔고객체에 종목명은 없어 별도로 종목개체 생성해서 사용하게 되어 있습니다.
var V1 = [];
var V2 = [];
var V3 = [];
var V4 = [];
var V5 = [];
var num;
function Main_OnStart()
{
Main.SetTimer(1, 1000);
}
function Main_OnTimer(nEventID)
{
Main.KillTimer(1);
num = Account1.GetTheNumberOfBalances();
Excel1.SetData(1, "A1","보유종목수");
Excel1.SetData(1, "B1",num);
Excel1.SetData(1, "A2","종목명");
Excel1.SetData(1, "B2","종목코드");
Excel1.SetData(1, "C2","평단가");
Excel1.SetData(1, "D2","보유수량");
Excel1.SetData(1, "E2","현재가");
if (num > 0)
{
req = 0;
Account1.SetBalance(req);
V2[req] = Account1.Balance.code;
V3[req] = Account1.Balance.avgUnitCost;
V4[req] = Account1.Balance.count;
V4[req] = Account1.Balance.current;
Main.ReqMarketData(Account1.Balance.code,0,0);
}
}
function Main_OnRcvMarketData(MarketData)
{
V1[req] = MarketData.name;
req = req+1;
if (req < num)
{
Account1.SetBalance(req);
V2[req] = Account1.Balance.code;
V3[req] = Account1.Balance.avgUnitCost;
V4[req] = Account1.Balance.count;
V4[req] = Account1.Balance.current;
Main.ReqMarketData(Account1.Balance.code,0,0);
}
else
{
Excel1.SetArrayToCol(1,"A3",V1);
Excel1.SetArrayToCol(1,"B3",V2);
Excel1.SetArrayToCol(1,"C3",V3);
Excel1.SetArrayToCol(1,"D3",V4);
Excel1.SetArrayToCol(1,"E3",V4);
}
}
즐거운 하루되세요
> 여세우 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 항상 도움 주셔서 고맙습니다.
옵션이 아닌 Account1의 내용을 엑셀로 출력하고 싶습니다.
종목명, 종목코드,평단가,수량,현재가를 엑셀에 표시하고 싶습니다.
var a = "A";
function Main_OnStart()
{
Main.SetTimer(1, 1000);
}
function Main_OnTimer(nEventID)
{
var ItemCode = new Array(6);
var ItemPrice = new Array(6);
ItemCode[0] = "종목코드"
ItemPrice[0] = "평단가"
for(var i = 1; i <= 5; i++)
{
ItemCode[i] = Option.GetATMCallRecent(i);
ItemPrice[i] = Option.GetavgUnitCost(0, i);
}
//지정된 셀을 기준으로 우측으로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToRow(1, "C1", ItemCode);
//지정된 셀을 기준으로 우측으로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToRow(1, "C2", ItemPrice);
//지정된 셀을 기준으로 아래로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToCol(1, "C4", ItemCode);
//지정된 셀을 기준으로 아래로 배열변수에 저장된 값을 순서대로 입력
Excel1.SetArrayToCol(1, "D4", ItemPrice);
Main.KillTimer(1);
}
잘 부탁드립니다.
다음글
이전글