未分类题

东方有限责任公司(以下简称东方公司)为增值税一般纳税人,2007年3月31日(部分科目)科目余额表如下表所示。

注:“持有至到期投资”科目余额中将于一年内到期的有15 000元。
东方公司4月份有关资料如下:
(1)本月销售商品共计售价50 000元,增值税额日500元,款项尚未收到。商品成本为 42 000元(不考虑城市维护建设税和教育费附加)。
(2)收回以前年度已核销的坏账9 600元。
(3)按工程进度支付工程款13 000元。
(4)计提本月固定资产折旧2 500元,均计入管理费用。另用银行存款支付其他管理费用4 000元。
(5)购入交易性金融资产,买价10 000元,另支付交易费用120元,用银行存款支付。
(6)本月支付已计提的短期借款利息7 840元。
(7)用银行存款偿还短期借款11 000元。
(8)发生财务费用566元,均以银行存款支付。
(9)企业经过对应收账款风险的分析,决定年末按应收账款余额的o.4%计提坏账准备。
(10)公司所得税税率为33%,1—3月份的所得税费用已转入本年利润。经过计算,本月应交所得税为3 300元,企业用银行存款缴纳(本题不考虑纳税调整事项)。
(11)假定企业按前三个月净利润的10%和5%分别计提法定盈余公积和任意盈余公积。
要求:根据上述资料,填制东方公司4月30 H资产负债表中下列项目的金额:
(1)货币资金____________元。
(2)交易性余融资产____________元。
(3)应收账款____________元。
(4)存货____________元。
(5)持有至到期投资____________元。
(6)固定资产____________元。
(7)在建工程____________元。
(8)短期借款____________元。
(9)应付利息____________元。
(10)应交税费____________元。
(11)资本公积____________元。
(12)未分配利润____________元。

A.shangxueba.cn/images/ct_cjkzfsm_cjkzfsintegration_01223(20093).jpg'
B.4%计提坏账准备。


【参考答案】

(1)会计分录如下: ①借:应收账款 58 500 贷:主营业务收入 50 000 应交税费——应交增值税(销项税额) ......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
热门 试题

未分类题
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内[说明] 设有一张学生成绩表scores存放在Access数据库Student中,其中包括学生编号、姓名以及各科目考试成绩。下面的应用程序利用ADO Data和DataGrid控件实现了对成绩数据的基本管理,其操作包括: (1)添加新记录:单击“添加”按钮,光标将指向最后一条数据记录,在其后编辑好新的数据记录后,再单击“更新”按钮,该数据即被加入成绩表; (2)删除记录:单击“删除”按钮将删除当前所指记录,其后的数据记录依次上移; (3)更新记录:直接编辑某条已有记录,再单击“更新”按钮将更新成绩表; (4)记录排序:选中单列字段后,单击“排序”按钮,记录集将按该字段升序排列。 程序的运行界面为: 在开发过程中,数据库连接对象使用了名为Adodc1的ADO Data控件,数据显示区域使用了名 DataGnd1的DataGrid控件,界面上从左到右各操作按钮分别取名为CmdAdd、CmdDel、CmdUpdate、 CmdRefresh、CmdSort和CmdExit。[Visual Basic代码]Dim conn, database, table As StringPrivate Sub Form_Load() database ='E: Student.mdb' ’设置要访问的数据库 conn ='Provider=Microsoft.Jet.OLEDB.4.0;Data Souse=' & database Adodc1.ConnectionString=conn ’设置连接字符串 table = 'scores' Adode1. (1)= table ’设置所要访问的数据表 Set DataGrid1. (2)= Adodc1End SubPrivate Sub CmdAdd_Click() ’“添加”按钮的单击事件响应过程 Adodc1.Recordset. (3) End SubPrivate Sub CmdDel_Click() ’“删除”按钮的单击事件响应过程 Adodc1.Recordset.Delete Adodc1.Reeordset.MoveNextEnd SubPrivate Sub CmdUpdate_Click() ’“更新”按钮的单击事件响应过程 Adode1.Reeordset.UpdateBatch adAffectAllEnd SubPrivate Sub CmdRefresh_Cliek() ’“刷新”按钮的单击事件响应过程 Adodc1.RefreshEnd SubPrivate Sub CmdSort_Cliek() ’“排序”按钮的单击事件响应过程 If DataGrid1.SelStartCol < 0 Or DataGridl. SelStartCol (4) DataGrid1. SelEndCol Then MsgBox “请选择某一字段(列)!” Exit Sub End If Adodc1. RecordSource = 'SELECT * FROM' & table & 'order by' & _ DataGrid1. Columns((5)).DataField Adodc1.RefreshEnd SubPrivate Sub CmdExit_Click() ’“退出”按钮的单击事件响应过程 EndEnd Sub