Function Web_test02();
Begin
  endt:=today();
  stockID:='SZ000002';
  setsysparam(pn_stock(),stockID);
  setsysparam(pn_date(),endt);
  setsysparam(pn_cycle(),cy_day());
  //用昨日行情-取完整交易时间序列（固定数据长度）
  reT:=LastTradeDay(endt); //上个交易日
  setsysparam(pn_cycle(),cy_1m());
  Timer:=array(('date':endt+9.5/24));
  Timer&=select endt+timeof(['date']) as 'date'
   from Markettable datekey reT to reT+16/24 of 'SH000001' end;
  //开盘价作为当日第一个数据起点
  t:=array(('date':endt+9.5/24,'close':StockOpen4(endt)));
  t&=select ['date'],['close'],['vol']
   from Markettable
   datekey endt to endt+16/24 of stockID end;
  t:= t|Timer;
  t[:,'date']:=datetimetostr(t[:,'date']);
  return t;
End;