invoice400v_f.dfm

来自「县级供电企业电费核算源码, 在客户处正常运行8年以上, Delphi 5开发,数」· DFM 代码 · 共 2,277 行 · 第 1/5 页

    Left = 104
    Top = 208
  end
  object Ds_Ammeter: TDataSource
    DataSet = Q_Ammeter
    Left = 184
    Top = 208
  end
  object Q_Ammeter: TQuery
    DatabaseName = 'SMDLJF'
    SQL.Strings = (
      'Select * '
      'From Tb_Ammeter'
      'Where f_House_No = :House_No')
    Left = 184
    Top = 264
    ParamData = <
      item
        DataType = ftString
        Name = 'House_No'
        ParamType = ptUnknown
        Value = 'F01001-0001'
      end>
  end
  object Q_FeeDetail: TQuery
    DatabaseName = 'SMDLJF'
    SQL.Strings = (
      'Select * '
      'From Tb_FeeDetail'
      'Where f_House_No = :House_No')
    Left = 264
    Top = 264
    ParamData = <
      item
        DataType = ftString
        Name = 'House_No'
        ParamType = ptUnknown
        Value = 'F01001-0001'
      end>
  end
  object Ds_FeeDetail: TDataSource
    DataSet = Q_FeeDetail
    Left = 264
    Top = 208
  end
  object Query: TQuery
    DatabaseName = 'SMDLJF'
    Left = 320
    Top = 208
  end
  object DBP_Invoice: TppDBPipeline
    DataSource = Ds_Invoice
    UserName = 'DBP_Invoice'
    Left = 104
    Top = 136
    object DBP_InvoiceppField1: TppField
      FieldAlias = 'F_TRANSFER_NAME'
      FieldName = 'F_TRANSFER_NAME'
      FieldLength = 20
      DisplayWidth = 20
      Position = 0
    end
    object DBP_InvoiceppField2: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_FEEAMOUNT'
      FieldName = 'F_FEEAMOUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 1
    end
    object DBP_InvoiceppField3: TppField
      FieldAlias = 'F_POSITION'
      FieldName = 'F_POSITION'
      FieldLength = 30
      DisplayWidth = 30
      Position = 2
    end
    object DBP_InvoiceppField4: TppField
      FieldAlias = 'F_HOUSE_NO'
      FieldName = 'F_HOUSE_NO'
      FieldLength = 12
      DisplayWidth = 12
      Position = 3
    end
    object DBP_InvoiceppField5: TppField
      FieldAlias = 'F_TRANSFER_NO'
      FieldName = 'F_TRANSFER_NO'
      FieldLength = 6
      DisplayWidth = 6
      Position = 4
    end
    object DBP_InvoiceppField6: TppField
      FieldAlias = 'F_VOLUME_NO'
      FieldName = 'F_VOLUME_NO'
      FieldLength = 1
      DisplayWidth = 1
      Position = 5
    end
    object DBP_InvoiceppField7: TppField
      FieldAlias = 'F_VILLAGE_NO'
      FieldName = 'F_VILLAGE_NO'
      FieldLength = 5
      DisplayWidth = 5
      Position = 6
    end
    object DBP_InvoiceppField8: TppField
      FieldAlias = 'F_HOUSE_NAME'
      FieldName = 'F_HOUSE_NAME'
      FieldLength = 20
      DisplayWidth = 20
      Position = 7
    end
    object DBP_InvoiceppField9: TppField
      FieldAlias = 'F_POSITION_1'
      FieldName = 'F_POSITION_1'
      FieldLength = 10
      DisplayWidth = 10
      Position = 8
    end
    object DBP_InvoiceppField10: TppField
      FieldAlias = 'F_TELEPHONE'
      FieldName = 'F_TELEPHONE'
      FieldLength = 12
      DisplayWidth = 12
      Position = 9
    end
    object DBP_InvoiceppField11: TppField
      FieldAlias = 'F_VOLTAGE_NO'
      FieldName = 'F_VOLTAGE_NO'
      FieldLength = 2
      DisplayWidth = 2
      Position = 10
    end
    object DBP_InvoiceppField12: TppField
      FieldAlias = 'F_MASTER_AMMETER_NO'
      FieldName = 'F_MASTER_AMMETER_NO'
      FieldLength = 10
      DisplayWidth = 10
      Position = 11
    end
    object DBP_InvoiceppField13: TppField
      FieldAlias = 'F_BOX_NO'
      FieldName = 'F_BOX_NO'
      FieldLength = 6
      DisplayWidth = 6
      Position = 12
    end
    object DBP_InvoiceppField14: TppField
      FieldAlias = 'F_DATE'
      FieldName = 'F_DATE'
      FieldLength = 0
      DataType = dtDateTime
      DisplayWidth = 18
      Position = 13
    end
    object DBP_InvoiceppField15: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_ADJUST_COUNT'
      FieldName = 'F_ADJUST_COUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 14
    end
    object DBP_InvoiceppField16: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_SON_COUNT'
      FieldName = 'F_SON_COUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 15
    end
    object DBP_InvoiceppField17: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_SUM_COUNT'
      FieldName = 'F_SUM_COUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 16
    end
    object DBP_InvoiceppField18: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_BASE_COUNT'
      FieldName = 'F_BASE_COUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 17
    end
    object DBP_InvoiceppField19: TppField
      FieldAlias = 'F_ELECT_NO'
      FieldName = 'F_ELECT_NO'
      FieldLength = 2
      DisplayWidth = 2
      Position = 18
    end
    object DBP_InvoiceppField20: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_PRICE'
      FieldName = 'F_PRICE'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 19
    end
    object DBP_InvoiceppField21: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_COUNT'
      FieldName = 'F_COUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 20
    end
    object DBP_InvoiceppField22: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_AMOUNT'
      FieldName = 'F_AMOUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 21
    end
    object DBP_InvoiceppField23: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_RATE1'
      FieldName = 'F_RATE1'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 22
    end
    object DBP_InvoiceppField24: TppField
      FieldAlias = 'F_ELECT_NO1'
      FieldName = 'F_ELECT_NO1'
      FieldLength = 2
      DisplayWidth = 2
      Position = 23
    end
    object DBP_InvoiceppField25: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_PRICE1'
      FieldName = 'F_PRICE1'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 24
    end
    object DBP_InvoiceppField26: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_COUNT1'
      FieldName = 'F_COUNT1'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 25
    end
    object DBP_InvoiceppField27: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_AMOUNT1'
      FieldName = 'F_AMOUNT1'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 26
    end
    object DBP_InvoiceppField28: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_RATE2'
      FieldName = 'F_RATE2'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 27
    end
    object DBP_InvoiceppField29: TppField
      FieldAlias = 'F_ELECT_NO2'
      FieldName = 'F_ELECT_NO2'
      FieldLength = 2
      DisplayWidth = 2
      Position = 28
    end
    object DBP_InvoiceppField30: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_PRICE2'
      FieldName = 'F_PRICE2'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 29
    end
    object DBP_InvoiceppField31: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_COUNT2'
      FieldName = 'F_COUNT2'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 30
    end
    object DBP_InvoiceppField32: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_AMOUNT2'
      FieldName = 'F_AMOUNT2'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 31
    end
    object DBP_InvoiceppField33: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_RATE3'
      FieldName = 'F_RATE3'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 32
    end
    object DBP_InvoiceppField34: TppField
      FieldAlias = 'F_ELECT_NO3'
      FieldName = 'F_ELECT_NO3'
      FieldLength = 2
      DisplayWidth = 2
      Position = 33
    end
    object DBP_InvoiceppField35: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_PRICE3'
      FieldName = 'F_PRICE3'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 34
    end
    object DBP_InvoiceppField36: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_COUNT3'
      FieldName = 'F_COUNT3'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 35
    end
    object DBP_InvoiceppField37: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_AMOUNT3'
      FieldName = 'F_AMOUNT3'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 36
    end
    object DBP_InvoiceppField38: TppField
      FieldAlias = 'F_NOTE'
      FieldName = 'F_NOTE'
      FieldLength = 50
      DisplayWidth = 50
      Position = 37
    end
    object DBP_InvoiceppField39: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_ARREARAGE'
      FieldName = 'F_ARREARAGE'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 38
    end
    object DBP_InvoiceppField40: TppField
      FieldAlias = 'F_2YEAR'
      FieldName = 'F_2YEAR'
      FieldLength = 1
      DisplayWidth = 1
      Position = 39
    end
    object DBP_InvoiceppField41: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_LATEFEE'
      FieldName = 'F_LATEFEE'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 40
    end
    object DBP_InvoiceppField42: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_USED_AMOUNT'
      FieldName = 'F_USED_AMOUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 41
    end
    object DBP_InvoiceppField43: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_CT'
      FieldName = 'F_CT'
      FieldLength = 0
      DataType = dtInteger
      DisplayWidth = 10
      Position = 42
    end
    object DBP_InvoiceppField44: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_TRANS_USED'
      FieldName = 'F_TRANS_USED'
      FieldLength = 0
      DataType = dtInteger
      DisplayWidth = 10
      Position = 43
    end
    object DBP_InvoiceppField45: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_USED_COUNT'
      FieldName = 'F_USED_COUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 44
    end
    object DBP_InvoiceppField46: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_IRON_USED'
      FieldName = 'F_IRON_USED'
      FieldLength = 0
      DataType = dtInteger
      DisplayWidth = 10
      Position = 45
    end
    object DBP_InvoiceppField47: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_EXCESSTYPE'
      FieldName = 'F_EXCESSTYPE'
      FieldLength = 0
      DataType = dtInteger
      DisplayWidth = 10
      Position = 46
    end
    object DBP_InvoiceppField48: TppField
      FieldAlias = 'F_PRINTINVOICE'
      FieldName = 'F_PRINTINVOICE'
      FieldLength = 1
      DisplayWidth = 1
      Position = 47
    end
    object DBP_InvoiceppField49: TppField
      FieldAlias = 'F_PRINTEDINVOICE'
      FieldName = 'F_PRINTEDINVOICE'
      FieldLength = 1
      DisplayWidth = 1
      Position = 48
    end
    object DBP_InvoiceppField50: TppField