`*[foxpro]
local rts

rts=select()
ng_sst='<table border=0 width=100% ><TBODY class=text>'
sst_page=''

select a_ppn_table_news
scan 
ng_sst=ng_sst+"<TR><TD width=10%>"
sst_page=''

if a_rules_main_news.__vp
sst_image=a_funcfox(aa_el_style_func_news_pic_gen,a_ppn_table_news.pict_rules,a_ppn_table_news.id_pict_)
*a_picture_gen(a_ppn_table_news.pict_rules,a_ppn_table_news.id_pict_)
select a_ppn_table_news
else
sst_image=""
endif 
sst_page=sst_image


ksst='</TD><TD class=text vAlign=top align=left>'
sst_page1=""

if a_rules_main_news.__d
sst_page1=sst_page1+alltr(ttoc(a_ppn_table_news.datetime_))+" "
endif 

if a_rules_main_news.__s
	if a_rules_main_news.__fmax and a_rules_main_news.__fmaxs>0
		pp_short_=left(a_ppn_table_news.short_,a_rules_main_news.__fmaxs)+"..."
	else 
		pp_short_=alltr(a_ppn_table_news.short_)	
	endif 

	if a_rules_main_news.__sl
	sst_page1=sst_page1+'<A HREF="'+"i_news_page_"+padl(a_ppn_table_news.id_,15,"0")+".html"+' " target=_blank >'+pp_short_+'</A>'+'<BR>'
	else
	sst_page1=sst_page1+pp_short_+"<BR>"
	endif 
endif 









ng_sst=ng_sst+sst_page+ksst+sst_page1
ng_sst=ng_sst+"</TD></TR>"
endscan 




select (rts)
ng_sst=ng_sst+"</TBODY></TABLE>"

a__v_nselect=a__v_nselect-1

return ng_sst



`