Group_03/D7DJchennuo
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-12-02 17:14:24 +08:00
parent 6687c4f7e2
commit 2a06c76fb1
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
检验管理/U_JYOrderCDOne.pas
View File

@ -1482,7 +1482,7 @@ begin
except except
ADOQueryCmd.Connection.RollbackTrans; ADOQueryCmd.Connection.RollbackTrans;
end; end;
Order_Main.EnableControls; Order_Main.EnableControls;
with ADOQueryTemp do with ADOQueryTemp do
@ -1494,7 +1494,7 @@ begin
ExecSQL; ExecSQL;
end; end;
if (trim(ComboBox1.Text) = '检验码单(英文)') or (trim(ComboBox1.Text) = '检验码单(中文)') then if (trim(ComboBox1.Text) = '检验码单(英文)') or (trim(ComboBox1.Text) = '检验码单(中文)') or (trim(ComboBox1.Text) = 'GB码单') then
begin begin
with ADOQueryTemp do with ADOQueryTemp do
begin begin
@ -1752,7 +1752,7 @@ begin
end; end;
end; end;
if (trim(ComboBox1.Text) = '检验码单(缸号疵点)') or (trim(ComboBox1.Text) = 'GB码单')then if (trim(ComboBox1.Text) = '检验码单(缸号疵点)') then
begin begin
with ADOQueryTemp do with ADOQueryTemp do
begin begin