BUG 11/BUGCD1998_02.ISO/aplic/trade/_setup.1/main.exe/0/RCDATA/TREALIZACIJAPROIZVODNJE/TREALIZACIJAPROIZVODNJE.txt

Text File | 1998-01-05 | 23KB | 740 lines

object RealizacijaProizvodnje: TRealizacijaProizvodnje
  Tag = 1
  Left = 121
  Top = 95
  ActiveControl = gTable
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Realizacija proizvodnje'
  ClientHeight = 453
  ClientWidth = 632
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnHide = FormHide
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Book: TNotebook
    Tag = 1
    Left = 0
    Top = 0
    Width = 632
    Height = 453
    Align = alClient
    TabOrder = 0
    object TPage
      Tag = 1
      Left = 0
      Top = 0
      Caption = 'Zaglavlje'
      object Bevel12: TBevel
        Left = 314
        Top = 400
        Width = 5
        Height = 49
        Shape = bsLeftLine
      end
      object Bevel2: TBevel
        Left = 96
        Top = 400
        Width = 5
        Height = 49
        Shape = bsLeftLine
      end
      object Bevel15: TBevel
        Left = 192
        Top = 400
        Width = 5
        Height = 49
        Shape = bsLeftLine
      end
      object Bevel6: TBevel
        Left = 4
        Top = 400
        Width = 625
        Height = 49
        Shape = bsFrame
      end
      object Bojano: TShape
        Left = 7
        Top = 403
        Width = 88
        Height = 44
        Brush.Color = clRed
        Pen.Style = psClear
      end
      object Label44: TLabel
        Left = 10
        Top = 405
        Width = 82
        Height = 13
        Caption = 'Realizacija br.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label1: TLabel
        Left = 9
        Top = 404
        Width = 82
        Height = 13
        Caption = 'Realizacija br.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWhite
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = True
      end
      object Label2: TLabel
        Left = 106
        Top = 404
        Width = 80
        Height = 13
        Caption = 'Datum zavr�etka'
        FocusControl = EditDatumKnj
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object Label5: TLabel
        Left = 200
        Top = 404
        Width = 77
        Height = 13
        Caption = 'Radni nalog broj'
      end
      object Label3: TLabel
        Left = 272
        Top = 36
        Width = 109
        Height = 13
        Caption = 'Sadr�aj dokumenta'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Bevel1: TBevel
        Left = 252
        Top = 32
        Width = 349
        Height = 337
        Style = bsRaised
      end
      object Knjizeno: TDBEdit
        Left = 72
        Top = 424
        Width = 13
        Height = 13
        TabStop = False
        AutoSize = False
        DataField = 'Knjizeno'
        DataSource = DataReal.sCodes
        Enabled = False
        TabOrder = 4
        OnChange = KnjizenoChange
      end
      object gTable: TMyDBGrid
        Tag = 1
        Left = 6
        Top = 2
        Width = 211
        Height = 395
        FindByName = False
        DataSource = DataReal.sGlava
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnSpace = KnjiziUFUClick
        OnCtrlSpace = KnjiziSveUfeClick
      end
      object eSifra: TDBKeyField
        Left = 12
        Top = 420
        Width = 77
        Height = 20
        AutoSize = False
        Ctl3D = True
        DataField = 'BROJUFE'
        DataSource = DataReal.sGlava
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 1
        DisplayName = 'Broj Ulazne fakture'
        OnNew = eSifraNew
        OnRename = eSifraRename
      end
      object EditDatumKnj: TDBVar
        Left = 108
        Top = 420
        Width = 73
        Height = 20
        AutoSize = False
        DataField = 'DatumDVO'
        DataSource = DataReal.sGlava
        TabOrder = 2
      end
      object eRacun: TDBLookup
        Left = 200
        Top = 420
        Width = 109
        Height = 21
        DataField = 'UFABR'
        DataSource = DataReal.sGlava
        LookupSource = DataReal.sGlava2
        LookupDisplay = 'BROJIFE'
        LookupField = 'CODE'
        TabOrder = 3
        OnEnter = eRacunEnter
        Required = True
        DisplayName = 'Ra�un dobavlja�a (UFA)'
        OnExitChanged = eRacunExitChanged
      end
      object StavkeButton: TBitBtn
        Left = 320
        Top = 409
        Width = 85
        Height = 33
        Caption = 'Stavke'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = StavkeButtonClick
        Glyph.Data = {
          76020000424D7602000000000000760000002800000040000000100000000100
          0400000000000002000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333393333333333333333333333333333333FF333333333333333333
          333333333339093333333333333333333333333333F888F33333333333333333
          333333333990F0933333333333333333333333333888388F3333333333333333
          33333333990F0F0933333333333FF333333333338F838388F333333333003333
          3333333900FFF0F09333333333883FF3333333F8883338388F333333330A0033
          33333990FFFFFF0F09333333338F883FF33338883F33338388F33333330AAA00
          3333990F0FFFFFF0F0933FFFFF8F33883FF38F8383F33338388F0000000AAAAA
          003390FFF0FFFFFF0F09888888833333883F8833383F333383880AAAAAAAAAAA
          AA030FFFFF0FFFFFF0F08FFFFFFF33333F8883F33383F33338380000000AAAAA
          003330FFFFF0FFFFFF038888888F333F8833383F33383F333F833333330AAA00
          3333330FFFFF0FFF00333333338F3F8833333383F33383FF88333333330A0033
          33333330FFFFF00033333333338F8833333333383F3338883333333333003333
          333333330FFF033333333333338833333333333383FF83333333333333333333
          3333333330003333333333333333333333333333388833333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
      end
      object PrintBtn: TBitBtn
        Left = 404
        Top = 409
        Width = 41
        Height = 33
        TabOrder = 6
        OnClick = PrintBtnClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
          00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
          8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
          8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
          8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
          03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
          03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
          33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
          33333337FFFF7733333333300000033333333337777773333333}
        NumGlyphs = 2
      end
      object CalcBtn: TBitBtn
        Left = 444
        Top = 409
        Width = 41
        Height = 33
        TabOrder = 7
        OnClick = KnjiziUFUClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
          73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
          0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
          0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
          0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
          0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
          0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
          0333337F777777737F333308888888880333337F333333337F33330888888888
          03333373FFFFFFFF733333700000000073333337777777773333}
        NumGlyphs = 2
      end
      object ZapisiButton: TBitBtn
        Left = 484
        Top = 409
        Width = 97
        Height = 33
        Caption = 'Realizacija'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 8
        OnClick = ZapisiButtonClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
          333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
          0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
          07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
          07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
          0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
          33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
          B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
          3BB33773333773333773B333333B3333333B7333333733333337}
        NumGlyphs = 2
      end
      object CalcBtnX: TBitBtn
        Left = 580
        Top = 409
        Width = 41
        Height = 33
        TabOrder = 9
        OnClick = KnjiziSveUfeClick
        Glyph.Data = {
          F6010000424DF601000000000000760000002800000030000000100000000100
          0400000000008001000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00380000000008
          333330333333338888888883F333338F333330777777777033333033333338F3
          F3F3FFF8F3333383F33330707079997033330903333338F838388838F33338F8
          F33330777777777033330903333338F3F3F3F3F8F33338383F33307070707070
          33309990333338F838383838F3338F338F3330777777777033309990333338F3
          F3F3F3F8F333833383F330707070707033099999033338F838383838F338F333
          38F330777777777033099999033338F3F3F3F3F8F3383333383F307070707070
          30999999903338F838383838F38FFFF3FF8F30777777777030000900003338F3
          FFFFFFF8F38888F8888330700000007033330903333338F8888888F8F33338F8
          F333307000E0E07033330903333338F8FFFFF8F8F33338F8F333307000000070
          33330903333338F888888838F33338F8F33330777777777033330903333338F3
          33333338F33338F8F333307777777770333309033333383FFFFFFFF8333338F8
          F333380000000008333300033333338888888883333338883333}
        NumGlyphs = 2
      end
      object gStavkeA: TMyDBGrid
        Left = 257
        Top = 50
        Width = 339
        Height = 315
        TabStop = False
        FindByName = False
        Color = clBtnFace
        DataSource = DataReal.sStavke1
        Enabled = False
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 10
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = gStavke1Return
        OnEnter = gStavke1Enter
        OnReturn = gStavke1Return
      end
    end
    object TPage
      Tag = 1
      Left = 0
      Top = 0
      Caption = 'Stavke'
      object Bevel64: TBevel
        Left = 296
        Top = 1
        Width = 333
        Height = 21
        Shape = bsFrame
      end
      object Bevel18: TBevel
        Left = 4
        Top = 1
        Width = 285
        Height = 21
        Shape = bsFrame
      end
      object BrojUfe: TMyDBText
        Left = 93
        Top = 5
        Width = 65
        Height = 13
        DataField = 'BrojIFE'
        DataSource = DataReal.sGlava2
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label52: TLabel
        Left = 8
        Top = 5
        Width = 80
        Height = 13
        Caption = 'Radni nalog broj:'
      end
      object Bevel8: TBevel
        Left = 88
        Top = 340
        Width = 409
        Height = 105
      end
      object Label8: TLabel
        Left = 300
        Top = 5
        Width = 131
        Height = 13
        Caption = 'Realizacija proizvodnje broj:'
      end
      object DBText1: TMyDBText
        Left = 436
        Top = 5
        Width = 81
        Height = 13
        DataField = 'BrojUFE'
        DataSource = DataReal.sGlava
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Bevel14: TBevel
        Left = 340
        Top = 396
        Width = 73
        Height = 21
        Style = bsRaised
      end
      object Bevel11: TBevel
        Left = 328
        Top = 368
        Width = 161
        Height = 21
        Style = bsRaised
      end
      object Bevel26: TBevel
        Left = 92
        Top = 344
        Width = 197
        Height = 97
        Style = bsRaised
      end
      object Bevel10: TBevel
        Left = 128
        Top = 416
        Width = 157
        Height = 21
        Style = bsRaised
      end
      object Label28: TLabel
        Left = 300
        Top = 424
        Width = 37
        Height = 13
        Alignment = taRightJustify
        Caption = 'Koli�ina'
      end
      object JedMjere: TMyDBText
        Left = 444
        Top = 424
        Width = 49
        Height = 17
        DataField = 'Naziv'
        DataSource = DataReal.sMjere
      end
      object Label100: TLabel
        Left = 300
        Top = 400
        Width = 37
        Height = 13
        Caption = 'Min.kol.'
      end
      object Min_Kol: TMyDBText
        Left = 416
        Top = 400
        Width = 77
        Height = 17
        DataField = 'MinKol'
        DataSource = DataReal.sStavke
      end
      object Bevel60: TBevel
        Left = 296
        Top = 344
        Width = 197
        Height = 21
        Shape = bsFrame
        Style = bsRaised
      end
      object Bevel27: TBevel
        Left = 296
        Top = 344
        Width = 197
        Height = 49
        Style = bsRaised
      end
      object DBText13: TMyDBText
        Left = 300
        Top = 348
        Width = 189
        Height = 13
        DataField = 'Naziv'
        DataSource = DataReal.sImeBoje
      end
      object Label119: TLabel
        Left = 300
        Top = 372
        Width = 24
        Height = 13
        Caption = 'Boja:'
      end
      object Bevel59: TBevel
        Left = 92
        Top = 344
        Width = 197
        Height = 69
        Shape = bsFrame
        Style = bsRaised
      end
      object DBText7: TMyDBText
        Left = 96
        Top = 348
        Width = 189
        Height = 61
        DataField = 'Naziv'
        DataSource = DataReal.sImeRobe
        WordWrap = True
      end
      object Label26: TLabel
        Left = 96
        Top = 420
        Width = 26
        Height = 13
        Caption = 'Artikl:'
      end
      object DBText3: TMyDBText
        Left = 132
        Top = 420
        Width = 149
        Height = 13
        DataField = 'Sifra'
        DataSource = DataReal.sArtikl
      end
      object DBText6: TMyDBText
        Left = 332
        Top = 372
        Width = 153
        Height = 13
        DataField = 'Sifra'
        DataSource = DataReal.sBoje
      end
      object DBText9: TMyDBText
        Left = 344
        Top = 400
        Width = 65
        Height = 13
        DataField = 'Atom'
        DataSource = DataReal.sStavke
      end
      object IzlazButton20: TBitBtn
        Left = 508
        Top = 390
        Width = 77
        Height = 45
        Caption = 'Zaglavlje'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = IzlazButton20Click
        Glyph.Data = {
          76020000424D7602000000000000760000002800000040000000100000000100
          0400000000000002000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333933333333333333333333333333333338F33333333333333333333
          3333333339093333333333333333FF33333333333888F3333333333333300333
          3333333390F093333333333333F88F333333333388388F3333333333300C0333
          333333390FFF093333333333F8838F333333333888F388F3333333300CCC0333
          3333339990FFF093333333F883338FFFFF333383388F388F3333300CCCCC0000
          00033999990FFF093333F88333338888883338333388F388F3330CCCCCCCCCCC
          CC0319999990FFF0933383FF33333FFFFF338F3333388F388F33300CCCCC0000
          0003919999990FFF09333883FF338888883388F333F388F388F333300CCC0333
          33333919909990FFF093333883FF8F333333388F3833F88F38833333300C0333
          333333919990990F0933333338838F3333333388F338F3888833333333300333
          33333339190099903333333333388333333333388F883338F333333333333333
          333333339199999933333333333333333333333388F333F83333333333333333
          3333333339199993333333333333333333333333388F38833333333333333333
          3333333333919333333333333333333333333333338883333333333333333333
          3333333333333333333333333333333333333333333333333333}
        Layout = blGlyphBottom
        NumGlyphs = 2
      end
      object gStavke0: TMyDBGrid
        Left = 0
        Top = 22
        Width = 292
        Height = 315
        FindByName = False
        DataSource = DataReal.sStavke2
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgCancelOnExit]
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = gStavke0Return
        OnEnter = gStavke0Enter
        OnReturn = gStavke0Return
      end
      object ZapisiButton20: TBitBtn
        Left = 508
        Top = 354
        Width = 77
        Height = 33
        Caption = 'Stavka'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = ZapisiButton20Click
        OnEnter = ZapisiButton20Click
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
          333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
          0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
          07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
          07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
          0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
          33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
          B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
          3BB33773333773333773B333333B3333333B7333333733333337}
        NumGlyphs = 2
      end
      object gStavke1: TMyDBGrid
        Left = 293
        Top = 22
        Width = 339
        Height = 315
        FindByName = False
        DataSource = DataReal.sStavke1
        Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = gStavke1Return
        OnEnter = gStavke1Enter
        OnReturn = gStavke1Return
      end
      object DBEdit1: TDBEdit
        Left = 368
        Top = 424
        Width = 17
        Height = 13
        TabStop = False
        AutoSize = False
        DataField = 'Naziv'
        DataSource = DataReal.sMjere
        Enabled = False
        TabOrder = 5
      end
      object XKolicina2: TDBEdit
        Left = 392
        Top = 424
        Width = 17
        Height = 13
        TabStop = False
        AutoSize = False
        DataField = 'KolicinaX'
        DataSource = DataReal.sStavke
        Enabled = False
        TabOrder = 6
      end
      object XKolicina: TDBEdit
        Left = 416
        Top = 424
        Width = 17
        Height = 13
        TabStop = False
        AutoSize = False
        DataField = 'KolicinaX'
        DataSource = DataReal.sStavke2
        Enabled = False
        TabOrder = 7
      end
      object eKolicina: TDBVar
        Left = 340
        Top = 420
        Width = 101
        Height = 21
        AutoSize = False
        Color = clBtnFace
        DataField = 'KolicinaX'
        DataSource = DataReal.sStavke
        Enabled = False
        TabOrder = 2
        OnEnter = eKolicinaEnter
        OnExitChanged = eKolicinaExitChanged
      end
    end
  end
end