企业管理

开发平台：

Visual Basic

：源码内容

VERSION 5.00
Object = "{BEEECC20-4D5F-4F8B-BFDC-5D9B6FBDE09D}#1.0#0"; "vsflex8.ocx"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form Gy_Material
BorderStyle = 1 'Fixed Single
Caption = "物料档案设置"
ClientHeight = 7680
ClientLeft = 45
ClientTop = 330
ClientWidth = 11640
HelpContextID = 1211002
Icon = "公用_物料档案设置.frx":0000
KeyPreview = -1 'True
LinkTopic = "Form2"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 7680
ScaleWidth = 11640
StartUpPosition = 1 '所有者中心
Begin VB.PictureBox picSplitter
BackColor = &H00E0E0E0&
BorderStyle = 0 'None
FillColor = &H00808080&
Height = 6840
Left = 2820
ScaleHeight = 2978.431
ScaleMode = 0 'User
ScaleWidth = 156
TabIndex = 133
Top = 720
Visible = 0 'False
Width = 15
End
Begin VB.Timer Timer1
Enabled = 0 'False
Interval = 1
Left = 1830
Top = 480
End
Begin TabDlg.SSTab StTab
Height = 7020
Left = 2895
TabIndex = 68
Top = 645
Width = 8730
_ExtentX = 15399
_ExtentY = 12383
_Version = 393216
Style = 1
Tabs = 2
Tab = 1
TabHeight = 520
TabCaption(0) = "列表视图"
TabPicture(0) = "公用_物料档案设置.frx":1042
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "CzxsGrid"
Tab(0).ControlCount= 1
TabCaption(1) = "单张视图"
TabPicture(1) = "公用_物料档案设置.frx":105E
Tab(1).ControlEnabled= -1 'True
Tab(1).Control(0)= "Frame1"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).ControlCount= 1
Begin VB.Frame Frame1
Height = 6525
Left = 120
TabIndex = 70
Top = 375
Width = 8490
Begin VB.CommandButton QxCommand
Cancel = -1 'True
Caption = "取消(&C)"
Height = 300
Left = 7290
TabIndex = 62
Top = 247
Width = 1069
End
Begin VB.CommandButton BcCommand
Caption = "保存(&S)"
Height = 300
Left = 6180
TabIndex = 61
Top = 247
Width = 1069
End
Begin VB.CommandButton Command1
Height = 300
Left = 4740
Picture = "公用_物料档案设置.frx":107A
Style = 1 'Graphical
TabIndex = 63
Top = 247
Width = 360
End
Begin VB.CommandButton Command2
Height = 300
Left = 5070
Picture = "公用_物料档案设置.frx":1404
Style = 1 'Graphical
TabIndex = 64
Top = 247
Width = 360
End
Begin VB.CommandButton Command3
Height = 300
Left = 5430
Picture = "公用_物料档案设置.frx":178E
Style = 1 'Graphical
TabIndex = 65
Top = 247
Width = 360
End
Begin VB.CommandButton Command4
Height = 300
Left = 5760
Picture = "公用_物料档案设置.frx":1B18
Style = 1 'Graphical
TabIndex = 66
Top = 247
Width = 360
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 0
Left = 3659
Picture = "公用_物料档案设置.frx":1EA2
Style = 1 'Graphical
TabIndex = 71
Top = 141
Visible = 0 'False
Width = 285
End
Begin TabDlg.SSTab SSTab1
Height = 6030
Left = 120
TabIndex = 72
Top = 375
Width = 8235
_ExtentX = 14526
_ExtentY = 10636
_Version = 393216
Style = 1
Tabs = 2
TabsPerRow = 8
TabHeight = 520
TabCaption(0) = "基本信息"
TabPicture(0) = "公用_物料档案设置.frx":222C
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "TsLabel(0)"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "TsLabel(1)"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).Control(2)= "TsLabel(2)"
Tab(0).Control(2).Enabled= 0 'False
Tab(0).Control(3)= "TsLabel(3)"
Tab(0).Control(3).Enabled= 0 'False
Tab(0).Control(4)= "TsLabel(4)"
Tab(0).Control(4).Enabled= 0 'False
Tab(0).Control(5)= "TsLabel(5)"
Tab(0).Control(5).Enabled= 0 'False
Tab(0).Control(6)= "TsLabel(7)"
Tab(0).Control(6).Enabled= 0 'False
Tab(0).Control(7)= "TsLabel(8)"
Tab(0).Control(7).Enabled= 0 'False
Tab(0).Control(8)= "TsLabel(9)"
Tab(0).Control(8).Enabled= 0 'False
Tab(0).Control(9)= "TsLabel(10)"
Tab(0).Control(9).Enabled= 0 'False
Tab(0).Control(10)= "TsLabel(6)"
Tab(0).Control(10).Enabled= 0 'False
Tab(0).Control(11)= "TsLabel(16)"
Tab(0).Control(11).Enabled= 0 'False
Tab(0).Control(12)= "TsLabel(17)"
Tab(0).Control(12).Enabled= 0 'False
Tab(0).Control(13)= "TsLabel(50)"
Tab(0).Control(13).Enabled= 0 'False
Tab(0).Control(14)= "TsLabel(12)"
Tab(0).Control(14).Enabled= 0 'False
Tab(0).Control(15)= "lblMsg"
Tab(0).Control(15).Enabled= 0 'False
Tab(0).Control(16)= "Ydcommand1(7)"
Tab(0).Control(16).Enabled= 0 'False
Tab(0).Control(17)= "Ydcommand1(10)"
Tab(0).Control(17).Enabled= 0 'False
Tab(0).Control(18)= "Ydcommand1(4)"
Tab(0).Control(18).Enabled= 0 'False
Tab(0).Control(19)= "Ydcommand1(12)"
Tab(0).Control(19).Enabled= 0 'False
Tab(0).Control(20)= "LrText(1)"
Tab(0).Control(20).Enabled= 0 'False
Tab(0).Control(21)= "LrText(3)"
Tab(0).Control(21).Enabled= 0 'False
Tab(0).Control(22)= "LrText(5)"
Tab(0).Control(22).Enabled= 0 'False
Tab(0).Control(23)= "LrText(6)"
Tab(0).Control(23).Enabled= 0 'False
Tab(0).Control(24)= "LrText(8)"
Tab(0).Control(24).Enabled= 0 'False
Tab(0).Control(25)= "LrText(9)"
Tab(0).Control(25).Enabled= 0 'False
Tab(0).Control(26)= "LrText(11)"
Tab(0).Control(26).Enabled= 0 'False
Tab(0).Control(27)= "LrText(13)"
Tab(0).Control(27).Enabled= 0 'False
Tab(0).Control(28)= "Ydcommand1(11)"
Tab(0).Control(28).Enabled= 0 'False
Tab(0).Control(29)= "Frame2"
Tab(0).Control(29).Enabled= 0 'False
Tab(0).Control(30)= "Frame3"
Tab(0).Control(30).Enabled= 0 'False
Tab(0).Control(31)= "LrText(14)"
Tab(0).Control(31).Enabled= 0 'False
Tab(0).Control(32)= "LrText(12)"
Tab(0).Control(32).Enabled= 0 'False
Tab(0).Control(33)= "Ydcommand1(3)"
Tab(0).Control(33).Enabled= 0 'False
Tab(0).Control(34)= "LrText(10)"
Tab(0).Control(34).Enabled= 0 'False
Tab(0).Control(35)= "LrText(7)"
Tab(0).Control(35).Enabled= 0 'False
Tab(0).Control(36)= "LrText(4)"
Tab(0).Control(36).Enabled= 0 'False
Tab(0).Control(37)= "LrText(2)"
Tab(0).Control(37).Enabled= 0 'False
Tab(0).Control(38)= "LrText(0)"
Tab(0).Control(38).Enabled= 0 'False
Tab(0).ControlCount= 39
TabCaption(1) = "辅助信息"
TabPicture(1) = "公用_物料档案设置.frx":2248
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "TsLabel(19)"
Tab(1).Control(1)= "TsLabel(21)"
Tab(1).Control(2)= "TsLabel(22)"
Tab(1).Control(3)= "TsLabel(23)"
Tab(1).Control(4)= "TsLabel(24)"
Tab(1).Control(5)= "TsLabel(25)"
Tab(1).Control(6)= "TsLabel(26)"
Tab(1).Control(7)= "TsLabel(13)"
Tab(1).Control(8)= "TsLabel(14)"
Tab(1).Control(9)= "TsLabel(15)"
Tab(1).Control(10)= "TsLabel(20)"
Tab(1).Control(11)= "TsLabel(27)"
Tab(1).Control(12)= "TsLabel(28)"
Tab(1).Control(13)= "TsLabel(29)"
Tab(1).Control(14)= "TsLabel(30)"
Tab(1).Control(15)= "TsLabel(31)"
Tab(1).Control(16)= "TsLabel(32)"
Tab(1).Control(17)= "TsLabel(33)"
Tab(1).Control(18)= "TsLabel(34)"
Tab(1).Control(19)= "TsLabel(36)"
Tab(1).Control(20)= "TsLabel(37)"
Tab(1).Control(21)= "TsLabel(38)"
Tab(1).Control(22)= "TsLabel(39)"
Tab(1).Control(23)= "TsLabel(40)"
Tab(1).Control(24)= "TsLabel(41)"
Tab(1).Control(25)= "TsLabel(42)"
Tab(1).Control(26)= "TsLabel(43)"
Tab(1).Control(27)= "TsLabel(44)"
Tab(1).Control(28)= "TsLabel(45)"
Tab(1).Control(29)= "TsLabel(46)"
Tab(1).Control(30)= "TsLabel(18)"
Tab(1).Control(31)= "TsLabel(11)"
Tab(1).Control(32)= "TsLabel(47)"
Tab(1).Control(33)= "TsLabel(48)"
Tab(1).Control(34)= "LrText(17)"
Tab(1).Control(35)= "LrText(18)"
Tab(1).Control(36)= "LrText(19)"
Tab(1).Control(37)= "LrText(20)"
Tab(1).Control(38)= "LrText(21)"
Tab(1).Control(39)= "LrText(22)"
Tab(1).Control(40)= "LrText(23)"
Tab(1).Control(41)= "LrText(24)"
Tab(1).Control(42)= "LrText(25)"
Tab(1).Control(43)= "LrText(26)"
Tab(1).Control(44)= "LrText(27)"
Tab(1).Control(45)= "LrText(28)"
Tab(1).Control(46)= "LrText(29)"
Tab(1).Control(47)= "LrText(30)"
Tab(1).Control(48)= "LrText(31)"
Tab(1).Control(49)= "LrText(32)"
Tab(1).Control(50)= "LrText(33)"
Tab(1).Control(51)= "LrText(34)"
Tab(1).Control(52)= "LrText(35)"
Tab(1).Control(53)= "LrText(36)"
Tab(1).Control(54)= "LrText(37)"
Tab(1).Control(55)= "LrText(38)"
Tab(1).Control(56)= "LrText(39)"
Tab(1).Control(57)= "LrText(40)"
Tab(1).Control(58)= "LrText(41)"
Tab(1).Control(59)= "LrText(42)"
Tab(1).Control(60)= "LrText(43)"
Tab(1).Control(61)= "LrText(16)"
Tab(1).Control(62)= "LrText(15)"
Tab(1).Control(63)= "LrText(44)"
Tab(1).Control(64)= "LrText(45)"
Tab(1).Control(65)= "Lrcomb(0)"
Tab(1).Control(66)= "Lrcomb(2)"
Tab(1).Control(67)= "Lrcomb(1)"
Tab(1).ControlCount= 68
Begin VB.TextBox LrText
Height = 311
Index = 0
Left = 1485
TabIndex = 0
Text = "0"
Top = 653
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 2
Left = 1485
TabIndex = 2
Text = "0"
Top = 1056
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 4
Left = 1485
TabIndex = 4
Text = "1"
Top = 1447
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 7
Left = 1485
TabIndex = 7
Text = "0"
Top = 1848
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 10
Left = 1485
TabIndex = 10
Text = "1"
Top = 2255
Width = 1935
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 3
Left = 7395
Picture = "公用_物料档案设置.frx":2264
Style = 1 'Graphical
TabIndex = 128
Top = 1073
Width = 285
End
Begin VB.TextBox LrText
Height = 311
Index = 12
Left = 1485
TabIndex = 12
Text = "1"
Top = 2643
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 14
Left = 1485
TabIndex = 14
Text = "1"
Top = 3049
Width = 1935
End
Begin VB.ComboBox Lrcomb
Height = 300
Index = 1
ItemData = "公用_物料档案设置.frx":25EE
Left = -70920
List = "公用_物料档案设置.frx":25FB
Style = 2 'Dropdown List
TabIndex = 48
Top = 3450
Width = 1276
End
Begin VB.ComboBox Lrcomb
Height = 300
Index = 2
ItemData = "公用_物料档案设置.frx":2608
Left = -73177
List = "公用_物料档案设置.frx":2615
Style = 2 'Dropdown List
TabIndex = 56
Top = 4476
Width = 916
End
Begin VB.ComboBox Lrcomb
Height = 300
Index = 0
ItemData = "公用_物料档案设置.frx":2631
Left = -70920
List = "公用_物料档案设置.frx":2647
Style = 2 'Dropdown List
TabIndex = 45
Top = 3124
Width = 1261
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 45
Left = -69151
TabIndex = 60
Text = "1"
Top = 5317
Width = 1879
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 44
Left = -73193
TabIndex = 59
Text = "1"
Top = 5317
Width = 1879
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 15
Left = -73193
TabIndex = 57
Text = "1"
Top = 4990
Width = 1879
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 16
Left = -69151
TabIndex = 58
Text = "1"
Top = 4990
Width = 1879
End
Begin VB.TextBox LrText
Height = 311
Index = 43
Left = -68325
TabIndex = 55
Text = "0"
Top = 4103
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 42
Left = -70920
TabIndex = 54
Text = "0"
Top = 4103
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 41
Left = -73536
TabIndex = 53
Text = "0"
Top = 4103
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 40
Left = -68325
TabIndex = 52
Text = "0"
Top = 3777
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 39
Left = -70920
TabIndex = 51
Text = "0"
Top = 3777
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 38
Left = -73536
TabIndex = 50
Text = "0"
Top = 3777
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 37
Left = -68325
TabIndex = 49
Text = "0"
Top = 3450
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 36
Left = -73536
TabIndex = 47
Text = "0"
Top = 3450
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 35
Left = -68325
TabIndex = 46
Text = "0"
Top = 3124
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 34
Left = -73536
TabIndex = 44
Text = "0"
Top = 3124
Width = 1276
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 33
Left = -73536
TabIndex = 43
Text = "0"
Top = 2658
Width = 1276
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 32
Left = -68325
TabIndex = 42
Text = "0"
Top = 2332
Width = 1276
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 31
Left = -70920
TabIndex = 41
Text = "0"
Top = 2332
Width = 1276
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 30
Left = -73536
TabIndex = 40
Text = "1"
Top = 2332
Width = 1276
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 29
Left = -68325
TabIndex = 39
Text = "1"
Top = 2007
Width = 1276
End
Begin VB.TextBox LrText
Enabled = 0 'False
Height = 311
Index = 28
Left = -70920
TabIndex = 38
Text = "1"
Top = 2007
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 27
Left = -73536
TabIndex = 37
Text = "0"
Top = 2007
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 26
Left = -68325
TabIndex = 36
Text = "1"
Top = 1679
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 25
Left = -70920
TabIndex = 35
Text = "0"
Top = 1679
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 24
Left = -73536
TabIndex = 34
Text = "0"
Top = 1679
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 23
Left = -73536
TabIndex = 33
Text = "0"
Top = 1213
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 22
Left = -68325
TabIndex = 32
Text = "0"
Top = 887
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 21
Left = -70920
TabIndex = 31
Text = "1"
Top = 887
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 20
Left = -73536
TabIndex = 30
Text = "0"
Top = 887
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 19
Left = -68325
TabIndex = 29
Text = "1"
Top = 559
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 18
Left = -70920
TabIndex = 28
Text = "1"
Top = 559
Width = 1276
End
Begin VB.TextBox LrText
Height = 311
Index = 17
Left = -73536
TabIndex = 27
Text = "1"
Top = 559
Width = 1276
End
Begin VB.Frame Frame3
Caption = "控制信息"
Height = 807
Left = 299
TabIndex = 90
Top = 4524
Width = 7365
Begin VB.CheckBox Lrcheck
Caption = "备品备件"
Height = 295
Index = 10
Left = 4860
TabIndex = 25
Top = 327
Width = 1125
End
Begin VB.CheckBox Lrcheck
Caption = "停用标志"
Height = 295
Index = 11
Left = 6120
TabIndex = 26
Top = 327
Width = 1125
End
Begin VB.CheckBox Lrcheck
Caption = "检验"
Height = 295
Index = 9
Left = 3660
TabIndex = 24
Top = 327
Width = 1002
End
Begin VB.CheckBox Lrcheck
Caption = "亏吨"
Height = 295
Index = 8
Left = 2790
TabIndex = 23
Top = 327
Width = 1002
End
Begin VB.CheckBox Lrcheck
Caption = "批次管理"
Height = 295
Index = 7
Left = 120
TabIndex = 21
Top = 330
Width = 1045
End
Begin VB.CheckBox Lrcheck
Caption = "保质期管理"
Height = 295
Index = 6
Left = 1350
TabIndex = 22
Top = 330
Width = 1290
End
End
Begin VB.Frame Frame2
Caption = "物料属性"
Height = 855
Left = 299
TabIndex = 88
Top = 3543
Width = 7365
Begin VB.CheckBox Lrcheck
Caption = "销售"
Height = 295
Index = 0
Left = 129
TabIndex = 15
Top = 327
Width = 747
End
Begin VB.CheckBox Lrcheck
Caption = "外购"
Height = 295
Index = 1
Left = 1350
TabIndex = 16
Top = 327
Width = 747
End
Begin VB.CheckBox Lrcheck
Caption = "自制"
Height = 295
Index = 2
Left = 2790
TabIndex = 17
Top = 327
Width = 747
End
Begin VB.CheckBox Lrcheck
Caption = "生产耗用"
Height = 295
Index = 3
Left = 3660
TabIndex = 18
Top = 327
Width = 1091
End
Begin VB.CheckBox Lrcheck
Caption = "劳务费用"
Height = 295
Index = 4
Left = 4860
TabIndex = 19
Top = 327
Width = 1127
End
Begin VB.CheckBox Lrcheck
Caption = "委托加工"
Height = 295
Index = 5
Left = 6120
TabIndex = 20
Top = 327
Width = 1133
End
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 11
Left = 7395
Picture = "公用_物料档案设置.frx":2697
Style = 1 'Graphical
TabIndex = 86
Top = 2285
Width = 285
End
Begin VB.TextBox LrText
Height = 311
Index = 13
Left = 5460
TabIndex = 13
Text = "0"
Top = 2643
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 11
Left = 5460
TabIndex = 11
Text = "0"
Top = 2255
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 9
Left = 6465
TabIndex = 9
Text = "1"
Top = 1820
Width = 915
End
Begin VB.TextBox LrText
Height = 311
Index = 8
Left = 5460
TabIndex = 8
Text = "1"
Top = 1848
Width = 915
End
Begin VB.TextBox LrText
Height = 311
Index = 6
Left = 6465
TabIndex = 6
Text = "1"
Top = 1447
Width = 915
End
Begin VB.TextBox LrText
Height = 311
Index = 5
Left = 5460
TabIndex = 5
Text = "1"
Top = 1447
Width = 915
End
Begin VB.TextBox LrText
Height = 311
Index = 3
Left = 5460
TabIndex = 3
Text = "1"
Top = 1056
Width = 1935
End
Begin VB.TextBox LrText
Height = 311
Index = 1
Left = 5460
TabIndex = 1
Text = "1"
Top = 653
Width = 1935
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 12
Left = 3405
Picture = "公用_物料档案设置.frx":2A21
Style = 1 'Graphical
TabIndex = 126
Top = 2658
Width = 285
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 4
Left = 3405
Picture = "公用_物料档案设置.frx":2DAB
Style = 1 'Graphical
TabIndex = 127
Top = 1447
Width = 285
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 10
Left = 3405
Picture = "公用_物料档案设置.frx":3135
Style = 1 'Graphical
TabIndex = 129
Top = 2238
Width = 285
End
Begin VB.CommandButton Ydcommand1
Height = 311
Index = 7
Left = 3405
Picture = "公用_物料档案设置.frx":34BF
Style = 1 'Graphical
TabIndex = 130
Top = 1865
Width = 285
End
Begin VB.Label lblMsg
BackColor = &H8000000B&
Caption = "说明：此物料已被使用，只能修改部分属性!"
ForeColor = &H00FF0000&
Height = 180
Left = 300
TabIndex = 131
Top = 5535
Visible = 0 'False
Width = 3600
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "原材料科目:"
Height = 187
Index = 48
Left = -74701
TabIndex = 125
Top = 5363
Width = 949
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "进项增值税科目:"
Height = 203
Index = 47
Left = -70524
TabIndex = 124
Top = 5363
Width = 1250
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "销售收入科目:"
Height = 187
Index = 11
Left = -74701
TabIndex = 123
Top = 5038
Width = 1120
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "增值税科目:"
Height = 203
Index = 18
Left = -70524
TabIndex = 122
Top = 5038
Width = 903
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "图号:"
Height = 180
Index = 46
Left = -69480
TabIndex = 121
Top = 4200
Width = 435
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "零件号:"
Height = 180
Index = 45
Left = -72075
TabIndex = 120
Top = 4200
Width = 600
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "低位码:"
Height = 187
Index = 44
Left = -74701
TabIndex = 119
Top = 4196
Width = 604
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "条行码:"
Height = 180
Index = 43
Left = -69480
TabIndex = 118
Top = 3870
Width = 600
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "单位体积:"
Height = 180
Index = 42
Left = -72075
TabIndex = 117
Top = 3870
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "单位重量:"
Height = 187
Index = 41
Left = -74701
TabIndex = 116
Top = 3871
Width = 772
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "制造采购托外标志:"
Height = 187
Index = 40
Left = -74701
TabIndex = 115
Top = 4524
Width = 1464
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "检验方式:"
Height = 180
Index = 39
Left = -69480
TabIndex = 114
Top = 3540
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "ABC分类:"
Height = 180
Index = 38
Left = -72075
TabIndex = 113
Top = 3540
Width = 690
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "工艺路线代码:"
Height = 187
Index = 37
Left = -74701
TabIndex = 112
Top = 3543
Width = 1120
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "经济批量:"
Height = 180
Index = 36
Left = -69480
TabIndex = 111
Top = 3225
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "批量方法:"
Height = 180
Index = 34
Left = -72075
TabIndex = 109
Top = 3225
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "提前期:"
Height = 187
Index = 33
Left = -74701
TabIndex = 108
Top = 3218
Width = 604
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "待验量:"
Height = 187
Index = 32
Left = -74701
TabIndex = 107
Top = 2704
Width = 604
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "在订量:"
Height = 180
Index = 31
Left = -69480
TabIndex = 106
Top = 2430
Width = 600
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "可用库存:"
Height = 180
Index = 30
Left = -72075
TabIndex = 105
Top = 2430
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "安全库存:"
Height = 180
Index = 29
Left = -69480
TabIndex = 104
Top = 1725
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "最高库存:"
Height = 187
Index = 28
Left = -74701
TabIndex = 103
Top = 1727
Width = 772
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "最低库存:"
Height = 180
Index = 27
Left = -72075
TabIndex = 102
Top = 1725
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "积压标准:"
Height = 187
Index = 20
Left = -74701
TabIndex = 101
Top = 2099
Width = 772
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "综合库存量:"
Height = 180
Index = 15
Left = -72075
TabIndex = 100
Top = 2100
Width = 945
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "现有库存:"
Height = 180
Index = 14
Left = -69480
TabIndex = 99
Top = 2100
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "已分配库存:"
Height = 187
Index = 13
Left = -74701
TabIndex = 98
Top = 2424
Width = 949
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "最高价格:"
Height = 187
Index = 26
Left = -74701
TabIndex = 97
Top = 1260
Width = 772
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "最新出库成本:"
Height = 180
Index = 25
Left = -69480
TabIndex = 96
Top = 930
Width = 1125
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "最新入库成本:"
Height = 180
Index = 24
Left = -72075
TabIndex = 95
Top = 930
Width = 1125
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "最低售价:"
Height = 187
Index = 23
Left = -74701
TabIndex = 94
Top = 933
Width = 772
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "参考成本:"
Height = 180
Index = 22
Left = -72075
TabIndex = 93
Top = 600
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "计划价:"
Height = 187
Index = 21
Left = -74701
TabIndex = 92
Top = 607
Width = 604
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "参考售价:"
Height = 180
Index = 19
Left = -69480
TabIndex = 91
Top = 600
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "/"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Index = 12
Left = 6330
TabIndex = 89
Top = 1860
Width = 225
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "/"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Index = 50
Left = 6330
TabIndex = 87
Top = 1440
Width = 225
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "所属库存分类:"
Height = 180
Index = 17
Left = 4290
TabIndex = 85
Top = 2325
Width = 1125
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "所属采购分类:"
Height = 187
Index = 16
Left = 299
TabIndex = 84
Top = 2332
Width = 1120
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "主计量单位:"
Height = 180
Index = 6
Left = 4290
TabIndex = 79
Top = 1125
Width = 945
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "材质:"
Height = 187
Index = 10
Left = 299
TabIndex = 83
Top = 3170
Width = 433
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "税率%:"
Height = 180
Index = 9
Left = 4290
TabIndex = 82
Top = 2745
Width = 525
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "销售换算率:"
Height = 180
Index = 8
Left = 4290
TabIndex = 81
Top = 1920
Width = 945
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "采购换算率:"
Height = 180
Index = 7
Left = 4290
TabIndex = 80
Top = 1500
Width = 945
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "物料名称:"
Height = 180
Index = 5
Left = 4290
TabIndex = 78
Top = 720
Width = 765
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "默认分配仓库:"
Height = 187
Index = 4
Left = 299
TabIndex = 77
Top = 2751
Width = 1120
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "销售计量单位:"
Height = 187
Index = 3
Left = 299
TabIndex = 76
Top = 1913
Width = 1120
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "采购计量单位:"
Height = 187
Index = 2
Left = 299
TabIndex = 75
Top = 1540
Width = 1120
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "规格型号:"
Height = 187
Index = 1
Left = 299
TabIndex = 74
Top = 1119
Width = 772
End
Begin VB.Label TsLabel
AutoSize = -1 'True
Caption = "物料编码:"
Height = 187
Index = 0
Left = 299
TabIndex = 73
Top = 715
Width = 772
End
End
End
Begin VSFlex8Ctl.VSFlexGrid CzxsGrid
Height = 6540
Left = -74910
TabIndex = 67
Top = 405
Width = 8520
_cx = 5080
_cy = 5080
Appearance = 1
BorderStyle = 1
Enabled = -1 'True
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
MousePointer = 0
BackColor = -2147483643
ForeColor = -2147483640
BackColorFixed = -2147483633
ForeColorFixed = -2147483630
BackColorSel = -2147483635
ForeColorSel = -2147483634
BackColorBkg = 8421504
BackColorAlternate= -2147483643
GridColor = -2147483633
GridColorFixed = -2147483632
TreeColor = -2147483632
FloodColor = 192
SheetBorder = -2147483642
FocusRect = 1
HighLight = 1
AllowSelection = -1 'True
AllowBigSelection= -1 'True
AllowUserResizing= 0
SelectionMode = 0
GridLines = 1
GridLinesFixed = 2
GridLineWidth = 1
Rows = 5000
Cols = 10
FixedRows = 1
FixedCols = 0
RowHeightMin = 0
RowHeightMax = 0
ColWidthMin = 0
ColWidthMax = 0
ExtendLastCol = 0 'False
FormatString = ""
ScrollTrack = 0 'False
ScrollBars = 3
ScrollTips = 0 'False
MergeCells = 0
MergeCompare = 0
AutoResize = -1 'True
AutoSizeMode = 0
AutoSearch = 0
AutoSearchDelay = 2
MultiTotals = -1 'True
SubtotalPosition= 1
OutlineBar = 0
OutlineCol = 0
Ellipsis = 0
ExplorerBar = 0
PicturesOver = 0 'False
FillStyle = 0
RightToLeft = 0 'False
PictureType = 0
TabBehavior = 0
OwnerDraw = 0
Editable = 0
ShowComboButton = 1
WordWrap = 0 'False
TextStyle = 0
TextStyleFixed = 0
OleDragMode = 0
OleDropMode = 0
DataMode = 0
VirtualData = -1 'True
DataMember = ""
ComboSearch = 3
AutoSizeMouse = -1 'True
FrozenRows = 0
FrozenCols = 0
AllowUserFreezing= 0
BackColorFrozen = 0
ForeColorFrozen = 0
WallPaperAlignment= 9
AccessibleName = ""
AccessibleDescription= ""
AccessibleValue = ""
AccessibleRole = 24
End
End
Begin MSComctlLib.ImageList ImageList1
Left = -60
Top = 360
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 29
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":3849
Key = "sz"
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":3BE3
Key = "dy"
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":3F7D
Key = "yl"
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":4317
Key = "xg"
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":46B1
Key = "zh"
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":4A4B
Key = "sh"
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":4DE5
Key = "bc"
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":517F
Key = "fq"
EndProperty
BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":5519
Key = "bz"
EndProperty
BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":58B3
Key = "tc"
EndProperty
BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":5C4D
Key = "bcgs"
EndProperty
BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":5FE7
Key = "mrlk"
EndProperty
BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":6381
Key = "xsxm"
EndProperty
BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":671B
Key = "first"
EndProperty
BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":6AB5
Key = "prev"
EndProperty
BeginProperty ListImage16 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":6E4F
Key = "next"
EndProperty
BeginProperty ListImage17 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":71E9
Key = "last"
EndProperty
BeginProperty ListImage18 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":7583
Key = "xx"
EndProperty
BeginProperty ListImage19 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":791D
Key = "define"
EndProperty
BeginProperty ListImage20 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":7CB7
Key = "exec"
EndProperty
BeginProperty ListImage21 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":8051
Key = "xz"
EndProperty
BeginProperty ListImage22 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":83EB
Key = "sc"
EndProperty
BeginProperty ListImage23 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":8785
Key = "sx"
EndProperty
BeginProperty ListImage24 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":8B1F
Key = "cx"
EndProperty
BeginProperty ListImage25 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":8EB9
Key = "zd"
EndProperty
BeginProperty ListImage26 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":9253
Key = "dz"
EndProperty
BeginProperty ListImage27 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":95ED
Key = "ph"
EndProperty
BeginProperty ListImage28 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":9987
Key = "fz"
EndProperty
BeginProperty ListImage29 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "公用_物料档案设置.frx":9D21
Key = "dw"
EndProperty
EndProperty
End
Begin MSComctlLib.Toolbar SzToolbar
Align = 1 'Align Top
Height = 555
Left = 0