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

Text File | 1998-04-04 | 19KB | 736 lines

object fm3100800OpVrsteRada: Tfm3100800OpVrsteRada
  Left = 362
  Top = 244
  Width = 660
  Height = 392
  HelpContext = 310000010
  VertScrollBar.Tracking = True
  Caption = 'fm3100800OpVrsteRada'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial CE'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  Position = poDefaultPosOnly
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object Panel4: TPanel
    Left = 0
    Top = 0
    Width = 652
    Height = 27
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object Label4: TLabel
      Left = 208
      Top = 7
      Width = 27
      Height = 14
      Caption = '&Tra�i:'
      FocusControl = edTrazi
    end
    object DBNavigator1: TDBNavigator
      Left = 1
      Top = 1
      Width = 200
      Height = 25
      Align = alLeft
      Hints.Strings = (
        'Prvi red'
        'Prethodni red'
        'Sljede�i red'
        'Posljednji red'
        'Novi prazni red'
        'Obri�i cijeli red'
        'Izmjena polja'
        'Spremi'
        'Odustani'
        'Obnovi, osvje�i podatke sa diska')
      TabOrder = 0
    end
    object cbTrazi: TComboBox
      Left = 237
      Top = 3
      Width = 136
      Height = 22
      Style = csDropDownList
      ItemHeight = 14
      Items.Strings = (
        'razdoblje;prezime djelatnika')
      TabOrder = 1
    end
    object edTrazi: TEdit
      Left = 374
      Top = 3
      Width = 167
      Height = 22
      Hint = 'Upisivanjem pojedinih znakova �e se pretra�ivati podaci'
      TabOrder = 2
      OnChange = edTraziChange
    end
    object Panel1: TPanel
      Left = 555
      Top = 1
      Width = 96
      Height = 25
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 3
      object bbIzlaz: TBitBtn
        Left = 18
        Top = 2
        Width = 75
        Height = 22
        Hint = 'Prekid rada i izlaz iz prozora'
        Caption = 'I&zlaz'
        TabOrder = 0
        OnClick = bbIzlazClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
          03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
          0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
          0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
          0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
          0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
          0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
          0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
          0333337F777FFFFF7F3333000000000003333377777777777333}
        NumGlyphs = 2
      end
    end
  end
  object sb: TStatusBar
    Left = 0
    Top = 346
    Width = 652
    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 = 27
    Width = 652
    Height = 319
    ActivePage = pgTabela
    Align = alClient
    TabOrder = 2
    object pgTabela: TTabSheet
      Hint = 'Tabelarni pregled podataka'
      Caption = 'T&abelarni prikaz'
      object DBGrid1: TDBGrid
        Left = 0
        Top = 0
        Width = 644
        Height = 290
        Align = alClient
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Arial CE'
        TitleFont.Style = []
        Columns = <
          item
            FieldName = 'razdoblje'
            ReadOnly = True
            Title.Caption = 'Razdoblje'
          end
          item
            FieldName = 'radnik'
            ReadOnly = True
            Title.Caption = '�ifra'
            Width = 45
          end
          item
            FieldName = 'cfRadnik'
            ReadOnly = True
            Title.Caption = 'Djelatnik'
            Width = 155
          end
          item
            FieldName = 'cfVrstaRada'
            ReadOnly = True
            Title.Caption = 'Vrsta rada'
            Width = 177
          end
          item
            FieldName = 'satiRada'
            Title.Caption = 'Broj sati'
          end
          item
            FieldName = 'iznos'
            Title.Caption = 'Iznos'
            Width = 88
          end
          item
            FieldName = 'stopaNaIznos'
            Title.Caption = 'Stopa'
          end
          item
            FieldName = 'bodovaPoSatu'
            Title.Caption = 'Bodova po satu'
            Width = 79
          end
          item
            FieldName = 'bodovaZaRad'
            Title.Caption = 'Bodova za rad'
            Width = 77
          end
          item
            FieldName = 'prosjekPoSatu'
            Title.Caption = 'Prosjek po satu'
            Width = 81
          end>
      end
    end
  end
  object ta1OpVrsteRada: TTable
    Tag = 3
    DatabaseName = 'praznepar'
    TableName = 'opVrsteRada'
    Left = 884
    Top = 192
    object ta1OpVrsteRadaRecord: TAutoIncField
      FieldName = 'Record'
    end
    object ta1OpVrsteRadaRazdoblje: TStringField
      FieldName = 'Razdoblje'
      Size = 8
    end
    object ta1OpVrsteRadaRadnik: TIntegerField
      FieldName = 'Radnik'
    end
    object ta1OpVrsteRadaVrstaRada: TIntegerField
      FieldName = 'VrstaRada'
    end
    object ta1OpVrsteRadaProsjekPoSatu: TFloatField
      FieldName = 'ProsjekPoSatu'
      DisplayFormat = ',0.00#;;-'
      EditFormat = '0.000'
    end
    object ta1OpVrsteRadaStopaNaIznos: TFloatField
      FieldName = 'StopaNaIznos'
      DisplayFormat = ',0.00#%'
      EditFormat = '0.00'
    end
    object ta1OpVrsteRadaSatiRada: TIntegerField
      FieldName = 'SatiRada'
      DisplayFormat = '###;;-'
    end
    object ta1OpVrsteRadaBodovaPoSatu: TFloatField
      FieldName = 'BodovaPoSatu'
      DisplayFormat = ',0.00#;;-'
      EditFormat = '0.000'
    end
    object ta1OpVrsteRadaBodovaZaRad: TFloatField
      FieldName = 'BodovaZaRad'
      DisplayFormat = ',0.00#;;-'
      EditFormat = '0.000'
    end
    object ta1OpVrsteRadaIznos: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object ta1OpVrsteRadacfRadnik: TStringField
      FieldName = 'cfRadnik'
      Size = 50
      Calculated = True
    end
    object ta1OpVrsteRadacfVrstaRada: TStringField
      FieldName = 'cfVrstaRada'
      Size = 50
      Calculated = True
    end
  end
  object ds1OpVrsteRada: TDataSource
    DataSet = ta1OpVrsteRada
    Left = 978
    Top = 190
  end
  object ta3OpVrsteRada: TTable
    Tag = 3
    DatabaseName = 'praznepar'
    TableName = 'opVrsteRada'
    Left = 892
    Top = 268
    object ta3OpVrsteRadaRecord: TAutoIncField
      FieldName = 'Record'
    end
    object ta3OpVrsteRadaRazdoblje: TStringField
      FieldName = 'Razdoblje'
      Size = 8
    end
    object ta3OpVrsteRadaRadnik: TIntegerField
      FieldName = 'Radnik'
    end
    object ta3OpVrsteRadaVrstaRada: TIntegerField
      FieldName = 'VrstaRada'
    end
    object ta3OpVrsteRadaProsjekPoSatu: TFloatField
      FieldName = 'ProsjekPoSatu'
      DisplayFormat = ',0.00#;;-'
      EditFormat = '0.000'
    end
    object ta3OpVrsteRadaStopaNaIznos: TFloatField
      FieldName = 'StopaNaIznos'
      DisplayFormat = ',0.00#%'
      EditFormat = '0.00'
    end
    object ta3OpVrsteRadaSatiRada: TIntegerField
      FieldName = 'SatiRada'
      DisplayFormat = '###;;-'
    end
    object ta3OpVrsteRadaBodovaPoSatu: TFloatField
      FieldName = 'BodovaPoSatu'
      DisplayFormat = ',0.00#;;-'
      EditFormat = '0.000'
    end
    object ta3OpVrsteRadaBodovaZaRad: TFloatField
      FieldName = 'BodovaZaRad'
      DisplayFormat = ',0.00#;;-'
      EditFormat = '0.000'
    end
    object ta3OpVrsteRadaIznos: TFloatField
      FieldName = 'Iznos'
      DisplayFormat = ',0.00;;-'
      EditFormat = '0.00'
    end
    object ta3OpVrsteRadacfRadnik: TStringField
      FieldName = 'cfRadnik'
      Size = 50
      Calculated = True
    end
    object ta3OpVrsteRadacfVrstaRada: TStringField
      FieldName = 'cfVrstaRada'
      Size = 50
      Calculated = True
    end
  end
  object ta1Radnici: TTable
    Tag = 3
    DatabaseName = 'praznepar'
    TableName = 'radnici'
    Left = 972
    Top = 413
    object ta1RadniciSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta1RadniciPrezime: TStringField
      FieldName = 'Prezime'
      Size = 30
    end
    object ta1RadniciIme: TStringField
      FieldName = 'Ime'
    end
    object ta1RadniciTitula: TStringField
      FieldName = 'Titula'
    end
    object ta1RadniciFunkcija: TStringField
      FieldName = 'Funkcija'
      Size = 50
    end
    object ta1RadniciJmbg: TStringField
      FieldName = 'Jmbg'
      Size = 13
    end
    object ta1RadniciBroj_osobne: TStringField
      FieldName = 'Broj_osobne'
      Size = 8
    end
    object ta1RadniciBroj_radne: TStringField
      FieldName = 'Broj_radne'
      Size = 7
    end
    object ta1RadniciOpcina_radne: TIntegerField
      FieldName = 'Opcina_radne'
    end
    object ta1RadniciBroj_osig: TStringField
      FieldName = 'Broj_osig'
      Size = 11
    end
    object ta1RadniciNacin_isplate: TIntegerField
      FieldName = 'Nacin_isplate'
    end
    object ta1RadniciBroj_racuna_tek: TStringField
      FieldName = 'Broj_racuna_tek'
      Size = 10
    end
    object ta1RadniciBroj_racuna_knj: TStringField
      FieldName = 'Broj_racuna_knj'
      Size = 10
    end
    object ta1RadniciSpol: TIntegerField
      FieldName = 'Spol'
    end
    object ta1RadniciIme_oca: TStringField
      FieldName = 'Ime_oca'
    end
    object ta1RadniciDjev_prezime: TStringField
      FieldName = 'Djev_prezime'
      Size = 30
    end
    object ta1RadniciMjesto_rodjenja: TStringField
      FieldName = 'Mjesto_rodjenja'
    end
    object ta1RadniciOpcina_rodjenja: TIntegerField
      FieldName = 'Opcina_rodjenja'
    end
    object ta1RadniciDatum_rodjenja: TDateField
      FieldName = 'Datum_rodjenja'
    end
    object ta1RadniciDrzavljanstvo: TIntegerField
      FieldName = 'Drzavljanstvo'
    end
    object ta1RadniciNacionalnost: TIntegerField
      FieldName = 'Nacionalnost'
    end
    object ta1RadniciBroj_djece: TIntegerField
      FieldName = 'Broj_djece'
    end
    object ta1RadniciObiteljsko_stanje: TIntegerField
      FieldName = 'Obiteljsko_stanje'
    end
    object ta1RadniciMjesto_stan: TStringField
      FieldName = 'Mjesto_stan'
    end
    object ta1RadniciOpcina_stan: TIntegerField
      FieldName = 'Opcina_stan'
    end
    object ta1RadniciAdresa_stan: TStringField
      FieldName = 'Adresa_stan'
      Size = 30
    end
    object ta1RadniciTelefon_stan: TStringField
      FieldName = 'Telefon_stan'
      Size = 15
    end
    object ta1RadniciZanimanje: TStringField
      FieldName = 'Zanimanje'
      Size = 40
    end
    object ta1RadniciKvalifikacija: TIntegerField
      FieldName = 'Kvalifikacija'
    end
    object ta1RadniciSkola: TStringField
      FieldName = 'Skola'
      Size = 40
    end
    object ta1RadniciJedinica: TIntegerField
      FieldName = 'Jedinica'
    end
    object ta1RadniciPosao: TIntegerField
      FieldName = 'Posao'
    end
    object ta1RadniciPosao2: TIntegerField
      FieldName = 'Posao2'
    end
    object ta1RadniciPrvo_zaposlenje: TDateField
      FieldName = 'Prvo_zaposlenje'
    end
    object ta1RadniciStaz_prije_mjes: TIntegerField
      FieldName = 'Staz_prije_mjes'
    end
    object ta1RadniciStaz_prije_dani: TIntegerField
      FieldName = 'Staz_prije_dani'
    end
    object ta1RadniciDatum_zaposlenja: TDateField
      FieldName = 'Datum_zaposlenja'
    end
    object ta1RadniciVojska: TBooleanField
      FieldName = 'Vojska'
    end
    object ta1RadniciRadni_odnos: TIntegerField
      FieldName = 'Radni_odnos'
    end
    object ta1RadniciPrestao: TBooleanField
      FieldName = 'Prestao'
    end
    object ta1RadniciPrestao_datum: TDateField
      FieldName = 'Prestao_datum'
    end
    object ta1RadniciPrestao_nacin: TIntegerField
      FieldName = 'Prestao_nacin'
    end
    object ta1RadniciFaktor_odbitaka: TFloatField
      FieldName = 'Faktor_odbitaka'
    end
    object ta1RadniciSindikat: TBooleanField
      FieldName = 'Sindikat'
    end
    object ta1RadniciCekanje: TBooleanField
      FieldName = 'Cekanje'
    end
    object ta1RadniciInvalid2: TBooleanField
      FieldName = 'Invalid2'
    end
    object ta1RadniciInvalid3: TBooleanField
      FieldName = 'Invalid3'
    end
    object ta1RadniciZabiljeska: TBlobField
      FieldName = 'Zabiljeska'
      BlobType = ftFmtMemo
    end
    object ta1RadnicicfPrezime_ime: TStringField
      FieldName = 'cfPrezime_ime'
      Size = 50
      Calculated = True
    end
  end
  object ta3Radnici: TTable
    Tag = 3
    DatabaseName = 'praznepar'
    TableName = 'radnici'
    Left = 1036
    Top = 409
    object IntegerField1: TIntegerField
      FieldName = 'Sifra'
    end
    object StringField1: TStringField
      FieldName = 'Prezime'
      Size = 30
    end
    object StringField2: TStringField
      FieldName = 'Ime'
    end
    object StringField3: TStringField
      FieldName = 'Titula'
    end
    object StringField4: TStringField
      FieldName = 'Funkcija'
      Size = 50
    end
    object StringField5: TStringField
      FieldName = 'Jmbg'
      Size = 13
    end
    object StringField6: TStringField
      FieldName = 'Broj_osobne'
      Size = 8
    end
    object StringField7: TStringField
      FieldName = 'Broj_radne'
      Size = 7
    end
    object IntegerField2: TIntegerField
      FieldName = 'Opcina_radne'
    end
    object StringField8: TStringField
      FieldName = 'Broj_osig'
      Size = 11
    end
    object IntegerField3: TIntegerField
      FieldName = 'Nacin_isplate'
    end
    object StringField9: TStringField
      FieldName = 'Broj_racuna_tek'
      Size = 10
    end
    object StringField10: TStringField
      FieldName = 'Broj_racuna_knj'
      Size = 10
    end
    object IntegerField4: TIntegerField
      FieldName = 'Spol'
    end
    object StringField11: TStringField
      FieldName = 'Ime_oca'
    end
    object StringField12: TStringField
      FieldName = 'Djev_prezime'
      Size = 30
    end
    object StringField13: TStringField
      FieldName = 'Mjesto_rodjenja'
    end
    object IntegerField5: TIntegerField
      FieldName = 'Opcina_rodjenja'
    end
    object DateField1: TDateField
      FieldName = 'Datum_rodjenja'
    end
    object IntegerField6: TIntegerField
      FieldName = 'Drzavljanstvo'
    end
    object IntegerField7: TIntegerField
      FieldName = 'Nacionalnost'
    end
    object IntegerField8: TIntegerField
      FieldName = 'Broj_djece'
    end
    object IntegerField9: TIntegerField
      FieldName = 'Obiteljsko_stanje'
    end
    object StringField14: TStringField
      FieldName = 'Mjesto_stan'
    end
    object IntegerField10: TIntegerField
      FieldName = 'Opcina_stan'
    end
    object StringField15: TStringField
      FieldName = 'Adresa_stan'
      Size = 30
    end
    object StringField16: TStringField
      FieldName = 'Telefon_stan'
      Size = 15
    end
    object StringField17: TStringField
      FieldName = 'Zanimanje'
      Size = 40
    end
    object IntegerField11: TIntegerField
      FieldName = 'Kvalifikacija'
    end
    object StringField18: TStringField
      FieldName = 'Skola'
      Size = 40
    end
    object IntegerField12: TIntegerField
      FieldName = 'Jedinica'
    end
    object IntegerField13: TIntegerField
      FieldName = 'Posao'
    end
    object IntegerField14: TIntegerField
      FieldName = 'Posao2'
    end
    object DateField2: TDateField
      FieldName = 'Prvo_zaposlenje'
    end
    object IntegerField15: TIntegerField
      FieldName = 'Staz_prije_mjes'
    end
    object IntegerField16: TIntegerField
      FieldName = 'Staz_prije_dani'
    end
    object DateField3: TDateField
      FieldName = 'Datum_zaposlenja'
    end
    object BooleanField1: TBooleanField
      FieldName = 'Vojska'
    end
    object IntegerField17: TIntegerField
      FieldName = 'Radni_odnos'
    end
    object BooleanField2: TBooleanField
      FieldName = 'Prestao'
    end
    object DateField4: TDateField
      FieldName = 'Prestao_datum'
    end
    object IntegerField18: TIntegerField
      FieldName = 'Prestao_nacin'
    end
    object FloatField1: TFloatField
      FieldName = 'Faktor_odbitaka'
    end
    object BooleanField3: TBooleanField
      FieldName = 'Sindikat'
    end
    object BooleanField4: TBooleanField
      FieldName = 'Cekanje'
    end
    object BooleanField5: TBooleanField
      FieldName = 'Invalid2'
    end
    object BooleanField6: TBooleanField
      FieldName = 'Invalid3'
    end
    object BlobField1: TBlobField
      FieldName = 'Zabiljeska'
      BlobType = ftFmtMemo
    end
    object StringField19: TStringField
      FieldName = 'cfPrezime_ime'
      Size = 50
      Calculated = True
    end
  end
  object ta1VrsteRada: TTable
    Tag = 2
    DatabaseName = 'skupne'
    TableName = 'VrsteRada'
    Left = 968
    Top = 467
    object ta1VrsteRadaSifra: TIntegerField
      FieldName = 'Sifra'
    end
    object ta1VrsteRadaNaziv: TStringField
      FieldName = 'Naziv'
      Size = 50
    end
    object ta1VrsteRadaTip_rada: TIntegerField
      FieldName = 'Tip_rada'
    end
    object ta1VrsteRadaSkupina_rada: TIntegerField
      FieldName = 'Skupina_rada'
    end
    object ta1VrsteRadaKoeficijent: TFloatField
      FieldName = 'Koeficijent'
      DisplayFormat = ',0.00'
    end
    object ta1VrsteRadaTip_obracuna: TIntegerField
      FieldName = 'Tip_obracuna'
    end
    object ta1VrsteRadaBrojRazdobljaUnazad: TIntegerField
      FieldName = 'BrojRazdobljaUnazad'
    end
    object ta1VrsteRadaOsnovicaZaDohodak: TBooleanField
      FieldName = 'OsnovicaZaDohodak'
    end
    object ta1VrsteRadacfTip_rada: TStringField
      FieldName = 'cfTip_rada'
      Size = 50
      Calculated = True
    end
    object ta1VrsteRadacfSkupina_rada: TStringField
      FieldName = 'cfSkupina_rada'
      Size = 50
      Calculated = True
    end
    object ta1VrsteRadacfTip_obracuna: TStringField
      FieldName = 'cfTip_obracuna'
      Size = 50
      Calculated = True
    end
    object ta1VrsteRadacfOsnovicazaDohodak: TStringField
      FieldName = 'cfOsnovicazaDohodak'
      Calculated = True
    end
  end
  object ta1LockOp: TTable
    DatabaseName = 'praznegod'
    TableName = '_lockOp'
    Left = 1037
    Top = 472
  end
end