BUG 14/BUGCD1998_05.ISO/aplic/ipos/_setup.1/Knjigovodstvo.exe/0/RCDATA/TFM2101100POSALDOKUP/TFM2101100POSALDOKUP.txt

Text File | 1998-04-04 | 39KB | 1,488 lines

object fm2101100PoSaldoKup: Tfm2101100PoSaldoKup
  Left = 300
  Top = 243
  HelpContext = 210110000
  BorderStyle = bsDialog
  Caption = 'fm2101100PoSaldoKup'
  ClientHeight = 279
  ClientWidth = 490
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Position = poScreenCenter
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object paTipke: TPanel
    Left = 0
    Top = 238
    Width = 490
    Height = 41
    Align = alBottom
    TabOrder = 0
    object bbPoSaldo: TBitBtn
      Left = 5
      Top = 9
      Width = 85
      Height = 25
      Hint = 'Prijenos po�etnog stanja u teku�u godinu'
      Caption = 'Prijenos'
      Default = True
      TabOrder = 0
      OnClick = bbPoSaldoClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object bbIzlaz: TBitBtn
      Left = 94
      Top = 9
      Width = 85
      Height = 25
      Caption = 'I&zlaz'
      TabOrder = 1
      OnClick = bbIzlazClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
  end
  object ScrollBox1: TScrollBox
    Left = 0
    Top = 0
    Width = 490
    Height = 119
    Align = alTop
    TabOrder = 1
    object lbGodina: TLabel
      Left = 17
      Top = 46
      Width = 226
      Height = 13
      Caption = '&Odaberite godinu iz koje prenosite po�etni saldo'
    end
    object lbObavijest: TLabel
      Left = 17
      Top = 6
      Width = 423
      Height = 30
      AutoSize = False
      Caption = 'lbObavijest'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      WordWrap = True
    end
    object cbGodina: TComboBox
      Left = 17
      Top = 61
      Width = 145
      Height = 21
      Style = csDropDownList
      DropDownCount = 4
      ItemHeight = 13
      Sorted = True
      TabOrder = 0
    end
  end
  object paStatus: TPanel
    Left = 0
    Top = 120
    Width = 490
    Height = 118
    Align = alBottom
    TabOrder = 2
    Visible = False
    object Label2: TLabel
      Left = 13
      Top = 11
      Width = 269
      Height = 13
      Caption = 'Prijenos po�etnog stanja u toku, broj prijenosa:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lbStatusPrijenosa: TLabel
      Left = 15
      Top = 34
      Width = 460
      Height = 47
      AutoSize = False
      Caption = 'lbStatusPrijenosa'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      WordWrap = True
    end
    object lbBrojPrijenosa: TLabel
      Left = 284
      Top = 11
      Width = 85
      Height = 13
      Caption = 'lbBrojPrijenosa'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object bbPrekidKorisnika: TBitBtn
      Left = 399
      Top = 7
      Width = 85
      Height = 23
      Caption = 'Pre&kid'
      TabOrder = 0
      OnClick = bbPrekidKorisnikaClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        3333333777333777FF3333993333339993333377FF3333377FF3399993333339
        993337777FF3333377F3393999333333993337F777FF333337FF993399933333
        399377F3777FF333377F993339993333399377F33777FF33377F993333999333
        399377F333777FF3377F993333399933399377F3333777FF377F993333339993
        399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
        99333773FF3333777733339993333339933333773FFFFFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
    object progr1: TProgressBar
      Left = 15
      Top = 86
      Width = 459
      Height = 17
      Min = 0
      Max = 100
      Step = 1
      TabOrder = 1
    end
  end
  object ta1DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 536
    Top = 128
    object ta1DneKupKnjizenje: TIntegerField
      FieldName = 'Knjizenje'
    end
    object ta1DneKupDokument: TSmallintField
      FieldName = 'Dokument'
    end
    object ta1DneKupGodina: TSmallintField
      FieldName = 'Godina'
    end
    object ta1DneKupBroj: TIntegerField
      FieldName = 'Broj'
    end
    object ta1DneKupDatum: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object ta1DneKupPartner: TIntegerField
      FieldName = 'Partner'
    end
    object ta1DneKupOpisKnj: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object ta1DneKupIznos: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object ta1DneKupDatumDosp: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object ta1DneKupZatvaranje: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object ta1DneKupRasknjizenRacun: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object ta1DneKupGodinaRacuna: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object ta1DneKupBrojRacuna: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object ta1DneKupNacinPlacanja: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object ta1DneKupBrojIzvoda: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object ta1DneKupBrojStorniranogKnjizenja: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object ta1DneKupDokumTem: TSmallintField
      FieldName = 'DokumTem'
    end
    object ta1DneKupBrojTemeljnice: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object ta1DneKupPorez: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object ta1DneKupTip_ira: TIntegerField
      FieldName = 'Tip_ira'
    end
    object ta1DneKupTip_ira_unos: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object ta1DneKupcfPartneriNaziv: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object ta1DneKupcfStorniraniDokument: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object ta1DneKupcfStorniran: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object ta1DneKupcfBrojIzvoda: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object ta1DneKupcfBrojTemeljnice: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object ta1DneKupcfDokument: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object ta1DneKupcfZatvoren: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object ta1ZatKup: TTable
    Tag = 4
    DatabaseName = 'praznegod'
    TableName = 'zatkup'
    Left = 534
    Top = 197
    object ta1ZatKupRecord: TAutoIncField
      FieldName = 'Record'
    end
    object ta1ZatKupKnjizenjePl: TIntegerField
      FieldName = 'KnjizenjePl'
    end
    object ta1ZatKupDokumentPl: TSmallintField
      FieldName = 'DokumentPl'
    end
    object ta1ZatKupGodinaPl: TSmallintField
      FieldName = 'GodinaPl'
    end
    object ta1ZatKupBrojPl: TIntegerField
      FieldName = 'BrojPl'
    end
    object ta1ZatKupKnjizenjeRn: TIntegerField
      FieldName = 'KnjizenjeRn'
    end
    object ta1ZatKupDokumentRn: TSmallintField
      FieldName = 'DokumentRn'
    end
    object ta1ZatKupGodinaRn: TSmallintField
      FieldName = 'GodinaRn'
    end
    object ta1ZatKupBrojRn: TIntegerField
      FieldName = 'BrojRn'
    end
    object ta1ZatKupIznos: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object ta1ZatKupcfDokumentRn: TStringField
      FieldName = 'cfDokumentRn'
      Size = 30
      Calculated = True
    end
    object ta1ZatKupcfDokumentPl: TStringField
      FieldName = 'cfDokumentPl'
      Size = 30
      Calculated = True
    end
    object ta1ZatKupcfPartneriNaziv: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 50
      Calculated = True
    end
    object ta1ZatKupcfIznosRn: TFloatField
      FieldName = 'cfIznosRn'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
    object ta1ZatKupcfIznosPl: TFloatField
      FieldName = 'cfIznosPl'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
  end
  object ta1LockKup: TTable
    DatabaseName = 'praznegod'
    TableName = '_lockKup'
    Left = 531
    Top = 257
  end
  object ta2DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 604
    Top = 130
    object IntegerField1: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField1: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField2: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField2: TIntegerField
      FieldName = 'Broj'
    end
    object DateField1: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField3: TIntegerField
      FieldName = 'Partner'
    end
    object StringField1: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField1: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField2: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField2: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField3: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField4: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField4: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField5: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField5: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField6: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField6: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField7: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField2: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField7: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField8: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField3: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField4: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField5: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField6: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField7: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField8: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField9: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object ta3DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 666
    Top = 130
    object IntegerField9: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField8: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField9: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField10: TIntegerField
      FieldName = 'Broj'
    end
    object DateField3: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField11: TIntegerField
      FieldName = 'Partner'
    end
    object StringField10: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField3: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField4: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField11: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField10: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField11: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField12: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField12: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField13: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField14: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField13: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField14: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField4: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField15: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField16: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField12: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField13: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField14: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField15: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField16: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField17: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField18: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object ta5DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 736
    Top = 130
    object IntegerField17: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField15: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField16: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField18: TIntegerField
      FieldName = 'Broj'
    end
    object DateField5: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField19: TIntegerField
      FieldName = 'Partner'
    end
    object StringField19: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField5: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField6: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField20: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField17: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField18: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField20: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField19: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField21: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField22: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField20: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField21: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField6: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField23: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField24: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField21: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField22: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField23: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField24: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField25: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField26: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField27: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object ta6DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 810
    Top = 132
    object IntegerField25: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField22: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField23: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField26: TIntegerField
      FieldName = 'Broj'
    end
    object DateField7: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField27: TIntegerField
      FieldName = 'Partner'
    end
    object StringField28: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField7: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField8: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField29: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField24: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField25: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField28: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField26: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField29: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField30: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField27: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField28: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField8: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField31: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField32: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField30: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField31: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField32: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField33: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField34: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField35: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField36: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object ta3ZatKup: TTable
    Tag = 4
    DatabaseName = 'praznegod'
    TableName = 'zatkup'
    Left = 628
    Top = 195
    object AutoIncField1: TAutoIncField
      FieldName = 'Record'
    end
    object IntegerField33: TIntegerField
      FieldName = 'KnjizenjePl'
    end
    object SmallintField29: TSmallintField
      FieldName = 'DokumentPl'
    end
    object SmallintField30: TSmallintField
      FieldName = 'GodinaPl'
    end
    object IntegerField34: TIntegerField
      FieldName = 'BrojPl'
    end
    object IntegerField35: TIntegerField
      FieldName = 'KnjizenjeRn'
    end
    object SmallintField31: TSmallintField
      FieldName = 'DokumentRn'
    end
    object SmallintField32: TSmallintField
      FieldName = 'GodinaRn'
    end
    object IntegerField36: TIntegerField
      FieldName = 'BrojRn'
    end
    object FloatField9: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object StringField37: TStringField
      FieldName = 'cfDokumentRn'
      Size = 30
      Calculated = True
    end
    object StringField38: TStringField
      FieldName = 'cfDokumentPl'
      Size = 30
      Calculated = True
    end
    object StringField39: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 50
      Calculated = True
    end
    object FloatField10: TFloatField
      FieldName = 'cfIznosRn'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
    object FloatField11: TFloatField
      FieldName = 'cfIznosPl'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
  end
  object tap1DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 540
    Top = 344
    object IntegerField37: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField33: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField34: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField38: TIntegerField
      FieldName = 'Broj'
    end
    object DateField9: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField39: TIntegerField
      FieldName = 'Partner'
    end
    object StringField40: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField12: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField10: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField41: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField35: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField36: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField40: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField37: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField41: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField42: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField38: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField39: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField13: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField43: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField44: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField42: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField43: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField44: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField45: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField46: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField47: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField48: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object tap1ZatKup: TTable
    Tag = 4
    DatabaseName = 'praznegod'
    TableName = 'zatkup'
    Left = 538
    Top = 413
    object AutoIncField2: TAutoIncField
      FieldName = 'Record'
    end
    object IntegerField45: TIntegerField
      FieldName = 'KnjizenjePl'
    end
    object SmallintField40: TSmallintField
      FieldName = 'DokumentPl'
    end
    object SmallintField41: TSmallintField
      FieldName = 'GodinaPl'
    end
    object IntegerField46: TIntegerField
      FieldName = 'BrojPl'
    end
    object IntegerField47: TIntegerField
      FieldName = 'KnjizenjeRn'
    end
    object SmallintField42: TSmallintField
      FieldName = 'DokumentRn'
    end
    object SmallintField43: TSmallintField
      FieldName = 'GodinaRn'
    end
    object IntegerField48: TIntegerField
      FieldName = 'BrojRn'
    end
    object FloatField14: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object StringField49: TStringField
      FieldName = 'cfDokumentRn'
      Size = 30
      Calculated = True
    end
    object StringField50: TStringField
      FieldName = 'cfDokumentPl'
      Size = 30
      Calculated = True
    end
    object StringField51: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 50
      Calculated = True
    end
    object FloatField15: TFloatField
      FieldName = 'cfIznosRn'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
    object FloatField16: TFloatField
      FieldName = 'cfIznosPl'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
  end
  object tap1LockKup: TTable
    DatabaseName = 'praznegod'
    TableName = '_lockKup'
    Left = 535
    Top = 473
  end
  object tap3DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 614
    Top = 346
    object IntegerField49: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField44: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField45: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField50: TIntegerField
      FieldName = 'Broj'
    end
    object DateField11: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField51: TIntegerField
      FieldName = 'Partner'
    end
    object StringField52: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField17: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField12: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField53: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField46: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField47: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField52: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField48: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField53: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField54: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField49: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField50: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField18: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField55: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField56: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField54: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField55: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField56: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField57: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField58: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField59: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField60: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object tap5DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 690
    Top = 352
    object IntegerField57: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField51: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField52: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField58: TIntegerField
      FieldName = 'Broj'
    end
    object DateField13: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField59: TIntegerField
      FieldName = 'Partner'
    end
    object StringField61: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField19: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField14: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField62: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField53: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField54: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField60: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField55: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField61: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField62: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField56: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField57: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField20: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField63: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField64: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField63: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField64: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField65: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField66: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField67: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField68: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField69: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object tap6DneKup: TTable
    Tag = 4
    DatabaseName = '\knjigovodstvo\data\praznegod'
    TableName = 'dnekup'
    Left = 774
    Top = 350
    object IntegerField65: TIntegerField
      FieldName = 'Knjizenje'
    end
    object SmallintField58: TSmallintField
      FieldName = 'Dokument'
    end
    object SmallintField59: TSmallintField
      FieldName = 'Godina'
    end
    object IntegerField66: TIntegerField
      FieldName = 'Broj'
    end
    object DateField15: TDateField
      FieldName = 'Datum'
      EditMask = '00/00/0000'
    end
    object IntegerField67: TIntegerField
      FieldName = 'Partner'
    end
    object StringField70: TStringField
      FieldName = 'OpisKnj'
      Size = 80
    end
    object FloatField21: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object DateField16: TDateField
      FieldName = 'DatumDosp'
      EditMask = '00/00/0000'
    end
    object StringField71: TStringField
      FieldName = 'Zatvaranje'
      Size = 30
    end
    object SmallintField60: TSmallintField
      FieldName = 'RasknjizenRacun'
    end
    object SmallintField61: TSmallintField
      FieldName = 'GodinaRacuna'
    end
    object IntegerField68: TIntegerField
      FieldName = 'BrojRacuna'
    end
    object SmallintField62: TSmallintField
      FieldName = 'NacinPlacanja'
    end
    object IntegerField69: TIntegerField
      FieldName = 'BrojIzvoda'
    end
    object IntegerField70: TIntegerField
      FieldName = 'BrojStorniranogKnjizenja'
    end
    object SmallintField63: TSmallintField
      FieldName = 'DokumTem'
    end
    object SmallintField64: TSmallintField
      FieldName = 'BrojTemeljnice'
    end
    object FloatField22: TFloatField
      FieldName = 'Porez'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object IntegerField71: TIntegerField
      FieldName = 'Tip_ira'
    end
    object IntegerField72: TIntegerField
      FieldName = 'Tip_ira_unos'
    end
    object StringField72: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 60
      Calculated = True
    end
    object StringField73: TStringField
      FieldName = 'cfStorniraniDokument'
      Size = 60
      Calculated = True
    end
    object StringField74: TStringField
      FieldName = 'cfStorniran'
      Size = 60
      Calculated = True
    end
    object StringField75: TStringField
      DisplayWidth = 10
      FieldName = 'cfBrojIzvoda'
      Size = 60
      Calculated = True
    end
    object StringField76: TStringField
      FieldName = 'cfBrojTemeljnice'
      Size = 4
      Calculated = True
    end
    object StringField77: TStringField
      FieldName = 'cfDokument'
      Calculated = True
    end
    object StringField78: TStringField
      Alignment = taRightJustify
      FieldName = 'cfZatvoren'
      Calculated = True
    end
  end
  object tap3ZatKup: TTable
    Tag = 4
    DatabaseName = 'praznegod'
    TableName = 'zatkup'
    Left = 608
    Top = 411
    object AutoIncField3: TAutoIncField
      FieldName = 'Record'
    end
    object IntegerField73: TIntegerField
      FieldName = 'KnjizenjePl'
    end
    object SmallintField65: TSmallintField
      FieldName = 'DokumentPl'
    end
    object SmallintField66: TSmallintField
      FieldName = 'GodinaPl'
    end
    object IntegerField74: TIntegerField
      FieldName = 'BrojPl'
    end
    object IntegerField75: TIntegerField
      FieldName = 'KnjizenjeRn'
    end
    object SmallintField67: TSmallintField
      FieldName = 'DokumentRn'
    end
    object SmallintField68: TSmallintField
      FieldName = 'GodinaRn'
    end
    object IntegerField76: TIntegerField
      FieldName = 'BrojRn'
    end
    object FloatField23: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object StringField79: TStringField
      FieldName = 'cfDokumentRn'
      Size = 30
      Calculated = True
    end
    object StringField80: TStringField
      FieldName = 'cfDokumentPl'
      Size = 30
      Calculated = True
    end
    object StringField81: TStringField
      FieldName = 'cfPartneriNaziv'
      Size = 50
      Calculated = True
    end
    object FloatField24: TFloatField
      FieldName = 'cfIznosRn'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
    object FloatField25: TFloatField
      FieldName = 'cfIznosPl'
      DisplayFormat = ',0.00;;-'
      Calculated = True
    end
  end
end