home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BUG 11
/
BUGCD1998_02.ISO
/
aplic
/
trade
/
_setup.1
/
main.exe
/
0
/
RCDATA
/
TRADNINALOZI
/
TRADNINALOZI.txt
Wrap
Text File
|
1998-01-05
|
47KB
|
1,596 lines
object RadniNalozi: TRadniNalozi
Tag = 1
Left = 144
Top = 103
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Radni nalozi za proizvodnju'
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
TabOrder = 0
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Zaglavlje'
object Bevel27: TBevel
Left = 212
Top = 4
Width = 413
Height = 365
Style = bsRaised
end
object Bevel15: TBevel
Left = 216
Top = 372
Width = 413
Height = 45
Style = bsRaised
end
object Bevel2: TBevel
Left = 104
Top = 372
Width = 3
Height = 45
Style = bsRaised
end
object Bevel1: TBevel
Left = 4
Top = 372
Width = 209
Height = 45
Style = bsRaised
end
object Bojano: TShape
Left = 5
Top = 373
Width = 99
Height = 44
Brush.Color = clRed
Pen.Style = psClear
end
object Bevel3: TBevel
Left = 368
Top = 376
Width = 257
Height = 37
end
object Label1: TLabel
Left = 12
Top = 376
Width = 88
Height = 13
Caption = 'Radni nalog br.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label11: TLabel
Left = 11
Top = 375
Width = 88
Height = 13
Caption = 'Radni nalog 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 DatumKnjLabel: TLabel
Left = 108
Top = 374
Width = 101
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Po�etak proizvodnje'
FocusControl = EditDatumDVO
end
object Label4: TLabel
Left = 220
Top = 376
Width = 126
Height = 13
Caption = 'Skladi�te proizvodnje:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText45: TMyDBText
Left = 372
Top = 380
Width = 249
Height = 31
DataField = 'Naziv'
DataSource = DataNal.sSkladiste
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 228
Top = 6
Width = 128
Height = 13
Caption = 'Sadr�aj radnog naloga'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object StavkeButton: TBitBtn
Left = 136
Top = 420
Width = 101
Height = 29
Caption = 'Stavke'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
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 = 236
Top = 420
Width = 49
Height = 29
TabOrder = 5
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object CalcBtn: TBitBtn
Left = 284
Top = 420
Width = 33
Height = 29
TabOrder = 6
OnClick = KnjiziUFUClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
0333337F777777737F333308888888880333337F333333337F33330888888888
03333373FFFFFFFF733333700000000073333337777777773333}
NumGlyphs = 2
end
object ZapisiButton: TBitBtn
Left = 316
Top = 420
Width = 109
Height = 29
Caption = 'Radni nalog'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = ZapisiButtonClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object CalcBtnX: TBitBtn
Left = 424
Top = 420
Width = 41
Height = 29
TabOrder = 8
OnClick = KnjiziSveUFEClick
Glyph.Data = {
F6010000424DF601000000000000760000002800000030000000100000000100
0400000000008001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00380000000008
333330333333338888888883F333338F333330777777777033333033333338F3
F3F3FFF8F3333383F33330707079997033330903333338F838388838F33338F8
F33330777777777033330903333338F3F3F3F3F8F33338383F33307070707070
33309990333338F838383838F3338F338F3330777777777033309990333338F3
F3F3F3F8F333833383F330707070707033099999033338F838383838F338F333
38F330777777777033099999033338F3F3F3F3F8F3383333383F307070707070
30999999903338F838383838F38FFFF3FF8F30777777777030000900003338F3
FFFFFFF8F38888F8888330700000007033330903333338F8888888F8F33338F8
F333307000E0E07033330903333338F8FFFFF8F8F33338F8F333307000000070
33330903333338F888888838F33338F8F33330777777777033330903333338F3
33333338F33338F8F333307777777770333309033333383FFFFFFFF8333338F8
F333380000000008333300033333338888888883333338883333}
NumGlyphs = 2
end
object Knjizeno: TDBEdit
Left = 68
Top = 394
Width = 17
Height = 11
TabStop = False
AutoSize = False
DataField = 'Knjizeno'
DataSource = DataNal.sCodes
Enabled = False
TabOrder = 9
OnChange = KnjizenoChange
end
object gTable: TMyDBGrid
Tag = 1
Left = 8
Top = 4
Width = 198
Height = 363
FindByName = True
DataSource = DataNal.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 = 16
Top = 390
Width = 77
Height = 20
AutoSize = False
DataField = 'BROJIFE'
DataSource = DataNal.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
DisplayName = 'Broj radnog naloga'
OnNew = eSifraNew
OnRename = eSifraRename
end
object EditDatumDVO: TDBVar
Left = 120
Top = 390
Width = 81
Height = 20
AutoSize = False
DataField = 'DatumDVO'
DataSource = DataNal.sGlava
TabOrder = 2
end
object Dobavljac: TDBJustLookup
Left = 220
Top = 392
Width = 145
Height = 21
DataField = 'SKLADISTE'
DataSource = DataNal.sGlava
LookupSource = DataNal.sSkladiste
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
TabOrder = 3
DisplayName = '�ifra skladi�ta proizvodnje'
OnF2Press = Skladiste_F2
end
object gStavkeA: TMyDBGrid
Tag = 1
Left = 216
Top = 20
Width = 405
Height = 345
TabStop = False
FindByName = True
Color = clBtnFace
DataSource = DataNal.sStavke
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 = []
end
end
object TPage
Tag = 1
Left = 0
Top = 0
Caption = 'Stavke'
object Bevel17: TBevel
Left = 4
Top = 76
Width = 205
Height = 341
Style = bsRaised
end
object Bevel25: TBevel
Left = 212
Top = 136
Width = 417
Height = 313
Style = bsRaised
end
object Bevel4: TBevel
Left = 4
Top = 272
Width = 205
Height = 5
Shape = bsTopLine
end
object Bevel48: TBevel
Left = 4
Top = 124
Width = 205
Height = 5
Shape = bsTopLine
end
object Label100: TLabel
Left = 12
Top = 252
Width = 37
Height = 13
Caption = 'Min.kol.'
end
object DBText4: TMyDBText
Left = 8
Top = 80
Width = 197
Height = 41
DataField = 'Naziv'
DataSource = DataNal.sSkladiste
WordWrap = True
end
object Bevel18: TBevel
Left = 100
Top = 4
Width = 109
Height = 37
Style = bsRaised
end
object Bevel5: TBevel
Left = 4
Top = 4
Width = 93
Height = 37
Style = bsRaised
end
object BrojIfe: TMyDBText
Left = 8
Top = 24
Width = 85
Height = 13
Alignment = taCenter
DataField = 'BrojIFE'
DataSource = DataNal.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Bevel16: TBevel
Left = 56
Top = 44
Width = 105
Height = 29
Style = bsRaised
end
object DBText5: TMyDBText
Left = 104
Top = 24
Width = 101
Height = 13
Alignment = taCenter
DataField = 'DatumDVO'
DataSource = DataNal.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 64
Top = 52
Width = 34
Height = 13
Caption = 'Stavka'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 104
Top = 8
Width = 101
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Po�etak proizvodnje'
end
object DBText11: TMyDBText
Left = 152
Top = 256
Width = 48
Height = 13
Alignment = taRightJustify
AutoSize = True
DataField = 'Naziv'
DataSource = DataNal.sMjere
Transparent = True
end
object Min_Kol: TMyDBText
Left = 136
Top = 252
Width = 66
Height = 17
DataField = 'MinKol'
DataSource = DataNal.sStavke
end
object Bevel60: TBevel
Left = 8
Top = 196
Width = 197
Height = 21
Shape = bsFrame
Style = bsRaised
end
object Bevel26: TBevel
Left = 8
Top = 128
Width = 197
Height = 65
Style = bsRaised
end
object Bevel59: TBevel
Left = 8
Top = 128
Width = 197
Height = 37
Shape = bsFrame
Style = bsRaised
end
object Bevel13: TBevel
Left = 8
Top = 196
Width = 197
Height = 49
Style = bsRaised
end
object DBText13: TMyDBText
Left = 12
Top = 200
Width = 189
Height = 13
DataField = 'Naziv'
DataSource = DataNal.sImeBoje
end
object DBText7: TMyDBText
Left = 12
Top = 132
Width = 189
Height = 29
DataField = 'Naziv'
DataSource = DataNal.sImeRobe
WordWrap = True
end
object Label13: TLabel
Left = 8
Top = 8
Width = 85
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Radni nalog br.'
end
object Label26: TLabel
Left = 12
Top = 172
Width = 23
Height = 13
Caption = 'Artikl'
end
object Label119: TLabel
Left = 16
Top = 224
Width = 21
Height = 13
Caption = 'Boja'
end
object Label2: TLabel
Left = 8
Top = 324
Width = 29
Height = 13
Caption = 'Cijena'
end
object Label3: TLabel
Left = 8
Top = 372
Width = 21
Height = 13
Alignment = taRightJustify
Caption = 'VPC'
end
object DBText1: TMyDBText
Left = 152
Top = 324
Width = 49
Height = 17
DataField = 'Cij'
DataSource = DataNal.sValuta
end
object DBText2: TMyDBText
Left = 152
Top = 372
Width = 49
Height = 17
DataField = 'Cij'
DataSource = DataNal.sValuta
end
object Label5: TLabel
Left = 8
Top = 300
Width = 58
Height = 13
Caption = 'Normativi za'
end
object DBText3: TMyDBText
Left = 152
Top = 300
Width = 49
Height = 17
DataField = 'Naziv'
DataSource = DataNal.sMjere
end
object Label20: TLabel
Left = 232
Top = 139
Width = 122
Height = 13
Caption = 'Normativi za materijal'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 232
Top = 319
Width = 231
Height = 13
Caption = 'Normativi za ostale tro�kove proizvodnje'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label28: TLabel
Left = 8
Top = 348
Width = 42
Height = 13
Caption = 'Nalog za'
end
object JedMjere: TMyDBText
Left = 152
Top = 348
Width = 49
Height = 17
DataField = 'Naziv'
DataSource = DataNal.sMjere
end
object Label19: TLabel
Left = 8
Top = 396
Width = 45
Height = 13
Caption = 'Zavr�eno'
end
object DBText9: TMyDBText
Left = 152
Top = 396
Width = 49
Height = 17
DataField = 'Naziv'
DataSource = DataNal.sMjere
end
object MjereNaziv: TDBVar
Left = 92
Top = 256
Width = 9
Height = 9
TabStop = False
AutoSize = False
DataField = 'Naziv'
DataSource = DataNal.sMjere
Enabled = False
TabOrder = 16
OnChange = Mjereno
end
object DBEdit2: TDBVar
Left = 80
Top = 256
Width = 9
Height = 9
TabStop = False
AutoSize = False
DataField = 'XKol'
DataSource = DataNal.sStavke
Enabled = False
TabOrder = 15
OnChange = Mjereno
end
object xImaAtoma: TDBChecker
Left = 104
Top = 256
Width = 13
Height = 13
TabStop = False
Caption = 'xImaAtoma'
DataField = 'ImaAtoma'
DataSource = DataNal.sPakung
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 14
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaAtomaChange
end
object xImaBoje: TDBChecker
Left = 64
Top = 256
Width = 15
Height = 13
TabStop = False
Caption = 'xImaBoje'
DataField = 'Bezbojno'
DataSource = DataNal.sRoba
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 13
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaBojeChange
end
object eMinKol: TDBJustLookup
Left = 56
Top = 248
Width = 73
Height = 21
TabStop = False
DataField = 'ATOM'
DataSource = DataNal.sStavke0
LookupSource = DataNal.sAtomi
LookupField = 'KOLICINA'
Color = clBtnFace
Enabled = False
TabOrder = 4
DisplayName = 'Osnovna jedinica koli�ine'
OnExitChanged = eMinKolExitChanged
end
object cSifra: TDBKey
Left = 104
Top = 48
Width = 53
Height = 21
AutoSize = False
Ctl3D = True
DataField = 'STAVKA'
DataSource = DataNal.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
DisplayName = 'Stavka Ulazne fakture'
end
object ZapisiButton20: TBitBtn
Left = 8
Top = 420
Width = 80
Height = 25
Caption = 'Stavka'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
OnClick = ZapisiButton20Click
OnEnter = ZapisiButton20Enter
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object IzlazButton20: TBitBtn
Left = 100
Top = 420
Width = 104
Height = 25
Caption = 'Zaglavlje'
TabOrder = 12
OnClick = IzlazButton20Click
Glyph.Data = {
76020000424D7602000000000000760000002800000040000000100000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333933333333333333333333333333333338F33333333333333333333
3333333339093333333333333333FF33333333333888F3333333333333300333
3333333390F093333333333333F88F333333333388388F3333333333300C0333
333333390FFF093333333333F8838F333333333888F388F3333333300CCC0333
3333339990FFF093333333F883338FFFFF333383388F388F3333300CCCCC0000
00033999990FFF093333F88333338888883338333388F388F3330CCCCCCCCCCC
CC0319999990FFF0933383FF33333FFFFF338F3333388F388F33300CCCCC0000
0003919999990FFF09333883FF338888883388F333F388F388F333300CCC0333
33333919909990FFF093333883FF8F333333388F3833F88F38833333300C0333
333333919990990F0933333338838F3333333388F338F3888833333333300333
33333339190099903333333333388333333333388F883338F333333333333333
333333339199999933333333333333333333333388F333F83333333333333333
3333333339199993333333333333333333333333388F38833333333333333333
3333333333919333333333333333333333333333338883333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object eSifArt: TDBJustLookup
Left = 44
Top = 168
Width = 157
Height = 21
DataField = 'ARTIKL'
DataSource = DataNal.sStavke0
LookupSource = DataNal.sArtikl
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
TabOrder = 2
Required = True
DisplayName = '�ifra artikla'
OnExitChanged = eSifArtExitChanged
OnF2Press = SifArt_F2
end
object eSifBoje: TDBJustLookup
Left = 44
Top = 220
Width = 157
Height = 21
TabStop = False
DataField = 'BOJA'
DataSource = DataNal.sStavke0
LookupSource = DataNal.sBoje
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
Color = clBtnFace
Enabled = False
TabOrder = 3
DisplayName = '�ifra boje'
OnExitChanged = eSifBojeExitChanged
OnF2Press = SifBoja_F2
end
object eCijena: TDBVar
Left = 44
Top = 320
Width = 105
Height = 21
TabStop = False
AutoSize = False
Color = clBtnFace
DataField = 'Cijena'
DataSource = DataNal.sStavke
TabOrder = 7
end
object eVPC: TDBVar
Left = 36
Top = 368
Width = 113
Height = 21
AutoSize = False
DataField = 'VPC'
DataSource = DataNal.sStavke
TabOrder = 9
end
object gStavke0: TMyDBGrid
Tag = 1
Left = 216
Top = 4
Width = 405
Height = 129
FindByName = True
DataSource = DataNal.sStavke
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 = []
end
object xPromjena: TCheckBox
Left = 8
Top = 276
Width = 189
Height = 16
Caption = 'Promjena normativa za proizvodnju.'
TabOrder = 5
OnClick = xPromjenaClick
end
object eNorma: TDBVar
Left = 72
Top = 296
Width = 77
Height = 21
AutoSize = False
DataField = 'ZaKolicinu'
DataSource = DataNal.sStavke
TabOrder = 6
OnEnter = eNormaEnter
OnExitChanged = eNormaExitChanged
end
object gStavkeX: TMyDBGrid
Tag = 1
Left = 216
Top = 153
Width = 407
Height = 165
FindByName = True
Color = clBtnFace
DataSource = DataNal.sStavke1
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 17
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object gStavkeY: TMyDBGrid
Tag = 1
Left = 216
Top = 333
Width = 407
Height = 111
FindByName = True
Color = clBtnFace
DataSource = DataNal.sStavke2
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 18
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object eKolicina: TDBVar
Left = 56
Top = 344
Width = 93
Height = 21
AutoSize = False
DataField = 'Kolicina'
DataSource = DataNal.sStavke
TabOrder = 8
OnExitChanged = tStavkeKolicinaChange
end
object eZavrseno: TDBVar
Left = 56
Top = 392
Width = 93
Height = 21
AutoSize = False
DataField = 'Zavrseno'
DataSource = DataNal.sStavke
TabOrder = 10
OnExitChanged = eZavrsenoExitChanged
end
end
object TPage
Left = 0
Top = 0
Caption = 'Normativi'
object Bevel6: TBevel
Left = 4
Top = 39
Width = 77
Height = 37
Shape = bsFrame
end
object Bevel10: TBevel
Left = 4
Top = 212
Width = 205
Height = 5
Shape = bsTopLine
end
object Bevel11: TBevel
Left = 4
Top = 88
Width = 205
Height = 185
Style = bsRaised
end
object Bevel8: TBevel
Left = 4
Top = 340
Width = 205
Height = 73
Style = bsRaised
end
object Bevel12: TBevel
Left = 0
Top = 303
Width = 632
Height = 5
Shape = bsTopLine
end
object Bevel9: TBevel
Left = 92
Top = 52
Width = 117
Height = 29
Style = bsRaised
end
object Label6: TLabel
Left = 98
Top = 60
Width = 54
Height = 13
Caption = 'Materijal br.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 12
Top = 248
Width = 37
Height = 13
Alignment = taRightJustify
Caption = 'Koli�ina'
end
object Min_Kol3: TMyDBText
Left = 156
Top = 246
Width = 49
Height = 17
DataField = 'Naziv'
DataSource = DataNal.sMjere
end
object Label10: TLabel
Left = 12
Top = 222
Width = 37
Height = 13
Caption = 'Min.kol.'
end
object Min_Kol2: TMyDBText
Left = 135
Top = 224
Width = 66
Height = 17
DataField = 'MinKol'
DataSource = DataNal.sStavke1
end
object Bevel14: TBevel
Left = 8
Top = 160
Width = 197
Height = 21
Shape = bsFrame
Style = bsRaised
end
object Bevel20: TBevel
Left = 8
Top = 92
Width = 197
Height = 65
Style = bsRaised
end
object Bevel21: TBevel
Left = 8
Top = 92
Width = 197
Height = 37
Shape = bsFrame
Style = bsRaised
end
object Bevel22: TBevel
Left = 8
Top = 160
Width = 197
Height = 49
Style = bsRaised
end
object DBText14: TMyDBText
Left = 12
Top = 164
Width = 189
Height = 13
DataField = 'Naziv'
DataSource = DataNal.sImeBoje
end
object DBText15: TMyDBText
Left = 12
Top = 96
Width = 189
Height = 29
DataField = 'Naziv'
DataSource = DataNal.sImeRobe
WordWrap = True
end
object Label12: TLabel
Left = 12
Top = 388
Width = 81
Height = 13
Caption = 'Vrijednost tro�ka:'
end
object Label14: TLabel
Left = 13
Top = 344
Width = 24
Height = 13
Alignment = taRightJustify
Caption = 'Opis:'
end
object Bevel23: TBevel
Left = 100
Top = 308
Width = 109
Height = 29
Style = bsRaised
end
object Label15: TLabel
Left = 104
Top = 316
Width = 48
Height = 13
Caption = 'Tro�ak br.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 12
Top = 136
Width = 23
Height = 13
Caption = 'Artikl'
end
object Label17: TLabel
Left = 16
Top = 188
Width = 21
Height = 13
Caption = 'Boja'
end
object Bevel7: TBevel
Left = 104
Top = 4
Width = 109
Height = 37
Shape = bsFrame
end
object Bevel24: TBevel
Left = 4
Top = 4
Width = 102
Height = 37
Shape = bsFrame
end
object DBText6: TMyDBText
Left = 8
Top = 24
Width = 93
Height = 13
Alignment = taCenter
DataField = 'BrojIFE'
DataSource = DataNal.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBText16: TMyDBText
Left = 108
Top = 24
Width = 101
Height = 13
Alignment = taCenter
DataField = 'DatumDVO'
DataSource = DataNal.sGlava
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 108
Top = 8
Width = 101
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Po�etak proizvodnje'
end
object Label18: TLabel
Left = 8
Top = 8
Width = 93
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Radni nalog br.'
end
object Label7: TLabel
Left = 8
Top = 43
Width = 69
Height = 13
Alignment = taCenter
AutoSize = False
Caption = 'Stavka'
end
object DBText8: TMyDBText
Left = 8
Top = 59
Width = 69
Height = 13
Alignment = taCenter
DataField = 'Stavka'
DataSource = DataNal.sStavke
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object cSifra1: TDBKey
Left = 156
Top = 56
Width = 49
Height = 21
AutoSize = False
Ctl3D = True
DataField = 'STAVKA'
DataSource = DataNal.sStavke1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 1
DisplayName = 'Stavka Ulazne fakture'
end
object TrosakBtn: TBitBtn
Left = 5
Top = 414
Width = 80
Height = 25
Caption = 'Tro�ak'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
OnClick = TrosakBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object NatragBtn: TBitBtn
Left = 116
Top = 422
Width = 92
Height = 25
Caption = 'Stavke'
TabOrder = 12
OnClick = NatragBtnClick
Glyph.Data = {
76020000424D7602000000000000760000002800000040000000100000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333933333333333333333333333333333338F33333333333333333333
3333333339093333333333333333FF33333333333888F3333333333333300333
3333333390F093333333333333F88F333333333388388F3333333333300C0333
333333390FFF093333333333F8838F333333333888F388F3333333300CCC0333
3333339990FFF093333333F883338FFFFF333383388F388F3333300CCCCC0000
00033999990FFF093333F88333338888883338333388F388F3330CCCCCCCCCCC
CC0319999990FFF0933383FF33333FFFFF338F3333388F388F33300CCCCC0000
0003919999990FFF09333883FF338888883388F333F388F388F333300CCC0333
33333919909990FFF093333883FF8F333333388F3833F88F38833333300C0333
333333919990990F0933333338838F3333333388F338F3888833333333300333
33333339190099903333333333388333333333388F883338F333333333333333
333333339199999933333333333333333333333388F333F83333333333333333
3333333339199993333333333333333333333333388F38833333333333333333
3333333333919333333333333333333333333333338883333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object gStavke1: TMyDBGrid
Tag = 1
Left = 216
Top = 8
Width = 407
Height = 291
FindByName = True
DataSource = DataNal.sStavke1
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 = []
OnEnter = gStavke1Enter
end
object xMinKol2: TDBVar
Left = 90
Top = 224
Width = 9
Height = 9
TabStop = False
AutoSize = False
DataField = 'Naziv'
DataSource = DataNal.sMjere
Enabled = False
TabOrder = 13
OnChange = xMinKolChange
end
object xMinKol: TDBVar
Left = 78
Top = 224
Width = 9
Height = 9
TabStop = False
AutoSize = False
DataField = 'XKol'
DataSource = DataNal.sStavke1
Enabled = False
TabOrder = 14
OnChange = xMinKolChange
end
object xImaAtoma2: TDBChecker
Left = 104
Top = 222
Width = 13
Height = 13
TabStop = False
Caption = 'xImaAtoma'
DataField = 'ImaAtoma'
DataSource = DataNal.sPakung
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 15
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaAtoma2Change
end
object xImaBoje2: TDBChecker
Left = 62
Top = 222
Width = 15
Height = 13
TabStop = False
Caption = 'xImaBoje'
DataField = 'Bezbojno'
DataSource = DataNal.sRoba
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 16
ValueChecked = 'True'
ValueUnchecked = 'False'
OnChange = xImaBoje2Change
end
object eMinKol2: TDBJustLookup
Left = 52
Top = 218
Width = 81
Height = 22
TabStop = False
DataField = 'ATOM'
DataSource = DataNal.sStavke0
LookupSource = DataNal.sAtomi
LookupField = 'KOLICINA'
Color = clBtnFace
Enabled = False
TabOrder = 4
DisplayName = 'Osnovna jedinica koli�ine'
OnExitChanged = eMinKol2ExitChanged
end
object eKolicina2: TDBVar
Left = 52
Top = 244
Width = 101
Height = 21
AutoSize = False
DataField = 'Kolicina'
DataSource = DataNal.sStavke1
TabOrder = 5
OnExitChanged = eKolicina2ExitChanged
end
object eVrijednost2: TDBVar
Left = 100
Top = 384
Width = 101
Height = 21
AutoSize = False
DataField = 'Kolicina'
DataSource = DataNal.sStavke2
TabOrder = 10
end
object eOpis2: TDBVar
Left = 12
Top = 360
Width = 189
Height = 21
AutoSize = False
DataField = 'Opis'
DataSource = DataNal.sStavke2
TabOrder = 9
end
object cSifra2: TDBKey
Left = 156
Top = 312
Width = 49
Height = 21
AutoSize = False
Ctl3D = True
DataField = 'STAVKA'
DataSource = DataNal.sStavke2
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentCtl3D = False
ParentFont = False
TabOrder = 8
DisplayName = 'Stavka Ulazne fakture'
end
object MaterijalBtn: TBitBtn
Left = 5
Top = 274
Width = 80
Height = 25
Caption = 'Materijal'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = MaterijalBtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
end
object gStavke2: TMyDBGrid
Tag = 1
Left = 216
Top = 312
Width = 407
Height = 129
FindByName = True
DataSource = DataNal.sStavke2
Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete]
TabOrder = 7
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnEnter = gStavke2Enter
end
object eSifArt2: TDBJustLookup
Left = 44
Top = 132
Width = 157
Height = 21
DataField = 'ARTIKL'
DataSource = DataNal.sStavke0
LookupSource = DataNal.sArtikl
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
TabOrder = 2
Required = True
DisplayName = '�ifra artikla'
OnExitChanged = eSifArt2ExitChanged
OnF2Press = SifArt2_F2
end
object eSifBoje2: TDBJustLookup
Left = 44
Top = 184
Width = 157
Height = 21
TabStop = False
DataField = 'BOJA'
DataSource = DataNal.sStavke0
LookupSource = DataNal.sBoje
LookupDisplay = 'SIFRA'
LookupField = 'CODE'
Color = clBtnFace
Enabled = False
TabOrder = 3
DisplayName = '�ifra boje'
OnExitChanged = eSifBoje2ExitChanged
OnF2Press = SifBoja2_F2
end
end
end
end