02383 管理信息系统实践考试样题与答案
1.1 样题1
请根据以下调查结果绘制计划部门的部分计划管理数据流程图：
计划部门根据各用料单位送来的物资领用计划汇总和编写成材料领用计划，保存起来，再根据此材料领用计划上的数据和材料消耗定额本上的数据计算和编写出限额发料文件保存起来。下一步是根据限额发料发料文件打印出限额发料单交给保管员。
1.2 样题2
1.3 样题3
1.4 样题4
有一工资处理系统，每月根据职工应发的工资计算个人所得税，交税额算法如下，若职工月收入≤800元，不交税；若800<职工月收入≤1300元，则交超过800元工资额的5%；若超过1500元，则交超过1500元部分的10%，试画也计算所得税的程序流程图
开始输入职工月收入XX<=800Y不交税，交税额Y=0NX<=1300YY=（X-800）*5%NNX>=1500YY=(X-1500)*10%结束
1.5 样题5
Set talk off Use student.dbf Index on stno to stu Do while .T. Clear No=' '
@3,10 say '输入学号（0为退出）' get no read
If no='0000' exit Endif
locate for stno=no If .not. found() ____appe blan____ Else
@4,15 say '学号重复，再输入' Wait
____loop____ Endif Do while .t.
@8,10 say '学号' get stno @9,10 say '姓名' get stname Read Yes='Y'
@15,10 say '请核对(Y/N)' get yes Read
If upper(yes)='Y' ____exit____ ____endif____ ____enddo____ ____enddo____ ____clos all____ SET TALK ON Return
1.6 样题6
职工数据库BMP.DBF包据的数据项是:
姓名,性别,职称,工资,奖金
下面是连续修改职工记录的程序,先输入姓名,如果输入为”结束”,
表示输入结束;如果输入的姓名不存在,需提示用户重新输入;如果输入的姓名存在, 则修改该人的职称,工资和奖金. 请在程序中填写相应内容,完成上述要求. //程序清单 SET TALK OFF USE BMP DO WHILE .T.
ACCEPT “输入姓名” TO X IF X = “结束” [(1)] ENDIF
LOCATE FOR 姓名= [(2)] IF [(3)] CLEAR
@3,5 SAY ‘姓名’+姓名 @3,27 SAY ‘职称’ GET职称 @5,5 SAY ‘工资’ GET 工资 @5,15 SAY ‘奖金’ GET 奖金 [(4)] ELSE
WAIT ‘查无此人,按任意键重新输入’ [(5)] [(6)] USE
SET TALK ON return; x; found();