上市公司操控性与非操控性应计利润1990-2021：总资产负责率利润股本收入费用净资产收益率含原始及处理结果数据excel+dta



数据来源：基于上市公司财务报告整理的excel数据集
数据期间：1990-2021（以数据文件名标识的具体数据年度区间为准）
数据范围：沪深上市公司，包含：A股主板、中小企业板、创业板、科创板的上市公司

（多年度所有上市公司的数据都整理在一张面板数据表上，便于各种不同角度的查询分析比较）




excel数据文件格式大致如下（原始数据）：

Stkcd [证券代码] - 上海A股以上交所公布的证券代码为准，深圳A股以深交所公布的证券代码前加上00

Accper [会计年度] - 以YYYY-MM-DD表示
A100000 [资产总额] - 资产各项目之总计。1990年起使用
A110000 [流动资产合计] - 流动资产各项目之合计。1990年起使用
A110101 [货币资金] - 公司库存现金、银行结算户存款、外埠存款、银行汇票存款、银行本票存款、信用卡存款、信用证保证金存款等的合计数。1990年起使用
A110201 [短期投资] - 公司购入的各种能随时变现，并准备随时变现的、持有时间不超过一年(含一年)的股票和债券，以及不超过一年(含一年)的其它投资。1990年起使用
A110601 [应收账款] - 公司因销售商品、产品、材料、提供劳务及办理工程结算等业务，而应向购买单位或接受劳务单位收取的款项。注：联营公司往来款，其性质类似于因寄销而产生的应收账款。1990年起使用
A111611 [一年内到期的长期债券投资] - 本数据库用“流动资产增加净额“替代。1990年起使用
A130101 [固定资产原值] - 公司的各种固定资产原价，包括融资租入的固定资产原价。1990年起使用
A140000 [无形资产和其他长期资产] - 无形资产与其它资产各项目之合计。1990年起使用
A200000 [负债总额] - 负债各项目之合计。1990年起使用
A210000 [流动负债合计] - 流动负债各项目之合计。1990年起使用
A210101 [短期借款] - 公司借入的尚未归还的的一年期以下(含一年)的借款。1990年起使用
A211101 [应付股利] - 公司经董事会或股东大会决议确定分配的、尚未支付的现金股利。1991年起使用
A212101 [一年内到期的长期负债] - 长期负债中一年内到期的部分。1991年起使用
A230101 [递延税款贷项] - 公司期末尚未转销的递延税款的贷方余额。1994年起使用
A300000 [股东权益合计] - 股东权益各项目之合计。1990年起使用
A310101 [股本] - 按照公司章程的规定，股东投入公司的股本总额。1990年起使用
B110101 [主营业务收入] - 公司经营主要业务所取得的收入总额。1990年起使用
B110604 [财务费用] - 公司为筹集生产经营所需资金等而发生的费用，包括利息支出(减利息收入)、汇兑损失(减汇兑收益)以及相关的手续费等。注：本项目1998年前列于“主营业务收入”与“主营业务利润”之间，1998年起列于“主营业务利润”与“营业利润”之间。1991年起使用
B120101 [主营业务利润] - 1998年前为“主营业务收入”减“主营业务成本”、“主营业务税金及附加”、“销售费用”、“管理费用”、“财务费用”、“ 汇兑损失”、“进货费用”之差额，1998年起为“主营业务收入”减“主营业务成本”、“主营业务税金及附加” 之差额。1990年起使用
B130101 [营业利润] - 与经营业务(包括主营业务和其它业务)有关的利润。1990年起使用
B130202 [投资收益] - 公司以各种方式对外投资所取得的收益。1991年起使用
B140101 [利润总额] - 公司实现的利润总额。1990年起使用
B150101 [净利润] - 公司实现的净利润。注：1994年前部分公司无本项目。1990年起使用，1994年前部分公司无此项
C110601 [固定资产净盘亏额] - 公司经批准在营业外支出列支的固定资产盘亏减去盘盈的净损失。
C110701 [清理固定资产净损失] - 公司年度内由于出售固定资产和固定资产报废、毁损发生的净损失。
D610601 [固定资产折旧额] - 企业本期累计提取的固定资产折旧。2000年起使用
T30100 [资产负债率] - 负债总额／资产总额。
T40301 [总资产报酬率] - （利润总额＋财务费用）／平均资产总额，平均资产总额=资产合计期末余额。
T40302 [总资产报酬率] - （利润总额＋财务费用）／平均资产总额，平均资产总额=（资产合计期末余额+资产合计期初余额）/2。
T40303 [总资产报酬率] - （利润总额＋财务费用）／平均资产总额，平均资产总额=（资产合计期末余额+资产合计上年期末余额）/2。
T40801 [净资产收益率] - 净利润／股东权益平均余额，股东权益平均余额=股东权益期末余额。
T40802 [净资产收益率] - 净利润／股东权益平均余额，股东权益平均余额=（股东权益期末余额+股东权益期初余额）/2。
T40803 [净资产收益率] - 净利润／股东权益平均余额，股东权益平均余额=（股东权益期末余额+股东权益上年期末余额）/2。
Ttlacrul [总应计利润] - 总应计利润 = 净利润-经营活动现金流。


处理过程大致如下：


*---------------------------
*-3.2 补充财报科目与财务指标
*-数据来源：[专题研究系列]-[操控性与非操控性应计利润]
*---------------------------
....


*-[3]标记变量所属子库
   foreach v of varlist A100000 - Ttlacrul {
      local a: var lab `v'
      rename `v' `v'_32
      label var `v'_32 "`a'-[专题-操控性与非操控性应计利润子库]"
   }

*-[4]生成年度变量
   gen year = real(ustrregexs(0)) if ustrregexm(Accper, "\d+")
   label var year "年度"

*-[5]保存数据
   drop Accper
   order Stkcd year
   compress
   xtset Stkcd year
   save "$Out\MNMAPR_Accruals.dta", replace  //操控性与非操控性应计利润