object fm2400300DnevnikRob: Tfm2400300DnevnikRob Left = 323 Top = 207 Width = 796 Height = 547 HelpContext = 240030000 VertScrollBar.Tracking = True Caption = 'fm2400300DnevnikRob' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] FormStyle = fsMDIChild Position = poDefaultPosOnly Visible = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object paTipke: TPanel Left = 0 Top = 27 Width = 788 Height = 46 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 0 object bbIspis: TBitBtn Left = 74 Top = 24 Width = 70 Height = 20 Hint = 'Poziv prozora sa popisom izvje�taja' Caption = 'Iz&vje�taji' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = bbIspisClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 Spacing = 2 end object bbIzlaz: TBitBtn Left = 3 Top = 3 Width = 70 Height = 20 Hint = 'Prekid rada i izlaz iz prozora' Caption = 'I&zlaz' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = bbIzlazClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000 03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB 0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB 0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB 0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB 0333337F777FFFFF7F3333000000000003333377777777777333} NumGlyphs = 2 Spacing = 2 end object Panel1: TPanel Left = 553 Top = 1 Width = 234 Height = 44 Align = alRight BevelOuter = bvNone TabOrder = 2 object rgRedoslijed: TRadioGroup Left = 75 Top = 4 Width = 151 Height = 37 Caption = 'Redoslijed dokumenata po' Columns = 2 Items.Strings = ( 'knji�enju' 'datumu') TabOrder = 0 OnClick = rgRedoslijedClick end end object bbKartice: TBitBtn Left = 74 Top = 3 Width = 70 Height = 20 Hint = 'Karitce artikala | Poziv prozora sa prikazom kartica artikala' Caption = '&Kartice' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = bbKarticeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 55555555FFFFFFFF5555555000000005555555577777777FF555550999999900 55555575555555775F55509999999901055557F55555557F75F5001111111101 105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F 01105777F555557F75F75500FFFFFF0FF0105577F555FF7F57575550FF700008 8F0055575FF7777555775555000888888F005555777FFFFFFF77555550000000 0F055555577777777F7F555550FFFFFF0F05555557F5FFF57F7F555550F000FF 0005555557F777557775555550FFFFFF0555555557F555FF7F55555550FF7000 05555555575FF777755555555500055555555555557775555555} NumGlyphs = 2 Spacing = 2 end object bbPrimke: TBitBtn Left = 146 Top = 3 Width = 87 Height = 20 Caption = 'Primke' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = bbPrimkeClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC C8807FF7777777777FF700000000000000007777777777777777333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end object bbOtpremnice: TBitBtn Left = 146 Top = 24 Width = 87 Height = 20 Caption = 'Otpremnice' ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = bbOtpremniceClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000 0000557F57F557777777550B305508888880557F57F575555557550B30508888 8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000 0055557F777F555F77F555007800000070555F77557F5F7757F5007888000077 70557755557F775557F508888800777770557F555577555557F5088808077777 70557FF5757F555557F5098988077777705577F7557F555557F5999888077777 705577755575F55557550988888077770555775555575FFF7555088888888000 55557F55555577775555088888880755555575F5555F77555555508888075555 5555575FFF775555555555000755555555555577775555555555} NumGlyphs = 2 end object bbIzdatnice: TBitBtn Left = 234 Top = 3 Width = 87 Height = 20 Caption = 'Izdatnice' ParentShowHint = False ShowHint = True TabOrder = 6 OnClick = bbIzdatniceClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330000000 00003333377777777777333330FFFFFFFFF03FF3F7FFFF33FFF7003000000FF0 00F077F7777773F77737E00FBFBFB0FFFFF07773333FF7FF33F7E0FBFB00000F F0F077F333777773F737E0BFBFBFBFB0FFF077F3333FFFF733F7E0FBFB00000F F0F077F333777773F737E0BFBFBFBFB0FFF077F33FFFFFF733F7E0FB0000000F F0F077FF777777733737000FB0FFFFFFFFF07773F7F333333337333000FFFFFF FFF0333777F3FFF33FF7333330F000FF0000333337F777337777333330FFFFFF 0FF0333337FFFFFF7F37333330CCCCCC0F033333377777777F73333330FFFFFF 0033333337FFFFFF773333333000000003333333377777777333} NumGlyphs = 2 Spacing = 1 end object bbMedjuskladisnice: TBitBtn Left = 234 Top = 24 Width = 87 Height = 20 Caption = 'Me�uskladi�.' ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = bbMedjuskladisniceClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0 B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0 B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000 B0557777FF577777F7F500000E055550805577777F7555575755500000555555 05555777775555557F5555000555555505555577755555557555} NumGlyphs = 2 end end object Panel4: TPanel Left = 0 Top = 0 Width = 788 Height = 27 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 1 object Label4: TLabel Left = 157 Top = 7 Width = 27 Height = 14 Caption = '&Tra�i:' FocusControl = edTrazi end object DBNavigator1: TDBNavigator Left = 1 Top = 1 Width = 139 Height = 25 VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh] Align = alLeft Hints.Strings = ( 'Prvi red' 'Prethodni red' 'Sljede�i red' 'Posljednji red' '' '' '' '' '' 'Obnovi, osvje�i podatke sa diska') TabOrder = 0 end object edTrazi: TEdit Left = 332 Top = 3 Width = 140 Height = 22 Hint = 'Upisivanjem pojedinih znakova �e se pretra�ivati podaci' TabOrder = 2 OnChange = edTraziChange end object cbTrazi: TComboBox Left = 188 Top = 3 Width = 141 Height = 22 Style = csDropDownList ItemHeight = 14 Items.Strings = ( 'knji�enje' 'datum knji�enja' 'dokument;broj') TabOrder = 1 end end object sb: TStatusBar Left = 0 Top = 501 Width = 788 Height = 19 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] Panels = < item Text = 'Status' Width = 100 end item Width = 100 end> ParentFont = False SimplePanel = False end object PageControl: TPageControl Left = 0 Top = 99 Width = 788 Height = 402 ActivePage = pageTabela Align = alClient TabOrder = 3 object pageTabela: TTabSheet Hint = 'Tabelarni pregled podataka' Caption = 'T&abelarni prikaz' object Splitter1: TSplitter Left = 540 Top = 0 Width = 3 Height = 174 Cursor = crHSplit Align = alRight end object Splitter2: TSplitter Left = 0 Top = 174 Width = 780 Height = 3 Cursor = crVSplit Align = alBottom end object grdGlava: TDBGrid Left = 0 Top = 0 Width = 540 Height = 174 Align = alClient Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgCancelOnExit] ReadOnly = True TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] Columns = < item FieldName = 'cfStorniran' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Storniran' Width = 24 end item FieldName = 'brojTemeljnice' Title.Caption = 'Temeljnica' end item FieldName = 'knjizenje' Title.Caption = 'Knji�enje' Width = 29 end item FieldName = 'godina' Title.Caption = 'Godina' Width = 37 end item FieldName = 'datum' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Datum' Width = 62 end item FieldName = 'cfDokument' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Dokument' Width = 181 end item FieldName = 'broj' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Caption = 'Broj' Width = 44 end item Alignment = taRightJustify FieldName = 'cfIznos' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [] Title.Alignment = taRightJustify Title.Caption = 'Iznos' Width = 89 end item FieldName = 'cfPartner' Title.Caption = 'Dobavlja�/kupac/jedinica' Width = 223 end item FieldName = 'opisknj' Title.Caption = 'Opis' Width = 214 end> end object Panel2: TPanel Left = 543 Top = 0 Width = 237 Height = 174 Align = alRight TabOrder = 1 object Bevel4: TBevel Left = 9 Top = 14 Width = 216 Height = 78 end object Label1: TLabel Left = 16 Top = 29 Width = 99 Height = 14 Alignment = taRightJustify AutoSize = False Caption = 'Ulaz (duguje)' Color = clGray ParentColor = False end object Label3: TLabel Left = 120 Top = 30 Width = 99 Height = 14 Alignment = taRightJustify AutoSize = False Caption = 'Izlaz (potra�uje)' Color = clGray ParentColor = False end object Label2: TLabel Left = 81 Top = 70 Width = 30 Height = 14 Caption = 'Saldo:' end object bbPrometDnevnika: TBitBtn Left = 15 Top = 3 Width = 113 Height = 21 Hint = 'Izra�un prometa cijelog dnevnika' Caption = 'Promet dnevnika' ParentShowHint = False ShowHint = False TabOrder = 0 OnClick = bbPrometDnevnikaClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998 0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF733333700000000073333337777777773333} NumGlyphs = 2 end object lbDug: TStaticText Left = 16 Top = 47 Width = 99 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbDug' TabOrder = 1 end object lbPot: TStaticText Left = 120 Top = 47 Width = 99 Height = 18 Alignment = taRightJustify AutoSize = False BorderStyle = sbsSunken Caption = 'lbPot' TabOrder = 2 end object lbSaldo: TStaticText Left = 120 Top = 70 Width = 99 Height = 18 Alignment = taRightJustify AutoSize = False Caption = 'lbSaldo' TabOrder = 3 end object DBNavigator2: TDBNavigator Left = 1 Top = 152 Width = 235 Height = 21 VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh] Align = alBottom Hints.Strings = ( 'Prvi red' 'Prethodni red' 'Sljede�i red' 'Posljednji red' '' '' '' '' '' 'Obnovi, osvje�i podatke sa diska') TabOrder = 4 end end object grdStavke: TDBGrid Left = 0 Top = 177 Width = 780 Height = 196 Align = alBottom Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit] ReadOnly = True TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'Arial CE' TitleFont.Style = [] Columns = < item FieldName = 'redbr' Title.Caption = 'Rbr' Width = 30 end item FieldName = 'cfSifra' Title.Caption = 'Artikl' Width = 203 end item Alignment = taRightJustify FieldName = 'Ulaz' Title.Alignment = taRightJustify Width = 89 end item Alignment = taRightJustify FieldName = 'Izlaz' Title.Alignment = taRightJustify Width = 94 end item FieldName = 'cfJedmj' Title.Caption = 'Jed.mj.' Width = 46 end item FieldName = 'cijena' Title.Alignment = taRightJustify Title.Caption = 'Cijena' Width = 119 end item Alignment = taRightJustify FieldName = 'cfIznos' Title.Alignment = taRightJustify Title.Caption = 'Iznos' Width = 135 end> end end end object paSkladiste: TPanel Left = 0 Top = 73 Width = 788 Height = 26 Align = alTop TabOrder = 4 object Label15: TLabel Left = 10 Top = 6 Width = 43 Height = 14 Caption = '&Skladi�te' FocusControl = cbSkladiste end object btSkladiste: TButton Left = 324 Top = 5 Width = 15 Height = 15 Hint = 'Poziv prozora poslovnih jedinica' Caption = '...' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ParentFont = False TabOrder = 0 TabStop = False OnClick = btSkladisteClick end object cbSkladiste: TComboBox Left = 58 Top = 2 Width = 261 Height = 22 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial CE' Font.Style = [fsBold] ItemHeight = 14 ParentFont = False TabOrder = 1 OnChange = cbSkladisteChange end end object ta1Dnerob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'dnerob' Left = 808 Top = 164 object ta1DnerobKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta1DnerobDokument: TSmallintField FieldName = 'Dokument' end object ta1DnerobGodina: TSmallintField FieldName = 'Godina' end object ta1DnerobBroj: TIntegerField FieldName = 'Broj' end object ta1DnerobDatum: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object ta1DnerobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta1DnerobPartner: TIntegerField FieldName = 'Partner' end object ta1DnerobOpisknj: TStringField FieldName = 'Opisknj' Size = 80 end object ta1DnerobMskl01: TSmallintField FieldName = 'Mskl01' end object ta1DnerobKnjStornirano: TIntegerField FieldName = 'KnjStornirano' end object ta1DnerobGodkalk: TSmallintField FieldName = 'Godkalk' end object ta1DnerobBrojKalk: TIntegerField FieldName = 'BrojKalk' end object ta1DnerobGodNal: TSmallintField FieldName = 'GodNal' end object ta1DnerobBrojNal: TIntegerField FieldName = 'BrojNal' end object ta1DnerobGodRn: TSmallintField FieldName = 'GodRn' end object ta1DnerobBrojRn: TIntegerField FieldName = 'BrojRn' end object ta1DnerobTekstPrije: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object ta1DnerobTekstIza: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object ta1DnerobDokumTem: TSmallintField FieldName = 'DokumTem' end object ta1DnerobBrojTemeljnice: TSmallintField FieldName = 'BrojTemeljnice' end object ta1DnerobcfPartner: TStringField DisplayWidth = 60 FieldName = 'cfPartner' Size = 60 Calculated = True end object ta1DnerobcfSifra: TStringField FieldName = 'cfSifra' Calculated = True end object ta1DnerobcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta1DnerobcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end object ta1DnerobcfDokument: TStringField FieldName = 'cfDokument' Size = 60 Calculated = True end object ta1DnerobcfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta1DnerobcfNalog: TStringField FieldName = 'cfNalog' Size = 60 Calculated = True end object ta1DnerobcfKalkulacija: TStringField FieldName = 'cfKalkulacija' Size = 60 Calculated = True end object ta1DnerobcfRacun: TStringField FieldName = 'cfRacun' Size = 60 Calculated = True end end object ds1Dnerob: TDataSource DataSet = ta1Dnerob Left = 868 Top = 163 end object ta2Dnerob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'dnerob' Left = 806 Top = 216 object ta2DnerobKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta2DnerobDokument: TSmallintField FieldName = 'Dokument' end object ta2DnerobGodina: TSmallintField FieldName = 'Godina' end object ta2DnerobBroj: TIntegerField FieldName = 'Broj' end object ta2DnerobDatum: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object ta2DnerobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta2DnerobPartner: TIntegerField FieldName = 'Partner' end object ta2DnerobOpisknj: TStringField FieldName = 'Opisknj' Size = 80 end object ta2DnerobMskl01: TSmallintField FieldName = 'Mskl01' end object ta2DnerobKnjStornirano: TIntegerField FieldName = 'KnjStornirano' end object ta2DnerobGodkalk: TSmallintField FieldName = 'Godkalk' end object ta2DnerobBrojKalk: TIntegerField FieldName = 'BrojKalk' end object ta2DnerobGodNal: TSmallintField FieldName = 'GodNal' end object ta2DnerobBrojNal: TIntegerField FieldName = 'BrojNal' end object ta2DnerobGodRn: TSmallintField FieldName = 'GodRn' end object ta2DnerobBrojRn: TIntegerField FieldName = 'BrojRn' end object ta2DnerobTekstPrije: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object ta2DnerobTekstIza: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object ta2DnerobDokumTem: TSmallintField FieldName = 'DokumTem' end object ta2DnerobBrojTemeljnice: TSmallintField FieldName = 'BrojTemeljnice' end object ta2DnerobcfPartner: TStringField DisplayWidth = 60 FieldName = 'cfPartner' Size = 60 Calculated = True end object ta2DnerobcfSifra: TStringField FieldName = 'cfSifra' Calculated = True end object ta2DnerobcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta2DnerobcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end object ta2DnerobcfDokument: TStringField FieldName = 'cfDokument' Size = 60 Calculated = True end object ta2DnerobcfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta2DnerobcfNalog: TStringField FieldName = 'cfNalog' Size = 60 Calculated = True end object ta2DnerobcfKalkulacija: TStringField FieldName = 'cfKalkulacija' Size = 60 Calculated = True end object ta2DnerobcfRacun: TStringField FieldName = 'cfRacun' Size = 60 Calculated = True end end object ta3Dnerob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'dnerob' Left = 806 Top = 268 object ta3DnerobKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta3DnerobDokument: TSmallintField FieldName = 'Dokument' end object ta3DnerobGodina: TSmallintField FieldName = 'Godina' end object ta3DnerobBroj: TIntegerField FieldName = 'Broj' end object ta3DnerobDatum: TDateField FieldName = 'Datum' EditMask = '00/00/0000' end object ta3DnerobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta3DnerobPartner: TIntegerField FieldName = 'Partner' end object ta3DnerobOpisknj: TStringField FieldName = 'Opisknj' Size = 80 end object ta3DnerobMskl01: TSmallintField FieldName = 'Mskl01' end object ta3DnerobKnjStornirano: TIntegerField FieldName = 'KnjStornirano' end object ta3DnerobGodkalk: TSmallintField FieldName = 'Godkalk' end object ta3DnerobBrojKalk: TIntegerField FieldName = 'BrojKalk' end object ta3DnerobGodNal: TSmallintField FieldName = 'GodNal' end object ta3DnerobBrojNal: TIntegerField FieldName = 'BrojNal' end object ta3DnerobGodRn: TSmallintField FieldName = 'GodRn' end object ta3DnerobBrojRn: TIntegerField FieldName = 'BrojRn' end object ta3DnerobTekstPrije: TBlobField FieldName = 'TekstPrije' BlobType = ftFmtMemo end object ta3DnerobTekstIza: TBlobField FieldName = 'TekstIza' BlobType = ftFmtMemo end object ta3DnerobDokumTem: TSmallintField FieldName = 'DokumTem' end object ta3DnerobBrojTemeljnice: TSmallintField FieldName = 'BrojTemeljnice' end object ta3DnerobcfPartner: TStringField DisplayWidth = 60 FieldName = 'cfPartner' Size = 60 Calculated = True end object ta3DnerobcfSifra: TStringField FieldName = 'cfSifra' Calculated = True end object ta3DnerobcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta3DnerobcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end object ta3DnerobcfDokument: TStringField FieldName = 'cfDokument' Size = 60 Calculated = True end object ta3DnerobcfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end object ta3DnerobcfNalog: TStringField FieldName = 'cfNalog' Size = 60 Calculated = True end object ta3DnerobcfKalkulacija: TStringField FieldName = 'cfKalkulacija' Size = 60 Calculated = True end object ta3DnerobcfRacun: TStringField FieldName = 'cfRacun' Size = 60 Calculated = True end end object ta1Stavrob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'stavrob' Left = 800 Top = 389 object ta1StavrobRecord: TAutoIncField FieldName = 'Record' end object ta1StavrobKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta1StavrobRedbr: TSmallintField FieldName = 'Redbr' end object ta1StavrobSifra: TIntegerField FieldName = 'Sifra' end object ta1StavrobUlaz: TFloatField FieldName = 'Ulaz' DisplayFormat = ',0.000;;-' EditFormat = '0.000' end object ta1StavrobIzlaz: TFloatField FieldName = 'Izlaz' DisplayFormat = ',0.000;;-' EditFormat = '0.000' end object ta1StavrobCijena: TFloatField FieldName = 'Cijena' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta1StavrobStaraCijena: TFloatField FieldName = 'StaraCijena' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta1StavrobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta1StavrobDatum: TDateField FieldName = 'Datum' end object ta1StavrobcfSifra: TStringField DisplayWidth = 60 FieldName = 'cfSifra' Size = 60 Calculated = True end object ta1StavrobcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta1StavrobcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end object ta1StavrobcfKolicina: TFloatField FieldName = 'cfKolicina' DisplayFormat = ',0.000;;-' Calculated = True end object ta1StavrobcfGodina: TStringField FieldName = 'cfGodina' Calculated = True end object ta1StavrobcfDokument: TStringField FieldName = 'cfDokument' Size = 60 Calculated = True end object ta1StavrobcfBroj: TStringField FieldName = 'cfBroj' Calculated = True end object ta1StavrobcfOpisknj: TStringField FieldName = 'cfOpisknj' Size = 80 Calculated = True end object ta1StavrobcfPartner: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object ta1StavrobcfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end end object ds1Stavrob: TDataSource DataSet = ta1Stavrob Left = 862 Top = 389 end object ta2Stavrob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'stavrob' Left = 798 Top = 445 object ta2StavrobRecord: TAutoIncField FieldName = 'Record' end object ta2StavrobKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta2StavrobRedbr: TSmallintField FieldName = 'Redbr' end object ta2StavrobSifra: TIntegerField FieldName = 'Sifra' end object ta2StavrobUlaz: TFloatField FieldName = 'Ulaz' DisplayFormat = ',0.000;;-' EditFormat = '0.000' end object ta2StavrobIzlaz: TFloatField FieldName = 'Izlaz' DisplayFormat = ',0.000;;-' EditFormat = '0.000' end object ta2StavrobCijena: TFloatField FieldName = 'Cijena' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta2StavrobStaraCijena: TFloatField FieldName = 'StaraCijena' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta2StavrobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta2StavrobDatum: TDateField FieldName = 'Datum' end object ta2StavrobcfSifra: TStringField DisplayWidth = 60 FieldName = 'cfSifra' Size = 60 Calculated = True end object ta2StavrobcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta2StavrobcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end object ta2StavrobcfKolicina: TFloatField FieldName = 'cfKolicina' DisplayFormat = ',0.000;;-' Calculated = True end object ta2StavrobcfGodina: TStringField FieldName = 'cfGodina' Calculated = True end object ta2StavrobcfDokument: TStringField FieldName = 'cfDokument' Size = 60 Calculated = True end object ta2StavrobcfBroj: TStringField FieldName = 'cfBroj' Calculated = True end object ta2StavrobcfOpisknj: TStringField FieldName = 'cfOpisknj' Size = 80 Calculated = True end object ta2StavrobcfPartner: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object ta2StavrobcfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end end object ta3Stavrob: TTable Tag = 4 DatabaseName = 'c:\knjigovodstvo\data\praznegod' TableName = 'stavrob' Left = 798 Top = 499 object ta3StavrobRecord: TAutoIncField FieldName = 'Record' end object ta3StavrobKnjizenje: TIntegerField FieldName = 'Knjizenje' end object ta3StavrobRedbr: TSmallintField FieldName = 'Redbr' end object ta3StavrobSifra: TIntegerField FieldName = 'Sifra' end object ta3StavrobUlaz: TFloatField FieldName = 'Ulaz' DisplayFormat = ',0.000;;-' EditFormat = '0.000' end object ta3StavrobIzlaz: TFloatField FieldName = 'Izlaz' DisplayFormat = ',0.000;;-' EditFormat = '0.000' end object ta3StavrobCijena: TFloatField FieldName = 'Cijena' DisplayFormat = ',0.00####;;-' EditFormat = '0.00####' end object ta3StavrobStaraCijena: TFloatField FieldName = 'StaraCijena' DisplayFormat = ',0.00;;-' EditFormat = '0.00' end object ta3StavrobSkladiste: TIntegerField FieldName = 'Skladiste' end object ta3StavrobDatum: TDateField FieldName = 'Datum' end object ta3StavrobcfSifra: TStringField DisplayWidth = 60 FieldName = 'cfSifra' Size = 60 Calculated = True end object ta3StavrobcfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta3StavrobcfIznos: TStringField FieldName = 'cfIznos' Calculated = True end object ta3StavrobcfKolicina: TFloatField FieldName = 'cfKolicina' DisplayFormat = ',0.000;;-' Calculated = True end object ta3StavrobcfGodina: TStringField FieldName = 'cfGodina' Calculated = True end object ta3StavrobcfDokument: TStringField FieldName = 'cfDokument' Size = 60 Calculated = True end object ta3StavrobcfBroj: TStringField FieldName = 'cfBroj' Calculated = True end object ta3StavrobcfOpisknj: TStringField FieldName = 'cfOpisknj' Size = 80 Calculated = True end object ta3StavrobcfPartner: TStringField FieldName = 'cfPartner' Size = 60 Calculated = True end object ta3StavrobcfStorniran: TStringField FieldName = 'cfStorniran' Calculated = True end end object ta1Jedinice: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'jedinice' Left = 409 Top = 678 object ta1JediniceSifra: TIntegerField FieldName = 'Sifra' end object ta1JediniceTip: TSmallintField FieldName = 'Tip' end object ta1JediniceNaziv: TStringField FieldName = 'Naziv' Size = 40 end object ta1JediniceAdresa: TStringField FieldName = 'Adresa' Size = 60 end object ta1JediniceKonto: TStringField FieldName = 'Konto' Size = 10 end object ta1JedinicecfTip: TStringField FieldName = 'cfTip' Calculated = True end end object ta1Roba: TTable Tag = 3 DatabaseName = 'praznepar' TableName = 'roba' Left = 553 Top = 680 object ta1RobaSifra: TIntegerField FieldName = 'Sifra' end object ta1RobaNaziv: TStringField FieldName = 'Naziv' Size = 60 end object ta1RobaOpis: TBlobField FieldName = 'Opis' BlobType = ftFmtMemo end object ta1RobaTip: TSmallintField FieldName = 'Tip' end object ta1RobaKlas: TStringField FieldName = 'Klas' Size = 30 end object ta1RobaJedmj: TSmallintField FieldName = 'Jedmj' end object ta1RobaKatbroj: TStringField FieldName = 'Katbroj' Size = 30 end object ta1RobaEan13: TStringField FieldName = 'Ean13' Size = 13 end object ta1RobaPorez: TSmallintField FieldName = 'Porez' end object ta1RobaOznacen: TSmallintField FieldName = 'Oznacen' end object ta1RobaProizvodjac: TIntegerField FieldName = 'Proizvodjac' end object ta1RobaMinz: TFloatField FieldName = 'Minz' DisplayFormat = '0.000;;-' EditFormat = '0.000' end object ta1RobaMaxz: TFloatField FieldName = 'Maxz' DisplayFormat = '0.000;;-' EditFormat = '0.000' end object ta1RobacfTip: TStringField FieldName = 'cfTip' Calculated = True end object ta1RobacfJedmj: TStringField FieldName = 'cfJedmj' Calculated = True end object ta1RobacfPorez: TStringField FieldName = 'cfPorez' Calculated = True end object ta1RobacfCijena: TFloatField FieldName = 'cfCijena' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfNc: TFloatField FieldName = 'cfNc' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfMarza: TFloatField FieldName = 'cfMarza' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfPorezIznos: TFloatField FieldName = 'cfPorezIznos' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfCijena2: TFloatField FieldName = 'cfCijena2' DisplayFormat = ',0.00;;-' Calculated = True end object ta1RobacfStanje: TFloatField FieldName = 'cfStanje' DisplayFormat = ',0.000;;-' Calculated = True end object ta1RobacfMarzaStopa: TStringField FieldName = 'cfMarzaStopa' Calculated = True end object ta1RobacfCijena1: TStringField FieldName = 'cfCijena1' Calculated = True end end object ta1Vri_sif: TTable Tag = 2 DatabaseName = 'Skupne' TableName = 'vri_sif.db' Left = 171 Top = 658 object ta1Vri_sifSifrarnik: TStringField DisplayLabel = '�ifrarnik' FieldName = 'Sifrarnik' Size = 30 end object ta1Vri_sifSifra: TSmallintField DisplayLabel = '�ifra' FieldName = 'Sifra' end object ta1Vri_sifNaziv: TStringField FieldName = 'Naziv' Size = 50 end object ta1Vri_sifSkr_naziv: TStringField DisplayLabel = 'Skra�eni naziv' FieldName = 'Skr_naziv' Size = 4 end object ta1Vri_sifTip: TSmallintField FieldName = 'Tip' end object ta1Vri_sifKonto: TStringField FieldName = 'Konto' Size = 10 end object ta1Vri_sifTekst: TBlobField FieldName = 'Tekst' BlobType = ftFmtMemo end object ta1Vri_sifZasticen: TBooleanField FieldName = 'Zasticen' end object ta1Vri_sifcfTip: TStringField DisplayLabel = 'Tip dokumenta' FieldName = 'cfTip' Calculated = True end end object ta3Vri_sif: TTable Tag = 2 DatabaseName = 'Skupne' TableName = 'vri_sif.db' Left = 169 Top = 750 object ta3Vri_sifSifrarnik: TStringField DisplayLabel = '�ifrarnik' FieldName = 'Sifrarnik' Size = 30 end object ta3Vri_sifSifra: TSmallintField DisplayLabel = '�ifra' FieldName = 'Sifra' end object ta3Vri_sifNaziv: TStringField FieldName = 'Naziv' Size = 50 end object ta3Vri_sifSkr_naziv: TStringField DisplayLabel = 'Skra�eni naziv' FieldName = 'Skr_naziv' Size = 4 end object ta3Vri_sifTip: TSmallintField FieldName = 'Tip' end object ta3Vri_sifKonto: TStringField FieldName = 'Konto' Size = 10 end object ta3Vri_sifTekst: TBlobField FieldName = 'Tekst' BlobType = ftFmtMemo end object ta3Vri_sifZasticen: TBooleanField FieldName = 'Zasticen' end object ta3Vri_sifcfTip: TStringField DisplayLabel = 'Tip dokumenta' FieldName = 'cfTip' Calculated = True end end object ta1Partneri: TTable Tag = 2 DatabaseName = 'c:\knjigovodstvo\data\skupne' TableName = 'partneri' TableType = ttParadox Left = 742 Top = 653 object ta1PartneriSifra: TIntegerField DisplayLabel = '�ifra partnera' FieldName = 'Sifra' end object ta1PartneriNaziv: TStringField FieldName = 'Naziv' Size = 60 end object ta1PartneriPtt: TStringField DisplayLabel = 'Po�tanski broj' FieldName = 'Ptt' Size = 5 end object ta1PartneriMjesto: TStringField FieldName = 'Mjesto' Size = 40 end object ta1PartneriUlica: TStringField FieldName = 'Ulica' Size = 60 end object ta1PartneriZemlja: TSmallintField FieldName = 'Zemlja' end object ta1PartneriDjelatnost: TSmallintField FieldName = 'Djelatnost' end object ta1PartneriBanka: TIntegerField FieldName = 'Banka' end object ta1PartneriTelefon: TStringField DisplayLabel = 'Telefoni i faxovi' FieldName = 'Telefon' Size = 50 end object ta1PartneriOpcina: TSmallintField DisplayLabel = 'Op�ina' FieldName = 'Opcina' end object ta1PartneriMaticni_broj: TStringField DisplayLabel = 'Mati�ni broj ili JMBG' FieldName = 'Maticni_broj' Size = 15 end object ta1PartneriZiro_racun1: TStringField DisplayLabel = '�iro-ra�un 1' FieldName = 'Ziro_racun1' Size = 50 end object ta1PartneriZiro_racun2: TStringField DisplayLabel = '�iro-ra�un 2' FieldName = 'Ziro_racun2' Size = 50 end object ta1PartneriRabat: TFloatField DisplayLabel = 'Rabat u veleprodaji' FieldName = 'Rabat' DisplayFormat = '.0000'#39' %'#39 EditFormat = '.0000' end object ta1PartneriPorezni_obveznik: TSmallintField DisplayLabel = 'Porezni obveznik prema PDV-u' FieldName = 'Porezni_obveznik' end object ta1PartnericfPorezni_obveznik: TStringField FieldName = 'cfPorezni_obveznik' Calculated = True end object ta1PartneriMemo: TBlobField FieldName = 'Memo' BlobType = ftFmtMemo end object ta1PartneriFilter: TStringField FieldName = 'Filter' Size = 60 end object ta1PartneriSifra_djelat: TStringField FieldName = 'Sifra_djelat' Size = 10 end object ta1PartneriNaziv_djelat: TStringField FieldName = 'Naziv_djelat' Size = 100 end end object ta3Partneri: TTable Tag = 2 DatabaseName = 'c:\knjigovodstvo\data\skupne' TableName = 'partneri' TableType = ttParadox Left = 740 Top = 703 object IntegerField1: TIntegerField DisplayLabel = '�ifra partnera' FieldName = 'Sifra' end object StringField1: TStringField FieldName = 'Naziv' Size = 60 end object StringField2: TStringField DisplayLabel = 'Po�tanski broj' FieldName = 'Ptt' Size = 5 end object StringField3: TStringField FieldName = 'Mjesto' Size = 40 end object StringField4: TStringField FieldName = 'Ulica' Size = 60 end object SmallintField1: TSmallintField FieldName = 'Zemlja' end object SmallintField2: TSmallintField FieldName = 'Djelatnost' end object IntegerField2: TIntegerField FieldName = 'Banka' end object StringField5: TStringField DisplayLabel = 'Telefoni i faxovi' FieldName = 'Telefon' Size = 50 end object SmallintField3: TSmallintField DisplayLabel = 'Op�ina' FieldName = 'Opcina' end object StringField6: TStringField DisplayLabel = 'Mati�ni broj ili JMBG' FieldName = 'Maticni_broj' Size = 15 end object StringField7: TStringField DisplayLabel = '�iro-ra�un 1' FieldName = 'Ziro_racun1' Size = 50 end object StringField8: TStringField DisplayLabel = '�iro-ra�un 2' FieldName = 'Ziro_racun2' Size = 50 end object FloatField1: TFloatField DisplayLabel = 'Rabat u veleprodaji' FieldName = 'Rabat' DisplayFormat = '.0000'#39' %'#39 EditFormat = '.0000' end object SmallintField4: TSmallintField DisplayLabel = 'Porezni obveznik prema PDV-u' FieldName = 'Porezni_obveznik' end object StringField9: TStringField FieldName = 'cfPorezni_obveznik' Calculated = True end object BlobField1: TBlobField FieldName = 'Memo' BlobType = ftFmtMemo end object StringField10: TStringField FieldName = 'Filter' Size = 60 end object StringField11: TStringField FieldName = 'Sifra_djelat' Size = 10 end object StringField12: TStringField FieldName = 'Naziv_djelat' Size = 100 end end end