📄 fmdkysque.~dfm
字号:
Visible = True
end
item
Expanded = False
FieldName = 'corp_name'
Title.Alignment = taCenter
Title.Caption = '购入公司名称'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 290
Visible = True
end>
end
end
object Panel15: TPanel
Left = 1
Top = 1
Width = 794
Height = 152
Align = alTop
Caption = 'Panel15'
TabOrder = 1
object DBGrid3: TDBGrid
Left = 1
Top = 17
Width = 792
Height = 134
Align = alClient
Color = clInfoBk
DataSource = DS_dkys_que
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'in_id'
Title.Alignment = taCenter
Title.Caption = '验收序号'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'yp_name'
Title.Alignment = taCenter
Title.Caption = '药品名称'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 138
Visible = True
end
item
Expanded = False
FieldName = 'yp_spec'
Title.Alignment = taCenter
Title.Caption = '药品规格'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 123
Visible = True
end
item
Expanded = False
FieldName = 'yp_unit'
Title.Alignment = taCenter
Title.Caption = '单位'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 29
Visible = True
end
item
Expanded = False
FieldName = 'gr_date'
Title.Alignment = taCenter
Title.Caption = '验收时间'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'gr_amou'
Title.Alignment = taCenter
Title.Caption = '验收数量'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'rz_amou'
Title.Alignment = taCenter
Title.Caption = '入账数量'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'yp_amou'
Title.Alignment = taCenter
Title.Caption = '药品余量'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'corp_name'
Title.Alignment = taCenter
Title.Caption = '购入公司名称'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 129
Visible = True
end
item
Expanded = False
FieldName = 'sc_fact'
Title.Alignment = taCenter
Title.Caption = '生产厂家'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 109
Visible = True
end
item
Expanded = False
FieldName = 'gr_pric'
Title.Alignment = taCenter
Title.Caption = '购入价格'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 63
Visible = True
end
item
Expanded = False
FieldName = 'pf_pric'
Title.Alignment = taCenter
Title.Caption = '批发价格'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'ls_price'
Title.Alignment = taCenter
Title.Caption = '零售价格'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Visible = True
end
item
Expanded = False
FieldName = 'yp_batch'
Title.Alignment = taCenter
Title.Caption = '药品批号'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 63
Visible = True
end
item
Expanded = False
FieldName = 'yp_life'
Title.Alignment = taCenter
Title.Caption = '药品效期'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 67
Visible = True
end
item
Expanded = False
FieldName = 'pz_number'
Title.Alignment = taCenter
Title.Caption = '批准文号'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 66
Visible = True
end
item
Expanded = False
FieldName = 'zl_reason'
Title.Alignment = taCenter
Title.Caption = '质量问题'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'js_man'
Title.Alignment = taCenter
Title.Caption = '经手人'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 54
Visible = True
end
item
Expanded = False
FieldName = 'in_man'
Title.Alignment = taCenter
Title.Caption = '入库人'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'hj_iden'
Title.Caption = '买药标识'
Title.Font.Charset = GB2312_CHARSET
Title.Font.Color = clWindowText
Title.Font.Height = -14
Title.Font.Name = '宋体'
Title.Font.Style = []
Width = 58
Visible = True
end>
end
object Panel16: TPanel
Left = 1
Top = 1
Width = 792
Height = 16
Align = alTop
TabOrder = 1
object Label3: TLabel
Left = 4
Top = 3
Width = 105
Height = 12
Caption = '验收记录信息查询'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
end
end
end
end
object AP_xyid_que_ys: TADOStoredProc
Connection = DataMzf.XyMzValiConnection
CursorType = ctStatic
ProcedureName = 'tzh_dkxyid;1'
Parameters = <
item
Name = 'RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = 0
end
item
Name = '@srm'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = '%'
end>
Left = 624
Top = 192
end
object DS_xyid_que_ys: TDataSource
DataSet = AP_xyid_que_ys
Left = 672
Top = 192
end
object AP_xycorp_id_ys: TADOStoredProc
Connection = DataMzf.XyMzValiConnection
CursorType = ctStatic
ProcedureName = 'tzh_dkxycorp_id;1'
Parameters = <
item
Name = 'RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = 0
end
item
Name = '@srm'
Attributes = [paNullable]
DataType = ftString
Size = 12
Value = '%'
end>
Left = 624
Top = 224
end
object DS_xycorp_id_ys: TDataSource
DataSet = AP_xycorp_id_ys
Left = 672
Top = 224
end
object AP_dkys_que: TADOStoredProc
Connection = DataMzf.XyMzValiConnection
CursorType = ctStatic
ProcedureName = 'tzh_dkys_query;1'
Parameters = <
item
Name = 'RETURN_VALUE'
DataType = ftInteger
Direction = pdReturnValue
Precision = 10
Value = 0
end
item
Name⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -