home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BUG 14
/
BUGCD1998_05.ISO
/
aplic
/
ipos
/
_setup.1
/
Knjigovodstvo.exe
/
0
/
RCDATA
/
TFM2401004ROBREPTEMREK
/
TFM2401004ROBREPTEMREK.txt
Wrap
Text File
|
1998-04-04
|
23KB
|
877 lines
object fm2401004RobRepTemrek: Tfm2401004RobRepTemrek
Left = 342
Top = 237
Width = 705
Height = 486
Caption = 'fm2401004RobRepTemrek'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = []
Scaled = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 14
object qrReport: TQuickRep
Left = 17
Top = 15
Width = 794
Height = 1123
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AfterPreview = qrReportAfterPreview
BeforePrint = qrReportBeforePrint
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = []
OnPreview = qrReportPreview
Options = [FirstPageHeader, LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = A4
Page.Values = (
100.000000000000000000
2970.000000000000000000
100.000000000000000000
2100.000000000000000000
100.000000000000000000
100.000000000000000000
0.000000000000000000)
PrintIfEmpty = False
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = First
SnapToGrid = False
Units = MM
Zoom = 100
object rbTitle: TQRBand
Left = 38
Top = 78
Width = 718
Height = 52
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial CE'
Font.Style = []
ForceNewColumn = False
ForceNewPage = False
ParentFont = False
Size.Values = (
137.583333333333300000
1899.708333333333000000)
BandType = rbTitle
object QRSysData3: TQRSysData
Left = 312
Top = 10
Width = 93
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.916666666666660000
825.500000000000100000
26.458333333333330000
246.062500000000000000)
Alignment = taCenter
AlignToBand = True
AutoSize = True
Color = clWhite
Data = qrsReportTitle
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial CE'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
FontSize = 12
end
end
object rbDetail: TQRBand
Left = 38
Top = 183
Width = 718
Height = 23
Frame.Color = clGray
Frame.DrawTop = False
Frame.DrawBottom = True
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
BeforePrint = rbDetailBeforePrint
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
60.854166666666680000
1899.708333333333000000)
BandType = rbDetail
end
object rbPageHeader: TQRBand
Left = 38
Top = 38
Width = 718
Height = 40
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
105.833333333333300000
1899.708333333333000000)
BandType = rbPageHeader
object QRSysData1: TQRSysData
Left = 0
Top = 11
Width = 82
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
0.000000000000000000
29.104166666666670000
216.958333333333400000)
Alignment = taLeftJustify
AlignToBand = True
AutoSize = True
Color = clWhite
Data = qrsPageNumber
Text = 'Stranica:'
Transparent = False
FontSize = 8
end
object QRSysData2: TQRSysData
Left = 616
Top = 11
Width = 102
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
1629.833333333333000000
29.104166666666670000
269.875000000000000000)
Alignment = taRightJustify
AlignToBand = True
AutoSize = True
Color = clWhite
Data = qrsDateTime
Text = 'Ispisano: '
Transparent = False
FontSize = 8
end
object lbPartner: TQRLabel
Left = 144
Top = 11
Width = 47
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
381.440972222222200000
28.663194444444440000
123.472222222222200000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'lbPartner'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = [fsItalic]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
end
object rbPageFooter: TQRBand
Left = 38
Top = 264
Width = 718
Height = 28
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -8
Font.Name = 'Arial CE'
Font.Style = []
ForceNewColumn = False
ForceNewPage = False
ParentFont = False
Size.Values = (
74.083333333333340000
1899.708333333333000000)
BandType = rbPageFooter
object lbCRight: TQRLabel
Left = 0
Top = 9
Width = 31
Height = 11
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
29.104166666666670000
0.000000000000000000
23.812500000000000000
82.020833333333340000)
Alignment = taLeftJustify
AlignToBand = True
AutoSize = True
AutoStretch = False
Caption = 'lbCRight'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -8
Font.Name = 'Arial CE'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 6
end
end
object rbColumnHeader: TQRBand
Left = 38
Top = 130
Width = 718
Height = 32
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = True
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Arial CE'
Font.Style = [fsBold]
ForceNewColumn = False
ForceNewPage = False
ParentFont = False
Size.Values = (
84.666666666666670000
1899.708333333333000000)
BandType = rbColumnHeader
object qrLabel: TQRLabel
Left = 1
Top = 7
Width = 278
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
41.892361111111110000
2.204861111111111000
17.638888888888890000
734.218750000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Konto'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel4: TQRLabel
Left = 282
Top = 7
Width = 117
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
41.892361111111110000
747.447916666666700000
17.638888888888890000
308.680555555555600000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Duguje'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel12: TQRLabel
Left = 529
Top = 7
Width = 185
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
41.892361111111110000
1400.086805555556000000
17.638888888888890000
489.479166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Jedinica'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel1: TQRLabel
Left = 406
Top = 7
Width = 117
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
41.892361111111110000
1073.767361111111000000
17.638888888888890000
308.680555555555600000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Potra�uje'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
end
object rbSummary: TQRBand
Left = 38
Top = 233
Width = 718
Height = 31
Frame.Color = clBlack
Frame.DrawTop = True
Frame.DrawBottom = True
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
BeforePrint = rbSummaryBeforePrint
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
82.020833333333340000
1899.708333333333000000)
BandType = rbSummary
object UkupnoDuguje: TQRLabel
Left = 283
Top = 5
Width = 114
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
749.652777777777800000
13.229166666666670000
302.065972222222200000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = True
Caption = 'UkupnoDuguje'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 8
end
object UkupnoPotrazuje: TQRLabel
Left = 408
Top = 4
Width = 114
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
1078.177083333333000000
11.024305555555560000
302.065972222222200000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = True
Caption = 'UkupnoPotrazuje'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 8
end
object QRLabel2: TQRLabel
Left = 1
Top = 5
Width = 37
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
2.204861111111111000
13.229166666666670000
97.013888888888890000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Ukupno'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 8
end
end
object rbGroup: TQRGroup
Left = 38
Top = 162
Width = 718
Height = 21
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
55.562500000000000000
1899.708333333333000000)
FooterBand = rbGroupFooter
Master = qrReport
end
object rbGroupFooter: TQRBand
Left = 38
Top = 206
Width = 718
Height = 27
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
BeforePrint = rbGroupFooterBeforePrint
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
71.437500000000000000
1899.708333333333000000)
BandType = rbGroupFooter
object konto: TQRLabel
Left = 0
Top = 5
Width = 278
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
0.000000000000000000
13.229166666666670000
735.541666666666700000)
Alignment = taLeftJustify
AlignToBand = True
AutoSize = False
AutoStretch = True
Caption = 'konto'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial CE'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object duguje: TQRLabel
Left = 283
Top = 5
Width = 114
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
749.652777777777800000
13.229166666666670000
302.065972222222200000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = True
Caption = 'duguje'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 8
end
object potrazuje: TQRLabel
Left = 406
Top = 5
Width = 116
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
1073.767361111111000000
13.229166666666670000
306.475694444444400000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = True
Caption = 'duguje'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 8
end
object jedinica: TQRLabel
Left = 529
Top = 5
Width = 185
Height = 15
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
39.687500000000000000
1400.086805555556000000
13.229166666666670000
489.479166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = True
Caption = 'jedinica'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 8
end
end
end
object ta1Temrob: TTable
Tag = 4
DatabaseName = 'c:\knjigovodstvo\data\praznegod'
TableName = 'temrob'
Left = 996
Top = 196
object ta1TemrobRecord: TAutoIncField
FieldName = 'Record'
end
object ta1TemrobDokumTem: TSmallintField
FieldName = 'DokumTem'
end
object ta1TemrobBrojTemeljnice: TSmallintField
FieldName = 'BrojTemeljnice'
end
object ta1TemrobKnjizenje: TIntegerField
FieldName = 'Knjizenje'
end
object ta1TemrobRedbr: TSmallintField
FieldName = 'Redbr'
end
object ta1TemrobKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta1TemrobDuguje: TFloatField
FieldName = 'Duguje'
DisplayFormat = ',0.00;;-'
EditFormat = '0.00'
end
object ta1TemrobPotrazuje: TFloatField
FieldName = 'Potrazuje'
DisplayFormat = ',0.00;;-'
EditFormat = '0.00'
end
object ta1TemrobJedinica: TIntegerField
FieldName = 'Jedinica'
end
object ta1TemrobcfKontaNaziv: TStringField
FieldName = 'cfKontaNaziv'
Size = 100
Calculated = True
end
object ta1TemrobcfJediniceNaziv: TStringField
FieldName = 'cfJediniceNaziv'
Size = 60
Calculated = True
end
end
object ta3Temrob: TTable
Tag = 4
DatabaseName = 'c:\knjigovodstvo\data\praznegod'
TableName = 'temrob'
Left = 994
Top = 324
object ta3TemrobRecord: TAutoIncField
FieldName = 'Record'
end
object ta3TemrobDokumTem: TSmallintField
FieldName = 'DokumTem'
end
object ta3TemrobBrojTemeljnice: TSmallintField
FieldName = 'BrojTemeljnice'
end
object ta3TemrobKnjizenje: TIntegerField
FieldName = 'Knjizenje'
end
object ta3TemrobRedbr: TSmallintField
FieldName = 'Redbr'
end
object ta3TemrobKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta3TemrobDuguje: TFloatField
FieldName = 'Duguje'
DisplayFormat = ',0.00;;-'
EditFormat = '0.00'
end
object ta3TemrobPotrazuje: TFloatField
FieldName = 'Potrazuje'
DisplayFormat = ',0.00;;-'
EditFormat = '0.00'
end
object ta3TemrobJedinica: TIntegerField
FieldName = 'Jedinica'
end
object ta3TemrobcfKontaNaziv: TStringField
FieldName = 'cfKontaNaziv'
Size = 100
Calculated = True
end
object ta3TemrobcfJediniceNaziv: TStringField
FieldName = 'cfJediniceNaziv'
Size = 60
Calculated = True
end
end
object ta1Vri_sif: TTable
Tag = 2
DatabaseName = 'Skupne'
TableName = 'vri_sif.db'
Left = 933
Top = 394
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 ta1Konta: TTable
Tag = 2
DatabaseName = 'skupne'
TableName = 'konta.db'
Left = 969
Top = 540
object ta1KontaSintetika_analitika: TStringField
FieldName = 'Sintetika_analitika'
Size = 1
end
object ta1KontaKonto: TStringField
FieldName = 'Konto'
Size = 10
end
object ta1KontaNaziv: TStringField
DisplayWidth = 100
FieldName = 'Naziv'
Size = 100
end
object ta1KontaPrihod_trosak: TSmallintField
FieldName = 'Prihod_trosak'
end
object ta1KontacfKonto: TStringField
DisplayWidth = 120
FieldName = 'cfKonto'
Size = 120
Calculated = True
end
object ta1Kontacfsintetika_analitika: TStringField
FieldName = 'cfsintetika_analitika'
Calculated = True
end
object ta1Kontacfprihod_trosak: TStringField
FieldName = 'cfprihod_trosak'
Calculated = True
end
object ta1KontaPsDuguje: TFloatField
FieldName = 'PsDuguje'
end
object ta1KontaPsPotrazuje: TFloatField
FieldName = 'PsPotrazuje'
end
object ta1KontaPrDuguje: TFloatField
FieldName = 'PrDuguje'
end
object ta1KontaPrPotrazuje: TFloatField
FieldName = 'PrPotrazuje'
end
object ta1KontaSaDuguje: TFloatField
FieldName = 'SaDuguje'
end
object ta1KontaSaPotrazuje: TFloatField
FieldName = 'SaPotrazuje'
end
end
object ta1Jedinice: TTable
Tag = 3
DatabaseName = 'praznepar'
TableName = 'jedinice'
Left = 943
Top = 306
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
end