单车核算 下载本文

“维修费单车核算”

一、“单车费用核算制度”的制定

以往车辆维修,单台车辆每年维修费使用多少没有标准,修理次数无法控制,修理中换的质量如何,换的什么部件也只知道个大概,这两年维修费用一直在持续压缩,为立足改革,并提高驾驶员的工作主动性、积极性,提出在车队首先实行单车费用核算制度。

二、“单车费用核算制度”的内容

单车费用核算是指单车维修费用核算,对每台车每年的修理费用进行定额,有效控制维修费用。根据我处工作目标,充分挖掘设备潜力,节约维修费用,制定了车辆维修费用单车定额标准,实行单车费用核算。车辆年维修保养费用定额为:每台车基数为7000元;自新车投产后,每行驶一年或一万公里增加维修费用2%;大修、中修另由单位统一安排,不列入当年维修费用中;车辆大修后,费用重新核算。对超出核定修保费用的车辆,取消年度红旗设备和优秀操作手的评比资格;对超出核定维修费用的车辆,原则上不与安排修理,对生产急用车辆,可通过申请,经机动科鉴定,财务科审核后,安排修保。

三、“单车费用核算制度”的微机化管理

单车核算要求对车辆日常的多项数据进行时时监控,包括形式公里数、日常维护保养费用、修理次数等,全处200多台车辆,如果借助计算机进行监控和数据统计分析,不但大大节省劳动时间和强度,也提高了数据的准确性和真实性,所以我们根据实际工作要求和本办法的具体内容,设计了相应的计算机程序,以便计算机管理控制。

我们开发出多种功能,如:修理派工单、修理费用统计、修理次数和公里数统计、大修和购置的相关内容等。主要程序如下:

SM=MONTH(DATE()) if sm<10

tm=\ else

tm=str(sm,2) endif

yer=year(date())

Txlrq=YER*10000+sm*100+day(date()) tp=\鲁E- \

@ 9,16 SAY \请输入牌照号: \READ sele 2 USE DJ

&&use dj index dj.pzh set index to dj.pzh find '&tp'

&&LOCATE FOR PZH=\if eof()

@ 5,23 SAY \输入牌照号错........\wait \按任意键继续.......\clear DO GG retu endif

if ye<0

@ 11,23 say \车辆维修费已超出.......\

vbj=\

@ 13,23 say \输入口令!\READ

IF VBJ<>\clear do gg retu ENDIF endif

sele 1 TRQ=\USE CL GO BOTT RE=RECNO()

SET INDEX TO CL.PZH USE CL if re=1

APPE BLAN

repl pzh with tp,rq with tm,xlrq with txlrq,jl with 1 else

appe blan

repl pzh with tp,rq with tm,xlrq with txlrq GO RE TR=RQ TJL=JL SKIP +1 IF RQ=TR

REPL JL WITH TJL+1 ELSE

REPL JL WITH 1 ENDIF