智能表费控实现方案
智能电能表费控模式应用分析及选择建议 李祺

智能电能表费控模式应用分析及选择建议李祺摘要:作为智能电网建设的重要基础设备之一,智能电能表承载着原始电能数据的采集、计量和传输等任务,是实现信息集成、分析优化和信息展现的基础,对于实现电网的信息化、自动化和互动化具有不可替代的作用,对国家智能电网建设速度起到了较大的推动作用。
目前,各级供电企业广泛应用智能电能表,但因对用电客户的用电习惯认识不足,存在两种费控模式难以取舍问题。
基于此,本文对智能电能表费控模式应用分析及选择建议进行分析。
关键词:智能电能表;费控模式;选择;应用1费控原理及方式简述所谓“费控”,即利用一定的技术手段实现对用电客户当前实际使用电量(电费)与限定值的实时比较,当使用电量(电费)达到设定的阈值时,通过设定的方式向用户发出提醒以及进行跳闸(断电)操作,从而达到控制用户使用电量(电费)的目的。
现阶段实现费控的方式主要有两种,本地费控和远程费控。
所谓远程费控,即实现费控的比较操作在平台端进行(由计费平台根据用电信息采集系统采录的电量数据和用户执行电价计算已使用电费,将其与用户的电费余额进行比较),电表端只负责电能计量及跳合闸,而本地费控则是所有功能全部在电表端实现。
对于本地费控而言,可以进一步划分为电量控制和电费控制。
供电公司在建设用电信息采集系统以前所使用的本地费控表均为电量控制方式,即用户在购电时售电系统写入电卡的数据是根据购电金额折算后的电量数据,电能表直接对电量数据进行比对,因而不需要在电能表中内置用户电价,但在建设用电信息采集系统时推广使用的智能电表均采取的是电费控制,即售电系统不再进行电量折算而是直接在购电卡中写入购电金额,由电能表根据内置电价完成电费计算和比对功能,因此,对于目前使用的本地费控智能电表而言,都必须在电能表中预先设置好相应电价。
2智能电能表本地费控模式与智能电能表远程费控模式比较1.1模式特点比较(1)智能电能表本地费控模式特点本地费控智能表用户通过CPU购电卡交费购电输入表中,电表才能供电。
NB-IoT费控智能电表功能介绍及远程拉合闸控制的应用

NB-IoT费控智能电表功能介绍及远程拉合闸控制的应用窄带物联网(NB-IoT)为远程抄表带来巨大便利,摆脱传统集中器模式,省去布线施工,让电表、水表、燃气表、蒸汽表、流量表像一部部手机,可直接联网,让能耗数据随时随地轻松掌握。
在电力行业,一直采用的是电表——采集器——集中器的多级采集方式进行远程抄表,一个区域内几十块智能电表通过与集中器连接组网,并通过2G或电力载波的方式将数据上传。
如下图,电表和网关之间采用有线方式连接,涉及到大量的施工及辅材。
计费户数较多时,这种一带多的模式还需要分为两级,集中器的成本支出也较大。
传统费控电表远程抄表拓扑图传统费控电表随着物联网时代的到来,NB-IoT网络逐步商用化,传统电力抄表复杂的架构将会变得越来越简单。
每块智能电表内置通信模块,采用一对一的方式直接上传数据,无需集中器,电表一台设备将计费+通信功能合二为一,在施工,维护,成本上都有巨大的优势。
新~宏~博,作为能源物联网创新企业,推出全新的NB-IoT费控智能电表。
为居民、商业、市政等分户计费领域提供NB物联网方案。
一户一表,直联平台,省去了人工抄表及传统2G复杂布线,为客户的日常生活带来物联网便捷体验。
一款拥有通信功能的智能电XHB-DDZY1783内置电信/移动/全网通模块,使得智能电表具备无线通信功能,并通过NB-IoT网络,上传电能数据,并输出费用报表。
内置NB-IoT通信模块,3年流量费两套费率时段表,两套电价方案支持远RS485通信、红外等通信方式国网标准,CPA证书,计量器具型式评价报告内置NB-IoT模组远程拉合闸,智能控制XHB-DTZY1783电表除了计费和通信功能外,还具有远程拉合闸功能,通过安全认证后,可接收远程售电系统下发的拉闸、允许合闸指令,实现用电系统的智能化管理。
特别适合于商业、出租户的物业电费管理领域。
NB费控电表远程拉合闸示意图NB-IoT费控系统平台展示数据上传平台后,可在地图上清晰展示当前用户下属所有设备的位置,以及在线状态(红色表示离线,绿色表示在线),单击点位显示设备基本信息和能耗参量。
三相远程费控智能电能表设计

三相远程费控智能电能表设计三相远程费控智能电能表设计随着电力系统的发展和智能电网的建设,电能表作为电力系统中重要的计量设备,逐渐向远程智能化方向发展。
在此背景下,本文将介绍一种三相远程费控智能电能表的设计。
1. 引言传统电能表只能进行简单的电能计量,无法满足现代电力系统的需求。
随着电力系统的发展,需要对电能进行更细致、精确的计量,并实现远程数据采集和费控功能。
因此,设计一种能够满足这些要求的三相远程费控智能电能表具有重要的意义。
2. 硬件设计该远程费控智能电能表由电能测量模块、数据采集模块、远程通信模块和费控模块组成。
电能测量模块采用高精度电流互感器和电压互感器进行电流和电压的测量。
数据采集模块通过AD转换器将测量得到的电流和电压转换为数字信号,并进行数据处理和存储。
远程通信模块采用GPRS无线通信技术,实现与电力公司的远程通信。
费控模块利用计量数据和通信功能,实现对用户用电量和电费进行管理和控制。
3. 软件设计软件设计包括电能计量算法、远程通信协议和费控算法。
电能计量算法根据测量得到的电流和电压数据,计算出用户的用电量。
远程通信协议采用标准的通信协议,实现电能表与电力公司服务器之间的数据交互。
费控算法根据用户的电费余额和设定的电费阈值,实现对用户用电量的控制和告警功能。
4. 功能特点该三相远程费控智能电能表具有以下功能特点:4.1 高精度计量功能:采用高精度电流互感器和电压互感器,实现对电流和电压的精确测量。
4.2 远程数据采集功能:通过GPRS无线通信技术,实现与电力公司服务器之间的远程数据采集。
4.3 费控功能:通过费控模块,实现对用户用电量的管理和控制,避免用户欠费问题。
4.4 远程监控功能:通过远程通信模块,实现对用户用电情况的远程监控,及时发现用电异常问题。
4.5 数据存储功能:通过数据采集模块,实现电能数据的存储和查询功能。
5. 应用前景该三相远程费控智能电能表在电力供应系统中具有广阔的应用前景。
基于智能电能表的费控功能的实现

基于智能电能表的费控功能的实现【摘要】本文从智能电能表的工作原理入手,对其费控功能的实现和安全试验进行了探讨。
【关键词】智能电能表;费控功能;实现电能表的发展一共经历了四个阶段:第一阶段电能表属于人工手抄;第二阶段电能表安装了数据传输装置,实现少量数据传输;第三阶段电能表不仅能够对数据进行采集和存储,而且设置了多种通信接口;第四阶段电能表更加智能化,在第三阶段电能表的基础上增加了自动控制、信息存储、信息交互、预付费等新功能。
基于的智能电能表实现费控功能能够将上述功能的作用充分发挥出来,同时对于智能电网建设也有着举足轻重的作用。
1 费控智能电能表工作原理费控智能电能表装有ESAM模块,其作用在于对信息交换进行安全认证。
ESAM模块属于安全认证芯片,集成了SM1算法和EEPROM,信息经过安全认证后,可以保存在电能表系统中,同时可以仅存储数据进行加密,为数据的完整和安全提供了保障。
通过固态或虚拟介质将远程控制指令发送给费控智能表,当接收到数据后,由ESAM模块对信息进行安全认证和加密、解密处理,保证数据在传输过程中的完整和安全。
2 基于智能电能表的费控功能的实现2.1 本地费控的实现本地费控电能表以固态介质为主,实现费控功能,固态介质主要有射频卡、CPU卡等。
通过固态介质既可以对参数进行设置,还具有充值功能,也就是说本地费控电能表兼有本地费控和远程费控两种功能;其费控功能的实现是通过电能表内部体现出来的:本地费控智能电能表中置有ESAM安全模块,电能表所涉及的余额、费率、购电次数等重要数据均由ESAM安全模块保存,计量计费就是以此为依据。
在实际运行过程中,如果用户余额不足,也就是比设定的报警金额小时,电能表能够用特定声音或光等方式提醒用户;如果用户使用金额已经超出透支限度,也可实现透支金额的实时记录,一旦透支金额超出透支限度,电能表将自动发出发出的断电信号。
通过对负荷开关的控制,停止供电。
当续交电费信息被智能电能表接收后,现将透支余额扣除,如果剩余金额比设定值大,通过本地或远程方式控制电能表处于允许合闸状态,需要供电时,由人工进行的恢复。
智能电表费控的执行流程及优化方案

操 作 才 能 完 成 一 次 电 能表 费率 设 置操 作 。
现 在 步骤 2 、 7和 步 骤 3 、 6 。 同时报 文监 测表 明 . 费控 任 务 失败 时, 采集设备( 集 中器/ 负控 终 端 ) 几 乎 没 有 接 收 到 智 能表 上 送 的报 文 。因此 , 定位 费控 任 务 延 迟 高和 失 败 率 高 的 问题 主 要 因
L o W C A R B O N W O R L D 2 o i 5 , 7
能源 ・ 电力
智能 电表 费控 的执 行 流程及 优 化 方案
莫云 石 ( 国网湖南省电力公司桃江供电分公司, 湖南 桃江 4 1 3 4 0 0 )
【 摘 要】 针对用 电信息采集系统费控命令执行效率低、 执行结果成功 率低 的问题 , 必须 对费控流程进行分段剖析 , 并对 G P R S / C D M A通 道和载
引 言
变 )与 智 能表 之 间 通过 电力 载 波 通 道 直接 连接 或 经 过 采 集 器
智 能 电 能表 是 费控 命 令 远 程 执 行 的 关键 ,智 能 电 能表 分 设 备 中继 连接 .即 采 集 设备 终 端 与 采 集 器 之 间 采 用 电力 载 波 而 采 集 器与 智 能 表 之 间通 过 4 8 5通 信 线 缆 连 接 。 采 用这 为“ 继 电器 内置 ” 和“ 继电器外置” 两种 表 型 。在 判 断继 电 器状 直 连 . 态环 节 . 继 电器 内置 电 能表 和 继 电 器 外 置 电 能表 有 所 差 异 , 继 电 器 内置 电 能表 通 过 表 内继 电 器输 出端 电压 准 确 判 断 继 电 器 跳 合 闸 状 态 :继 电 器 外置 电能 表 目前 通 过 电能 表 电流 来 判 断 继 电 器跳 合 闸状 态 . 不 能做 到 完 全 准确 , 拟 采 用反 馈 电压 和 功 率 的 双 条件 判 别 法来 提 高判 断 准确 率 。 两种 方 式 接 入 采 集 终 端 设 备 的 智 能 表 均 需 要 经过 载 波 通 道 。
基于智能电能表的远程费控执行流程优化策略探究

基于智能电能表的远程费控执行流程优化策略探究随着现代智能技术的发展,智能电表被逐渐应用于电力系统,智能电表具有远程控制功能,能够自动化远程计费,主要由计量系统、通讯系统以及控制系统构建而成,其中控制系统也存在差异,使得智能电表包括费控电能表与非费控表。
文章首先简单介绍了远程费控智能电表的性能特征,然后分析了智能电表远程费控执行流程优化的措施。
标签:智能电表;远程费控;执行流程;优化方法远程费控是智能电表独自具有的功能,能够远距离计量用电客户的用电量以及缴费情况,并对应发出命令和指令,当各大客户出现欠费问题时,能够对其进行自动化提醒,并通过拉闸等方式来自动化控制其用电,通过发布远程费控命令来实现对用户的自动化控制。
1 远程费控智能电能表远程费控智能电表最典型的特征在于:远程控制、智能化控制。
也就是利用网络信息系统、载波等媒介来达到对电力电能的远程化计量与控制。
在这一电能表计量模式下,要求用户正式享受供电服务前先行采购一定的电量,具体的购买途径包括:网银支付、互联网转账等,达到双方的自动化电能采购。
所采购的电能可以经过主站来发送至各个用户的电表系统,随着电能表的计量,主站则将自行除掉所用完的电量。
同时,也能通过光、声等警报信号来向用户发出电量不足的提示,同时也能自行断电。
用户缴纳电费以后,则能自动恢复电力系统的供电,继续进行电量计量。
同普通电能表相比,远程费控智能电表具有显著的自动化功效,用户需要做的就是前往营业厅缴纳电费,实现了电费计量与供电服务的一体化运营,同时,这一电表兼具监测、监督功效,能够有效监督用户的用电状态,以及整个电力系统的运行状态等。
2 继电器内置表费控运行过程费控具体涵盖两大操作过程分别为:远距离跳闸操作、远距离合闸操作,二者实际执行过程中有一定差别,具体的执行过程为:跳闸的运行过程为:参照用户实际用电、电费缴纳的现状来做出判断、分析,对应生成跳闸用户的序列与表格,利用接口来向采集系统发出通报,对应实施跳闸处理,同时,电能表也将接到这一命令,同样配合跳闸,同时能够凭借内部安装的继电器所输出的电压对应分析继电器的情况,也就是是否处于跳闸状态。
浅析智能电能表远程费控的执行流程及优化方案

目前 电能表合 闸方式有两种 ,“ 允许合闸”和 “ 直接合 闸” 。“ 直接合 闸”方式是用 电信 息采集系 统主站 下发直接合 闸命令 ,不需用户参与 ,电能表 自动完成合 闸操作 。“ 允许 合闸 ”方式是指用 电信 息采集系 统主站 向电能表下发允许合 闸命令 ,由电能表与用户共 同完成合 闸操作 。
2继 电器 内置表费控执行流程
费 控 功 能包 括 远 程 “ 跳 闸 ”和 远程 “ 合 闸” ,这 两种 操 作在执行流程上存在差异 ,下面分别对 其执行流程进行说 明。 继 电器 内置 电能表远程 “ 跳闸 ”执行流程如下 。 费控系统每 日根据用户用 电和缴 费情况 进行分析判断 , 产生跳 闸用户列表 ,通 过接 口通知用 电信息采集系统进行跳 闸 。用 电信息采集系统 向电能表发送跳 闸命令 ,并根据表 内 继 电器输 出端 电压判 断继 电器 跳合 闸状态,如 电能表跳 闸失 败 或 继 电器 故 障 则 转 人 工 处 理 ,并 将 跳 闸 控 制 结 果 反 馈 给 费 控系统 。 用 电信息采集系统控制用户 内置 电能表 “ 费控 ”执行流 程 ,具体操作如下 。 首 先 主 站 对 电能 表 进 行 身 份 认 证 ,验 证 双 方 身 份 ;其 次 身份 验证通过后 ,主站发送跳 闸命令至 电能表 ,电能表收到 有效的跳闸命令后修改 “ 电能表运行状态字 3 的 B i t 6位” ( 继电器命令状态 ) ,然 后输 出跳闸控制信号 ,控制继 电器 跳 闸,向采集 系统主站返回应答帧 ;如电能表 收到正确的跳 闸命 令,不断根据 内置继 电器输 出端 反馈 电压判断外置继 电 器跳 闸是否成功 ,根据判断结果修 改 “ 电能表运 行状 态字 3 的B i t 4位 ”( 继 电器动作状态 ) ,判断继 电器命令状态和继 电器动作 状态是否都处于跳 闸状态 。 如跳 闸延 时时间大 于 0 , 主站 先根 据应 答帧中 “电能表运行状态字 3 的 B i t 6位 ” 判 断跳闸命令是否下达 ,然后等待 电能表 是否有继 电器故障 主动上报事件 ,根据命令下达情况和事件上报情况 综合 判断 跳 闸执行 是否成功。
ddzy3-z单相费控智能电能表的工作原理

一、概述随着科技的不断进步和智能化的发展,智能电能表作为一种新型的电能计量设备,在能源计量领域得到了广泛的应用。
其中,ddzy3-z单相费控智能电能表作为一种具有费控功能的智能电能表,在用户用电管理和节能减排方面具有重要的意义。
本文将重点介绍ddzy3-z单相费控智能电能表的工作原理,以帮助读者更好地理解其工作机制。
二、ddzy3-z单相费控智能电能表的结构1. 电能表外观结构:ddzy3-z单相费控智能电能表的外观通常包括表盖、表底、端子罩、显示屏等部件。
表盖安装在表底上,端子罩则用来安装电能表的接线端子,显示屏用来显示电能表的各种信息。
2. 电能表内部结构:ddzy3-z单相费控智能电能表内部主要包括电能计量模块、通讯模块、控制模块、显示模块等部件。
其中,电能计量模块用于实现电能的准确计量,通讯模块用于实现电能表与外部系统的数据通讯,控制模块用于实现电能表的各项控制功能,显示模块用于向用户展示相关信息。
三、ddzy3-z单相费控智能电能表的工作原理1. 电能计量功能:ddzy3-z单相费控智能电能表通过电能计量模块实现了对电能的准确计量。
当电能通过电能表时,电能计量模块会对电能进行采样、运算和积分处理,从而得出准确的电能使用量。
电能表还会记录用电时间、功率因数、负荷曲线等相关信息,为用户提供详尽的用电数据和分析。
2. 费控功能:ddzy3-z单相费控智能电能表具有预付费功能,用户需要先购物电能并通过特定方式输入到电能表中,电能表会相应地将购物的电能量充值到用户账户。
当用户用电时,电能表会根据用户的用电情况实时抠减账户中的电能余量,并提醒用户及时充值。
这种费控功能有效地约束了用户的用电行为,促进了用电的合理和节约。
3. 数据通讯功能:ddzy3-z单相费控智能电能表通过通讯模块实现了与外部系统的数据通讯。
通过该功能,用户可以通过特定的通讯方式查询电能表的用电情况、费用余额、电能数据等信息。
电能表也可以接收外部指令,实现远程控制、数据采集等功能。
智能表远程费控功能应用分析

3严格远程费控业务业扩报装管理
3.1新装客户远程费控办理流程
2远程费控业务管理策略
远程控制业务测算在主机内进行,需要根据采集策略从电能量采集系统采集抄表数据进行测算,结合实时缴费信息,和基准值比对进行策略应用。策略应用包括预警、停电、复电三大类,可根据客户信誉度、重要程度、用电类别等因素进行基准值及策略设置。
(1)基本策略:客户在申请办理远程费控业务时,为防止发生接电后立即停电的情况,根据实际用电情况交纳预置电费。采用银行代扣方式预付电费的客户可以不交纳预置电费,由系统自动生成代扣。
关键词:智能表;远程费控;功能
前言:
远程费控是通过远程监控客户的电费使用情况来控制客户用电的一种方式,是一项先进的电力营销业务概念,它主要借助于现代化信息通讯手段,依托高效的数据存储、计算处理技术,以电力营销业务应用系统和用电信息采集系统为基础,从电费测算、远程控制、费控方案管理、费控业务运行管理、客户增值服务及其它报表统计分析等多个业务层次全面地实现远程费控业务的所有功能。远程费控功能的应用,提高了电费风险控制能力,大大提升了营销精益化管理水平,促进了营销服务水平再提升。
4.2停电审批
根据用户性质不同,发到不同的部门进行审批处理,允许多级审批。审批通过后发到停电通知环节,审批不通过流程终止。
4.3停电通知
通过打印通知单、电话、短信等方式向用户通知停电事宜,对于通知结果进行确认记录。
4.4远程停电
智能表费控实现方案

智能表费控实现案一、引言2009年开场,电网公司开场进展智能电能表的推广应用和集中招标,智能电表的费控技术也得以进展深入开展。
目前市场上的费控式主要有本地费控和远程费控两种。
2013年,电网公司公布了一些列智能用电的新标准,对之前的相关标准进展了更进一步修订,在电价处理和密钥管理上做了更完善的规定。
二、本地费控本地费控即是卡表预付费,主要依靠电卡作为数据传输媒介,也可以通过无线传输模式进展售电数据的下发。
本地费控的特点是一表一卡、插卡用电、电表扣费、电表控制;如果采用远程下发模式售电,其特点是购电数据通过GPRS等信号下发至电表,此时要求电表具备电力线载波、RS-485、微功率无线或者GPRS等通讯功能。
2.1、实现原理根据售电数据的传输式来区分,本地费控可以分为电卡传输和远程下发两种实现案。
2.1.1、电卡传输用户可以在电力公司营业网点柜台进展持卡购电,亦可以在自助缴费终端进展自助缴费,自助缴费终端类似于银行ATM机,7×24小时无人值守,弥补营业柜台的营业时限问题。
柜台售电电卡作为数据传输的媒介,在售电终端〔柜台PC机或自助终端〕上对用户购电卡进展写卡,然后对插卡用电,由此实现售电系统到电表的数据传输。
电表获取购电数据后,会进展数据更新,更新容包括购电次数、剩余金额、累计购电金额等。
2.1.2、远程下发远程下发模式售电无需使用购电卡,售电数据由售电终端交给效劳器后台,以无线传输的式下发至电表,电表接收到数据后进展费控数据的更新。
此过程需要进展身份认证,保证数据传输的平安性和准确性。
柜台售电柜台售电柜台售电2.2、日常应用日常应用过程中需要注意以下几面:➢开户前,保证档案中表号与电表中表号一致即可;开户后,表号、户号、购电次数都要保证一致。
➢电表初始化操作、修改表号需在公钥下进展。
电价等其他参数可在私钥下进展更新。
但是有限制:开户时,可更新两套电价和其他参数;开户后,只能更新备用套电价。
谈谈智能电能表的费控模式与选择建议

谈谈智能电能表的费控模式与选择建议在新的发展形势下,传统的机械式电能表逐渐暴露出多种弊端,已经不能满足时代的发展需求。
与此同时,促进了智能电能表的快速发展。
与传统机械式电能表相比,智能电能表具有更强大的功能,包括电能计量、数据储存、信息处理、实时监测、智能控制等。
这些功能的发挥,给人们的生活提供了很大便利。
通常,智能电能表包括两种模式,分别是远程费控与本地费控。
那么这两种模式是如何应用的呢?在选择的过程中应该注意什么问题呢?下面就进行详细的分析、论述。
1 智能电能表的费控功能在以往的计电工作中,主要采用传统的用电模式。
具体来讲,用户用电之后,再进行抄表、计费。
然而,这种管理方式非常落后,很容易出现问题。
常见的问题有抄错、估抄/算错等。
近年来,由于科技的不断进步,促进了电力企业在收费模式上的改革,积极应用了智能电能表。
该电能表集中体现了计算机技术与信息通信技术。
与传统的电能表相比,具有更大的优势。
智能电能表的核心结构为智能芯片,该结构综合运用了计算机、通信技术,具有多种功能,表现为电功率计量、计时、计费以及上位机通信。
近年来,在科技力量的支持下,智能电能表的功能也逐渐趋于完善,并得到了广泛的应用,推动了电力企业的快速发展。
2 对费控的合法性进行分析2.1 预购电计费方式的合法性在传统的电费收缴中,是基于用户的用电量,采用抄表的方式完成的。
该模式的合法性,为智能电表的应用打下了基础。
根据合同法中电力供应的相关法律、法规,并未对这种付费方式做出禁止性的规定。
所以当供电企业与用户双方达成一致时,就可以在合同中约定最终的结算方式。
同时,只要合同签订后,就具有法律效率,是合法的。
智能电能表预购电方式没有与现行的法律、规范产生冲突,在条例规定的范围内,所以也是合法的。
前提是,供电企业与用户要在计费前约定好。
2.2 电费用完自动停电的合法性部分地区在推广预付费电表时,规定预付费使用完,则自动停电。
这一规定实施后,在业界引起了很大的争议。
智能电能表费控加密技术的实现与调试要点

智能电能表费控加密技术的实现与调试要点相比于比较传统的电能表,智能电能表有非常突出的特点,具体是有着远程费控的相关功能,还能够对比传统的电能表安全使用方面所存在的一些局限性进行彻底的打破,智能电能表费控加密技术会对其正常的工作造成直接性的影响。
通常来讲,电能表属于用户以及供电企业之间电费结算的重要计量工具,还属于法律当中所规定强制性的计量器具。
在最近几年当中,社会经济以及电子技术的快速发展,使得智能电能表在供电系统内,根据网络技术来做到监测以及存储等相关的功能,特别是其所具有的费控功能的实际运用会在很大程度上改变比较传统的数据采集方式,进而来有效促进供电企业管理实现智能化、现代化和网络话。
除此之外,为了能够有效保证用户在信息方面的安全,应该有效增强智能电能表具有费控加密技术,采取有效的相技术措施来保证供电企业优良的供电服务水平。
1对智能电能表的基本概述进行分析现阶段,人们的实际生活水平已经得到了很大的提高,会增加家庭用户的实际用电量,这就在一定程度上增大了供电企业所投入的人力、物力以及财力等,尤其在实际的抄表过程中,因为有着非常多的用户量,人力进行抄表会存在着很多的错算、漏抄以及错抄等一些相关的问题出现,这在很大程度上损坏用户以及供电企业的实际经济利益以及社会利益,导致管理方面出现极其混乱的现象[1]。
此外,这也会为不法分子偷窃电能的相关行为提供一定的机会,导致窃电现象的频繁发生。
在此基础上,智能电能表属于多功能集一体的电能计量工具,其具体的运用会在很大程度上改变比较传统的计量方式,不需要运维管理人员到现场去读取客户用电等相关数据,会有效解决比较传统的查抄所具有的费力以及费时的缺点[1]。
除此之外,用户能够利用网络平台来了解自家的实际用电状况。
然而,智能电能表费控加密功能可以实现利用网络平台,有效防止应外来网络侵入,发生信息泄漏以及窃电的相关现象,供电企业应加快费控加密技术的研发,有效增强调控费控加密技术使用,以保证智能电能表运行的经济性以及安全性[1]。
走向智慧财务——蓝凌智能化费用管控解决方案

走向智慧财务——蓝凌智能化费用管控解决方案编者按:作为贯穿企业经营管理的一脉金线,好的财务管控能提升经营管理水平,进而最大化创造公司价值;而费用管控作为财务领域重要一环,不仅事关企业降本提效,更能奠定未来企业走向智慧财务的格局,反观现实,痛点多,如何破……三类痛点,家家财务有本难念的经那些年,疲于手工做账的财务小姐姐、苦于数据缺斤少两的CFO大佬、报销等到花儿也谢了的销售主管……痛点刻骨铭心,汇集成家家财务那本难念的经;也是必须解决的问题。
基于PDCA推进一体化费用管控面向企业诸多痛点、难点,基于PDCA(Plan:计划、Do:执行、Check:检查和Adjust:调整)循环,结合与上海电气、康佳集团、福田汽车、永辉超市、新东方等众多标杆企业的成功实践与前沿信息技术,蓝凌形成了全新的智能化费用解决方案,支撑企业从预算、借款、报销到付款、制证、统计等全周期的费用管控,助力企业账务管理更加合规、高效、先进,创造更大价值。
智+财务,多场景赋能业财一体化蓝凌费控解决方案,面向业务、财务、高管多角色,深入“智+”多场景,赋能财务效率提升、管理合规化、财务目标达成。
●智能问答,打造费控未来新入口化解员工一到申请费用或报销就找财务或问同事的尴尬,蓝凌小K机器人,支持财务制度、费用标准、报销流程等智能问答,员工PC+移动端快速获取财务知识,唤醒相关财务流程;通过全新费控入口,体验轻松、便捷的服务。
●费用随手记,报销趁热一键发起公务花费,事后统一报销,时间太久常常忘记费用发生事项;随手记支持员工移动端闪电发起报销,时间、地点、类别等多属性滑动选择输入,及时记录、实时报销、早日到账,告别拖延症带来的诸多不便。
●移动审批,给资金流一个加速度垫钱等报销或费用紧急申请,卡在审批环节,碰到领导或财务出差、休假怎么办?移动审批,从预算与标准匹配、待办提醒、到(业务与财务)审批内容、流程记录、多种操作(通过、驳回、转办等),加速流程推进,让钱快到账!●商旅对接,无报销出差说走就走接入携程等商旅服务商,打通OA、经上预订系统及财务核算系统(SAP/EBS/EAS/NC等),让员工不用垫付、不用贴票、不用提报销,财务不用审单、不用繁琐支付与入账;费用透明了、效率提升了,领导放心了。
2024年智能电表成功计量解决方案范本

2024年智能电表成功计量解决方案范本智能电表是一种将传统电表与智能化技术相结合的设备,能够对电能进行准确计量,并通过无线通信传输数据,实现电能消耗的监测、管理、控制和优化。
____年智能电表成功计量解决方案范本主要包括硬件设备和软件系统两部分。
下面是一个____字的示例:一、硬件设备1. 智能电表模块设计:为了实现准确计量和可靠传输数据的功能,智能电表模块需要具备高精度的电能计量芯片,采用电流互感器和电压采样器进行电流电压采集,并通过数字信号处理器进行数据处理和计算。
此外,还需要具备低功耗的通信模块和存储模块,以便进行数据传输和存储。
2. 电表外壳设计:为了满足市场需求和用户体验,电表外壳需要具备美观、耐用、防水、防尘等特性。
通过采用高强度材料,如铝合金或塑料,结合先进的制造工艺,可以实现电表外壳的设计要求。
3. 电表显示屏设计:为了方便用户查看电能使用情况和参数设置,电表需要具备清晰、易读的显示屏。
通过采用高亮度的LED显示屏或液晶显示屏,并设计友好的用户界面,可以满足用户的需求。
4. 电表通信模块设计:为了实现与能源管理系统的无线通信,电表需要具备可靠的通信模块。
通过采用无线通信技术,如NB-IoT、LoRa等,可以实现电表与能源管理系统的远程数据传输和控制。
二、软件系统1. 数据采集与存储系统:通过智能电表模块采集的电能数据,需要通过数据采集与存储系统进行处理和存储。
该系统需要具备高效的数据采集和存储能力,并具备安全和可靠的数据传输机制。
通过采用云存储技术,可以实现电能数据的长期保存和备份。
2. 数据计算与分析系统:通过对采集到的电能数据进行计算和分析,可以提供给用户更多的用电信息和分析结果。
该系统需要具备强大的数据处理能力和数据分析算法,并提供直观、易懂的用户界面。
通过数据挖掘和机器学习技术,可以对电能数据进行趋势分析、异常检测等操作,为用户提供定制化的用电建议。
3. 用电管理系统:为了实现对电能的有效管理和控制,需要建立完善的用电管理系统。
智能电能表使用解决方案

近期智能电能表使用中问题描述及处理方法近期,各单位运行智能电能表暴露出问题较多,主要反映在智能电能表充值、各种用电类别的智能电能表使用、智能电能表档案以及使用集中充值终端充值失败等现象,针对这些问题我们进行了梳理,现就问题进行描述,并对如何防范提出指导意见。
一、智能电能表档案问题不完整,造成无法售电。
明确本地费控智能电能表能正常售电必须满足三个条件:〔1〕电能表类别为“智能表”;〔2〕电能表类型为“电子式-智能本地费控(CPU卡)”;〔3〕是否预付费必须为“是”。
近期出现最多的就是业扩新增客户自购智能电能表档案出现是否预付费为“否”,影响售电成功。
2、现场安装智能电能表与SG186系统档案不一致,售电后,客户充值提示“ERR-31或33(表卡与表号不一致)”,增加换表工作量。
现场安装人员一定要认真核对换表信息,流程处理人员要认真选取出库表计。
二、智能电能表换表流程处理滞后问题一些还处于智能电表换装流程中的客户,也到营业厅购电。
请明确智能电能表客户档案未归档,不能进行开卡售电。
请各单位认真把关,防止客户无法购电发生优质服务投诉。
三、售电方面出现问题1、首先明确售电系统内三个概念:*新表售电*:客户新安装智能电能表或更换智能电能表,使用新表售电。
此时卡类别为“开户卡”*正常售电*:即客户第二次及以上购电。
卡类别为“购电卡”。
*补卡*:客户卡遗失、损坏或购电后充值不成功,可使用“补卡”流程。
明确客户是新表〔新装或新换表〕时,进行“补开户卡”,客户是正常智能电表用户时,直接进行“补卡”。
补卡错误最容易造成充值不成功,售电人员可通过“购电信息查询”或询问客户了解客户补卡类型。
2、售电人员首先明确客户是开户卡还是购电卡,假设是客户开户应在售电系统内点击“新表售电”,此时客户充值应扣除电表预置50元。
3、客户正常购电,售电人员首先读卡,检查卡信息与客户档案信息是否一致(主要是客户户号和表号),写卡次数,如属正常售电客户,写卡次数不应为0次。
智能表费控应用问题及解决方案

智能表费控应用问题及解决方案摘要:在供电企业的实际运营中,用户数量不断的增加使得抄表工作任务量激增,而且引入电力营销智能费控系统后,虽然可以自动采集电能量数据并进行远传、存储、预处理、统计分析等操作,但这种技术系统只方便了电力市场的运营和电费结算工作。
因此,必须在此基础上开发应用自动抄表技术,促进电力行业的营销管理。
关键词:智能表费控;应用问题;解决方案1自动抄表技术的构成电能自动抄表技术主要由前端采集子系统、通信子系统和中心处理子系统构成。
按照数据采集方式来划分有本地自动抄表系统和远程采集系统两种,本地自动抄表多是在前端采集子系统安装红外转换装置或电能表,运行过程中可以避免工作人员以直接接触数据的形式完成抄表工作。
当对远程的数据进行收集时则是安装电子式的电能表和集中器,将采集的信息向上一级的装置传输,对数据统一管理。
通信子系统是连接集中器和控制中心的数据传输途径,在不同的经济投入和环境下可以大致的分为三类。
一是无线传输主要针对客户集群广泛但不集中的情况,具有远距离和容量大的特点,但在使用时要申请频点的使用权,避免相邻的信号影响;二是租用通信运用商的传输通道,这种方式安装简单且能够实现大范围的覆盖尤其是在4G网络发展加快的条件下;三是使用电话线传输,在通信时间较长要求严格的情况下可以通过在发出和接受两端安装解调器的方式使用。
中心处理子系统是由中心站和相关的软件构成是自动抄表系统的最上层,可以通过远程控制电能表来控制用电如停电等都可以实现。
2智能表费控应用问题及原因2.1费控协议签订推行存在障碍一方面,用户的法律意识越来越强,一方面,电网企业的各项工作均须围绕客户满意度来开展,费控推广工作必须征得电力用户同意。
但因宣传不到位,广大用户对远程费控业务认知不够。
改为远程费控后,由后付费变为预付费,用电量较大用户担心占用大量资金,部分用户担心一旦欠费停电造成影响,不愿意签订协议。
未签订协议的用户,无法收取预收电费也无法执行远程费控。
ddzy288型单相费控智能电能表原理

ddzy288型单相费控智能电能表原理摘要:一、单相费控智能电能表简介二、单相费控智能电能表工作原理1.测量系统2.专用电路处理系统三、单相费控智能电能表设计思路与特点1.远程预付费和抄表2.安全认证和指纹识别3.LCD液晶显示屏与多种通信方式4.故障报警与电量过低报警5.防偷电单元正文:ddzy288型单相费控智能电能表是一款应用于家庭和商业场所的智能电表,它具有先付费后用电的管理功能。
这款电能表的工作原理主要涉及两个功能模块:测量系统和专用电路处理系统。
测量系统是电能表的核心部分,它对被测交流电压和电流进行高精度采样,然后将采样信号送至专用电能计量芯片。
在这个芯片中,采样信号经过一系列数字处理,最终转换成与有功功率成正比的脉冲频率信号。
这个信号将被发送至微处理器,进行后续的电量计算和费率分时累加。
专用电路处理系统负责处理电能表的数据显示、远程通信和费控功能。
数据显示部分采用大屏幕中文液晶,方便用户读取电量、电压、电流等信息。
远程通信部分则支持红外和RS485通讯功能,可实现远程抄表和远程费控。
费控功能则通过预先设置的费率策略,实现电量的精细化管理。
在设计思路和特点方面,ddzy288型单相费控智能电能表注重用户体验和用电安全。
它不仅能实现远程预付费和抄表,还具有本地费控和远程费控模式的灵活切换,满足电能计量与结算需求。
为了保障数据安全,电能表采用了安全认证和指纹识别技术。
此外,它还具备故障报警和电量过低报警功能,便于管理人员及时发现问题,提高电表运行的可靠性。
总之,ddzy288型单相费控智能电能表凭借其先进的计量原理、实用的设计思路和丰富的功能特点,为用户提供了便捷、安全的用电体验。
智能电表收费管理系统设计-31页word资料

毕业设计电表管理系统摘要 (1)Abstract (2)第一章引言 (4)1.1 课题背景 (4)1.2 系统简介 (5)第二章系统的分析 (6)2.1 系统开发的目标和思想 (6)2.2 系统的可行性分析 (8)第三章系统的设计 (18)3.1 系统的功能结构设计 (18)3.2 系统的数据库设计3.3 界面设计与代码设计 (23) (24)结束语 (46)致谢 (47)参考文献 (48)摘要传统的电费管理都是由工作人员手工查表,抄表完成的,其中要完成用户电费的收取,每月抄度,用户购电情况查询,以及列出欠费用户的信息名单,之类的信息.其工作强度大,工作流程繁琐,由于工作人员的不细心,将会造成电费收支的出错也是经常发生的.鉴于以上原因我们有必要开发一种帮作电费管理人员的软件系统,可以完成检查用户用电情况,每月抄度,信息录入以及基本数据维护的各项功能.本系统采用visual basic 6.0与微软Access数据库方式.界面尽量做到人性化,数据维护方面做到可靠安全.关键字: 电费管理,visual basic, Access,数据库AbstractElectricity from the traditional management staff are artisanal Chabiao, meter reading completed, which should be completed by the users of electricity per month penalty for users to buy electricity enquiries, and a list of user information channels list such information. Its work-intensive, cumbersome workflow, because staff are not careful. would result in the tariff revenue is recurring mistakes. Given the above reasons we need to develop a management software to help make electricity system, the user can complete the inspection of electricity monthly copied degrees, Information includes basic data and the maintenance function. with the system usingvisual basic Microsoft Access 6.0 database. as far as possible humanization interface, data maintenance to reliable security.keyword : tariff management, visual basic, Access, the database第一章引言1.1课题背景传统的电费管理都是由工作人员手工查表,抄表完成的,其中要完成用户电费的收取,每月抄度,用户购电情况查询,以及列出欠费用户的信息名单,之类的信息.其工作强度大,工作流程繁琐,由于工作人员的不细心,将会造成电费收支的出错也是经常发生的.鉴于以上原因我们有必要开发一种帮作电费管理人员的软件系统,可以完成检查用户用电情况,每月抄度,信息录入以及基本数据维护的各项功能.本系统采用visual basic 6.0与微软Access数据库方式.界面尽量做到人性化,数据维护方面做到可靠安全.1.2系统简介本系统主要由以下几大功能模块组成:一. 用户交费:(交纳电费,本日小节)二.本月抄度:(单户抄度多户抄度)三.资料导出(全部清单,欠费清单)四.数据查询(电费查询与统计,用户欠费查询)五.信息录入(资料录入,资料修改, 资料删除)六.系统数据维护(数据备份,数据恢复)七.基本数据维护(用户类型维护, 操作员维护)八.帮助九.退出第二章系统的分析2.1系统开发的目标和思想本系统主要服务于电费管理人员的日常工作.设计思路主要参照工作人员抄表,记录资料,资料管理,信息录入等方面的工作流程展开的.2.2系统的可行性分析本系统采用visual basic6.0与微软的access作为数据库结合.在系统编写上具有可行性.经济方面:本系统可以服务电厂,电费管理单位,为企业节省人力开支.社会方面:服务于大众,方便抄表人员工作,可靠方便.第三章系统的设计3.1系统的功能结构设计3.2系统的数据库设计1.用户登陆界面设计:3.4界面设计与代码设计用户登陆界面代码分析:Private Sub Command1_Click()Dim rstpchard As New ADODB.RecordsetDim reHard As StringDim getid As StringreHard = GetpcHard(getid)rstpchard.Open "select * from getpchard ", gCnn, adOpenKeyset, adLockBatchOptimisticIf rstpchard.RecordCount = 0 Thenrstpchard.AddNewrstpchard.Fields(0) = reHardrstpchard.UpdateBatch adAffectCurrentElseIf Trim(reHard) <> Trim(rstpchard.Fields(0)) ThenMsgBox " 对不起,使用不合法请与开发者联系!", vbInformation EndEnd IfEnd IfIf Check1.Value = 1 ThenSet rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3rec("标记") = "1"If Combo2.Text <> "" Thenrec("姓名") = Combo2.TextElserec("姓名") = ""End IfIf Combo1.Text <> "" Thenrec("权限") = Combo1.TextElserec("权限") = ""End IfIf Text2.Text <> "" Thenrec("密码") = Text2.TextElserec("密码") = ""End Ifrec.Updaterec.CloseElseSet rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3rec("标记") = "0"rec.Updaterec.CloseEnd IfDim rec1 As ADODB.RecordsetSet rec1 = New ADODB.Recordsetrec1.Open "select * from 登录人员", gCnn, 3, 3Set rec = New ADODB.Recordsetrec.Open "select * from 密码表where 姓名='" & Combo2.Text & "'and 操作权限='" & Combo1.Text & "'and 密码='" & Text2.Text & "'", gCnn, 3, 3If rec.EOF = False ThenIf rec("操作权限") <> "管理员" Then' FRMMAIN.XZCK.Enabled = FalseMDIme.mczy.Enabled = FalseMDIme.xtwh.Enabled = FalseMDIme.del.Enabled = False' FRMMAIN.DJGL.Enabled = False' FRMMAIN.delte.Enabled = FalseElse' Me.XZCK.Enabled = TrueMDIme.mczy.Enabled = TrueMDIme.xtwh.Enabled = TrueCreateNewKey HKEY_CURRENT_USER, "ZhiYuanTechnologe"SetKeyValue HKEY_CURRENT_USER, "ZhiYuanTechnologe", "UserName", dlj, REG_SZSetKeyValue HKEY_CURRENT_USER, "ZhiYuanTechnologe", "PassWord", dlj, REG_SZ' FRMMAIN.DJGL.Enabled = True' FRMMAIN.delte.Enabled = TrueEnd Ifrec1("姓名") = Combo2.Textrec1.Updaterec1.CloseMe.HideGuser = Combo2.TextMDIme.ShowElseMsgBox "权限或密码不正确,请重试!", vbInformation End Ifrec.CloseEnd SubPrivate Sub Command11_Click()End SubPrivate Sub Command2_Click()Combo2.Text = ""Text2.Text = ""Combo1.Text = ""End SubPrivate Sub Command3_Click()EndEnd SubPrivate Sub Command4_Click()Me.HideFRMMMXG.Show 1End SubPrivate Sub Form_Activate()Text2.Text = ""Combo1.Text = ""Combo2.Text = ""Set rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3If rec("标记") = "0" Or rec("标记") = "1" ThenCheck1.Value = rec("标记")End Ifrec.CloseSet rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3If rec("标记") = 1 ThenCombo2.Text = rec("姓名")Combo1.Text = rec("权限")Text2.Text = rec("密码")End Ifrec.CloseCommand1.SetFocusEnd SubPrivate Sub Form_Load()gCnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"gCnn.CursorLocation = adUseClientgCnn.OpenSet rec = New ADODB.Recordsetrec.Open "select distinct 姓名from 密码表", gCnn, 3, 3With Combo2Do Until rec.EOF.AddItem rec("姓名")rec.MoveNextLoopEnd Withrec.CloseSet rec = NothingEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) Cancel = TrueSelect Case MsgBox("此操作将退出本系统,继续吗?", vbYesNo, "警告") Case vbYesCancel = FalseEndCase ElseCancel = TrueEnd SelectEnd Sub2.主界面设计:主界面代码设计:Private Sub alllm_Click()frmList.qfFlg = FalsefrmList.ShowEnd SubPrivate Sub backup_Click()frmbeifen.ShowEnd SubPrivate Sub benrixiaojie_Click()frmCount.ShowEnd SubPrivate Sub Command1_Click()frameFee.Visible = FalseEnd SubPrivate Sub cmdQuery_Click()Dim rst As New ADODB.Recordsetrst.Open " select * from panelinfo where holder='" & Me.txtUser & "' and delflag<>true ", gCnn, adOpenStatic, adLockBatchOptimisticIf rst.RecordCount <> 0 Thendcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "###0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###0.00")txtUserName(6) = Format(rst.Fields!lsFee, "###0.00")'txtUserName(5) = txtUserName(1) * rst.Fields!lMoney *(rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 -rst.Fields!lightScale / 100)txtUserName(5) = Format(txtUserName(1) * rst.Fields!lMoney * (rst.Fields!lightScale / 100) + rst.Fields!nowecount * rst.Fields!bmoney * (1 - rst.Fields!lightScale / 100), "###0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) + Val(txtUserName(6)), "####0.00")dcNum.Text = rst.Fields(1)ElseMsgBox " 没有查询到数据! ", vbInformationEnd Ifrst.CloseSet rst = NothingEnd SubPrivate Sub dcNum_Click(Area As Integer)Dim rst As New ADODB.Recordsetrst.Open " select * from panelinfo where holderid='" & dcNum.Text & "'and delflag<>true ", gCnn, adOpenKeyset, adLockBatchOptimisticIf Not rst.EOF Thendcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "###0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###0.00")txtUserName(6) = Format(rst.Fields(8), "####0.00")txtUserName(5) = Format(txtUserName(1) * txtUserName(3) *(rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 -rst.Fields!lightScale / 100), "####0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) + Val(txtUserName(6)), "####0.00")End Ifrst.CloseEnd SubPrivate Sub dcvalue_Click(Area As Integer)Dim rst As New ADODB.Recordsetrst.Open " select * from panelinfo where holderid='" & dcvalue.BoundText & "' and delflag<>true ", gCnn, adOpenStatic, adLockBatchOptimistic If Not rst.EOF Thendcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "###0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###0.00")txtUserName(6) = Format(rst.Fields!lsFee, "###0.00")'txtUserName(5) = txtUserName(1) * rst.Fields!lMoney *(rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 -rst.Fields!lightScale / 100)txtUserName(5) = Format(txtUserName(1) * rst.Fields!lMoney *(rst.Fields!lightScale / 100) + rst.Fields!nowecount * rst.Fields!bmoney * (1 -rst.Fields!lightScale / 100), "###0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) + Val(txtUserName(6)), "####0.00")dcNum.Text = rst.Fields(1)End Ifrst.CloseSet rst = NothingEnd SubPrivate Sub dcvalue_KeyPress(KeyAscii As Integer)KeyAscii = 0End SubPrivate Sub del_Click()frmdel.ShowEnd SubPrivate Sub dhcb_Click()usrcopyP.ShowEnd SubPrivate Sub dhcp_Click()frmCopyP.ShowEnd SubPrivate Sub duohu_Click()frmCuifei.muser1 = 2frmCuifei.ShowEnd SubPrivate Sub edit_Click()frmEdit.ShowEnd SubPrivate Sub exit_Click()EndEnd SubPrivate Sub insert_Click()frmInsert.Show 1End SubPrivate Sub jiaonadianfei_Click()frmFee.ShowEnd SubPrivate Sub M_USERYTPE_Click()FRMUSERTYPE.Show 1End SubPrivate Sub MDIForm_Load()loadAddEnd SubPublic Sub loadAdd()If rst.State = 1 Thenrst.CloseEnd Ifrst.Open " select * from panelinfo where delflag<>true ", gCnn, adOpenKeyset, adLockBatchOptimisticIf rst.RecordCount <> 0 ThenSet dcvalue.RowSource = rstdcvalue.BoundColumn = "holderID"dcvalue.ListField = "holder"Set dcNum.DataSource = rstSet dcNum.RowSource = rstdcNum.ListField = "holderid"If Not rst.EOF ThendcNum.Text = rst.Fields!holderiddcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "##0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###.0.00")txtUserName(6) = rst.Fields!lsFeetxtUserName(5) = Val(txtUserName(1)) * Val(txtUserName(3)) *(Val(rst.Fields!lightScale) / 100) + Val(txtUserName(1)) * Val(txtUserName(4)) * (1 - rst.Fields!lightScale / 100)txtUserName(8) = rst.Fields(9)txtUserName(7) = Val(txtUserName(5)) + Val(txtUserName(6))rst.Fields!cFeeMoney = txtUserName(7)rst.UpdateBatch adAffectCurrentEnd IfEnd IfEnd SubPublic Sub loadData(Hid As String)Dim rst As New ADODB.RecordsetDim cnn As New ADODB.ConnectionDim Atimes As IntegerDim sqlAdd As Stringcnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"cnn.CursorLocation = adUseClientcnn.OpenIf Trim(Hid) <> "" Thenrst.Open " select * from panelinfo where holderid='" & Hid & "' and delflag<>true ", cnn, adOpenStatic, adLockBatchOptimisticElserst.Open " select * from panelinfo where delflag<>true ", cnn, adOpenStatic, adLockBatchOptimisticEnd IfIf Not rst.EOF ThendcNum.Text = rst.Fields!holderiddcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "####0.00")txtUserName(4) = Format(rst.Fields!bmoney, "####0.00")txtUserName(6) = Format(rst.Fields!lsFee, "####0.00")'txtUserName(5) = Format(txtUserName(1) * txtUserName(3) *(rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 -rst.Fields!lightScale / 100), "####0.00")If rst.Fields!Atimes = 0 ThenAtimes = 1ElseAtimes = rst.Fields!AtimesEnd IftxtUserName(5) = Format(Val(txtUserName(1)) * txtUserName(3) * Atimes, "####0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) + Val(txtUserName(6)), "####0.00")rst.Fields!cFeeMoney = txtUserName(7)rst.UpdateBatch adAffectCurrentEnd Ifrst.Closecnn.CloseEnd SubPrivate Sub MDIForm_Unload(Cancel As Integer)gCnn.CloseSet gcon = NothingEnd SubPrivate Sub mgcf_Click()frmFeefind.ShowEnd SubPrivate Sub mhf_Click()frmdaoru.ShowEnd SubPrivate Sub msf_Click()frmFind1.ShowEnd SubPrivate Sub qianfeilm_Click()frmList.qfFlg = TruefrmList.ShowEnd SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Trim(Button.Key)Case "a"frmFee.Show 1Case "b"frmCopyP.ShowCase "c"frmFee.Show 1Case "d"frmbeifen.Show 1Case "e"frmdaoru.Show 1Case "f"frmFeefind.Show 1Case "g"frmFind1.Show 1Case "dhcb1"Case "dbcb2"Case "j"X = MsgBox("真的要退出吗?", vbYesNo + vbQuestion, "警告") If X = vbYes ThenEndElseEnd IfEnd SelectEnd SubPrivate Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)Select Case ButtonMenu.KeyCase "dhcb1"frmCopyP.ShowCase "dhcb2"usrcopyP.ShowEnd SelectEnd SubPrivate Sub weihu_Click()FRMYHSD.ShowEnd SubPrivate Sub yihu_Click()frmCuifei.muser1 = 1frmCuifei.ShowEnd Sub4.备份界面设计:备份代码设计:Private Sub Command1_Click()Dim a As Stringa = App.Patha = a & "\"b = Text1.Text'On Error GoTo errhandle:Dim filename As Stringfilename = "" & Text1.Text & "dbdb.mdb"If a = Text1.Text ThenMsgBox "备份目录与原文件目录相同,请重新选择!"Exit SubEnd IfIf Dir("" & b & "dbdb.mdb") <> "" ThenDim llp As Stringllp = MsgBox("此目录下已有该文件,要覆盖吗?", vbYesNo, "备份文件") If llp = vbYes ThenKill ("" & b & "dbdb.mdb")FileCopy "" & a & "\data\dbdb.mdb", "" & b & "dbdb.mdb"Dim ll = MsgBox(" 备份成功! ", vbOKOnly, "提示")ElseExit SubEnd IfElseFileCopy "" & a & "\data\dbdb.mdb", "" & b & "dbdb.mdb"Dim llll = MsgBox(" 备份成功! ", vbOKOnly, "提示")End IfExit Sub'errhandle:'MsgBox "出现错误,不能复制", vbOKOnly + vbCritical, "复制文件"'Resume NextEnd SubPrivate Sub Command2_Click()'dy'Me.HideUnload MeEnd SubPrivate Sub Dir1_Change()'Drive1.Drive = Dir1If Right(Dir1.Path, 1) <> "\" ThenText1.Text = Dir1.Path + "\"ElseText1.Text = Dir1.PathEnd IfCommand1.Enabled = TrueEnd SubPrivate Sub Dir1_Click()If Right(Dir1.Path, 1) <> "\" ThenText1.Text = Dir1.Path + "\"ElseText1.Text = Dir1.PathEnd IfCommand1.Enabled = TrueEnd SubPrivate Sub Drive1_Change()Dir1.Path = Drive1.DriveEnd SubPrivate Sub Form_Activate()Command1.Enabled = FalsegCnn.CloseChDrive App.PathChDir App.Path'Text1.SetFocus'Text1.Text = "c:\"Text1.Text = CurDir()Text1.Enabled = FalseEnd SubPrivate Sub Form_Load()ChDrive App.PathChDir App.PathEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)dyEnd SubPrivate Sub Form_Unload(Cancel As Integer)If gCnn.State = 0 ThengCnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"gCnn.CursorLocation = adUseClientgCnn.OpenEnd IfMDIme.loadAddEnd Sub5.单户抄表界面设计:单户抄表代码设计:Private Sub Command2_Click()Dim cnn As New ADODB.ConnectionDim rstE As New ADODB.RecordsetDim cmdExe As New ADODBmandDim nowEv As DoubleDim sqlAdd As StringIf Trim(txtUserName(0).Text) = "" ThenMsgBox " 没有要抄表用户,请先添加用户!", vbInformationExit SubEnd IfIf Trim(txtUserName(9).Text) = "" ThenMsgBox " 请先输入数据!", vbInformationExit SubEnd IfIf Trim(txtUserName(9).Text) < Trim(txtUserName(2).Text) ThenMsgBox " 输入数据错误,当前止码太小!", vbInformationExit SubEnd Ifcnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;JetOLEDB:database password= " & DbPassword & " ;Data Source= " & _ App.Path & "\data\dbdb.mdb;Persist Security Info=False"cnn.CursorLocation = adUseClientcnn.OpencmdExe.ActiveConnection = cnnrstE.Open "select nowecount from panelinfo where holderID= '" &Trim(txtUserName(0)) & "'", cnn, adOpenStatic, adLockBatchOptimistic nowEv = Val(rstE.Fields(0).Value) + (Val(txtUserName(9)) -Val(txtUserName(2)))sqlAdd = "update panelinfo set LEndPCode=" & Val(txtUserName(2).Text) & ",cEndCode=" & Val(txtUserName(9).Text) & ",nowEcount=" & nowEv & " ,writedate=#" & dtpwdate(1) & "# where holderID= '" & Trim(txtUserName(0)) & "'"cmdExemandText = sqlAddcmdExe.Execute sqlAdd' cnn.Execute sqlAddtxtUserName(2).Text = txtUserName(9)txtUserName(9) = ""cnn.CloseMsgBox " 数据保存完成!", vbInformationUnload MeEnd SubPrivate Sub Form_Load()Dim rst As New ADODB.RecordsetDim sqlEdit As Stringdtpwdate(1).Value = Format(Now, "yyyy-mm-dd")sqlEdit = "select * from panelinfo "sqlEdit = sqlEdit & " where holderid='" & Trim(MDIme.txtUserName(0)) & "'and delflag<>true"rst.Open sqlEdit, gCnn, adOpenStatic, adLockBatchOptimisticIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields!cendcodedtpwdate(0).Value = rst.Fields(4)End Ifbuttontime = FalseEnd SubPrivate Sub Form_Unload(Cancel As Integer)MDIme.loadData (txtUserName(0))Cancel = 0End SubPrivate Sub nextuser_Click()Dim rst As New ADODB.RecordsetDim sqlEdit As StringsqlEdit = "select * from panelinfo "sqlEdit = sqlEdit & " where holderid<>'" & Trim(txtUserName(0)) & "'and delflag<>true "rst.Open sqlEdit, gCnn, adOpenStatic, adLockBatchOptimisticIf buttontime = False ThenIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields!cendcodedtpwdate(0).Value = rst.Fields(4)buttontime = TrueEnd IfElserst.MoveNextIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields!cendcodedtpwdate(0).Value = rst.Fields(4)buttontime = TrueEnd IfEnd IfEnd SubPrivate Sub txtUserName_KeyPress(Index As Integer, KeyAscii As Integer)If Index = 9 ThenIf KeyAscii <> 8 And KeyAscii <> 46 And KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0End IfEnd Sub6.数据导入界面设计:数据导入代码设计:Private Sub Command1_Click()On Error GoTo errhandle:Dim a As Stringa = App.Patha = a & "\"b = Text1.TextDim filename As StringIf Dir("" & a & "计费系统数据库.mdb") <> "" ThenDim ll As Stringll = MsgBox("此目录下有此文件要覆盖吗", vbYesNo, "复制文件") If ll = vbYes ThenKill ("" & a & "计费系统数据库.mdb")FileCopy "" & Text1.Text & "", "" & a & "计费系统数据库.mdb" Dim ll = MsgBox("数据导入成功", vbOKOnly, "提示")ElseExit SubEnd IfElseFileCopy "" & Text1.Text & "", "" & a & "计费系统数据库.mdb" Dim llpllp = MsgBox("数据导入成功", vbOKOnly, "提示")End IfExit Suberrhandle:MsgBox "出现错误,不能复制", vbOKOnly + vbCritical, "复制文件" End SubPrivate Sub Command2_Click()dyUnload MeEnd SubPrivate Sub Dir1_Change()If Right(Dir1.Path, 1) <> "\" ThenText1.Text = Dir1.Path + "\"ElseText1.Text = Dir1.PathEnd IfFile1.Path = Dir1.PathEnd SubPrivate Sub Drive1_Change()If Drive1.Drive = "a:" ThenMsgBox "不能从A盘导入"Exit SubEnd IfDir1.Path = Drive1.DriveEnd SubPrivate Sub File1_Click()Text1.Text = Text1.Text + File1.filenameCommand1.Enabled = TrueEnd SubPrivate Sub Form_Activate()gCnn.CloseCommand1.Enabled = False'Text1.Text = "c:\"Text1.Text = CurDir()Text1.Enabled = FalseEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)dyUnload MeEnd SubPrivate Sub Form_Unload(Cancel As Integer)If gCnn.State = 0 ThengCnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"gCnn.CursorLocation = adUseClientgCnn.OpenEnd IfMDIme.loadAddEnd Sub7.数据删除界面设计:数据删除代码设计:Private Sub cmdAsure_Click()If MsgBox(" 你确定要删除该数据吗? ", vbInformation + vbYesNo) <> vbYes ThenExit SubEnd IfIf Trim(MDIme.dcvalue.BoundText) <> "" ThenDim cnn As New ADODB.ConnectionDim sqlAdd As Stringcnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"cnn.CursorLocation = adUseClientcnn.OpensqlAdd = "update panelinfo set delflag=true"sqlAdd = sqlAdd & " where holderid='" &Trim(MDIme.dcvalue.BoundText) & "'"cnn.Execute sqlAddcnn.CloseMsgBox " 数据删除完成!", vbInformationEnd IfEnd SubPrivate Sub Command1_Click()For i = 0 To 10If i <> 9 ThenMDIme.txtUserName(i) = ""End IfNextMDIme.dcNum = ""MDIme.dcvalue = ""Unload MeEnd SubPrivate Sub Form_Load()Dim rst As New ADODB.RecordsetDim sqlEdit As StringsqlEdit = "select * from panelinfo "sqlEdit = sqlEdit & " where holderid='" & Trim(MDIme.txtUserName(0)) & "' and delflag<>true "rst.Open sqlEdit, gCnn, adOpenKeyset, adLockBatchOptimisticIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields(3)dtpWdate.Value = rst.Fields(4)txtUserName(3) = rst.Fields(5)txtUserName(4) = Format(rst.Fields(6), "####0.00")txtUserName(5) = Format(rst.Fields(7), "####0.00")txtUserName(6) = rst.Fields(8)txtUserName(7) = rst.Fields(9)txtUserName(8) = rst.Fields(10)txtUserName(9) = rst.Fields!cendcodechangeE = rst.Fields!cendcodecEcount = rst.Fields!nowecountIf rst.Fields(14) <> Null ThenDTPicker1.Value = rst.Fields(14)End IftxtUserName(10) = rst.Fields!cFeeMoneyEnd Ifrst.CloseEnd SubPrivate Sub Form_Unload(Cancel As Integer)MDIme.loadAdd8.数据修改界面设计:数据修改代码设计:Dim changeE As DoubleDim cEcount As DoublePrivate Sub cmdAsure_Click()If Trim(MDIme.dcvalue.BoundText) <> "" ThenDim cnn As New ADODB.ConnectionDim sqlAdd As Stringcnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"cnn.CursorLocation = adUseClientcnn.OpensqlAdd = "update panelinfo set holderid='" & txtUserName(0) & "',holder='" & txtUserName(1) & "',LEndPCode='" & txtUserName(2) &"',CopyDate=# " & dtpWdate.Value & "# ,lightscale=" & txtUserName(3) & ",lsfee=" & txtUserName(4) & ",lmoney=" & txtUserName(5) & ",bmoney=" & txtUserName(6) & ",cname='" & txtUserName(7) & "',memotext='" & txtUserName(8) & "',cEndCode=" & txtUserName(9) & ",cFeeMoney=" &Val(txtUserName(10)) & " ,nowecount=" & changeE & ",atimes=" & Me.Text1 & ""sqlAdd = sqlAdd & " where holderid='" &Trim(MDIme.dcvalue.BoundText) & "'"cnn.Execute sqlAddsqlAdd = "update 用户类型set UNITPRICE=" & Me.txtUserName(5) & " where ATypeID=" & dcob用途.BoundTextcnn.CloseMsgBox " 数据修改完成!", vbInformationEnd IfEnd SubPrivate Sub Command1_Click()Unload MeEnd SubPrivate Sub dcob用途_Click(Area As Integer)Dim rst As New ADODB.RecordsetIf dcob用途.BoundText <> "" Thenrst.Open "select * from 用户类型where ATypeID=" & dcob用途.BoundText & "", gCnn, adOpenStatic, adLockBatchOptimisticMe.txtUserName(5) = Format(rst.Fields(2), "###0.00")rst.CloseElseMsgBox " 请先添加用户电表类型信息! ", vbInformationExit SubEnd If。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
智能表费控实现方案
一、引言
2009年开始,国家电网公司开始进行智能电能表的推广应用和集中招标,智能电表的费控技术也得以进行深入发展。
目前市场上的费控方式主要有本地费控和远程费控两种。
2013年,国家电网公司颁布了一些列智能用电的新标准,对之前的相关标准进行了更进一步修订,在电价处理和密钥管理上做了更完善的规定。
二、本地费控
本地费控即是卡表预付费,主要依靠电卡作为数据传输媒介,也可以通过无线传输模式进行售电数据的下发。
本地费控的特点是一表一卡、插卡用电、电表扣费、电表控制;如果采用远程下发模式售电,其特点是购电数据通过GPRS等信号下发至电表,此时要求电表具备电力线载波、RS-485、微功率无线或者GPRS等通讯功能。
2.1、实现原理
根据售电数据的传输方式来区分,本地费控可以分为电卡传输和远程下发两种实现方案。
2.1.1、电卡传输
用户可以在电力公司营业网点柜台进行持卡购电,亦可以在自助缴费终端进行自助缴费,自助缴费终端类似于银行ATM机,7×24小时无人值守,弥补营业柜台的营业时限问题。
柜台售电
电卡作为数据传输的媒介,在售电终端(柜台PC机或自助终端)上对用户购电卡进行写卡,然后对插卡用电,由此实现售电系统到电表的数据传输。
电表获取购电数据后,会进行数据更新,更新内容包括购电次数、剩余金额、
累计购电金额等。
2.1.2、远程下发
远程下发模式售电无需使用购电卡,售电数据由售电终端交给服务器后台,以
无线传输的方式下发至电表,电表接收到数据后进行费控数据的更新。
此过程需要进行身份认证,保证数据传输的安全性和准确性。
柜台售电
柜台售电
服务器
GPRS
集中器
RS-485/载波/
无线
柜台售电
2.2、日常应用
日常应用过程中需要注意以下几方面:
开户前,保证档案中表号与电表中表号一致即可;开户后,表号、户号、购电次数都要保证一致。
电表初始化操作、修改表号需在公钥下进行。
电价等其他参数可在私钥下进行更新。
但是有限制:开户时,可更新两套电价和其他参数;开户后,只能更新备用套电价。
2.3、新标准应用
2013年国网公司颁布的智能用电新标准对阶梯电价和密钥管理做了更严格的规定。
增加了年阶梯支持,并允许年、月阶梯自由切换。
当前套费率、阶梯参数改为只能通过卡片方式设置,不能通过远程方式设置。
表计密钥的切换不再使用密钥卡,而公钥与私钥的切换采用远程更新
的方式实现。
远程控制功能,在“合闸允许”命令的基础上增加了“直接合闸”命令。
三、远程费控
远程费控即是后台费控,也称后台预付费,是由后台进行电费结算,实现远程控制。
远程费控的特点是后台收费、无卡售电、后台算费、后台控制等。
要求电表具备电力线载波、RS-485或者GPRS等通讯功能。
3.1、实现原理
远程费控的实现依赖于用电信息采集。
远程费控功能首要步骤是采集现场表计的表底数据,根据表底数据,计算用户的用电量和用电费。
然后对比用户的缴费金
额,计算费控结果并实施响应控制。
3.1.1、用户购电
用户在营业厅柜台或自助缴费终端进行购电缴费。
缴费数据保存在后台数据
库。
3.1.2、数据采集
用电信息采集部分负责电能计量数据的采集。
3.1.3、算费扣费
依据用采集的电量数据,费控系统进行用户电费结算,同时进行扣费,并根据扣费结果生成费控结果,费控结果包括:催费告警、远程跳闸和远程合闸。
(1)对于非居民用户,算费采用普通电价,流程如图:
(2)对于居民用户,算费采用阶梯电价,流程如图:
3.1.4、费控操作
费控操作由用电信息采集部分完成。
用电信息采集部分根据费控管理后台计算的费控结果,对用户进行短信催费或者进行远程合闸、远程跳闸等操作。
3.2、日常应用
日常应用中需要注意以下几个方面:
主站档案资料的表号要和现场表计保持一致;
主站档案资料中表计的远程控制密码要和现场表计保持一致,如存在一表一密的情况。
四、经典案例
费控应用在全国范围内各地应用发展情况各有特色,以下选取几处经典案例进行讲解。
4.1、河北省冀北局卡表预付费方案
河北省冀北局采用的是朗新的预付费系统兼容各个厂家的自管户卡表,各个电能表厂家按照相同的规范开发预付费读写卡套件,提供给郎新方面,由郎新科技公司开发售电软件,兼容各个厂家的读写卡套件,进而达到兼容各个厂家电能表售电的目的。
柜台售电
柜台售电
服务器
厂家
厂家
厂家
读写卡套件
读写卡套件
读写卡套件
4.2、北京市卡表预付费项目方案
北京市卡表预付费方案采用的是远程下发模式,由主站将购电数据远程下发至电表,同时采用掌机售电作为辅助,保证售电的成功率和可靠性。
其原理图如下:
柜台售电
柜台售电
服务器
GPRS
微功率无线
掌机
集
中
器
柜台售电
购电数据首先由主站下发至集中器,由集中器通过微功率无线信号透明转发至电能表。
对于微功率无线信号通讯不畅的偶尔情况,采用掌机通过红外信号将购电
数据下发至电表。
4.3、河南省县局卡表预付费方案
河南省电力公司营销部制订了统一的卡表预付费系统与营销系统对接的接口规范。
各个县局的卡表预付费系统按照预订协议将售电记录实时同步给营销系统。
同时营销系统负责电费结算和阶梯电价管理。
计算电量
抄表数据
累计用电量
第三档用电量
第二档用电量
第一档用电量
累计用电费
第三档用电费
第二档用电费
第一档用电费
购电明细
录入
导入
用户欠费明细
实时查询获取
欠费金额
购
电
金
额
写卡金额
营销系统
费控系统
相减。