Group_03/D7DJnanmu
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-08-30 17:01:55 +08:00
parent 1bbf6f4dbe
commit 8b136419ba
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
针织检验管理/TradeManage.dof
View File

@ -101,7 +101,7 @@ DebugSourceDirs=
UsePackages=0 UsePackages=0
[Parameters] [Parameters]
RunParams= RunParams=
HostApplication=D:\陈亿项目代码\项目代码\楠沐\针织检验管理\testDll.exe HostApplication=D:\Dp7Repo\项目代码\D7DJnanmu\针织检验管理\testDll.exe
Launcher= Launcher=
UseLauncher=0 UseLauncher=0
DebugCWD= DebugCWD=

5
针织检验管理/U_JYOrderCDOne.pas
View File

@ -1616,13 +1616,14 @@ begin
if (trim(ComboBox1.Text) = '检验码单') or (trim(ComboBox1.Text) = '提货核算单') or (trim(ComboBox1.Text) = '出库码单') if (trim(ComboBox1.Text) = '检验码单') or (trim(ComboBox1.Text) = '提货核算单') or (trim(ComboBox1.Text) = '出库码单')
or (trim(ComboBox1.Text) = '出库码单悦旺不加0.2') or (trim(ComboBox1.Text) = '出库码单不加0.2') or (trim(ComboBox1.Text) = '出库码单悦旺不加0.2') or (trim(ComboBox1.Text) = '出库码单不加0.2')
or (trim(ComboBox1.Text) = '出库码单不加0.3') or (trim(ComboBox1.Text) = '出库码单不加0.3')
or (trim(ComboBox1.Text) = '出库码单悦旺') or (trim(ComboBox1.Text) = '出库码单宇悦') then or (trim(ComboBox1.Text) = '出库码单悦旺') or (trim(ComboBox1.Text) = '出库码单宇悦')
or (trim(ComboBox1.Text) = '出库码单0.2') or (trim(ComboBox1.Text) = '出库码单0.3') then
begin begin
with ADOQueryTemp do with ADOQueryTemp do
begin begin
Close; Close;
sql.Clear; sql.Clear;
sql.add('exec P_Print_CKMDYDL '); sql.add('exec P_Print_CKMDYDL ');
sql.add('@DName=' + quotedstr(Trim(DCode))); sql.add('@DName=' + quotedstr(Trim(DCode)));
Open; Open;
end; end;