📄 table_dm.pas
字号:
unit Table_DM;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, DBTables;
type
TDM_Table = class(TDataModule)
Tb_Elect: TTable;
Ds_Elect: TDataSource;
Ds_House: TDataSource;
Ds_Station: TDataSource;
Tb_Station: TTable;
Tb_StationF_STATION_NO: TStringField;
Tb_StationF_STATION_NAME: TStringField;
Tb_StationF_TELEPHONE: TStringField;
Tb_Town: TTable;
Ds_Town: TDataSource;
Tb_Village: TTable;
Ds_Village: TDataSource;
Tb_VillageF_VILLAGE_NO: TStringField;
Tb_VillageF_TOWN_NO: TStringField;
Tb_VillageF_VILLAGE_NAME: TStringField;
Tb_TownF_TOWN_NO: TStringField;
Tb_TownF_TOWN_NAME: TStringField;
Ds_Ammeter: TDataSource;
Tb_Ammeter_Detail: TTable;
Ds_Ammeter_Detail: TDataSource;
V_Ammeter_Data: TTable;
Ds_Ammeter_Data: TDataSource;
Tb_Msg: TTable;
Ds_Msg: TDataSource;
Tb_MsgF_DATE: TDateTimeField;
Tb_MsgF_SENDER: TStringField;
Tb_MsgF_CONTENT: TStringField;
Ds_VHouse: TDataSource;
Ds_Line: TDataSource;
Ds_Transfer: TDataSource;
Tb_Transfer: TTable;
Tb_Help: TTable;
Ds_Help: TDataSource;
Tb_HelpF_CLASS: TStringField;
Tb_HelpF_TOPIC: TStringField;
Tb_HelpF_TEXT: TBlobField;
Tb_TransferF_TRANSFER_NO: TStringField;
Tb_TransferF_LINE_NO: TStringField;
Tb_TransferF_TRANSFER_NAME: TStringField;
Tb_Line: TTable;
Tb_LineF_LINE_NO: TStringField;
Tb_LineF_STATION_NO: TStringField;
Tb_LineF_LINE_NAME: TStringField;
Tb_House: TTable;
Tb_HouseF_HOUSE_NO: TStringField;
Tb_HouseF_TRANSFER_NO: TStringField;
Tb_HouseF_VILLAGE_NO: TStringField;
Tb_HouseF_HOUSE_NAME: TStringField;
Tb_HouseF_POSITION: TStringField;
Tb_HouseF_TELEPHONE: TStringField;
Tb_HouseF_ELECT_NO: TStringField;
Tb_HouseF_VOLTAGE_NO: TStringField;
Tb_HouseF_MASTER_AMMETER_NO: TStringField;
Tb_HouseF_BOX_NO: TStringField;
Tb_HouseF_DATE: TDateTimeField;
Tb_HouseF_ADJUST_COUNT: TFloatField;
Tb_HouseF_SUM_COUNT: TFloatField;
Tb_HouseF_PRICE: TFloatField;
Tb_HouseF_AMOUNT: TFloatField;
Tb_HouseF_USED_AMOUNT: TFloatField;
Tb_Ammeter: TTable;
Tb_AmmeterF_AMMETER_NO: TStringField;
Tb_AmmeterF_HOUSE_NO: TStringField;
Tb_AmmeterF_AMMETER_DATE: TDateTimeField;
Tb_AmmeterF_AMMETER_COUNT: TFloatField;
Tb_AmmeterF_AMMETER_LAST_COUNT: TFloatField;
Tb_AmmeterF_THIS_COUNT: TFloatField;
Tb_AmmeterF_AMMETER_MODEL: TStringField;
Tb_AmmeterF_AMMETER_RIGHT: TStringField;
V_House_Ammeter: TTable;
Ds_House_Ammeter: TDataSource;
V_House_AmmeterF_HOUSE_NO: TStringField;
V_House_AmmeterF_TRANSFER_NO: TStringField;
V_House_AmmeterF_HOUSE_NAME: TStringField;
V_House_AmmeterF_BOX_NO: TStringField;
V_House_AmmeterF_AMMETER_NO: TStringField;
V_House_AmmeterF_AMMETER_COUNT: TFloatField;
V_House: TTable;
V_HouseF_HOUSE_NO: TStringField;
V_HouseF_HOUSE_NAME: TStringField;
V_HouseF_ADJUST_COUNT: TFloatField;
V_HouseF_COUNT: TFloatField;
V_HouseF_PRICE: TFloatField;
V_HouseF_AMOUNT: TFloatField;
V_HouseF_USED_AMOUNT: TFloatField;
Tb_Voltage: TTable;
Ds_Voltage: TDataSource;
Tb_VoltageF_VOLTAGE_NO: TStringField;
Tb_VoltageF_VOLTAGE_NAME: TStringField;
Tb_HouseF_Voltage_Name: TStringField;
Tb_AmmeterF_CT_NO: TStringField;
Tb_AmmeterF_CT_MODEL: TStringField;
Tb_AmmeterF_CT_RIGHT: TStringField;
Tb_Ammeter_Model: TTable;
Ds_Ammeter_Model: TDataSource;
Ds_Ct_Model: TDataSource;
Tb_Ct_Model: TTable;
Tb_Ammeter_ModelF_AMMETER_MODEL: TStringField;
Tb_Ammeter_ModelF_AMMETER_POSTURE: TStringField;
Tb_Ammeter_ModelF_AMMETER_AMPERE: TStringField;
Tb_Ammeter_ModelF_AMMETER_FACTORY: TStringField;
Tb_Ct_ModelF_CT_MODEL: TStringField;
Tb_Ct_ModelF_CT_FACTORY: TStringField;
Tb_AmmeterF_Ct_ModelName: TStringField;
V_HouseF_TRANSFER_NO: TStringField;
Tb_ElectF_ELECT_NO: TStringField;
Tb_ElectF_TRADE_NO: TStringField;
Tb_ElectF_ELECT_NAME: TStringField;
Tb_ElectF_COUNTRY_PRICE: TFloatField;
Tb_ElectF_SERVICE_PRICE: TFloatField;
Tb_ElectF_PRICE: TFloatField;
Tb_HouseF_VOLUME_NO: TStringField;
Tb_HouseF_Trade_No: TStringField;
V_Transfer: TTable;
V_Village: TTable;
Ds_Volume: TDataSource;
Tb_Volume: TTable;
Tb_Ammeter_ModelF_AMMETER_TURN: TFloatField;
V_Ammeter_DataF_AMMETER_NO2: TStringField;
V_Ammeter_DataF_THIS_COUNT2: TFloatField;
V_Ammeter_DataF_HOUSE_NAME2: TStringField;
V_Ammeter_DataF_HOUSE_NO2: TStringField;
V_Ammeter_DataF_AMMETER_LAST_COUNT2: TFloatField;
V_Ammeter_DataF_ADJUST_COUNT2: TFloatField;
V_Ammeter_DataF_BOX_NO: TStringField;
Tb_HouseF_ELECT_NO1: TStringField;
Tb_HouseF_ELECT_NO2: TStringField;
Tb_HouseF_RATE1: TFloatField;
Tb_HouseF_PRICE1: TFloatField;
Tb_HouseF_COUNT1: TFloatField;
Tb_HouseF_AMOUNT1: TFloatField;
Tb_HouseF_RATE2: TFloatField;
Tb_HouseF_PRICE2: TFloatField;
Tb_HouseF_COUNT2: TFloatField;
Tb_HouseF_AMOUNT2: TFloatField;
V_House_AmmeterF_ELECT_NO: TStringField;
V_House_AmmeterF_RATE1: TFloatField;
V_House_AmmeterF_ELECT_NO1: TStringField;
V_House_AmmeterF_RATE2: TFloatField;
V_House_AmmeterF_ELECT_NO2: TStringField;
V_HouseF_COUNT1: TFloatField;
V_HouseF_PRICE1: TFloatField;
V_HouseF_AMOUNT1: TFloatField;
V_HouseF_COUNT2: TFloatField;
V_HouseF_PRICE2: TFloatField;
V_HouseF_AMOUNT2: TFloatField;
Tb_Fee: TTable;
Ds_Fee: TDataSource;
Tb_FeeF_HOUSE_NO: TStringField;
Tb_FeeF_HOUSE_NAME: TStringField;
Tb_FeeF_COUNTRYAMOUNT1: TFloatField;
Tb_FeeF_SERVICEAMOUNT1: TFloatField;
Tb_FeeF_AMOUNT1: TFloatField;
Tb_FeeF_COUNTRYAMOUNT2: TFloatField;
Tb_FeeF_SERVICEAMOUNT2: TFloatField;
Tb_FeeF_AMOUNT2: TFloatField;
Tb_FeeF_COUNTRYAMOUNT3: TFloatField;
Tb_FeeF_SERVICEAMOUNT3: TFloatField;
Tb_FeeF_AMOUNT3: TFloatField;
Tb_FeeF_COUNTRYAMOUNT4: TFloatField;
Tb_FeeF_SERVICEAMOUNT4: TFloatField;
Tb_FeeF_AMOUNT4: TFloatField;
Tb_FeeF_COUNTRYAMOUNT5: TFloatField;
Tb_FeeF_SERVICEAMOUNT5: TFloatField;
Tb_FeeF_AMOUNT5: TFloatField;
Tb_FeeF_COUNTRYAMOUNT: TFloatField;
Tb_FeeF_SERVICEAMOUNT: TFloatField;
Tb_FeeF_AMOUNT: TFloatField;
Tb_FeeF_COUNT1: TFloatField;
Tb_FeeF_COUNT2: TFloatField;
Tb_FeeF_COUNT3: TFloatField;
Tb_FeeF_COUNT4: TFloatField;
Tb_FeeF_COUNT5: TFloatField;
Tb_FeeF_COUNT: TFloatField;
V_HouseF_VOLUME_NO: TStringField;
V_HouseF_VILLAGE_NO: TStringField;
V_HouseF_POSITION: TStringField;
V_HouseF_TELEPHONE: TStringField;
V_HouseF_VOLTAGE_NO: TStringField;
V_HouseF_MASTER_AMMETER_NO: TStringField;
V_HouseF_BOX_NO: TStringField;
V_HouseF_DATE: TDateTimeField;
V_HouseF_SUM_COUNT: TFloatField;
V_HouseF_RATE1: TFloatField;
V_HouseF_ELECT_NO1: TStringField;
V_HouseF_RATE2: TFloatField;
V_HouseF_ELECT_NO2: TStringField;
V_HouseF_ELECT_NO: TStringField;
v_Single_Fee: TTable;
v_Multi_Fee: TTable;
Ds_Single_Fee: TDataSource;
Ds_Multi_Fee: TDataSource;
Tb_FeeF_TRANSFER_NO: TStringField;
v_Single_FeeF_HOUSE_NO: TStringField;
v_Single_FeeF_HOUSE_NAME: TStringField;
v_Single_FeeF_COUNT1: TFloatField;
v_Single_FeeF_COUNTRYAMOUNT1: TFloatField;
v_Single_FeeF_SERVICEAMOUNT1: TFloatField;
v_Single_FeeF_AMOUNT1: TFloatField;
v_Single_FeeF_COUNT2: TFloatField;
v_Single_FeeF_COUNTRYAMOUNT2: TFloatField;
v_Single_FeeF_SERVICEAMOUNT2: TFloatField;
v_Single_FeeF_AMOUNT2: TFloatField;
v_Single_FeeF_COUNT3: TFloatField;
v_Single_FeeF_COUNTRYAMOUNT3: TFloatField;
v_Single_FeeF_SERVICEAMOUNT3: TFloatField;
v_Single_FeeF_AMOUNT3: TFloatField;
v_Single_FeeF_COUNT4: TFloatField;
v_Single_FeeF_COUNTRYAMOUNT4: TFloatField;
v_Single_FeeF_SERVICEAMOUNT4: TFloatField;
v_Single_FeeF_AMOUNT4: TFloatField;
v_Single_FeeF_COUNT5: TFloatField;
v_Single_FeeF_COUNTRYAMOUNT5: TFloatField;
v_Single_FeeF_SERVICEAMOUNT5: TFloatField;
v_Single_FeeF_AMOUNT5: TFloatField;
v_Single_FeeF_COUNT: TFloatField;
v_Single_FeeF_COUNTRYAMOUNT: TFloatField;
v_Single_FeeF_SERVICEAMOUNT: TFloatField;
v_Single_FeeF_AMOUNT: TFloatField;
v_Single_FeeF_TRANSFER_NO: TStringField;
v_Multi_FeeF_HOUSE_NO: TStringField;
v_Multi_FeeF_HOUSE_NAME: TStringField;
v_Multi_FeeF_COUNT1: TFloatField;
v_Multi_FeeF_COUNTRYAMOUNT1: TFloatField;
v_Multi_FeeF_SERVICEAMOUNT1: TFloatField;
v_Multi_FeeF_AMOUNT1: TFloatField;
v_Multi_FeeF_COUNT2: TFloatField;
v_Multi_FeeF_COUNTRYAMOUNT2: TFloatField;
v_Multi_FeeF_SERVICEAMOUNT2: TFloatField;
v_Multi_FeeF_AMOUNT2: TFloatField;
v_Multi_FeeF_COUNT3: TFloatField;
v_Multi_FeeF_COUNTRYAMOUNT3: TFloatField;
v_Multi_FeeF_SERVICEAMOUNT3: TFloatField;
v_Multi_FeeF_AMOUNT3: TFloatField;
v_Multi_FeeF_COUNT4: TFloatField;
v_Multi_FeeF_COUNTRYAMOUNT4: TFloatField;
v_Multi_FeeF_SERVICEAMOUNT4: TFloatField;
v_Multi_FeeF_AMOUNT4: TFloatField;
v_Multi_FeeF_COUNT5: TFloatField;
v_Multi_FeeF_COUNTRYAMOUNT5: TFloatField;
v_Multi_FeeF_SERVICEAMOUNT5: TFloatField;
v_Multi_FeeF_AMOUNT5: TFloatField;
v_Multi_FeeF_COUNT: TFloatField;
v_Multi_FeeF_COUNTRYAMOUNT: TFloatField;
v_Multi_FeeF_SERVICEAMOUNT: TFloatField;
v_Multi_FeeF_AMOUNT: TFloatField;
v_Multi_FeeF_TRANSFER_NO: TStringField;
V_HouseF_Trade_No: TStringField;
Ds_Transfer_Fee: TDataSource;
V_Transfer_Wasting: TTable;
Ds_Transfer_Wasting: TDataSource;
V_Transfer_WastingF_TRANSFER_NO: TStringField;
V_Transfer_WastingF_TRANSFER_NAME: TStringField;
V_Transfer_WastingF_COUNT: TFloatField;
V_Transfer_WastingF_COUNTRYAMOUNT: TFloatField;
V_Transfer_WastingF_SERVICEAMOUNT: TFloatField;
V_Transfer_WastingF_AMOUNT: TFloatField;
V_Transfer_WastingF_BUYCOUNT: TFloatField;
V_Transfer_WastingF_WASTCOUNT: TFloatField;
V_Transfer_WastingF_WASTRATE: TFloatField;
V_Transfer_WastingF_COUNTER: TIntegerField;
Tb_TransferF_BUYCOUNT: TFloatField;
Tb_Buy: TTable;
Ds_Buy: TDataSource;
Tb_BuyF_TRANSFER_NO: TStringField;
Tb_BuyF_LINE_NO: TStringField;
Tb_BuyF_TRANSFER_NAME: TStringField;
Tb_BuyF_BUYCOUNT: TFloatField;
V_Transfer_WastingF_LINE_NO: TStringField;
v_Transfer_Fee: TTable;
v_Transfer_FeeF_LINE_NO: TStringField;
v_Transfer_FeeF_TRANSFER_NO: TStringField;
v_Transfer_FeeF_TRANSFER_NAME: TStringField;
v_Transfer_FeeF_COUNTER: TIntegerField;
v_Transfer_FeeF_BUYCOUNT: TFloatField;
v_Transfer_FeeF_COUNT1: TFloatField;
v_Transfer_FeeF_COUNTRYAMOUNT1: TFloatField;
v_Transfer_FeeF_SERVICEAMOUNT1: TFloatField;
v_Transfer_FeeF_AMOUNT1: TFloatField;
v_Transfer_FeeF_COUNT2: TFloatField;
v_Transfer_FeeF_COUNTRYAMOUNT2: TFloatField;
v_Transfer_FeeF_SERVICEAMOUNT2: TFloatField;
v_Transfer_FeeF_AMOUNT2: TFloatField;
v_Transfer_FeeF_COUNT3: TFloatField;
v_Transfer_FeeF_COUNTRYAMOUNT3: TFloatField;
v_Transfer_FeeF_SERVICEAMOUNT3: TFloatField;
v_Transfer_FeeF_AMOUNT3: TFloatField;
v_Transfer_FeeF_COUNT4: TFloatField;
v_Transfer_FeeF_COUNTRYAMOUNT4: TFloatField;
v_Transfer_FeeF_SERVICEAMOUNT4: TFloatField;
v_Transfer_FeeF_AMOUNT4: TFloatField;
v_Transfer_FeeF_COUNT5: TFloatField;
v_Transfer_FeeF_COUNTRYAMOUNT5: TFloatField;
v_Transfer_FeeF_SERVICEAMOUNT5: TFloatField;
v_Transfer_FeeF_AMOUNT5: TFloatField;
v_Transfer_FeeF_COUNT: TFloatField;
v_Transfer_FeeF_COUNTRYAMOUNT: TFloatField;
v_Transfer_FeeF_SERVICEAMOUNT: TFloatField;
v_Transfer_FeeF_AMOUNT: TFloatField;
V_Line_Fee: TTable;
Ds_Line_Fee: TDataSource;
V_Line_FeeF_STATION_NO: TStringField;
V_Line_FeeF_LINE_NO: TStringField;
V_Line_FeeF_LINE_NAME: TStringField;
V_Line_FeeF_COUNTER: TIntegerField;
V_Line_FeeF_BUYCOUNT: TFloatField;
V_Line_FeeF_COUNT1: TFloatField;
V_Line_FeeF_COUNTRYAMOUNT1: TFloatField;
V_Line_FeeF_SERVICEAMOUNT1: TFloatField;
V_Line_FeeF_AMOUNT1: TFloatField;
V_Line_FeeF_COUNT2: TFloatField;
V_Line_FeeF_COUNTRYAMOUNT2: TFloatField;
V_Line_FeeF_SERVICEAMOUNT2: TFloatField;
V_Line_FeeF_AMOUNT2: TFloatField;
V_Line_FeeF_COUNT3: TFloatField;
V_Line_FeeF_COUNTRYAMOUNT3: TFloatField;
V_Line_FeeF_SERVICEAMOUNT3: TFloatField;
V_Line_FeeF_AMOUNT3: TFloatField;
V_Line_FeeF_COUNT4: TFloatField;
V_Line_FeeF_COUNTRYAMOUNT4: TFloatField;
V_Line_FeeF_SERVICEAMOUNT4: TFloatField;
V_Line_FeeF_AMOUNT4: TFloatField;
V_Line_FeeF_COUNT5: TFloatField;
V_Line_FeeF_COUNTRYAMOUNT5: TFloatField;
V_Line_FeeF_SERVICEAMOUNT5: TFloatField;
V_Line_FeeF_AMOUNT5: TFloatField;
V_Line_FeeF_COUNT: TFloatField;
V_Line_FeeF_COUNTRYAMOUNT: TFloatField;
V_Line_FeeF_SERVICEAMOUNT: TFloatField;
V_Line_FeeF_AMOUNT: TFloatField;
V_Ammeter_DataF_NOTE: TStringField;
Tb_HouseF_NOTE: TStringField;
V_HouseF_NOTE: TStringField;
Ds_Log: TDataSource;
V_Ammeter_DataF_TRANSFER_NO: TStringField;
V_HouseF_Voltage_Name: TStringField;
Tb_AmmeterF_AMMETER_ORDER: TIntegerField;
V_Ammeter_DataF_AMMETER_ORDER: TIntegerField;
V_HouseF_BASE_COUNT: TFloatField;
V_HouseF_RATE3: TFloatField;
V_HouseF_ELECT_NO3: TStringField;
V_HouseF_PRICE3: TFloatField;
V_HouseF_COUNT3: TFloatField;
V_HouseF_AMOUNT3: TFloatField;
Tb_HouseF_BASE_COUNT: TFloatField;
Tb_HouseF_RATE3: TFloatField;
Tb_HouseF_ELECT_NO3: TStringField;
Tb_HouseF_PRICE3: TFloatField;
Tb_HouseF_COUNT3: TFloatField;
Tb_HouseF_AMOUNT3: TFloatField;
Tb_TransferF_ACTUALHOUSE: TIntegerField;
Tb_TransferF_SHOULDHOUSE: TIntegerField;
Tb_TransferF_COPYHOUSE: TIntegerField;
Tb_TransferF_NOTCOPYHOUSE: TIntegerField;
Tb_TransferF_ERRORCOPYHOUSE: TIntegerField;
Tb_TransferF_COPYRATE: TFloatField;
Tb_TransferF_ERRORCOPYRATE: TFloatField;
Tb_TransferF_PERRORCOPYHOUSE: TIntegerField;
Tb_LineF_ACTUALHOUSE: TIntegerField;
Tb_LineF_SHOULDHOUSE: TIntegerField;
Tb_LineF_COPYHOUSE: TIntegerField;
Tb_LineF_NOTCOPYHOUSE: TIntegerField;
Tb_LineF_ERRORCOPYHOUSE: TIntegerField;
Tb_LineF_COPYRATE: TFloatField;
Tb_LineF_ERRORCOPYRATE: TFloatField;
Tb_AmmeterF_LNO: TStringField;
V_HouseF_ARREARAGE: TFloatField;
V_HouseF_LATEFEE: TFloatField;
v_Single_FeeF_ARREARAGE: TFloatField;
v_Single_FeeF_LATEFEE: TFloatField;
v_Multi_FeeF_ARREARAGE: TFloatField;
v_Multi_FeeF_LATEFEE: TFloatField;
v_Transfer_FeeF_LATEFEE: TFloatField;
v_Transfer_FeeF_ARREARAGE: TFloatField;
V_Transfer_WastingF_ARREARAGE: TFloatField;
V_Transfer_WastingF_LATEFEE: TFloatField;
V_Line_FeeF_ARREARAGE: TFloatField;
V_Line_FeeF_LATEFEE: TFloatField;
Tb_FeeF_ARREARAGE: TFloatField;
Tb_FeeF_LATEFEE: TFloatField;
Tb_HouseF_ARREARAGE: TFloatField;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -