home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BUG 14
/
BUGCD1998_05.ISO
/
aplic
/
ipos
/
_setup.1
/
Knjigovodstvo.exe
/
0
/
RCDATA
/
TFM2800400OSREPUPIT
/
TFM2800400OSREPUPIT.txt
Wrap
Text File
|
1998-04-04
|
45KB
|
1,791 lines
object fm2800400OsRepUpit: Tfm2800400OsRepUpit
Left = 419
Top = 167
BorderStyle = bsDialog
Caption = 'fm2800400OsRepUpit'
ClientHeight = 470
ClientWidth = 595
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 Label3: TLabel
Left = 8
Top = 87
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label7: TLabel
Left = 211
Top = 110
Width = 132
Height = 13
Caption = 'Upi�ite kriterij za ispis od do:'
end
object Bevel4: TBevel
Left = 207
Top = 115
Width = 182
Height = 65
end
object Label8: TLabel
Left = 35
Top = 82
Width = 132
Height = 13
Caption = 'Upi�ite kriterij za ispis od do:'
end
object Bevel5: TBevel
Left = 31
Top = 87
Width = 182
Height = 65
end
object Panel3: TPanel
Left = 0
Top = 401
Width = 595
Height = 69
Align = alBottom
TabOrder = 0
object Label35: TLabel
Left = 258
Top = 12
Width = 49
Height = 13
Caption = 'Broj &kopija'
FocusControl = edBrojKopija
end
object bbIspis: TBitBtn
Left = 7
Top = 7
Width = 75
Height = 25
Hint = 'Ispis izvje�taja na teku�u lokaciju'
Caption = 'Is&pis'
Default = True
TabOrder = 0
OnClick = bbIspisClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F33333333333337088888888888
88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object bbIzlaz: TBitBtn
Left = 6
Top = 36
Width = 75
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
object rgLokacija: TRadioGroup
Left = 96
Top = 6
Width = 153
Height = 55
Caption = ' Lokacija ispisa '
Columns = 2
ItemIndex = 0
Items.Strings = (
'Ekran'
'Pisa�, fax')
TabOrder = 2
end
object bbPromjenaPisaca: TBitBtn
Left = 344
Top = 23
Width = 181
Height = 25
Hint = 'Promjena teku�eg pisa�a'
Caption = 'Promjena pisa�a'
TabOrder = 3
OnClick = bbPromjenaPisacaClick
end
object upDownBrojKopija: TUpDown
Left = 324
Top = 26
Width = 15
Height = 21
Associate = edBrojKopija
Min = 1
Max = 1000
Position = 1
TabOrder = 4
Thousands = False
Wrap = False
end
object edBrojKopija: TEdit
Left = 258
Top = 26
Width = 66
Height = 21
Hint = 'Broj kopija na pisa�u'
TabOrder = 5
Text = '1'
end
end
object PageControl: TPageControl
Left = 0
Top = 0
Width = 595
Height = 401
ActivePage = pgKorev
Align = alClient
MultiLine = True
TabHeight = 22
TabOrder = 1
OnChange = PageControlChange
object pgPopisOs: TTabSheet
HelpContext = 240100200
Caption = 'Popis osnovnih sredstava'
object ScrollBox7: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 347
Align = alClient
TabOrder = 0
object Bevel22: TBevel
Left = 16
Top = 119
Width = 367
Height = 126
Style = bsRaised
end
object Bevel26: TBevel
Left = 26
Top = 162
Width = 162
Height = 70
end
object Label29: TLabel
Left = 17
Top = 265
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label30: TLabel
Left = 32
Top = 155
Width = 85
Height = 13
Caption = 'Ispis od do naziva'
end
object Label31: TLabel
Left = 18
Top = 7
Width = 108
Height = 13
Caption = 'Upi�ite kriterije za ispis:'
end
object Bevel27: TBevel
Left = 212
Top = 162
Width = 151
Height = 70
end
object Label32: TLabel
Left = 218
Top = 156
Width = 73
Height = 13
Caption = 'Ispis od do �ifre'
end
object edPopisosNaslov: TEdit
Left = 17
Top = 280
Width = 229
Height = 21
TabOrder = 6
end
object edPopisosNazivOd: TEdit
Left = 35
Top = 177
Width = 121
Height = 21
TabOrder = 2
end
object edPopisosNazivDo: TEdit
Left = 35
Top = 202
Width = 121
Height = 21
TabOrder = 3
end
object rgPopisosRedoslijed: TRadioGroup
Left = 17
Top = 29
Width = 174
Height = 72
Caption = 'Redoslijed ispisa po'
ItemIndex = 1
Items.Strings = (
'�ifri'
'nazivu')
TabOrder = 0
end
object cbPopisosSvi: TCheckBox
Left = 25
Top = 130
Width = 133
Height = 17
Caption = 'Ispis svih sredstava'
State = cbChecked
TabOrder = 1
end
object edPopisosSifraOd: TEdit
Left = 221
Top = 177
Width = 121
Height = 21
TabOrder = 4
end
object edPopisosSifraDo: TEdit
Left = 221
Top = 202
Width = 121
Height = 21
TabOrder = 5
end
end
end
object pgAmort: TTabSheet
HelpContext = 240100300
Caption = 'Popis amortizacijskih skupina'
object ScrollBox1: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel1: TBevel
Left = 16
Top = 119
Width = 367
Height = 126
Style = bsRaised
end
object Bevel2: TBevel
Left = 26
Top = 162
Width = 162
Height = 70
end
object Label1: TLabel
Left = 17
Top = 265
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label2: TLabel
Left = 32
Top = 155
Width = 85
Height = 13
Caption = 'Ispis od do naziva'
end
object Label4: TLabel
Left = 18
Top = 7
Width = 108
Height = 13
Caption = 'Upi�ite kriterije za ispis:'
end
object Bevel3: TBevel
Left = 212
Top = 162
Width = 151
Height = 70
end
object Label5: TLabel
Left = 218
Top = 156
Width = 73
Height = 13
Caption = 'Ispis od do �ifre'
end
object edAmortNaslov: TEdit
Left = 17
Top = 280
Width = 229
Height = 21
TabOrder = 6
end
object edAmortNazivOd: TEdit
Left = 35
Top = 177
Width = 121
Height = 21
TabOrder = 2
end
object edAmortNazivDo: TEdit
Left = 35
Top = 202
Width = 121
Height = 21
TabOrder = 3
end
object rgAmortRedoslijed: TRadioGroup
Left = 17
Top = 29
Width = 174
Height = 72
Caption = 'Redoslijed ispisa po'
ItemIndex = 0
Items.Strings = (
'�ifri'
'nazivu')
TabOrder = 0
end
object cbAmortSvi: TCheckBox
Left = 25
Top = 130
Width = 200
Height = 17
Caption = 'Ispis svih amortizacijskih skupina'
State = cbChecked
TabOrder = 1
end
object edAmortSifraOd: TEdit
Left = 221
Top = 177
Width = 121
Height = 21
TabOrder = 4
end
object edAmortSifraDo: TEdit
Left = 221
Top = 202
Width = 121
Height = 21
TabOrder = 5
end
end
end
object pgKorev: TTabSheet
HelpContext = 240100400
Caption = 'Popis koeficijenata revalorizacije'
TabVisible = False
object ScrollBox2: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 347
Align = alClient
TabOrder = 0
object Bevel6: TBevel
Left = 18
Top = 31
Width = 247
Height = 126
Style = bsRaised
end
object Label6: TLabel
Left = 19
Top = 177
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label10: TLabel
Left = 18
Top = 7
Width = 108
Height = 13
Caption = 'Upi�ite kriterije za ispis:'
end
object Bevel8: TBevel
Left = 28
Top = 74
Width = 151
Height = 70
end
object Label11: TLabel
Left = 34
Top = 68
Width = 86
Height = 13
Caption = 'Ispis od do godine'
end
object edKorevNaslov: TEdit
Left = 19
Top = 192
Width = 229
Height = 21
TabOrder = 3
end
object cbKorevSvi: TCheckBox
Left = 27
Top = 42
Width = 200
Height = 17
Caption = 'Ispis svih koeficijenata revalorizacije'
State = cbChecked
TabOrder = 0
end
object edKorevGodinaOd: TEdit
Left = 37
Top = 89
Width = 121
Height = 21
TabOrder = 1
end
object edKorevGodinaDo: TEdit
Left = 37
Top = 114
Width = 121
Height = 21
TabOrder = 2
end
end
end
object pgDnevnik: TTabSheet
Caption = 'Dnevnik sredstava'
object ScrollBox3: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel7: TBevel
Left = 208
Top = 20
Width = 326
Height = 52
end
object Bevel9: TBevel
Left = 10
Top = 89
Width = 403
Height = 125
Style = bsRaised
end
object Bevel10: TBevel
Left = 217
Top = 136
Width = 186
Height = 66
end
object Bevel11: TBevel
Left = 20
Top = 136
Width = 191
Height = 65
end
object Label9: TLabel
Left = 24
Top = 130
Width = 76
Height = 13
Caption = 'Od do knji�enja:'
end
object Label12: TLabel
Left = 10
Top = 220
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label13: TLabel
Left = 224
Top = 130
Width = 70
Height = 13
Caption = 'Od do datuma:'
end
object Label14: TLabel
Left = 16
Top = 83
Width = 102
Height = 13
Caption = 'Upi�ite kriterij za ispis:'
end
object rgDnevnikRedoslijed: TRadioGroup
Left = 9
Top = 13
Width = 192
Height = 61
Caption = 'Redoslijed ispisa knj�enja po'
ItemIndex = 0
Items.Strings = (
'rednom broju knji�enja'
'datumu knji�enja (dokumenta)')
TabOrder = 0
end
object edDnevnikNaslov: TEdit
Left = 10
Top = 235
Width = 255
Height = 21
TabOrder = 10
Text = 'edDnevnikNaslov'
end
object edDnevnikDatumDo: TEdit
Left = 226
Top = 174
Width = 121
Height = 21
TabOrder = 9
Text = 'edDnevnikDatumDo'
end
object edDnevnikDatumOd: TEdit
Left = 226
Top = 149
Width = 121
Height = 21
TabOrder = 8
Text = 'edDnevnikDatumOd'
end
object edDnevnikKnjizenjeOd: TEdit
Left = 26
Top = 149
Width = 121
Height = 21
TabOrder = 6
Text = 'edDnevnikKnjizenjeOd'
end
object edDnevnikKnjizenjeDo: TEdit
Left = 26
Top = 174
Width = 121
Height = 21
TabOrder = 7
Text = 'edDnevnikKnjizenjeDo'
end
object edDnevnikDokument: TEdit
Left = 213
Top = 40
Width = 45
Height = 21
TabOrder = 2
Text = 'edDnevnikDokument'
OnChange = edDnevnikDokumentChange
OnKeyPress = edDnevnikDokumentKeyPress
end
object btDnevnikDokument: TButton
Left = 261
Top = 43
Width = 15
Height = 15
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
TabStop = False
OnClick = btDnevnikDokumentClick
end
object edDnevnikNazivDokumenta: TEdit
Left = 279
Top = 40
Width = 248
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 4
Text = 'edDnevnikNazivDokumenta'
end
object cbDnevnikDokument: TCheckBox
Left = 212
Top = 14
Width = 228
Height = 17
Caption = 'U izvje�taj uklju�i samo navedeni dokument'
TabOrder = 1
end
object cbDnevnikSvaKnj: TCheckBox
Left = 20
Top = 106
Width = 161
Height = 17
Caption = 'Uklju�i sva knji�enja u ispis'
State = cbChecked
TabOrder = 5
end
end
end
object pgKartice: TTabSheet
Caption = 'Kartice sredstava'
object ScrollBox4: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel12: TBevel
Left = 204
Top = 193
Width = 171
Height = 117
Style = bsRaised
end
object Label15: TLabel
Left = 10
Top = 370
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Bevel14: TBevel
Left = 212
Top = 232
Width = 143
Height = 71
end
object Label16: TLabel
Left = 218
Top = 227
Width = 76
Height = 13
Caption = 'Od do knji�enja:'
end
object Label18: TLabel
Left = 210
Top = 188
Width = 102
Height = 13
Caption = 'Upi�ite kriterij za ispis:'
end
object Bevel23: TBevel
Left = 208
Top = 14
Width = 310
Height = 106
Style = bsRaised
end
object Bevel24: TBevel
Left = 216
Top = 45
Width = 142
Height = 63
end
object Label36: TLabel
Left = 222
Top = 38
Width = 116
Height = 13
Caption = 'Ispis sredstva od do �ifre'
end
object Bevel25: TBevel
Left = 366
Top = 45
Width = 141
Height = 64
end
object Label37: TLabel
Left = 372
Top = 36
Width = 128
Height = 13
Caption = 'Ispis sredstva od do naziva'
end
object Bevel15: TBevel
Left = 10
Top = 128
Width = 506
Height = 48
end
object lbKarticeRobaNaziv: TLabel
Left = 33
Top = 156
Width = 478
Height = 13
AutoSize = False
Caption = 'lbKarticeRobaNaziv'
end
object rgKarticeRedoslijedKnj: TRadioGroup
Left = 10
Top = 190
Width = 186
Height = 67
Caption = 'Redoslijed ispisa stavaka kartica po'
ItemIndex = 0
Items.Strings = (
'rednom broju knji�enja')
TabOrder = 9
end
object edKarticeNaslov: TEdit
Left = 9
Top = 385
Width = 229
Height = 21
TabOrder = 17
Text = 'edKarticeNaslov'
end
object edKarticeKnjizenjeDo: TEdit
Left = 218
Top = 276
Width = 121
Height = 21
TabOrder = 12
Text = 'edKarticeKnjizenjeDo'
end
object edKarticeKnjizenjeOd: TEdit
Left = 217
Top = 247
Width = 121
Height = 21
TabOrder = 11
Text = 'edKarticeKnjizenjeOd'
end
object cbKarticeNovaStrana: TCheckBox
Left = 8
Top = 88
Width = 168
Height = 24
Caption = 'Svaka kartica na novoj strani'
State = cbChecked
TabOrder = 6
end
object cbKarticeKnjSvi: TCheckBox
Left = 211
Top = 208
Width = 156
Height = 17
Caption = 'Uklju�i sva knji�enja u ispis'
State = cbChecked
TabOrder = 10
end
object rgKarticeRedoslijedRoba: TRadioGroup
Left = 5
Top = 8
Width = 192
Height = 70
Caption = 'Redoslijed ispisa kartica po'
ItemIndex = 0
Items.Strings = (
'abecedi'
'�ifri sredstva')
TabOrder = 0
end
object edKarticeRobaSifraOd: TEdit
Left = 225
Top = 56
Width = 121
Height = 21
TabOrder = 2
Text = 'edKarticeRobaSifraOd'
end
object edKarticeRobaSifraDo: TEdit
Left = 225
Top = 81
Width = 121
Height = 21
TabOrder = 3
Text = 'edKarticeRobaSifraDo'
end
object cbKarticeRobaSvi: TCheckBox
Left = 214
Top = 21
Width = 183
Height = 17
Caption = 'Ispis svih sredstava (kartica)'
State = cbChecked
TabOrder = 1
end
object edKarticeRobaAbecOd: TEdit
Left = 375
Top = 55
Width = 121
Height = 21
TabOrder = 4
Text = 'edKarticeRobaAbecOd'
end
object edKarticeRobaAbecDo: TEdit
Left = 375
Top = 81
Width = 121
Height = 21
TabOrder = 5
Text = 'edKarticeRobaAbecDo'
end
object cbKarticeRobaNaziv: TCheckBox
Left = 14
Top = 132
Width = 209
Height = 17
Caption = 'Uklju�i samo sredstvo sljede�eg naziva'
TabOrder = 7
end
object edKarticeRobaNaziv: TEdit
Left = 222
Top = 132
Width = 288
Height = 21
CharCase = ecLowerCase
TabOrder = 8
Text = 'edkarticerobanaziv'
OnChange = edKarticeRobaNazivChange
end
object edKarticeDokument: TEdit
Left = 9
Top = 340
Width = 63
Height = 21
TabOrder = 13
Text = 'edKarticeDokument'
OnChange = edKarticeDokumentChange
OnKeyPress = edKarticeDokumentKeyPress
end
object btKarticeDokument: TButton
Left = 78
Top = 342
Width = 15
Height = 15
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
TabStop = False
OnClick = btKarticeDokumentClick
end
object edKarticeNazivDokumenta: TEdit
Left = 97
Top = 340
Width = 311
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 16
Text = 'edKarticeNazivDokumenta'
end
object cbKarticeDokument: TCheckBox
Left = 9
Top = 319
Width = 240
Height = 17
Caption = 'U izvje�taj uklju�i samo navedeni dokument'
TabOrder = 14
end
end
end
object pgPrometi: TTabSheet
Caption = 'Prometi i salda kartica'
object ScrollBox5: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel16: TBevel
Left = 204
Top = 251
Width = 181
Height = 117
Style = bsRaised
end
object Label19: TLabel
Left = 12
Top = 428
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Bevel18: TBevel
Left = 212
Top = 290
Width = 143
Height = 71
end
object Label20: TLabel
Left = 218
Top = 285
Width = 76
Height = 13
Caption = 'Od do knji�enja:'
end
object Label22: TLabel
Left = 210
Top = 246
Width = 102
Height = 13
Caption = 'Upi�ite kriterij za ispis:'
end
object Bevel19: TBevel
Left = 210
Top = 22
Width = 310
Height = 106
Style = bsRaised
end
object Bevel20: TBevel
Left = 218
Top = 53
Width = 142
Height = 63
end
object Label23: TLabel
Left = 224
Top = 46
Width = 116
Height = 13
Caption = 'Ispis sredstva od do �ifre'
end
object Bevel21: TBevel
Left = 368
Top = 53
Width = 141
Height = 64
end
object Label24: TLabel
Left = 374
Top = 44
Width = 128
Height = 13
Caption = 'Ispis sredstva od do naziva'
end
object Bevel28: TBevel
Left = 8
Top = 146
Width = 506
Height = 48
end
object lbPrometiRobaNaziv: TLabel
Left = 31
Top = 174
Width = 478
Height = 13
AutoSize = False
Caption = 'lbKarticeRobaNaziv'
end
object rgPrometiRedoslijedKnj: TRadioGroup
Left = 10
Top = 248
Width = 186
Height = 67
Caption = 'Kriterij za filter stavaka kartica po'
ItemIndex = 0
Items.Strings = (
'rednom broju knji�enja')
TabOrder = 8
end
object edPrometiNaslov: TEdit
Left = 11
Top = 443
Width = 229
Height = 21
TabOrder = 16
Text = 'edPrometiNaslov'
end
object edPrometiKnjizenjeDo: TEdit
Left = 218
Top = 334
Width = 121
Height = 21
TabOrder = 11
Text = 'edPrometiKnjizenjeDo'
end
object edPrometiKnjizenjeOd: TEdit
Left = 217
Top = 305
Width = 121
Height = 21
TabOrder = 10
Text = 'edPrometiKnjizenjeOd'
end
object cbPrometiKnjSvi: TCheckBox
Left = 211
Top = 266
Width = 164
Height = 17
Caption = 'Uklju�i sva knji�enja u ispis'
State = cbChecked
TabOrder = 9
end
object rgPrometiRedoslijedRoba: TRadioGroup
Left = 7
Top = 16
Width = 192
Height = 70
Caption = 'Kriterij za filter kartica po'
ItemIndex = 0
Items.Strings = (
'abecedi'
'�ifri sredstva')
TabOrder = 0
end
object edPrometiRobaSifraOd: TEdit
Left = 227
Top = 64
Width = 121
Height = 21
TabOrder = 2
Text = 'edPrometiRobaSifraOd'
end
object edPrometiRobaSifraDo: TEdit
Left = 227
Top = 89
Width = 121
Height = 21
TabOrder = 3
Text = 'edPrometiRobaSifraDo'
end
object cbPrometiRobaSvi: TCheckBox
Left = 216
Top = 29
Width = 183
Height = 17
Caption = 'Ispis svih sredstava (kartica)'
State = cbChecked
TabOrder = 1
end
object edPrometiRobaAbecOd: TEdit
Left = 377
Top = 63
Width = 121
Height = 21
TabOrder = 4
Text = 'edPrometiRobaAbecOd'
end
object edPrometiRobaAbecDo: TEdit
Left = 377
Top = 89
Width = 121
Height = 21
TabOrder = 5
Text = 'edPrometiRobaAbecDo'
end
object cbPrometiRobaNaziv: TCheckBox
Left = 12
Top = 151
Width = 209
Height = 17
Caption = 'Uklju�i samo sredstvo sljede�eg naziva'
TabOrder = 6
end
object edPrometiRobaNaziv: TEdit
Left = 219
Top = 150
Width = 288
Height = 21
CharCase = ecLowerCase
TabOrder = 7
Text = 'edprometirobanaziv'
OnChange = edPrometiRobaNazivChange
end
object edPrometiDokument: TEdit
Left = 11
Top = 398
Width = 63
Height = 21
TabOrder = 12
Text = 'edPrometiDokument'
OnChange = edPrometiDokumentChange
OnKeyPress = edPrometiDokumentKeyPress
end
object btPrometiDokument: TButton
Left = 80
Top = 400
Width = 15
Height = 15
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 14
TabStop = False
OnClick = btPrometiDokumentClick
end
object edPrometiNazivDokumenta: TEdit
Left = 99
Top = 398
Width = 311
Height = 21
TabStop = False
ReadOnly = True
TabOrder = 15
Text = 'edPrometiNazivDokumenta'
end
object cbPrometiDokument: TCheckBox
Left = 11
Top = 377
Width = 240
Height = 17
Caption = 'U izvje�taj uklju�i samo navedeni dokument'
TabOrder = 13
end
object cbPrometiStanjeNula: TCheckBox
Left = 8
Top = 215
Width = 529
Height = 28
Caption = 'Uklju�i srredstva kojima je stanje nula, ali su imali promet'
TabOrder = 17
end
end
end
object pgTemrek: TTabSheet
Caption = 'Temeljnice glavne knjige'
object ScrollBox6: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel29: TBevel
Left = 11
Top = 77
Width = 331
Height = 135
end
object Label25: TLabel
Left = 24
Top = 161
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label26: TLabel
Left = 24
Top = 103
Width = 139
Height = 13
Caption = 'Upi�ite broj temeljnice za ispis'
end
object edTemrekNaslov: TEdit
Left = 25
Top = 176
Width = 302
Height = 21
TabOrder = 0
Text = 'edTemrekNaslov'
end
object edTemrekBroj: TEdit
Left = 24
Top = 120
Width = 121
Height = 21
TabOrder = 1
Text = 'edTemrekBroj'
end
object rgTemrekTip: TRadioGroup
Left = 11
Top = 17
Width = 224
Height = 45
Caption = 'Temeljnica'
Columns = 2
ItemIndex = 0
Items.Strings = (
'ulaza sredstva'
'izlaza sredstva')
TabOrder = 2
OnClick = rgTemrekTipClick
end
end
end
object pgTemspec: TTabSheet
Caption = 'Specifikacija temeljnica'
object ScrollBox8: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel30: TBevel
Left = 11
Top = 69
Width = 331
Height = 135
end
object Label27: TLabel
Left = 24
Top = 153
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label28: TLabel
Left = 24
Top = 95
Width = 139
Height = 13
Caption = 'Upi�ite broj temeljnice za ispis'
end
object edTemspecNaslov: TEdit
Left = 25
Top = 168
Width = 302
Height = 21
TabOrder = 0
Text = 'edTemspecNaslov'
end
object edTemspecBroj: TEdit
Left = 24
Top = 112
Width = 121
Height = 21
TabOrder = 1
Text = 'edTemspecBroj'
end
object rgTemspecTip: TRadioGroup
Left = 12
Top = 13
Width = 224
Height = 45
Caption = 'Temeljnica'
Columns = 2
ItemIndex = 0
Items.Strings = (
'ulaza sredstva'
'izlaza sredstva')
TabOrder = 2
OnClick = rgTemspecTipClick
end
end
end
object pgKontoSpec: TTabSheet
Caption = 'Specifikacije dokumenata po kontima'
object ScrollBox9: TScrollBox
Left = 0
Top = 0
Width = 587
Height = 325
Align = alClient
TabOrder = 0
object Bevel31: TBevel
Left = 13
Top = 16
Width = 434
Height = 86
Style = bsRaised
end
object Bevel32: TBevel
Left = 14
Top = 124
Width = 235
Height = 81
Style = bsRaised
end
object Label33: TLabel
Left = 14
Top = 242
Width = 79
Height = 13
Caption = 'Naslov izvje�taja'
end
object Label34: TLabel
Left = 20
Top = 118
Width = 156
Height = 13
Caption = 'Uklju�i dokumente od do datuma'
end
object Label38: TLabel
Left = 20
Top = 12
Width = 137
Height = 13
Caption = 'Upi�ite konto za specifikaciju'
end
object Label39: TLabel
Left = 29
Top = 59
Width = 6
Height = 13
Caption = 'ili'
end
object edKontospecNaslov: TEdit
Left = 14
Top = 257
Width = 255
Height = 21
TabOrder = 6
Text = 'edKontospecNaslov'
end
object edKontospecDatumDo: TEdit
Left = 29
Top = 169
Width = 121
Height = 21
TabOrder = 5
Text = 'edKontospecDatumDo'
end
object edKontospecDatumOd: TEdit
Left = 29
Top = 141
Width = 121
Height = 21
TabOrder = 4
Text = 'edKontospecDatumOd'
end
object edKontospecKonto: TEdit
Left = 29
Top = 32
Width = 109
Height = 21
TabOrder = 0
Text = 'edKontospecKonto'
OnChange = edKontospecKontoChange
OnKeyPress = edKontospecKontoKeyPress
end
object cbKontospecSvakonta: TCheckBox
Left = 29
Top = 77
Width = 346
Height = 17
Caption = 'Specifikacija za sva konta koja su imala knji�enja'
State = cbChecked
TabOrder = 3
end
object edKontospecNazivkonta: TEdit
Left = 160
Top = 32
Width = 270
Height = 21
Color = clBtnFace
ReadOnly = True
TabOrder = 2
Text = 'edKontospecNazivkonta'
end
object btKontospecKonto: TButton
Left = 140
Top = 35
Width = 15
Height = 15
Caption = '...'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
TabStop = False
OnClick = btKontospecKontoClick
end
object cbKontospecSamoRekap: TCheckBox
Left = 13
Top = 218
Width = 347
Height = 17
Caption = 'U izvje�taj uklju�i samo ukupni iznos za konto bez dokumenata'
TabOrder = 7
end
end
end
end
object PrinterSetupDialog: TPrinterSetupDialog
Left = 517
Top = 502
end
object ta9Konta: TTable
Tag = 2
DatabaseName = 'skupne'
TableName = 'konta.db'
Left = 895
Top = 432
object ta9KontaSintetika_analitika: TStringField
FieldName = 'Sintetika_analitika'
Size = 1
end
object ta9KontaKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta9KontaNaziv: TStringField
DisplayWidth = 100
FieldName = 'Naziv'
Size = 100
end
object ta9KontaPrihod_trosak: TSmallintField
FieldName = 'Prihod_trosak'
end
object ta9KontacfKonto: TStringField
DisplayWidth = 120
FieldName = 'cfKonto'
Size = 120
Calculated = True
end
object ta9Kontacfsintetika_analitika: TStringField
FieldName = 'cfsintetika_analitika'
Calculated = True
end
object ta9Kontacfprihod_trosak: TStringField
FieldName = 'cfprihod_trosak'
Calculated = True
end
object ta9KontaPsDuguje: TFloatField
FieldName = 'PsDuguje'
end
object ta9KontaPsPotrazuje: TFloatField
FieldName = 'PsPotrazuje'
end
object ta9KontaPrDuguje: TFloatField
FieldName = 'PrDuguje'
end
object ta9KontaPrPotrazuje: TFloatField
FieldName = 'PrPotrazuje'
end
object ta9KontaSaDuguje: TFloatField
FieldName = 'SaDuguje'
end
object ta9KontaSaPotrazuje: TFloatField
FieldName = 'SaPotrazuje'
end
end
object ta9Os: TTable
Tag = 3
DatabaseName = 'c:\knjigovodstvo\data\praznepar'
TableName = 'os'
Left = 1018
Top = 429
object ta9OsSifra: TIntegerField
FieldName = 'Sifra'
end
object ta9OsNaziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object ta9OsAmort: TIntegerField
FieldName = 'Amort'
end
object ta9OsJedinica: TIntegerField
FieldName = 'Jedinica'
end
object ta9OsRucna_reva: TBooleanField
FieldName = 'Rucna_reva'
end
object ta9OsAmort_dane: TBooleanField
FieldName = 'Amort_dane'
end
object ta9OsAmort_god: TBooleanField
FieldName = 'Amort_god'
end
object ta9OsAmort_osnov: TFloatField
FieldName = 'Amort_osnov'
end
object ta9OsDatum_nabave: TDateField
FieldName = 'Datum_nabave'
end
object ta9OsDobavljac: TIntegerField
FieldName = 'Dobavljac'
end
object ta9OsDatum_isknj: TDateField
FieldName = 'Datum_isknj'
end
object ta9OscfAmort: TStringField
FieldName = 'cfAmort'
Size = 60
Calculated = True
end
object ta9OscfJedinica: TStringField
FieldName = 'cfJedinica'
Size = 60
Calculated = True
end
end
object ta9DneOs: TTable
Tag = 4
DatabaseName = 'c:\knjigovodstvo\data\praznegod'
TableName = 'dneOs'
Left = 1047
Top = 121
object ta9DneOsKnjizenje: TIntegerField
FieldName = 'Knjizenje'
end
object ta9DneOsDokument: TSmallintField
FieldName = 'Dokument'
end
object ta9DneOsGodina: TSmallintField
FieldName = 'Godina'
end
object ta9DneOsBroj: TIntegerField
FieldName = 'Broj'
end
object ta9DneOsDatum: TDateField
FieldName = 'Datum'
end
object ta9DneOsOpisknj: TStringField
FieldName = 'Opisknj'
Size = 80
end
object ta9DneOsKnjStornirano: TIntegerField
FieldName = 'KnjStornirano'
end
object ta9DneOsDokumTem: TSmallintField
FieldName = 'DokumTem'
end
object ta9DneOsBrojTemeljnice: TSmallintField
FieldName = 'BrojTemeljnice'
end
object ta9DneOscfStorniran: TStringField
FieldName = 'cfStorniran'
Calculated = True
end
object ta9DneOscfDokument: TStringField
FieldName = 'cfDokument'
Size = 100
Calculated = True
end
end
object ta9TemOs: TTable
Tag = 4
DatabaseName = 'c:\knjigovodstvo\data\praznegod'
TableName = 'temOs'
Left = 799
Top = 127
object ta9TemOsRecord: TAutoIncField
FieldName = 'Record'
end
object ta9TemOsDokumTem: TSmallintField
FieldName = 'DokumTem'
end
object ta9TemOsBrojTemeljnice: TSmallintField
FieldName = 'BrojTemeljnice'
end
object ta9TemOsKnjizenje: TIntegerField
FieldName = 'Knjizenje'
end
object ta9TemOsRedbr: TSmallintField
FieldName = 'Redbr'
end
object ta9TemOsKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta9TemOsDuguje: TFloatField
FieldName = 'Duguje'
DisplayFormat = ',0.00'
EditFormat = '0.00'
end
object ta9TemOsPotrazuje: TFloatField
FieldName = 'Potrazuje'
DisplayFormat = ',0.00'
EditFormat = '0.00'
end
object ta9TemOsJedinica: TIntegerField
FieldName = 'Jedinica'
end
object ta9TemOscfKontaNaziv: TStringField
FieldName = 'cfKontaNaziv'
Size = 80
Calculated = True
end
object ta9TemOscfJediniceNaziv: TStringField
FieldName = 'cfJediniceNaziv'
Size = 100
Calculated = True
end
end
object ta9Jedinice: TTable
Tag = 3
DatabaseName = 'praznepar'
TableName = 'jedinice'
Left = 907
Top = 496
object ta9JediniceSifra: TIntegerField
FieldName = 'Sifra'
end
object ta9JediniceTip: TSmallintField
FieldName = 'Tip'
end
object ta9JediniceNaziv: TStringField
FieldName = 'Naziv'
Size = 40
end
object ta9JediniceAdresa: TStringField
FieldName = 'Adresa'
Size = 60
end
object ta9JediniceKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta9JedinicecfTip: TStringField
FieldName = 'cfTip'
Calculated = True
end
end
object ta9Vri_sif: TTable
Tag = 2
DatabaseName = 'Skupne'
TableName = 'vri_sif.db'
Left = 793
Top = 368
object ta9Vri_sifSifrarnik: TStringField
DisplayLabel = '�ifrarnik'
FieldName = 'Sifrarnik'
Size = 30
end
object ta9Vri_sifSifra: TSmallintField
DisplayLabel = '�ifra'
FieldName = 'Sifra'
end
object ta9Vri_sifNaziv: TStringField
FieldName = 'Naziv'
Size = 50
end
object ta9Vri_sifSkr_naziv: TStringField
DisplayLabel = 'Skra�eni naziv'
FieldName = 'Skr_naziv'
Size = 4
end
object ta9Vri_sifTip: TSmallintField
FieldName = 'Tip'
end
object ta9Vri_sifKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta9Vri_sifTekst: TBlobField
FieldName = 'Tekst'
BlobType = ftFmtMemo
end
object ta9Vri_sifZasticen: TBooleanField
FieldName = 'Zasticen'
end
object ta9Vri_sifcfTip: TStringField
DisplayLabel = 'Tip dokumenta'
FieldName = 'cfTip'
Calculated = True
end
end
object ta9Partneri: TTable
Tag = 2
DatabaseName = 'c:\knjigovodstvo\data\skupne'
TableName = 'partneri'
TableType = ttParadox
Left = 838
Top = 433
object ta9PartneriSifra: TIntegerField
DisplayLabel = '�ifra partnera'
FieldName = 'Sifra'
end
object ta9PartneriNaziv: TStringField
FieldName = 'Naziv'
Size = 60
end
object ta9PartneriPtt: TStringField
DisplayLabel = 'Po�tanski broj'
FieldName = 'Ptt'
Size = 5
end
object ta9PartneriMjesto: TStringField
FieldName = 'Mjesto'
Size = 40
end
object ta9PartneriUlica: TStringField
FieldName = 'Ulica'
Size = 60
end
object ta9PartneriZemlja: TSmallintField
FieldName = 'Zemlja'
end
object ta9PartneriDjelatnost: TSmallintField
FieldName = 'Djelatnost'
end
object ta9PartneriBanka: TIntegerField
FieldName = 'Banka'
end
object ta9PartneriTelefon: TStringField
DisplayLabel = 'Telefoni i faxovi'
FieldName = 'Telefon'
Size = 50
end
object ta9PartneriOpcina: TSmallintField
DisplayLabel = 'Op�ina'
FieldName = 'Opcina'
end
object ta9PartneriMaticni_broj: TStringField
DisplayLabel = 'Mati�ni broj ili JMBG'
FieldName = 'Maticni_broj'
Size = 15
end
object ta9PartneriZiro_racun1: TStringField
DisplayLabel = '�iro-ra�un 1'
FieldName = 'Ziro_racun1'
Size = 50
end
object ta9PartneriZiro_racun2: TStringField
DisplayLabel = '�iro-ra�un 2'
FieldName = 'Ziro_racun2'
Size = 50
end
object ta9PartneriRabat: TFloatField
DisplayLabel = 'Rabat u veleprodaji'
FieldName = 'Rabat'
DisplayFormat = '.0000'#39' %'#39
EditFormat = '.0000'
end
object ta9PartneriPorezni_obveznik: TSmallintField
DisplayLabel = 'Porezni obveznik prema PDV-u'
FieldName = 'Porezni_obveznik'
end
object ta9PartnericfPorezni_obveznik: TStringField
FieldName = 'cfPorezni_obveznik'
Calculated = True
end
object ta9PartneriMemo: TBlobField
FieldName = 'Memo'
BlobType = ftFmtMemo
end
object ta9PartneriFilter: TStringField
FieldName = 'Filter'
Size = 60
end
object ta9PartneriSifra_djelat: TStringField
FieldName = 'Sifra_djelat'
Size = 10
end
object ta9PartneriNaziv_djelat: TStringField
FieldName = 'Naziv_djelat'
Size = 100
end
end
end