<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% Dim RsList__MMColParam RsList__MMColParam = "10" If (Request("MM_EmptyValue") <> "") Then RsList__MMColParam = Request("MM_EmptyValue") End If %> <% Dim RsList Dim RsList_numRows Set RsList = Server.CreateObject("ADODB.Recordset") RsList.ActiveConnection = MM_dzdc_show_STRING RsList.Source = "SELECT * FROM 内容列表 WHERE 类别 = '" + Replace(RsList__MMColParam, "'", "''") + "'" RsList.CursorType = 0 RsList.CursorLocation = 2 RsList.LockType = 1 RsList.Open() RsList_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 11 Repeat1__index = 0 RsList_numRows = RsList_numRows + Repeat1__numRows %> <% ' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables Dim RsList_total Dim RsList_first Dim RsList_last ' set the record count RsList_total = RsList.RecordCount ' set the number of rows displayed on this page If (RsList_numRows < 0) Then RsList_numRows = RsList_total Elseif (RsList_numRows = 0) Then RsList_numRows = 1 End If ' set the first and last displayed record RsList_first = 1 RsList_last = RsList_first + RsList_numRows - 1 ' if we have the correct record count, check the other stats If (RsList_total <> -1) Then If (RsList_first > RsList_total) Then RsList_first = RsList_total End If If (RsList_last > RsList_total) Then RsList_last = RsList_total End If If (RsList_numRows > RsList_total) Then RsList_numRows = RsList_total End If End If %> <% Dim MM_paramName %> <% ' *** Move To Record and Go To Record: declare variables Dim MM_rs Dim MM_rsCount Dim MM_size Dim MM_uniqueCol Dim MM_offset Dim MM_atTotal Dim MM_paramIsDefined Dim MM_param Dim MM_index Set MM_rs = RsList MM_rsCount = RsList_total MM_size = RsList_numRows MM_uniqueCol = "" MM_paramName = "" MM_offset = 0 MM_atTotal = false MM_paramIsDefined = false If (MM_paramName <> "") Then MM_paramIsDefined = (Request.QueryString(MM_paramName) <> "") End If %> <% ' *** Move To Record: handle 'index' or 'offset' parameter if (Not MM_paramIsDefined And MM_rsCount <> 0) then ' use index parameter if defined, otherwise use offset parameter MM_param = Request.QueryString("index") If (MM_param = "") Then MM_param = Request.QueryString("offset") End If If (MM_param <> "") Then MM_offset = Int(MM_param) End If ' if we have a record count, check if we are past the end of the recordset If (MM_rsCount <> -1) Then If (MM_offset >= MM_rsCount Or MM_offset = -1) Then ' past end or move last If ((MM_rsCount Mod MM_size) > 0) Then ' last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' move the cursor to the selected record MM_index = 0 While ((Not MM_rs.EOF) And (MM_index < MM_offset Or MM_offset = -1)) MM_rs.MoveNext MM_index = MM_index + 1 Wend If (MM_rs.EOF) Then MM_offset = MM_index ' set MM_offset to the last possible record End If End If %> <% ' *** Move To Record: if we dont know the record count, check the display range If (MM_rsCount = -1) Then ' walk to the end of the display range for this page MM_index = MM_offset While (Not MM_rs.EOF And (MM_size < 0 Or MM_index < MM_offset + MM_size)) MM_rs.MoveNext MM_index = MM_index + 1 Wend ' if we walked off the end of the recordset, set MM_rsCount and MM_size If (MM_rs.EOF) Then MM_rsCount = MM_index If (MM_size < 0 Or MM_size > MM_rsCount) Then MM_size = MM_rsCount End If End If ' if we walked off the end, set the offset based on page size If (MM_rs.EOF And Not MM_paramIsDefined) Then If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then If ((MM_rsCount Mod MM_size) > 0) Then MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' reset the cursor to the beginning If (MM_rs.CursorType > 0) Then MM_rs.MoveFirst Else MM_rs.Requery End If ' move the cursor to the selected record MM_index = 0 While (Not MM_rs.EOF And MM_index < MM_offset) MM_rs.MoveNext MM_index = MM_index + 1 Wend End If %> <% ' *** Move To Record: update recordset stats ' set the first and last displayed record RsList_first = MM_offset + 1 RsList_last = MM_offset + MM_size If (MM_rsCount <> -1) Then If (RsList_first > MM_rsCount) Then RsList_first = MM_rsCount End If If (RsList_last > MM_rsCount) Then RsList_last = MM_rsCount End If End If ' set the boolean used by hide region to check if we are on the last record MM_atTotal = (MM_rsCount <> -1 And MM_offset + MM_size >= MM_rsCount) %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> <% ' *** Move To Record: set the strings for the first, last, next, and previous links Dim MM_keepMove Dim MM_moveParam Dim MM_moveFirst Dim MM_moveLast Dim MM_moveNext Dim MM_movePrev Dim MM_urlStr Dim MM_paramList Dim MM_paramIndex Dim MM_nextParam MM_keepMove = MM_keepBoth MM_moveParam = "index" ' if the page has a repeated region, remove 'offset' from the maintained parameters If (MM_size > 1) Then MM_moveParam = "offset" If (MM_keepMove <> "") Then MM_paramList = Split(MM_keepMove, "&") MM_keepMove = "" For MM_paramIndex = 0 To UBound(MM_paramList) MM_nextParam = Left(MM_paramList(MM_paramIndex), InStr(MM_paramList(MM_paramIndex),"=") - 1) If (StrComp(MM_nextParam,MM_moveParam,1) <> 0) Then MM_keepMove = MM_keepMove & "&" & MM_paramList(MM_paramIndex) End If Next If (MM_keepMove <> "") Then MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1) End If End If End If ' set the strings for the move to links If (MM_keepMove <> "") Then MM_keepMove = Server.HTMLEncode(MM_keepMove) & "&" End If MM_urlStr = Request.ServerVariables("URL") & "?" & MM_keepMove & MM_moveParam & "=" MM_moveFirst = MM_urlStr & "0" MM_moveLast = MM_urlStr & "-1" MM_moveNext = MM_urlStr & CStr(MM_offset + MM_size) If (MM_offset - MM_size < 0) Then MM_movePrev = MM_urlStr & "0" Else MM_movePrev = MM_urlStr & CStr(MM_offset - MM_size) End If %> 中共肇庆市端州区委党校
 
 

 

浅析我区财政收入结构    试探财政增长与经济发展路向

端州区委党校调研组 

    财政是执政的经济基础,是社会事业建设发展的重要保障。财政状况是经济状况的真实反映。分析我区财政收入结构,探讨我区财政增长与经济发展的路向,对于优化经济结构,增强财政实力,促进我区财政与经济又好又快发展,具有现实和长远的意义。
    一、对我区财政收入结构的分析
    近3年来,我区财政一般预算收入快速稳定增长。2004年至2006年我区财政一般预算收入分别是:19,630万元、24,145万元、30,290万元,同比增长16.2%、23%、25.5%,呈现出良好的增长态势。
从产业(行业)对我区财税贡献率来看,2004年至2006年,第一产业每年税收不超过5万元可忽略不计,第二产业3年来分别为:4892万元、6289万元、7683万元(分别占当年财政一般预算收入的24.9%、26%、25%);第三产业3年来分别为:11351万元、12974万元、14944万元(分别占当年财政一般预算收入的58%、54%、49%)。其中对我区财税贡献最大的前三大行业是:工业3年来分别为:3284万元、4228万元、5358万元;房地产业3年来分别为:2648万元、2959万元、4350万元;批发和零售业3年来分别为:1844万元、2007万元、2162万元。2006年这三大行业区级税收总计11,870万元,占当年区级工商税收总收入的54.7%。由此可见,对我区财税贡献最大的产业是第二、第三产业,特别是工业、房地产业、商贸服务业这三大行业平稳较快增长,优势明显。
    从经济成份对我区区级税收贡献率来看,2004年至2006年,公有企业(含市直国有、集体企业)3年来分别为:6155万元、7664万元、8406万元(分别占区级税收收入的38%、40%、37%);外资企业(含港澳台商企业)3年来分别为:3905万元、3327万元、4138万元(分别占区级税收收入的24%、17%、18%);民营企业3年来分别为:6183万元、8273万元、10088万元(分别占区级税收收入的38%、43%、45%,其中民营经济2006年工业区级税收588万元,第三产业区级税收10163万元)。由此可见,民营经济已经成为我区财税收入最重要的支柱经济,并且特别是第三产业优势突出。
    从非税收入和纳税大户对我区区级税收贡献率来看,2004年至2006年,我区非税收入分别为2020万元、2227万元、3050万元,分别占财政一般预算收入的10.3%、9.22%、10.07%,分别增长26.1%、12.4%、34%,呈现出我区非税收入比重不大、不稳定的特征。另从我区3年来区级税收前10名的工业企业来看,只有肇庆立得电子有限公司、美亚(肇庆)金属制品有限公司、肇庆华锋电子铝箔有限公司共3家企业能够连续3年榜上有名,即使这3家前10名企业,每家每年对区级财政收入的贡献也只有60多万元至225万元之间(立得公司去年为我区工业企业纳税之冠,税收总额901万元,区级税收225万元,全区没有一家过千万元的工业企业纳税大户)。显而易见,我区非常缺乏工业大项目的纳税大户,后劲不足。
    从以上对我区财政收入结构的分析,可以清楚地看到我区财政与经济发展的内在联系及其特点:一是对我区财税贡献最大最有优势的产业(行业)是第二、第三产业,特别是工业、房地产业和商贸服务业;二是对我区财税贡献最大的经济成份是民营经济,并且发展快潜力大;三是我区财政收入质量好,但总量偏低,非税收入比重不大、不够稳定;四是我区缺乏工业大项目的财税大户,同时工业企业抗风险及可持续发展能力不够强。对此,我们要廓清思路,扬长避短,抓住机遇,乘势而上,促进我区经济与财政又好又快地发展。
    二、对我区财政与经济发展路向的探讨
    “问渠那得清如许,唯有源头活水来”。经济决定财政,经济发展是财政之源,财政的强大需要经济的发展作为支撑,财政收入与经济发展密切相关。因此,根据对我区财政收入结构之分析,试从宏观角度探讨我区财政增长与经济发展的路向。
    1、抓好优势产业(行业)做大做强,巩固和壮大我区现有财政实力。第二、三产业之所以能够成为我区优势产业,是因为其既适应我国工业化、城市化、现代化发展的总趋势,也符合我区作为肇庆中心城市的区位特点。宏观趋势、区位特点和我区的发展努力,造就了我区第二、三产业的优势。常言道:时势比人强。我们要顺应时代发展趋势,把握区位优势,乘势而上,着力做大做强我区优势产业(行业、企业),特别是抓好工业、建筑房地产业、商贸服务业等城市经济龙头产业(行业、企业),巩固和壮大我区现有财政实力。今后尤其要注意根据我区土地资源缺乏,生态环保严格等实际情况,以“高质量、高效益、高科技,低消耗、低成本、低排放”为方向大力发展工业,以“市场化与政策引导相结合”积极发展建筑房地产业,以“旅游文化名城中心市区的集聚效应”为优势发展商贸服务业,尤其是生产性、现代化高端服务业,抢抓机遇做大做强我区优势产业(行业、企业),特别是城市经济,进一步增大增强我区财政实力。
    2、抓好民营经济的充分发展,实现富民强区提高财政质量。从我区财政收入结构状况可以看出,我区民营经济发展方兴未艾、如日中天,对财政的贡献一年上一个台阶。实践证明,民营经济的发展,有力地促进了我区整体经济的发展与繁荣,切实提高了百姓的经济收入和生活水平,有效地增强了我区的财政实力。事实上,发展民营经济是我国经济体制改革的重要方针,是国家经济建设的重大政策。我区民营经济的一路发展,为我区的经济社会发展和增加财政收入作出了突出的贡献。我区在缺乏国有企业经济的情况下,尤其需要充分发展民营经济,使民营经济成为我区财政与经济发展的“生力军”、“正规军”,把发展民营经济(内源经济)作为富民强区、优化经济结构,促进经济发展,增强财政实力,提高财政质量的战略布局来抓紧抓好。让一切民营经济发展的潜能竞相迸发,让一切民营经济创造财富的源泉充分涌流。保护发展民营经济的热情,鼓励发展民营经济的实践,创新发展民营经济的机制,既抓大又扶小,既肋强又帮弱,促进民营经济在第二、第三产业,尤其是工业、房地产业、商贸服务业等城市经济优势产业自主发展、和谐发展、又好又快地发展,为推进我区经济社会发展进步,提高人民的生活收入水平,增强我区财政实力作出新的更大贡献。
    3、抓好招商引资大项目,促进我区财政增量升级。招商引资是经济不断发展的重要动力,是不断增加财政收入的重要途径,抓好招商引资工作事关重大。财政要有一个质的飞跃升级,必须要有高质量和可持续发展的大项目作为支撑。我区要切实抓好招商引资工作,尤其要突破缺乏工业大项目的“瓶颈”问题。对此,我们要有急迫的思想,但不要有急躁的情绪,必须实事求是地分析问题,找出对策。大项目落户一个地方,是“天时、地利、人和”的结果。所谓“天时”,是指良好的政策时势机遇;“地利”,是指有利的客观环境条件;“人和”,是指积极的人为因素之总和。三者缺一不可,但又可以互补。为此,我区要引进大项目,必须要从“天时、地利、人和”方面研究对策。“天时”——我区宏观政策与别的地方没有特殊性,但具体的土地、税收、行业准入等优惠政策不如某些地方,而时势(时机及整个态势机遇)又胜于一些地方。因此,要从制订合适可行的优惠政策、把握好时势机遇、营造好形势等方面下功夫;“地利”——大项目落户起码需要合适有利的土地厂房、基础设施、上下游产业配套、原料产品进出以及充足适用的劳工等五大“地利”条件,我区引进大项目要同其所需“地利”条件与我区实际条件相结合,扬长避短,研究找准适合的高效益的产业项目作为主攻方向,避免盲目招商徒劳无功;“人和”——就是想方设法调动发挥全区上下特别是职能单位和职责人员招商引资的积极性和创造性,发挥人----这一最积极、最主动、最具活力的因素,营造良好的人文投资环境,努力突破我区缺乏工业大项目的“瓶颈”,解决我区工业抗风险及可持续发展不强的现实问题,促进我区财政增量升级。
    4、抓好财税管理创新,增强我区可支配财力。在大力发展经济开拓财源的同时,要抓好财税管理,创新工作机制,提高科学理财和依法理财的能力。一是加大税收力度,健全协税护税网络,加大对重点行业、重点企业税源的动态监控,堵塞漏洞,强化税收征管,确保应征尽收,确保财政稳定增长。二是抓好非税收入管理,拓宽财政增收渠道。由于我区缺乏政府资源性收益、行政收费,执法执收部门受职能职权的限制以及强化规范管理的制约,行政收费和罚没收入不可能有大的提高。要提高非税收入,必须靠盘活现有资产,增加资产收益。主要是对行政事业单位闲置的资产和转制企业留存的公有资产实行最大化的盘活增益,对资产经营公司的资产进一步规范管理,增加收益。三是抓好财政体制改革,不断完善区对镇、办事处的财政分成办法,提高镇、办事处发展经济、增加财政收入的积极性。四是加大对政府债权和城信社资产的追收处置工作的力度,主要是追收各种财政借款,以及国有企业产权转让收入。由于政府承担偿还端州、城东两城信社的中央专项再贷款责任,区政府已成为两个城信社的最大的债权人,因此要加大力度追收处置城信社资产,提高资产变现率,有效降低财政风险,增加区可支配的财力。

(执笔:李文光)

端州区委党校

2007年06月18日

 

中共肇庆市端州区委党校 2004 电话:0758-2816110
 

 

 

<% RsList.Close() Set RsList = Nothing %>