home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1999 September / Dpcb0999.iso / Business / Empire / _SETUP.1 / EmpireBuilder.exe / 0 / RCDATA / TFMPLTRANSFER / TFMPLTRANSFER.txt
Text File  |  1999-06-21  |  3KB  |  141 lines
  1. object fmPLTransfer: TfmPLTransfer
  2.   Left = 226
  3.   Top = 147
  4.   Width = 406
  5.   Height = 256
  6.   HelpContext = 726
  7.   Caption = 'Profit & Loss Transfer'
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OnClose = FormClose
  14.   OnCloseQuery = FormCloseQuery
  15.   OnCreate = FormCreate
  16.   OnShow = FormShow
  17.   PixelsPerInch = 120
  18.   TextHeight = 16
  19.   object pnlMessage: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 398
  23.     Height = 136
  24.     Align = alTop
  25.     BevelInner = bvRaised
  26.     BevelOuter = bvLowered
  27.     TabOrder = 0
  28.     object lblMessage: TLabel
  29.       Left = 10
  30.       Top = 10
  31.       Width = 380
  32.       Height = 112
  33.       Alignment = taCenter
  34.       Caption = 
  35.         'This operation will transfer the balances of all the profit'#13#10' &&' +
  36.         ' loss accounts for the period you select below and '#13#10'post them i' +
  37.         'nto the Profit && Loss control account.  This'#13#10' records a journa' +
  38.         'l affecting the accumulative balances '#13#10'only (those listed when ' +
  39.         'you select Current Balances on '#13#10'your Trial Balance, Profit && L' +
  40.         'oss and Balance Sheet'#13#10' reports) and does not affect any period ' +
  41.         'balances.'
  42.       Font.Charset = DEFAULT_CHARSET
  43.       Font.Color = clWindowText
  44.       Font.Height = -13
  45.       Font.Name = 'MS Sans Serif'
  46.       Font.Style = [fsBold]
  47.       ParentFont = False
  48.     end
  49.   end
  50.   object pnlButtons: TPanel
  51.     Left = 0
  52.     Top = 189
  53.     Width = 398
  54.     Height = 40
  55.     Align = alBottom
  56.     BevelInner = bvRaised
  57.     BevelOuter = bvLowered
  58.     TabOrder = 1
  59.     object btnTransfer: TButton
  60.       Left = 5
  61.       Top = 5
  62.       Width = 75
  63.       Height = 30
  64.       Caption = '&Transfer'
  65.       TabOrder = 0
  66.       OnClick = btnTransferClick
  67.     end
  68.     object btnClose: TButton
  69.       Left = 85
  70.       Top = 5
  71.       Width = 75
  72.       Height = 30
  73.       Caption = '&Close'
  74.       TabOrder = 1
  75.       OnClick = btnCloseClick
  76.     end
  77.     object btnHelp: TButton
  78.       Left = 320
  79.       Top = 5
  80.       Width = 75
  81.       Height = 30
  82.       Caption = '&Help'
  83.       TabOrder = 2
  84.       OnClick = btnHelpClick
  85.     end
  86.   end
  87.   object pnlPeriod: TPanel
  88.     Left = 0
  89.     Top = 136
  90.     Width = 398
  91.     Height = 53
  92.     Align = alClient
  93.     BevelInner = bvRaised
  94.     BevelOuter = bvLowered
  95.     TabOrder = 2
  96.     object lblPeriod: TLabel
  97.       Left = 15
  98.       Top = 20
  99.       Width = 154
  100.       Height = 16
  101.       Caption = 'Select Period To Transfer'
  102.     end
  103.     object rxcbePeriod: TComboEdit
  104.       Left = 190
  105.       Top = 15
  106.       Width = 196
  107.       Height = 24
  108.       NumGlyphs = 1
  109.       TabOrder = 0
  110.       Text = 'Current Balances'
  111.       OnButtonClick = rxcbePeriodButtonClick
  112.       OnChange = rxcbePeriodChange
  113.       OnEnter = rxcbePeriodEnter
  114.     end
  115.   end
  116.   object taAccPer: TwwTable
  117.     OnCalcFields = taAccPerCalcFields
  118.     DatabaseName = 'EmpireBuilder'
  119.     TableName = 'Accper.dbf'
  120.     SyncSQLByRange = False
  121.     NarrowSearch = False
  122.     ValidateWithMask = True
  123.     Left = 275
  124.     Top = 194
  125.     object taAccPerPERIOD: TDateField
  126.       FieldName = 'PERIOD'
  127.     end
  128.     object taAccPerMONTH: TSmallintField
  129.       FieldName = 'MONTH'
  130.     end
  131.     object taAccPerYEAR: TSmallintField
  132.       FieldName = 'YEAR'
  133.     end
  134.     object taAccPerPERIODNAME: TStringField
  135.       DisplayWidth = 15
  136.       FieldName = 'PERIODNAME'
  137.       Calculated = True
  138.     end
  139.   end
  140. end
  141.