%chulisj.m
%第一步:数据预处理
y_jin_jine=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',2,'E2:E210948');
y_jin_shuie=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',2,'F2:F210948');
y_xiao_jine=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',3,'E2:E162485');
y_xiao_shuie=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',3,'F2:F162485');
%读取发票状态
jin_zf=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',2,'H2:H210948');
xiao_zf=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',3,'H2:H210948');
y_jin_qy=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',2,'A2:A210948');
y_xiao_qy=xlsread('附件1:123家有信贷记录企业的相关数据.xlsx',3,'A2:A162485');
n_jin_jine=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',3,'E2:E395176');
n_jin_shuie=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',3,'F2:F395176');
n_xiao_jine=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',2,'E2:E330836');
n_xiao_shuie=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',2,'F2:F330836');
n_jin_zf=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',3,'H2:H395176');
n_xiao_zf=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',2,'H2:H330836');
n_jin_qy=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',3,'A2:A395176');
n_xiao_qy=xlsread('附件2:302家无信贷记录企业的相关数据.xlsx',2,'A2:A330836');
%有信贷——数据处理
if jin_zf==0 %发票状态为作废时,进项金额、税额都作废
y_jin_jine1=0;
y_jin_shuie1=0;
else
y_jin_jine1=y_jin_jine;
y_jin_shuie1=y_jin_shuie;
if y_jin_jine<0 %负数发票时,进项金额为0,税额不变,供以后抵扣
y_jin_jine1=0;
end
end
if xiao_zf==0
y_xiao_jine1=0;
y_xiao_shuie1=0;
else
y_xiao_jine1=y_xiao_jine;
y_xiao_shuie1=y_xiao_shuie;
if y_xiao_jine<0 %负数发票时,销项金额为0,税额不变,供以后抵扣
y_xiao_jine1=0;
end
end
xlswrite('处理:123家有信贷记录企业的相关数据1.xlsx',y_jin_jine1,1, 'B2:B210948');
xlswrite('处理:123家有信贷记录企业的相关数据1.xlsx',y_jin_shuie1,1, 'C2:C210948');
xlswrite('处理:123家有信贷记录企业的相关数据1.xlsx',y_xiao_jine1,2, 'B2:B162485');
xlswrite('处理:123家有信贷记录企业的相关数据1.xlsx',y_xiao_shuie1,2, 'C2:C162485');
%无信贷数据处理
if n_jin_zf==0
n_jin_jine1=0;
n_jin_shuie1=0;
else
n_jin_jine1=n_jin_jine;
n_jin_shuie1=n_jin_shuie;
if n_jin_jine<0
n_jin_jine1=0;
end
end
if n_xiao_zf==0