> >create table bhav.dbf free ; >(symbol c(20),series c(20),open f(20,2),high f(20,2),low f(20,2),close f(20,2),; >last f(20,2),prevclose f(20,2),tottrdqty f(20,2),tottrdval f(20,2),timestamp c(20),date d) > >index on padr(symbol,20)+padr(series,20)+dtoc(date) tag idxbhav > >create table del.dbf free ; >(settlement I,recordtype I,symbol c(20),series c(20),qtytrd I,delqty I,; >pdqty f(6,2),date d) > >index on padr(symbol,20)+padr(series,20)+dtoc(date) tag idxdel > >select a1.date,a1.symbol,a1.series,a1.open,a1.high,a1.low,a1.close,a1.last,;a1.prevclose,a1.tottrdqty,a1.tottrdval,; >a2.delqty,((a2.delqty*100)/a1.tottrdqty) as delpercent from bhav a1 , del a2 ; >where padr(a1.symbol,20)+padr(a1.series,20)+dtoc(a1.date) = ; >padr(a2.symbol,20)+padr(a2.series,20)+dtoc(a2.date) into table bhav_data >>
select a1.date,a1.symbol,a1.series,a1.open,a1.high,a1.low,a1.close,a1.last,;a1.prevclose,a1.tottrdqty,a1.tottrdval,; a2.delqty,((a2.delqty*100)/a1.tottrdqty) as delpercent from bhav a1 join del a2 ; on padr(a1.symbol,20)+padr(a1.series,20)+dtoc(a1.date) = ; padr(a2.symbol,20)+padr(a2.series,20)+dtoc(a2.date) into table bhav_data