“电广传媒没有虚构利润” |
|
新京报
李若愚
|
董事长龙秋云细说“以股抵债”缘由
在电广传媒“以股抵债”方案被市场热议了一周之后,公司董事长龙秋云昨日接受本报采访,对“以股抵债”的相关情况做出说明。
新京报:为什么说电广传媒用“以股抵债”解决大股东占用资金问题是现实的选择?
龙秋云:大股东占款是我们的历史遗留问题。2001年,监管部门对电广传媒进行巡检,要求对大股东占款问题进行整改。这三年时间来,大股东以现金或资产的形式偿还了3.4亿元,还剩下5.4亿元。目前大股东自身的业务处于快速发展阶段,资金缺口较大,另一方面,我们也不希望大股东拿一些和上市公司主营业务衔接不紧密的资产来还债。在既暂时缺乏现金,又没有优质资产的情况下,“以股抵债”是我们的现实选择。
新京报:“以股抵债”后大股东持股比例降低,是否会减少对上市公司的支持?公司董事会成员是否会进行调整?
龙秋云:大股东可以把上市公司搞死,也可以把上市公司搞活。我们公司大股东承认占用资金是违规的,但这是由特定历史环境形成的,主观上并没有恶意。“以股抵债”过程中,大股东做了很多让步。“以股抵债”后,大股东仍具备相对控股地位,对上市公司的支持将一如既往。目前,大股东湖南广播电视产业中心正在积极推动湖南省委、省政府重组全省有线电视网,而这种资源整合将由我们公司牵头。此外,广告收入占我们公司收益的40%.我们与大股东关联媒体的广告总代理协议还会继续执行下去。至于董事会成员,目前暂时还不会有变化。本届董事会的任期到明年1月届满。到时我们将根据公司治理的相关规定进行改选。
新京报:有媒体最近称,电广传媒2003年报中两笔应收账款未计提坏账,由此认为电广传媒有虚构利润之嫌。公司对此如何解释?
龙秋云:公司不存在虚构利润的情况。按照注册会计师遵照会计准则做出的认定,这两笔应收帐款的回收没有问题,所以没有必要计提坏账准备。是否计提也不是我们公司说了算的,必须由会计师做出专业的认定。
|
|
|
<%
if SpecialID<>0 then
Response.Write "
| | "
set rs4=server.CreateObject("ADODB.RecordSet")
rs4.Source="select * from special where SpecialID=" & SpecialID
rs4.Open,conn,1,1
Response.Write "相关专题:" & trim(rs4("specialname")) &" | "
rs4.Close
set rs4=nothing
Response.Write "专题信息: | | "
rs.Source="select top 5 NewsID,Title,BigClassName,SmallClassName,SpecialID,updatetime,click from News where (NewsID<>" & NewsID & " and SpecialID=" & SpecialID & ") order by NewsID DESC"
rs.Open,conn,1,1
if rs.EOF then
Response.Write " 没有专题信息 | "
else
while not rs.EOF
Response.Write " " & trim(rs("Title")) & "(" & trim(rs("UpdateTime")) &")[" & rs("click") & "] | "
rs.MoveNext
wend
Response.Write "[更多... ] | "
end if
rs.Close
set rs=nothing
end if
'------------------------------------------------------------------------------------------------------------------------------------
Response.Write "
| | "
Response.Write "相关信息: | | "
if about<>"" then
sql="select top 5 * from news where about like '%" & about & "%' and title not like '%" & title & "%' order by newsid desc"
set rs=conn.execute(sql)
do while not rs.eof
Response.write " " & trim(rs("Title")) & "(" & trim(rs("UpdateTime")) &")[" & rs("click") & "] | "
rs.movenext
loop
Response.Write "[更多... ] | "
else
Response.write " 没有相关信息 | "
end if
'rs.close
set rs=nothing
set rs1=server.CreateObject("ADODB.RecordSet")
rs1.Source="select top 5 * from review where NewsID=" & NewsID & " order by reviewid desc"
rs1.Open rs1.Source,conn,1,1
if rs1.EOF then NoReview=1
Response.Write "
| | "
Response.Write "相关评论: | | "
%>
<%
if not NoReview then
while not rs1.EOF
author=server.HTMLEncode(trim(rs1("author")))
email=server.HTMLEncode(trim(rs1("email")))
content=trim(rs1("content"))
content=replace(content,"<","<")
content=replace(content,">",">")
content=replace(content,chr(13)," ")
ContentLen=len(Content)
%>
|
<%
rs1.MoveNext
wend
end if
rs1.Close
set rs1=nothing
conn.close
set conn=nothing
%>
|
| | |