statado文档(真实盈余管理、应计盈余管理和审计费用)

1、statado文档（真实盈余管理、应计盈余管理和审计费用）真实盈余管理、应计盈余管理和审计费用打开数据所在文件夹cleards真实盈余管理、应计盈余管理和审计费用/原/始数据处理nsht固定资产原值sv,clearstkcdcodear=substr(acc、month=substr(acc、fmonth=dro、monthdestryear,fore、lasotcodeyearordeodeyeardro、aca13固0定1资0产1原值sa固定资产原值dtalacensheet资产负债表slearstkcdcodedro、ty、re、=dro、tyar=substr(acc、month=su

2、bstr(acc、fmonth=dro、monthdestryear,fore、lasotcodeyearordeodeyeardro、aca001应1收1账1款000a001总0资0产0000a0001存1货23000rena002000000总负债gen公司规模=ln(总资产)gen资产负债率=总负债/总资产gen应收账款占总资产比例=应收账款/总资产xtsetcodeyeargen期初总资产=1.总资产gen应收增加额=d应收账款merge1:1codeyearusing固定资产原值.dtakeepif_merge=3drop_mergegenppe_a=固定资产原值/期初总资产save

3、资产负债表变量.dta,replaceinsheetusing利润表.csv,clearrenstkcdcodedropiftyprep=Bdroptypreprenb001101000营业收入renb001201000营业成本renb001209000销售费用renb001210000管理费用renb002000000净利润genyear=substr(accper,1,4)genmonth=substr(accper,6,2)keepifmonth=12dropmonthdestringyear,forcereplacesortcodeyeardropaccperxtsetcodeyear

4、genl_净利润=l.净利润gen公司亏损=0ifl_净利润=0replace公司亏损=1if公司亏损=.gen营收增加额=d.营业收入genl_营收增加额=l.营收增加额save利润表变量.dta,replaceinsheetusing现金流量表.csv,clearrenstkcdcodedropiftyprep=Bdroptypreprenc001000000经营活动现金流genyear=substr(accper,1,4)genmonth=substr（accper,6,2）keepifmonth=12dropmonthdestringyear,forcereplacesortcodey

5、eardropaccpersavecfo.dta,replaceusecfo.dta,clearmerge1:1codeyearusing资产负债表变量.dtakeepif_merge=3drop_mergemerge1:1codeyearusing利润表变量.dtakeepif_merge=3drop_mergeordercodeyeargen总资产收益率=净利润/总资产genTA=（净利润-经营活动现金流）/期初总资产genrev_rec=（营收增加额-应收增加额）/期初总资产gencfo=经营活动现金流/期初总资产genS1=营业收入/期初总资产genS2=营收增加额/期初总资产genS

6、3=l_收增加额/期初总资产genx=1/期初总资产genDISX=（销售费用+管理费用）/期初总资产xtsetcodeyeargendeta_存货=小.存货genPROD=（营业成本+deta_存货）/期初总资产save盈余管理数据.dta,replace*应计盈余管理*use盈余管理数据.dta,clearforeachvofvarlistTAxrev_recppe_adropifv=./删除缺漏值dropifyear2015xi:regTAxrev_recppe_ai.yearpredicte,resreplacee=abs（e）reneDAsave应计盈余管理.dta,replace*

7、真实盈余管理*use盈余管理数据.dta,clearforeachvofvarlistcfoDISXPRODxS1S2S3dropifv=.dropifyear2015xi:regcfoxS1S2i.yearpredicte,resreneRCFOxi:regDISXxS3i.yearpredicte,resreneRDISXxi:regPRODxS1S2S3i.yearpredicte,resreneRPRODgen真实盈余管理=abs(RPROD-RCFO-RDISX)keepcodeyear真实盈余管理RPRODRCFORDISXsave真实盈余管理.dta,replaceinsheet

8、using审计.csv,clearrenstkcdcodegenyear=substr(accper,1,4)genmonth=substr(accper,6,2)keepifmonth=12dropmonthdestringyear,forcereplacesortcodeyearorderyear,after(code)dropaccpergen审计意见=0ifaudittyp=标准无保留意见replace审计意见=1if审计意见=.genaudit=1ifstrmatch(dadtunit,*安永华明*)=1replaceaudit=1ifstrmatch(dadtunit,普华永道*)=1replaceaudit=1ifstrmatch(dadtunit,*毕马威华振*)=1replaceaudit=1ifstrmatch(dadtunit,*德勤华永*)=1dropdadtunitaudittypreplaceaudit=0if