Group_99/D7lmSanshui
6
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

4.13

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2026-04-13 11:02:24 +08:00
parent 7622a7414f
commit 9c073f5a5a
2 changed files with 48 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.dfm
View File

@ -1,6 +1,6 @@
object frmCKProductBCPOutList: TfrmCKProductBCPOutList
Left = 575
Top = 540
Left = 365
Top = 317
Width = 1638
Height = 659
Caption = #25104#21697#20986#24211#21015#34920
@ -73,7 +73,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
object ComboBox1: TComboBox
Left = 324
Top = 3
Width = 128
Width = 157
Height = 24
Style = csDropDownList
Font.Charset = GB2312_CHARSET
@ -82,22 +82,22 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 16
ItemIndex = 0
ParentFont = False
TabOrder = 0
Text = #19977#27700#30721#21333'1'
Items.Strings = (
#19977#27700#30721#21333'1'
#19977#27700#30721#21333'1('#20928#37325')'
#19977#27700#30721#21333'2'
#19977#27700#30721#21333'('#32534#21495')'
#31119#21326#30721#21333
#39068#33394#30721#21333
#27719#24635#30721#21333
#31859#25968#30721#21333
#31859#25968#27719#24635#30721#21333)
#31859#25968#27719#24635#30721#21333
#31859#25968#27719#24635#30721#21333'('#20928#37325')')
end
object TBExport: TToolButton
Left = 452
Left = 481
Top = 0
AutoSize = True
Caption = #23548#20986
@ -105,7 +105,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
OnClick = TBExportClick
end
object ToolButton2: TToolButton
Left = 515
Left = 544
Top = 0
AutoSize = True
Caption = #26085#24535
@ -113,7 +113,7 @@ object frmCKProductBCPOutList: TfrmCKProductBCPOutList
OnClick = ToolButton2Click
end
object TBClose: TToolButton
Left = 578
Left = 607
Top = 0
AutoSize = True
Caption = #20851#38381

39
成品仓库(FinishedClothWarehouse.dll)/U_CKProductBCPOutList.pas
View File

@ -611,6 +611,27 @@ begin
SCreateCDS20(ADOQueryTemp, CDS_PRT);
SInitCDSData20(ADOQueryTemp, CDS_PRT);
end;
if trim(ComboBox1.Text) = '힛彊쯤데1(씐路)' then
begin
with ADOQueryTemp do
begin
Close;
sql.Clear;
sql.add('exec P_Print_CKMDWSQ1 ');
sql.add('@CKOrdNo=' + quotedstr(Trim(Trim(CDS_Main.fieldbyname('CKOrdNo').AsString))));
// showmessage(SQL.Text);
Open;
end;
SCreateCDS20(ADOQueryTemp, CDS_PRT);
SInitCDSData20(ADOQueryTemp, CDS_PRT);
end;
if trim(ComboBox1.Text) = '힛彊쯤데(긍뵀)' then
begin
with ADOQueryTemp do
@ -682,6 +703,24 @@ begin
SCreateCDS20(ADOQueryTemp, CDS_PRT);
SInitCDSData20(ADOQueryTemp, CDS_PRT);
end;
if (trim(ComboBox1.Text) = '쵠鑒삠悧쯤데(씐路)') then
begin
with ADOQueryTemp do
begin
Close;
sql.Clear;
sql.add('exec P_Print_CKMDWSQ5 ');
sql.add('@CKOrdNo=' + quotedstr(Trim(Trim(CDS_Main.fieldbyname('CKOrdNo').AsString))));
Open;
end;
SCreateCDS20(ADOQueryTemp, CDS_PRT);
SInitCDSData20(ADOQueryTemp, CDS_PRT);
end;
if trim(ComboBox1.Text) = '쵠鑒쯤데' then
begin
with ADOQueryTemp do