home *** CD-ROM | disk | FTP | other *** search
/ BUG 14 / BUGCD1998_05.ISO / aplic / ipos / _setup.1 / Knjigovodstvo.exe / 0 / RCDATA / TFM3101200BRISANJEPODATAKA / TFM3101200BRISANJEPODATAKA.txt
Text File  |  1998-04-04  |  24KB  |  869 lines

  1. object fm3101200BrisanjePodataka: Tfm3101200BrisanjePodataka
  2.   Left = 303
  3.   Top = 196
  4.   HelpContext = 310000029
  5.   BorderStyle = bsDialog
  6.   Caption = 'fm3101200BrisanjePodataka'
  7.   ClientHeight = 460
  8.   ClientWidth = 585
  9.   Font.Charset = DEFAULT_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = []
  14.   FormStyle = fsMDIChild
  15.   Position = poScreenCenter
  16.   Visible = True
  17.   OnActivate = FormActivate
  18.   OnClose = FormClose
  19.   OnCreate = FormCreate
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object paTipke: TPanel
  23.     Left = 0
  24.     Top = 419
  25.     Width = 585
  26.     Height = 41
  27.     Align = alBottom
  28.     TabOrder = 0
  29.     object bbBrisanje: TBitBtn
  30.       Left = 4
  31.       Top = 8
  32.       Width = 135
  33.       Height = 25
  34.       Hint = 'Pokretanje procedure uskla∩┐╜ivanja'
  35.       Caption = '&Brisanje podataka'
  36.       Default = True
  37.       TabOrder = 0
  38.       OnClick = bbBrisanjeClick
  39.       Glyph.Data = {
  40.         76010000424D7601000000000000760000002800000020000000100000000100
  41.         04000000000000010000120B0000120B00001000000000000000000000000000
  42.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  43.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
  44.         555557777F777555F55500000000555055557777777755F75555005500055055
  45.         555577F5777F57555555005550055555555577FF577F5FF55555500550050055
  46.         5555577FF77577FF555555005050110555555577F757777FF555555505099910
  47.         555555FF75777777FF555005550999910555577F5F77777775F5500505509990
  48.         3055577F75F77777575F55005055090B030555775755777575755555555550B0
  49.         B03055555F555757575755550555550B0B335555755555757555555555555550
  50.         BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
  51.         50BB555555555555575F555555555555550B5555555555555575}
  52.       NumGlyphs = 2
  53.     end
  54.     object bbIzlaz: TBitBtn
  55.       Left = 495
  56.       Top = 8
  57.       Width = 85
  58.       Height = 25
  59.       Caption = 'I&zlaz'
  60.       TabOrder = 1
  61.       OnClick = bbIzlazClick
  62.       Glyph.Data = {
  63.         76010000424D7601000000000000760000002800000020000000100000000100
  64.         04000000000000010000120B0000120B00001000000000000000000000000000
  65.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  66.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
  67.         03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
  68.         0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
  69.         0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
  70.         0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
  71.         0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
  72.         0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
  73.         0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
  74.         0333337F777FFFFF7F3333000000000003333377777777777333}
  75.       NumGlyphs = 2
  76.     end
  77.   end
  78.   object paStatus: TPanel
  79.     Left = 0
  80.     Top = 333
  81.     Width = 585
  82.     Height = 86
  83.     Align = alBottom
  84.     TabOrder = 1
  85.     Visible = False
  86.     object lbPoruka: TLabel
  87.       Left = 13
  88.       Top = 14
  89.       Width = 51
  90.       Height = 13
  91.       Caption = 'lbPoruka'
  92.       Font.Charset = DEFAULT_CHARSET
  93.       Font.Color = clWindowText
  94.       Font.Height = -11
  95.       Font.Name = 'MS Sans Serif'
  96.       Font.Style = [fsBold]
  97.       ParentFont = False
  98.     end
  99.     object lbPoruka2: TLabel
  100.       Left = 13
  101.       Top = 33
  102.       Width = 48
  103.       Height = 13
  104.       Caption = 'lbPoruka2'
  105.     end
  106.     object bbPrekidKorisnika: TBitBtn
  107.       Left = 495
  108.       Top = 10
  109.       Width = 85
  110.       Height = 23
  111.       Caption = 'Pre&kid'
  112.       TabOrder = 0
  113.       OnClick = bbPrekidKorisnikaClick
  114.       Glyph.Data = {
  115.         76010000424D7601000000000000760000002800000020000000100000000100
  116.         04000000000000010000130B0000130B00001000000000000000000000000000
  117.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  118.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  119.         3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
  120.         3333333777333777FF3333993333339993333377FF3333377FF3399993333339
  121.         993337777FF3333377F3393999333333993337F777FF333337FF993399933333
  122.         399377F3777FF333377F993339993333399377F33777FF33377F993333999333
  123.         399377F333777FF3377F993333399933399377F3333777FF377F993333339993
  124.         399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
  125.         99333773FF3333777733339993333339933333773FFFFFF77333333999999999
  126.         3333333777333777333333333999993333333333377777333333}
  127.       NumGlyphs = 2
  128.     end
  129.     object progres: TProgressBar
  130.       Left = 14
  131.       Top = 59
  132.       Width = 557
  133.       Height = 18
  134.       Min = 0
  135.       Max = 100
  136.       Step = 1
  137.       TabOrder = 1
  138.     end
  139.   end
  140.   object ScrollBox1: TScrollBox
  141.     Left = 0
  142.     Top = 0
  143.     Width = 585
  144.     Height = 166
  145.     Align = alTop
  146.     TabOrder = 2
  147.     object capRazdoblje: TLabel
  148.       Left = 171
  149.       Top = 95
  150.       Width = 103
  151.       Height = 13
  152.       Caption = 'Obra∩┐╜unsko razdoblje'
  153.     end
  154.     object capGodina: TLabel
  155.       Left = 171
  156.       Top = 17
  157.       Width = 34
  158.       Height = 13
  159.       Caption = 'Godina'
  160.     end
  161.     object Label1: TLabel
  162.       Left = 3
  163.       Top = 147
  164.       Width = 87
  165.       Height = 13
  166.       Caption = 'Zabilje∩┐╜ke brisanja'
  167.     end
  168.     object capMjesec: TLabel
  169.       Left = 171
  170.       Top = 53
  171.       Width = 34
  172.       Height = 13
  173.       Caption = 'Mjesec'
  174.     end
  175.     object rgKriterij1: TRadioGroup
  176.       Left = 12
  177.       Top = 9
  178.       Width = 151
  179.       Height = 130
  180.       Caption = 'Brisanje podataka'
  181.       ItemIndex = 0
  182.       Items.Strings = (
  183.         'Poslovne godine'
  184.         'Mjeseca'
  185.         'Obra∩┐╜unskog razdoblja')
  186.       TabOrder = 0
  187.       OnClick = rgKriterij1Click
  188.     end
  189.     object edRazdoblje: TEdit
  190.       Left = 171
  191.       Top = 108
  192.       Width = 92
  193.       Height = 21
  194.       TabOrder = 3
  195.       Text = 'edRazdoblje'
  196.       OnChange = edRazdobljeChange
  197.       OnKeyPress = edRazdobljeKeyPress
  198.     end
  199.     object btRazdoblje: TButton
  200.       Left = 268
  201.       Top = 110
  202.       Width = 15
  203.       Height = 15
  204.       Caption = '...'
  205.       Font.Charset = DEFAULT_CHARSET
  206.       Font.Color = clWindowText
  207.       Font.Height = -11
  208.       Font.Name = 'Arial CE'
  209.       Font.Style = [fsBold]
  210.       ParentFont = False
  211.       TabOrder = 4
  212.       TabStop = False
  213.       OnClick = btRazdobljeClick
  214.     end
  215.     object edRazdobljeNaziv: TEdit
  216.       Left = 287
  217.       Top = 107
  218.       Width = 291
  219.       Height = 21
  220.       TabStop = False
  221.       ReadOnly = True
  222.       TabOrder = 5
  223.     end
  224.     object edMjesec: TEdit
  225.       Left = 171
  226.       Top = 67
  227.       Width = 54
  228.       Height = 21
  229.       TabOrder = 2
  230.       Text = 'edMjesec'
  231.       OnChange = edMjesecChange
  232.       OnKeyPress = edGodinaKeyPress
  233.     end
  234.     object edGodina: TEdit
  235.       Left = 171
  236.       Top = 31
  237.       Width = 54
  238.       Height = 21
  239.       TabOrder = 1
  240.       Text = 'edGodina'
  241.       OnChange = edGodinaChange
  242.       OnKeyPress = edGodinaKeyPress
  243.     end
  244.   end
  245.   object edZabiljeske: TRichEdit
  246.     Left = 0
  247.     Top = 166
  248.     Width = 585
  249.     Height = 167
  250.     Align = alClient
  251.     ScrollBars = ssBoth
  252.     TabOrder = 3
  253.   end
  254.   object ta1Razdoblja: TTable
  255.     Tag = 3
  256.     DatabaseName = 'praznepar'
  257.     TableName = 'razdoblja'
  258.     Left = 749
  259.     Top = 201
  260.     object ta1RazdobljaSifra: TStringField
  261.       FieldName = 'Sifra'
  262.       Size = 8
  263.     end
  264.     object ta1RazdobljaNaziv: TStringField
  265.       FieldName = 'Naziv'
  266.       Size = 50
  267.     end
  268.     object ta1RazdobljaPocetak: TDateField
  269.       FieldName = 'Pocetak'
  270.     end
  271.     object ta1RazdobljaKraj: TDateField
  272.       FieldName = 'Kraj'
  273.     end
  274.     object ta1RazdobljaBrojSati: TIntegerField
  275.       FieldName = 'BrojSati'
  276.     end
  277.     object ta1RazdobljaDatumIsplate: TDateField
  278.       FieldName = 'DatumIsplate'
  279.     end
  280.     object ta1RazdobljaZajamcenaPlaca: TFloatField
  281.       FieldName = 'ZajamcenaPlaca'
  282.       DisplayFormat = ',0.00'
  283.       EditFormat = '0.00'
  284.     end
  285.     object ta1RazdobljaNajnizaPlaca: TFloatField
  286.       FieldName = 'NajnizaPlaca'
  287.       DisplayFormat = ',0.00;;-'
  288.       EditFormat = '0.00'
  289.     end
  290.     object ta1RazdobljaOsobniOdbitak: TFloatField
  291.       FieldName = 'OsobniOdbitak'
  292.       DisplayFormat = ',0.00;;-'
  293.       EditFormat = '0.00'
  294.     end
  295.     object ta1RazdobljaVrijednostBoda: TFloatField
  296.       FieldName = 'VrijednostBoda'
  297.       DisplayFormat = ',0.0000;;-'
  298.       EditFormat = '0.0000'
  299.     end
  300.     object ta1RazdobljaPmgfs: TIntegerField
  301.       FieldName = 'Pmgfs'
  302.     end
  303.     object ta1RazdobljaBonoviStopa: TFloatField
  304.       FieldName = 'BonoviStopa'
  305.       DisplayFormat = ',0.00##;;-'
  306.       EditFormat = '0.000'
  307.     end
  308.     object ta1RazdobljaGotovinaStopa: TFloatField
  309.       FieldName = 'GotovinaStopa'
  310.       DisplayFormat = ',0.00##;;-'
  311.       EditFormat = '0.000'
  312.     end
  313.     object ta1RazdobljaSindikatStopa: TFloatField
  314.       FieldName = 'SindikatStopa'
  315.       DisplayFormat = ',0.00##;;-'
  316.       EditFormat = '0.000'
  317.     end
  318.     object ta1RazdobljaInvalidiStopa: TFloatField
  319.       FieldName = 'InvalidiStopa'
  320.       DisplayFormat = ',0.00##;;-'
  321.       EditFormat = '0.000'
  322.     end
  323.     object ta1RazdobljaKrediti: TBooleanField
  324.       FieldName = 'Krediti'
  325.     end
  326.     object ta1RazdobljaZakljucano: TBooleanField
  327.       FieldName = 'Zakljucano'
  328.     end
  329.     object ta1RazdobljaZabiljeska: TBlobField
  330.       FieldName = 'Zabiljeska'
  331.       BlobType = ftFmtMemo
  332.     end
  333.     object ta1RazdobljacfZakljucano: TStringField
  334.       FieldName = 'cfZakljucano'
  335.       Calculated = True
  336.     end
  337.   end
  338.   object ta3Razdoblja: TTable
  339.     Tag = 3
  340.     DatabaseName = 'praznepar'
  341.     TableName = 'razdoblja'
  342.     Left = 835
  343.     Top = 199
  344.     object ta3RazdobljaSifra: TStringField
  345.       FieldName = 'Sifra'
  346.       Size = 8
  347.     end
  348.     object ta3RazdobljaNaziv: TStringField
  349.       FieldName = 'Naziv'
  350.       Size = 50
  351.     end
  352.     object ta3RazdobljaPocetak: TDateField
  353.       FieldName = 'Pocetak'
  354.     end
  355.     object ta3RazdobljaKraj: TDateField
  356.       FieldName = 'Kraj'
  357.     end
  358.     object ta3RazdobljaBrojSati: TIntegerField
  359.       FieldName = 'BrojSati'
  360.     end
  361.     object ta3RazdobljaDatumIsplate: TDateField
  362.       FieldName = 'DatumIsplate'
  363.     end
  364.     object ta3RazdobljaZajamcenaPlaca: TFloatField
  365.       FieldName = 'ZajamcenaPlaca'
  366.       DisplayFormat = ',0.00'
  367.       EditFormat = '0.00'
  368.     end
  369.     object ta3RazdobljaNajnizaPlaca: TFloatField
  370.       FieldName = 'NajnizaPlaca'
  371.       DisplayFormat = ',0.00;;-'
  372.       EditFormat = '0.00'
  373.     end
  374.     object ta3RazdobljaOsobniOdbitak: TFloatField
  375.       FieldName = 'OsobniOdbitak'
  376.       DisplayFormat = ',0.00;;-'
  377.       EditFormat = '0.00'
  378.     end
  379.     object ta3RazdobljaVrijednostBoda: TFloatField
  380.       FieldName = 'VrijednostBoda'
  381.       DisplayFormat = ',0.0000;;-'
  382.       EditFormat = '0.0000'
  383.     end
  384.     object ta3RazdobljaPmgfs: TIntegerField
  385.       FieldName = 'Pmgfs'
  386.     end
  387.     object ta3RazdobljaBonoviStopa: TFloatField
  388.       FieldName = 'BonoviStopa'
  389.       DisplayFormat = ',0.00##;;-'
  390.       EditFormat = '0.000'
  391.     end
  392.     object ta3RazdobljaGotovinaStopa: TFloatField
  393.       FieldName = 'GotovinaStopa'
  394.       DisplayFormat = ',0.00##;;-'
  395.       EditFormat = '0.000'
  396.     end
  397.     object ta3RazdobljaSindikatStopa: TFloatField
  398.       FieldName = 'SindikatStopa'
  399.       DisplayFormat = ',0.00##;;-'
  400.       EditFormat = '0.000'
  401.     end
  402.     object ta3RazdobljaInvalidiStopa: TFloatField
  403.       FieldName = 'InvalidiStopa'
  404.       DisplayFormat = ',0.00##;;-'
  405.       EditFormat = '0.000'
  406.     end
  407.     object ta3RazdobljaKrediti: TBooleanField
  408.       FieldName = 'Krediti'
  409.     end
  410.     object ta3RazdobljaZakljucano: TBooleanField
  411.       FieldName = 'Zakljucano'
  412.     end
  413.     object ta3RazdobljaZabiljeska: TBlobField
  414.       FieldName = 'Zabiljeska'
  415.       BlobType = ftFmtMemo
  416.     end
  417.     object ta3RazdobljacfZakljucano: TStringField
  418.       FieldName = 'cfZakljucano'
  419.       Calculated = True
  420.     end
  421.   end
  422.   object ta1OpVrsteRada: TTable
  423.     Tag = 3
  424.     DatabaseName = 'praznepar'
  425.     TableName = 'opVrsteRada'
  426.     Left = 742
  427.     Top = 283
  428.     object ta1OpVrsteRadaRecord: TAutoIncField
  429.       FieldName = 'Record'
  430.     end
  431.     object ta1OpVrsteRadaRazdoblje: TStringField
  432.       FieldName = 'Razdoblje'
  433.       Size = 8
  434.     end
  435.     object ta1OpVrsteRadaRadnik: TIntegerField
  436.       FieldName = 'Radnik'
  437.     end
  438.     object ta1OpVrsteRadaVrstaRada: TIntegerField
  439.       FieldName = 'VrstaRada'
  440.     end
  441.     object ta1OpVrsteRadaProsjekPoSatu: TFloatField
  442.       FieldName = 'ProsjekPoSatu'
  443.       DisplayFormat = ',0.00#;;-'
  444.       EditFormat = '0.000'
  445.     end
  446.     object ta1OpVrsteRadaStopaNaIznos: TFloatField
  447.       FieldName = 'StopaNaIznos'
  448.       DisplayFormat = ',0.00#%'
  449.       EditFormat = '0.00'
  450.     end
  451.     object ta1OpVrsteRadaSatiRada: TIntegerField
  452.       FieldName = 'SatiRada'
  453.       DisplayFormat = '###;;-'
  454.     end
  455.     object ta1OpVrsteRadaBodovaPoSatu: TFloatField
  456.       FieldName = 'BodovaPoSatu'
  457.       DisplayFormat = ',0.00#;;-'
  458.       EditFormat = '0.000'
  459.     end
  460.     object ta1OpVrsteRadaBodovaZaRad: TFloatField
  461.       FieldName = 'BodovaZaRad'
  462.       DisplayFormat = ',0.00#;;-'
  463.       EditFormat = '0.000'
  464.     end
  465.     object ta1OpVrsteRadaIznos: TFloatField
  466.       FieldName = 'Iznos'
  467.       DisplayFormat = ',0.00;;-'
  468.       EditFormat = '0.00'
  469.     end
  470.     object ta1OpVrsteRadacfRadnik: TStringField
  471.       FieldName = 'cfRadnik'
  472.       Size = 50
  473.       Calculated = True
  474.     end
  475.     object ta1OpVrsteRadacfVrstaRada: TStringField
  476.       FieldName = 'cfVrstaRada'
  477.       Size = 50
  478.       Calculated = True
  479.     end
  480.   end
  481.   object ta3OpVrsteRada: TTable
  482.     Tag = 3
  483.     DatabaseName = 'praznepar'
  484.     TableName = 'opVrsteRada'
  485.     Left = 830
  486.     Top = 281
  487.     object ta3OpVrsteRadaRecord: TAutoIncField
  488.       FieldName = 'Record'
  489.     end
  490.     object ta3OpVrsteRadaRazdoblje: TStringField
  491.       FieldName = 'Razdoblje'
  492.       Size = 8
  493.     end
  494.     object ta3OpVrsteRadaRadnik: TIntegerField
  495.       FieldName = 'Radnik'
  496.     end
  497.     object ta3OpVrsteRadaVrstaRada: TIntegerField
  498.       FieldName = 'VrstaRada'
  499.     end
  500.     object ta3OpVrsteRadaProsjekPoSatu: TFloatField
  501.       FieldName = 'ProsjekPoSatu'
  502.       DisplayFormat = ',0.00#;;-'
  503.       EditFormat = '0.000'
  504.     end
  505.     object ta3OpVrsteRadaStopaNaIznos: TFloatField
  506.       FieldName = 'StopaNaIznos'
  507.       DisplayFormat = ',0.00#%'
  508.       EditFormat = '0.00'
  509.     end
  510.     object ta3OpVrsteRadaSatiRada: TIntegerField
  511.       FieldName = 'SatiRada'
  512.       DisplayFormat = '###;;-'
  513.     end
  514.     object ta3OpVrsteRadaBodovaPoSatu: TFloatField
  515.       FieldName = 'BodovaPoSatu'
  516.       DisplayFormat = ',0.00#;;-'
  517.       EditFormat = '0.000'
  518.     end
  519.     object ta3OpVrsteRadaBodovaZaRad: TFloatField
  520.       FieldName = 'BodovaZaRad'
  521.       DisplayFormat = ',0.00#;;-'
  522.       EditFormat = '0.000'
  523.     end
  524.     object ta3OpVrsteRadaIznos: TFloatField
  525.       FieldName = 'Iznos'
  526.       DisplayFormat = ',0.00;;-'
  527.       EditFormat = '0.00'
  528.     end
  529.     object ta3OpVrsteRadacfRadnik: TStringField
  530.       FieldName = 'cfRadnik'
  531.       Size = 50
  532.       Calculated = True
  533.     end
  534.     object ta3OpVrsteRadacfVrstaRada: TStringField
  535.       FieldName = 'cfVrstaRada'
  536.       Size = 50
  537.       Calculated = True
  538.     end
  539.   end
  540.   object ta1OpDoprinosi: TTable
  541.     Tag = 3
  542.     DatabaseName = 'praznepar'
  543.     TableName = 'opDoprinosi'
  544.     Left = 744
  545.     Top = 362
  546.     object ta1OpDoprinosiRecord: TAutoIncField
  547.       FieldName = 'Record'
  548.     end
  549.     object ta1OpDoprinosiRazdoblje: TStringField
  550.       FieldName = 'Razdoblje'
  551.       Size = 8
  552.     end
  553.     object ta1OpDoprinosiRadnik: TIntegerField
  554.       FieldName = 'Radnik'
  555.       DisplayFormat = '0;;-'
  556.     end
  557.     object ta1OpDoprinosiSifraDoprinosa: TIntegerField
  558.       FieldName = 'SifraDoprinosa'
  559.     end
  560.     object ta1OpDoprinosiTip_doprinosa: TIntegerField
  561.       FieldName = 'Tip_doprinosa'
  562.     end
  563.     object ta1OpDoprinosiIznos: TFloatField
  564.       FieldName = 'Iznos'
  565.       DisplayFormat = ',0.00'
  566.       EditFormat = '0.00'
  567.     end
  568.     object ta1OpDoprinosiPorezna_ispostava: TIntegerField
  569.       FieldName = 'Porezna_ispostava'
  570.     end
  571.     object ta1OpDoprinosicfRadnik: TStringField
  572.       FieldName = 'cfRadnik'
  573.       Size = 50
  574.       Calculated = True
  575.     end
  576.     object ta1OpDoprinosicfSifraDoprinosa: TStringField
  577.       FieldName = 'cfSifraDoprinosa'
  578.       Size = 50
  579.       Calculated = True
  580.     end
  581.     object ta1OpDoprinosicfTip_doprinosa: TStringField
  582.       FieldName = 'cfTip_doprinosa'
  583.       Size = 50
  584.       Calculated = True
  585.     end
  586.     object ta1OpDoprinosicfPorezna_ispostava: TStringField
  587.       FieldName = 'cfPorezna_ispostava'
  588.       Size = 50
  589.       Calculated = True
  590.     end
  591.   end
  592.   object ta3OpDoprinosi: TTable
  593.     Tag = 3
  594.     DatabaseName = 'praznepar'
  595.     TableName = 'opDoprinosi'
  596.     Left = 830
  597.     Top = 360
  598.     object ta3OpDoprinosiRecord: TAutoIncField
  599.       FieldName = 'Record'
  600.     end
  601.     object ta3OpDoprinosiRazdoblje: TStringField
  602.       FieldName = 'Razdoblje'
  603.       Size = 8
  604.     end
  605.     object ta3OpDoprinosiRadnik: TIntegerField
  606.       FieldName = 'Radnik'
  607.       DisplayFormat = '0;;-'
  608.     end
  609.     object ta3OpDoprinosiSifraDoprinosa: TIntegerField
  610.       FieldName = 'SifraDoprinosa'
  611.     end
  612.     object ta3OpDoprinosiTip_doprinosa: TIntegerField
  613.       FieldName = 'Tip_doprinosa'
  614.     end
  615.     object ta3OpDoprinosiIznos: TFloatField
  616.       FieldName = 'Iznos'
  617.       DisplayFormat = ',0.00'
  618.       EditFormat = '0.00'
  619.     end
  620.     object ta3OpDoprinosiPorezna_ispostava: TIntegerField
  621.       FieldName = 'Porezna_ispostava'
  622.     end
  623.     object ta3OpDoprinosicfRadnik: TStringField
  624.       FieldName = 'cfRadnik'
  625.       Size = 50
  626.       Calculated = True
  627.     end
  628.     object ta3OpDoprinosicfSifraDoprinosa: TStringField
  629.       FieldName = 'cfSifraDoprinosa'
  630.       Size = 50
  631.       Calculated = True
  632.     end
  633.     object ta3OpDoprinosicfTip_doprinosa: TStringField
  634.       FieldName = 'cfTip_doprinosa'
  635.       Size = 50
  636.       Calculated = True
  637.     end
  638.     object ta3OpDoprinosicfPorezna_ispostava: TStringField
  639.       FieldName = 'cfPorezna_ispostava'
  640.       Size = 50
  641.       Calculated = True
  642.     end
  643.   end
  644.   object ta1OpSuma: TTable
  645.     Tag = 3
  646.     DatabaseName = 'praznepar'
  647.     TableName = 'OpSuma'
  648.     Left = 754
  649.     Top = 441
  650.     object ta1OpSumaRazdoblje: TStringField
  651.       FieldName = 'Razdoblje'
  652.       Size = 8
  653.     end
  654.     object ta1OpSumaRadnik: TIntegerField
  655.       FieldName = 'Radnik'
  656.     end
  657.     object ta1OpSumaBrutto1: TFloatField
  658.       FieldName = 'Brutto1'
  659.       DisplayFormat = ',0.00;;-'
  660.       EditFormat = '0.00'
  661.     end
  662.     object ta1OpSumaDoprinosiIz: TFloatField
  663.       FieldName = 'DoprinosiIz'
  664.       DisplayFormat = ',0.00;;-'
  665.       EditFormat = '0.00'
  666.     end
  667.     object ta1OpSumaNetto1: TFloatField
  668.       FieldName = 'Netto1'
  669.       DisplayFormat = ',0.00;;-'
  670.       EditFormat = '0.00'
  671.     end
  672.     object ta1OpSumaBolPod: TFloatField
  673.       FieldName = 'BolPod'
  674.       DisplayFormat = ',0.00;;-'
  675.       EditFormat = '0.00'
  676.     end
  677.     object ta1OpSumaBolFond: TFloatField
  678.       FieldName = 'BolFond'
  679.       DisplayFormat = ',0.00;;-'
  680.       EditFormat = '0.00'
  681.     end
  682.     object ta1OpSumaNetto2: TFloatField
  683.       FieldName = 'Netto2'
  684.       DisplayFormat = ',0.00;;-'
  685.       EditFormat = '0.00'
  686.     end
  687.     object ta1OpSumaMaterTros: TFloatField
  688.       FieldName = 'MaterTros'
  689.       DisplayFormat = ',0.00;;-'
  690.       EditFormat = '0.00'
  691.     end
  692.     object ta1OpSumaRegres: TFloatField
  693.       FieldName = 'Regres'
  694.       DisplayFormat = ',0.00;;-'
  695.       EditFormat = '0.00'
  696.     end
  697.     object ta1OpSumaDohodak: TFloatField
  698.       FieldName = 'Dohodak'
  699.       DisplayFormat = ',0.00;;-'
  700.       EditFormat = '0.00'
  701.     end
  702.     object ta1OpSumaFaktor_odbitaka: TFloatField
  703.       FieldName = 'Faktor_odbitaka'
  704.       DisplayFormat = ',0.00;;-'
  705.       EditFormat = '0.00'
  706.     end
  707.     object ta1OpSumaIznos_odbitaka: TFloatField
  708.       FieldName = 'Iznos_odbitaka'
  709.       DisplayFormat = ',0.00;;-'
  710.       EditFormat = '0.00'
  711.     end
  712.     object ta1OpSumaOsnovicaZaPorez: TFloatField
  713.       FieldName = 'OsnovicaZaPorez'
  714.       DisplayFormat = ',0.00;;-'
  715.       EditFormat = '0.00'
  716.     end
  717.     object ta1OpSumaPorez: TFloatField
  718.       FieldName = 'Porez'
  719.       DisplayFormat = ',0.00;;-'
  720.       EditFormat = '0.00'
  721.     end
  722.     object ta1OpSumaPrirez: TFloatField
  723.       FieldName = 'Prirez'
  724.       DisplayFormat = ',0.00;;-'
  725.       EditFormat = '0.00'
  726.     end
  727.     object ta1OpSumaKrediti: TFloatField
  728.       FieldName = 'Krediti'
  729.       DisplayFormat = ',0.00;;-'
  730.       EditFormat = '0.00'
  731.     end
  732.     object ta1OpSumaSindikat: TFloatField
  733.       FieldName = 'Sindikat'
  734.       DisplayFormat = ',0.00;;-'
  735.       EditFormat = '0.00'
  736.     end
  737.     object ta1OpSumaAkontacije: TFloatField
  738.       FieldName = 'Akontacije'
  739.       DisplayFormat = ',0.00;;-'
  740.       EditFormat = '0.00'
  741.     end
  742.     object ta1OpSumaIznosZaIsplatu: TFloatField
  743.       FieldName = 'IznosZaIsplatu'
  744.       DisplayFormat = ',0.00;;-'
  745.       EditFormat = '0.00'
  746.     end
  747.     object ta1OpSumacfRadnik: TStringField
  748.       FieldName = 'cfRadnik'
  749.       Size = 50
  750.       Calculated = True
  751.     end
  752.   end
  753.   object ta3OpSuma: TTable
  754.     Tag = 3
  755.     DatabaseName = 'praznepar'
  756.     TableName = 'OpSuma'
  757.     Left = 840
  758.     Top = 439
  759.     object ta3OpSumaRazdoblje: TStringField
  760.       FieldName = 'Razdoblje'
  761.       Size = 8
  762.     end
  763.     object ta3OpSumaRadnik: TIntegerField
  764.       FieldName = 'Radnik'
  765.     end
  766.     object ta3OpSumaBrutto1: TFloatField
  767.       FieldName = 'Brutto1'
  768.       DisplayFormat = ',0.00;;-'
  769.       EditFormat = '0.00'
  770.     end
  771.     object ta3OpSumaDoprinosiIz: TFloatField
  772.       FieldName = 'DoprinosiIz'
  773.       DisplayFormat = ',0.00;;-'
  774.       EditFormat = '0.00'
  775.     end
  776.     object ta3OpSumaNetto1: TFloatField
  777.       FieldName = 'Netto1'
  778.       DisplayFormat = ',0.00;;-'
  779.       EditFormat = '0.00'
  780.     end
  781.     object ta3OpSumaBolPod: TFloatField
  782.       FieldName = 'BolPod'
  783.       DisplayFormat = ',0.00;;-'
  784.       EditFormat = '0.00'
  785.     end
  786.     object ta3OpSumaBolFond: TFloatField
  787.       FieldName = 'BolFond'
  788.       DisplayFormat = ',0.00;;-'
  789.       EditFormat = '0.00'
  790.     end
  791.     object ta3OpSumaNetto2: TFloatField
  792.       FieldName = 'Netto2'
  793.       DisplayFormat = ',0.00;;-'
  794.       EditFormat = '0.00'
  795.     end
  796.     object ta3OpSumaMaterTros: TFloatField
  797.       FieldName = 'MaterTros'
  798.       DisplayFormat = ',0.00;;-'
  799.       EditFormat = '0.00'
  800.     end
  801.     object ta3OpSumaRegres: TFloatField
  802.       FieldName = 'Regres'
  803.       DisplayFormat = ',0.00;;-'
  804.       EditFormat = '0.00'
  805.     end
  806.     object ta3OpSumaDohodak: TFloatField
  807.       FieldName = 'Dohodak'
  808.       DisplayFormat = ',0.00;;-'
  809.       EditFormat = '0.00'
  810.     end
  811.     object ta3OpSumaFaktor_odbitaka: TFloatField
  812.       FieldName = 'Faktor_odbitaka'
  813.       DisplayFormat = ',0.00;;-'
  814.       EditFormat = '0.00'
  815.     end
  816.     object ta3OpSumaIznos_odbitaka: TFloatField
  817.       FieldName = 'Iznos_odbitaka'
  818.       DisplayFormat = ',0.00;;-'
  819.       EditFormat = '0.00'
  820.     end
  821.     object ta3OpSumaOsnovicaZaPorez: TFloatField
  822.       FieldName = 'OsnovicaZaPorez'
  823.       DisplayFormat = ',0.00;;-'
  824.       EditFormat = '0.00'
  825.     end
  826.     object ta3OpSumaPorez: TFloatField
  827.       FieldName = 'Porez'
  828.       DisplayFormat = ',0.00;;-'
  829.       EditFormat = '0.00'
  830.     end
  831.     object ta3OpSumaPrirez: TFloatField
  832.       FieldName = 'Prirez'
  833.       DisplayFormat = ',0.00;;-'
  834.       EditFormat = '0.00'
  835.     end
  836.     object ta3OpSumaKrediti: TFloatField
  837.       FieldName = 'Krediti'
  838.       DisplayFormat = ',0.00;;-'
  839.       EditFormat = '0.00'
  840.     end
  841.     object ta3OpSumaSindikat: TFloatField
  842.       FieldName = 'Sindikat'
  843.       DisplayFormat = ',0.00;;-'
  844.       EditFormat = '0.00'
  845.     end
  846.     object ta3OpSumaAkontacije: TFloatField
  847.       FieldName = 'Akontacije'
  848.       DisplayFormat = ',0.00;;-'
  849.       EditFormat = '0.00'
  850.     end
  851.     object ta3OpSumaIznosZaIsplatu: TFloatField
  852.       FieldName = 'IznosZaIsplatu'
  853.       DisplayFormat = ',0.00;;-'
  854.       EditFormat = '0.00'
  855.     end
  856.     object ta3OpSumacfRadnik: TStringField
  857.       FieldName = 'cfRadnik'
  858.       Size = 50
  859.       Calculated = True
  860.     end
  861.   end
  862.   object ta1LockOp: TTable
  863.     DatabaseName = 'praznegod'
  864.     TableName = '_lockOp'
  865.     Left = 759
  866.     Top = 514
  867.   end
  868. end
  869.