diff --git a/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm b/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm
index 769d110..ee63964 100644
--- a/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm
+++ b/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm
@@ -846,7 +846,7 @@ object frmBaoGuanInPut: TfrmBaoGuanInPut
Height = 20
Hint = 'OrdConPrcNote/'#20215#26684#26465#27454
TabOrder = 6
- Text = 'C&F'
+ Text = 'FOB'
OnBtnClick = B6ChuYunGangBtnClick
end
object F2YunFee: TEdit
diff --git a/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm b/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm
index 7ab3e2b..ab11b0d 100644
--- a/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm
+++ b/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm
@@ -1,6 +1,6 @@
object frmConLCInPutDC: TfrmConLCInPutDC
- Left = 166
- Top = 50
+ Left = 299
+ Top = 79
Width = 1073
Height = 775
Caption = #35746#33329#25351#31034#20070#24405#20837
@@ -621,7 +621,7 @@ object frmConLCInPutDC: TfrmConLCInPutDC
Height = 20
Hint = 'YFCF/'#36816#36153#25215#20184
TabOrder = 13
- Text = 'FREIGHT PREPAID'
+ Text = 'FREIGHT COLLECT'
OnBtnUpClick = TOPlaceBtnUpClick
OnBtnDnClick = SKBankBtnDnClick
end
diff --git a/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas b/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas
index 16a5545..ca88715 100644
--- a/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas
+++ b/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas
@@ -211,7 +211,8 @@ begin
FMainId := '';
DCNO.Text := 'ϵͳԶ';
OrdConPrcNote.Text := 'FOB';
- YFCF.Text := 'FREIGHT PREPAID';
+ YFCF.Text := 'FREIGHT COLLECT';
+
Order_Sub.DisableControls;
with Order_Sub do
begin
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/AES.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/AES.pas
deleted file mode 100644
index 3b8432d..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/AES.pas
+++ /dev/null
@@ -1,317 +0,0 @@
-(**************************************************)
-
-unit AES;
-
-interface
-
-uses
- SysUtils, Classes, Math, ElAES;
-
-type
- TKeyBit = (kb128, kb192, kb256);
-
-function StrToHex(Value: string): string;
-function HexToStr(Value: string): string;
-function EncryptString(Value: string; Key: string;
- KeyBit: TKeyBit = kb128): string;
-function DecryptString(Value: string; Key: string;
- KeyBit: TKeyBit = kb128): string;
-function EncryptStream(Stream: TStream; Key: string;
- KeyBit: TKeyBit = kb128): TStream;
-function DecryptStream(Stream: TStream; Key: string;
- KeyBit: TKeyBit = kb128): TStream;
-procedure EncryptFile(SourceFile, DestFile: string;
- Key: string; KeyBit: TKeyBit = kb128);
-procedure DecryptFile(SourceFile, DestFile: string;
- Key: string; KeyBit: TKeyBit = kb128);
-
-implementation
-
-function StrToHex(Value: string): string;
-var
- I: Integer;
-begin
- Result := '';
- for I := 1 to Length(Value) do
- Result := Result + IntToHex(Ord(Value[I]), 2);
-end;
-
-function HexToStr(Value: string): string;
-var
- I: Integer;
-begin
- Result := '';
- for I := 1 to Length(Value) do
- begin
- if ((I mod 2) = 1) then
- Result := Result + Chr(StrToInt('0x'+ Copy(Value, I, 2)));
- end;
-end;
-
-{ -- ַܺ Ĭϰ 128 λܳ -- }
-function EncryptString(Value: string; Key: string;
- KeyBit: TKeyBit = kb128): string;
-var
- SS, DS: TStringStream;
- Size: Int64;
- AESKey128: TAESKey128;
- AESKey192: TAESKey192;
- AESKey256: TAESKey256;
-begin
- Result := '';
- SS := TStringStream.Create(Value);
- DS := TStringStream.Create('');
- try
- Size := SS.Size;
- DS.WriteBuffer(Size, SizeOf(Size));
- { -- 128 λܳΪ 16 ַ -- }
- if KeyBit = kb128 then
- begin
- FillChar(AESKey128, SizeOf(AESKey128), 0 );
- Move(PChar(Key)^, AESKey128, Min(SizeOf(AESKey128), Length(Key)));
- EncryptAESStreamECB(SS, 0, AESKey128, DS);
- end;
- { -- 192 λܳΪ 24 ַ -- }
- if KeyBit = kb192 then
- begin
- FillChar(AESKey192, SizeOf(AESKey192), 0 );
- Move(PChar(Key)^, AESKey192, Min(SizeOf(AESKey192), Length(Key)));
- EncryptAESStreamECB(SS, 0, AESKey192, DS);
- end;
- { -- 256 λܳΪ 32 ַ -- }
- if KeyBit = kb256 then
- begin
- FillChar(AESKey256, SizeOf(AESKey256), 0 );
- Move(PChar(Key)^, AESKey256, Min(SizeOf(AESKey256), Length(Key)));
- EncryptAESStreamECB(SS, 0, AESKey256, DS);
- end;
- Result := StrToHex(DS.DataString);
- finally
- SS.Free;
- DS.Free;
- end;
-end;
-
-{ -- ַܺ Ĭϰ 128 λܳ -- }
-function DecryptString(Value: string; Key: string;
- KeyBit: TKeyBit = kb128): string;
-var
- SS, DS: TStringStream;
- Size: Int64;
- AESKey128: TAESKey128;
- AESKey192: TAESKey192;
- AESKey256: TAESKey256;
-begin
- Result := '';
- SS := TStringStream.Create(HexToStr(Value));
- DS := TStringStream.Create('');
- try
- Size := SS.Size;
- SS.ReadBuffer(Size, SizeOf(Size));
- { -- 128 λܳΪ 16 ַ -- }
- if KeyBit = kb128 then
- begin
- FillChar(AESKey128, SizeOf(AESKey128), 0 );
- Move(PChar(Key)^, AESKey128, Min(SizeOf(AESKey128), Length(Key)));
- DecryptAESStreamECB(SS, SS.Size - SS.Position, AESKey128, DS);
- end;
- { -- 192 λܳΪ 24 ַ -- }
- if KeyBit = kb192 then
- begin
- FillChar(AESKey192, SizeOf(AESKey192), 0 );
- Move(PChar(Key)^, AESKey192, Min(SizeOf(AESKey192), Length(Key)));
- DecryptAESStreamECB(SS, SS.Size - SS.Position, AESKey192, DS);
- end;
- { -- 256 λܳΪ 32 ַ -- }
- if KeyBit = kb256 then
- begin
- FillChar(AESKey256, SizeOf(AESKey256), 0 );
- Move(PChar(Key)^, AESKey256, Min(SizeOf(AESKey256), Length(Key)));
- DecryptAESStreamECB(SS, SS.Size - SS.Position, AESKey256, DS);
- end;
- Result := DS.DataString;
- finally
- SS.Free;
- DS.Free;
- end;
-end;
-
-{ -- ܺ Ĭϰ 128 λܳ -- }
-function EncryptStream(Stream: TStream; Key: string;
- KeyBit: TKeyBit = kb128): TStream;
-var
- Count: Int64;
- OutStrm: TStream;
- AESKey128: TAESKey128;
- AESKey192: TAESKey192;
- AESKey256: TAESKey256;
-begin
- OutStrm := TStream.Create;
- Stream.Position := 0;
- Count := Stream.Size;
- OutStrm.Write(Count, SizeOf(Count));
- try
- { -- 128 λܳΪ 16 ַ -- }
- if KeyBit = kb128 then
- begin
- FillChar(AESKey128, SizeOf(AESKey128), 0 );
- Move(PChar(Key)^, AESKey128, Min(SizeOf(AESKey128), Length(Key)));
- EncryptAESStreamECB(Stream, 0, AESKey128, OutStrm);
- end;
- { -- 192 λܳΪ 24 ַ -- }
- if KeyBit = kb192 then
- begin
- FillChar(AESKey192, SizeOf(AESKey192), 0 );
- Move(PChar(Key)^, AESKey192, Min(SizeOf(AESKey192), Length(Key)));
- EncryptAESStreamECB(Stream, 0, AESKey192, OutStrm);
- end;
- { -- 256 λܳΪ 32 ַ -- }
- if KeyBit = kb256 then
- begin
- FillChar(AESKey256, SizeOf(AESKey256), 0 );
- Move(PChar(Key)^, AESKey256, Min(SizeOf(AESKey256), Length(Key)));
- EncryptAESStreamECB(Stream, 0, AESKey256, OutStrm);
- end;
- Result := OutStrm;
- finally
- OutStrm.Free;
- end;
-end;
-
-{ -- ܺ Ĭϰ 128 λܳ -- }
-function DecryptStream(Stream: TStream; Key: string;
- KeyBit: TKeyBit = kb128): TStream;
-var
- Count, OutPos: Int64;
- OutStrm: TStream;
- AESKey128: TAESKey128;
- AESKey192: TAESKey192;
- AESKey256: TAESKey256;
-begin
- OutStrm := TStream.Create;
- Stream.Position := 0;
- OutPos :=OutStrm.Position;
- Stream.ReadBuffer(Count, SizeOf(Count));
- try
- { -- 128 λܳΪ 16 ַ -- }
- if KeyBit = kb128 then
- begin
- FillChar(AESKey128, SizeOf(AESKey128), 0 );
- Move(PChar(Key)^, AESKey128, Min(SizeOf(AESKey128), Length(Key)));
- DecryptAESStreamECB(Stream, Stream.Size - Stream.Position,
- AESKey128, OutStrm);
- end;
- { -- 192 λܳΪ 24 ַ -- }
- if KeyBit = kb192 then
- begin
- FillChar(AESKey192, SizeOf(AESKey192), 0 );
- Move(PChar(Key)^, AESKey192, Min(SizeOf(AESKey192), Length(Key)));
- DecryptAESStreamECB(Stream, Stream.Size - Stream.Position,
- AESKey192, OutStrm);
- end;
- { -- 256 λܳΪ 32 ַ -- }
- if KeyBit = kb256 then
- begin
- FillChar(AESKey256, SizeOf(AESKey256), 0 );
- Move(PChar(Key)^, AESKey256, Min(SizeOf(AESKey256), Length(Key)));
- DecryptAESStreamECB(Stream, Stream.Size - Stream.Position,
- AESKey256, OutStrm);
- end;
- OutStrm.Size := OutPos + Count;
- OutStrm.Position := OutPos;
- Result := OutStrm;
- finally
- OutStrm.Free;
- end;
-end;
-
-{ -- ļܺ Ĭϰ 128 λܳ -- }
-procedure EncryptFile(SourceFile, DestFile: string;
- Key: string; KeyBit: TKeyBit = kb128);
-var
- SFS, DFS: TFileStream;
- Size: Int64;
- AESKey128: TAESKey128;
- AESKey192: TAESKey192;
- AESKey256: TAESKey256;
-begin
- SFS := TFileStream.Create(SourceFile, fmOpenRead);
- try
- DFS := TFileStream.Create(DestFile, fmCreate);
- try
- Size := SFS.Size;
- DFS.WriteBuffer(Size, SizeOf(Size));
- { -- 128 λܳΪ 16 ַ -- }
- if KeyBit = kb128 then
- begin
- FillChar(AESKey128, SizeOf(AESKey128), 0 );
- Move(PChar(Key)^, AESKey128, Min(SizeOf(AESKey128), Length(Key)));
- EncryptAESStreamECB(SFS, 0, AESKey128, DFS);
- end;
- { -- 192 λܳΪ 24 ַ -- }
- if KeyBit = kb192 then
- begin
- FillChar(AESKey192, SizeOf(AESKey192), 0 );
- Move(PChar(Key)^, AESKey192, Min(SizeOf(AESKey192), Length(Key)));
- EncryptAESStreamECB(SFS, 0, AESKey192, DFS);
- end;
- { -- 256 λܳΪ 32 ַ -- }
- if KeyBit = kb256 then
- begin
- FillChar(AESKey256, SizeOf(AESKey256), 0 );
- Move(PChar(Key)^, AESKey256, Min(SizeOf(AESKey256), Length(Key)));
- EncryptAESStreamECB(SFS, 0, AESKey256, DFS);
- end;
- finally
- DFS.Free;
- end;
- finally
- SFS.Free;
- end;
-end;
-
-{ -- ļܺ Ĭϰ 128 λܳ -- }
-procedure DecryptFile(SourceFile, DestFile: string;
- Key: string; KeyBit: TKeyBit = kb128);
-var
- SFS, DFS: TFileStream;
- Size: Int64;
- AESKey128: TAESKey128;
- AESKey192: TAESKey192;
- AESKey256: TAESKey256;
-begin
- SFS := TFileStream.Create(SourceFile, fmOpenRead);
- try
- SFS.ReadBuffer(Size, SizeOf(Size));
- DFS := TFileStream.Create(DestFile, fmCreate);
- try
- { -- 128 λܳΪ 16 ַ -- }
- if KeyBit = kb128 then
- begin
- FillChar(AESKey128, SizeOf(AESKey128), 0 );
- Move(PChar(Key)^, AESKey128, Min(SizeOf(AESKey128), Length(Key)));
- DecryptAESStreamECB(SFS, SFS.Size - SFS.Position, AESKey128, DFS);
- end;
- { -- 192 λܳΪ 24 ַ -- }
- if KeyBit = kb192 then
- begin
- FillChar(AESKey192, SizeOf(AESKey192), 0 );
- Move(PChar(Key)^, AESKey192, Min(SizeOf(AESKey192), Length(Key)));
- DecryptAESStreamECB(SFS, SFS.Size - SFS.Position, AESKey192, DFS);
- end;
- { -- 256 λܳΪ 32 ַ -- }
- if KeyBit = kb256 then
- begin
- FillChar(AESKey256, SizeOf(AESKey256), 0 );
- Move(PChar(Key)^, AESKey256, Min(SizeOf(AESKey256), Length(Key)));
- DecryptAESStreamECB(SFS, SFS.Size - SFS.Position, AESKey256, DFS);
- end;
- DFS.Size := Size;
- finally
- DFS.Free;
- end;
- finally
- SFS.Free;
- end;
-end;
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.cfg b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.cfg
deleted file mode 100644
index 7876259..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.cfg
+++ /dev/null
@@ -1,42 +0,0 @@
--$A8
--$B-
--$C+
--$D+
--$E-
--$F-
--$G+
--$H+
--$I+
--$J-
--$K-
--$L+
--$M-
--$N+
--$O+
--$P+
--$Q-
--$R-
--$S-
--$T-
--$U-
--$V+
--$W-
--$X+
--$YD
--$Z1
--cg
--AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
--H+
--W+
--M
--$M16384,1048576
--K$00400000
--LE"c:\program files (x86)\borland\delphi7\Projects\Bpl"
--LN"c:\program files (x86)\borland\delphi7\Projects\Bpl"
--U"D:\ͨERP"
--O"D:\ͨERP"
--I"D:\ͨERP"
--R"D:\ͨERP"
--w-UNSAFE_TYPE
--w-UNSAFE_CODE
--w-UNSAFE_CAST
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.dof b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.dof
deleted file mode 100644
index 863ad05..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.dof
+++ /dev/null
@@ -1,138 +0,0 @@
-[FileVersion]
-Version=7.0
-[Compiler]
-A=8
-B=0
-C=1
-D=1
-E=0
-F=0
-G=1
-H=1
-I=1
-J=0
-K=0
-L=1
-M=0
-N=1
-O=1
-P=1
-Q=0
-R=0
-S=0
-T=0
-U=0
-V=1
-W=0
-X=1
-Y=1
-Z=1
-ShowHints=1
-ShowWarnings=1
-UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-NamespacePrefix=
-SymbolDeprecated=1
-SymbolLibrary=1
-SymbolPlatform=1
-UnitLibrary=1
-UnitPlatform=1
-UnitDeprecated=1
-HResultCompat=1
-HidingMember=1
-HiddenVirtual=1
-Garbage=1
-BoundsError=1
-ZeroNilCompat=1
-StringConstTruncated=1
-ForLoopVarVarPar=1
-TypedConstVarPar=1
-AsgToTypedConst=1
-CaseLabelRange=1
-ForVariable=1
-ConstructingAbstract=1
-ComparisonFalse=1
-ComparisonTrue=1
-ComparingSignedUnsigned=1
-CombiningSignedUnsigned=1
-UnsupportedConstruct=1
-FileOpen=1
-FileOpenUnitSrc=1
-BadGlobalSymbol=1
-DuplicateConstructorDestructor=1
-InvalidDirective=1
-PackageNoLink=1
-PackageThreadVar=1
-ImplicitImport=1
-HPPEMITIgnored=1
-NoRetVal=1
-UseBeforeDef=1
-ForLoopVarUndef=1
-UnitNameMismatch=1
-NoCFGFileFound=1
-MessageDirective=1
-ImplicitVariants=1
-UnicodeToLocale=1
-LocaleToUnicode=1
-ImagebaseMultiple=1
-SuspiciousTypecast=1
-PrivatePropAccessor=1
-UnsafeType=0
-UnsafeCode=0
-UnsafeCast=0
-[Linker]
-MapFile=0
-OutputObjs=0
-ConsoleApp=1
-DebugInfo=0
-RemoteSymbols=0
-MinStackSize=16384
-MaxStackSize=1048576
-ImageBase=4194304
-ExeDescription=
-[Directories]
-OutputDir=
-UnitOutputDir=
-PackageDLLOutputDir=
-PackageDCPOutputDir=
-SearchPath=D:\ͨERP
-Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;dclOffice2k;Rave50CLX;Rave50VCL
-Conditionals=
-DebugSourceDirs=
-UsePackages=0
-[Parameters]
-RunParams=
-HostApplication=D:\Dp7Repo\Ŀ\\ع(BaoGuan.dll)\testDll.exe
-Launcher=
-UseLauncher=0
-DebugCWD=
-[Language]
-ActiveLang=
-ProjectLang=
-RootDir=
-[Version Info]
-IncludeVerInfo=0
-AutoIncBuild=0
-MajorVer=1
-MinorVer=0
-Release=0
-Build=0
-Debug=0
-PreRelease=0
-Special=0
-Private=0
-DLL=0
-Locale=2052
-CodePage=936
-[Version Info Keys]
-CompanyName=
-FileDescription=
-FileVersion=1.0.0.0
-InternalName=
-LegalCopyright=
-LegalTrademarks=
-OriginalFilename=
-ProductName=
-ProductVersion=1.0.0.0
-Comments=
-[Excluded Packages]
-c:\program files\borland\delphi7\Bin\DBWEBXPRT.BPL=Borland Web Wizard Package
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.dproj b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.dproj
deleted file mode 100644
index 682c655..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.dproj
+++ /dev/null
@@ -1,126 +0,0 @@
-
-
- {01F1D018-6773-4812-A6A3-E4BD48ED356E}
- BaoGuan.dpr
- True
- Debug
- Win32
- 38043
- Library
- VCL
-
-
- true
-
-
- true
- Base
- true
-
-
- true
- Base
- true
-
-
- false
- false
- false
- true
- false
- 00400000
- 1
- 1
- WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;$(DCC_UnitAlias)
- D:\富通ERP;$(DCC_UnitSearchPath)
- vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;dclOffice2k;Rave50CLX;Rave50VCL;$(DCC_UsePackage)
- true
- BaoGuan
-
-
- RELEASE;$(DCC_Define)
- 0
- false
- 0
-
-
- DEBUG;$(DCC_Define)
- false
- true
-
-
-
- MainSource
-
-
-
-
- TDataModule
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Cfg_2
- Base
-
-
- Base
-
-
- Cfg_1
- Base
-
-
-
- Delphi.Personality.12
-
-
-
-
- BaoGuan.dpr
-
-
-
- True
- True
- True
- True
- True
- True
- True
- True
-
-
- 12
-
-
-
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.res b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.res
deleted file mode 100644
index 2d6f24c..0000000
Binary files a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan.res and /dev/null differ
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan_Icon.ico b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan_Icon.ico
deleted file mode 100644
index 1998c2d..0000000
Binary files a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/BaoGuan_Icon.ico and /dev/null differ
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/Desktop.ini b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/Desktop.ini
deleted file mode 100644
index 7e19762..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/Desktop.ini
+++ /dev/null
@@ -1,3 +0,0 @@
-[.ShellClassInfo]
-IconFile=C:\Program Files (x86)\360\360WangPan\new_desktop_win7.ico
-IconIndex=0
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/ElAES.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/ElAES.pas
deleted file mode 100644
index 7a3e6c8..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/ElAES.pas
+++ /dev/null
@@ -1,2488 +0,0 @@
-(**************************************************)
-(* *)
-(* Advanced Encryption Standard (AES) *)
-(* *)
-(* Copyright (c) 1998-2001 *)
-(* EldoS, Alexander Ionov *)
-(* *)
-(**************************************************)
-
-unit ElAES;
-
-interface
-
-uses
- Classes, SysUtils;
-
-type
- EAESError = class(Exception);
-
- PInteger = ^Integer;
-
- TAESBuffer = array [0..15] of byte;
- TAESKey128 = array [0..15] of byte;
- TAESKey192 = array [0..23] of byte;
- TAESKey256 = array [0..31] of byte;
- TAESExpandedKey128 = array [0..43] of longword;
- TAESExpandedKey192 = array [0..53] of longword;
- TAESExpandedKey256 = array [0..63] of longword;
-
- PAESBuffer =^TAESBuffer;
- PAESKey128 =^TAESKey128;
- PAESKey192 =^TAESKey192;
- PAESKey256 =^TAESKey256;
- PAESExpandedKey128 =^TAESExpandedKey128;
- PAESExpandedKey192 =^TAESExpandedKey192;
- PAESExpandedKey256 =^TAESExpandedKey256;
-
-// Key expansion routines for encryption
-
-procedure ExpandAESKeyForEncryption(const Key: TAESKey128;
- var ExpandedKey: TAESExpandedKey128); overload;
-procedure ExpandAESKeyForEncryption(const Key: TAESKey192;
- var ExpandedKey: TAESExpandedKey192); overload;
-procedure ExpandAESKeyForEncryption(const Key: TAESKey256;
- var ExpandedKey: TAESExpandedKey256); overload;
-
-// Block encryption routines
-
-procedure EncryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey128;
- var OutBuf: TAESBuffer); overload;
-procedure EncryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey192;
- var OutBuf: TAESBuffer); overload;
-procedure EncryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey256;
- var OutBuf: TAESBuffer); overload;
-
-// Stream encryption routines (ECB mode)
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey128; Dest: TStream); overload;
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; Dest: TStream); overload;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey192; Dest: TStream); overload;
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; Dest: TStream); overload;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey256; Dest: TStream); overload;
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; Dest: TStream); overload;
-
-// Stream encryption routines (CBC mode)
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey128; const InitVector: TAESBuffer; Dest: TStream); overload;
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; const InitVector: TAESBuffer;
- Dest: TStream); overload;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey192; const InitVector: TAESBuffer; Dest: TStream); overload;
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; const InitVector: TAESBuffer;
- Dest: TStream); overload;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey256; const InitVector: TAESBuffer; Dest: TStream); overload;
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; const InitVector: TAESBuffer;
- Dest: TStream); overload;
-
-// Key transformation routines for decryption
-
-procedure ExpandAESKeyForDecryption(var ExpandedKey: TAESExpandedKey128); overload;
-procedure ExpandAESKeyForDecryption(const Key: TAESKey128;
- var ExpandedKey: TAESExpandedKey128); overload;
-
-procedure ExpandAESKeyForDecryption(var ExpandedKey: TAESExpandedKey192); overload;
-procedure ExpandAESKeyForDecryption(const Key: TAESKey192;
- var ExpandedKey: TAESExpandedKey192); overload;
-
-procedure ExpandAESKeyForDecryption(var ExpandedKey: TAESExpandedKey256); overload;
-procedure ExpandAESKeyForDecryption(const Key: TAESKey256;
- var ExpandedKey: TAESExpandedKey256); overload;
-
-// Block decryption routines
-
-procedure DecryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey128;
- var OutBuf: TAESBuffer); overload;
-procedure DecryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey192;
- var OutBuf: TAESBuffer); overload;
-procedure DecryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey256;
- var OutBuf: TAESBuffer); overload;
-
-// Stream decryption routines (ECB mode)
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey128; Dest: TStream); overload;
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; Dest: TStream); overload;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey192; Dest: TStream); overload;
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; Dest: TStream); overload;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey256; Dest: TStream); overload;
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; Dest: TStream); overload;
-
-// Stream decryption routines (CBC mode)
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey128; const InitVector: TAESBuffer; Dest: TStream); overload;
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; const InitVector: TAESBuffer;
- Dest: TStream); overload;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey192; const InitVector: TAESBuffer; Dest: TStream); overload;
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; const InitVector: TAESBuffer;
- Dest: TStream); overload;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey256; const InitVector: TAESBuffer; Dest: TStream); overload;
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; const InitVector: TAESBuffer;
- Dest: TStream); overload;
-
-resourcestring
- SInvalidInBufSize = 'Invalid buffer size for decryption';
- SReadError = 'Stream read error';
- SWriteError = 'Stream write error';
-
-implementation
-
-type
- PLongWord = ^LongWord;
-
-function Min(A, B: integer): integer;
-begin
- if A < B then
- Result := A
- else
- Result := B;
-end;
-
-const
- Rcon: array [1..30] of longword = (
- $00000001, $00000002, $00000004, $00000008, $00000010, $00000020,
- $00000040, $00000080, $0000001B, $00000036, $0000006C, $000000D8,
- $000000AB, $0000004D, $0000009A, $0000002F, $0000005E, $000000BC,
- $00000063, $000000C6, $00000097, $00000035, $0000006A, $000000D4,
- $000000B3, $0000007D, $000000FA, $000000EF, $000000C5, $00000091
- );
-
- ForwardTable: array [0..255] of longword = (
- $A56363C6, $847C7CF8, $997777EE, $8D7B7BF6, $0DF2F2FF, $BD6B6BD6, $B16F6FDE, $54C5C591,
- $50303060, $03010102, $A96767CE, $7D2B2B56, $19FEFEE7, $62D7D7B5, $E6ABAB4D, $9A7676EC,
- $45CACA8F, $9D82821F, $40C9C989, $877D7DFA, $15FAFAEF, $EB5959B2, $C947478E, $0BF0F0FB,
- $ECADAD41, $67D4D4B3, $FDA2A25F, $EAAFAF45, $BF9C9C23, $F7A4A453, $967272E4, $5BC0C09B,
- $C2B7B775, $1CFDFDE1, $AE93933D, $6A26264C, $5A36366C, $413F3F7E, $02F7F7F5, $4FCCCC83,
- $5C343468, $F4A5A551, $34E5E5D1, $08F1F1F9, $937171E2, $73D8D8AB, $53313162, $3F15152A,
- $0C040408, $52C7C795, $65232346, $5EC3C39D, $28181830, $A1969637, $0F05050A, $B59A9A2F,
- $0907070E, $36121224, $9B80801B, $3DE2E2DF, $26EBEBCD, $6927274E, $CDB2B27F, $9F7575EA,
- $1B090912, $9E83831D, $742C2C58, $2E1A1A34, $2D1B1B36, $B26E6EDC, $EE5A5AB4, $FBA0A05B,
- $F65252A4, $4D3B3B76, $61D6D6B7, $CEB3B37D, $7B292952, $3EE3E3DD, $712F2F5E, $97848413,
- $F55353A6, $68D1D1B9, $00000000, $2CEDEDC1, $60202040, $1FFCFCE3, $C8B1B179, $ED5B5BB6,
- $BE6A6AD4, $46CBCB8D, $D9BEBE67, $4B393972, $DE4A4A94, $D44C4C98, $E85858B0, $4ACFCF85,
- $6BD0D0BB, $2AEFEFC5, $E5AAAA4F, $16FBFBED, $C5434386, $D74D4D9A, $55333366, $94858511,
- $CF45458A, $10F9F9E9, $06020204, $817F7FFE, $F05050A0, $443C3C78, $BA9F9F25, $E3A8A84B,
- $F35151A2, $FEA3A35D, $C0404080, $8A8F8F05, $AD92923F, $BC9D9D21, $48383870, $04F5F5F1,
- $DFBCBC63, $C1B6B677, $75DADAAF, $63212142, $30101020, $1AFFFFE5, $0EF3F3FD, $6DD2D2BF,
- $4CCDCD81, $140C0C18, $35131326, $2FECECC3, $E15F5FBE, $A2979735, $CC444488, $3917172E,
- $57C4C493, $F2A7A755, $827E7EFC, $473D3D7A, $AC6464C8, $E75D5DBA, $2B191932, $957373E6,
- $A06060C0, $98818119, $D14F4F9E, $7FDCDCA3, $66222244, $7E2A2A54, $AB90903B, $8388880B,
- $CA46468C, $29EEEEC7, $D3B8B86B, $3C141428, $79DEDEA7, $E25E5EBC, $1D0B0B16, $76DBDBAD,
- $3BE0E0DB, $56323264, $4E3A3A74, $1E0A0A14, $DB494992, $0A06060C, $6C242448, $E45C5CB8,
- $5DC2C29F, $6ED3D3BD, $EFACAC43, $A66262C4, $A8919139, $A4959531, $37E4E4D3, $8B7979F2,
- $32E7E7D5, $43C8C88B, $5937376E, $B76D6DDA, $8C8D8D01, $64D5D5B1, $D24E4E9C, $E0A9A949,
- $B46C6CD8, $FA5656AC, $07F4F4F3, $25EAEACF, $AF6565CA, $8E7A7AF4, $E9AEAE47, $18080810,
- $D5BABA6F, $887878F0, $6F25254A, $722E2E5C, $241C1C38, $F1A6A657, $C7B4B473, $51C6C697,
- $23E8E8CB, $7CDDDDA1, $9C7474E8, $211F1F3E, $DD4B4B96, $DCBDBD61, $868B8B0D, $858A8A0F,
- $907070E0, $423E3E7C, $C4B5B571, $AA6666CC, $D8484890, $05030306, $01F6F6F7, $120E0E1C,
- $A36161C2, $5F35356A, $F95757AE, $D0B9B969, $91868617, $58C1C199, $271D1D3A, $B99E9E27,
- $38E1E1D9, $13F8F8EB, $B398982B, $33111122, $BB6969D2, $70D9D9A9, $898E8E07, $A7949433,
- $B69B9B2D, $221E1E3C, $92878715, $20E9E9C9, $49CECE87, $FF5555AA, $78282850, $7ADFDFA5,
- $8F8C8C03, $F8A1A159, $80898909, $170D0D1A, $DABFBF65, $31E6E6D7, $C6424284, $B86868D0,
- $C3414182, $B0999929, $772D2D5A, $110F0F1E, $CBB0B07B, $FC5454A8, $D6BBBB6D, $3A16162C
- );
-
- LastForwardTable: array [0..255] of longword = (
- $00000063, $0000007C, $00000077, $0000007B, $000000F2, $0000006B, $0000006F, $000000C5,
- $00000030, $00000001, $00000067, $0000002B, $000000FE, $000000D7, $000000AB, $00000076,
- $000000CA, $00000082, $000000C9, $0000007D, $000000FA, $00000059, $00000047, $000000F0,
- $000000AD, $000000D4, $000000A2, $000000AF, $0000009C, $000000A4, $00000072, $000000C0,
- $000000B7, $000000FD, $00000093, $00000026, $00000036, $0000003F, $000000F7, $000000CC,
- $00000034, $000000A5, $000000E5, $000000F1, $00000071, $000000D8, $00000031, $00000015,
- $00000004, $000000C7, $00000023, $000000C3, $00000018, $00000096, $00000005, $0000009A,
- $00000007, $00000012, $00000080, $000000E2, $000000EB, $00000027, $000000B2, $00000075,
- $00000009, $00000083, $0000002C, $0000001A, $0000001B, $0000006E, $0000005A, $000000A0,
- $00000052, $0000003B, $000000D6, $000000B3, $00000029, $000000E3, $0000002F, $00000084,
- $00000053, $000000D1, $00000000, $000000ED, $00000020, $000000FC, $000000B1, $0000005B,
- $0000006A, $000000CB, $000000BE, $00000039, $0000004A, $0000004C, $00000058, $000000CF,
- $000000D0, $000000EF, $000000AA, $000000FB, $00000043, $0000004D, $00000033, $00000085,
- $00000045, $000000F9, $00000002, $0000007F, $00000050, $0000003C, $0000009F, $000000A8,
- $00000051, $000000A3, $00000040, $0000008F, $00000092, $0000009D, $00000038, $000000F5,
- $000000BC, $000000B6, $000000DA, $00000021, $00000010, $000000FF, $000000F3, $000000D2,
- $000000CD, $0000000C, $00000013, $000000EC, $0000005F, $00000097, $00000044, $00000017,
- $000000C4, $000000A7, $0000007E, $0000003D, $00000064, $0000005D, $00000019, $00000073,
- $00000060, $00000081, $0000004F, $000000DC, $00000022, $0000002A, $00000090, $00000088,
- $00000046, $000000EE, $000000B8, $00000014, $000000DE, $0000005E, $0000000B, $000000DB,
- $000000E0, $00000032, $0000003A, $0000000A, $00000049, $00000006, $00000024, $0000005C,
- $000000C2, $000000D3, $000000AC, $00000062, $00000091, $00000095, $000000E4, $00000079,
- $000000E7, $000000C8, $00000037, $0000006D, $0000008D, $000000D5, $0000004E, $000000A9,
- $0000006C, $00000056, $000000F4, $000000EA, $00000065, $0000007A, $000000AE, $00000008,
- $000000BA, $00000078, $00000025, $0000002E, $0000001C, $000000A6, $000000B4, $000000C6,
- $000000E8, $000000DD, $00000074, $0000001F, $0000004B, $000000BD, $0000008B, $0000008A,
- $00000070, $0000003E, $000000B5, $00000066, $00000048, $00000003, $000000F6, $0000000E,
- $00000061, $00000035, $00000057, $000000B9, $00000086, $000000C1, $0000001D, $0000009E,
- $000000E1, $000000F8, $00000098, $00000011, $00000069, $000000D9, $0000008E, $00000094,
- $0000009B, $0000001E, $00000087, $000000E9, $000000CE, $00000055, $00000028, $000000DF,
- $0000008C, $000000A1, $00000089, $0000000D, $000000BF, $000000E6, $00000042, $00000068,
- $00000041, $00000099, $0000002D, $0000000F, $000000B0, $00000054, $000000BB, $00000016
- );
-
- InverseTable: array [0..255] of longword = (
- $50A7F451, $5365417E, $C3A4171A, $965E273A, $CB6BAB3B, $F1459D1F, $AB58FAAC, $9303E34B,
- $55FA3020, $F66D76AD, $9176CC88, $254C02F5, $FCD7E54F, $D7CB2AC5, $80443526, $8FA362B5,
- $495AB1DE, $671BBA25, $980EEA45, $E1C0FE5D, $02752FC3, $12F04C81, $A397468D, $C6F9D36B,
- $E75F8F03, $959C9215, $EB7A6DBF, $DA595295, $2D83BED4, $D3217458, $2969E049, $44C8C98E,
- $6A89C275, $78798EF4, $6B3E5899, $DD71B927, $B64FE1BE, $17AD88F0, $66AC20C9, $B43ACE7D,
- $184ADF63, $82311AE5, $60335197, $457F5362, $E07764B1, $84AE6BBB, $1CA081FE, $942B08F9,
- $58684870, $19FD458F, $876CDE94, $B7F87B52, $23D373AB, $E2024B72, $578F1FE3, $2AAB5566,
- $0728EBB2, $03C2B52F, $9A7BC586, $A50837D3, $F2872830, $B2A5BF23, $BA6A0302, $5C8216ED,
- $2B1CCF8A, $92B479A7, $F0F207F3, $A1E2694E, $CDF4DA65, $D5BE0506, $1F6234D1, $8AFEA6C4,
- $9D532E34, $A055F3A2, $32E18A05, $75EBF6A4, $39EC830B, $AAEF6040, $069F715E, $51106EBD,
- $F98A213E, $3D06DD96, $AE053EDD, $46BDE64D, $B58D5491, $055DC471, $6FD40604, $FF155060,
- $24FB9819, $97E9BDD6, $CC434089, $779ED967, $BD42E8B0, $888B8907, $385B19E7, $DBEEC879,
- $470A7CA1, $E90F427C, $C91E84F8, $00000000, $83868009, $48ED2B32, $AC70111E, $4E725A6C,
- $FBFF0EFD, $5638850F, $1ED5AE3D, $27392D36, $64D90F0A, $21A65C68, $D1545B9B, $3A2E3624,
- $B1670A0C, $0FE75793, $D296EEB4, $9E919B1B, $4FC5C080, $A220DC61, $694B775A, $161A121C,
- $0ABA93E2, $E52AA0C0, $43E0223C, $1D171B12, $0B0D090E, $ADC78BF2, $B9A8B62D, $C8A91E14,
- $8519F157, $4C0775AF, $BBDD99EE, $FD607FA3, $9F2601F7, $BCF5725C, $C53B6644, $347EFB5B,
- $7629438B, $DCC623CB, $68FCEDB6, $63F1E4B8, $CADC31D7, $10856342, $40229713, $2011C684,
- $7D244A85, $F83DBBD2, $1132F9AE, $6DA129C7, $4B2F9E1D, $F330B2DC, $EC52860D, $D0E3C177,
- $6C16B32B, $99B970A9, $FA489411, $2264E947, $C48CFCA8, $1A3FF0A0, $D82C7D56, $EF903322,
- $C74E4987, $C1D138D9, $FEA2CA8C, $360BD498, $CF81F5A6, $28DE7AA5, $268EB7DA, $A4BFAD3F,
- $E49D3A2C, $0D927850, $9BCC5F6A, $62467E54, $C2138DF6, $E8B8D890, $5EF7392E, $F5AFC382,
- $BE805D9F, $7C93D069, $A92DD56F, $B31225CF, $3B99ACC8, $A77D1810, $6E639CE8, $7BBB3BDB,
- $097826CD, $F418596E, $01B79AEC, $A89A4F83, $656E95E6, $7EE6FFAA, $08CFBC21, $E6E815EF,
- $D99BE7BA, $CE366F4A, $D4099FEA, $D67CB029, $AFB2A431, $31233F2A, $3094A5C6, $C066A235,
- $37BC4E74, $A6CA82FC, $B0D090E0, $15D8A733, $4A9804F1, $F7DAEC41, $0E50CD7F, $2FF69117,
- $8DD64D76, $4DB0EF43, $544DAACC, $DF0496E4, $E3B5D19E, $1B886A4C, $B81F2CC1, $7F516546,
- $04EA5E9D, $5D358C01, $737487FA, $2E410BFB, $5A1D67B3, $52D2DB92, $335610E9, $1347D66D,
- $8C61D79A, $7A0CA137, $8E14F859, $893C13EB, $EE27A9CE, $35C961B7, $EDE51CE1, $3CB1477A,
- $59DFD29C, $3F73F255, $79CE1418, $BF37C773, $EACDF753, $5BAAFD5F, $146F3DDF, $86DB4478,
- $81F3AFCA, $3EC468B9, $2C342438, $5F40A3C2, $72C31D16, $0C25E2BC, $8B493C28, $41950DFF,
- $7101A839, $DEB30C08, $9CE4B4D8, $90C15664, $6184CB7B, $70B632D5, $745C6C48, $4257B8D0
- );
-
- LastInverseTable: array [0..255] of longword = (
- $00000052, $00000009, $0000006A, $000000D5, $00000030, $00000036, $000000A5, $00000038,
- $000000BF, $00000040, $000000A3, $0000009E, $00000081, $000000F3, $000000D7, $000000FB,
- $0000007C, $000000E3, $00000039, $00000082, $0000009B, $0000002F, $000000FF, $00000087,
- $00000034, $0000008E, $00000043, $00000044, $000000C4, $000000DE, $000000E9, $000000CB,
- $00000054, $0000007B, $00000094, $00000032, $000000A6, $000000C2, $00000023, $0000003D,
- $000000EE, $0000004C, $00000095, $0000000B, $00000042, $000000FA, $000000C3, $0000004E,
- $00000008, $0000002E, $000000A1, $00000066, $00000028, $000000D9, $00000024, $000000B2,
- $00000076, $0000005B, $000000A2, $00000049, $0000006D, $0000008B, $000000D1, $00000025,
- $00000072, $000000F8, $000000F6, $00000064, $00000086, $00000068, $00000098, $00000016,
- $000000D4, $000000A4, $0000005C, $000000CC, $0000005D, $00000065, $000000B6, $00000092,
- $0000006C, $00000070, $00000048, $00000050, $000000FD, $000000ED, $000000B9, $000000DA,
- $0000005E, $00000015, $00000046, $00000057, $000000A7, $0000008D, $0000009D, $00000084,
- $00000090, $000000D8, $000000AB, $00000000, $0000008C, $000000BC, $000000D3, $0000000A,
- $000000F7, $000000E4, $00000058, $00000005, $000000B8, $000000B3, $00000045, $00000006,
- $000000D0, $0000002C, $0000001E, $0000008F, $000000CA, $0000003F, $0000000F, $00000002,
- $000000C1, $000000AF, $000000BD, $00000003, $00000001, $00000013, $0000008A, $0000006B,
- $0000003A, $00000091, $00000011, $00000041, $0000004F, $00000067, $000000DC, $000000EA,
- $00000097, $000000F2, $000000CF, $000000CE, $000000F0, $000000B4, $000000E6, $00000073,
- $00000096, $000000AC, $00000074, $00000022, $000000E7, $000000AD, $00000035, $00000085,
- $000000E2, $000000F9, $00000037, $000000E8, $0000001C, $00000075, $000000DF, $0000006E,
- $00000047, $000000F1, $0000001A, $00000071, $0000001D, $00000029, $000000C5, $00000089,
- $0000006F, $000000B7, $00000062, $0000000E, $000000AA, $00000018, $000000BE, $0000001B,
- $000000FC, $00000056, $0000003E, $0000004B, $000000C6, $000000D2, $00000079, $00000020,
- $0000009A, $000000DB, $000000C0, $000000FE, $00000078, $000000CD, $0000005A, $000000F4,
- $0000001F, $000000DD, $000000A8, $00000033, $00000088, $00000007, $000000C7, $00000031,
- $000000B1, $00000012, $00000010, $00000059, $00000027, $00000080, $000000EC, $0000005F,
- $00000060, $00000051, $0000007F, $000000A9, $00000019, $000000B5, $0000004A, $0000000D,
- $0000002D, $000000E5, $0000007A, $0000009F, $00000093, $000000C9, $0000009C, $000000EF,
- $000000A0, $000000E0, $0000003B, $0000004D, $000000AE, $0000002A, $000000F5, $000000B0,
- $000000C8, $000000EB, $000000BB, $0000003C, $00000083, $00000053, $00000099, $00000061,
- $00000017, $0000002B, $00000004, $0000007E, $000000BA, $00000077, $000000D6, $00000026,
- $000000E1, $00000069, $00000014, $00000063, $00000055, $00000021, $0000000C, $0000007D
- );
-
-procedure ExpandAESKeyForEncryption(const Key: TAESKey128; var ExpandedKey: TAESExpandedKey128);
-var
- I, J: integer;
- T: longword;
- W0, W1, W2, W3: longword;
-begin
- ExpandedKey[0] := PLongWord(@Key[0])^;
- ExpandedKey[1] := PLongWord(@Key[4])^;
- ExpandedKey[2] := PLongWord(@Key[8])^;
- ExpandedKey[3] := PLongWord(@Key[12])^;
- I := 0; J := 1;
- repeat
- T := (ExpandedKey[I + 3] shl 24) or (ExpandedKey[I + 3] shr 8);
- W0 := LastForwardTable[Byte(T)]; W1 := LastForwardTable[Byte(T shr 8)];
- W2 := LastForwardTable[Byte(T shr 16)]; W3 := LastForwardTable[Byte(T shr 24)];
- ExpandedKey[I + 4] := ExpandedKey[I] xor
- (W0 xor ((W1 shl 8) or (W1 shr 24)) xor
- ((W2 shl 16) or (W2 shr 16)) xor ((W3 shl 24) or (W3 shr 8))) xor Rcon[J];
- Inc(J);
- ExpandedKey[I + 5] := ExpandedKey[I + 1] xor ExpandedKey[I + 4];
- ExpandedKey[I + 6] := ExpandedKey[I + 2] xor ExpandedKey[I + 5];
- ExpandedKey[I + 7] := ExpandedKey[I + 3] xor ExpandedKey[I + 6];
- Inc(I, 4);
- until I >= 40;
-end;
-
-procedure ExpandAESKeyForEncryption(const Key: TAESKey192; var ExpandedKey: TAESExpandedKey192); overload;
-var
- I, J: integer;
- T: longword;
- W0, W1, W2, W3: longword;
-begin
- ExpandedKey[0] := PLongWord(@Key[0])^;
- ExpandedKey[1] := PLongWord(@Key[4])^;
- ExpandedKey[2] := PLongWord(@Key[8])^;
- ExpandedKey[3] := PLongWord(@Key[12])^;
- ExpandedKey[4] := PLongWord(@Key[16])^;
- ExpandedKey[5] := PLongWord(@Key[20])^;
- I := 0; J := 1;
- repeat
- T := (ExpandedKey[I + 5] shl 24) or (ExpandedKey[I + 5] shr 8);
- W0 := LastForwardTable[Byte(T)]; W1 := LastForwardTable[Byte(T shr 8)];
- W2 := LastForwardTable[Byte(T shr 16)]; W3 := LastForwardTable[Byte(T shr 24)];
- ExpandedKey[I + 6] := ExpandedKey[I] xor
- (W0 xor ((W1 shl 8) or (W1 shr 24)) xor
- ((W2 shl 16) or (W2 shr 16)) xor ((W3 shl 24) or (W3 shr 8))) xor Rcon[J];
- Inc(J);
- ExpandedKey[I + 7] := ExpandedKey[I + 1] xor ExpandedKey[I + 6];
- ExpandedKey[I + 8] := ExpandedKey[I + 2] xor ExpandedKey[I + 7];
- ExpandedKey[I + 9] := ExpandedKey[I + 3] xor ExpandedKey[I + 8];
- ExpandedKey[I + 10] := ExpandedKey[I + 4] xor ExpandedKey[I + 9];
- ExpandedKey[I + 11] := ExpandedKey[I + 5] xor ExpandedKey[I + 10];
- Inc(I, 6);
- until I >= 46;
-end;
-
-procedure ExpandAESKeyForEncryption(const Key: TAESKey256; var ExpandedKey: TAESExpandedKey256); overload;
-var
- I, J: integer;
- T: longword;
- W0, W1, W2, W3: longword;
-begin
- ExpandedKey[0] := PLongWord(@Key[0])^;
- ExpandedKey[1] := PLongWord(@Key[4])^;
- ExpandedKey[2] := PLongWord(@Key[8])^;
- ExpandedKey[3] := PLongWord(@Key[12])^;
- ExpandedKey[4] := PLongWord(@Key[16])^;
- ExpandedKey[5] := PLongWord(@Key[20])^;
- ExpandedKey[6] := PLongWord(@Key[24])^;
- ExpandedKey[7] := PLongWord(@Key[28])^;
- I := 0; J := 1;
- repeat
- T := (ExpandedKey[I + 7] shl 24) or (ExpandedKey[I + 7] shr 8);
- W0 := LastForwardTable[Byte(T)]; W1 := LastForwardTable[Byte(T shr 8)];
- W2 := LastForwardTable[Byte(T shr 16)]; W3 := LastForwardTable[Byte(T shr 24)];
- ExpandedKey[I + 8] := ExpandedKey[I] xor
- (W0 xor ((W1 shl 8) or (W1 shr 24)) xor
- ((W2 shl 16) or (W2 shr 16)) xor ((W3 shl 24) or (W3 shr 8))) xor Rcon[J];
- Inc(J);
- ExpandedKey[I + 9] := ExpandedKey[I + 1] xor ExpandedKey[I + 8];
- ExpandedKey[I + 10] := ExpandedKey[I + 2] xor ExpandedKey[I + 9];
- ExpandedKey[I + 11] := ExpandedKey[I + 3] xor ExpandedKey[I + 10];
- W0 := LastForwardTable[Byte(ExpandedKey[I + 11])];
- W1 := LastForwardTable[Byte(ExpandedKey[I + 11] shr 8)];
- W2 := LastForwardTable[Byte(ExpandedKey[I + 11] shr 16)];
- W3 := LastForwardTable[Byte(ExpandedKey[I + 11] shr 24)];
- ExpandedKey[I + 12] := ExpandedKey[I + 4] xor
- (W0 xor ((W1 shl 8) or (W1 shr 24)) xor
- ((W2 shl 16) or (W2 shr 16)) xor ((W3 shl 24) or (W3 shr 8)));
- ExpandedKey[I + 13] := ExpandedKey[I + 5] xor ExpandedKey[I + 12];
- ExpandedKey[I + 14] := ExpandedKey[I + 6] xor ExpandedKey[I + 13];
- ExpandedKey[I + 15] := ExpandedKey[I + 7] xor ExpandedKey[I + 14];
- Inc(I, 8);
- until I >= 52;
-end;
-
-procedure EncryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey128;
- var OutBuf: TAESBuffer);
-var
- T0, T1: array [0..3] of longword;
- W0, W1, W2, W3: longword;
-begin
- // initializing
- T0[0] := PLongWord(@InBuf[0])^ xor Key[0];
- T0[1] := PLongWord(@InBuf[4])^ xor Key[1];
- T0[2] := PLongWord(@InBuf[8])^ xor Key[2];
- T0[3] := PLongWord(@InBuf[12])^ xor Key[3];
- // performing transformation 9 times
- // round 1
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[4];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[5];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[6];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[7];
- // round 2
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[8];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[9];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[10];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[11];
- // round 3
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[12];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[13];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[14];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[15];
- // round 4
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[16];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[17];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[18];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[19];
- // round 5
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[20];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[21];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[22];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[23];
- // round 6
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[24];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[25];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[26];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[27];
- // round 7
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[28];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[29];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[30];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[31];
- // round 8
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[32];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[33];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[34];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[35];
- // round 9
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[36];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[37];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[38];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[39];
- // last round of transformations
- W0 := LastForwardTable[Byte(T1[0])]; W1 := LastForwardTable[Byte(T1[1] shr 8)];
- W2 := LastForwardTable[Byte(T1[2] shr 16)]; W3 := LastForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[40];
- W0 := LastForwardTable[Byte(T1[1])]; W1 := LastForwardTable[Byte(T1[2] shr 8)];
- W2 := LastForwardTable[Byte(T1[3] shr 16)]; W3 := LastForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[41];
- W0 := LastForwardTable[Byte(T1[2])]; W1 := LastForwardTable[Byte(T1[3] shr 8)];
- W2 := LastForwardTable[Byte(T1[0] shr 16)]; W3 := LastForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[42];
- W0 := LastForwardTable[Byte(T1[3])]; W1 := LastForwardTable[Byte(T1[0] shr 8)];
- W2 := LastForwardTable[Byte(T1[1] shr 16)]; W3 := LastForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[43];
- // finalizing
- PLongWord(@OutBuf[0])^ := T0[0]; PLongWord(@OutBuf[4])^ := T0[1];
- PLongWord(@OutBuf[8])^ := T0[2]; PLongWord(@OutBuf[12])^ := T0[3];
-end;
-
-procedure EncryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey192;
- var OutBuf: TAESBuffer);
-var
- T0, T1: array [0..3] of longword;
- W0, W1, W2, W3: longword;
-begin
- // initializing
- T0[0] := PLongWord(@InBuf[0])^ xor Key[0];
- T0[1] := PLongWord(@InBuf[4])^ xor Key[1];
- T0[2] := PLongWord(@InBuf[8])^ xor Key[2];
- T0[3] := PLongWord(@InBuf[12])^ xor Key[3];
- // performing transformation 11 times
- // round 1
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[4];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[5];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[6];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[7];
- // round 2
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[8];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[9];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[10];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[11];
- // round 3
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[12];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[13];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[14];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[15];
- // round 4
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[16];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[17];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[18];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[19];
- // round 5
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[20];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[21];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[22];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[23];
- // round 6
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[24];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[25];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[26];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[27];
- // round 7
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[28];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[29];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[30];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[31];
- // round 8
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[32];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[33];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[34];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[35];
- // round 9
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[36];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[37];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[38];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[39];
- // round 10
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[40];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[41];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[42];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[43];
- // round 11
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[44];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[45];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[46];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[47];
- // last round of transformations
- W0 := LastForwardTable[Byte(T1[0])]; W1 := LastForwardTable[Byte(T1[1] shr 8)];
- W2 := LastForwardTable[Byte(T1[2] shr 16)]; W3 := LastForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[48];
- W0 := LastForwardTable[Byte(T1[1])]; W1 := LastForwardTable[Byte(T1[2] shr 8)];
- W2 := LastForwardTable[Byte(T1[3] shr 16)]; W3 := LastForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[49];
- W0 := LastForwardTable[Byte(T1[2])]; W1 := LastForwardTable[Byte(T1[3] shr 8)];
- W2 := LastForwardTable[Byte(T1[0] shr 16)]; W3 := LastForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[50];
- W0 := LastForwardTable[Byte(T1[3])]; W1 := LastForwardTable[Byte(T1[0] shr 8)];
- W2 := LastForwardTable[Byte(T1[1] shr 16)]; W3 := LastForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[51];
- // finalizing
- PLongWord(@OutBuf[0])^ := T0[0]; PLongWord(@OutBuf[4])^ := T0[1];
- PLongWord(@OutBuf[8])^ := T0[2]; PLongWord(@OutBuf[12])^ := T0[3];
-end;
-
-procedure EncryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey256;
- var OutBuf: TAESBuffer);
-var
- T0, T1: array [0..3] of longword;
- W0, W1, W2, W3: longword;
-begin
- // initializing
- T0[0] := PLongWord(@InBuf[0])^ xor Key[0];
- T0[1] := PLongWord(@InBuf[4])^ xor Key[1];
- T0[2] := PLongWord(@InBuf[8])^ xor Key[2];
- T0[3] := PLongWord(@InBuf[12])^ xor Key[3];
- // performing transformation 13 times
- // round 1
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[4];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[5];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[6];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[7];
- // round 2
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[8];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[9];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[10];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[11];
- // round 3
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[12];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[13];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[14];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[15];
- // round 4
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[16];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[17];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[18];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[19];
- // round 5
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[20];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[21];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[22];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[23];
- // round 6
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[24];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[25];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[26];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[27];
- // round 7
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[28];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[29];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[30];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[31];
- // round 8
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[32];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[33];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[34];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[35];
- // round 9
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[36];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[37];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[38];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[39];
- // round 10
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[40];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[41];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[42];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[43];
- // round 11
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[44];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[45];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[46];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[47];
- // round 12
- W0 := ForwardTable[Byte(T1[0])]; W1 := ForwardTable[Byte(T1[1] shr 8)];
- W2 := ForwardTable[Byte(T1[2] shr 16)]; W3 := ForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[48];
- W0 := ForwardTable[Byte(T1[1])]; W1 := ForwardTable[Byte(T1[2] shr 8)];
- W2 := ForwardTable[Byte(T1[3] shr 16)]; W3 := ForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[49];
- W0 := ForwardTable[Byte(T1[2])]; W1 := ForwardTable[Byte(T1[3] shr 8)];
- W2 := ForwardTable[Byte(T1[0] shr 16)]; W3 := ForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[50];
- W0 := ForwardTable[Byte(T1[3])]; W1 := ForwardTable[Byte(T1[0] shr 8)];
- W2 := ForwardTable[Byte(T1[1] shr 16)]; W3 := ForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[51];
- // round 13
- W0 := ForwardTable[Byte(T0[0])]; W1 := ForwardTable[Byte(T0[1] shr 8)];
- W2 := ForwardTable[Byte(T0[2] shr 16)]; W3 := ForwardTable[Byte(T0[3] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[52];
- W0 := ForwardTable[Byte(T0[1])]; W1 := ForwardTable[Byte(T0[2] shr 8)];
- W2 := ForwardTable[Byte(T0[3] shr 16)]; W3 := ForwardTable[Byte(T0[0] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[53];
- W0 := ForwardTable[Byte(T0[2])]; W1 := ForwardTable[Byte(T0[3] shr 8)];
- W2 := ForwardTable[Byte(T0[0] shr 16)]; W3 := ForwardTable[Byte(T0[1] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[54];
- W0 := ForwardTable[Byte(T0[3])]; W1 := ForwardTable[Byte(T0[0] shr 8)];
- W2 := ForwardTable[Byte(T0[1] shr 16)]; W3 := ForwardTable[Byte(T0[2] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[55];
- // last round of transformations
- W0 := LastForwardTable[Byte(T1[0])]; W1 := LastForwardTable[Byte(T1[1] shr 8)];
- W2 := LastForwardTable[Byte(T1[2] shr 16)]; W3 := LastForwardTable[Byte(T1[3] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[56];
- W0 := LastForwardTable[Byte(T1[1])]; W1 := LastForwardTable[Byte(T1[2] shr 8)];
- W2 := LastForwardTable[Byte(T1[3] shr 16)]; W3 := LastForwardTable[Byte(T1[0] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[57];
- W0 := LastForwardTable[Byte(T1[2])]; W1 := LastForwardTable[Byte(T1[3] shr 8)];
- W2 := LastForwardTable[Byte(T1[0] shr 16)]; W3 := LastForwardTable[Byte(T1[1] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[58];
- W0 := LastForwardTable[Byte(T1[3])]; W1 := LastForwardTable[Byte(T1[0] shr 8)];
- W2 := LastForwardTable[Byte(T1[1] shr 16)]; W3 := LastForwardTable[Byte(T1[2] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[59];
- // finalizing
- PLongWord(@OutBuf[0])^ := T0[0]; PLongWord(@OutBuf[4])^ := T0[1];
- PLongWord(@OutBuf[8])^ := T0[2]; PLongWord(@OutBuf[12])^ := T0[3];
-end;
-
-procedure ExpandAESKeyForDecryption(var ExpandedKey: TAESExpandedKey128);
-var
- I: integer;
- U, F2, F4, F8, F9: longword;
-begin
- for I := 1 to 9 do
- begin
- F9 := ExpandedKey[I * 4];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 1];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 1] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 2];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 2] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 3];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 3] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- end;
-end;
-
-procedure ExpandAESKeyForDecryption(const Key: TAESKey128; var ExpandedKey: TAESExpandedKey128);
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- ExpandAESKeyForDecryption(ExpandedKey);
-end;
-
-procedure ExpandAESKeyForDecryption(var ExpandedKey: TAESExpandedKey192);
-var
- I: integer;
- U, F2, F4, F8, F9: longword;
-begin
- for I := 1 to 11 do
- begin
- F9 := ExpandedKey[I * 4];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 1];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 1] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 2];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 2] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 3];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 3] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- end;
-end;
-
-procedure ExpandAESKeyForDecryption(const Key: TAESKey192; var ExpandedKey: TAESExpandedKey192);
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- ExpandAESKeyForDecryption(ExpandedKey);
-end;
-
-procedure ExpandAESKeyForDecryption(var ExpandedKey: TAESExpandedKey256);
-var
- I: integer;
- U, F2, F4, F8, F9: longword;
-begin
- for I := 1 to 13 do
- begin
- F9 := ExpandedKey[I * 4];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 1];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 1] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 2];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 2] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- F9 := ExpandedKey[I * 4 + 3];
- U := F9 and $80808080;
- F2 := ((F9 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F2 and $80808080;
- F4 := ((F2 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- U := F4 and $80808080;
- F8 := ((F4 and $7F7F7F7F) shl 1) xor ((U - (U shr 7)) and $1B1B1B1B);
- F9 := F9 xor F8;
- ExpandedKey[I * 4 + 3] := F2 xor F4 xor F8 xor
- (((F2 xor F9) shl 24) or ((F2 xor F9) shr 8)) xor
- (((F4 xor F9) shl 16) or ((F4 xor F9) shr 16)) xor ((F9 shl 8) or (F9 shr 24));
- end;
-end;
-
-procedure ExpandAESKeyForDecryption(const Key: TAESKey256; var ExpandedKey: TAESExpandedKey256);
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- ExpandAESKeyForDecryption(ExpandedKey);
-end;
-
-procedure DecryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey128;
- var OutBuf: TAESBuffer);
-var
- T0, T1: array [0..3] of longword;
- W0, W1, W2, W3: longword;
-begin
- // initializing
- T0[0] := PLongWord(@InBuf[0])^ xor Key[40];
- T0[1] := PLongWord(@InBuf[4])^ xor Key[41];
- T0[2] := PLongWord(@InBuf[8])^ xor Key[42];
- T0[3] := PLongWord(@InBuf[12])^ xor Key[43];
- // performing transformations 9 times
- // round 1
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[36];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[37];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[38];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[39];
- // round 2
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[32];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[33];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[34];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[35];
- // round 3
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[28];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[29];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[30];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[31];
- // round 4
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[24];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[25];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[26];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[27];
- // round 5
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[20];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[21];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[22];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[23];
- // round 6
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[16];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[17];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[18];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[19];
- // round 7
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[12];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[13];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[14];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[15];
- // round 8
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[8];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[9];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[10];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[11];
- // round 9
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[4];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[5];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[6];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[7];
- // last round of transformations
- W0 := LastInverseTable[Byte(T1[0])]; W1 := LastInverseTable[Byte(T1[3] shr 8)];
- W2 := LastInverseTable[Byte(T1[2] shr 16)]; W3 := LastInverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[0];
- W0 := LastInverseTable[Byte(T1[1])]; W1 := LastInverseTable[Byte(T1[0] shr 8)];
- W2 := LastInverseTable[Byte(T1[3] shr 16)]; W3 := LastInverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[1];
- W0 := LastInverseTable[Byte(T1[2])]; W1 := LastInverseTable[Byte(T1[1] shr 8)];
- W2 := LastInverseTable[Byte(T1[0] shr 16)]; W3 := LastInverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[2];
- W0 := LastInverseTable[Byte(T1[3])]; W1 := LastInverseTable[Byte(T1[2] shr 8)];
- W2 := LastInverseTable[Byte(T1[1] shr 16)]; W3 := LastInverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[3];
- // finalizing
- PLongWord(@OutBuf[0])^ := T0[0]; PLongWord(@OutBuf[4])^ := T0[1];
- PLongWord(@OutBuf[8])^ := T0[2]; PLongWord(@OutBuf[12])^ := T0[3];
-end;
-
-procedure DecryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey192;
- var OutBuf: TAESBuffer);
-var
- T0, T1: array [0..3] of longword;
- W0, W1, W2, W3: longword;
-begin
- // initializing
- T0[0] := PLongWord(@InBuf[0])^ xor Key[48];
- T0[1] := PLongWord(@InBuf[4])^ xor Key[49];
- T0[2] := PLongWord(@InBuf[8])^ xor Key[50];
- T0[3] := PLongWord(@InBuf[12])^ xor Key[51];
- // performing transformations 11 times
- // round 1
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[44];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[45];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[46];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[47];
- // round 2
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[40];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[41];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[42];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[43];
- // round 3
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[36];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[37];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[38];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[39];
- // round 4
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[32];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[33];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[34];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[35];
- // round 5
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[28];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[29];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[30];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[31];
- // round 6
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[24];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[25];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[26];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[27];
- // round 7
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[20];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[21];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[22];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[23];
- // round 8
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[16];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[17];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[18];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[19];
- // round 9
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[12];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[13];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[14];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[15];
- // round 10
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[8];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[9];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[10];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[11];
- // round 11
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[4];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[5];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[6];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[7];
- // last round of transformations
- W0 := LastInverseTable[Byte(T1[0])]; W1 := LastInverseTable[Byte(T1[3] shr 8)];
- W2 := LastInverseTable[Byte(T1[2] shr 16)]; W3 := LastInverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[0];
- W0 := LastInverseTable[Byte(T1[1])]; W1 := LastInverseTable[Byte(T1[0] shr 8)];
- W2 := LastInverseTable[Byte(T1[3] shr 16)]; W3 := LastInverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[1];
- W0 := LastInverseTable[Byte(T1[2])]; W1 := LastInverseTable[Byte(T1[1] shr 8)];
- W2 := LastInverseTable[Byte(T1[0] shr 16)]; W3 := LastInverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[2];
- W0 := LastInverseTable[Byte(T1[3])]; W1 := LastInverseTable[Byte(T1[2] shr 8)];
- W2 := LastInverseTable[Byte(T1[1] shr 16)]; W3 := LastInverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[3];
- // finalizing
- PLongWord(@OutBuf[0])^ := T0[0]; PLongWord(@OutBuf[4])^ := T0[1];
- PLongWord(@OutBuf[8])^ := T0[2]; PLongWord(@OutBuf[12])^ := T0[3];
-end;
-
-procedure DecryptAES(const InBuf: TAESBuffer; const Key: TAESExpandedKey256;
- var OutBuf: TAESBuffer);
-var
- T0, T1: array [0..3] of longword;
- W0, W1, W2, W3: longword;
-begin
- // initializing
- T0[0] := PLongWord(@InBuf[0])^ xor Key[56];
- T0[1] := PLongWord(@InBuf[4])^ xor Key[57];
- T0[2] := PLongWord(@InBuf[8])^ xor Key[58];
- T0[3] := PLongWord(@InBuf[12])^ xor Key[59];
- // performing transformations 13 times
- // round 1
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[52];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[53];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[54];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[55];
- // round 2
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[48];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[49];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[50];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[51];
- // round 3
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[44];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[45];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[46];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[47];
- // round 4
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[40];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[41];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[42];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[43];
- // round 5
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[36];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[37];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[38];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[39];
- // round 6
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[32];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[33];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[34];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[35];
- // round 7
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[28];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[29];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[30];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[31];
- // round 8
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[24];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[25];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[26];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[27];
- // round 9
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[20];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[21];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[22];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[23];
- // round 10
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[16];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[17];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[18];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[19];
- // round 11
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[12];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[13];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[14];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[15];
- // round 12
- W0 := InverseTable[Byte(T1[0])]; W1 := InverseTable[Byte(T1[3] shr 8)];
- W2 := InverseTable[Byte(T1[2] shr 16)]; W3 := InverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[8];
- W0 := InverseTable[Byte(T1[1])]; W1 := InverseTable[Byte(T1[0] shr 8)];
- W2 := InverseTable[Byte(T1[3] shr 16)]; W3 := InverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[9];
- W0 := InverseTable[Byte(T1[2])]; W1 := InverseTable[Byte(T1[1] shr 8)];
- W2 := InverseTable[Byte(T1[0] shr 16)]; W3 := InverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[10];
- W0 := InverseTable[Byte(T1[3])]; W1 := InverseTable[Byte(T1[2] shr 8)];
- W2 := InverseTable[Byte(T1[1] shr 16)]; W3 := InverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[11];
- // round 13
- W0 := InverseTable[Byte(T0[0])]; W1 := InverseTable[Byte(T0[3] shr 8)];
- W2 := InverseTable[Byte(T0[2] shr 16)]; W3 := InverseTable[Byte(T0[1] shr 24)];
- T1[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[4];
- W0 := InverseTable[Byte(T0[1])]; W1 := InverseTable[Byte(T0[0] shr 8)];
- W2 := InverseTable[Byte(T0[3] shr 16)]; W3 := InverseTable[Byte(T0[2] shr 24)];
- T1[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[5];
- W0 := InverseTable[Byte(T0[2])]; W1 := InverseTable[Byte(T0[1] shr 8)];
- W2 := InverseTable[Byte(T0[0] shr 16)]; W3 := InverseTable[Byte(T0[3] shr 24)];
- T1[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[6];
- W0 := InverseTable[Byte(T0[3])]; W1 := InverseTable[Byte(T0[2] shr 8)];
- W2 := InverseTable[Byte(T0[1] shr 16)]; W3 := InverseTable[Byte(T0[0] shr 24)];
- T1[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[7];
- // last round of transformations
- W0 := LastInverseTable[Byte(T1[0])]; W1 := LastInverseTable[Byte(T1[3] shr 8)];
- W2 := LastInverseTable[Byte(T1[2] shr 16)]; W3 := LastInverseTable[Byte(T1[1] shr 24)];
- T0[0] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[0];
- W0 := LastInverseTable[Byte(T1[1])]; W1 := LastInverseTable[Byte(T1[0] shr 8)];
- W2 := LastInverseTable[Byte(T1[3] shr 16)]; W3 := LastInverseTable[Byte(T1[2] shr 24)];
- T0[1] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[1];
- W0 := LastInverseTable[Byte(T1[2])]; W1 := LastInverseTable[Byte(T1[1] shr 8)];
- W2 := LastInverseTable[Byte(T1[0] shr 16)]; W3 := LastInverseTable[Byte(T1[3] shr 24)];
- T0[2] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[2];
- W0 := LastInverseTable[Byte(T1[3])]; W1 := LastInverseTable[Byte(T1[2] shr 8)];
- W2 := LastInverseTable[Byte(T1[1] shr 16)]; W3 := LastInverseTable[Byte(T1[0] shr 24)];
- T0[3] := (W0 xor ((W1 shl 8) or (W1 shr 24)) xor ((W2 shl 16) or (W2 shr 16))
- xor ((W3 shl 24) or (W3 shr 8))) xor Key[3];
- // finalizing
- PLongWord(@OutBuf[0])^ := T0[0]; PLongWord(@OutBuf[4])^ := T0[1];
- PLongWord(@OutBuf[8])^ := T0[2]; PLongWord(@OutBuf[12])^ := T0[3];
-end;
-
-// Stream encryption routines (ECB mode)
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey128; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey128;
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- EncryptAESStreamECB(Source, Count, ExpandedKey, Dest);
-end;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey192; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey192;
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- EncryptAESStreamECB(Source, Count, ExpandedKey, Dest);
-end;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey256; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey256;
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- EncryptAESStreamECB(Source, Count, ExpandedKey, Dest);
-end;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Dec(Count, SizeOf(TAESBuffer));
- end;
- if Count > 0 then
- begin
- Done := Source.Read(TempIn, Count);
- if Done < Count then
- raise EStreamError.Create(SReadError);
- FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- end;
-end;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Dec(Count, SizeOf(TAESBuffer));
- end;
- if Count > 0 then
- begin
- Done := Source.Read(TempIn, Count);
- if Done < Count then
- raise EStreamError.Create(SReadError);
- FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- end;
-end;
-
-procedure EncryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Dec(Count, SizeOf(TAESBuffer));
- end;
- if Count > 0 then
- begin
- Done := Source.Read(TempIn, Count);
- if Done < Count then
- raise EStreamError.Create(SReadError);
- FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- end;
-end;
-
-// Stream decryption routines (ECB mode)
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey128; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey128;
-begin
- ExpandAESKeyForDecryption(Key, ExpandedKey);
- DecryptAESStreamECB(Source, Count, ExpandedKey, Dest);
-end;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- if (Count mod SizeOf(TAESBuffer)) > 0 then
- raise EAESError.Create(SInvalidInBufSize);
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- DecryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Dec(Count, SizeOf(TAESBuffer));
- end;
-end;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey192; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey192;
-begin
- ExpandAESKeyForDecryption(Key, ExpandedKey);
- DecryptAESStreamECB(Source, Count, ExpandedKey, Dest);
-end;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- if (Count mod SizeOf(TAESBuffer)) > 0 then
- raise EAESError.Create(SInvalidInBufSize);
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- DecryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Dec(Count, SizeOf(TAESBuffer));
- end;
-end;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const Key: TAESKey256; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey256;
-begin
- ExpandAESKeyForDecryption(Key, ExpandedKey);
- DecryptAESStreamECB(Source, Count, ExpandedKey, Dest);
-end;
-
-procedure DecryptAESStreamECB(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- if (Count mod SizeOf(TAESBuffer)) > 0 then
- raise EAESError.Create(SInvalidInBufSize);
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- DecryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Dec(Count, SizeOf(TAESBuffer));
- end;
-end;
-
-// Stream encryption routines (CBC mode)
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey128; const InitVector: TAESBuffer; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey128;
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- EncryptAESStreamCBC(Source, Count, ExpandedKey, InitVector, Dest);
-end;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; const InitVector: TAESBuffer;
- Dest: TStream);
-var
- TempIn, TempOut, Vector: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- Vector := InitVector;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- PLongWord(@TempIn[0])^ := PLongWord(@TempIn[0])^ xor PLongWord(@Vector[0])^;
- PLongWord(@TempIn[4])^ := PLongWord(@TempIn[4])^ xor PLongWord(@Vector[4])^;
- PLongWord(@TempIn[8])^ := PLongWord(@TempIn[8])^ xor PLongWord(@Vector[8])^;
- PLongWord(@TempIn[12])^ := PLongWord(@TempIn[12])^ xor PLongWord(@Vector[12])^;
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Vector := TempOut;
- Dec(Count, SizeOf(TAESBuffer));
- end;
- if Count > 0 then
- begin
- Done := Source.Read(TempIn, Count);
- if Done < Count then
- raise EStreamError.Create(SReadError);
- FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);
- PLongWord(@TempIn[0])^ := PLongWord(@TempIn[0])^ xor PLongWord(@Vector[0])^;
- PLongWord(@TempIn[4])^ := PLongWord(@TempIn[4])^ xor PLongWord(@Vector[4])^;
- PLongWord(@TempIn[8])^ := PLongWord(@TempIn[8])^ xor PLongWord(@Vector[8])^;
- PLongWord(@TempIn[12])^ := PLongWord(@TempIn[12])^ xor PLongWord(@Vector[12])^;
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- end;
-end;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey192; const InitVector: TAESBuffer; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey192;
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- EncryptAESStreamCBC(Source, Count, ExpandedKey, InitVector, Dest);
-end;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; const InitVector: TAESBuffer;
- Dest: TStream);
-var
- TempIn, TempOut, Vector: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- Vector := InitVector;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- PLongWord(@TempIn[0])^ := PLongWord(@TempIn[0])^ xor PLongWord(@Vector[0])^;
- PLongWord(@TempIn[4])^ := PLongWord(@TempIn[4])^ xor PLongWord(@Vector[4])^;
- PLongWord(@TempIn[8])^ := PLongWord(@TempIn[8])^ xor PLongWord(@Vector[8])^;
- PLongWord(@TempIn[12])^ := PLongWord(@TempIn[12])^ xor PLongWord(@Vector[12])^;
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Vector := TempOut;
- Dec(Count, SizeOf(TAESBuffer));
- end;
- if Count > 0 then
- begin
- Done := Source.Read(TempIn, Count);
- if Done < Count then
- raise EStreamError.Create(SReadError);
- FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);
- PLongWord(@TempIn[0])^ := PLongWord(@TempIn[0])^ xor PLongWord(@Vector[0])^;
- PLongWord(@TempIn[4])^ := PLongWord(@TempIn[4])^ xor PLongWord(@Vector[4])^;
- PLongWord(@TempIn[8])^ := PLongWord(@TempIn[8])^ xor PLongWord(@Vector[8])^;
- PLongWord(@TempIn[12])^ := PLongWord(@TempIn[12])^ xor PLongWord(@Vector[12])^;
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- end;
-end;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey256; const InitVector: TAESBuffer; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey256;
-begin
- ExpandAESKeyForEncryption(Key, ExpandedKey);
- EncryptAESStreamCBC(Source, Count, ExpandedKey, InitVector, Dest);
-end;
-
-procedure EncryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; const InitVector: TAESBuffer;
- Dest: TStream);
-var
- TempIn, TempOut, Vector: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- Vector := InitVector;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError.Create(SReadError);
- PLongWord(@TempIn[0])^ := PLongWord(@TempIn[0])^ xor PLongWord(@Vector[0])^;
- PLongWord(@TempIn[4])^ := PLongWord(@TempIn[4])^ xor PLongWord(@Vector[4])^;
- PLongWord(@TempIn[8])^ := PLongWord(@TempIn[8])^ xor PLongWord(@Vector[8])^;
- PLongWord(@TempIn[12])^ := PLongWord(@TempIn[12])^ xor PLongWord(@Vector[12])^;
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- Vector := TempOut;
- Dec(Count, SizeOf(TAESBuffer));
- end;
- if Count > 0 then
- begin
- Done := Source.Read(TempIn, Count);
- if Done < Count then
- raise EStreamError.Create(SReadError);
- FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);
- PLongWord(@TempIn[0])^ := PLongWord(@TempIn[0])^ xor PLongWord(@Vector[0])^;
- PLongWord(@TempIn[4])^ := PLongWord(@TempIn[4])^ xor PLongWord(@Vector[4])^;
- PLongWord(@TempIn[8])^ := PLongWord(@TempIn[8])^ xor PLongWord(@Vector[8])^;
- PLongWord(@TempIn[12])^ := PLongWord(@TempIn[12])^ xor PLongWord(@Vector[12])^;
- EncryptAES(TempIn, ExpandedKey, TempOut);
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError.Create(SWriteError);
- end;
-end;
-
-// Stream decryption routines (CBC mode)
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey128; const InitVector: TAESBuffer; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey128;
-begin
- ExpandAESKeyForDecryption(Key, ExpandedKey);
- DecryptAESStreamCBC(Source, Count, ExpandedKey, InitVector, Dest);
-end;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey128; const InitVector: TAESBuffer;
- Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Vector1, Vector2: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- if (Count mod SizeOf(TAESBuffer)) > 0 then
- raise EAESError.Create(SInvalidInBufSize);
- Vector1 := InitVector;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError(SReadError);
- Vector2 := TempIn;
- DecryptAES(TempIn, ExpandedKey, TempOut);
- PLongWord(@TempOut[0])^ := PLongWord(@TempOut[0])^ xor PLongWord(@Vector1[0])^;
- PLongWord(@TempOut[4])^ := PLongWord(@TempOut[4])^ xor PLongWord(@Vector1[4])^;
- PLongWord(@TempOut[8])^ := PLongWord(@TempOut[8])^ xor PLongWord(@Vector1[8])^;
- PLongWord(@TempOut[12])^ := PLongWord(@TempOut[12])^ xor PLongWord(@Vector1[12])^;
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError(SWriteError);
- Vector1 := Vector2;
- Dec(Count, SizeOf(TAESBuffer));
- end;
-end;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey192; const InitVector: TAESBuffer; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey192;
-begin
- ExpandAESKeyForDecryption(Key, ExpandedKey);
- DecryptAESStreamCBC(Source, Count, ExpandedKey, InitVector, Dest);
-end;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey192; const InitVector: TAESBuffer;
- Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Vector1, Vector2: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- if (Count mod SizeOf(TAESBuffer)) > 0 then
- raise EAESError.Create(SInvalidInBufSize);
- Vector1 := InitVector;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError(SReadError);
- Vector2 := TempIn;
- DecryptAES(TempIn, ExpandedKey, TempOut);
- PLongWord(@TempOut[0])^ := PLongWord(@TempOut[0])^ xor PLongWord(@Vector1[0])^;
- PLongWord(@TempOut[4])^ := PLongWord(@TempOut[4])^ xor PLongWord(@Vector1[4])^;
- PLongWord(@TempOut[8])^ := PLongWord(@TempOut[8])^ xor PLongWord(@Vector1[8])^;
- PLongWord(@TempOut[12])^ := PLongWord(@TempOut[12])^ xor PLongWord(@Vector1[12])^;
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError(SWriteError);
- Vector1 := Vector2;
- Dec(Count, SizeOf(TAESBuffer));
- end;
-end;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const Key: TAESKey256; const InitVector: TAESBuffer; Dest: TStream);
-var
- ExpandedKey: TAESExpandedKey256;
-begin
- ExpandAESKeyForDecryption(Key, ExpandedKey);
- DecryptAESStreamCBC(Source, Count, ExpandedKey, InitVector, Dest);
-end;
-
-procedure DecryptAESStreamCBC(Source: TStream; Count: cardinal;
- const ExpandedKey: TAESExpandedKey256; const InitVector: TAESBuffer;
- Dest: TStream);
-var
- TempIn, TempOut: TAESBuffer;
- Vector1, Vector2: TAESBuffer;
- Done: cardinal;
-begin
- if Count = 0 then
- begin
- Source.Position := 0;
- Count := Source.Size;
- end
- else Count := Min(Count, Source.Size - Source.Position);
- if Count = 0 then exit;
- if (Count mod SizeOf(TAESBuffer)) > 0 then
- raise EAESError.Create(SInvalidInBufSize);
- Vector1 := InitVector;
- while Count >= SizeOf(TAESBuffer) do
- begin
- Done := Source.Read(TempIn, SizeOf(TempIn));
- if Done < SizeOf(TempIn) then
- raise EStreamError(SReadError);
- Vector2 := TempIn;
- DecryptAES(TempIn, ExpandedKey, TempOut);
- PLongWord(@TempOut[0])^ := PLongWord(@TempOut[0])^ xor PLongWord(@Vector1[0])^;
- PLongWord(@TempOut[4])^ := PLongWord(@TempOut[4])^ xor PLongWord(@Vector1[4])^;
- PLongWord(@TempOut[8])^ := PLongWord(@TempOut[8])^ xor PLongWord(@Vector1[8])^;
- PLongWord(@TempOut[12])^ := PLongWord(@TempOut[12])^ xor PLongWord(@Vector1[12])^;
- Done := Dest.Write(TempOut, SizeOf(TempOut));
- if Done < SizeOf(TempOut) then
- raise EStreamError(SWriteError);
- Vector1 := Vector2;
- Dec(Count, SizeOf(TAESBuffer));
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/FieldExportSet/出货清单.INI b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/FieldExportSet/出货清单.INI
deleted file mode 100644
index ebd657c..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/FieldExportSet/出货清单.INI
+++ /dev/null
@@ -1,2 +0,0 @@
-[]
-ֶ=Begin/ѡ/Ʊ/˾/ָʾ/Ʒ///λ///////ҵԱ//Ŀĸ
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/FileHelp.ini b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/FileHelp.ini
deleted file mode 100644
index 495119d..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/FileHelp.ini
+++ /dev/null
@@ -1,7 +0,0 @@
-[FILEPATH]
-FileClass=YP,AA,BB,HT
-YP=D:\YP
-AA=D:\AA
-BB=D:\BB
-HT=D:\HT
-OTHER=D:\OTHER
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/P.fr3 b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/P.fr3
deleted file mode 100644
index b844053..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/P.fr3
+++ /dev/null
@@ -1,164 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/ProjectGroup1.bpg b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/ProjectGroup1.bpg
deleted file mode 100644
index 7c050f6..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/ProjectGroup1.bpg
+++ /dev/null
@@ -1,23 +0,0 @@
-#------------------------------------------------------------------------------
-VERSION = BWS.01
-#------------------------------------------------------------------------------
-!ifndef ROOT
-ROOT = $(MAKEDIR)\..
-!endif
-#------------------------------------------------------------------------------
-MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
-DCC = $(ROOT)\bin\dcc32.exe $**
-BRCC = $(ROOT)\bin\brcc32.exe $**
-#------------------------------------------------------------------------------
-PROJECTS = testDll.exe ProductPrice.dll
-#------------------------------------------------------------------------------
-default: $(PROJECTS)
-#------------------------------------------------------------------------------
-
-testDll.exe: testDll.dpr
- $(DCC)
-
-ProductPrice.dll: ProductPrice.dpr
- $(DCC)
-
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/SYSTEMSET.ini b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/SYSTEMSET.ini
deleted file mode 100644
index 3faae6b..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/SYSTEMSET.ini
+++ /dev/null
@@ -1,3 +0,0 @@
-[SERVER]
-ַ=172.168.1.246
-=֯
\ No newline at end of file
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BanCpRkOutPut.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BanCpRkOutPut.dfm
deleted file mode 100644
index dfb9aa9..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BanCpRkOutPut.dfm
+++ /dev/null
@@ -1,348 +0,0 @@
-object frmBanCpRkOutPut: TfrmBanCpRkOutPut
- Left = 201
- Top = 135
- Width = 1195
- Height = 503
- Align = alClient
- Caption = #25104#21697#20986#24211
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 107
- TextHeight = 13
- object cxGrid2: TcxGrid
- Left = 0
- Top = 33
- Width = 1179
- Height = 430
- Align = alClient
- TabOrder = 0
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource3
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skCount
- end
- item
- Kind = skSum
- Column = v2Column5
- end
- item
- Kind = skSum
- Column = v2Column6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_TradeManage.SHuangSe
- Styles.IncSearch = DataLink_TradeManage.SHuangSe
- Styles.Selection = DataLink_TradeManage.SHuangSe
- Styles.Header = DataLink_TradeManage.Default
- object v1Column1: TcxGridDBColumn
- Caption = #35746#21333#21495
- DataBinding.FieldName = 'orderNo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 67
- end
- object v1Column2: TcxGridDBColumn
- Caption = #20986#26588#26085#26399
- DataBinding.FieldName = 'CRTime'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column4: TcxGridDBColumn
- Caption = #20986#24211#31867#22411
- DataBinding.FieldName = 'CRType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.DropDownListStyle = lsFixedList
- Properties.Items.Strings = (
- #27491#24120#20986#24211
- #22238#20462#20986#24211)
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object v2Column1: TcxGridDBColumn
- Caption = #35746#21333#21697#21517
- DataBinding.FieldName = 'MPRTCodeName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 64
- end
- object v1Column21: TcxGridDBColumn
- Caption = #20844#21496#21697#21517
- DataBinding.FieldName = 'ComPRTName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 59
- end
- object v1Column10: TcxGridDBColumn
- Caption = #25253#20851#21697#21517
- DataBinding.FieldName = 'BGName'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object v1Column5: TcxGridDBColumn
- Caption = #20986#26588#21253'/'#20214#25968#37327
- DataBinding.FieldName = 'BQty'
- HeaderAlignmentHorz = taCenter
- Width = 93
- end
- object v1Column6: TcxGridDBColumn
- Caption = #20986#26588#21305#25968#37327
- DataBinding.FieldName = 'JQty'
- HeaderAlignmentHorz = taCenter
- Width = 73
- end
- object v2Column6: TcxGridDBColumn
- Caption = #20986#26588#25968#37327
- DataBinding.FieldName = 'Qty'
- HeaderAlignmentHorz = taCenter
- Width = 65
- end
- object v1Column7: TcxGridDBColumn
- Caption = #21333#20301
- DataBinding.FieldName = 'QtyUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.DropDownListStyle = lsFixedList
- Properties.Items.Strings = (
- 'M'
- 'KG'
- 'Y')
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 35
- end
- object v1Column22: TcxGridDBColumn
- Caption = #20986#26588#36741#21161#25968#37327
- DataBinding.FieldName = 'FZQty'
- HeaderAlignmentHorz = taCenter
- Width = 95
- end
- object v1Column23: TcxGridDBColumn
- Caption = #20986#26588#36741#21161#21333#20301
- DataBinding.FieldName = 'FZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'M'
- 'Y')
- HeaderAlignmentHorz = taCenter
- Width = 89
- end
- object v2Column5: TcxGridDBColumn
- Caption = #20986#26588#27611#37325
- DataBinding.FieldName = 'KGQty'
- HeaderAlignmentHorz = taCenter
- Width = 58
- end
- object v1Column11: TcxGridDBColumn
- Caption = #20986#26588#20928#37325
- DataBinding.FieldName = 'KGQtyJ'
- FooterAlignmentHorz = taCenter
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object v1Column12: TcxGridDBColumn
- Caption = #25253#20851#25968#37327
- DataBinding.FieldName = 'BGQty'
- Width = 61
- end
- object v1Column20: TcxGridDBColumn
- Caption = #25253#20851#25968#37327#21333#20301
- DataBinding.FieldName = 'BGQtyUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'M'
- 'Y')
- Width = 85
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25253#20851#27611#37325
- DataBinding.FieldName = 'BGMZ'
- Width = 59
- end
- object v1Column14: TcxGridDBColumn
- Caption = #25253#20851#20928#37325
- DataBinding.FieldName = 'BGJZ'
- Width = 59
- end
- object v1Column15: TcxGridDBColumn
- Caption = #32440#31665#35268#26684
- DataBinding.FieldName = 'BoxSpec'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column15PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object v2Column3: TcxGridDBColumn
- Caption = #39068#33394
- DataBinding.FieldName = 'PRTColor'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 42
- end
- object v1Column19: TcxGridDBColumn
- Caption = #33394#21495
- DataBinding.FieldName = 'SOrddefstr1'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 55
- end
- object v1Column3: TcxGridDBColumn
- Caption = #33457#22411#33457#21495
- DataBinding.FieldName = 'PRTHX'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 57
- end
- object v1Column8: TcxGridDBColumn
- Caption = #38376#24133
- DataBinding.FieldName = 'MPRTMF'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 38
- end
- object v1Column9: TcxGridDBColumn
- Caption = #20811#37325
- DataBinding.FieldName = 'MPRTKZ'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 36
- end
- object v1Column16: TcxGridDBColumn
- Caption = #21152#24037#21333#20301
- DataBinding.FieldName = 'JGFactory'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column16PropertiesButtonClick
- Width = 60
- end
- object v1Column17: TcxGridDBColumn
- Caption = #22791#27880'('#26588')'
- DataBinding.FieldName = 'NoteG'
- Width = 66
- end
- object v1Column18: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- Width = 68
- end
- end
- object cxGrid2Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1179
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_TradeManage.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object TBAdd: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 103
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 107
- OnClick = TBDelClick
- end
- object TBSave: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 14
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 55
- OnClick = TBCloseClick
- end
- end
- object DataSource3: TDataSource
- DataSet = CDS_Sub
- Left = 512
- Top = 136
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 480
- Top = 136
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- Parameters = <>
- Left = 344
- Top = 136
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 368
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 408
- Top = 136
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 440
- Top = 136
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BanCpRkOutPut.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BanCpRkOutPut.pas
deleted file mode 100644
index 7081cdb..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BanCpRkOutPut.pas
+++ /dev/null
@@ -1,605 +0,0 @@
-unit U_BanCpRkOutPut;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxCalendar, cxDropDownEdit,
- ComCtrls, ToolWin, cxGridLevel, cxGridCustomTableView, cxGridTableView,
- cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient, cxButtonEdit;
-
-type
- TfrmBanCpRkOutPut = class(TForm)
- cxGrid2: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v2Column3: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v2Column5: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- cxGrid2Level1: TcxGridLevel;
- ToolBar1: TToolBar;
- TBAdd: TToolButton;
- TBDel: TToolButton;
- TBSave: TToolButton;
- TBClose: TToolButton;
- v1Column4: TcxGridDBColumn;
- DataSource3: TDataSource;
- CDS_Sub: TClientDataSet;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- cxGridPopupMenu2: TcxGridPopupMenu;
- v1Column6: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column15: TcxGridDBColumn;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure v1Column15PropertiesButtonClick(Sender: TObject;
- AButtonIndex: Integer);
- procedure v1Column16PropertiesButtonClick(Sender: TObject;
- AButtonIndex: Integer);
- private
- { Private declarations }
- function SaveCKData():Boolean;
- function YSData(Order_Main10:TClientDataSet):Boolean;
- public
- { Public declarations }
- FBCId:String;
- end;
-
-var
- frmBanCpRkOutPut: TfrmBanCpRkOutPut;
-
-implementation
-uses
- U_OrderSel,U_DataLink,U_Fun,U_ZDYHelp;
-
-{$R *.dfm}
-function TfrmBanCpRkOutPut.YSData(Order_Main10:TClientDataSet):Boolean;
-var
- CRID,YFID,Price,PriceUnit,OrderUnit,FComTaiTou,khName:String;
- flag:integer;
-// Price:double;
-begin
- Result:=False;
- with Order_Main10 do
- begin
- begin
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- sql.Add('select X1.customerNoName,X3.OrderUnit,X3.PRTPrice,X2.OrdconPrcUnit from JYOrder_main X1,JYOrdercon_main X2,JYOrdercon_Sub X3 Where X1.consubID=X3.subID and X2.mainID=X3.mainID and X1.Mainid='''+Trim(Order_Main10.fieldbyname('MainId').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- application.MessageBox('ûкָͬʾûжλ,ܳ','ʾ');
- exit;
- end;
- OrderUnit:=Trim(ADOQueryTemp.fieldbyname('OrderUnit').AsString);
- khName:=Trim(ADOQueryTemp.fieldbyname('customerNoName').AsString);
- Price:=Trim(ADOQueryTemp.fieldbyname('PRTPrice').AsString);
- PriceUnit:=Trim(ADOQueryTemp.fieldbyname('OrdconPrcUnit').AsString);
- flag:=0;
- IF OrderUnit= trim(Order_Main10.FieldByName('QtyUnit').AsString) then
- begin
- flag:=1;
- end
- else
- if OrderUnit= trim(Order_Main10.FieldByName('FZUnit').AsString) then
- begin
- flag:=2;
- end
- else IF trim(Order_Main10.FieldByName('FZUnit').AsString)='Kg' then
- begin
- flag:=3;
- end;
- IF Flag=0 then
- begin
- application.MessageBox('ⵥλͺͬλһ£ܳ⣡','ʾϢ',0);
- exit;
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete from YF_Money_CR where YfID='+quotedstr(trim(Order_Main10.fieldbyname('fYFID').AsString)));
- execsql;
- end;
-
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- sql.Add('select * from YF_Money_KC where FactoryName='''+Trim(khName)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- CRID:=ADOQueryTemp.fieldbyname('CRID').AsString;
- end else
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update YF_Money_CRID set CRID=CRID+1');
- sql.Add('select * from YF_Money_CRID ');
- Open;
- end;
- CRID:=ADOQueryCmd.fieldbyname('CRID').AsString;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('select * from YF_Money_KC where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('CRID').Value:=StrToInt(CRID);
- FieldByName('FactoryName').Value:=Trim(khName);
- FieldByName('ZdyStr1').Value:='Ӧ';
- Post;
- end;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from YF_Money_CR where FactoryName='''+Trim(khName)+''' ');
- sql.Add('and YFTypeId='''+Trim(Order_Main10.fieldbyname('Mainid').AsString)+''' ');
- sql.Add('and CRTime='''+formatdateTime('yyyy-MM-dd',Order_Main10.fieldbyname('CRTime').AsDateTime)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- if GetLSNo(ADOQueryCmd,YFID,'CS','YF_Money_CR',3,1)=False then
- begin
- Application.MessageBox('ȡƷӦʧ!','ʾ',0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from YF_Money_CR where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('YFID').Value:=Trim(YFID);
- FieldByName('YFTypeId').Value:=Trim(Order_Main10.fieldbyname('MainId').AsString);
- FieldByName('CRID').Value:=StrToInt(CRID);
- FieldByName('Filler').Value:=Trim(DName);
- FieldByName('CRType').Value:='ӦտǼ';
- FieldByName('CRFlag').Value:='Ӧ';
- FieldByName('QtyFlag').Value:=1;
- FieldByName('FactoryName').Value:=Trim(KHName);
- FieldByName('CRTime').Value:=Trim(FormatDateTime('yyyy-MM-dd',Order_Main10.fieldbyname('CRTime').AsDateTime));
- FieldByName('YFType').Value:='Զ';
- FieldByName('Price').Value:=Price;
- FieldByName('HuiLv').Value:=1;
-
- FieldByName('BZType').Value:=Trim(PriceUnit);
- FieldByName('QtyUnit').Value:=Trim(OrderUnit);
- FieldByName('ComTaiTou').Value:=Trim(KHName);
- FieldByName('YFName').Value:='۽';
- FieldByName('MainId').Value:=Trim(Order_Main10.fieldbyname('Mainid').AsString);
- Post;
- end;
- end
- else
- begin
- YFID:=Trim(ADOQueryTemp.fieldbyname('YFID').AsString);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- if flag=1 then
- begin
- sql.Add('update YF_Money_CR Set Qty=(select isnull(Sum(A.Qty),0) from CK_BanCP_CR A ');
- end
- else IF flag=2 then
- begin
- sql.Add('update YF_Money_CR Set Qty=(select isnull(Sum(A.FZQty),0) from CK_BanCP_CR A ');
- end
- else if flag=3 then
- begin
- sql.Add('update YF_Money_CR Set Qty=(select isnull(Sum(A.KGQtyJ),0) from CK_BanCP_CR A ');
- end;
- SQL.Add(' where A.MainId=YF_Money_CR.YFTypeId and A.CRTime=YF_Money_CR.CRTime and A.MJID=A.BCID and A.CRType='''' ');
- SQL.Add(' )');
- sql.Add(',PS=(select isnull(sum(JQty),0) from CK_BanCP_CR A ');
- SQL.Add(' where A.MainId=YF_Money_CR.YFTypeId and A.CRTime=YF_Money_CR.CRTime and A.MJID=A.BCID and A.CRType='''' ');
- SQL.Add(' )');
- sql.Add(' where YFTypeId='''+Trim(Order_Main10.fieldbyname('Mainid').AsString)+'''');
- ExecSQL;
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update YF_Money_CR Set Money=Price*Qty,BBMoney=Price*Qty*HuiLv');
- sql.Add(' where YFID='''+Trim(YFID)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update YF_Money_KC Set KCMoney=(select isnull(Sum(Money*QtyFlag),0) from YF_Money_CR A where A.CRID=YF_Money_KC.CRID)');
- sql.Add(',KCBBMoney=(select isnull(Sum(BBMoney*QtyFlag),0) from YF_Money_CR A where A.CRID=YF_Money_KC.CRID)');
- sql.Add(' where CRID='+CRID);
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update CK_BanCp_CR Set FYFID='''+Trim(YFID)+''' ');
- sql.Add(' where BCID='''+Trim(Order_Main10.fieldbyname('BCID').AsString)+'''');
- ExecSQL;
- end;
- end;
- end;
- Result:=True;
-end;
-
-procedure TfrmBanCpRkOutPut.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBanCpRkOutPut.TBAddClick(Sender: TObject);
-begin
- try
- frmOrderSel:=TfrmOrderSel.Create(Application);
- with frmOrderSel do
- begin
- if ShowModal=1 then
- begin
- CDS_OrderSel.DisableControls;
- with CDS_OrderSel do
- begin
- First;
- while not Eof do
- begin
- if FieldByName('SSel').Value=True then
- begin
- with Self.CDS_Sub do
- begin
- Append;
- FieldByName('MainId').Value:=Trim(CDS_OrderSel.fieldbyname('MainId').AsString);
- FieldByName('SubId').Value:=Trim(CDS_OrderSel.fieldbyname('SubId').AsString);
- FieldByName('OrderNo').Value:=Trim(CDS_OrderSel.fieldbyname('OrderNo').AsString);
- FieldByName('MPRTCodeName').Value:=Trim(CDS_OrderSel.fieldbyname('MPRTCodeName').AsString);
- FieldByName('PRTColor').Value:=Trim(CDS_OrderSel.fieldbyname('PRTColor').AsString);
- FieldByName('PRTHX').Value:=Trim(CDS_OrderSel.fieldbyname('PRTHX').AsString);
- FieldByName('MPRTMF').Value:=Trim(CDS_OrderSel.fieldbyname('MPRTMF').AsString);
- FieldByName('MPRTKZ').Value:=Trim(CDS_OrderSel.fieldbyname('MPRTKZ').AsString);
- FieldByName('Qty').Value:=CDS_OrderSel.fieldbyname('KCQty').Value;
- FieldByName('KgQty').Value:=CDS_OrderSel.fieldbyname('KCKgQty').Value;
- FieldByName('JQty').Value:=CDS_OrderSel.fieldbyname('KCJQty').Value;
- FieldByName('KgQtyJ').Value:=CDS_OrderSel.fieldbyname('KCKgQtyJ').Value;
- FieldByName('BQty').Value:=CDS_OrderSel.fieldbyname('KCBQty').Value;
- FieldByName('QtyUnit').Value:=CDS_OrderSel.fieldbyname('KCQtyUnit').Value;
- FieldByName('MJID').Value:=CDS_OrderSel.fieldbyname('CRID').Value;
- FieldByName('APID').Value:=CDS_OrderSel.fieldbyname('CRID').Value;
- FieldByName('CRID').Value:=CDS_OrderSel.fieldbyname('CRID').Value;
- FieldByName('QtyUnit').Value:=CDS_OrderSel.fieldbyname('KCQtyUnit').Value;
- FieldByName('ComPRTName').Value:=CDS_OrderSel.fieldbyname('ComPRTName').Value;
- FieldByName('CRType').Value:='';
- FieldByName('CRTime').Value:=FormatDateTime('yyyy-MM-dd',Now);
- Post;
- end;
- end;
- Next;
- end;
- end;
- CDS_OrderSel.EnableControls;
- end;
- end;
- finally
- frmOrderSel.Free;
- end;
-end;
-
-function TfrmBanCpRkOutPut.SaveCKData():Boolean;
-var
- FCRID,Maxno:string;
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not eof do
- begin
- FCRID:=CDS_Sub.fieldbyname('CRID').AsString;
- if Trim(CDS_Sub.fieldbyname('BCID').AsString)='' then
- begin
- if GetLSNo(ADOQueryCmd,Maxno,'BC','CK_BanCP_CR',3,1)=False then
- begin
- Result:=False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!','ʾ',0);
- Exit;
- end;
- end else
- begin
- Maxno:=Trim(CDS_Sub.fieldbyname('BCID').AsString);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from CK_BanCP_CR where BCID='''+Trim(Maxno)+'''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(CDS_Sub.fieldbyname('BCID').AsString)='' then
- begin
- Append;
- end else
- begin
- Edit;
- end;
- FieldByName('BCID').Value:=Trim(Maxno);
- FieldByName('MJID').Value:=Trim(Maxno);
- FieldByName('APID').Value:=Trim(Maxno);
- FieldByName('MainID').Value:=Trim(CDS_Sub.fieldbyname('MainID').AsString);
- FieldByName('SubID').Value:=Trim(CDS_Sub.fieldbyname('SubID').AsString);
- FieldByName('CRFlag').Value:='';
- FieldByName('CRType').Value:=Trim(CDS_Sub.fieldbyname('CRType').AsString);
- FieldByName('CRID').Value:=FCRID;
- FieldByName('CRTime').Value:=CDS_Sub.fieldbyname('CRTime').AsString;
- FieldByName('QtyUnit').Value:=CDS_Sub.fieldbyname('QtyUnit').AsString;
- FieldByName('ComPRTName').Value:=CDS_Sub.fieldbyname('ComPRTName').AsString;
- FieldByName('BGQtyUnit').Value:=CDS_Sub.fieldbyname('BGQtyUnit').AsString;
- FieldByName('FZQty').Value:=CDS_Sub.fieldbyname('FZQty').AsFloat;
- FieldByName('FZUnit').Value:=CDS_Sub.fieldbyname('FZUnit').AsString;
- FieldByName('BGName').Value:=CDS_Sub.fieldbyname('BGName').AsString;
- FieldByName('BoxSpec').Value:=CDS_Sub.fieldbyname('BoxSpec').AsString;
- FieldByName('JGFactory').Value:=CDS_Sub.fieldbyname('JGFactory').AsString;
- FieldByName('Note').Value:=CDS_Sub.fieldbyname('Note').AsString;
- FieldByName('NoteG').Value:=CDS_Sub.fieldbyname('NoteG').AsString;
- //FieldByName('GangNo').Value:=CDS_Sub.fieldbyname('GangNo').AsString;
- FieldByName('QtyFlag').Value:=-1;
- if Trim(CDS_Sub.fieldbyname('BGQty').AsString)<>'' then
- begin
- FieldByName('BGQty').Value:=CDS_Sub.fieldbyname('BGQty').Value;
- end else
- begin
- FieldByName('BGQty').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('BGJZ').AsString)<>'' then
- begin
- FieldByName('BGJZ').Value:=CDS_Sub.fieldbyname('BGJZ').Value;
- end else
- begin
- FieldByName('BGJZ').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('BGMZ').AsString)<>'' then
- begin
- FieldByName('BGMZ').Value:=CDS_Sub.fieldbyname('BGMZ').Value;
- end else
- begin
- FieldByName('BGMZ').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('JQty').AsString)<>'' then
- begin
- FieldByName('JQty').Value:=CDS_Sub.fieldbyname('JQty').Value;
- end else
- begin
- FieldByName('JQty').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('KGQty').AsString)<>'' then
- begin
- FieldByName('KGQty').Value:=CDS_Sub.fieldbyname('KGQty').Value;
- end else
- begin
- FieldByName('KGQty').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('BQty').AsString)<>'' then
- begin
- FieldByName('BQty').Value:=CDS_Sub.fieldbyname('BQty').Value;
- end else
- begin
- FieldByName('BQty').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('KGQtyJ').AsString)<>'' then
- begin
- FieldByName('KGQtyJ').Value:=CDS_Sub.fieldbyname('KGQtyJ').Value;
- end else
- begin
- FieldByName('KGQtyJ').Value:=0;
- end;
- if Trim(CDS_Sub.fieldbyname('Qty').AsString)<>'' then
- begin
- FieldByName('Qty').Value:=CDS_Sub.fieldbyname('Qty').Value;
- end else
- begin
- FieldByName('Qty').Value:=0;
- end;
-
- if Trim(CDS_Sub.fieldbyname('BCID').AsString)='' then
- FieldByName('Filler').Value:=Trim(DName)
- else
- begin
- FieldByName('Editer').Value:=Trim(DName);
- FieldByName('EditTime').Value:=SGetServerDate(ADOQueryTemp);
- end;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update CK_BanCP_KC Set KCQty=(select sum(Qty*QtyFlag) from CK_BanCP_CR A where A.CRID=CK_BanCP_KC.CRID)');
- sql.Add(',KCKgQty=(select sum(KgQty*QtyFlag) from CK_BanCP_CR A where A.CRID=CK_BanCP_KC.CRID)');
- sql.Add(',KCJQty=(select sum(JQty*QtyFlag) from CK_BanCP_CR A where A.CRID=CK_BanCP_KC.CRID)');
- sql.Add(',KCKgQtyJ=(select sum(KgQtyJ*QtyFlag) from CK_BanCP_CR A where A.CRID=CK_BanCP_KC.CRID)');
- sql.Add(',KCBQty=(select sum(BQty*QtyFlag) from CK_BanCP_CR A where A.CRID=CK_BanCP_KC.CRID)');
- sql.Add(' where CRID='+FCRID);
- ExecSQL;
- end;
- CDS_Sub.Edit;
- CDS_Sub.FieldByName('BCID').Value:=trim(maxNO);
- CDS_Sub.post;
- IF not YSData(CDS_Sub) then
- begin
- application.MessageBox('Ӧտʧ','ʾϢ',0);
- ADOQueryCmd.Connection.RollbackTrans;
- CDS_Sub.EnableControls;
- exit;
- end;
- Next;
- end;
- end;
- CDS_Sub.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- Result:=False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!','ʾ',0);
- end;
-end;
-
-procedure TfrmBanCpRkOutPut.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('ƷS',Tv1,'Ʒֿ');
- Close;
-end;
-
-procedure TfrmBanCpRkOutPut.FormShow(Sender: TObject);
-begin
- ReadCxGrid('ƷS',Tv1,'Ʒֿ');
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.OrderNo,B.MPRTCodeName,B.MPRTMF,B.MPRTKZ,C.PRTColor,C.SOrddefstr1,C.PRTHX from CK_BanCp_CR A ');
- sql.Add(' inner join JYOrder_Main B on A.MainId=B.MainId');
- sql.Add(' inner join JYOrder_Sub C on A.SubId=C.SubId');
- sql.Add(' where A.BCID='''+Trim(FBCId)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Sub);
- SInitCDSData20(ADOQueryTemp,CDS_Sub);
-end;
-
-procedure TfrmBanCpRkOutPut.TBDelClick(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then Exit;
- CDS_Sub.Delete;
-end;
-
-procedure TfrmBanCpRkOutPut.TBSaveClick(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then Exit;
- if CDS_Sub.Locate('CRTime',null,[])=True then
- begin
- Application.MessageBox('ʱ䲻Ϊ!','ʾ',0);
- Exit;
- end;
- if CDS_Sub.Locate('CRType',null,[])=True then
- begin
- Application.MessageBox('ͲΪ!','ʾ',0);
- Exit;
- end;
- {if CDS_Sub.Locate('QtyUnit',null,[])=True then
- begin
- Application.MessageBox('λΪ!','ʾ',0);
- Exit;
- end; }
- if SaveCKData() then
- begin
- Application.MessageBox('ɹ!','ʾ',0);
- ModalResult:=1;
- Exit;
- end;
-end;
-
-procedure TfrmBanCpRkOutPut.v1Column15PropertiesButtonClick(
- Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp:=TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag:='BoxSpec';
- flagname:='ֽ';
- if ShowModal=1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('BoxSpec').Value:=Trim(ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBanCpRkOutPut.v1Column16PropertiesButtonClick(
- Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp:=TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag:='JGFactory';
- flagname:='ӹλ';
- if ShowModal=1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('JGFactory').Value:=Trim(ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanCRKCX.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanCRKCX.dfm
deleted file mode 100644
index dd93f3b..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanCRKCX.dfm
+++ /dev/null
@@ -1,429 +0,0 @@
-object frmBaoGuanCRKCX: TfrmBaoGuanCRKCX
- Left = 189
- Top = 135
- Width = 1348
- Height = 635
- Caption = #25253#20851#20986#20837#24211#26597#35810
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 107
- TextHeight = 13
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1332
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object TPrint: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #25171#21360
- ImageIndex = 4
- OnClick = TPrintClick
- end
- object ComboBox1: TComboBox
- Left = 189
- Top = 5
- Width = 145
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 0
- Items.Strings = (
- #20837#24211#21333
- #20986#24211#21333)
- end
- object TBExport: TToolButton
- Left = 334
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 397
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1332
- Height = 40
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 30
- Top = 13
- Width = 52
- Height = 13
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 182
- Top = 13
- Width = 13
- Height = 13
- Caption = #33267
- end
- object Label6: TLabel
- Left = 307
- Top = 13
- Width = 72
- Height = 13
- Caption = #20379#24212#21830'/'#23458#25143
- end
- object Label8: TLabel
- Left = 533
- Top = 13
- Width = 39
- Height = 13
- Caption = #35746#21333#21495
- end
- object Label3: TLabel
- Left = 724
- Top = 13
- Width = 52
- Height = 13
- Caption = #21830#21697#21517#31216
- end
- object Label4: TLabel
- Left = 921
- Top = 13
- Width = 26
- Height = 13
- Caption = #35268#26684
- end
- object BegDate: TDateTimePicker
- Left = 83
- Top = 9
- Width = 95
- Height = 21
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 196
- Top = 9
- Width = 96
- Height = 21
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object C3BGName: TEdit
- Tag = 2
- Left = 775
- Top = 9
- Width = 140
- Height = 21
- TabOrder = 2
- OnChange = A5ConNOChange
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 573
- Top = 9
- Width = 140
- Height = 21
- CharCase = ecUpperCase
- TabOrder = 3
- OnChange = A5ConNOChange
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 381
- Top = 9
- Width = 140
- Height = 21
- TabOrder = 4
- OnChange = A1ChuKouShangChange
- end
- object YSChenFen: TEdit
- Tag = 2
- Left = 948
- Top = 9
- Width = 140
- Height = 21
- TabOrder = 5
- OnChange = A5ConNOChange
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 73
- Width = 1332
- Height = 522
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1C4BGQty
- end
- item
- Kind = skSum
- Column = v1C4BGQty
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skCount
- Column = v1A1ChuKouShang
- end
- item
- Kind = skSum
- Column = v1C4BGQty
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Header = DataLink_DDMD.Default
- object v1A7FPDate: TcxGridDBColumn
- Caption = #26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1A1ChuKouShang: TcxGridDBColumn
- Caption = #20379#24212#21830'/'#23458#25143
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1A5ConNO: TcxGridDBColumn
- Caption = #35746#21333#21495
- DataBinding.FieldName = 'A5ConNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 84
- end
- object v1C3BGName: TcxGridDBColumn
- Caption = #21830#21697#21517#31216
- DataBinding.FieldName = 'C3BGName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 80
- end
- object v1YSChenFen: TcxGridDBColumn
- Caption = #35268#26684
- DataBinding.FieldName = 'YSChenFen'
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object v1C5BGUnit: TcxGridDBColumn
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object v1C4BGQty: TcxGridDBColumn
- Caption = #20837#24211#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object v1Column1: TcxGridDBColumn
- Caption = #20986#24211#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1JC: TcxGridDBColumn
- Caption = #32467#23384
- DataBinding.FieldName = 'JC'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column8: TcxGridDBColumn
- Caption = #22791#27880
- HeaderAlignmentHorz = taCenter
- Width = 114
- end
- end
- object cxGrid2Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel2: TPanel
- Left = 571
- Top = 278
- Width = 235
- Height = 44
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -13
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- Visible = False
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 1000
- Top = 202
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 960
- Top = 202
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1035
- Top = 202
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBMain
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 360
- Top = 232
- ReportData = {}
- end
- object RMDBMain: TRMDBDataSet
- Visible = True
- DataSet = CDS_Main
- Left = 424
- Top = 232
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 392
- Top = 232
- end
- object CDS_HZ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 488
- Top = 232
- end
- object CDS_PRT: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 456
- Top = 232
- end
- object PopupMenu1: TPopupMenu
- Left = 328
- Top = 232
- object N1: TMenuItem
- Caption = #20840#36873
- end
- object N2: TMenuItem
- Caption = #20840#24323
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanCRKCX.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanCRKCX.pas
deleted file mode 100644
index f2e54bd..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanCRKCX.pas
+++ /dev/null
@@ -1,245 +0,0 @@
-unit U_BaoGuanCRKCX;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxPC;
-
-type
- TfrmBaoGuanCRKCX = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- cxGrid2: TcxGrid;
- Tv1: TcxGridDBTableView;
- cxGrid2Level1: TcxGridLevel;
- RM1: TRMGridReport;
- RMDBMain: TRMDBDataSet;
- RMXLSExport1: TRMXLSExport;
- CDS_HZ: TClientDataSet;
- CDS_PRT: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- Panel2: TPanel;
- Label6: TLabel;
- Label8: TLabel;
- Label3: TLabel;
- C3BGName: TEdit;
- A5ConNO: TEdit;
- A1ChuKouShang: TEdit;
- v1A7FPDate: TcxGridDBColumn;
- v1A1ChuKouShang: TcxGridDBColumn;
- v1A5ConNO: TcxGridDBColumn;
- v1C3BGName: TcxGridDBColumn;
- v1YSChenFen: TcxGridDBColumn;
- v1C5BGUnit: TcxGridDBColumn;
- v1C4BGQty: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- Label4: TLabel;
- YSChenFen: TEdit;
- v1Column1: TcxGridDBColumn;
- v1JC: TcxGridDBColumn;
- TPrint: TToolButton;
- ComboBox1: TComboBox;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure v2Column1CompareRowValuesForCellMerging(
- Sender: TcxGridColumn; ARow1: TcxGridDataRow;
- AProperties1: TcxCustomEditProperties; const AValue1: Variant;
- ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties;
- const AValue2: Variant; var AAreEqual: Boolean);
- procedure TPrintClick(Sender: TObject);
- procedure A1ChuKouShangChange(Sender: TObject);
- procedure A5ConNOChange(Sender: TObject);
- private
- procedure InitGrid();
- procedure GetColor(color:TColor);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanCRKCX: TfrmBaoGuanCRKCX;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanCRKCX.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanCRKCX:=nil;
-end;
-
-procedure TfrmBaoGuanCRKCX.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanCRKCX.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
-end;
-
-procedure TfrmBaoGuanCRKCX.InitGrid();
-var
- fsj:string;
-begin
- Panel2.Visible:=True;
- Panel2.Refresh;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,JC=cast(0 as decimal(18,2)) from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A7FPDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and A7FPDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally;
- ADOQueryMain.EnableControls;
- Panel2.Visible:=False;
- end;
- Panel2.Visible:=False;
-end;
-
-procedure TfrmBaoGuanCRKCX.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanCRKCX.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanCRKCX.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('۱',Tv1,'');
- Close;
-end;
-
-procedure TfrmBaoGuanCRKCX.FormShow(Sender: TObject);
-begin
- ReadCxGrid('۱',Tv1,'');
- //InitGrid();
-end;
-
-procedure TfrmBaoGuanCRKCX.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('۱',cxGrid2);
-end;
-
-procedure TfrmBaoGuanCRKCX.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanCRKCX.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmBaoGuanCRKCX.v2Column1CompareRowValuesForCellMerging(
- Sender: TcxGridColumn; ARow1: TcxGridDataRow;
- AProperties1: TcxCustomEditProperties; const AValue1: Variant;
- ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties;
- const AValue2: Variant; var AAreEqual: Boolean);
-
-var
- colIdx0:integer;
-begin
- colIdx0:= tv1.GetColumnByFieldName('A4FPNO').Index;
- if ARow1.Values[colIdx0] = ARow2.Values[colIdx0] then
- AAreEqual := True
- else
- AAreEqual := False;
-end;
-
-
-procedure TfrmBaoGuanCRKCX.GetColor(color:TColor);
-begin
-
-end;
-
-procedure TfrmBaoGuanCRKCX.TPrintClick(Sender: TObject);
-var
- fPrintFile,fsj:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- if ComboBox1.Text='ⵥ' then
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ⵥ.rmf';
- if ComboBox1.Text='ⵥ' then
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\سⵥ.rmf';
- if FileExists(fPrintFile) then
- begin
- //RMVariables['TaiTou']:=cxTabControl1.Tabs[cxTabControl1.TabIndex].Caption;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ⵥ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanCRKCX.A1ChuKouShangChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanCRKCX.A5ConNOChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm
deleted file mode 100644
index ee63964..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanInPut.dfm
+++ /dev/null
@@ -1,1089 +0,0 @@
-object frmBaoGuanInPut: TfrmBaoGuanInPut
- Left = 186
- Top = 55
- Width = 1326
- Height = 708
- Align = alClient
- Caption = #25253#20851#36164#26009#24405#20837
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1318
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBSave: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 15
- OnClick = TBSaveClick
- end
- object ToolButton4: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #23457#26680
- ImageIndex = 22
- Visible = False
- OnClick = ToolButton4Click
- end
- object TBClose: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 370
- Width = 1318
- Height = 307
- Align = alClient
- TabOrder = 3
- object Tv1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource3
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column3
- end
- item
- Kind = skSum
- Column = Tv1Column7
- end
- item
- Kind = skSum
- Column = v1Column23
- end
- item
- Kind = skSum
- Column = Tv1Column8
- end
- item
- Kind = skSum
- Column = v1Column10
- end
- item
- Kind = skSum
- Column = Tv1Column2
- end
- item
- Kind = skSum
- Column = v1Column11
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column21: TcxGridDBColumn
- Tag = 2
- Caption = #24207#21495
- DataBinding.FieldName = 'XHInt'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 39
- end
- object v1Column13: TcxGridDBColumn
- Tag = 2
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'orderno'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #26797#32455
- #38024#32455
- #32463#32534
- #21050#32483
- #38024#32455#32463#32534)
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 71
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #20013#25991#21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- Properties.OnButtonClick = v1Column5PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object v1Column20: TcxGridDBColumn
- Tag = 2
- Caption = #33521#25991#21697#21517
- DataBinding.FieldName = 'C3BGNameEng'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column14PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 109
- end
- object v1YSKeZhong: TcxGridDBColumn
- Tag = 2
- Caption = #20811#37325
- DataBinding.FieldName = 'YSKeZhong'
- HeaderAlignmentHorz = taCenter
- Width = 73
- end
- object v1Column15: TcxGridDBColumn
- Tag = 2
- Caption = #38376#24133
- DataBinding.FieldName = 'YSFuKuan'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column15PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 65
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 77
- end
- object VCC6BGPrice: TcxGridDBColumn
- Tag = 2
- Caption = #25253#20851#21333#20215
- DataBinding.FieldName = 'C6BGPrice'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 70
- end
- object VCKHPrice: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143#21333#20215
- DataBinding.FieldName = 'KHPrice'
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object Tv1Column7: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'M'
- 'Y'
- 'KG'
- #20010
- #21253
- #26465)
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 43
- end
- object v1Column23: TcxGridDBColumn
- Tag = 2
- Caption = #26679#21697#36153
- DataBinding.FieldName = 'HDFee'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column10: TcxGridDBColumn
- Tag = 2
- Caption = 'HS'#32534#30721
- DataBinding.FieldName = 'hscode'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object Tv1Column8: TcxGridDBColumn
- Tag = 2
- Caption = #20214#25968
- DataBinding.FieldName = 'JS'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object Tv1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #20214#25968#21333#20301
- DataBinding.FieldName = 'JSUNIT'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = Tv1Column9PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object Tv1Column11: TcxGridDBColumn
- Tag = 2
- Caption = #21830#26816
- DataBinding.FieldName = 'SJ'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #26159
- #21542)
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object Tv1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'ZZFF'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = Tv1Column12PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object Tv1Column13: TcxGridDBColumn
- Tag = 2
- Caption = #24037#33402#31867#22411
- DataBinding.FieldName = 'GYLX'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = Tv1Column13PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object Tv1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #32441#36335
- DataBinding.FieldName = 'WL'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = Tv1Column14PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object Tv1Column15: TcxGridDBColumn
- Tag = 2
- Caption = #20323#37329#24773#20917
- DataBinding.FieldName = 'YJQK'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object v1Column16: TcxGridDBColumn
- Tag = 2
- Caption = #24320#31080#20215
- DataBinding.FieldName = 'KPPRICE'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 74
- end
- object Tv1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #25253#20851#21697#21517
- DataBinding.FieldName = 'BGCODENAME'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object v1Column10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 60
- end
- object v1Column11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 65
- end
- object Tv1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #20307#31215
- DataBinding.FieldName = 'BGTJ'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object v1Column17: TcxGridDBColumn
- Tag = 2
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'ZDDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 102
- end
- object Tv1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #22791#27880
- DataBinding.FieldName = 'MXNOTE'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object Tv1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #24037#21378#20195#30721
- DataBinding.FieldName = 'GCDM'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = Tv1Column5PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 75
- end
- object Tv1Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24037#21378
- DataBinding.FieldName = 'GCNAME'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- Properties.OnButtonClick = Tv1Column6PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Tag = 2
- Caption = #22320#22336
- DataBinding.FieldName = 'GCADDRESS'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1318
- Height = 304
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Label13: TLabel
- Left = 17
- Top = 15
- Width = 72
- Height = 12
- Caption = #22806#38144#21457#31080#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 191
- Top = 13
- Width = 60
- Height = 12
- Caption = #23458#25143#21333#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 356
- Top = 11
- Width = 48
- Height = 12
- Caption = #20844' '#21496#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label8: TLabel
- Left = 755
- Top = 74
- Width = 48
- Height = 12
- Caption = #22825' '#25968#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label9: TLabel
- Left = 556
- Top = 104
- Width = 60
- Height = 12
- Caption = #35746' '#33329' '#21333#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label15: TLabel
- Left = 344
- Top = 43
- Width = 60
- Height = 12
- Caption = #19994' '#21153' '#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label16: TLabel
- Left = 191
- Top = 76
- Width = 60
- Height = 12
- Caption = #30446' '#30340' '#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label17: TLabel
- Left = 743
- Top = 44
- Width = 60
- Height = 12
- Caption = #25910#27719#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label19: TLabel
- Left = 29
- Top = 77
- Width = 60
- Height = 12
- Caption = #35013' '#36816' '#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 29
- Top = 105
- Width = 60
- Height = 12
- Caption = #20215#26684#26465#27454#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label18: TLabel
- Left = 344
- Top = 104
- Width = 60
- Height = 12
- Caption = #36816' '#36153#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label22: TLabel
- Left = 191
- Top = 103
- Width = 60
- Height = 12
- Caption = #20445' '#36153#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label27: TLabel
- Left = 29
- Top = 44
- Width = 60
- Height = 12
- Caption = #23458#25143#21517#31216#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label28: TLabel
- Left = 555
- Top = 73
- Width = 60
- Height = 12
- Caption = #36816#36755#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label30: TLabel
- Left = 556
- Top = 13
- Width = 60
- Height = 12
- Caption = #20986#36135#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label31: TLabel
- Left = 556
- Top = 44
- Width = 60
- Height = 12
- Caption = #32467#31639#24065#31181#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 67
- Top = 135
- Width = 13
- Height = 24
- Caption = #21787#13#10#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 580
- Top = 136
- Width = 13
- Height = 60
- Caption = #36135#13#10#29289#13#10#25551#13#10#36848#13#10
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 67
- Top = 209
- Width = 13
- Height = 24
- Caption = #22791#13#10#27880
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 767
- Top = 11
- Width = 36
- Height = 12
- Caption = #33337#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label10: TLabel
- Left = 743
- Top = 104
- Width = 60
- Height = 12
- Caption = #30446' '#30340' '#22269#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label11: TLabel
- Left = 344
- Top = 75
- Width = 60
- Height = 12
- Caption = #19994#21153#32452#21035#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 84
- Top = 11
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 0
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 252
- Top = 9
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 1
- end
- object BGTAITOU: TBtnEditA
- Tag = 2
- Left = 401
- Top = 8
- Width = 116
- Height = 20
- Hint = 'BGTT/'#20844#21496
- TabOrder = 9
- Text = #32461#20852#24066#25391#27704#32442#32455#21697#26377#38480#20844#21496
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object days: TEdit
- Tag = 2
- Left = 801
- Top = 70
- Width = 89
- Height = 20
- TabOrder = 10
- end
- object DCNO: TBtnEditA
- Tag = 2
- Left = 614
- Top = 100
- Width = 119
- Height = 20
- Hint = 'B5HuoGui/'#36135#26588
- TabOrder = 2
- OnBtnClick = DCNOBtnClick
- end
- object B6ChuYunGang: TBtnEditA
- Tag = 1
- Left = 84
- Top = 72
- Width = 91
- Height = 20
- Hint = 'LCFromPlace/'#35013#36816#28207
- ReadOnly = True
- TabOrder = 3
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object B7DaoHuoGang: TBtnEditA
- Tag = 1
- Left = 252
- Top = 72
- Width = 90
- Height = 20
- Hint = 'LCTOPlace/'#30446#30340#28207
- TabOrder = 4
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object SHFS: TBtnEditA
- Tag = 1
- Left = 801
- Top = 41
- Width = 90
- Height = 20
- Hint = 'SHFS/'#25910#27719#26041#24335
- TabOrder = 5
- OnBtnClick = SHFSBtnClick
- end
- object OrdConPrcNote: TBtnEditA
- Tag = 2
- Left = 84
- Top = 101
- Width = 90
- Height = 20
- Hint = 'OrdConPrcNote/'#20215#26684#26465#27454
- TabOrder = 6
- Text = 'FOB'
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object F2YunFee: TEdit
- Tag = 1
- Left = 401
- Top = 101
- Width = 112
- Height = 20
- TabOrder = 7
- Text = '0'
- end
- object F3BaoFee: TEdit
- Tag = 1
- Left = 252
- Top = 101
- Width = 91
- Height = 20
- TabOrder = 8
- Text = '0'
- end
- object KHName: TBtnEditA
- Tag = 1
- Left = 84
- Top = 40
- Width = 256
- Height = 20
- Hint = 'KHName/'#23458#25143#21517#31216
- TabOrder = 11
- OnBtnClick = KHNameBtnClick
- end
- object ZMXingZhi: TBtnEditA
- Tag = 2
- Left = 612
- Top = 72
- Width = 116
- Height = 20
- Hint = 'YSFS/'#36816#36755#26041#24335
- TabOrder = 12
- Text = 'BY SEA'
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object HTDate: TDateTimePicker
- Tag = 2
- Left = 614
- Top = 9
- Width = 116
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 13
- end
- object JSBZ: TComboBox
- Tag = 2
- Left = 614
- Top = 40
- Width = 116
- Height = 20
- ItemHeight = 12
- TabOrder = 14
- Text = #32654#20803
- Items.Strings = (
- #20154#27665#24065
- #32654#20803)
- end
- object ZhuMaiTou: TMemo
- Tag = 2
- Left = 88
- Top = 134
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 15
- end
- object SellNOTE: TMemo
- Tag = 2
- Left = 614
- Top = 132
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 16
- end
- object NOTE: TMemo
- Tag = 2
- Left = 88
- Top = 206
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 17
- end
- object YWY: TComboBox
- Tag = 2
- Left = 400
- Top = 40
- Width = 115
- Height = 20
- ItemHeight = 12
- TabOrder = 18
- OnChange = YWYChange
- OnDropDown = YWYDropDown
- Items.Strings = (
- #37049#24535#27426
- #29579#20426#26480
- #26446#33655#20848
- #29579#29618
- #37329#32418#29141
- #23648#29577#21326
- #29579#21531#39134
- #28504#28023#29141
- #40644#28113#23159
- #34081#21015#23068)
- end
- object khcode: TEdit
- Tag = 2
- Left = 1156
- Top = 5
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 19
- Visible = False
- end
- object chuandate: TDateTimePicker
- Tag = 2
- Left = 801
- Top = 7
- Width = 87
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 20
- end
- object TOCOUNTRY: TBtnEditA
- Tag = 1
- Left = 801
- Top = 100
- Width = 90
- Height = 20
- Hint = 'TOCOUNTRY/'#30446#30340#22269
- TabOrder = 21
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object YWZB: TComboBox
- Tag = 2
- Left = 401
- Top = 72
- Width = 115
- Height = 20
- ItemHeight = 12
- TabOrder = 22
- OnDropDown = YWZBDropDown
- end
- end
- object ToolBar2: TToolBar
- Left = 0
- Top = 337
- Width = 1318
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 2
- object ToolButton2: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 12
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #19968#38190#26367#25442
- ImageIndex = 19
- OnClick = ToolButton1Click
- end
- object ToolButton3: TToolButton
- Left = 150
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = ToolButton3Click
- end
- end
- object DataSource3: TDataSource
- DataSet = CDS_Sub
- Left = 501
- Top = 431
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 464
- Top = 440
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 1080
- Top = 272
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1112
- Top = 272
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1144
- Top = 272
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 424
- Top = 429
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanInPut.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanInPut.pas
deleted file mode 100644
index efba9b7..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanInPut.pas
+++ /dev/null
@@ -1,1370 +0,0 @@
-unit U_BaoGuanInPut;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxCalendar, cxDropDownEdit, ComCtrls, ToolWin,
- cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxClasses, cxControls, cxGridCustomView, cxGrid, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxButtonEdit, cxTextEdit, StdCtrls, BtnEdit,
- ExtCtrls, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxSkinsCore,
- dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmBaoGuanInPut = class(TForm)
- ToolBar1: TToolBar;
- TBSave: TToolButton;
- TBClose: TToolButton;
- DataSource3: TDataSource;
- CDS_Sub: TClientDataSet;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- cxGridPopupMenu2: TcxGridPopupMenu;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column5: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column3: TcxGridDBColumn;
- Panel1: TPanel;
- ToolBar2: TToolBar;
- ToolButton2: TToolButton;
- ToolButton3: TToolButton;
- Label13: TLabel;
- A4FPNO: TEdit;
- Label4: TLabel;
- A6PONO: TEdit;
- Label5: TLabel;
- BGTAITOU: TBtnEditA;
- Label8: TLabel;
- days: TEdit;
- Label9: TLabel;
- DCNO: TBtnEditA;
- B6ChuYunGang: TBtnEditA;
- B7DaoHuoGang: TBtnEditA;
- Label15: TLabel;
- Label16: TLabel;
- Label17: TLabel;
- SHFS: TBtnEditA;
- Label19: TLabel;
- Label2: TLabel;
- OrdConPrcNote: TBtnEditA;
- Label18: TLabel;
- F2YunFee: TEdit;
- Label22: TLabel;
- F3BaoFee: TEdit;
- v1Column1: TcxGridDBColumn;
- VCC6BGPrice: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column15: TcxGridDBColumn;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- ToolButton1: TToolButton;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- Label27: TLabel;
- KHName: TBtnEditA;
- Label28: TLabel;
- ZMXingZhi: TBtnEditA;
- Label30: TLabel;
- HTDate: TDateTimePicker;
- v1YSKeZhong: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- JSBZ: TComboBox;
- Label31: TLabel;
- Label1: TLabel;
- ZhuMaiTou: TMemo;
- Label3: TLabel;
- SellNOTE: TMemo;
- NOTE: TMemo;
- Label6: TLabel;
- Tv1Column1: TcxGridDBColumn;
- Tv1Column2: TcxGridDBColumn;
- Tv1Column3: TcxGridDBColumn;
- Tv1Column5: TcxGridDBColumn;
- Tv1Column6: TcxGridDBColumn;
- YWY: TComboBox;
- khcode: TEdit;
- Tv1Column7: TcxGridDBColumn;
- Label7: TLabel;
- chuandate: TDateTimePicker;
- Tv1Column8: TcxGridDBColumn;
- Tv1Column9: TcxGridDBColumn;
- Tv1Column10: TcxGridDBColumn;
- Tv1Column11: TcxGridDBColumn;
- Tv1Column12: TcxGridDBColumn;
- Tv1Column13: TcxGridDBColumn;
- Tv1Column14: TcxGridDBColumn;
- Tv1Column15: TcxGridDBColumn;
- ToolButton4: TToolButton;
- TOCOUNTRY: TBtnEditA;
- Label10: TLabel;
- VCKHPrice: TcxGridDBColumn;
- Label11: TLabel;
- YWZB: TComboBox;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column3PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure TCXLJClick(Sender: TObject);
- procedure B6ChuYunGangBtnClick(Sender: TObject);
- procedure YWYDropDown(Sender: TObject);
- procedure KHNameBtnClick(Sender: TObject);
- procedure DCNOBtnClick(Sender: TObject);
- procedure Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column7PropertiesEditValueChanged(Sender: TObject);
- procedure Tv1Column6PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column15PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure YWZBDropDown(Sender: TObject);
- procedure SHFSBtnClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure YWYChange1();
- private
- { Private declarations }
- function SaveCKData(): Boolean;
- public
- { Public declarations }
- FBCId, canshu3: string;
- CopyStr: string;
- end;
-
-var
- frmBaoGuanInPut: TfrmBaoGuanInPut;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_ZdyAttachment, U_ProductOrderList_Sel,
- U_DCDList_Sel, U_ZdyAttachGYS, U_ZDYHelp4;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanInPut.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmBaoGuanInPut.YWYChange1();
-begin
- with ADOQueryTemp do
- begin
- close;
- sql.Clear;
- sql.add('select udept from SY_User where username=' + Quotedstr(trim(YWY.Text)));
- open;
- end;
- YWZB.Text := ADOQueryTemp.fieldbyname('udept').AsString;
-end;
-
-function TfrmBaoGuanInPut.SaveCKData(): Boolean;
-var
- FJMID, Maxno, MaxSubNo, FSCID: string;
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main where BGID=''' + Trim(FBCId) + '''');
- Open;
- end;
- FBCId := Trim(ADOQueryTemp.fieldbyname('BGID').AsString);
- if Trim(FBCId) = '' then
- begin
- if GetLSNo(ADOQueryCmd, Maxno, 'BG', 'JYOrder_BaoGuan_Main', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- Maxno := Trim(FBCId);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main where BGID=''' + Trim(Maxno) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FBCId) = '' then
- begin
- Append;
- FieldByName('Filler').Value := Trim(DName);
- FieldByName('FillerCode').Value := Trim(DCode);
-// FieldByName('status').Value := Trim(DCode);
- end
- else
- begin
- Edit;
- FieldByName('Editer').Value := Trim(DName);
- FieldByName('EditerCode').Value := Trim(DCode);
- FieldByName('EditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('BGID').Value := Trim(Maxno);
- RTSetsavedata(ADOQueryCmd, 'JYOrder_BaoGuan_Main', Panel1, 1);
- RTSetsavedata(ADOQueryCmd, 'JYOrder_BaoGuan_Main', Panel1, 2);
- Post;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main where A4FPNO=''' + Trim(A4FPNO.Text) + ''' and Valid=''Y'' ');
- Open;
- end;
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('˷ƱѾʹãܱ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not eof do
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BSID=''' + Trim(CDS_Sub.fieldbyname('BSID').AsString) + '''');
- Open;
- end;
- FSCID := Trim(ADOQueryTemp.fieldbyname('BSID').AsString);
- if Trim(FSCID) = '' then
- begin
- if GetLSNo(ADOQueryCmd, MaxSubNo, 'BS', 'JYOrder_BaoGuan_Sub', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡӱʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- MaxSubNo := Trim(FSCID);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BSID=''' + Trim(MaxSubNo) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FSCID) = '' then
- begin
- Append;
- FieldByName('SFiller').Value := Trim(DName);
- end
- else
- begin
- Edit;
- FieldByName('SEditer').Value := Trim(DName);
- FieldByName('SEditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('BGID').Value := Trim(Maxno);
- FieldByName('BSID').Value := Trim(MaxSubNo);
- RTSetSaveDataCDS(ADOQueryCmd, Tv1, CDS_Sub, 'JYOrder_BaoGuan_Sub', 2);
- Post;
- end;
- Edit;
- FieldByName('BSID').Value := Trim(MaxSubNo);
- FieldByName('BGID').Value := Trim(Maxno);
- Post;
- Next;
- end;
- end;
- CDS_Sub.EnableControls;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set ');
- sql.Add(' C7BGMoneyHZ=(select Sum(C7BGMoney) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E1BZQtyHZ=(select Sum(E1BZQty) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E2ChiMaQtyHZ=(select Sum(E2ChiMaQty) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E3MaoZHZ=(select Sum(E3MaoZ) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E4JingZHZ=(select Sum(E4JingZ) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(' where BGID=''' + Trim(Maxno) + '''');
- ExecSQL;
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set ');
- SQL.Add('C7BGMoney=C6BGPrice*C4BGQty');
- sql.Add(' where BGID=''' + Trim(Maxno) + '''');
- ExecSQL;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- FBCId := Trim(Maxno);
- Result := True;
- except
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmBaoGuanInPut.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('¼YD', Tv1, 'ع12');
- Close;
-end;
-
-procedure TfrmBaoGuanInPut.FormShow(Sender: TObject);
-begin
- ReadCxGrid('¼YD', Tv1, 'ع12');
- if canshu3 = 'ҵԱ' then
- begin
- VCC6BGPrice.Visible := False;
- VCC6BGPrice.Hidden := True;
- end
- else
- begin
- VCC6BGPrice.Visible := True;
- VCC6BGPrice.Hidden := False;
- end;
- if canshu3 = '֤' then
- begin
- VCKHPrice.Visible := False;
- VCKHPrice.Hidden := True;
- end
- else
- begin
- VCKHPrice.Visible := True;
- VCKHPrice.Hidden := False;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A');
- sql.Add(' where BGID=''' + Trim(FBCId) + '''');
- Open;
- end;
- SCSHDataNew(ADOQueryTemp, Panel1, 1);
- SCSHDataNew(ADOQueryTemp, Panel1, 2);
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Sub A');
- sql.Add(' where BGID=''' + Trim(FBCId) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_Sub);
- SInitCDSData20(ADOQueryTemp, CDS_Sub);
- if CopyStr = '99' then
- begin
- FBCId := '';
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not Eof do
- begin
- Edit;
- FieldByName('BGID').Value := Null;
- FieldByName('BSID').Value := Null;
- Post;
- Next;
- end;
- end;
- CDS_Sub.EnableControls;
-
- SHFS.Text := '';
- end;
- if Trim(FBCId) = '' then
- begin
-// YWY.Text := Trim(DName);
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add(' select A.* ');
-// sql.Add(' from SY_USER A');
-// sql.Add(' where USERNAME=' + QuotedStr(Trim(DName)));
-// Open;
-// end;
-// YWZB.Text := Trim(ADOQueryTemp.fieldbyname('UDEPT').AsString);
- HTDate.Date := SGetServerDate(ADOQueryTemp);
- chuandate.Date := SGetServerDate(ADOQueryTemp);
- end;
-
-end;
-
-procedure TfrmBaoGuanInPut.TBSaveClick(Sender: TObject);
-var
- FReal: Double;
- i: Integer;
-begin
-// with Panel1 do
-// begin
-// for i:=0 to ControlCount-1 do
-// begin
-// if Controls[i].Tag=1 then
-// begin
-// if Controls[i] is TLabel then continue;
-// if Controls[i].Tag<>1 then continue;
-// if Controls[i] is TEdit then
-// begin
-// if Trim(TEdit(Controls[i]).Text)='' then
-// begin
-// Application.MessageBox('ɫעϢΪд','ʾ',0);
-// Exit;
-// end;
-// end;
-// if Controls[i] is TBtnEditA then
-// begin
-// if Trim(TBtnEditA(Controls[i]).Text)='' then
-// begin
-// Application.MessageBox('ɫעϢΪд','ʾ',0);
-// Exit;
-// end;
-// end;
-// end;
-// end;
-// end;
-
- if FBCId <> '' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main where BGID=''' + Trim(FBCId) + '''');
- Open;
- end;
- if ADOQueryTemp.fieldbyname('BGSTATUS').AsString = '' then
- begin
- Application.MessageBox('ѱز!', 'ʾ', 0);
- Exit;
- end;
- end;
-
- if ywzb.Text = '' then
- begin
- Application.MessageBox('ҵΪ!', 'ʾ', 0);
- Exit;
- end;
- if SHFS.Text = '' then
- begin
- Application.MessageBox('ջ㷽ʽΪ!', 'ʾ', 0);
- Exit;
- end;
-
- if TryStrToFloat(F2YunFee.Text, FReal) = False then
- begin
- Application.MessageBox('˷ѷǷ!', 'ʾ', 0);
- Exit;
- end;
- if TryStrToFloat(F3BaoFee.Text, FReal) = False then
- begin
- Application.MessageBox('ѷǷ!', 'ʾ', 0);
- Exit;
- end;
- if CDS_Sub.IsEmpty then
- begin
- Application.MessageBox('ϸΪ!', 'ʾ', 0);
- Exit;
- end;
- if CDS_Sub.Locate('C3BGName', Null, []) then
- begin
- Application.MessageBox('ƷΪ!', 'ʾ', 0);
- Exit;
- end;
- if Trim(DCNO.Text) = '' then
- begin
- Application.MessageBox('յΪ!', 'ʾ', 0);
- Exit;
- end;
- if CDS_Sub.Locate('C4BGQty', Null, []) then
- begin
- Application.MessageBox('Ϊ!', 'ʾ', 0);
- Exit;
- end;
- if CDS_Sub.Locate('C5BGUnit', Null, []) then
- begin
- Application.MessageBox('λΪ!', 'ʾ', 0);
- Exit;
- end;
- if CDS_Sub.Locate('C6BGPrice', Null, []) then
- begin
- Application.MessageBox('۲Ϊ!', 'ʾ', 0);
- Exit;
- end;
- with CDS_SUB do
- begin
- First;
- while not Eof do
- begin
- if (CDS_SUB.FieldByName('C6BGPrice').Value > 3.5) then
- begin
- if Application.MessageBox('ص۴3.5,Ƿʵ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- end;
-
- if (CDS_SUB.FieldByName('C6BGPrice').Value <> 0) and (StrToFloatDef(CDS_SUB.FieldByName('C7BGMoney').AsString, 0) = 0) then
- begin
- Edit;
- FieldByName('C7BGMoney').Value := CDS_SUB.FieldByName('C6BGPrice').Value * CDS_SUB.FieldByName('C4BGQty').Value;
- Post;
- end;
-
- Next;
- end;
- end;
-// if CDS_Sub.Locate('C7BGMoney', Null, []) then
-// begin
-// Application.MessageBox('Ϊ!', 'ʾ', 0);
-// Exit;
-// end;
- {if CDS_Sub.Locate('E2ChiMaQty',Null,[]) then
- begin
- Application.MessageBox('벻Ϊ!','ʾ',0);
- Exit;
- end;}
-// if CDS_Sub.Locate('E4JingZ', Null, []) then
-// begin
-// Application.MessageBox('زΪ!', 'ʾ', 0);
-// Exit;
-// end;
-
- ToolBar1.SetFocus;
- if SaveCKData() then
- begin
- Application.MessageBox('ɹ!', 'ʾ', 0);
- //ModalResult:=1;
- Exit;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.ToolButton2Click(Sender: TObject);
-var
- i: Integer;
-begin
- //CopyAddRowCDS(CDS_Sub);
- {with CDS_Sub do
- begin
- Edit;
- FieldByName('BGID').Value:=Null;
- FieldByName('BSID').Value:=Null;
- Post;
- end; }
-
-
- frmProductOrderList_Sel := TfrmProductOrderList_Sel.Create(self);
- with frmProductOrderList_Sel do
- begin
- if showmodal = 1 then
- begin
- while frmProductOrderList_Sel.Order_Main.Locate('SSel', True, []) do
- begin
- Self.CDS_Sub.Append;
- i := CDS_Sub.RecordCount;
- Self.CDS_Sub.FieldByName('XHInt').Value := i + 1;
- Self.CDS_Sub.FieldbyName('C6BGPrice').Value := 0;
-// Self.CDS_Sub.FieldbyName('Money').Value := 0;
- Self.CDS_Sub.fieldbyname('orderno').Value := Order_Main.fieldbyname('Orderno').asstring;
- Self.CDS_Sub.fieldbyname('FromMainId').Value := Order_Main.fieldbyname('MainId').asstring;
- Self.CDS_Sub.fieldbyname('C3BGNameEng').Value := Order_Main.fieldbyname('YWNAME').asstring;
- Self.CDS_Sub.fieldbyname('C3BGName').Value := Order_Main.fieldbyname('MPRTCODENAME').asstring;
- Self.CDS_Sub.fieldbyname('YSFuKuan').Value := Order_Main.fieldbyname('MPRTMF').asstring;
- Self.CDS_Sub.fieldbyname('YSKeZhong').Value := Order_Main.fieldbyname('MPRTKZ').asstring;
- Self.CDS_Sub.fieldbyname('YSChenFen').Value := Order_Main.fieldbyname('MPRTCF').asstring;
- Self.CDS_Sub.fieldbyname('C4BGQty').Value := Order_Main.fieldbyname('PRTORDERQTY').ASFLOAT;
-
- Self.CDS_Sub.fieldbyname('C5BGUnit').Value := Order_Main.fieldbyname('orderunit').asstring;
-
- Self.CDS_Sub.fieldbyname('ZZFF').Value := Order_Main.fieldbyname('BPBigType').asstring;
- Self.CDS_Sub.fieldbyname('ZDDATE').Value := Order_Main.fieldbyname('filltime').AsDateTime;
- Self.CDS_Sub.fieldbyname('GYLX').Value := Order_Main.fieldbyname('JGType').asstring;
- Self.CDS_Sub.fieldbyname('JSUNIT').Value := '';
- Self.CDS_Sub.fieldbyname('WL').Value := 'ƽ';
- Self.CDS_Sub.fieldbyname('sj').Value := '';
- Self.CDS_Sub.fieldbyname('GCNAME').Value := 'ʤ֯Ʒ˾';
- Self.CDS_Sub.fieldbyname('GCDM').Value := '4';
- YWY.ItemIndex := YWY.Items.IndexOf(trim(Order_Main.fieldbyname('YWY').AsString));
- YWYChange1();
- Self.CDS_Sub.Post;
- frmProductOrderList_Sel.Order_Main.Delete;
- end;
- end;
- free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
- if Trim(CDS_Sub.fieldbyname('BSID').AsString) <> '' then
- begin
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() ');
- sql.Add(' where BSID=''' + Trim(CDS_Sub.fieldbyname('BSID').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set ');
- sql.Add(' C7BGMoneyHZ=(select Sum(C7BGMoney) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E1BZQtyHZ=(select Sum(E1BZQty) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E2ChiMaQtyHZ=(select Sum(E2ChiMaQty) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E3MaoZHZ=(select Sum(E3MaoZ) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E4JingZHZ=(select Sum(E4JingZ) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(' where BGID=''' + Trim(CDS_Sub.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- end;
- CDS_Sub.Delete;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'C3BGName';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C3BGName').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1 * from JYOrder_BaoGuan_Sub where C3BGName=''' + Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZDYName').AsString) + '''');
- sql.add(' and isnull(C2HSNO,'''')<>'''' ');
- sql.Add(' order by SFillTime desc');
- Open;
- end;
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C2HSNO').Value := Trim(ADOQueryTemp.fieldbyname('C2HSNO').asstring);
- FieldByName('C3BGNameEng').Value := Trim(ADOQueryTemp.fieldbyname('C3BGNameEng').asstring);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSChenFen';
- flagname := 'ɷֺ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSChenFen').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSPinPai';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSPinPai').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSShengChanShang';
- flagname := '';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSShengChanShang').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column3PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FPrice, FQty, FBaoGangFee: string;
-begin
- FName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName(FName).Value := mvalue;
- Post;
- end;
- FPrice := Trim(CDS_Sub.fieldbyname('C6BGPrice').AsString);
- FQty := Trim(CDS_Sub.fieldbyname('C4BGQty').AsString);
- if Trim(FPrice) = '' then
- begin
- FPrice := '0';
- end;
- if Trim(FQty) = '' then
- begin
- FQty := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName('C7BGMoney').Value := RoundFloat(StrToFloat(FPrice) * StrToFloat(FQty), 2);
- Post;
- end;
- tv1.Controller.EditingController.ShowEdit();
-end;
-
-procedure TfrmBaoGuanInPut.ToolButton1Click(Sender: TObject);
-var
- FValue, FFValue, FColumn, FFColumn: string;
-begin
- if CDS_Sub.IsEmpty then
- Exit;
-
- //FColumn:=tv1.Columns[Tv1.Controller.FocusedColumnIndex].DataBinding.FieldName;
- //FFColumn:=Tv1.Columns[Tv1.Controller.FocusedColumnIndex].Summary.GroupFormat;
- FColumn := Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName;
- FFColumn := Tv1.Controller.FocusedColumn.Summary.GroupFormat;
- FValue := Trim(CDS_Sub.fieldbyname(FColumn).AsString);
-
- if Trim(FFColumn) <> '' then
- begin
- FFValue := Trim(CDS_Sub.fieldbyname(FFColumn).AsString);
- end;
- if Trim(FColumn) = 'C7BGMoney' then
- begin
- Exit;
- end;
-
- with CDS_Sub do
- begin
- DisableControls;
- First;
- while not Eof do
- begin
- Edit;
- if FValue = '' then
- begin
- CDS_Sub.FieldByName(FColumn).Value := null;
- end
- else
- begin
- CDS_Sub.FieldByName(FColumn).Value := FValue;
- end;
- if Trim(FFColumn) <> '' then
- begin
- if FFValue = '' then
- begin
- CDS_Sub.FieldByName(FFColumn).Value := null;
- end
- else
- begin
- CDS_Sub.FieldByName(FFColumn).Value := FFValue;
- end;
- end;
- if (FColumn = 'C6BGPrice') or (FColumn = 'C4BGQty') then
- begin
-
- FieldbyName('C7BGMoney').Value := strtofloat(format('%.2f', [FieldByName('C6BGPrice').AsFloat * FieldByName('C4BGQty').ASFLOAT]));
-
-
-
-
-// CDS_Main.FieldByName('money').Value := CDS_Main.FieldByName('price').AsFloat * CDS_Main.FieldByName('qty').AsFloat;
- end;
-
- Post;
- Next;
- end;
- EnableControls;
- end;
-
-end;
-
-procedure TfrmBaoGuanInPut.ToolButton4Click(Sender: TObject);
-var
- fsj: string;
-begin
- if FBCId = '' then
- Exit;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
-
- try
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(FBCId) + '''');
- ExecSQL;
- end;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- except
-
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmBaoGuanInPut.v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'ZZJGou';
- flagname := '֯ṹ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('ZZJGou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'E5MaiTou';
- flagname := 'ͷ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('E5MaiTou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.TCXLJClick(Sender: TObject);
-begin
- if not Assigned(DataLink_DDMD) then
- DataLink_DDMD := TDataLink_DDMD.Create(Application);
- try
- with DataLink_DDMD.ADOLink do
- begin
- //if not Connected then
- begin
- Connected := false;
- ConnectionString := DConString;
- LoginPrompt := false;
- Connected := true;
- end;
- end;
- except
- application.MessageBox('ݿʧܣ', '', mb_Ok + MB_ICONERROR);
- end;
-end;
-
-procedure TfrmBaoGuanInPut.B6ChuYunGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
-
- flag := Copy(fsj, 1, FWZ - 1);
-// ShowMessage(flag);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'LCTOPlace') or (flag = 'LCFromPlace') or (flag = 'YSFS') then
- begin
- fnote := True;
- V1Note.Caption := 'ע';
- V1Name.Caption := '';
-// V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-// if (flag = 'B6ChuYunGang') or (flag = 'B7DaoHuoGang') or (flag = 'ZMXingZhi') then
-// begin
-// fnote := True;
-// V1Note.Caption := 'ע';
-//// V1Name.Caption := 'Ӣ';
-// end
-// else
-// begin
-// fnote := false;
-// end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmBaoGuanInPut.YWYDropDown(Sender: TObject);
-begin
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('SELECT * FROM SY_User WHERE Udept LIKE ''%ͷ%'' ');
-//
-// Open;
-// end;
-// YWY.Items.Clear;
-// while not ADOQueryTemp.eof do
-// begin
-// YWY.Items.Add(Trim(ADOQueryTemp.fieldbyname('username').AsString));
-// ADOQueryTemp.next;
-// end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where type=''jhdywy'' ');
-
- Open;
- end;
- YWY.Items.Clear;
- while not ADOQueryTemp.eof do
- begin
- YWY.Items.Add(Trim(ADOQueryTemp.fieldbyname('zdyname').AsString));
- ADOQueryTemp.next;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.KHNameBtnClick(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
-
- if ShowModal = 1 then
- begin
- self.khcode.Text := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- self.KHName.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.DCNOBtnClick(Sender: TObject);
-begin
- try
- frmDCDList_Sel := TfrmDCDList_Sel.Create(Application);
- with frmDCDList_Sel do
- begin
-
- if ShowModal = 1 then
- begin
- self.TOCOUNTRY.Text := Trim(Order_Main.fieldbyname('TOCOUNTRY').AsString);
- self.DCNO.Text := Trim(Order_Main.fieldbyname('DCNO').AsString);
- end;
- end;
- finally
- frmDCDList_Sel.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'zzff';
- flagname := '֯췽';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('zzff').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'wenlu';
- flagname := '·';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('wl').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'GYLX';
- flagname := '';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('gylx').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'JSUNIT';
- flagname := 'λ';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('JSUNIT').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column7PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FPrice, FQty, FBaoGangFee: string;
-begin
- FName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName(FName).Value := mvalue;
- Post;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.Tv1Column6PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.v1Column15PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'BGMF';
- flagname := 'ŷ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSFuKuan').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.YWZBDropDown(Sender: TObject);
-begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('SELECT * FROM (');
- sql.Add('SELECT DISTINCT UDEPT FROM SY_User WHERE Udept LIKE ''%ͷ%'')AA ');
- SQL.Add(' ORDER BY CHARINDEX( UDEPT,N''ͷһ,ͷ,ͷ,ͷ,ͷ,ͷ,ͷ,ͷ,ͷ,ͷʮ,ͷʮһ,ͷʮ'')');
-
- Open;
- end;
- YWZB.Items.Clear;
- while not ADOQueryTemp.eof do
- begin
- YWZB.Items.Add(Trim(ADOQueryTemp.fieldbyname('UDEPT').AsString));
- ADOQueryTemp.next;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.SHFSBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp4 := TfrmZDYHelp4.Create(Application);
- with frmZDYHelp4 do
- begin
-
- flag := Copy(fsj, 1, FWZ - 1);
-// ShowMessage(flag);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- TBAdd.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- TBSave.Visible := False;
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'LCTOPlace') or (flag = 'LCFromPlace') or (flag = 'YSFS') then
- begin
- fnote := True;
- V1Note.Caption := 'ע';
- V1Name.Caption := '';
-// V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'SHFS') then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'ջ㷽ʽ';
-// V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-// if (flag = 'B6ChuYunGang') or (flag = 'B7DaoHuoGang') or (flag = 'ZMXingZhi') then
-// begin
-// fnote := True;
-// V1Note.Caption := 'ע';
-//// V1Name.Caption := 'Ӣ';
-// end
-// else
-// begin
-// fnote := false;
-// end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- if (flag = 'SHFS') then
- begin
- days.Text := Trim(ClientDataSet1.fieldbyname('note').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp4.Free;
- end;
-end;
-
-procedure TfrmBaoGuanInPut.YWYChange(Sender: TObject);
-begin
- with ADOQueryTemp do
- begin
- close;
- sql.Clear;
- sql.add('select udept from SY_User where username=' + Quotedstr(trim(YWY.Text)));
- open;
- end;
- YWZB.Text := ADOQueryTemp.fieldbyname('udept').AsString;
-// YWZB.ItemIndex := YWZB.Items.IndexOf(trim(ADOQueryTemp.fieldbyname('udept').AsString));
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanList.dfm
deleted file mode 100644
index 1305cdb..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanList.dfm
+++ /dev/null
@@ -1,1397 +0,0 @@
-object frmBaoGuanList: TfrmBaoGuanList
- Left = 235
- Top = 118
- Width = 1364
- Height = 671
- Caption = #25253#20851#36164#26009#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1356
- Height = 62
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 95
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object TBAdd: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 1
- Visible = False
- OnClick = TBAddClick
- end
- object TBEdit: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- Visible = False
- OnClick = TBEditClick
- end
- object TBCopy: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #22797#21046
- ImageIndex = 38
- OnClick = TBCopyClick
- end
- object TBView: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = TBViewClick
- end
- object TBDel: TToolButton
- Left = 378
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- Visible = False
- OnClick = TBDelClick
- end
- object ToolButton1: TToolButton
- Left = 441
- Top = 0
- AutoSize = True
- Caption = #25171#21360#25253#20851#21333
- ImageIndex = 4
- OnClick = ToolButton1Click
- end
- object btn1: TToolButton
- Left = 540
- Top = 0
- AutoSize = True
- Caption = #25171#21360#25253#20851#21333
- ImageIndex = 4
- OnClick = btn1Click
- end
- object TBSS: TToolButton
- Left = 639
- Top = 0
- AutoSize = True
- Caption = #36865#23457
- ImageIndex = 22
- Visible = False
- OnClick = TBSSClick
- end
- object TBSSCX: TToolButton
- Left = 702
- Top = 0
- AutoSize = True
- Caption = #36865#23457#25764#38144
- ImageIndex = 52
- Visible = False
- OnClick = TBSSCXClick
- end
- object TBSH: TToolButton
- Left = 789
- Top = 0
- AutoSize = True
- Caption = #23457#26680
- ImageIndex = 22
- Wrap = True
- Visible = False
- OnClick = TBSHClick
- end
- object TBSHCX: TToolButton
- Left = 0
- Top = 30
- AutoSize = True
- Caption = #23457#26680#25764#38144
- ImageIndex = 52
- Visible = False
- OnClick = TBSHCXClick
- end
- object ToolButton2: TToolButton
- Left = 87
- Top = 30
- AutoSize = True
- Caption = #25253#20851#30830#35748
- ImageIndex = 31
- OnClick = ToolButton2Click
- end
- object ToolButton3: TToolButton
- Left = 174
- Top = 30
- AutoSize = True
- Caption = #21462#28040#30830#35748
- ImageIndex = 52
- OnClick = ToolButton3Click
- end
- object TBAll: TToolButton
- Left = 261
- Top = 30
- AutoSize = True
- Caption = #20840#37096#36164#26009
- ImageIndex = 4
- Visible = False
- OnClick = TBAllClick
- end
- object btn2: TToolButton
- Left = 348
- Top = 30
- AutoSize = True
- Caption = #30452#25509#23548#20986
- ImageIndex = 40
- Visible = False
- OnClick = btn2Click
- end
- object TBBGZL: TToolButton
- Left = 435
- Top = 30
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 14
- Visible = False
- OnClick = TBBGZLClick
- end
- object TBHT: TToolButton
- Left = 522
- Top = 30
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = TBHTClick
- end
- object TBFP: TToolButton
- Left = 585
- Top = 30
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = TBFPClick
- end
- object TBZXD: TToolButton
- Left = 648
- Top = 30
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = TBZXDClick
- end
- object TBBGD: TToolButton
- Left = 723
- Top = 30
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = TBBGDClick
- end
- object TBSBYS: TToolButton
- Left = 798
- Top = 30
- AutoSize = True
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = TBSBYSClick
- end
- object TBExport: TToolButton
- Left = 885
- Top = 30
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 948
- Top = 30
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 62
- Width = 1356
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label6: TLabel
- Left = 348
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 205
- Top = 35
- Width = 24
- Height = 12
- Caption = #24037#21378
- end
- object Label8: TLabel
- Left = 522
- Top = 11
- Width = 48
- Height = 12
- Caption = #23458#25143#21517#31216
- end
- object Label3: TLabel
- Left = 522
- Top = 35
- Width = 48
- Height = 12
- Caption = #25253#20851#21697#21517
- end
- object Label2: TLabel
- Left = 360
- Top = 35
- Width = 48
- Height = 12
- Caption = #33521#25991#21697#21517
- end
- object Label4: TLabel
- Left = 181
- Top = 12
- Width = 48
- Height = 12
- Caption = #35745#21010#21333#21495
- end
- object Label16: TLabel
- Left = 699
- Top = 11
- Width = 36
- Height = 12
- Caption = #30331#35760#20154
- end
- object Label17: TLabel
- Left = 687
- Top = 35
- Width = 48
- Height = 12
- Caption = #23458#25143#21333#21495
- end
- object Label18: TLabel
- Left = 847
- Top = 11
- Width = 48
- Height = 12
- Caption = #35746#33329#21333#21495
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 77
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 414
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnKeyPress = zGCNAMEKeyPress
- end
- object zGCNAME: TEdit
- Tag = 2
- Left = 233
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = zGCNAMEKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 574
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnKeyPress = zGCNAMEKeyPress
- end
- object ZBGCODENAME: TEdit
- Tag = 2
- Left = 574
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 5
- OnKeyPress = zGCNAMEKeyPress
- end
- object ZC3BGNameEng: TEdit
- Tag = 2
- Left = 414
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 6
- OnKeyPress = zGCNAMEKeyPress
- end
- object Zorderno: TEdit
- Tag = 2
- Left = 233
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 7
- OnKeyPress = zGCNAMEKeyPress
- end
- object Filler: TEdit
- Tag = 2
- Left = 739
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 8
- OnKeyPress = zGCNAMEKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 739
- Top = 31
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 9
- OnKeyPress = zGCNAMEKeyPress
- end
- object DCNO: TEdit
- Tag = 2
- Left = 899
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 10
- OnKeyPress = zGCNAMEKeyPress
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 121
- Width = 1356
- Height = 22
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- Properties.CustomButtons.Buttons = <>
- Properties.Style = 9
- Properties.TabIndex = 0
- Properties.Tabs.Strings = (
- #24453#36865#23457
- #24453#23457#26680
- #24050#23457#26680
- #20840#37096)
- OnChange = cxTabControl1Change
- ClientRectBottom = 22
- ClientRectRight = 1356
- ClientRectTop = 19
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 143
- Width = 1356
- Height = 301
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 3
- object TV1: TcxGridDBTableView
- OnDblClick = TV1DblClick
- Navigator.Buttons.CustomButtons = <>
- OnFocusedRecordChanged = TV1FocusedRecordChanged
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 68
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #29366#24577
- DataBinding.FieldName = 'Status'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object tv2Column3: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object tv2Column4: TcxGridDBColumn
- Caption = #25253#20851
- DataBinding.FieldName = 'BGSTATUS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object tv2Column5: TcxGridDBColumn
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'FIILLTIME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 80
- end
- object tv2Column6: TcxGridDBColumn
- Caption = #36864#21333
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #36864#21333#26085#26399
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 81
- end
- object TV1Column19: TcxGridDBColumn
- Caption = #20986#36135#26085#26399
- DataBinding.FieldName = 'htdate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 76
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #35746#33329#21333#21495
- DataBinding.FieldName = 'DCNO'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 82
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'TDNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'huodai'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 76
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #23458#25143#21517#31216
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 90
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 69
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #22806#38144#21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 107
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #21046#21333#21592
- DataBinding.FieldName = 'filler'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column16: TcxGridDBColumn
- Caption = #20462#25913#20154
- DataBinding.FieldName = 'EDITER'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 71
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 69
- end
- object TV1Column18: TcxGridDBColumn
- Caption = #23457#26680#20154
- DataBinding.FieldName = 'Chker'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 75
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #33337#26399
- DataBinding.FieldName = 'chuandate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 102
- end
- object TV1Column1: TcxGridDBColumn
- Caption = #23458#25143#21333#21495
- DataBinding.FieldName = 'A6PONO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 83
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #30446#30340#22269
- DataBinding.FieldName = 'TOCOUNTRY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 78
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object MovePanel1: TMovePanel
- Left = 436
- Top = 164
- Width = 249
- Height = 257
- TabOrder = 4
- Visible = False
- object Label7: TLabel
- Left = 26
- Top = 35
- Width = 48
- Height = 12
- Caption = #25253#20851#26085#26399
- end
- object Label9: TLabel
- Left = 26
- Top = 12
- Width = 48
- Height = 12
- Caption = #21457#31080#21495#30721
- end
- object Label10: TLabel
- Left = 38
- Top = 83
- Width = 36
- Height = 12
- Caption = #30446#30340#28207
- end
- object Label11: TLabel
- Left = 26
- Top = 60
- Width = 48
- Height = 12
- Caption = #20986#36135#26085#26399
- end
- object Label12: TLabel
- Left = 28
- Top = 108
- Width = 48
- Height = 12
- Caption = #39044#35745#33337#26399
- end
- object Label13: TLabel
- Left = 50
- Top = 132
- Width = 24
- Height = 12
- Caption = #26588#22411
- end
- object Label14: TLabel
- Left = 50
- Top = 155
- Width = 24
- Height = 12
- Caption = #36135#20195
- end
- object Label15: TLabel
- Left = 38
- Top = 180
- Width = 36
- Height = 12
- Caption = #25552#21333#21495
- end
- object Edit2: TEdit
- Tag = 1
- Left = 81
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 0
- end
- object bgdate: TDateTimePicker
- Left = 81
- Top = 32
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object B7DaoHuoGang: TBtnEditA
- Tag = 1
- Left = 82
- Top = 80
- Width = 100
- Height = 20
- Hint = 'LCTOPlace/'#30446#30340#28207
- TabOrder = 2
- OnBtnClick = B7DaoHuoGangBtnClick
- end
- object htdate: TDateTimePicker
- Left = 82
- Top = 55
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 3
- end
- object chuandate: TDateTimePicker
- Left = 82
- Top = 103
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 4
- end
- object guixing: TEdit
- Tag = 1
- Left = 81
- Top = 128
- Width = 100
- Height = 20
- TabOrder = 5
- end
- object huodai: TBtnEditA
- Tag = 1
- Left = 82
- Top = 152
- Width = 100
- Height = 20
- Hint = 'HDName/'#36135#20195#21517#31216
- TabOrder = 6
- OnBtnClick = huodaiBtnClick
- end
- object tdno: TEdit
- Tag = 1
- Left = 81
- Top = 176
- Width = 100
- Height = 20
- TabOrder = 7
- end
- object Button1: TButton
- Left = 28
- Top = 204
- Width = 75
- Height = 21
- Caption = #20445#23384
- TabOrder = 8
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 132
- Top = 204
- Width = 75
- Height = 21
- Caption = #21462#28040
- TabOrder = 9
- OnClick = Button2Click
- end
- end
- object Panel3: TPanel
- Left = 695
- Top = 195
- Width = 231
- Height = 216
- TabOrder = 5
- Visible = False
- object Label19: TLabel
- Left = 48
- Top = 88
- Width = 6
- Height = 12
- end
- object Panel6: TPanel
- Left = 1
- Top = 1
- Width = 229
- Height = 23
- Align = alTop
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = #25253#34920#21517#31216
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Image1: TImage
- Left = 206
- Top = 3
- Width = 22
- Height = 16
- ParentShowHint = False
- Picture.Data = {
- 07544269746D617076040000424D760400000000000036000000280000001500
- 0000110000000100180000000000400400000000000000000000000000000000
- 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6
- F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040
- 404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080
- 808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000
- 000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00}
- ShowHint = True
- Transparent = True
- OnClick = Image1Click
- end
- end
- object Button7: TButton
- Left = 83
- Top = 180
- Width = 75
- Height = 21
- Caption = #30830#23450
- TabOrder = 1
- OnClick = Button7Click
- end
- object RadioGroup2: TRadioGroup
- Left = 56
- Top = 24
- Width = 129
- Height = 145
- ItemIndex = 0
- Items.Strings = (
- #25253#20851#23457#25209#21333
- #25253#20851#22235#36830#25171
- #24320#31080#20108#36830#25171)
- TabOrder = 2
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 444
- Width = 1356
- Height = 196
- Align = alBottom
- BevelOuter = bvNone
- Caption = 'Panel2'
- TabOrder = 6
- object cxGrid1: TcxGrid
- Left = 0
- Top = 0
- Width = 1356
- Height = 196
- Align = alClient
- TabOrder = 0
- object TV2: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn38
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = cxGridDBColumn45
- end
- item
- Kind = skSum
- Column = cxGridDBColumn46
- end
- item
- Kind = skSum
- Column = cxGridDBColumn42
- end
- item
- Kind = skSum
- Column = cxGridDBColumn47
- end
- item
- Kind = skSum
- Column = cxGridDBColumn48
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn32: TcxGridDBColumn
- Tag = 2
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'orderno'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #26797#32455
- #38024#32455
- #32463#32534
- #21050#32483
- #38024#32455#32463#32534)
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 71
- end
- object cxGridDBColumn33: TcxGridDBColumn
- Tag = 2
- Caption = #20013#25991#21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 108
- end
- object cxGridDBColumn34: TcxGridDBColumn
- Tag = 2
- Caption = #33521#25991#21697#21517
- DataBinding.FieldName = 'C3BGNameEng'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 108
- end
- object cxGridDBColumn35: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 109
- end
- object cxGridDBColumn36: TcxGridDBColumn
- Tag = 2
- Caption = #20811#37325
- DataBinding.FieldName = 'YSKeZhong'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 73
- end
- object cxGridDBColumn37: TcxGridDBColumn
- Tag = 2
- Caption = #38376#24133
- DataBinding.FieldName = 'YSFuKuan'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 65
- end
- object cxGridDBColumn38: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 77
- end
- object cxGridDBColumn39: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215
- DataBinding.FieldName = 'C6BGPrice'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object cxGridDBColumn40: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 46
- end
- object cxGridDBColumn41: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 74
- end
- object cxGridDBColumn42: TcxGridDBColumn
- Tag = 2
- Caption = #26679#21697#36153
- DataBinding.FieldName = 'HDFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object cxGridDBColumn43: TcxGridDBColumn
- Tag = 2
- Caption = #24320#31080#20215
- DataBinding.FieldName = 'KPPRICE'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 74
- end
- object cxGridDBColumn44: TcxGridDBColumn
- Caption = #25253#20851#21697#21517
- DataBinding.FieldName = 'BGCODENAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 93
- end
- object cxGridDBColumn45: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 88
- end
- object cxGridDBColumn46: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 82
- end
- object cxGridDBColumn47: TcxGridDBColumn
- Caption = #20307#31215
- DataBinding.FieldName = 'BGTJ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object cxGridDBColumn48: TcxGridDBColumn
- Caption = #20214#25968
- DataBinding.FieldName = 'JS'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 77
- end
- object cxGridDBColumn50: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'MXNOTE'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 72
- end
- object cxGridDBColumn51: TcxGridDBColumn
- Caption = #24037#21378#20195#30721
- DataBinding.FieldName = 'GCDM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 75
- end
- object cxGridDBColumn52: TcxGridDBColumn
- Caption = #24037#21378
- DataBinding.FieldName = 'GCNAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 74
- end
- object cxGridDBColumn53: TcxGridDBColumn
- Tag = 2
- Caption = #22320#22336
- DataBinding.FieldName = 'GCADDRESS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 70
- end
- end
- object cxGridLevel2: TcxGridLevel
- GridView = TV2
- end
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1000
- Top = 228
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 785
- Top = 173
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 216
- end
- object PopupMenu1: TPopupMenu
- Left = 350
- Top = 252
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 609
- Top = 296
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 536
- Top = 316
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 548
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 524
- Top = 284
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 616
- Top = 316
- end
- object cxStyleRepository1: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle1: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #40657#20307
- Font.Style = [fsBold]
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanList.pas
deleted file mode 100644
index 5ed9160..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanList.pas
+++ /dev/null
@@ -1,1930 +0,0 @@
-unit U_BaoGuanList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, Registry, dxSkinsCore,
- dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmBaoGuanList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- TBDel: TToolButton;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- TBAdd: TToolButton;
- TBEdit: TToolButton;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxTabControl1: TcxTabControl;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- zGCNAME: TEdit;
- Label8: TLabel;
- KHName: TEdit;
- Label3: TLabel;
- ZBGCODENAME: TEdit;
- TBCopy: TToolButton;
- TBBGZL: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- TBHT: TToolButton;
- TBFP: TToolButton;
- TBZXD: TToolButton;
- TBBGD: TToolButton;
- TBView: TToolButton;
- TBSBYS: TToolButton;
- TBSS: TToolButton;
- TBSSCX: TToolButton;
- TBSH: TToolButton;
- TBSHCX: TToolButton;
- TBAll: TToolButton;
- Label2: TLabel;
- ZC3BGNameEng: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton1: TToolButton;
- tv2Column1: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- tv2Column3: TcxGridDBColumn;
- tv2Column4: TcxGridDBColumn;
- tv2Column5: TcxGridDBColumn;
- tv2Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- Label4: TLabel;
- Zorderno: TEdit;
- ToolButton2: TToolButton;
- MovePanel1: TMovePanel;
- Label7: TLabel;
- Label9: TLabel;
- Edit2: TEdit;
- Label10: TLabel;
- Label11: TLabel;
- bgdate: TDateTimePicker;
- B7DaoHuoGang: TBtnEditA;
- htdate: TDateTimePicker;
- Label12: TLabel;
- chuandate: TDateTimePicker;
- Label13: TLabel;
- guixing: TEdit;
- Label14: TLabel;
- huodai: TBtnEditA;
- Label15: TLabel;
- tdno: TEdit;
- Button1: TButton;
- Button2: TButton;
- Panel3: TPanel;
- Label19: TLabel;
- Panel6: TPanel;
- Image1: TImage;
- Button7: TButton;
- RadioGroup2: TRadioGroup;
- ToolButton3: TToolButton;
- TV1Column16: TcxGridDBColumn;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- TV1Column4: TcxGridDBColumn;
- btn1: TToolButton;
- btn2: TToolButton;
- Label16: TLabel;
- Filler: TEdit;
- TV1Column18: TcxGridDBColumn;
- TV1Column19: TcxGridDBColumn;
- Panel2: TPanel;
- cxGrid1: TcxGrid;
- TV2: TcxGridDBTableView;
- cxGridDBColumn32: TcxGridDBColumn;
- cxGridDBColumn33: TcxGridDBColumn;
- cxGridDBColumn34: TcxGridDBColumn;
- cxGridDBColumn35: TcxGridDBColumn;
- cxGridDBColumn36: TcxGridDBColumn;
- cxGridDBColumn37: TcxGridDBColumn;
- cxGridDBColumn38: TcxGridDBColumn;
- cxGridDBColumn39: TcxGridDBColumn;
- cxGridDBColumn40: TcxGridDBColumn;
- cxGridDBColumn41: TcxGridDBColumn;
- cxGridDBColumn42: TcxGridDBColumn;
- cxGridDBColumn43: TcxGridDBColumn;
- cxGridDBColumn44: TcxGridDBColumn;
- cxGridDBColumn45: TcxGridDBColumn;
- cxGridDBColumn46: TcxGridDBColumn;
- cxGridDBColumn47: TcxGridDBColumn;
- cxGridDBColumn48: TcxGridDBColumn;
- cxGridDBColumn50: TcxGridDBColumn;
- cxGridDBColumn51: TcxGridDBColumn;
- cxGridDBColumn52: TcxGridDBColumn;
- cxGridDBColumn53: TcxGridDBColumn;
- cxGridLevel2: TcxGridLevel;
- Label17: TLabel;
- A6PONO: TEdit;
- TV1Column1: TcxGridDBColumn;
- TV1Column2: TcxGridDBColumn;
- Label18: TLabel;
- DCNO: TEdit;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBAddClick(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure zGCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBSSClick(Sender: TObject);
- procedure TBSSCXClick(Sender: TObject);
- procedure TBHDClick(Sender: TObject);
- procedure TBHDCXClick(Sender: TObject);
- procedure TBSHClick(Sender: TObject);
- procedure TBSHCXClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure Button2Click(Sender: TObject);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure Button7Click(Sender: TObject);
- procedure Image1Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure TV1DblClick(Sender: TObject);
- procedure btn1Click(Sender: TObject);
- procedure btn2Click(Sender: TObject);
- procedure ZordernoChange(Sender: TObject);
- procedure ZordernoKeyPress(Sender: TObject; var Key: Char);
-
-
-// procedure img1Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- function GetShellFolders(strDir: string): string;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- procedure InitButton();
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1, canshu3: string;
- FDY: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmBaoGuanList.InitButton();
-begin
- TBAdd.Visible := False;
- TBEdit.Visible := False;
- TBDel.Visible := False;
-// TBCopy.Visible := False;
- TBSS.Visible := False;
- TBSSCX.Visible := False;
-// TBHD.Visible := False;
-// TBHDcx.Visible := False;
- TBSH.Visible := False;
- TBSHCX.Visible := False;
- ToolButton2.Visible := False;
- ToolButton3.Visible := False;
- btn1.Visible := false;
- ToolButton1.Visible := False;
- TBExport.Visible := False;
-
- if canshu3 = 'ҵԱ' then
- begin
- btn1.Visible := True;
- TBExport.Visible := False;
- end
- else
- begin
- TBExport.Visible := true;
- ToolButton1.Visible := true;
- end;
- if cxTabControl1.TabIndex = 2 then
- begin
-// ToolButton3.Visible := True;
-// ToolButton2.Visible := True;
- TBEdit.Visible := True;
- end;
- if Trim(Self.Caption) = 'ع' then //
- begin
-// TBAdd.Visible:=True;TBEdit.Visible:=True;TBDel.Visible:=True;TBCopy.Visible:=True;
-// TBSS.Visible:=False; TBSSCX.Visible:=False;TBAll.Visible:=True;
-// TBBGZL.Visible:=True;TBHT.Visible:=True;TBFP.Visible:=True;
-// TBZXD.Visible:=True;TBBGD.Visible:=True;TBSBYS.Visible:=True;
-// cxTabControl1.TabIndex:=0;
-// cxTabControl1.Visible:=False;
-// v1Column31.Visible:=False;
-// v1Column31.Hidden:=True;
- if cxTabControl1.TabIndex = 0 then
- begin
- TBAdd.Visible := True;
- TBEdit.Visible := True;
- TBDel.Visible := True;
- TBCopy.Visible := True;
- TBSS.Visible := True
- end
- else if cxTabControl1.TabIndex = 1 then
- begin
- TBSSCX.Visible := True;
- TBEdit.Visible := true;
-// TBHD.Visible := True;
- TBSH.Visible := True;
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
-// TBHDcx.Visible := True;
- TBSHCX.Visible := True;
- end
- else if cxTabControl1.TabIndex = 3 then
- begin
-// TBHDcx.Visible := True;
-
- end;
-
- end
- else if Trim(Self.Caption) = '¼' then
- begin
- if cxTabControl1.TabIndex = 0 then
- begin
- TBAdd.Visible := True;
- TBEdit.Visible := True;
- TBDel.Visible := True;
- TBCopy.Visible := True;
- TBSS.Visible := True
- end
- else if cxTabControl1.TabIndex = 1 then
- begin
- TBSSCX.Visible := True;
- TBEdit.Visible := true;
-// TBHD.Visible := True;
- end;
-
-
-// TBSS.Visible:=True; TBSSCX.Visible:=True;TBAll.Visible:=True;
-// TBBGZL.Visible:=True;TBHT.Visible:=True;TBFP.Visible:=True;
-// TBZXD.Visible:=True;TBBGD.Visible:=True;TBSBYS.Visible:=True;
-// cxTabControl1.TabIndex:=0;
- end
- else if Trim(Self.Caption) = '¼(Ȩ)' then
- begin
-// TBAdd.Visible:=True;TBEdit.Visible:=True;TBDel.Visible:=True;TBCopy.Visible:=True;
-// TBSS.Visible:=True; TBSSCX.Visible:=True;TBAll.Visible:=True;
-// TBBGZL.Visible:=True;TBHT.Visible:=True;TBFP.Visible:=True;
-// TBZXD.Visible:=True;TBBGD.Visible:=True;TBSBYS.Visible:=True;
-// cxTabControl1.TabIndex:=0;
-
- if cxTabControl1.TabIndex = 0 then
- begin
- TBAdd.Visible := True;
- TBEdit.Visible := True;
- TBDel.Visible := True;
- TBCopy.Visible := True;
- TBSS.Visible := True
- end
- else if cxTabControl1.TabIndex = 1 then
- begin
- TBSSCX.Visible := True;
- TBEdit.Visible := true;
-// TBHD.Visible := True;
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
-// TBHDcx.Visible := True;
- end;
- end
- else if Trim(Self.Caption) = 'ϲѯ(Ȩ)' then
- begin
-// TBBGZL.Visible:=True;TBHT.Visible:=True;TBFP.Visible:=True;
-// TBZXD.Visible:=True;TBBGD.Visible:=True;TBSBYS.Visible:=True; TBAll.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = 'ϴӡѯ' then
- begin
-// TBBGZL.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = 'غͬӡѯ' then
- begin
-// TBHT.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = 'طƱӡѯ' then
- begin
-// TBFP.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = 'װ䵥ӡѯ' then
- begin
-// TBZXD.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = 'صӡѯ' then
- begin
-// TBBGD.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = '걨Ҫشӡѯ' then
- begin
-// TBSBYS.Visible:=True;
-// cxTabControl1.TabIndex:=4;
-// cxTabControl1.Visible:=False;
- end
- else if Trim(Self.Caption) = 'Ϻ˶' then
- begin
-// TBHD.Visible:=True; TBHDCX.Visible:=True; TBAll.Visible:=True;
-// TBBGZL.Visible:=True;TBHT.Visible:=True;TBFP.Visible:=True;
-// TBZXD.Visible:=True;TBBGD.Visible:=True;TBSBYS.Visible:=True;
-// cxTabControl1.TabIndex:=1;
- end
- else if Trim(Self.Caption) = '' then
- begin
-// TBSH.Visible:=True; TBSHCX.Visible:=True; TBAll.Visible:=True;
-// TBBGZL.Visible:=True;TBHT.Visible:=True;TBFP.Visible:=True;
-// TBZXD.Visible:=True;TBBGD.Visible:=True;TBSBYS.Visible:=True;
-// cxTabControl1.TabIndex:=2;
- end;
-end;
-
-procedure TfrmBaoGuanList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmBaoGuanList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := EndDate.DateTime - 90;
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select * from (');
- sql.Add('select A.* ');
- SQL.Add(',ZORDERNO=cast((select B.ORDERNO+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
- SQL.Add(',ZGCNAME=cast((select B.GCNAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
- SQL.Add(',ZC3BGNameEng=cast((select B.C3BGNameEng+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
- SQL.Add(',ZBGCODENAME=cast((select B.BGCODENAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where A.Valid=''Y'' ');
-// sql.Add(fwhere);
-
- if cxTabControl1.TabIndex = 0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
-
- end
- else if cxTabControl1.TabIndex = 1 then
- begin //and isnull(OKPerson,'''')<>''''
- sql.Add(' and isnull(Status,'''')='''' ');
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
- sql.Add(' and isnull(Status,'''')='''' ');
- end
- else
- begin
-
- end;
- sql.Add(')AA WHERE 1=1');
- sql.Add(fwhere);
- if Caption = 'ع' then
- begin
- sql.Add(' and HTDATE>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and HTDATE<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('ORDER BY htdate DESC');
- end
- else
- begin
- sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('ORDER BY FILLTIME DESC');
- end;
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmBaoGuanList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, 'ع7');
- WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmBaoGuanList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, 'ع7');
- ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
- InitButton();
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmBaoGuanList.TBExportClick(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// SelExportData(Tv1, ADOQueryMain, 'б');
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-
- FDY := '1';
- LBName := RadioGroup2.Items.Strings[RadioGroup2.ItemIndex];
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\б.rmf';
- ExportFtErpFile('б.rmf', ADOQueryPrint);
-
- with ADOQueryPrint do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add(' exec P_Print_DCBGD @begdate=' + quotedstr(Trim(FormatDateTime('yyyy-MM-dd', begdate.DateTime))) + ',@Enddate=' + quotedstr(Trim(FormatDateTime('yyyy-MM-dd', Enddate.DateTime + 1))));
- SQL.Add(',@STATUS=' + QUOTEDSTR(Trim(IntToStr(cxTabControl1.TabIndex))));
-// sql.Add('select A.* ');
-// SQL.Add(',ZORDERNO=cast((select B.ORDERNO+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZGCNAME=cast((select B.GCNAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZC3BGNameEng=cast((select B.C3BGNameEng+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZBGCODENAME=cast((select B.BGCODENAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
-// sql.Add(' where A.Valid=''Y'' AND B.SVALID=''Y'' ');
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// if Caption = 'ع' then
-// begin
-// SQL.Add('ORDER BY htdate DESC');
-// end
-// else
-// begin
-// SQL.Add('ORDER BY FILLTIME DESC');
-// end;
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
- if FDY = '0' then
- begin
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else if FDY = '1' then
- begin
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
-// fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\б.xls';
- fImagePath2 := GetShellFolders('Desktop') + '\б.xls';
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
- end;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
- Panel3.Visible := False;
-
-end;
-
-function TfrmBaoGuanList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmBaoGuanList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmBaoGuanList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmBaoGuanList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-procedure TfrmBaoGuanList.TBDelClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if cxTabControl1.TabIndex <> 0 then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- if DelData() then
- begin
- InitGrid();
- end;
-end;
-
-function TfrmBaoGuanList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- if trim(cds_Main.fieldbyname('filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('DZ˽ֹ!', 'ʾ', 0);
- ADOQueryCmd.Connection.RollbackTrans;
- exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBAddClick(Sender: TObject);
-begin
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := '';
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.TBEditClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-// if CANSHU3 = 'ҵԱ' then
-// begin
-// if trim(cds_Main.fieldbyname('filler').AsString) <> Trim(DName) then
-// begin
-// Application.MessageBox('DZ˽ֹ!', 'ʾ', 0);
-// exit;
-// end;
-// end;
- if CDS_Main.fieldbyname('BGSTATUS').AsString = '' then
- begin
- Application.MessageBox('ѱز!', 'ʾ', 0);
- Exit;
- end;
-
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- if (Trim(Self.Caption) = 'ع') and (cxTabControl1.TabIndex = 1) then
- begin
- ToolButton4.Visible := True;
- end;
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanList.cxTabControl1Change(Sender: TObject);
-begin
- InitButton();
- InitGrid();
-end;
-
-procedure TfrmBaoGuanList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanList.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- if Trim(A4FPNO.Text) = '' then
- Exit;
- fsj := ' and isnull(A.A4FPNO,'''') like ''' + '%' + Trim(A4FPNO.Text) + '%' + '''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
- if cxTabControl1.TabIndex = 0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end
- else
- begin
- if cxTabControl1.TabIndex = 1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanList.zGCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- InitGrid();
-
- end;
-end;
-
-procedure TfrmBaoGuanList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmBaoGuanList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmBaoGuanList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBSSClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 0 then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- if CANSHU3 = 'ҵԱ' then
- begin
- if trim(cds_Main.fieldbyname('filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('DZ˽ֹ!', 'ʾ', 0);
- ADOQueryCmd.Connection.RollbackTrans;
- exit;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=getdate(),SChker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBSSCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 1 then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- if trim(cds_Main.fieldbyname('filler').AsString) <> Trim(DName) then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('DZ˽ֹ!', 'ʾ', 0);
-// ADOQueryCmd.Connection.RollbackTrans;
- exit;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('OKPerson').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('Ѻ˶Բܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- if CANSHU3 = 'ҵԱ' then
- begin
- if trim(cds_Main.fieldbyname('filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('DZ˽ֹ!', 'ʾ', 0);
- ADOQueryCmd.Connection.RollbackTrans;
- exit;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=Null,SChker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBHDClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 1 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִк˶Բ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status=''Ѻ˶'',OKTime=getdate(),OKPerson=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBHDCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('Chker').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('˲ܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִк˶Գ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',OKtime=Null,OKPerson=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBSHClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 1 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBSHCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˳', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=Null,Chker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('س')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanList.ToolButton1Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- FDY := '0';
- panel3.Visible := True;
-end;
-
-procedure TfrmBaoGuanList.ToolButton2Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
-// if CDS_Main.Locate('SSel', True, []) = False then
-// begin
-// Application.MessageBox('ûѡ!', 'ʾ', 0);
-// Exit;
-// end;
- MovePanel1.Visible := True;
-
- B7DaoHuoGang.Text := Trim(CDS_Main.fieldbyname('B7DaoHuoGang').AsString);
- Edit2.Text := Trim(CDS_Main.fieldbyname('A4FPNO').AsString);
- if CDS_Main.fieldbyname('bgdate').AsString = '' then
- begin
- bgdate.DateTime := SGetServerDateTime(ADOQueryTemp);
- end
- else
- begin
- bgdate.DateTime := CDS_Main.fieldbyname('bgdate').asdatetime;
- end;
- htdate.DateTime := CDS_Main.fieldbyname('htdate').asdatetime;
- chuandate.DateTime := CDS_Main.fieldbyname('chuandate').asdatetime;
-// if Application.MessageBox('ȷҪִ˳', 'ʾ', 32 + 4) <> IDYES then
-// Exit;
-
-end;
-
-procedure TfrmBaoGuanList.Button1Click(Sender: TObject);
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set bgStatus=''''');
- sql.Add(',bgdate=' + quotedstr(FormatDateTime('yyyy-MM-dd', bgdate.DateTime)));
- sql.add(',htdate=' + quotedstr(FormatDateTime('yyyy-MM-dd', htdate.DateTime)));
- sql.Add(',A4FPNO=' + quotedstr(Trim(Edit2.Text)));
- sql.Add(',B7DaoHuoGang=' + quotedstr(Trim(B7DaoHuoGang.Text)));
- sql.add(',chuandate=' + quotedstr(FormatDateTime('yyyy-MM-dd', chuandate.DateTime)));
- sql.Add(',guixing=' + quotedstr(Trim(guixing.Text)));
- sql.Add(',huodai=' + quotedstr(Trim(huodai.Text)));
- sql.Add(',tdno=' + quotedstr(Trim(tdno.Text)));
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ȷ')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
-
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.Button2Click(Sender: TObject);
-begin
- MovePanel1.Visible := False;
-end;
-
-procedure TfrmBaoGuanList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmBaoGuanList.Button7Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- LBName := RadioGroup2.Items.Strings[RadioGroup2.ItemIndex];
- if canshu3 = 'ҵԱ' then
- begin
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '(ҵ).rmf';
- ExportFtErpFile(Trim(LBName) + '(ҵ).rmf', ADOQueryPrint);
- end
- else
- begin
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf';
- ExportFtErpFile(Trim(LBName) + '.rmf', ADOQueryPrint);
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete TBSubID where DName=''' + Trim(DCode) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM TBSubID where 1=2 ');
- open;
- end;
-
- CDS_Main.DisableControls;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if Fieldbyname('Ssel').AsBoolean then
- begin
-
- ADOQueryCmd.append;
- ADOQueryCmd.fieldbyname('SubId').Value := Trim(CDS_Main.fieldbyname('bgid').AsString);
- ADOQueryCmd.fieldbyname('Dname').Value := Trim(DCode);
- ADOQueryCmd.post;
- end;
- Next;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- end;
- CDS_Main.EnableControls;
- if LBName = 'Ʊ' then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD4 ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end
- else
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD2 ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end;
-
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if FDY = '0' then
- begin
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else if FDY = '1' then
- begin
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\' + Trim(CDS_Main.fieldbyname('orderno').AsString) + '.xls';
- ShowMessage(fImagePath2);
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
- end;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
- Panel3.Visible := False;
-end;
-
-procedure TfrmBaoGuanList.Image1Click(Sender: TObject);
-begin
- panel3.Visible := false;
-end;
-
-procedure TfrmBaoGuanList.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set bgStatus=NULL');
-
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ȡȷ')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanList.TV1DblClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if (cxTabControl1.TabIndex <> 0) and (cxTabControl1.TabIndex <> 1) then
- Exit;
-
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- if (Trim(Self.Caption) = 'ع') and (cxTabControl1.TabIndex = 1) then
- begin
- ToolButton4.Visible := True;
- end;
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanList.btn1Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- RadioGroup2.Items.Clear;
- RadioGroup2.Items.Add('');
- RadioGroup2.Items.Add('Ʊ');
- FDY := '0';
- panel3.Visible := True;
-
-end;
-
-procedure TfrmBaoGuanList.btn2Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- FDY := '1';
- panel3.Visible := True;
-end;
-
-procedure TfrmBaoGuanList.ZordernoChange(Sender: TObject);
-begin
- TBFind.Click();
-end;
-
-procedure TfrmBaoGuanList.ZordernoKeyPress(Sender: TObject; var Key: Char);
-begin
-// 2123
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGD.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGD.dfm
deleted file mode 100644
index 62bd322..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGD.dfm
+++ /dev/null
@@ -1,985 +0,0 @@
-object frmBaoGuanListBGD: TfrmBaoGuanListBGD
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#21333#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- Visible = False
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGD.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGD.pas
deleted file mode 100644
index 1504a6d..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGD.pas
+++ /dev/null
@@ -1,684 +0,0 @@
-unit U_BaoGuanListBGD;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListBGD = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListBGD: TfrmBaoGuanListBGD;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListBGD.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListBGD:=nil;
-end;
-
-procedure TfrmBaoGuanListBGD.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListBGD.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListBGD.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListBGD.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('BGD',Tv1,'ع');
- WriteCxGrid('ϸBGD',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListBGD.FormShow(Sender: TObject);
-begin
- ReadCxGrid('BGD',Tv1,'ع');
- ReadCxGrid('ϸBGD',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListBGD.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListBGD.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListBGD.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListBGD.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListBGD.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListBGD.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListBGD.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListBGD.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListBGD.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListBGD.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListBGD.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListBGD.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZL.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZL.dfm
deleted file mode 100644
index 70f5667..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZL.dfm
+++ /dev/null
@@ -1,979 +0,0 @@
-object frmBaoGuanListBGZL: TfrmBaoGuanListBGZL
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#36164#26009#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZL.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZL.pas
deleted file mode 100644
index 530b236..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZL.pas
+++ /dev/null
@@ -1,700 +0,0 @@
-unit U_BaoGuanListBGZL;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListBGZL = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListBGZL: TfrmBaoGuanListBGZL;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListBGZL.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListBGZL:=nil;
-end;
-
-procedure TfrmBaoGuanListBGZL.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListBGZL.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListBGZL.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListBGZL.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('',Tv1,'ع');
- WriteCxGrid('ϸ',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListBGZL.FormShow(Sender: TObject);
-begin
- ReadCxGrid('',Tv1,'ع');
- ReadCxGrid('ϸ',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListBGZL.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListBGZL.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListBGZL.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListBGZL.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListBGZL.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListBGZL.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListBGZL.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListBGZL.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListBGZL.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListBGZL.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListBGZL.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- //fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='֯˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱYD.rmf';
- end else
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='˽˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱJF.rmf';
- end;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- //fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='֯˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥YD.rmf';
- end else
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='˽˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥JF.rmf';
- end;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else ZheSuanMiQty end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListBGZL.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZLCX.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZLCX.dfm
deleted file mode 100644
index c413407..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZLCX.dfm
+++ /dev/null
@@ -1,985 +0,0 @@
-object frmBaoGuanListBGZLCX: TfrmBaoGuanListBGZLCX
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#36164#26009#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZLCX.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZLCX.pas
deleted file mode 100644
index 5d4ae01..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListBGZLCX.pas
+++ /dev/null
@@ -1,684 +0,0 @@
-unit U_BaoGuanListBGZLCX;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListBGZLCX = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListBGZLCX: TfrmBaoGuanListBGZLCX;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListBGZLCX.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListBGZLCX:=nil;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListBGZLCX.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('BGZL',Tv1,'ع');
- WriteCxGrid('ϸBGZL',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.FormShow(Sender: TObject);
-begin
- ReadCxGrid('BGZL',Tv1,'ع');
- ReadCxGrid('ϸBGZL',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListBGZLCX.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListBGZLCX.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListBGZLCX.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListBGZLCX.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListBGZLCX.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListBGZLCX.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListBGZLCX.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListBGZLCX.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListBGZLCX.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListBGZLCX.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListFP.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListFP.dfm
deleted file mode 100644
index c687967..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListFP.dfm
+++ /dev/null
@@ -1,985 +0,0 @@
-object frmBaoGuanListFP: TfrmBaoGuanListFP
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#21457#31080#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- Visible = False
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListFP.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListFP.pas
deleted file mode 100644
index d8f4286..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListFP.pas
+++ /dev/null
@@ -1,692 +0,0 @@
-unit U_BaoGuanListFP;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListFP = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListFP: TfrmBaoGuanListFP;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListFP.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListFP:=nil;
-end;
-
-procedure TfrmBaoGuanListFP.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListFP.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListFP.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListFP.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListFP.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListFP.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('FP',Tv1,'ع');
- WriteCxGrid('ϸFP',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListFP.FormShow(Sender: TObject);
-begin
- ReadCxGrid('FP',Tv1,'ع');
- ReadCxGrid('ϸFP',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListFP.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListFP.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListFP.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListFP.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListFP.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListFP.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListFP.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListFP.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListFP.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListFP.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListFP.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListFP.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- //fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='֯˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱYD.rmf';
- end else
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='˽˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱJF.rmf';
- end;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListFP.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListHT.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListHT.dfm
deleted file mode 100644
index b41850c..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListHT.dfm
+++ /dev/null
@@ -1,985 +0,0 @@
-object frmBaoGuanListHT: TfrmBaoGuanListHT
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#21512#21516#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- Visible = False
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListHT.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListHT.pas
deleted file mode 100644
index 834876b..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListHT.pas
+++ /dev/null
@@ -1,684 +0,0 @@
-unit U_BaoGuanListHT;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListHT = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListHT: TfrmBaoGuanListHT;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListHT.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListHT:=nil;
-end;
-
-procedure TfrmBaoGuanListHT.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListHT.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListHT.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListHT.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListHT.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListHT.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('HT',Tv1,'ع');
- WriteCxGrid('ϸHT',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListHT.FormShow(Sender: TObject);
-begin
- ReadCxGrid('HT',Tv1,'ع');
- ReadCxGrid('ϸHT',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListHT.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListHT.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListHT.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListHT.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListHT.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListHT.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListHT.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListHT.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListHT.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListHT.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListHT.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListHT.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListHT.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListQR.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListQR.dfm
deleted file mode 100644
index 8c17b33..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListQR.dfm
+++ /dev/null
@@ -1,1314 +0,0 @@
-object frmBaoGuanListQR: TfrmBaoGuanListQR
- Left = 212
- Top = 119
- Width = 1384
- Height = 670
- Caption = #25253#20851#36164#26009#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1376
- Height = 62
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 95
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object TBView: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = TBViewClick
- end
- object ToolButton1: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25171#21360#25253#20851#21333
- ImageIndex = 4
- OnClick = ToolButton1Click
- end
- object ToolButton2: TToolButton
- Left = 288
- Top = 0
- AutoSize = True
- Caption = #25253#20851#30830#35748
- ImageIndex = 31
- OnClick = ToolButton2Click
- end
- object ToolButton3: TToolButton
- Left = 375
- Top = 0
- AutoSize = True
- Caption = #21462#28040#30830#35748
- ImageIndex = 52
- OnClick = ToolButton3Click
- end
- object ToolButton4: TToolButton
- Left = 462
- Top = 0
- AutoSize = True
- Caption = #36864#21333
- ImageIndex = 6
- OnClick = ToolButton4Click
- end
- object ToolButton5: TToolButton
- Left = 525
- Top = 0
- AutoSize = True
- Caption = #21462#28040#36864#21333
- ImageIndex = 7
- OnClick = ToolButton5Click
- end
- object TBAll: TToolButton
- Left = 612
- Top = 0
- AutoSize = True
- Caption = #20840#37096#36164#26009
- ImageIndex = 4
- Wrap = True
- Visible = False
- OnClick = TBAllClick
- end
- object btn1: TToolButton
- Left = 0
- Top = 30
- AutoSize = True
- Caption = #30452#25509#23548#20986
- ImageIndex = 26
- OnClick = btn1Click
- end
- object TBBGZL: TToolButton
- Left = 87
- Top = 30
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 14
- Visible = False
- OnClick = TBBGZLClick
- end
- object TBHT: TToolButton
- Left = 174
- Top = 30
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = TBHTClick
- end
- object TBFP: TToolButton
- Left = 237
- Top = 30
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = TBFPClick
- end
- object TBZXD: TToolButton
- Left = 300
- Top = 30
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = TBZXDClick
- end
- object TBBGD: TToolButton
- Left = 375
- Top = 30
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = TBBGDClick
- end
- object TBSBYS: TToolButton
- Left = 450
- Top = 30
- AutoSize = True
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = TBSBYSClick
- end
- object TBExport: TToolButton
- Left = 537
- Top = 30
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 600
- Top = 30
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 62
- Width = 1376
- Height = 63
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label6: TLabel
- Left = 376
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 233
- Top = 35
- Width = 24
- Height = 12
- Caption = #24037#21378
- end
- object Label8: TLabel
- Left = 550
- Top = 11
- Width = 48
- Height = 12
- Caption = #23458#25143#21517#31216
- end
- object Label3: TLabel
- Left = 550
- Top = 34
- Width = 48
- Height = 12
- Caption = #25253#20851#21697#21517
- end
- object Label2: TLabel
- Left = 388
- Top = 36
- Width = 48
- Height = 12
- Caption = #33521#25991#21697#21517
- end
- object Label4: TLabel
- Left = 209
- Top = 12
- Width = 48
- Height = 12
- Caption = #35745#21010#21333#21495
- end
- object Label16: TLabel
- Left = 874
- Top = 35
- Width = 36
- Height = 12
- Caption = #30331#35760#20154
- end
- object Label17: TLabel
- Left = 706
- Top = 34
- Width = 48
- Height = 12
- Caption = #26159#21542#36864#21333
- end
- object Label18: TLabel
- Left = 706
- Top = 10
- Width = 48
- Height = 12
- Caption = #26159#21542#25253#20851
- end
- object Label20: TLabel
- Left = 874
- Top = 11
- Width = 36
- Height = 12
- Caption = #25552#21333#21495
- end
- object Label1: TLabel
- Left = 1022
- Top = 11
- Width = 48
- Height = 12
- Caption = #23458#25143#21333#21495
- end
- object BegDate: TDateTimePicker
- Left = 105
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 105
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 442
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnKeyPress = A4FPNOKeyPress
- end
- object GCNAME: TEdit
- Tag = 2
- Left = 261
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = A4FPNOKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 602
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnKeyPress = A4FPNOKeyPress
- end
- object BGCODENAME: TEdit
- Tag = 2
- Left = 602
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 5
- OnKeyPress = A4FPNOKeyPress
- end
- object C3BGNameEng: TEdit
- Tag = 2
- Left = 442
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 6
- OnKeyPress = A4FPNOKeyPress
- end
- object orderno: TEdit
- Tag = 5
- Left = 261
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 7
- OnChange = ordernoChange
- OnKeyPress = ordernoKeyPress
- end
- object Filler: TEdit
- Tag = 2
- Left = 910
- Top = 31
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 8
- OnKeyPress = A4FPNOKeyPress
- end
- object ComboBox1: TComboBox
- Tag = 9
- Left = 754
- Top = 32
- Width = 97
- Height = 20
- ItemHeight = 12
- TabOrder = 9
- OnChange = ComboBox1Change
- Items.Strings = (
- ''
- #26159
- #21542)
- end
- object ComboBox2: TComboBox
- Tag = 9
- Left = 754
- Top = 8
- Width = 97
- Height = 20
- ItemHeight = 12
- TabOrder = 10
- OnChange = ComboBox2Change
- Items.Strings = (
- ''
- #26159
- #21542)
- end
- object TDNO: TEdit
- Tag = 2
- Left = 910
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 11
- OnKeyPress = A4FPNOKeyPress
- end
- object ComboBox3: TComboBox
- Tag = 9
- Left = 20
- Top = 8
- Width = 81
- Height = 20
- ItemHeight = 12
- ItemIndex = 1
- TabOrder = 12
- Text = #20986#36135#26085#26399
- OnChange = ComboBox1Change
- Items.Strings = (
- #24405#20837#26085#26399
- #20986#36135#26085#26399
- #33337#26399#26085#26399)
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 1072
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 13
- OnKeyPress = A4FPNOKeyPress
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 125
- Width = 1376
- Height = 22
- Align = alTop
- Enabled = False
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- Visible = False
- Properties.CustomButtons.Buttons = <>
- Properties.Style = 9
- Properties.TabIndex = 2
- Properties.Tabs.Strings = (
- #24453#36865#23457
- #24453#23457#26680
- #24050#23457#26680
- #20840#37096)
- OnChange = cxTabControl1Change
- ClientRectBottom = 22
- ClientRectRight = 1376
- ClientRectTop = 19
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 147
- Width = 1376
- Height = 492
- Align = alClient
- TabOrder = 3
- object TV1: TcxGridDBTableView
- PopupMenu = PopupMenu1
- OnDblClick = TV1DblClick
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = cxGridDBColumn12
- end
- item
- Kind = skSum
- Column = cxGridDBColumn13
- end
- item
- Kind = skSum
- Column = Tv1Column2
- end
- item
- Kind = skSum
- Column = TV1Column17
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 68
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #29366#24577
- DataBinding.FieldName = 'Status'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object tv2Column3: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object tv2Column4: TcxGridDBColumn
- Caption = #25253#20851
- DataBinding.FieldName = 'BGSTATUS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object tv2Column5: TcxGridDBColumn
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'FIILLTIME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 80
- end
- object tv2Column6: TcxGridDBColumn
- Caption = #36864#21333
- DataBinding.FieldName = 'TDSTATUS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #36864#21333#26085#26399
- DataBinding.FieldName = 'TDDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 81
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'TDNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'huodai'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 76
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #23458#25143#21517#31216
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 90
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 69
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #22806#38144#21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 107
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #21046#21333#21592
- DataBinding.FieldName = 'filler'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column16: TcxGridDBColumn
- Caption = #20462#25913#20154
- DataBinding.FieldName = 'EDITER'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 71
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 69
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'orderno'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #26797#32455
- #38024#32455
- #32463#32534
- #21050#32483
- #38024#32455#32463#32534)
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 71
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #20013#25991#21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 108
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #33521#25991#21697#21517
- DataBinding.FieldName = 'C3BGNameEng'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 108
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 109
- end
- object v1YSKeZhong: TcxGridDBColumn
- Tag = 2
- Caption = #20811#37325
- DataBinding.FieldName = 'YSKeZhong'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 73
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #38376#24133
- DataBinding.FieldName = 'YSFuKuan'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 65
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 77
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215
- DataBinding.FieldName = 'C6BGPrice'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 46
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 74
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #26679#21697#36153
- DataBinding.FieldName = 'HDFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #24320#31080#20215
- DataBinding.FieldName = 'KPPRICE'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 74
- end
- object Tv1Column1: TcxGridDBColumn
- Caption = #25253#20851#21697#21517
- DataBinding.FieldName = 'BGCODENAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 93
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 88
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 82
- end
- object Tv1Column2: TcxGridDBColumn
- Caption = #20307#31215
- DataBinding.FieldName = 'BGTJ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object TV1Column17: TcxGridDBColumn
- Caption = #20214#25968
- DataBinding.FieldName = 'JS'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 77
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #33337#26399
- DataBinding.FieldName = 'chuandate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = cxStyle1
- Width = 102
- end
- object Tv1Column3: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'MXNOTE'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 72
- end
- object Tv1Column5: TcxGridDBColumn
- Caption = #24037#21378#20195#30721
- DataBinding.FieldName = 'GCDM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 75
- end
- object Tv1Column6: TcxGridDBColumn
- Caption = #24037#21378
- DataBinding.FieldName = 'GCNAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 74
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #22320#22336
- DataBinding.FieldName = 'GCADDRESS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 70
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #30446#30340#22269
- DataBinding.FieldName = 'TOCOUNTRY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 78
- end
- object TV1Column18: TcxGridDBColumn
- Caption = #30830#35748#20154
- DataBinding.FieldName = 'QRREN'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 70
- end
- object TV1Column19: TcxGridDBColumn
- Caption = #20986#36135#26085#26399
- DataBinding.FieldName = 'htdate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 71
- end
- object TV1Column20: TcxGridDBColumn
- Caption = #23458#25143#21333#21495
- DataBinding.FieldName = 'A6PONO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column21: TcxGridDBColumn
- Caption = #35746#33329#21333#21495
- DataBinding.FieldName = 'DCNO'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 77
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object MovePanel1: TMovePanel
- Left = 436
- Top = 164
- Width = 249
- Height = 249
- TabOrder = 4
- Visible = False
- object Label7: TLabel
- Left = 26
- Top = 35
- Width = 48
- Height = 12
- Caption = #25253#20851#26085#26399
- end
- object Label9: TLabel
- Left = 26
- Top = 12
- Width = 48
- Height = 12
- Caption = #21457#31080#21495#30721
- end
- object Label10: TLabel
- Left = 38
- Top = 83
- Width = 36
- Height = 12
- Caption = #30446#30340#28207
- end
- object Label11: TLabel
- Left = 26
- Top = 60
- Width = 48
- Height = 12
- Caption = #20986#36135#26085#26399
- end
- object Label12: TLabel
- Left = 50
- Top = 108
- Width = 24
- Height = 12
- Caption = #33337#26399
- end
- object Label13: TLabel
- Left = 50
- Top = 132
- Width = 24
- Height = 12
- Caption = #26588#22411
- end
- object Label14: TLabel
- Left = 50
- Top = 155
- Width = 24
- Height = 12
- Caption = #36135#20195
- end
- object Label15: TLabel
- Left = 38
- Top = 180
- Width = 36
- Height = 12
- Caption = #25552#21333#21495
- end
- object Edit2: TEdit
- Tag = 1
- Left = 81
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 0
- end
- object bgdate: TDateTimePicker
- Left = 81
- Top = 32
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object B7DaoHuoGang: TBtnEditA
- Tag = 1
- Left = 82
- Top = 80
- Width = 100
- Height = 20
- Hint = 'LCTOPlace/'#30446#30340#28207
- TabOrder = 2
- OnBtnClick = B7DaoHuoGangBtnClick
- end
- object htdate: TDateTimePicker
- Left = 82
- Top = 55
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 3
- end
- object chuandate: TDateTimePicker
- Left = 82
- Top = 103
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 4
- end
- object guixing: TEdit
- Tag = 1
- Left = 81
- Top = 128
- Width = 100
- Height = 20
- TabOrder = 5
- end
- object huodai: TBtnEditA
- Tag = 1
- Left = 82
- Top = 152
- Width = 100
- Height = 20
- Hint = 'HDName/'#36135#20195#21517#31216
- TabOrder = 6
- OnBtnClick = huodaiBtnClick
- end
- object tdno1: TEdit
- Tag = 1
- Left = 81
- Top = 176
- Width = 100
- Height = 20
- TabOrder = 7
- end
- object Button1: TButton
- Left = 28
- Top = 204
- Width = 75
- Height = 21
- Caption = #20445#23384
- TabOrder = 8
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 132
- Top = 204
- Width = 75
- Height = 21
- Caption = #21462#28040
- TabOrder = 9
- OnClick = Button2Click
- end
- end
- object Panel3: TPanel
- Left = 695
- Top = 195
- Width = 231
- Height = 216
- TabOrder = 5
- Visible = False
- object Label19: TLabel
- Left = 48
- Top = 88
- Width = 6
- Height = 12
- end
- object Panel6: TPanel
- Left = 1
- Top = 1
- Width = 229
- Height = 23
- Align = alTop
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = #25253#34920#21517#31216
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Image1: TImage
- Left = 206
- Top = 3
- Width = 22
- Height = 16
- ParentShowHint = False
- Picture.Data = {
- 07544269746D617076040000424D760400000000000036000000280000001500
- 0000110000000100180000000000400400000000000000000000000000000000
- 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6
- F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040
- 404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080
- 808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000
- 000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00}
- ShowHint = True
- Transparent = True
- OnClick = Image1Click
- end
- end
- object Button7: TButton
- Left = 81
- Top = 181
- Width = 76
- Height = 21
- Caption = #30830#23450
- TabOrder = 1
- OnClick = Button7Click
- end
- object RadioGroup2: TRadioGroup
- Left = 56
- Top = 24
- Width = 129
- Height = 145
- ItemIndex = 0
- Items.Strings = (
- #25253#20851#23457#25209#21333
- #25253#20851#22235#36830#25171
- #24320#31080#20108#36830#25171)
- TabOrder = 2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 893
- Top = 217
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 858
- Top = 188
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowDialog = False
- ShowAfterExport = False
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 225
- Top = 209
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 252
- Top = 364
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- ShowPrintDialog = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 260
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 255
- Top = 335
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
- object cxStyleRepository1: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle1: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #40657#20307
- Font.Style = [fsBold]
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListQR.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListQR.pas
deleted file mode 100644
index 8616ee8..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListQR.pas
+++ /dev/null
@@ -1,1831 +0,0 @@
-unit U_BaoGuanListQR;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, comobj, Registry, dxSkinsCore,
- dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmBaoGuanListQR = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxTabControl1: TcxTabControl;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- GCNAME: TEdit;
- Label8: TLabel;
- KHName: TEdit;
- Label3: TLabel;
- BGCODENAME: TEdit;
- TBBGZL: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- TBHT: TToolButton;
- TBFP: TToolButton;
- TBZXD: TToolButton;
- TBBGD: TToolButton;
- TBView: TToolButton;
- TBSBYS: TToolButton;
- TBAll: TToolButton;
- Label2: TLabel;
- C3BGNameEng: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- v1YSKeZhong: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- Tv1Column1: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- Tv1Column2: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- Tv1Column3: TcxGridDBColumn;
- Tv1Column5: TcxGridDBColumn;
- Tv1Column6: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton1: TToolButton;
- tv2Column1: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- tv2Column3: TcxGridDBColumn;
- tv2Column4: TcxGridDBColumn;
- tv2Column5: TcxGridDBColumn;
- tv2Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- Label4: TLabel;
- orderno: TEdit;
- ToolButton2: TToolButton;
- TV1Column15: TcxGridDBColumn;
- MovePanel1: TMovePanel;
- Label7: TLabel;
- Label9: TLabel;
- Edit2: TEdit;
- Label10: TLabel;
- Label11: TLabel;
- bgdate: TDateTimePicker;
- B7DaoHuoGang: TBtnEditA;
- htdate: TDateTimePicker;
- Label12: TLabel;
- chuandate: TDateTimePicker;
- Label13: TLabel;
- guixing: TEdit;
- Label14: TLabel;
- huodai: TBtnEditA;
- Label15: TLabel;
- tdno1: TEdit;
- Button1: TButton;
- Button2: TButton;
- Panel3: TPanel;
- Label19: TLabel;
- Panel6: TPanel;
- Image1: TImage;
- Button7: TButton;
- RadioGroup2: TRadioGroup;
- ToolButton3: TToolButton;
- TV1Column16: TcxGridDBColumn;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- TV1Column17: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- btn1: TToolButton;
- ToolButton4: TToolButton;
- ToolButton5: TToolButton;
- TV1Column18: TcxGridDBColumn;
- Label16: TLabel;
- Filler: TEdit;
- TV1Column19: TcxGridDBColumn;
- Label17: TLabel;
- ComboBox1: TComboBox;
- Label18: TLabel;
- ComboBox2: TComboBox;
- Label20: TLabel;
- TDNO: TEdit;
- ComboBox3: TComboBox;
- TV1Column20: TcxGridDBColumn;
- Label1: TLabel;
- A6PONO: TEdit;
- TV1Column21: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBAddClick(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure GCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBSSClick(Sender: TObject);
- procedure TBSSCXClick(Sender: TObject);
- procedure TBHDClick(Sender: TObject);
- procedure TBHDCXClick(Sender: TObject);
- procedure TBSHClick(Sender: TObject);
- procedure TBSHCXClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure C3BGNameEngChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure Button2Click(Sender: TObject);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure Button7Click(Sender: TObject);
- procedure Image1Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure TV1DblClick(Sender: TObject);
- procedure btn1Click(Sender: TObject);
- procedure RMXLSExport1AfterExport(const aFileName: string);
- procedure RMXLSExport1BeforeExport(var aFileName: string; var aContinue: Boolean);
- procedure ToolButton4Click(Sender: TObject);
- procedure ToolButton5Click(Sender: TObject);
- procedure ordernoChange(Sender: TObject);
- procedure ordernoKeyPress(Sender: TObject; var Key: Char);
- procedure CheckBox1Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure ComboBox2Change(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- function GetDeskeptPath: string;
- function GetShellFolders(strDir: string): string;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- procedure InitButton();
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1, canshu3: string;
- fdy: string;
- fImagePath2: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun;
-
-{$R *.dfm}
-
-function TfrmBaoGuanListQR.GetDeskeptPath: string;
-begin
- Result := GetShellFolders('Desktop'); //ȡļе·
-end;
-
-function TfrmBaoGuanListQR.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmBaoGuanListQR.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmBaoGuanListQR.InitButton();
-begin
-
-end;
-
-procedure TfrmBaoGuanListQR.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmBaoGuanListQR.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := EndDate.DateTime - 90;
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListQR.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
-
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
-
- sql.Add('select A.*,B.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
- sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
-
- if cxTabControl1.TabIndex = 0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
-
- end
- else if cxTabControl1.TabIndex = 1 then
- begin //and isnull(OKPerson,'''')<>''''
-// sql.Add(' and isnull(OKPerson,'''')='''' and isnull(SChker,'''')<>'''' ');
- sql.Add(' and isnull(Status,'''')='''' ');
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
- sql.Add(' and isnull(Status,'''')='''' ');
-
- end
- else
- begin
-
- end;
-
- if ComboBox1.text = '' then
- begin
- sql.Add('and isnull(TDSTATUS,'''')<>''''');
- end
- else if ComboBox1.text = '' then
- begin
- sql.Add('and isnull(TDSTATUS,'''')=''''');
- end;
- if ComboBox2.text = '' then
- begin
- sql.Add('and isnull(BGSTATUS,'''')<>''''');
- end
- else if ComboBox2.text = '' then
- begin
- sql.Add('and isnull(BGSTATUS,'''')=''''');
- end;
- if ComboBox3.Text = '' then
- begin
- sql.Add(' and htdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and htdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- end
- else if ComboBox3.Text = '¼' then
- begin
- sql.Add(' and FILLTIME>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and FILLTIME<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- end
- else if ComboBox3.Text = '' then
- begin
- sql.Add(' and chuandate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and chuandate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- end;
-
- SQL.Add(fwhere);
- SQL.Add('ORDER BY htdate DESC');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListQR.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, 'ع7');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmBaoGuanListQR.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, 'ع7');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
- InitButton();
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmBaoGuanListQR.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
- SelExportData(Tv1, ADOQueryMain, 'б');
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmBaoGuanListQR.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmBaoGuanListQR.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmBaoGuanListQR.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-procedure TfrmBaoGuanListQR.TBDelClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 0 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- if DelData() then
- begin
- InitGrid();
- end;
-end;
-
-function TfrmBaoGuanListQR.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBAddClick(Sender: TObject);
-begin
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := '';
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBEditClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-// if cxTabControl1.TabIndex <> 0 then
-// Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- if (Trim(Self.Caption) = 'ع') and (cxTabControl1.TabIndex = 1) then
- begin
- ToolButton4.Visible := True;
- end;
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListQR.cxTabControl1Change(Sender: TObject);
-begin
- InitButton();
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListQR.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListQR.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmBaoGuanListQR.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
- if cxTabControl1.TabIndex = 0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end
- else
- begin
- if cxTabControl1.TabIndex = 1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListQR.GCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmBaoGuanListQR.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmBaoGuanListQR.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmBaoGuanListQR.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- canshu3 := self.canshu3;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBSSClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 0 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=getdate(),SChker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBSSCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 1 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('OKPerson').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('Ѻ˶Բܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=Null,SChker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBHDClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 1 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִк˶Բ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status=''Ѻ˶'',OKTime=getdate(),OKPerson=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBHDCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('Chker').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('˲ܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִк˶Գ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',OKtime=Null,OKPerson=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBSHClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 1 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBSHCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˳', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=Null,Chker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.C3BGNameEngChange(Sender: TObject);
-begin
- TBFind.Click();
-end;
-
-procedure TfrmBaoGuanListQR.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListQR.ToolButton1Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- FDY := '0';
- panel3.Visible := True;
-end;
-
-procedure TfrmBaoGuanListQR.ToolButton2Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
-// if CDS_Main.Locate('SSel', True, []) = False then
-// begin
-// Application.MessageBox('ûѡ!', 'ʾ', 0);
-// Exit;
-// end;
- MovePanel1.Visible := True;
-
- B7DaoHuoGang.Text := Trim(CDS_Main.fieldbyname('B7DaoHuoGang').AsString);
- Edit2.Text := Trim(CDS_Main.fieldbyname('A4FPNO').AsString);
- if CDS_Main.fieldbyname('bgdate').AsString = '' then
- begin
- bgdate.DateTime := SGetServerDateTime(ADOQueryTemp);
- end
- else
- begin
- bgdate.DateTime := CDS_Main.fieldbyname('bgdate').asdatetime;
- end;
-
- htdate.DateTime := CDS_Main.fieldbyname('htdate').asdatetime;
- chuandate.DateTime := CDS_Main.fieldbyname('chuandate').asdatetime;
- huodai.Text := Trim(CDS_Main.fieldbyname('huodai').AsString);
- guixing.Text := Trim(CDS_Main.fieldbyname('guixing').AsString);
- tdno1.Text := Trim(CDS_Main.fieldbyname('tdno').AsString);
-// if Application.MessageBox('ȷҪִ˳', 'ʾ', 32 + 4) <> IDYES then
-// Exit;
-
-end;
-
-procedure TfrmBaoGuanListQR.Button1Click(Sender: TObject);
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set bgStatus=''''');
- sql.Add(',bgdate=' + quotedstr(FormatDateTime('yyyy-MM-dd', bgdate.DateTime)));
- sql.add(',htdate=' + quotedstr(FormatDateTime('yyyy-MM-dd', htdate.DateTime)));
- sql.Add(',QRREN=' + quotedstr(Trim(DNAME)));
- sql.Add(',A4FPNO=' + quotedstr(Trim(Edit2.Text)));
- sql.Add(',B7DaoHuoGang=' + quotedstr(Trim(B7DaoHuoGang.Text)));
- sql.add(',chuandate=' + quotedstr(FormatDateTime('yyyy-MM-dd', chuandate.DateTime)));
- sql.Add(',guixing=' + quotedstr(Trim(guixing.Text)));
- sql.Add(',huodai=' + quotedstr(Trim(huodai.Text)));
- sql.Add(',tdno=' + quotedstr(Trim(tdno1.Text)));
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ȷ')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('EXEC P_Do_SCYF @BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- SQL.Add(',@DNAME=' + QUOTEDSTR(Trim(DNAME)));
-
- ExecSQL;
- end;
-
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.Button2Click(Sender: TObject);
-begin
- MovePanel1.Visible := False;
-end;
-
-procedure TfrmBaoGuanListQR.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmBaoGuanListQR.Button7Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName: string;
- ExcelApp: Variant;
- f1, fstr: string;
-begin
- LBName := RadioGroup2.Items.Strings[RadioGroup2.ItemIndex];
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf';
- ExportFtErpFile(Trim(LBName) + '.rmf', ADOQueryPrint);
- if LBName = 'Ʊ' then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD5 ');
-
- SQL.ADD('@bgid=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end
- else
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD ');
-
- SQL.ADD('@bgid=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end;
- if FileExists(fPrintFile) then
- begin
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- RMXLSExport1.ShowDialog := False;
- RMXLSExport1.ShowAfterExport := False;
- if FDY = '0' then
- begin
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else if FDY = '1' then
- begin
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
-// fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\' + Trim(CDS_Main.fieldbyname('orderno').AsString) + '.xls';
-// fImagePath2 := GetShellFolders('Desktop') + '\' + Trim(CDS_Main.fieldbyname('orderno').AsString) + '.xls';
-
- fstr := (StringReplace(Trim(CDS_Main.fieldbyname('orderno').AsString), '/', ',', [rfReplaceAll]));
-// ShowMessage(fstr);
- fImagePath2 := GetShellFolders('Desktop') + '\' + fstr + '.xls';
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
-
- if RadioGroup2.ItemIndex = 1 then
- begin
- ExcelApp := CreateOleObject('Excel.Application');
- ExcelApp.workBooks.Open(fImagePath2);
- ExcelApp.WorkSheets[1].name := 'Ʊ';
- ExcelApp.WorkSheets[2].name := '䵥';
- ExcelApp.WorkSheets[3].name := 'ص2';
- ExcelApp.WorkSheets[4].name := 'ۺͬ';
-// if not ExcelApp.ActiveWorkBook.Saved then
-// ExcelApp.ActiveSheet.PrintPreview;
- ExcelApp.WorkBooks.Close; //رչ
- if not VarIsEmpty(ExcelApp) then
- ExcelApp.Quit;
-
- end;
-
- end;
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
- Panel3.Visible := False;
-end;
-
-procedure TfrmBaoGuanListQR.Image1Click(Sender: TObject);
-begin
- panel3.Visible := false;
-end;
-
-procedure TfrmBaoGuanListQR.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if cxTabControl1.TabIndex <> 2 then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set bgStatus=NULL,QRREN=NULL');
-
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ȡȷ')));
- sql.Add(',' + quotedstr(trim('BGID' + trim(CDS_Main.FieldByName('BGID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.TV1DblClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if (cxTabControl1.TabIndex <> 0) and (cxTabControl1.TabIndex <> 1) then
- Exit;
-
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- if (Trim(Self.Caption) = 'ع') and (cxTabControl1.TabIndex = 1) then
- begin
- ToolButton4.Visible := True;
- end;
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.btn1Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- FDY := '1';
- panel3.Visible := True;
-end;
-
-procedure TfrmBaoGuanListQR.RMXLSExport1AfterExport(const aFileName: string);
-var
- ExcelApp: Variant;
-begin // 'C:\Users\Administrator\Desktop\123.xls'
- ExcelApp := CreateOleObject('Excel.Application');
-// ShowMessage(fImagePath2);
- ExcelApp.workBooks.Open(fImagePath2);
-
-// ExcelApp.Worksheets[1].activate;
- ExcelApp.WorkSheets[1].name := 'Ŀ3';
- ExcelApp.WorkSheets[2].name := 'Ŀ33';
-// ExcelApp.WorkSheets[3].name := 'Ŀ222';
-// ExcelApp.WorkBooks[1].SaveAs(aFileName, 56); //fileformat:=56 -- Office Excel 97-2003 format
-// if not ExcelApp.ActiveWorkBook.Saved then
-// ExcelApp.ActiveSheet.PrintPreview;
-
- ExcelApp.WorkBooks.Close; //رչ
- if not VarIsEmpty(ExcelApp) then
- ExcelApp.Quit;
- ExcelApp.Disconnect;
- ExcelApp := Unassigned;
- ExcelApp.free;
-end;
-
-procedure TfrmBaoGuanListQR.RMXLSExport1BeforeExport(var aFileName: string; var aContinue: Boolean);
-var
- ExcelApp: Variant;
-begin // 'C:\Users\Administrator\Desktop\123.xls'
- ExcelApp := CreateOleObject('Excel.Application');
-// ShowMessage(fImagePath2);
- ExcelApp.workBooks.Open(fImagePath2);
-
-// ExcelApp.Worksheets[1].activate;
- ExcelApp.WorkSheets[1].name := 'Ŀ2';
- ExcelApp.WorkSheets[2].name := 'Ŀ22';
-// ExcelApp.WorkSheets[3].name := 'Ŀ222';
-// ExcelApp.WorkBooks[1].SaveAs(aFileName, 56); //fileformat:=56 -- Office Excel 97-2003 format
-// if not ExcelApp.ActiveWorkBook.Saved then
-// ExcelApp.ActiveSheet.PrintPreview;
- ExcelApp.WorkBooks.Close; //رչ
- if not VarIsEmpty(ExcelApp) then
- ExcelApp.Quit;
- ExcelApp := Unassigned;
-
- ExcelApp.free;
-// if not ExcelApp.ActiveWorkBook.Saved then
-// ExcelApp.ActiveSheet.PrintPreview;
-// ExcelApp.free;
-end;
-
-procedure TfrmBaoGuanListQR.ToolButton4Click(Sender: TObject);
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set TDStatus=''''');
- sql.Add(',TDdate=GETDATE()');
-
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.ToolButton5Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set TDStatus=NULL');
- SQL.Add(',TDDATE=NULL');
-
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmBaoGuanListQR.ordernoChange(Sender: TObject);
-begin
-// try
-// ADOQueryMain.DisableControls;
-// with ADOQueryMain do
-// begin
-// Filtered := False;
-// Close;
-// sql.Clear;
-// sql.Add('select A.*,B.* ');
-// sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
-// sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
-// if cxTabControl1.TabIndex = 0 then
-// begin
-// sql.Add(' and isnull(SChker,'''')='''' ');
-// end
-// else if cxTabControl1.TabIndex = 1 then
-// begin
-// sql.Add(' and isnull(Status,'''')='''' ');
-// end
-// else if cxTabControl1.TabIndex = 2 then
-// begin
-// sql.Add(' and isnull(Status,'''')='''' ');
-//
-// end
-// else
-// begin
-//
-// end;
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('AND EXISTS(SELECT * FROM JYOrder_BaoGuan_SUB C WHERE ORDERNO LIKE ' + QUOTEDSTR('%' + Trim(orderno.Text) + '%'));
-// SQL.Add('AND C.BGID=A.BGID)');
-// SQL.Add('ORDER BY FILLTIME DESC');
-// Open;
-// end;
-// SCreateCDS20(ADOQueryMain, CDS_Main);
-// SInitCDSData20(ADOQueryMain, CDS_Main);
-// finally
-// ADOQueryMain.EnableControls;
-// end;
-end;
-
-procedure TfrmBaoGuanListQR.ordernoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
- sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
- if cxTabControl1.TabIndex = 0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end
- else if cxTabControl1.TabIndex = 1 then
- begin
- sql.Add(' and isnull(Status,'''')='''' ');
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
- sql.Add(' and isnull(Status,'''')='''' ');
-
- end
- else
- begin
-
- end;
- sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('AND EXISTS(SELECT * FROM JYOrder_BaoGuan_SUB C WHERE ORDERNO LIKE ' + QUOTEDSTR('%' + Trim(orderno.Text) + '%'));
- SQL.Add('AND C.BGID=A.BGID)');
- SQL.Add('ORDER BY FILLTIME DESC');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
- end;
-end;
-
-procedure TfrmBaoGuanListQR.CheckBox1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListQR.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListQR.ComboBox2Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListSBYS.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListSBYS.dfm
deleted file mode 100644
index 2cb2d1c..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListSBYS.dfm
+++ /dev/null
@@ -1,985 +0,0 @@
-object frmBaoGuanListSBYS: TfrmBaoGuanListSBYS
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#21333#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- Visible = False
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListSBYS.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListSBYS.pas
deleted file mode 100644
index 625f23a..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListSBYS.pas
+++ /dev/null
@@ -1,684 +0,0 @@
-unit U_BaoGuanListSBYS;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListSBYS = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListSBYS: TfrmBaoGuanListSBYS;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListSBYS.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListSBYS:=nil;
-end;
-
-procedure TfrmBaoGuanListSBYS.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListSBYS.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListSBYS.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListSBYS.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('SBYS',Tv1,'ع');
- WriteCxGrid('ϸSBYS',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListSBYS.FormShow(Sender: TObject);
-begin
- ReadCxGrid('SBYS',Tv1,'ع');
- ReadCxGrid('ϸSBYS',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListSBYS.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListSBYS.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListSBYS.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListSBYS.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListSBYS.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListSBYS.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListSBYS.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListSBYS.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListSBYS.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListSBYS.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListSBYS.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListSBYS.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListZXD.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListZXD.dfm
deleted file mode 100644
index 7c4b07e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListZXD.dfm
+++ /dev/null
@@ -1,985 +0,0 @@
-object frmBaoGuanListZXD: TfrmBaoGuanListZXD
- Left = 110
- Top = 82
- Width = 1162
- Height = 615
- Caption = #25253#20851#35013#31665#21333#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1146
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton12: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton12Click
- end
- object ToolButton7: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #25253#20851#36164#26009
- ImageIndex = 4
- Visible = False
- OnClick = ToolButton7Click
- end
- object ToolButton8: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #21512#21516
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #21457#31080
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #35013#31665#21333
- ImageIndex = 14
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #25253#20851#21333
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton11Click
- end
- object ToolButton3: TToolButton
- Left = 552
- Top = 0
- Caption = #30003#25253#35201#32032
- ImageIndex = 14
- Visible = False
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 635
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 698
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1146
- Height = 37
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label5: TLabel
- Left = 639
- Top = 12
- Width = 42
- Height = 12
- Caption = #23458#25143'PO#'
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #21512#21516#21495
- end
- object Label3: TLabel
- Left = 831
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 683
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- OnKeyPress = A5ConNOKeyPress
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 868
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = A6PONOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 91
- Width = 1146
- Height = 309
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column9
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v2Column6
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column26
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column27
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column28
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column29
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column30
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column18
- end
- item
- Kind = skSum
- Position = spFooter
- Column = v1Column19
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column26
- end
- item
- Kind = skSum
- Column = v1Column27
- end
- item
- Kind = skSum
- Column = v1Column28
- end
- item
- Kind = skSum
- Column = v1Column29
- end
- item
- Kind = skSum
- Column = v1Column30
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object v1Column15: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #31246#21495
- DataBinding.FieldName = 'A2ShuiHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 97
- end
- object v2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'A3HaiGuanBM'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 93
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'A5ConNO'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 125
- end
- object v1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #23458#25143'PO#'
- DataBinding.FieldName = 'A6PONO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #21457#31080#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v2Column6: TcxGridDBColumn
- Tag = 2
- Caption = #24320#33322#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#26588
- DataBinding.FieldName = 'B5HuoGui'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36816#28207
- DataBinding.FieldName = 'B6ChuYunGang'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 85
- end
- object v1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #21040#36135#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 51
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36152#26131#22269
- DataBinding.FieldName = 'B8MaoYiGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25269#36816#22269
- DataBinding.FieldName = 'B9DiYunGuo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'B10YunShuType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1Column8: TcxGridDBColumn
- Caption = #36152#26131#26041#24335
- DataBinding.FieldName = 'D2MaoYiType'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1Column16: TcxGridDBColumn
- Caption = #32467#27719#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column17: TcxGridDBColumn
- Caption = #25253#20851#26465#27454
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column18: TcxGridDBColumn
- Caption = #36816#36153
- DataBinding.FieldName = 'F2YunFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #20445#36153
- DataBinding.FieldName = 'F3BaoFee'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Caption = #36135#36816#20195#29702
- DataBinding.FieldName = 'F4HuoYunDaiLi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1Column22: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object v1Column23: TcxGridDBColumn
- Caption = #33322#21517#33322#27425
- DataBinding.FieldName = 'B1HangBan'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1Column24: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'B2TiDanHao'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 73
- end
- object v1Column25: TcxGridDBColumn
- Caption = #31665#21495#23553#21495
- DataBinding.FieldName = 'B4XiangNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 72
- end
- object v1Column21: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'F5ChuanGongSi'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column6: TcxGridDBColumn
- Caption = #30331#35760#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 61
- end
- object v1Column26: TcxGridDBColumn
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column27: TcxGridDBColumn
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQtyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v1Column28: TcxGridDBColumn
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- object v1Column29: TcxGridDBColumn
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object v1Column30: TcxGridDBColumn
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoneyHZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 70
- Width = 1146
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#25209
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1146
- ClientRectTop = 23
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 400
- Width = 1146
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid2
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 408
- Width = 1146
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource2
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- Column = cxGridDBColumn2
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 183
- end
- object cxGridDBColumn14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- object cxGridDBColumn15: TcxGridDBColumn
- Tag = 2
- Caption = #24133#23485'(CM)'
- DataBinding.FieldName = 'YSFuKuan'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn13: TcxGridDBColumn
- Tag = 2
- Caption = #32455#36896#26041#27861
- DataBinding.FieldName = 'YSZhiZaoType'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #38024#32455
- #32463#32534)
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Tag = 2
- Caption = #21697#29260
- DataBinding.FieldName = 'YSPinPai'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Tag = 2
- Caption = #29983#20135#21378#21830
- DataBinding.FieldName = 'YSShengChanShang'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = 'HS NO'
- DataBinding.FieldName = 'C2HSNO'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 132
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Width = 43
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215'(USD)'
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069'(USD)'
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#25968#37327
- DataBinding.FieldName = 'E1BZQty'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Tag = 2
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'E1BZUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'BALES'
- 'ROLLS')
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #23610#30721'(CBM)'
- DataBinding.FieldName = 'E2ChiMaQty'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- HeaderAlignmentHorz = taCenter
- Width = 64
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Tag = 2
- Caption = #21787#22836
- DataBinding.FieldName = 'E5MaiTou'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object PopupMenu1: TPopupMenu
- Left = 768
- Top = 168
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 472
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 912
- Top = 472
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 944
- Top = 472
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 200
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 320
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 208
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 288
- Top = 208
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListZXD.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListZXD.pas
deleted file mode 100644
index 6e83866..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanListZXD.pas
+++ /dev/null
@@ -1,692 +0,0 @@
-unit U_BaoGuanListZXD;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxButtonEdit, cxTextEdit, cxPC, BtnEdit, cxSplitter;
-
-type
- TfrmBaoGuanListZXD = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- v1Column4: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxSplitter1: TcxSplitter;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- v1Column11: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- Label5: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- A5ConNO: TEdit;
- v1Column15: TcxGridDBColumn;
- Label3: TLabel;
- A1ChuKouShang: TEdit;
- v1Column16: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1Column22: TcxGridDBColumn;
- v1Column23: TcxGridDBColumn;
- v1Column24: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column26: TcxGridDBColumn;
- v1Column27: TcxGridDBColumn;
- v1Column28: TcxGridDBColumn;
- v1Column29: TcxGridDBColumn;
- v1Column30: TcxGridDBColumn;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- cxGridDBColumn13: TcxGridDBColumn;
- cxGridDBColumn14: TcxGridDBColumn;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- ToolButton7: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- ToolButton8: TToolButton;
- ToolButton9: TToolButton;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ToolButton12: TToolButton;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure A6PONOKeyPress(Sender: TObject; var Key: Char);
- procedure A5ConNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- canshu1:string;
- canshu2:string;
- FDate:TDateTime;
- procedure InitGrid();
- function DelData():Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj:String);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanListZXD: TfrmBaoGuanListZXD;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp,U_BaoGuanInPut;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanListZXD.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanListZXD:=nil;
-end;
-
-procedure TfrmBaoGuanListZXD.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanListZXD.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
-end;
-
-procedure TfrmBaoGuanListZXD.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where Valid=''Y'' ');
- {if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and Filler='''+Trim(DName)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- sql.Add(' and BGDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+'''');
- sql.Add(' and BGDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''');
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanListZXD.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('ZXD',Tv1,'ع');
- WriteCxGrid('ϸZXD',Tv1,'ع');
- Close;
-end;
-
-procedure TfrmBaoGuanListZXD.FormShow(Sender: TObject);
-begin
- ReadCxGrid('ZXD',Tv1,'ع');
- ReadCxGrid('ϸZXD',Tv1,'ع');
-end;
-
-procedure TfrmBaoGuanListZXD.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('б',cxGrid1);
-end;
-
-procedure TfrmBaoGuanListZXD.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmBaoGuanListZXD.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main,False);
-end;
-procedure TfrmBaoGuanListZXD.InitSubGrid();
-begin
- if CDS_Main.IsEmpty=False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID='''+Trim(CDS_Main.fieldbyname('BGID').AsString)+'''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp,ClientDataSet2);
- SInitCDSData20(ADOQueryTemp,ClientDataSet2);
-end;
-
-function TfrmBaoGuanListZXD.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer='''+Trim(DName)+''',EditTime=getdate()');
- sql.Add(' where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer='''+Trim(DName)+''',SEditTime=getdate() where BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-procedure TfrmBaoGuanListZXD.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListZXD.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-
-
-procedure TfrmBaoGuanListZXD.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmBaoGuanListZXD.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A4FPNO.Text)='' then Exit;
- fsj:=' and isnull(A.A4FPNO,'''') like '''+'%'+Trim(A4FPNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-procedure TfrmBaoGuanListZXD.InitGridSql(var fsj:String);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- { if Trim(canshu1)<>'Ȩ' then
- begin
- SQL.Add(' and FillerCode='''+Trim(DCode)+'''');
- end;}
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(SChker,'''')='''' ');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(SChker,'''')<>'''' and isnull(Chker,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(Chker,'''')<>'''' ');
- end;
- end;
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmBaoGuanListZXD.A6PONOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A6PONO.Text)='' then Exit;
- fsj:=' and isnull(A.A6PONO,'''') like '''+'%'+Trim(A6PONO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.A5ConNOKeyPress(Sender: TObject;
- var Key: Char);
-var
- fsj:String;
-begin
- if Key=#13 then
- begin
- if Trim(A5ConNO.Text)='' then Exit;
- fsj:=' and isnull(A.A5ConNO,'''') like '''+'%'+Trim(A5ConNO.Text)+'%'+'''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton7Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton8Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\غͬ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton9Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\طƱ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton10Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- //fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='֯˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥YD.rmf';
- end else
- if Trim(CDS_Main.fieldbyname('A1ChuKouShang').AsString)='˽˾' then
- begin
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\װ䵥JF.rmf';
- end;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else ZheSuanMiQty end as C4BGQtyJS ');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\װ䵥.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton11Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ص.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton12Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut:=TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId:=Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible:=False;
- ToolBar2.Visible:=False;
- Panel1.Enabled:=False;
- Tv1.OptionsData.Editing:=False;
- if ShowModal=1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmBaoGuanListZXD.ToolButton3Click(Sender: TObject);
-var
- fPrintFile:string;
- EngMoney,BZZH:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,B.*,Case when C5BGUnit=''MTR'' then C4BGQty else Null end as C4BGQtyJS ');
- sql.Add(',Case when C5BGUnit<>''KG'' then E4JingZ else Null End As E4JingZJS');
- sql.Add(',Case when C5BGUnit<>''KG'' then ''KGS'' else Null End As JZUnit');
- sql.Add(',Case when C5BGUnit=''KG'' then ''KGS'' else C5BGUnit End As C5BGUnitJS');
- sql.add(' ,A1ChuKouShangEng=(select Note from KH_Zdy where Type=''A1ChuKouShang'' and ZdyName=A.A1ChuKouShang )');
- sql.add(' ,B6ChuYunGangEng=(select Note from KH_Zdy where Type=''B6ChuYunGang'' and ZdyName=A.B6ChuYunGang )');
- sql.Add(',HTDate=(select ORDDate from JYOrderCon_Main F where F.ConNo=A.A5ConNO)');
- sql.Add(',KHNameEng=(select KHNameEng from ZH_KH_Info KH where KH.KHNameJC=');
- sql.Add(' (select CustomerNoName from JYOrderCon_Main F where F.ConNo=A.A5ConNO ))');
- sql.Add(' from JYOrder_BaoGuan_Main A inner join JYOrder_BaoGuan_Sub B on A.BGId=B.BGId ');
- sql.Add(' where A.BGId='''+Trim(CDS_Main.fieldbyname('BGId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\걨Ҫ.rmf'),'ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanXSList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanXSList.dfm
deleted file mode 100644
index 02ac419..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanXSList.dfm
+++ /dev/null
@@ -1,519 +0,0 @@
-object frmBaoGuanXSList: TfrmBaoGuanXSList
- Left = 117
- Top = 78
- Width = 1238
- Height = 618
- Caption = #38144#21806#26376#25253#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1222
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 101
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object TBRKCX: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #25171#21360
- ImageIndex = 4
- OnClick = TBRKCXClick
- end
- object TBExport: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = TBExportClick
- end
- object ToolButton1: TToolButton
- Left = 252
- Top = 0
- Caption = 'ToolButton1'
- ImageIndex = 22
- Visible = False
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 353
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1222
- Height = 40
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 168
- Top = 12
- Width = 12
- Height = 12
- Caption = #33267
- end
- object Label6: TLabel
- Left = 279
- Top = 12
- Width = 36
- Height = 12
- Caption = #21457#31080#21495
- end
- object Label8: TLabel
- Left = 455
- Top = 12
- Width = 36
- Height = 12
- Caption = #35746#21333#21495
- end
- object Label3: TLabel
- Left = 647
- Top = 12
- Width = 36
- Height = 12
- Caption = #20986#21475#21830
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 9
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 181
- Top = 9
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 315
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 2
- end
- object A5ConNO: TEdit
- Tag = 2
- Left = 492
- Top = 8
- Width = 129
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 3
- end
- object A1ChuKouShang: TEdit
- Tag = 2
- Left = 684
- Top = 8
- Width = 129
- Height = 20
- TabOrder = 4
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 115
- Width = 1222
- Height = 465
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column9
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- object v2Column1: TcxGridDBColumn
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.CellMerging = True
- Options.Sorting = False
- Width = 100
- OnCompareRowValuesForCellMerging = v2Column1CompareRowValuesForCellMerging
- end
- object v1Column14: TcxGridDBColumn
- Caption = #20986#21475#21830
- DataBinding.FieldName = 'A1ChuKouShang'
- HeaderAlignmentHorz = taCenter
- Width = 134
- end
- object v1Column6: TcxGridDBColumn
- Caption = #35746#21333#21495
- DataBinding.FieldName = 'A5ConNO'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.CellMerging = True
- Options.Sorting = False
- Width = 126
- OnCompareRowValuesForCellMerging = v2Column1CompareRowValuesForCellMerging
- end
- object v1Column10: TcxGridDBColumn
- Caption = #21697#21517
- DataBinding.FieldName = 'C3BGName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 166
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25104#20221#21547#37327
- DataBinding.FieldName = 'YSChenFen'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 149
- end
- object v1Column2: TcxGridDBColumn
- Caption = #20986#36135#26085#26399
- DataBinding.FieldName = 'A7FPDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.CellMerging = True
- Options.Sorting = False
- Width = 74
- OnCompareRowValuesForCellMerging = v2Column1CompareRowValuesForCellMerging
- end
- object v1Column1: TcxGridDBColumn
- Caption = #20986#21475#26085#26399
- DataBinding.FieldName = 'B3KaiHangDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.CellMerging = True
- Options.Sorting = False
- Width = 67
- OnCompareRowValuesForCellMerging = v2Column1CompareRowValuesForCellMerging
- end
- object v1Column3: TcxGridDBColumn
- Caption = #25104#20132#26041#24335
- DataBinding.FieldName = 'F1BaoGuanTK'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.CellMerging = True
- Options.Sorting = False
- Width = 65
- OnCompareRowValuesForCellMerging = v2Column1CompareRowValuesForCellMerging
- end
- object v1Column4: TcxGridDBColumn
- Caption = #20184#27454#26041#24335
- DataBinding.FieldName = 'D3JiHuiType'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.CellMerging = True
- Options.Sorting = False
- Width = 62
- OnCompareRowValuesForCellMerging = v2Column1CompareRowValuesForCellMerging
- end
- object v1Column5: TcxGridDBColumn
- Caption = #25253#20851#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 73
- end
- object v1Column7: TcxGridDBColumn
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 50
- end
- object v1Column8: TcxGridDBColumn
- Caption = #25253#20851#21333#20215
- DataBinding.FieldName = 'C6BGPrice'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 61
- end
- object v1Column9: TcxGridDBColumn
- Caption = #25253#20851#37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 68
- end
- object v1Column11: TcxGridDBColumn
- Caption = #36741#21161#25968#37327
- DataBinding.FieldName = 'FZQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 64
- end
- object v1Column12: TcxGridDBColumn
- Caption = #36741#21161#21333#20301
- DataBinding.FieldName = 'FZQtyUnit'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 66
- end
- object v1Column16: TcxGridDBColumn
- Caption = #21046#21333#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object v1Column15: TcxGridDBColumn
- Caption = #29366#24577
- DataBinding.FieldName = 'Status'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- end
- object cxGrid2Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel2: TPanel
- Left = 416
- Top = 192
- Width = 217
- Height = 41
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- Visible = False
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 94
- Width = 1222
- Height = 21
- Align = alTop
- Style = 8
- TabOrder = 4
- OnChange = cxTabControl1Change
- ClientRectBottom = 21
- ClientRectRight = 1222
- ClientRectTop = 0
- end
- object cxTabControl3: TcxTabControl
- Left = 0
- Top = 73
- Width = 1222
- Height = 21
- Align = alTop
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- Style = 8
- TabIndex = 3
- TabOrder = 5
- Tabs.Strings = (
- #24453#36865#23457
- #24453#26680#23545
- #24453#23457#26680
- #24050#23457#26680
- #20840#37096)
- Visible = False
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1222
- ClientRectTop = 23
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 1000
- Top = 32
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 960
- Top = 32
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1040
- Top = 32
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 920
- Top = 152
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 888
- Top = 152
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 952
- Top = 152
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBMain
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 360
- Top = 232
- ReportData = {}
- end
- object RMDBMain: TRMDBDataSet
- Visible = True
- DataSet = CDS_PRT
- Left = 424
- Top = 232
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 392
- Top = 232
- end
- object RMDBHZ: TRMDBDataSet
- Visible = True
- DataSet = CDS_HZ
- Left = 520
- Top = 232
- end
- object CDS_HZ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 488
- Top = 232
- end
- object CDS_PRT: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 456
- Top = 232
- end
- object PopupMenu1: TPopupMenu
- Left = 328
- Top = 232
- object N1: TMenuItem
- Caption = #20840#36873
- end
- object N2: TMenuItem
- Caption = #20840#24323
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanXSList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanXSList.pas
deleted file mode 100644
index 1925ba9..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_BaoGuanXSList.pas
+++ /dev/null
@@ -1,328 +0,0 @@
-unit U_BaoGuanXSList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, cxCheckBox, RM_Common,
- RM_Class, RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, Menus,
- cxCalendar, cxPC;
-
-type
- TfrmBaoGuanXSList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- Label2: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- cxGrid2: TcxGrid;
- Tv1: TcxGridDBTableView;
- v2Column1: TcxGridDBColumn;
- v1Column2: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxGrid2Level1: TcxGridLevel;
- RM1: TRMGridReport;
- RMDBMain: TRMDBDataSet;
- RMXLSExport1: TRMXLSExport;
- RMDBHZ: TRMDBDataSet;
- CDS_HZ: TClientDataSet;
- CDS_PRT: TClientDataSet;
- TBRKCX: TToolButton;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- v1Column6: TcxGridDBColumn;
- Panel2: TPanel;
- v1Column1: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column4: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- cxTabControl1: TcxTabControl;
- Label6: TLabel;
- Label8: TLabel;
- Label3: TLabel;
- A4FPNO: TEdit;
- A5ConNO: TEdit;
- A1ChuKouShang: TEdit;
- cxTabControl3: TcxTabControl;
- v1Column15: TcxGridDBColumn;
- v1Column16: TcxGridDBColumn;
- ToolButton1: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure v2Column1CompareRowValuesForCellMerging(
- Sender: TcxGridColumn; ARow1: TcxGridDataRow;
- AProperties1: TcxCustomEditProperties; const AValue1: Variant;
- ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties;
- const AValue2: Variant; var AAreEqual: Boolean);
- procedure TBRKCXClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- private
- procedure InitGrid();
- procedure GetColor(color:TColor);
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmBaoGuanXSList: TfrmBaoGuanXSList;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmBaoGuanXSList.FormDestroy(Sender: TObject);
-begin
- frmBaoGuanXSList:=nil;
-end;
-
-procedure TfrmBaoGuanXSList.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmBaoGuanXSList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime:=SGetServerDateMBeg(ADOQueryTemp);
-end;
-
-procedure TfrmBaoGuanXSList.InitGrid();
-var
- fsj:string;
-begin
- Panel2.Visible:=True;
- Panel2.Refresh;
- fsj:=' and A7FPDate>='''+Trim(FormatDateTime('yyyy-MM-dd',BegDate.Date))+''''
- +' and A7FPDate<'''+Trim(FormatDateTime('yyyy-MM-dd',EndDate.Date+1))+'''';
- if cxTabControl1.Tabs[cxTabControl1.TabIndex].Caption<>'ȫ' then
- begin
- fsj:=fsj+' and A1ChuKouShang like '''+'%'+Trim(cxTabControl1.Tabs[cxTabControl1.TabIndex].Caption)+'%'+''''
- end;
- if cxTabControl3.TabIndex=0 then
- begin
- fsj:=fsj+'and isnull(SChker,'''')=''''';
- end else
- if cxTabControl3.TabIndex=1 then
- begin
- fsj:=fsj+' and isnull(OKPerson,'''')='''' and isnull(SChker,'''')<>'''' ';
- end else
- if cxTabControl3.TabIndex=2 then
- begin
- fsj:=fsj+' and isnull(Chker,'''')='''' and isnull(OKPerson,'''')<>'''' ';
- end else
- if cxTabControl3.TabIndex=3 then
- begin
- fsj:=fsj+' and isnull(Chker,'''')<>'''' ';
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData_XS :WSql');
- Parameters.ParamByName('WSql').Value:=fsj;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- Panel2.Visible:=False;
- end;
- Panel2.Visible:=False;
-end;
-
-procedure TfrmBaoGuanXSList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmBaoGuanXSList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- end;
-end;
-
-procedure TfrmBaoGuanXSList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('۱',Tv1,'');
- Close;
-end;
-
-procedure TfrmBaoGuanXSList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('۱',Tv1,'');
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_Zdy where Type=''A1ChuKouShang'' ');
- Open;
- end;
- with ADOQueryTemp do
- begin
- First;
- while not Eof do
- begin
- cxTabControl1.Tabs.Add(ADOQueryTemp.fieldbyname('ZdyName').asstring);
- Next;
- end;
- end;
- cxTabControl1.Tabs.Add('ȫ');
- //InitGrid();
-end;
-
-procedure TfrmBaoGuanXSList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then exit;
- TcxGridToExcel('۱',cxGrid2);
-end;
-
-procedure TfrmBaoGuanXSList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- end;
-end;
-
-procedure TfrmBaoGuanXSList.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmBaoGuanXSList.v2Column1CompareRowValuesForCellMerging(
- Sender: TcxGridColumn; ARow1: TcxGridDataRow;
- AProperties1: TcxCustomEditProperties; const AValue1: Variant;
- ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties;
- const AValue2: Variant; var AAreEqual: Boolean);
-
-var
- colIdx0:integer;
-begin
- colIdx0:= tv1.GetColumnByFieldName('A4FPNO').Index;
- if ARow1.Values[colIdx0] = ARow2.Values[colIdx0] then
- AAreEqual := True
- else
- AAreEqual := False;
-end;
-
-
-procedure TfrmBaoGuanXSList.TBRKCXClick(Sender: TObject);
-var
- fPrintFile,fsj:string;
-begin
- if CDS_Main.IsEmpty then Exit;
- //if cxTabControl3.TabIndex<>3 then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- fsj:=' and SubString(convert(varchar(10),A7FPDate,120),1,7)='''+Copy(Trim(CDS_Main.fieldbyname('A7FPDate').AsString),1,7)+'''';
- if cxTabControl1.Tabs[cxTabControl1.TabIndex].Caption<>'ȫ' then
- begin
- fsj:=fsj+' and A1ChuKouShang like '''+'%'+Trim(cxTabControl1.Tabs[cxTabControl1.TabIndex].Caption)+'%'+'''';
- //+' and isnull(Chker,'''')<>'''' ';
- end else
- begin
- Exit;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_View_BaoGuanData_XS :WSql');
- Parameters.ParamByName('WSql').Value:=fsj;
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_PRT);
- SInitCDSData20(ADOQueryTemp,CDS_PRT);
- RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- RMVariables['TaiTou']:=cxTabControl1.Tabs[cxTabControl1.TabIndex].Caption;
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\.rmf'),'ʾ',0);
- end;
-
-end;
-
-
-
-procedure TfrmBaoGuanXSList.ToolButton1Click(Sender: TObject);
-begin
- GetColor(clRed);
-end;
-
-procedure TfrmBaoGuanXSList.GetColor(color:TColor);
-var
- R,G,B:Integer;
- color10:TColor;
-begin
- R:=0;
- G:=0;
- B:=0;
- for R:=0 to 255 do
- begin
- for G:=0 to 255 do
- begin
- for B:=0 to 255 do
- begin
- //HZ:=i+j+k;
- color10:=(R shr 3)shl 11+(G shr 2)shl 5+B shr 3;
- if color10=color then
- begin
- Application.MessageBox(PChar('R='+IntToStr(R)+',G='+IntToStr(G)+',B='+IntToStr(B)),'ʾ',0);
- Exit;
- end;
- end;
- end;
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHHZList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHHZList.dfm
deleted file mode 100644
index 9a10ab0..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHHZList.dfm
+++ /dev/null
@@ -1,602 +0,0 @@
-object frmCHHZList: TfrmCHHZList
- Left = 150
- Top = 116
- Width = 1060
- Height = 614
- Caption = #20986#36135#21512#35745#28165#21333
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1044
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object ToolButton2: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #25512#36865
- ImageIndex = 22
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 26
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1044
- Height = 49
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 12
- Top = 12
- Width = 48
- Height = 12
- Caption = #25253#20851#26085#26399
- end
- object Label16: TLabel
- Left = 371
- Top = 11
- Width = 24
- Height = 12
- Caption = #37096#38376
- end
- object Label17: TLabel
- Left = 523
- Top = 12
- Width = 36
- Height = 12
- Caption = #21161' '#29702
- end
- object Label2: TLabel
- Left = 674
- Top = 10
- Width = 24
- Height = 12
- Caption = #32452#38271
- end
- object Label3: TLabel
- Left = 155
- Top = 11
- Width = 30
- Height = 12
- Caption = '-----'
- end
- object EndDate: TDateTimePicker
- Left = 184
- Top = 9
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object bm: TEdit
- Tag = 2
- Left = 403
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 1
- OnChange = bmChange
- end
- object YWY: TEdit
- Tag = 2
- Left = 564
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 2
- OnChange = YWYChange
- end
- object zz: TEdit
- Tag = 2
- Left = 706
- Top = 6
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 3
- OnChange = YWYChange
- end
- object BEGDATE: TDateTimePicker
- Left = 64
- Top = 9
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 4
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 141
- Width = 1044
- Height = 317
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- FieldName = 'YEARusd'
- Column = TV1Column4
- end
- item
- Kind = skSum
- FieldName = 'monthusd'
- Column = TV1Column2
- end
- item
- Kind = skSum
- FieldName = 'WEEKUSD'
- Column = TV1Column15
- end
- item
- Kind = skSum
- Column = TV1Column12
- end
- item
- Kind = skSum
- Column = TV1Column13
- end
- item
- Kind = skSum
- Column = TV1Column16
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Content = cxStyle1
- Styles.Inactive = cxStyle1
- Styles.IncSearch = cxStyle1
- Styles.Selection = cxStyle1
- Styles.Header = cxStyle1
- object TV1Column8: TcxGridDBColumn
- Caption = #37096#38376
- DataBinding.FieldName = 'bm'
- HeaderAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 75
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #32452#38271
- DataBinding.FieldName = 'zz'
- HeaderAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 78
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #21161#29702
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #24066#22330
- DataBinding.FieldName = 'TOCOUNTRY1'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #21608#32047#35745'(USD)'
- DataBinding.FieldName = 'usdweekmoney'
- PropertiesClassName = 'TcxCurrencyEditProperties'
- Properties.DisplayFormat = '$,0.00;$-,0.00'
- HeaderAlignmentHorz = taCenter
- Width = 100
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #26376#32047#35745'(USD)'
- DataBinding.FieldName = 'usdmonthmoney'
- PropertiesClassName = 'TcxCurrencyEditProperties'
- Properties.DisplayFormat = '$,0.00;$-,0.00'
- HeaderAlignmentHorz = taCenter
- Width = 100
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #24180#32047#35745'(USD)'
- DataBinding.FieldName = 'usdYEARmoney'
- PropertiesClassName = 'TcxCurrencyEditProperties'
- Properties.DisplayFormat = '$,0.00;$-,0.00'
- HeaderAlignmentHorz = taCenter
- Width = 108
- end
- object TV1Column6: TcxGridDBColumn
- Caption = #32452#21608#32047#35745'(USD)'
- DataBinding.FieldName = 'zWEEKUSD'
- PropertiesClassName = 'TcxCurrencyEditProperties'
- Properties.DisplayFormat = '$,0.00;$-,0.00'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 143
- OnCompareRowValuesForCellMerging = TV1Column10CompareRowValuesForCellMerging
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #32452#26376#32047#35745'(USD)'
- DataBinding.FieldName = 'ZMONTHUSD'
- PropertiesClassName = 'TcxCurrencyEditProperties'
- Properties.DisplayFormat = '$,0.00;$-,0.00'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 149
- OnCompareRowValuesForCellMerging = TV1Column10CompareRowValuesForCellMerging
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #32452#24180#32047#35745'(USD)'
- DataBinding.FieldName = 'ZYEARUSD'
- PropertiesClassName = 'TcxCurrencyEditProperties'
- Properties.DisplayFormat = '$,0.00;$-,0.00'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 135
- OnCompareRowValuesForCellMerging = TV1Column10CompareRowValuesForCellMerging
- end
- object TV1Column5: TcxGridDBColumn
- DataBinding.FieldName = 'WEEKUSD'
- Visible = False
- Width = 70
- end
- object TV1Column1: TcxGridDBColumn
- DataBinding.FieldName = 'YEARUSD'
- Visible = False
- Width = 70
- end
- object TV1Column3: TcxGridDBColumn
- DataBinding.FieldName = 'MONTHUSD'
- Visible = False
- Width = 70
- end
- object TV1Column12: TcxGridDBColumn
- DataBinding.FieldName = 'nfrmbw'
- Visible = False
- Width = 66
- end
- object TV1Column13: TcxGridDBColumn
- DataBinding.FieldName = 'nfrmbm'
- Visible = False
- Width = 66
- end
- object TV1Column16: TcxGridDBColumn
- DataBinding.FieldName = 'nfrmby'
- Visible = False
- Width = 66
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 458
- Width = 1044
- Height = 117
- Align = alBottom
- TabOrder = 3
- object Label4: TLabel
- Left = 27
- Top = 7
- Width = 144
- Height = 24
- Caption = #26412#21608#21512#35745'USD:'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -24
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 28
- Top = 34
- Width = 120
- Height = 24
- Caption = #26376#21512#35745'USD:'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -24
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label6: TLabel
- Left = 27
- Top = 67
- Width = 144
- Height = 24
- Caption = #24180#24230#24635#35745'USD:'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -24
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 81
- Width = 1044
- Height = 60
- Align = alTop
- Caption = #20986' '#36135' '#28165' '#21333' '#27719' '#24635' '#34920
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -27
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 893
- Top = 217
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 858
- Top = 188
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowDialog = False
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 1013
- Top = 212
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 252
- Top = 364
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = ADOQueryMain
- Left = 256
- Top = 336
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 984
- Top = 212
- end
- object cxStyleRepository1: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle1: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #24494#36719#38597#40657
- Font.Style = [fsBold]
- end
- end
- object cxStyleRepository2: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle2: TcxStyle
- end
- end
- object IdHTTP1: TIdHTTP
- MaxLineAction = maException
- ReadTimeout = 0
- AllowCookies = True
- ProxyParams.BasicAuthentication = False
- ProxyParams.ProxyPort = 0
- Request.ContentLength = -1
- Request.ContentRangeEnd = 0
- Request.ContentRangeStart = 0
- Request.ContentType = 'text/html'
- Request.Accept = 'text/html, */*'
- Request.BasicAuthentication = False
- Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
- HTTPOptions = [hoForceEncodeParams]
- Left = 348
- Top = 172
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHHZList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHHZList.pas
deleted file mode 100644
index db761c1..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHHZList.pas
+++ /dev/null
@@ -1,937 +0,0 @@
-unit U_CHHZList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc, Registry, cxCurrencyEdit, IdBaseComponent,
- IdComponent, IdTCPConnection, IdTCPClient, IdHTTP;
-
-type
- TfrmCHHZList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- TV1Column15: TcxGridDBColumn;
- ToolButton1: TToolButton;
- Label1: TLabel;
- TV1Column2: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- TV1Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- Label16: TLabel;
- Label17: TLabel;
- bm: TEdit;
- YWY: TEdit;
- TV1Column11: TcxGridDBColumn;
- Label2: TLabel;
- zz: TEdit;
- TV1Column1: TcxGridDBColumn;
- TV1Column3: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- BEGDATE: TDateTimePicker;
- Label3: TLabel;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column16: TcxGridDBColumn;
- Panel2: TPanel;
- Label4: TLabel;
- Label5: TLabel;
- Label6: TLabel;
- Panel3: TPanel;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- cxStyleRepository2: TcxStyleRepository;
- cxStyle2: TcxStyle;
- ToolButton2: TToolButton;
- IdHTTP1: TIdHTTP;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure GCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure bmKeyPress(Sender: TObject; var Key: Char);
- procedure bmChange(Sender: TObject);
- procedure TV1Column10CompareRowValuesForCellMerging(Sender: TcxGridColumn; ARow1: TcxGridDataRow; AProperties1: TcxCustomEditProperties; const AValue1: Variant; ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties; const AValue2: Variant; var AAreEqual: Boolean);
- procedure ToolButton2Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- function GetShellFolders(strDir: string): string;
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun, U_UserSel;
-
-{$R *.dfm}
-function TfrmCHHZList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmCHHZList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmCHHZList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmCHHZList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BEGDATE.DateTime := EndDate.DateTime - 7;
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmCHHZList.InitGrid();
-var
- fwhere, Pwhere: string;
- f1, f2, f3, f4, f5, f6: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
-// SQL.Add('select * from (');
-
- sql.Add('EXEC P_CHQD_List @enddate=' + QuotedStr(FormatDateTime('yyyy-MM-dd', ENDDate.DateTime)));
- SQL.Add(',@BEGDATE=' + QuotedStr(FormatDateTime('yyyy-MM-dd', BEGDate.DateTime)));
-
-
-// sql.Add('select A.*,B.* ');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-
-// FloatToCurr()
-// ShowMessage(CurrToStr(FloatToCurr(tV1.DataController.Summary.FooterSummaryValues[10])));
-// ShowMessage(VarToStr(FloatToCurr(1234)));
-
-
- if CDS_Main.IsEmpty = False then
- begin
- f1 := VarToStr(FormatFloat('0,0.00', (tV1.DataController.Summary.FooterSummaryValues[10])));
- if f1 = '00.00' then
- begin
- f1 := '0.00';
- end;
- f2 := VarToStr(FormatFloat('0,0.00', (tV1.DataController.Summary.FooterSummaryValues[11])));
- if f2 = '00.00' then
- begin
- f2 := '0.00';
- end;
- f3 := VarToStr(FormatFloat('0,0.00', (tV1.DataController.Summary.FooterSummaryValues[9])));
- if f3 = '00.00' then
- begin
- f3 := '0.00';
- end;
- f4 := VarToStr(FormatFloat('0,0.00', (tV1.DataController.Summary.FooterSummaryValues[12])));
- if f4 = '00.00' then
- begin
- f4 := '0.00';
- end;
- f5 := VarToStr(FormatFloat('0,0.00', (tV1.DataController.Summary.FooterSummaryValues[8])));
- if f5 = '00.00' then
- begin
- f5 := '0.00';
- end;
- f6 := VarToStr(FormatFloat('0,0.00', (tV1.DataController.Summary.FooterSummaryValues[13])));
- if f6 = '00.00' then
- begin
- f6 := '0.00';
- end;
- Label4.Caption := 'ܺϼUSD:$' + f1 + '(:' + f2 + ')';
- Label5.Caption := 'ºϼUSD:$' + f3 + '(:' + f4 + ')';
- Label6.Caption := 'ܼUSD:$' + f5 + '(:' + f6 + ')';
-
- end;
-end;
-
-procedure TfrmCHHZList.TBRafreshClick(Sender: TObject);
-begin
- ENDDate.SetFocus;
- InitGrid();
-
-end;
-
-procedure TfrmCHHZList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmCHHZList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, '嵥33');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmCHHZList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, '嵥33');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmCHHZList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmCHHZList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHHZList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmCHHZList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmCHHZList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmCHHZList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHHZList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmCHHZList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHHZList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHHZList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHHZList.GCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHHZList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHHZList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmCHHZList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmCHHZList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmCHHZList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHHZList.YWYChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHHZList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHHZList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHHZList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHHZList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmCHHZList.ToolButton1Click(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// SelExportData(Tv1, ADOQueryMain, '嵥');
-// with ADOQueryMain do
-// begin
-// Filtered := False;
-// Close;
-// sql.Clear;
-// sql.Add('select A.*,B.* ');
-//// SQL.Add(',HDNAME=(SELECT HDNAME FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
-// SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
-// SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-//
-// sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
-// sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
-// SQL.Add('AND bgStatus=''''');
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// sql.Add('order by YWY');
-//// ShowMessage(sql.Text);
-// Open;
-// end;
-// SCreateCDS20(ADOQueryMain, CDS_Main);
-// SInitCDSData20(ADOQueryMain, CDS_Main);
-// TBFind.Click();
- TcxGridToExcel('ϼ嵥', cxGrid2);
-
- InitGrid();
- TBFind.Click();
-end;
-
-procedure TfrmCHHZList.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmCHHZList.bmKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmCHHZList.bmChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHHZList.TV1Column10CompareRowValuesForCellMerging(Sender: TcxGridColumn; ARow1: TcxGridDataRow; AProperties1: TcxCustomEditProperties; const AValue1: Variant; ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties; const AValue2: Variant; var AAreEqual: Boolean);
-begin
- if ARow1.Values[TV1Column8.Index] = ARow2.Values[TV1Column8.Index] then
- AAreEqual := True
- else
- AAreEqual := False;
-end;
-
-procedure TfrmCHHZList.ToolButton2Click(Sender: TObject);
-var
- FBJNO: string;
- fgdy: string;
-begin
- if CDS_Main.IsEmpty then
- exit;
-// if CDS_Main.Locate('ssel', true, []) = false then
-// begin
-// Application.MessageBox('ûѡ!', 'ʾ', 0);
-// Exit;
-// end;
-
-
- fgdy := '';
- try
- frmUserSel := TfrmUserSel.Create(Application);
- with frmUserSel do
- begin
- if ShowModal = 1 then
- begin
- while frmUserSel.CDS_User.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
-
- sql.Add('exec P_INSERT_WXTS ');
-// sql.Add('@BJNO=' + quotedstr(trim(CDS_Main.fieldbyname('BJNO').AsString)));
- sql.Add('@CODE=' + quotedstr(Trim(CDS_User.fieldbyname('wxid').AsString)));
- SQL.Add(',@enddate=' + QuotedStr(FormatDateTime('yyyy-MM-dd', Self.ENDDate.DateTime)));
- SQL.Add(',@BEGDATE=' + QuotedStr(FormatDateTime('yyyy-MM-dd', Self.BEGDate.DateTime)));
- sql.Add(',@note=' + quotedstr(Trim(Self.Label4.Caption)));
- sql.Add(',@note2=' + quotedstr(Trim(Self.Label5.Caption)));
- sql.Add(',@note3=' + quotedstr(Trim(Self.Label6.Caption)));
- execsql;
- end;
- GetHTTP(IdHTTP1, 'http://zhengyong.rightsoft.top/api/message/send/BgchSummary');
- frmUserSel.CDS_User.Delete;
- end;
- end;
- end;
- finally
- frmUserSel.Free;
- application.MessageBox('ͳɹ', 'ʾϢ');
- end;
-
-// try
-// with CDS_Main do
-// begin
-//
-// with ADOQueryCmd do
-// begin
-// close;
-// sql.Clear;
-//
-// sql.Add('exec P_INSERT_WXTS ');
-// sql.Add('@CODE=' + quotedstr(Trim(DName)));
-// SQL.Add(',@enddate=' + QuotedStr(FormatDateTime('yyyy-MM-dd', ENDDate.DateTime)));
-// SQL.Add(',@BEGDATE=' + QuotedStr(FormatDateTime('yyyy-MM-dd', BEGDate.DateTime)));
-// sql.Add(',@note=' + quotedstr(Trim(Label4.Caption)));
-// sql.Add(',@note2=' + quotedstr(Trim(Label5.Caption)));
-// sql.Add(',@note3=' + quotedstr(Trim(Label6.Caption)));
-// execsql;
-// end;
-//
-// end;
-// GetHTTP(IdHTTP1, 'http://zhengyong.rightsoft.top/api/message/send/BgchSummary');
-// application.MessageBox('ͳɹ', 'ʾϢ');
-// initgrid();
-// except
-// CDS_Main.EnableControls;
-// application.MessageBox('ʧܣ', 'ʾϢ', 0);
-// end;
-
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHList.dfm
deleted file mode 100644
index 442819d..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHList.dfm
+++ /dev/null
@@ -1,664 +0,0 @@
-object frmCHList: TfrmCHList
- Left = 146
- Top = 122
- Width = 1384
- Height = 670
- Caption = #20986#36135#28165#21333
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1368
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 26
- OnClick = ToolButton1Click
- end
- object ToolButton2: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #30452#25509#23548#20986
- ImageIndex = 4
- OnClick = ToolButton2Click
- end
- object ToolButton3: TToolButton
- Left = 276
- Top = 0
- AutoSize = True
- Caption = #30830#35748#24320#31080
- ImageIndex = 31
- OnClick = ToolButton3Click
- end
- object ToolButton4: TToolButton
- Left = 363
- Top = 0
- AutoSize = True
- Caption = #25764#38144#24320#31080
- ImageIndex = 52
- OnClick = ToolButton4Click
- end
- object TBClose: TToolButton
- Left = 450
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1368
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label6: TLabel
- Left = 379
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 236
- Top = 35
- Width = 24
- Height = 12
- Caption = #24037#21378
- end
- object Label8: TLabel
- Left = 553
- Top = 11
- Width = 48
- Height = 12
- Caption = #23458#25143#21517#31216
- end
- object Label3: TLabel
- Left = 553
- Top = 34
- Width = 48
- Height = 12
- Caption = #25253#20851#21697#21517
- end
- object Label2: TLabel
- Left = 403
- Top = 36
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- end
- object Label4: TLabel
- Left = 212
- Top = 12
- Width = 48
- Height = 12
- Caption = #35745#21010#21333#21495
- end
- object Label1: TLabel
- Left = 713
- Top = 10
- Width = 48
- Height = 12
- Caption = #37096' '#38376
- end
- object BegDate: TDateTimePicker
- Left = 88
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 88
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 445
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object GCNAME: TEdit
- Tag = 2
- Left = 264
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = ordernoKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 605
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnKeyPress = ordernoKeyPress
- end
- object BGCODENAME: TEdit
- Tag = 2
- Left = 605
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 5
- OnKeyPress = ordernoKeyPress
- end
- object YWY: TEdit
- Tag = 2
- Left = 445
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 6
- OnKeyPress = ordernoKeyPress
- end
- object orderno: TEdit
- Tag = 2
- Left = 264
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 7
- OnKeyPress = ordernoKeyPress
- end
- object ComboBox1: TComboBox
- Left = 8
- Top = 8
- Width = 73
- Height = 20
- ItemHeight = 12
- ItemIndex = 0
- TabOrder = 8
- Text = #25253#20851#26085#26399
- OnChange = ComboBox1Change
- Items.Strings = (
- #25253#20851#26085#26399
- #33337#26399
- #20986#36135#26085#26399)
- end
- object ywzb: TEdit
- Tag = 2
- Left = 765
- Top = 6
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 9
- OnKeyPress = ordernoKeyPress
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1368
- Height = 540
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- PopupMenu = PopupMenu1
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = TV1CustomDrawCell
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = TV1Column15
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 49
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #24050#24320#31080
- DataBinding.FieldName = 'KPFLAG'
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #22806#38144#21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Width = 83
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Width = 82
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'orderno'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #26797#32455
- #38024#32455
- #32463#32534
- #21050#32483
- #38024#32455#32463#32534)
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 71
- end
- object Tv1Column1: TcxGridDBColumn
- Caption = #25253#20851#21697#21517
- DataBinding.FieldName = 'BGCODENAME'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #26588#22411
- DataBinding.FieldName = 'guixing'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxCalcEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Width = 77
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 46
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object TV1Column3: TcxGridDBColumn
- Caption = #32467#31639#24065#31181
- DataBinding.FieldName = 'JSBZ'
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object tv2Column5: TcxGridDBColumn
- Caption = #20986#36135#26085
- DataBinding.FieldName = 'htdate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #33337#26399
- DataBinding.FieldName = 'chuandate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- end
- object tv2Column6: TcxGridDBColumn
- Caption = #20184#27454#26465#20214
- DataBinding.FieldName = 'OrdConPrcNote'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #37096#38376
- DataBinding.FieldName = 'ywzb'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #23458#26381#19968#32452
- #23458#26381#20108#32452
- #23458#26381#19977#32452
- #23458#26381#22235#32452
- #23458#26381#20116#32452
- #23458#26381#20845#32452
- #23458#26381#19971#32452
- #23458#26381#20843#32452
- #23458#26381#20061#32452
- #23458#26381#21313#32452)
- Properties.OnChange = TV1Column8PropertiesChange
- HeaderAlignmentHorz = taCenter
- Width = 75
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #22269#23478
- DataBinding.FieldName = 'TOCOUNTRY1'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'huodai'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #23457#26680#26085#26399
- DataBinding.FieldName = 'ChkTime'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object TV1Column5: TcxGridDBColumn
- Caption = #24320#31080#26085#26399
- DataBinding.FieldName = 'KPDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object TV1Column6: TcxGridDBColumn
- DataBinding.FieldName = 'YKP'
- Visible = False
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object MovePanel1: TMovePanel
- Left = 435
- Top = 149
- Width = 249
- Height = 118
- TabOrder = 3
- Visible = False
- object Label12: TLabel
- Left = 25
- Top = 34
- Width = 48
- Height = 12
- Caption = #24320#31080#26085#26399
- end
- object kpdate: TDateTimePicker
- Left = 77
- Top = 31
- Width = 100
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object Button1: TButton
- Left = 25
- Top = 75
- Width = 75
- Height = 21
- Caption = #30830' '#35748
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 129
- Top = 74
- Width = 75
- Height = 21
- Caption = #21462' '#28040
- TabOrder = 2
- OnClick = Button2Click
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 886
- Top = 216
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 858
- Top = 188
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 858
- Top = 216
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowDialog = False
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 225
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 252
- Top = 364
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = ADOQueryMain
- Left = 256
- Top = 336
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHList.pas
deleted file mode 100644
index 234d363..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHList.pas
+++ /dev/null
@@ -1,1070 +0,0 @@
-unit U_CHList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc, Registry;
-
-type
- TfrmCHList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- GCNAME: TEdit;
- Label8: TLabel;
- KHName: TEdit;
- Label3: TLabel;
- BGCODENAME: TEdit;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- Label2: TLabel;
- YWY: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- Tv1Column1: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- tv2Column1: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- tv2Column5: TcxGridDBColumn;
- tv2Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- Label4: TLabel;
- orderno: TEdit;
- TV1Column15: TcxGridDBColumn;
- ToolButton1: TToolButton;
- ToolButton2: TToolButton;
- TV1Column2: TcxGridDBColumn;
- ComboBox1: TComboBox;
- TV1Column3: TcxGridDBColumn;
- ToolButton3: TToolButton;
- MovePanel1: TMovePanel;
- Label12: TLabel;
- kpdate: TDateTimePicker;
- Button1: TButton;
- Button2: TButton;
- TV1Column4: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- ToolButton4: TToolButton;
- TV1Column6: TcxGridDBColumn;
- Label1: TLabel;
- ywzb: TEdit;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure GCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure ordernoKeyPress(Sender: TObject; var Key: Char);
- procedure TV1Column8PropertiesChange(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure Button2Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- function GetShellFolders(strDir: string): string;
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun;
-
-{$R *.dfm}
-function TfrmCHList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmCHList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmCHList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmCHList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := EndDate.DateTime - 90;
- kpdate.DateTime := SGetServerDate10(ADOQueryTemp);
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmCHList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
-// SQL.Add('select * from (');
- sql.Add('select A.*,B.* ');
- SQL.Add(',C7BGMoney2=(CASE WHEN JSBZ='''' then round(C7BGMoney/6.4,2) else C7BGMoney end )');
- SQL.Add(',JSBZ2=''Ԫ''');
-// SQL.Add(',C7BGMoney2=(CASE WHEN JSBZ='''' then round(C7BGMoney/6.4,2) else C7BGMoney end )');
- SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
- SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
- SQL.Add(',YKP=(CASE WHEN KPDATE IS NULL AND DATEDIFF(day,chuandate,ISNULL(KPDATE,GETDATE()) )>30 then 1 else 0 end )');
- sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
- sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
- SQL.Add('AND bgStatus=''''');
- sql.Add(fwhere);
- if ComboBox1.Text = '' then
- begin
- sql.Add(' and bgdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and bgdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('order by bgdate desc');
- end
- else if ComboBox1.Text = '' then
- begin
- sql.Add(' and chuandate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and chuandate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('order by chuandate desc ');
- end
- else if combobox1.Text = '' then
- begin
- sql.Add(' and htdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and htdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('order by htdate desc');
- end;
-// sql.Add(' ) AA');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmCHList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmCHList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, '嵥');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmCHList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, '嵥');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- if Self.Caption = 'Ʊȷ' then
- begin
- ToolButton3.Visible := True;
- ToolButton4.Visible := True;
-// TV1.OptionsData.Editing := true;
- end
- else
- begin
- ToolButton3.Visible := FALSE;
- ToolButton4.Visible := FALSE;
-// TV1.OptionsData.Editing := True;
- end;
- InitGrid();
- RM1.CanExport := true;
-
-end;
-
-procedure TfrmCHList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmCHList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmCHList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmCHList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmCHList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmCHList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHList.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- if Trim(A4FPNO.Text) = '' then
- Exit;
- fsj := ' and isnull(A.A4FPNO,'''') like ''' + '%' + Trim(A4FPNO.Text) + '%' + '''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmCHList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHList.GCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmCHList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmCHList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmCHList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.YWYChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmCHList.ToolButton1Click(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// SelExportData(Tv1, ADOQueryMain, '嵥');
-// with ADOQueryMain do
-// begin
-// Filtered := False;
-// Close;
-// sql.Clear;
-// sql.Add('select A.*,B.* ');
-//// SQL.Add(',HDNAME=(SELECT HDNAME FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
-// SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
-// SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-//
-// sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
-// sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
-// SQL.Add('AND bgStatus=''''');
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// sql.Add('order by YWY');
-//// ShowMessage(sql.Text);
-// Open;
-// end;
-// SCreateCDS20(ADOQueryMain, CDS_Main);
-// SInitCDSData20(ADOQueryMain, CDS_Main);
-// TBFind.Click();
- TcxGridToExcel('嵥', cxGrid2);
-
- InitGrid();
- TBFind.Click();
-end;
-
-procedure TfrmCHList.ToolButton2Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
-// LBName := RadioGroup2.Items.Strings[RadioGroup2.ItemIndex];
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\嵥.rmf';
- ExportFtErpFile('嵥.rmf', ADOQueryPrint);
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
-// SQL.Add(',HDNAME=(SELECT HDNAME FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
- SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
- SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-
- sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
- sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
- SQL.Add('AND bgStatus=''''');
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- if ComboBox1.Text = '' then
- begin
- sql.Add(' and bgdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and bgdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('order by bgdate desc');
- end
- else if ComboBox1.Text = '' then
- begin
- sql.Add(' and chuandate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and chuandate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('order by chuandate desc ');
- end
- else if combobox1.Text = '' then
- begin
- sql.Add(' and htdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and htdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('order by htdate desc');
- end;
- sql.Add('order by YWY');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- TBFind.Click();
-// with ADOQueryPrint do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('exec P_Print_BGD ');
-//
-// SQL.ADD('@bgid=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-// ShowMessage(SQL.Text);
-// Open;
-// end;
-// SCreateCDS20(ADOQueryPrint, CDS_Print);
-// SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := GetShellFolders('Desktop') + '\嵥.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := GetShellFolders('Desktop') + '\嵥.xls';
-
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
- initgrid();
- TBFind.Click();
-end;
-
-procedure TfrmCHList.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmCHList.ordernoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmCHList.TV1Column8PropertiesChange(Sender: TObject);
-var
- mvalues, FFieldName: string;
-begin
- inherited;
- if self.Caption <> 'Ʊȷ' then
- begin
- mvalues := TCXTextEdit(Sender).Text;
- FFieldName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
-
- with CDS_Main do
- begin
- edit;
- fieldbyname(FFieldName).Value := mvalues;
- post;
- end;
- tv1.Controller.EditingController.ShowEdit();
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrder_BaoGuan_Main ');
- SQL.Add(' Set ' + FFieldName + '=' + QuotedStr(mvalues));
- sql.Add(' where bgid=''' + Trim(CDS_Main.fieldbyname('bgid').AsString) + '''');
-
- ExecSQL;
- end;
- tv1.Controller.EditingController.ShowEdit();
- end;
-
-end;
-
-procedure TfrmCHList.ToolButton3Click(Sender: TObject);
-begin
- MovePanel1.Visible := True;
-end;
-
-procedure TfrmCHList.Button1Click(Sender: TObject);
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if cds_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_SUB Set KPFLAG='''',kpren=' + QuotedStr(Trim(DName)));
- sql.add(',KPDATE=' + quotedstr(FormatDateTime('yyyy-MM-dd', kpdate.DateTime)));
- sql.Add(' where BSID=''' + Trim(CDS_Main.fieldbyname('BSID').AsString) + '''');
- ExecSQL;
- end;
-
- end;
- CDS_Main.Next;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.Button2Click(Sender: TObject);
-begin
- MovePanel1.Visible := False;
-end;
-
-procedure TfrmCHList.ToolButton4Click(Sender: TObject);
-begin
-
- if CDS_Main.Locate('ssel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_SUB Set KPFLAG=NULL,KPREN=NULL');
- sql.add(',KPDATE=NULL');
- sql.Add(' where BSID=''' + Trim(CDS_Main.fieldbyname('BSID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end
- else
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- InitGrid();
-
-end;
-
-procedure TfrmCHList.TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if (AViewInfo.GridRecord.Values[TV1Column6.Index] = 1) then
- begin
- ACanvas.font.Color := clred;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHListsel2.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHListsel2.dfm
deleted file mode 100644
index cb1c97a..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHListsel2.dfm
+++ /dev/null
@@ -1,556 +0,0 @@
-object frmCHListsel2: TfrmCHListsel2
- Left = 132
- Top = 116
- Width = 1384
- Height = 670
- Caption = #20986#36135#28165#21333#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1368
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #36873#25321
- ImageIndex = 31
- OnClick = ToolButton1Click
- end
- object TBRafresh: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object TBClose: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1368
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label6: TLabel
- Left = 379
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 236
- Top = 35
- Width = 24
- Height = 12
- Caption = #24037#21378
- end
- object Label8: TLabel
- Left = 553
- Top = 11
- Width = 48
- Height = 12
- Caption = #23458#25143#21517#31216
- end
- object Label2: TLabel
- Left = 403
- Top = 36
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- end
- object Label4: TLabel
- Left = 212
- Top = 12
- Width = 48
- Height = 12
- Caption = #35745#21010#21333#21495
- end
- object Label1: TLabel
- Left = 752
- Top = 8
- Width = 220
- Height = 21
- Caption = #27880#65306#23383#20307#32418#33394#20026#26080#21512#21516
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -21
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BegDate: TDateTimePicker
- Left = 88
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 88
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 445
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object GCNAME: TEdit
- Tag = 2
- Left = 264
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = ZordernoKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 605
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnKeyPress = ZordernoKeyPress
- end
- object YWY: TEdit
- Tag = 2
- Left = 445
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 5
- OnKeyPress = ZordernoKeyPress
- end
- object Zorderno: TEdit
- Tag = 2
- Left = 264
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 6
- OnKeyPress = ZordernoKeyPress
- end
- object ComboBox1: TComboBox
- Left = 8
- Top = 8
- Width = 73
- Height = 20
- ItemHeight = 12
- ItemIndex = 0
- TabOrder = 7
- Text = #25253#20851#26085#26399
- OnChange = ComboBox1Change
- Items.Strings = (
- #25253#20851#26085#26399
- #33337#26399
- #20986#36135#26085#26399)
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1368
- Height = 540
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- OnDblClick = TV1DblClick
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = TV1CustomDrawCell
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = TV1Column15
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #22806#38144#21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 83
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 82
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'ZORDERNO'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #26797#32455
- #38024#32455
- #32463#32534
- #21050#32483
- #38024#32455#32463#32534)
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Width = 71
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #26588#22411
- DataBinding.FieldName = 'guixing'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxCalcEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Width = 77
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Width = 46
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object TV1Column3: TcxGridDBColumn
- Caption = #32467#31639#24065#31181
- DataBinding.FieldName = 'JSBZ'
- HeaderAlignmentHorz = taCenter
- Width = 73
- end
- object tv2Column5: TcxGridDBColumn
- Caption = #20986#36135#26085
- DataBinding.FieldName = 'htdate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #33337#26399
- DataBinding.FieldName = 'chuandate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- end
- object tv2Column6: TcxGridDBColumn
- Caption = #20184#27454#26465#20214
- DataBinding.FieldName = 'OrdConPrcNote'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #37096#38376
- DataBinding.FieldName = 'bm'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 75
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #22269#23478
- DataBinding.FieldName = 'TOCOUNTRY1'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 76
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 69
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'huodai'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 66
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #23457#26680#26085#26399
- DataBinding.FieldName = 'ChkTime'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object TV1Column1: TcxGridDBColumn
- DataBinding.FieldName = 'ISCONNO'
- Visible = False
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 893
- Top = 217
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 858
- Top = 188
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowDialog = False
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 225
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 252
- Top = 364
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = ADOQueryMain
- Left = 256
- Top = 336
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHListsel2.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHListsel2.pas
deleted file mode 100644
index 2c8bbfc..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CHListsel2.pas
+++ /dev/null
@@ -1,862 +0,0 @@
-unit U_CHListsel2;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc, Registry;
-
-type
- TfrmCHListsel2 = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- GCNAME: TEdit;
- Label8: TLabel;
- KHName: TEdit;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- Label2: TLabel;
- YWY: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- tv2Column1: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- tv2Column5: TcxGridDBColumn;
- tv2Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- Label4: TLabel;
- Zorderno: TEdit;
- TV1Column15: TcxGridDBColumn;
- TV1Column2: TcxGridDBColumn;
- ComboBox1: TComboBox;
- ToolButton1: TToolButton;
- TV1Column1: TcxGridDBColumn;
- Label1: TLabel;
- TV1Column3: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure GCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure ZordernoKeyPress(Sender: TObject; var Key: Char);
- procedure TV1DblClick(Sender: TObject);
- procedure TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- function GetShellFolders(strDir: string): string;
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- { Public declarations }
- end;
-
-var
- frmCHListsel2: tfrmCHListsel2;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_Fun;
-
-{$R *.dfm}
-function TfrmCHListsel2.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmCHListsel2.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmCHListsel2.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmCHListsel2.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := EndDate.DateTime - 90;
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmCHListsel2.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
-// SQL.Add('select * from (');
- sql.Add('select * from (');
- sql.Add('select A.*, ');
- SQL.Add('ISCONNO=(CASE WHEN (SELECT COUNT(CONNO) FROM JYOrder_Main C Inner join JYOrder_BaoGuan_Sub B ON C.ORDERNO=B.ORDERNO WHERE ISNULL(C.CONNO,'''')<>'''' ');
- sql.Add('AND A.BGID=B.BGID )>0 THEN 1 ELSE 0 END ) ');
- sql.Add(',TDShouHuoPerson=(select TDShouHuoPerson from JYOrderCon_TT t where t.dcno=a.dcno )');
- sql.Add(',maitou=(select zhumaitou from JYOrderCon_TT t where t.dcno=a.dcno )');
- SQL.Add(',ShDAYS=(SELECT top 1 note FROM KH_ZDY k WHERE TYPE =''shfs'' and a.shfs=k.zdyname )');
- SQL.Add(',ZORDERNO=cast((select B.ORDERNO+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
- sql.Add(',C4BGQty=(select sum(C4BGQty) from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' )');
- sql.Add(',C5BGUnit=(select top 1 C5BGUnit from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' )');
- sql.Add(',C7BGMoney=(select sum(C7BGMoney) from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' )');
- SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
- SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-// SQL.Add(',COADDRESS=(select TOP 1 COADDRESS from Company B where cotype=''ͻ'' and valid=''Y'' AND A.KHNAME=B.CONAME)');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where A.Valid=''Y'' ');
- SQL.Add('AND bgStatus=''''');
- sql.Add(') aa where 1=1');
- sql.Add(fwhere);
- if ComboBox1.Text = '' then
- begin
- sql.Add(' and bgdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and bgdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('order by bgdate desc');
- end
- else if ComboBox1.Text = '' then
- begin
- sql.Add(' and chuandate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and chuandate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('order by chuandate desc ');
- end
- else if combobox1.Text = '' then
- begin
- sql.Add(' and htdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and htdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('order by htdate desc');
- end;
-// sql.Add(' ) AA');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHListsel2.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmCHListsel2.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmCHListsel2.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, '嵥');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmCHListsel2.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, '嵥');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmCHListsel2.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmCHListsel2.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHListsel2.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmCHListsel2.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmCHListsel2.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmCHListsel2.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHListsel2.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmCHListsel2.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHListsel2.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- if Trim(A4FPNO.Text) = '' then
- Exit;
- fsj := ' and isnull(A.A4FPNO,'''') like ''' + '%' + Trim(A4FPNO.Text) + '%' + '''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmCHListsel2.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHListsel2.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHListsel2.GCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHListsel2.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHListsel2.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmCHListsel2.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHListsel2.YWYChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHListsel2.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHListsel2.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHListsel2.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHListsel2.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmCHListsel2.ToolButton1Click(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
- ModalResult := 1;
-end;
-
-procedure TfrmCHListsel2.ToolButton2Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
-// LBName := RadioGroup2.Items.Strings[RadioGroup2.ItemIndex];
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\嵥.rmf';
- ExportFtErpFile('嵥.rmf', ADOQueryPrint);
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
-// SQL.Add(',HDNAME=(SELECT HDNAME FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
- SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
- SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-
- sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
- sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
- SQL.Add('AND bgStatus=''''');
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- if ComboBox1.Text = '' then
- begin
- sql.Add(' and bgdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and bgdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('order by bgdate desc');
- end
- else if ComboBox1.Text = '' then
- begin
- sql.Add(' and chuandate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and chuandate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('order by chuandate desc ');
- end
- else if combobox1.Text = '' then
- begin
- sql.Add(' and htdate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and htdate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// SQL.Add('order by htdate desc');
- end;
- sql.Add('order by YWY');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- TBFind.Click();
-// with ADOQueryPrint do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('exec P_Print_BGD ');
-//
-// SQL.ADD('@bgid=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
-// ShowMessage(SQL.Text);
-// Open;
-// end;
-// SCreateCDS20(ADOQueryPrint, CDS_Print);
-// SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := GetShellFolders('Desktop') + '\嵥.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := GetShellFolders('Desktop') + '\嵥.xls';
-
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
- initgrid();
- TBFind.Click();
-end;
-
-procedure TfrmCHListsel2.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmCHListsel2.ZordernoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmCHListsel2.TV1DblClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
- ModalResult := 1;
-end;
-
-procedure TfrmCHListsel2.TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if (AViewInfo.GridRecord.Values[TV1Column1.Index] = 0) then
- begin
- ACanvas.FONT.Color := CLRED;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPBaoJiaChk.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPBaoJiaChk.dfm
deleted file mode 100644
index c305adc..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPBaoJiaChk.dfm
+++ /dev/null
@@ -1,760 +0,0 @@
-object frmCPBaoJiaChk: TfrmCPBaoJiaChk
- Left = 192
- Top = 63
- Width = 1148
- Height = 614
- Caption = #25253#20215#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1132
- Height = 31
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- DisabledImages = DataLink_TradeManage.ThreeImgList
- Flat = True
- Images = DataLink_TradeManage.ThreeImgList
- List = True
- ParentColor = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 9
- OnClick = TBRafreshClick
- end
- object ToolButton2: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 59
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 53
- Visible = False
- end
- object ToolButton3: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #30830#23450
- ImageIndex = 106
- OnClick = ToolButton3Click
- end
- object ToolButton6: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #22270#29255#19979#36733
- ImageIndex = 104
- OnClick = ToolButton6Click
- end
- object TBClose: TToolButton
- Left = 339
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 55
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 31
- Width = 1132
- Height = 58
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 315
- Top = 15
- Width = 48
- Height = 12
- Caption = #20135#21697#20013#25991
- end
- object Label4: TLabel
- Left = 315
- Top = 39
- Width = 48
- Height = 12
- Caption = #20135#21697#33521#25991
- end
- object Label5: TLabel
- Left = 433
- Top = 15
- Width = 48
- Height = 12
- Caption = #20135#21697#35268#26684
- end
- object Label3: TLabel
- Left = 179
- Top = 15
- Width = 36
- Height = 12
- Caption = #26032#32534#21495
- end
- object Label7: TLabel
- Left = 557
- Top = 39
- Width = 24
- Height = 12
- Caption = #20811#37325
- end
- object Label8: TLabel
- Left = 179
- Top = 39
- Width = 36
- Height = 12
- Caption = #32769#32534#21495
- end
- object Label9: TLabel
- Left = 433
- Top = 39
- Width = 48
- Height = 12
- Caption = #20135#21697#25104#20221
- end
- object Label10: TLabel
- Left = 557
- Top = 15
- Width = 24
- Height = 12
- Caption = #38376#24133
- end
- object Label2: TLabel
- Left = 24
- Top = 16
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label6: TLabel
- Left = 669
- Top = 15
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- end
- object Label11: TLabel
- Left = 669
- Top = 39
- Width = 42
- Height = 12
- Caption = #23458' '#25143
- end
- object CYName: TEdit
- Tag = 2
- Left = 365
- Top = 11
- Width = 56
- Height = 20
- TabOrder = 0
- OnChange = CYNOOldChange
- end
- object CYEName: TEdit
- Tag = 2
- Left = 365
- Top = 35
- Width = 57
- Height = 20
- TabOrder = 1
- OnChange = CYNOOldChange
- end
- object CYSpec: TEdit
- Tag = 2
- Left = 480
- Top = 11
- Width = 61
- Height = 20
- TabOrder = 2
- OnChange = CYNOOldChange
- end
- object CYNO: TEdit
- Tag = 2
- Left = 216
- Top = 11
- Width = 89
- Height = 20
- TabOrder = 3
- OnChange = CYNoChange
- end
- object CYKZ: TEdit
- Tag = 2
- Left = 583
- Top = 35
- Width = 76
- Height = 20
- TabOrder = 4
- OnChange = CYNOOldChange
- end
- object CYNOOld: TEdit
- Tag = 2
- Left = 216
- Top = 35
- Width = 89
- Height = 20
- TabOrder = 5
- OnChange = CYNOOldChange
- end
- object CYECF: TEdit
- Tag = 2
- Left = 482
- Top = 35
- Width = 59
- Height = 20
- TabOrder = 6
- OnChange = CYNOOldChange
- end
- object CYMF: TEdit
- Tag = 2
- Left = 583
- Top = 11
- Width = 76
- Height = 20
- TabOrder = 7
- OnChange = CYNOOldChange
- end
- object begdate: TDateTimePicker
- Left = 74
- Top = 13
- Width = 89
- Height = 20
- Date = 41423.454483136570000000
- Time = 41423.454483136570000000
- TabOrder = 8
- end
- object enddate: TDateTimePicker
- Left = 74
- Top = 35
- Width = 89
- Height = 20
- Date = 41423.454483136570000000
- Time = 41423.454483136570000000
- TabOrder = 9
- end
- object BJPerson: TEdit
- Tag = 2
- Left = 711
- Top = 11
- Width = 76
- Height = 20
- TabOrder = 10
- OnChange = CYNOOldChange
- end
- object KHName: TEdit
- Tag = 2
- Left = 711
- Top = 35
- Width = 76
- Height = 20
- TabOrder = 11
- OnChange = CYNOOldChange
- end
- end
- object Panel2: TPanel
- Left = 512
- Top = 232
- Width = 185
- Height = 41
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- Visible = False
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 89
- Width = 1132
- Height = 310
- Align = alClient
- TabOrder = 3
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- NavigatorButtons.Delete.Enabled = False
- NavigatorButtons.Delete.Visible = False
- OnCellClick = Tv2CellClick
- OnCellDblClick = Tv2CellDblClick
- DataController.DataSource = DSBJ
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_TradeManage.SHuangSe
- Styles.IncSearch = DataLink_TradeManage.SHuangSe
- Styles.Selection = DataLink_TradeManage.SHuangSe
- object v2Column17: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSEl'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_TradeManage.Default
- Width = 44
- end
- object v2Column8: TcxGridDBColumn
- Caption = #25253#20215#21333#21495
- DataBinding.FieldName = 'BJNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 69
- end
- object v1Column1: TcxGridDBColumn
- Caption = #26032#32534#21495
- DataBinding.FieldName = 'CYNo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 58
- end
- object v1Column41: TcxGridDBColumn
- Caption = #32769#32534#21495
- DataBinding.FieldName = 'CYNOOld'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 61
- end
- object v1Column5: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'BJPerson'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 68
- end
- object v2Column10: TcxGridDBColumn
- Caption = #25253#20215#26102#38388
- DataBinding.FieldName = 'BJTime'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 63
- end
- object v2Column9: TcxGridDBColumn
- Caption = #25253#20215#27425#25968
- DataBinding.FieldName = 'BJCount'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 62
- end
- object v2Column11: TcxGridDBColumn
- Caption = #20215#26684#26415#35821
- DataBinding.FieldName = 'PriceSY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 59
- end
- object v1Column9: TcxGridDBColumn
- Caption = #25253#20215
- DataBinding.FieldName = 'BJPrice'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 55
- end
- object v2Column12: TcxGridDBColumn
- Caption = #20323#37329'(%)'
- DataBinding.FieldName = 'YongJin'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 55
- end
- object v2Column13: TcxGridDBColumn
- Caption = 'M/Y/'#22871
- DataBinding.FieldName = 'QtyUnit'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 48
- end
- object v1Column10: TcxGridDBColumn
- Caption = #24065#31181
- DataBinding.FieldName = 'BZType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 71
- end
- object v2Column14: TcxGridDBColumn
- Caption = #25104#21697#20215
- DataBinding.FieldName = 'CPPrice'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 55
- end
- object v1Column12: TcxGridDBColumn
- Caption = #23458#25143
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 59
- end
- object v2Column1: TcxGridDBColumn
- Caption = #30446#26631#24066#22330
- DataBinding.FieldName = 'MBShiChang'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 74
- end
- object v2Column2: TcxGridDBColumn
- Caption = #25968#37327
- DataBinding.FieldName = 'Qty'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 68
- end
- object v2Column3: TcxGridDBColumn
- Caption = #21697#36136#35201#27714
- DataBinding.FieldName = 'PinZhiYQ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 110
- end
- object v2Column15: TcxGridDBColumn
- Caption = #25253#20215#22791#27880
- DataBinding.FieldName = 'Note'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 85
- end
- object v2Column7: TcxGridDBColumn
- Caption = #23457#26680#20154
- DataBinding.FieldName = 'Chker'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 63
- end
- object v2Column6: TcxGridDBColumn
- Caption = #23457#26680#29366#24577
- DataBinding.FieldName = 'ChkStatus'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 71
- end
- object v2Column4: TcxGridDBColumn
- Caption = #23457#26680#20215#26684
- DataBinding.FieldName = 'ChkPrice'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 63
- end
- object v2Column5: TcxGridDBColumn
- Caption = #23457#26680#22791#27880
- DataBinding.FieldName = 'ChkNote'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 79
- end
- object v1Column2: TcxGridDBColumn
- Caption = #20135#21697#20013#25991
- DataBinding.FieldName = 'CYName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 68
- end
- object v1Column3: TcxGridDBColumn
- Caption = #20135#21697#33521#25991
- DataBinding.FieldName = 'CYEName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 66
- end
- object v1Column6: TcxGridDBColumn
- Caption = #20135#21697#25104#20221
- DataBinding.FieldName = 'CYECF'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 69
- end
- object v1Column4: TcxGridDBColumn
- Caption = #20135#21697#35268#26684
- DataBinding.FieldName = 'CYSpec'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 67
- end
- object v2Column16: TcxGridDBColumn
- Caption = #22383#24067#36136#22320
- DataBinding.FieldName = 'PBName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 72
- end
- object v1Column17: TcxGridDBColumn
- Caption = #22383#24067#38376#24133
- DataBinding.FieldName = 'PBMF'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 64
- end
- object v1Column18: TcxGridDBColumn
- Caption = #25104#21697#21360#26579#24037#33402
- DataBinding.FieldName = 'CYGY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 94
- end
- object v1Column25: TcxGridDBColumn
- Caption = #25104#21697#38468#21152#24037#33402
- DataBinding.FieldName = 'CYGYAdd'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 90
- end
- object v1Column7: TcxGridDBColumn
- Caption = #25104#21697#38376#24133
- DataBinding.FieldName = 'CYMF'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 73
- end
- object v1Column8: TcxGridDBColumn
- Caption = #25104#21697#20811#37325
- DataBinding.FieldName = 'CYKZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 67
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv2
- end
- end
- object cxSplitter2: TcxSplitter
- Left = 0
- Top = 399
- Width = 1132
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = cxGrid4
- end
- object cxGrid4: TcxGrid
- Left = 0
- Top = 407
- Width = 1132
- Height = 169
- Align = alBottom
- TabOrder = 5
- object Tv21: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- NavigatorButtons.Delete.Enabled = False
- NavigatorButtons.Delete.Visible = False
- DataController.DataSource = DS_Chk
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object cxGridDBColumn15: TcxGridDBColumn
- Caption = #36865#23457#20154
- DataBinding.FieldName = 'Chkperson'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 84
- end
- object cxGridDBColumn17: TcxGridDBColumn
- Caption = #36865#23457#26102#38388
- DataBinding.FieldName = 'FillTime'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 152
- end
- object cxGridDBColumn16: TcxGridDBColumn
- Caption = #23457#26680#20154
- DataBinding.FieldName = 'NextChkperson'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 76
- end
- object cxGridDBColumn18: TcxGridDBColumn
- Caption = #23457#26680#39034#24207
- DataBinding.FieldName = 'ChkOrder'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 65
- end
- object v21Column1: TcxGridDBColumn
- Caption = #23457#26680#26102#38388
- DataBinding.FieldName = 'ChkTime'
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_TradeManage.Default
- Width = 159
- end
- object cxGridDBColumn19: TcxGridDBColumn
- Caption = #29366#24577
- DataBinding.FieldName = 'ChkStatus'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = DataLink_TradeManage.Default
- Width = 93
- end
- object v21Column2: TcxGridDBColumn
- Caption = #23457#26680#20215#26684
- DataBinding.FieldName = 'ChkPrice'
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_TradeManage.Default
- Width = 75
- end
- object v21Column3: TcxGridDBColumn
- Caption = #23457#26680#22791#27880
- DataBinding.FieldName = 'ChkNote'
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_TradeManage.Default
- Width = 177
- end
- end
- object cxGridLevel3: TcxGridLevel
- GridView = Tv21
- end
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 181
- Top = 185
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- Parameters = <>
- Left = 221
- Top = 185
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 253
- Top = 185
- end
- object ODPat: TOpenDialog
- Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Left = 884
- Top = 5
- end
- object IdFTP1: TIdFTP
- MaxLineAction = maException
- ReadTimeout = 0
- ProxySettings.ProxyType = fpcmNone
- ProxySettings.Port = 0
- Left = 845
- Top = 4
- end
- object SaveDialog1: TSaveDialog
- Left = 769
- Top = 5
- end
- object CDS_BJ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 376
- Top = 248
- end
- object DSBJ: TDataSource
- DataSet = CDS_BJ
- Left = 483
- Top = 248
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 408
- Top = 248
- end
- object ADOQuerySub: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 437
- Top = 249
- end
- object DS_Chk: TDataSource
- DataSet = CDS_Chk
- Left = 419
- Top = 464
- end
- object CDS_Chk: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 448
- Top = 464
- end
- object cxGridPopupMenu3: TcxGridPopupMenu
- Grid = cxGrid4
- PopupMenus = <>
- Left = 480
- Top = 464
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPBaoJiaChk.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPBaoJiaChk.pas
deleted file mode 100644
index 2aba3c7..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPBaoJiaChk.pas
+++ /dev/null
@@ -1,375 +0,0 @@
-unit U_CPBaoJiaChk;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxGraphics, cxCustomData, cxStyles, cxTL, cxMaskEdit, DB, ADODB,
- cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin,
- StdCtrls, cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, DBClient,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, ExtCtrls,
- cxSplitter, cxGridLevel, cxClasses, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_Common,
- RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
- IdTCPClient, IdFTP,ShellAPI,IniFiles, cxCheckBox, Menus, cxPC;
-
-type
- TfrmCPBaoJiaChk = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- Panel1: TPanel;
- ToolButton2: TToolButton;
- Label1: TLabel;
- CYName: TEdit;
- Label4: TLabel;
- CYEName: TEdit;
- Label5: TLabel;
- CYSpec: TEdit;
- ADOQueryMain: TADOQuery;
- ToolButton1: TToolButton;
- ODPat: TOpenDialog;
- IdFTP1: TIdFTP;
- SaveDialog1: TSaveDialog;
- ToolButton6: TToolButton;
- Label3: TLabel;
- CYNO: TEdit;
- Panel2: TPanel;
- Label7: TLabel;
- CYKZ: TEdit;
- Label8: TLabel;
- Label9: TLabel;
- CYNOOld: TEdit;
- CYECF: TEdit;
- Label10: TLabel;
- CYMF: TEdit;
- CDS_BJ: TClientDataSet;
- DSBJ: TDataSource;
- cxGridPopupMenu2: TcxGridPopupMenu;
- Label2: TLabel;
- begdate: TDateTimePicker;
- enddate: TDateTimePicker;
- ADOQuerySub: TADOQuery;
- DS_Chk: TDataSource;
- CDS_Chk: TClientDataSet;
- cxGridPopupMenu3: TcxGridPopupMenu;
- cxGrid1: TcxGrid;
- Tv2: TcxGridDBTableView;
- v1Column1: TcxGridDBColumn;
- v1Column41: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1Column2: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- v1Column4: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column25: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- cxSplitter2: TcxSplitter;
- cxGrid4: TcxGrid;
- Tv21: TcxGridDBTableView;
- cxGridDBColumn15: TcxGridDBColumn;
- cxGridDBColumn16: TcxGridDBColumn;
- cxGridDBColumn17: TcxGridDBColumn;
- cxGridDBColumn18: TcxGridDBColumn;
- cxGridDBColumn19: TcxGridDBColumn;
- cxGridLevel3: TcxGridLevel;
- v21Column1: TcxGridDBColumn;
- Label6: TLabel;
- BJPerson: TEdit;
- Label11: TLabel;
- KHName: TEdit;
- v2Column1: TcxGridDBColumn;
- v2Column2: TcxGridDBColumn;
- v2Column3: TcxGridDBColumn;
- v21Column2: TcxGridDBColumn;
- v21Column3: TcxGridDBColumn;
- v2Column4: TcxGridDBColumn;
- v2Column5: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v2Column7: TcxGridDBColumn;
- v2Column8: TcxGridDBColumn;
- v2Column9: TcxGridDBColumn;
- v2Column10: TcxGridDBColumn;
- v2Column11: TcxGridDBColumn;
- v2Column12: TcxGridDBColumn;
- v2Column13: TcxGridDBColumn;
- v2Column14: TcxGridDBColumn;
- v2Column15: TcxGridDBColumn;
- v2Column16: TcxGridDBColumn;
- v2Column17: TcxGridDBColumn;
- ToolButton3: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure cxDBTreeList1DblClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure CYNoChange(Sender: TObject);
- procedure ToolButton6Click(Sender: TObject);
- procedure Tv2CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure CYNOOldChange(Sender: TObject);
- procedure Tv2CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure TBRafreshClick(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- private
- { Private declarations }
- CPID:string;
- PState:Integer;
- FCPID,FTopID:String;
- procedure InitGrid();
- procedure ReadINIFile();
-
- public
- { Public declarations }
- FFint:Integer;
- end;
-
-var
- frmCPBaoJiaChk: TfrmCPBaoJiaChk;
-
-implementation
-uses
- U_DataLink,U_Fun,U_ZDYHelp;
-
-{$R *.dfm}
-
-
-
-procedure TfrmCPBaoJiaChk.InitGrid();
-begin
-
- try
- ADOQuerySub.DisableControls;
- with ADOQuerySub do
- begin
- Filtered:=False;
- Close;
- SQL.Clear;
- SQL.Add('select A.BJPerSon,A.BJPrice,A.BZType,A.KHName,A.BJID,A.MBShiChang,A.Qty,A.PinZhiYQ, A.BJTime,');
- sql.Add('A.Chker,A.ChkStatus,A.ChkPrice,A.ChkNote,A.BJNO,A.BJCount,A.YongJIn,A.CPPrice,A.PriceSY,A.QtyUnit,A.Note,B.* ');
- sql.Add('from CP_BaoJia A');
- SQL.Add('left join CP_YDang B on A.CYID=B.CYID ');
- {if Trim(DParameters1)='Ȩ' then
- begin
-
- end else
- begin
- sql.Add('where exists(select * from CP_BaoJia_Chk C where C.ChkTime>=:begdate and ChkTime<:enddate ');
- sql.Add(' and isnull(C.ChkStatus,'''')<>'''' and C.BJID=A.BJID and NextChkPerson='''+Trim(DName)+''')');
- sql.Add(' and A.ChkStatus=''ͨ''');
- end;}
- sql.Add(' where isnull(A.Chker,'''')<>'''' and A.ChkStatus=''ͨ'' ');
- sql.Add(' and A.FillTime>=:begdate and A.FillTime<:enddate ');
-
- Parameters.ParamByName('begdate').Value:=Trim(FormatDateTime('yyyy-MM-dd',begdate.DateTime));
- Parameters.ParamByName('enddate').Value:=Trim(FormatDateTime('yyyy-MM-dd',enddate.DateTime+1));
- Open;
- end;
- SCreateCDS20(ADOQuerySub,CDS_BJ);
- SInitCDSData20(ADOQuerySub,CDS_BJ);
- finally
- ADOQuerySub.EnableControls;
- end;
-end;
-
-procedure TfrmCPBaoJiaChk.FormDestroy(Sender: TObject);
-begin
- frmCPBaoJiaChk:=nil;
-end;
-
-procedure TfrmCPBaoJiaChk.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmCPBaoJiaChk.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('bjshWTSel',Tv2,'۹');
- WriteCxGrid('bjshWTSSel',Tv21,'۹');
- if DirectoryExists(ExtractFileDir('D:\Right1209')) then
- winexec('cmd /c rd /s /q D:\Right1209',sw_hide);
- Close;
-end;
-procedure TfrmCPBaoJiaChk.FormShow(Sender: TObject);
-begin
- ReadCxGrid('bjshWTSel',Tv2,'۹');
- ReadCxGrid('bjshWTSSel',Tv21,'۹');
- enddate.Date:=SGetServerDate(ADOQueryCmd);
- begdate.Date:=enddate.Date-7;
- InitGrid();
-end;
-
-procedure TfrmCPBaoJiaChk.cxDBTreeList1DblClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmCPBaoJiaChk.ToolButton2Click(Sender: TObject);
-begin
- if ADOQuerySub.Active then
- begin
- SDofilter(ADOQuerySub,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQuerySub,CDS_BJ);
- SInitCDSData20(ADOQuerySub,CDS_BJ);
- end;
-end;
-
-procedure TfrmCPBaoJiaChk.CYNoChange(Sender: TObject);
-begin
- if Length(Trim(TEdit(Sender).Text))<3 then Exit;
- if ADOQuerySub.Active then
- begin
- SDofilter(ADOQuerySub,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQuerySub,CDS_BJ);
- SInitCDSData20(ADOQuerySub,CDS_BJ);
- end;
-
-end;
-
-procedure TfrmCPBaoJiaChk.ToolButton6Click(Sender: TObject);
-var
- fHandle:THandle;
- FInt:Integer;
- FFName,FPath:String;
-begin
- {FPath:='C:\HTTP1209\';
- if DirectoryExists(ExtractFileDir(FPath)) then
- winexec('cmd /c rd /s /q C:\HTTP1209',sw_hide);}
- with ADOQueryTemp do
- begin
- close;
- sql.Clear;
- sql.Add('select * from XD_File where CYNO='''+Trim(CDS_BJ.fieldbyname('CYNO').AsString)+'''');
- Open;
- if IsEmpty then
- begin
- Application.MessageBox('ƷͼƬδϴ','ʾ',0);
- Exit;
- end;
- end;
- try
- ReadINIFile();
- server:=ReadINIFileStr('SYSTEMSET.INI','SERVER','ַ','127.0.0.1');
- if Length(server)<6 then
- begin
- server:='127.0.0.1';
- end;
- IdFTP1.Host :=server;//PicSvr;
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- IdFTP1.Quit;
- Application.MessageBox('ӵļ飡', 'ʾ', MB_ICONWARNING);
- Exit;
- end;
- FPath:='D:\Right1209\';
- if not DirectoryExists(ExtractFileDir(FPath)) then
- CreateDir(ExtractFileDir(FPath));
- FFName:=Trim(ADOQueryTemp.fieldbyname('FileName').AsString);
- FFName:=FPath+FFName;
- if FileExists(FFName) then
- begin
- FInt:=1;
- end;
- if FInt<>1 then
- IdFTP1.Get('YP\'+Trim(ADOQueryTemp.fieldbyname('FileName').AsString),
- FPath+Trim(ADOQueryTemp.fieldbyname('FileName').AsString)
- );
- if IdFTP1.Connected then IdFTP1.Quit;
- ShellExecute(Handle, 'open',PChar(FPath+Trim(ADOQueryTemp.fieldbyname('FileName').AsString)),'', '', SW_SHOWNORMAL);
-
-end;
-procedure TfrmCPBaoJiaChk.ReadINIFile();
-var
- programIni:Tinifile; //ļ
- FileName:string;
-begin
- FileName:=ExtractFilePath(Paramstr(0))+'SYSTEMSET.INI';
- programIni:=Tinifile.create(FileName);
- server:=programIni.ReadString('SERVER','ַ','127.0.0.1');
- programIni.Free;
-end;
-
-procedure TfrmCPBaoJiaChk.Tv2CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- ToolButton6.Click;
-end;
-
-procedure TfrmCPBaoJiaChk.CYNOOldChange(Sender: TObject);
-begin
-
- if ADOQuerySub.Active then
- begin
- SDofilter(ADOQuerySub,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQuerySub,CDS_BJ);
- SInitCDSData20(ADOQuerySub,CDS_BJ);
- end;
-end;
-
-procedure TfrmCPBaoJiaChk.Tv2CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- if CDS_BJ.IsEmpty then Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from CP_BaoJia_Chk where BJID='''+Trim(CDS_BJ.fieldbyname('BJID').AsString)+'''');
- sql.Add(' order by ChkOrder ');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chk);
- SInitCDSData20(ADOQueryTemp,CDS_Chk);
-end;
-
-procedure TfrmCPBaoJiaChk.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmCPBaoJiaChk.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
- if CDS_BJ.IsEmpty then
- begin
- with Self.ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from CP_BaoJia_Chk where 1<>1');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chk);
- SInitCDSData20(ADOQueryTemp,CDS_Chk);
- end;
-end;
-
-procedure TfrmCPBaoJiaChk.ToolButton3Click(Sender: TObject);
-begin
- if CDS_BJ.Locate('SSel',True,[])=False then
- begin
- Application.MessageBox('ûѡ!','ʾ',0);
- Exit;
- end;
- ModalResult:=1;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPOutListCX.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPOutListCX.dfm
deleted file mode 100644
index 13ed67e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPOutListCX.dfm
+++ /dev/null
@@ -1,312 +0,0 @@
-object frmCPOutListCX: TfrmCPOutListCX
- Left = 187
- Top = 129
- Width = 1396
- Height = 654
- Caption = #25104#21697#20986#24211#26597#35810
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 107
- TextHeight = 13
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1380
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_TradeManage.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 9
- OnClick = TBRafreshClick
- end
- object ToolButton1: TToolButton
- Left = 63
- Top = 0
- Caption = #30830#23450
- ImageIndex = 41
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 122
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 55
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1380
- Height = 43
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label5: TLabel
- Left = 24
- Top = 13
- Width = 39
- Height = 13
- Caption = #21512#21516#21495
- end
- object orderNo: TEdit
- Tag = 2
- Left = 65
- Top = 10
- Width = 213
- Height = 21
- TabOrder = 0
- OnKeyPress = orderNoKeyPress
- end
- end
- object MovePanel2: TMovePanel
- Left = 373
- Top = 208
- Width = 313
- Height = 53
- BevelInner = bvLowered
- Caption = #27491#22312#25191#34892#25968#25454#25805#20316#65292#35831#31245#21518#12290#12290#12290
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -15
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- Visible = False
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 76
- Width = 1380
- Height = 538
- Align = alClient
- TabOrder = 3
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skCount
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = v2Column6
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_TradeManage.SHuangSe
- Styles.IncSearch = DataLink_TradeManage.SHuangSe
- Styles.Selection = DataLink_TradeManage.SHuangSe
- Styles.Header = DataLink_TradeManage.Default
- object v1Column11: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 53
- end
- object v1Column1: TcxGridDBColumn
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'ConNo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 67
- end
- object v1OrderNo: TcxGridDBColumn
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'OrderNo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1FHMoney: TcxGridDBColumn
- Caption = #24212#25910#37329#39069
- DataBinding.FieldName = 'FHMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1YRLMoney: TcxGridDBColumn
- Caption = #24050#35748#39046#37329#39069
- DataBinding.FieldName = 'YRLMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 71
- end
- object v1Column2: TcxGridDBColumn
- Caption = #20986#26588#26085#26399
- DataBinding.FieldName = 'CRTime'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 78
- end
- object v2Column1: TcxGridDBColumn
- Caption = #36135#29289#21517#31216'('#20013#25991')'
- DataBinding.FieldName = 'MPRTCodeName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 111
- end
- object v1Column10: TcxGridDBColumn
- Caption = #36135#29289#21517#31216'('#33521#25991')'
- DataBinding.FieldName = 'PRTEngCodeName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 95
- end
- object v1Column8: TcxGridDBColumn
- Caption = #38376#24133
- DataBinding.FieldName = 'MPRTMF'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 67
- end
- object v1Column9: TcxGridDBColumn
- Caption = #20811#37325
- DataBinding.FieldName = 'MPRTKZ'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 45
- end
- object v2Column6: TcxGridDBColumn
- Caption = #20986#26588#25968#37327
- DataBinding.FieldName = 'Qty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 88
- end
- object v1Column7: TcxGridDBColumn
- Caption = #25968#37327#21333#20301
- DataBinding.FieldName = 'QtyUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.DropDownListStyle = lsFixedList
- Properties.Items.Strings = (
- 'M'
- 'Kg'
- 'Y')
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 71
- end
- object v1Column3: TcxGridDBColumn
- Caption = #21333#20215
- DataBinding.FieldName = 'PRTPrice'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 63
- end
- object v1Column4: TcxGridDBColumn
- Caption = #24065#31181
- DataBinding.FieldName = 'OrdConPrcUnit'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 47
- end
- object v1Column5: TcxGridDBColumn
- Caption = #20215#26684#26415#35821
- DataBinding.FieldName = 'OrdConPrcNote'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 75
- end
- object v1Column6: TcxGridDBColumn
- Caption = #20215#26684#35828#26126
- DataBinding.FieldName = 'OrdConPrcShuoM'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 78
- end
- object v1ZSYJMoney: TcxGridDBColumn
- Caption = #25972#25968#20323#37329
- DataBinding.FieldName = 'ZSYJMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1GDYJMoney: TcxGridDBColumn
- Caption = #22266#23450#20323#37329
- DataBinding.FieldName = 'GDYJMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1FZYJMoney: TcxGridDBColumn
- Caption = #20998#20540#20323#37329
- DataBinding.FieldName = 'FZYJMoney'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- end
- object cxGrid2Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 776
- Top = 160
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 808
- Top = 160
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 784
- Top = 248
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 744
- Top = 168
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPOutListCX.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPOutListCX.pas
deleted file mode 100644
index a219327..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_CPOutListCX.pas
+++ /dev/null
@@ -1,159 +0,0 @@
-unit U_CPOutListCX;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
- cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridDBTableView,
- cxGrid, StdCtrls, ComCtrls, ExtCtrls, ToolWin, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxDropDownEdit, RM_Common, RM_Class,
- RM_e_Xls, RM_Dataset, RM_System, RM_GridReport, cxCheckBox, Menus,
- MovePanel, cxCalendar, cxButtonEdit;
-
-type
- TfrmCPOutListCX = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryMain: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- CDS_Main: TClientDataSet;
- Label5: TLabel;
- orderNo: TEdit;
- MovePanel2: TMovePanel;
- cxGrid2: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column1: TcxGridDBColumn;
- v1Column2: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- cxGrid2Level1: TcxGridLevel;
- v1Column3: TcxGridDBColumn;
- v1Column4: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- ToolButton1: TToolButton;
- v1ZSYJMoney: TcxGridDBColumn;
- v1GDYJMoney: TcxGridDBColumn;
- v1FZYJMoney: TcxGridDBColumn;
- v1OrderNo: TcxGridDBColumn;
- v1FHMoney: TcxGridDBColumn;
- v1YRLMoney: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBRafreshClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure orderNoKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton1Click(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- frmCPOutListCX: TfrmCPOutListCX;
-
-implementation
-uses
- U_DataLink,U_Fun,U_BanCpRkOutPut;
-
-{$R *.dfm}
-
-procedure TfrmCPOutListCX.FormDestroy(Sender: TObject);
-begin
- frmCPOutListCX:=nil;
-end;
-
-procedure TfrmCPOutListCX.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmCPOutListCX.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- SQL.Add('select A.*,D.ConNo,B.MPRTCodeName,B.MPRTMF,B.MPRTKZ,B.OrderNo,D.OrdConPrcUnit ');
- sql.Add(',D.OrdConPrcNote,D.OrdConPrcShuoM,C.*,FHMoney=round(C.PRTPrice*A.Qty,2,1) ');
- sql.add(',YRLMoney=(select Sum(FP.FPMoney)+isnull(sum(FP.SXMoney),0) from SK_Money_FP FP where FP.BCID=A.BCID and FP.WBID=A.Mainid)');
- sql.add('from CK_BanCP_CR A ');
- Sql.add(' inner join JYOrder_Main B on A.MainId=B.MainId');
- sql.Add(' left join JYOrderCon_Sub C on B.ConSubId=C.Subid');
- sql.Add(' left join JYOrderCon_Main D on C.Mainid=D.Mainid');
- sql.Add(' where D.ConNo like '''+'%'+Trim(orderNo.Text)+'%'+'''');
- SQL.Add(' and CRType='''' and A.BCID=A.MJID');
- sql.add(' order by B.OrderNo');
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_Main);
- SInitCDSData20(ADOQueryMain,CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCPOutListCX.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmCPOutListCX.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('ҵƷѯ',Tv1,'Ʒֿ');
- Close;
-end;
-
-procedure TfrmCPOutListCX.FormShow(Sender: TObject);
-begin
- ReadCxGrid('ҵƷѯ',Tv1,'Ʒֿ');
-end;
-
-procedure TfrmCPOutListCX.N1Click(Sender: TObject);
-begin
- //SelOKNo(CDS_Main,True);
-end;
-
-procedure TfrmCPOutListCX.N2Click(Sender: TObject);
-begin
- //SelOKNo(CDS_Main,False);
-end;
-
-
-
-procedure TfrmCPOutListCX.orderNoKeyPress(Sender: TObject;
- var Key: Char);
-begin
- if Key=#13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmCPOutListCX.ToolButton1Click(Sender: TObject);
-begin
- WriteCxGrid('ҵƷѯ',Tv1,'Ʒֿ');
- ModalResult:=1;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm
deleted file mode 100644
index ab11b0d..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ConLCInPutDC.dfm
+++ /dev/null
@@ -1,1064 +0,0 @@
-object frmConLCInPutDC: TfrmConLCInPutDC
- Left = 299
- Top = 79
- Width = 1073
- Height = 775
- Caption = #35746#33329#25351#31034#20070#24405#20837
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1065
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clBtnFace
- EdgeInner = esNone
- EdgeOuter = esNone
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBSave: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 5
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object ScrollBox1: TScrollBox
- Left = 0
- Top = 29
- Width = 1065
- Height = 468
- Align = alTop
- BevelInner = bvNone
- BevelOuter = bvNone
- Color = clBtnFace
- Ctl3D = False
- ParentColor = False
- ParentCtl3D = False
- TabOrder = 1
- object Label10: TLabel
- Left = 284
- Top = 20
- Width = 65
- Height = 12
- Caption = #25253#20851#25260#22836#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label24: TLabel
- Left = 22
- Top = 19
- Width = 78
- Height = 12
- Caption = #35746#33329#21333#32534#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label18: TLabel
- Left = 795
- Top = 15
- Width = 66
- Height = 12
- Caption = #35013' '#36816' '#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label19: TLabel
- Left = 283
- Top = 45
- Width = 66
- Height = 12
- Caption = #30446' '#30340' '#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label25: TLabel
- Left = 48
- Top = 94
- Width = 52
- Height = 12
- Caption = #33337#20844#21496#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label26: TLabel
- Left = 822
- Top = 68
- Width = 39
- Height = 12
- Caption = #36135#20195#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label8: TLabel
- Left = 544
- Top = 17
- Width = 65
- Height = 12
- Caption = #20986#36816#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 35
- Top = 69
- Width = 65
- Height = 12
- Caption = #20449#29992#35777#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label13: TLabel
- Left = 21
- Top = 119
- Width = 79
- Height = 12
- Caption = '20'#23610#23567#26588#25968#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label20: TLabel
- Left = 284
- Top = 70
- Width = 65
- Height = 12
- Caption = #20215#26684#26465#27454#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label23: TLabel
- Left = 100
- Top = 120
- Width = 12
- Height = 12
- Caption = 'Kg'
- end
- object Label32: TLabel
- Left = 796
- Top = 42
- Width = 65
- Height = 12
- Caption = #25903#20184#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label38: TLabel
- Left = 35
- Top = 194
- Width = 65
- Height = 12
- Caption = #25991#20214#25260#22836#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 34
- Top = 44
- Width = 66
- Height = 12
- Caption = #30446' '#30340' '#22269#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 544
- Top = 43
- Width = 65
- Height = 12
- Caption = #22791#22949#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 570
- Top = 70
- Width = 39
- Height = 12
- Caption = #23458#25143#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label9: TLabel
- Left = 284
- Top = 94
- Width = 65
- Height = 12
- Caption = #36816#36153#25215#20184#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label14: TLabel
- Left = 544
- Top = 96
- Width = 65
- Height = 12
- Caption = #36816#36755#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label15: TLabel
- Left = 796
- Top = 95
- Width = 65
- Height = 12
- Caption = #35013#31665#31867#22411#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label16: TLabel
- Left = 21
- Top = 144
- Width = 79
- Height = 12
- Caption = '40'#23610#22823#26588#25968#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label17: TLabel
- Left = 100
- Top = 140
- Width = 12
- Height = 12
- Caption = 'Kg'
- end
- object Label27: TLabel
- Left = 21
- Top = 169
- Width = 79
- Height = 12
- Caption = '40'#23610#39640#26588#25968#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 297
- Top = 119
- Width = 52
- Height = 12
- Caption = #21333#35777#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label12: TLabel
- Left = 297
- Top = 143
- Width = 52
- Height = 12
- Caption = #19994#21153#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label21: TLabel
- Left = 297
- Top = 168
- Width = 52
- Height = 12
- Caption = #25253#20851#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 75
- Top = 230
- Width = 13
- Height = 60
- Caption = #36135#13#10#29289#13#10#25551#13#10#36848#13#10
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 75
- Top = 306
- Width = 13
- Height = 36
- Caption = #25910#13#10#36135#13#10#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 75
- Top = 382
- Width = 13
- Height = 36
- Caption = #36890#13#10#30693#13#10#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label22: TLabel
- Left = 587
- Top = 155
- Width = 13
- Height = 24
- Caption = #21787#13#10#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label28: TLabel
- Left = 587
- Top = 227
- Width = 13
- Height = 48
- Caption = #21333#13#10#25454#13#10#35201#13#10#27714
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label29: TLabel
- Left = 587
- Top = 307
- Width = 13
- Height = 48
- Caption = #35013#13#10#31665#13#10#22320#13#10#22336
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label30: TLabel
- Left = 588
- Top = 383
- Width = 13
- Height = 24
- Caption = #22791#13#10#27880
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object DCNO: TEdit
- Tag = 2
- Left = 100
- Top = 16
- Width = 136
- Height = 18
- ReadOnly = True
- TabOrder = 0
- Text = #31995#32479#33258#21160#32534#30721
- end
- object FromPlace: TBtnEditC
- Tag = 2
- Left = 863
- Top = 10
- Width = 136
- Height = 20
- Hint = 'LCFromPlace/'#35013#36816#28207
- TabOrder = 1
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object TOPlace: TBtnEditC
- Tag = 2
- Left = 354
- Top = 42
- Width = 136
- Height = 20
- Hint = 'LCTOPlace/'#30446#30340#28207
- TabOrder = 2
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object ChuanInfo: TBtnEditC
- Tag = 2
- Left = 100
- Top = 92
- Width = 136
- Height = 20
- Hint = 'ChuanInfo/'#33337#20844#21496
- TabOrder = 3
- Text = #27809#25351#23450
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object HangBanName: TBtnEditC
- Tag = 2
- Left = 863
- Top = 37
- Width = 136
- Height = 20
- Hint = 'DCPayment/'#25903#20184#26041#24335
- TabOrder = 4
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object CYDATE: TDateTimePicker
- Tag = 2
- Left = 612
- Top = 13
- Width = 138
- Height = 20
- Date = 41454.423364074070000000
- Time = 41454.423364074070000000
- TabOrder = 5
- end
- object XYZNO: TBtnEditC
- Tag = 2
- Left = 100
- Top = 66
- Width = 136
- Height = 20
- Hint = 'XYZNO/'#20449#29992#35777#21495
- TabOrder = 6
- OnBtnUpClick = XYZNOBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object ESCXGS: TEdit
- Tag = 2
- Left = 100
- Top = 118
- Width = 136
- Height = 18
- TabOrder = 7
- Text = '0'
- end
- object OrdConPrcNote: TBtnEditC
- Tag = 2
- Left = 354
- Top = 66
- Width = 136
- Height = 20
- Hint = 'OrdConPrcNote/'#20215#26684#26465#27454
- TabOrder = 8
- Text = 'FOB'
- OnBtnUpClick = OrdConPrcNoteBtnUpClick
- end
- object BGTAITOU: TBtnEditC
- Tag = 2
- Left = 354
- Top = 18
- Width = 136
- Height = 20
- Hint = 'BGTAITOU/'#25253#20851#25260#22836
- TabOrder = 9
- Text = #32461#20852#25391#27704#32442#32455#21697#26377#38480#20844#21496
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object fileTT: TBtnEditC
- Tag = 2
- Left = 100
- Top = 190
- Width = 136
- Height = 20
- Hint = 'fileTT/'#25991#20214#25260#22836
- TabOrder = 10
- Text = #32461#20852#25391#27704#32442#32455#21697#26377#38480#20844#21496
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object TOCOUNTRY: TBtnEditC
- Tag = 2
- Left = 100
- Top = 40
- Width = 136
- Height = 20
- Hint = 'TOCOUNTRY/'#30446#30340#22269
- TabOrder = 11
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object KHName: TBtnEditC
- Tag = 2
- Left = 612
- Top = 66
- Width = 136
- Height = 20
- TabOrder = 12
- OnBtnUpClick = KHNameBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object YFCF: TBtnEditC
- Tag = 2
- Left = 354
- Top = 90
- Width = 136
- Height = 20
- Hint = 'YFCF/'#36816#36153#25215#20184
- TabOrder = 13
- Text = 'FREIGHT COLLECT'
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object YSFS: TBtnEditC
- Tag = 2
- Left = 612
- Top = 92
- Width = 136
- Height = 20
- Hint = 'YSFS/'#36816#36755#26041#24335
- TabOrder = 14
- Text = 'BY SEA'
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object ping: TBtnEditC
- Tag = 2
- Left = 863
- Top = 91
- Width = 136
- Height = 20
- Hint = 'ping/'#26588#22411
- TabOrder = 15
- Text = #25972#26588
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object SSCDGS: TEdit
- Tag = 2
- Left = 100
- Top = 142
- Width = 136
- Height = 18
- TabOrder = 16
- Text = '0'
- end
- object SSCGGS: TEdit
- Tag = 2
- Left = 100
- Top = 166
- Width = 136
- Height = 18
- TabOrder = 17
- Text = '0'
- end
- object HDName: TBtnEditC
- Tag = 2
- Left = 863
- Top = 64
- Width = 136
- Height = 20
- Hint = 'HDName/'#36135#20195#21517#31216
- TabOrder = 18
- OnBtnUpClick = TOPlaceBtnUpClick
- OnBtnDnClick = SKBankBtnDnClick
- end
- object SellNOTE: TMemo
- Tag = 2
- Left = 96
- Top = 229
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 19
- end
- object TDShouHuoPerson: TMemo
- Tag = 2
- Left = 96
- Top = 301
- Width = 397
- Height = 64
- Hint = 'TDShouHuoPerson/'#25552#21333#25910#36135#20154
- ScrollBars = ssVertical
- TabOrder = 20
- end
- object TDTongZhiPerson: TMemo
- Tag = 2
- Left = 96
- Top = 377
- Width = 397
- Height = 64
- ScrollBars = ssVertical
- TabOrder = 21
- end
- object ZhuMaiTou: TMemo
- Tag = 2
- Left = 608
- Top = 154
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 22
- end
- object DJYQ: TMemo
- Tag = 2
- Left = 608
- Top = 226
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 23
- end
- object ZXPLACE: TMemo
- Tag = 2
- Left = 608
- Top = 302
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 24
- end
- object Note: TMemo
- Tag = 2
- Left = 609
- Top = 378
- Width = 397
- Height = 64
- ScrollBars = ssVertical
- TabOrder = 25
- end
- object BTDate: TDateTimePicker
- Tag = 2
- Left = 612
- Top = 38
- Width = 136
- Height = 20
- BevelInner = bvNone
- Date = 0.670856296288548000
- Format = 'yyyy-MM-dd'
- Time = 0.670856296288548000
- ShowCheckbox = True
- Checked = False
- TabOrder = 26
- end
- object DZY: TComboBox
- Tag = 2
- Left = 354
- Top = 114
- Width = 136
- Height = 20
- ItemHeight = 12
- TabOrder = 27
- OnDropDown = DZYDropDown
- end
- object YWY: TComboBox
- Tag = 2
- Left = 354
- Top = 138
- Width = 136
- Height = 20
- ItemHeight = 12
- TabOrder = 28
- OnDropDown = YWYDropDown
- end
- object BGY: TComboBox
- Tag = 2
- Left = 354
- Top = 162
- Width = 136
- Height = 20
- ItemHeight = 12
- TabOrder = 29
- OnDropDown = BGYDropDown
- end
- end
- object ToolBar2: TToolBar
- Left = 0
- Top = 497
- Width = 1065
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clBtnFace
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 2
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #22686#34892
- ImageIndex = 57
- OnClick = TBRafreshClick
- end
- object ToolButton2: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #26032#22686#22810#34892
- ImageIndex = 2
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 150
- Top = 0
- Caption = #22797#21046#22686#34892
- ImageIndex = 38
- OnClick = ToolButton1Click
- end
- object TBFind: TToolButton
- Left = 233
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 107
- OnClick = TBFindClick
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 529
- Width = 1065
- Height = 215
- Align = alClient
- TabOrder = 3
- object Tv1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Format = '0'
- Position = spFooter
- end
- item
- Format = '0'
- Position = spFooter
- end
- item
- Format = '0'
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = v1Column11
- end
- item
- Kind = skSum
- Column = v1Column9
- end
- item
- Kind = skSum
- Column = v1Column12
- end
- item
- Kind = skSum
- Column = v1Column13
- end
- item
- Kind = skSum
- Column = v1Column14
- end
- item
- Kind = skSum
- Column = v1Column16
- end
- item
- Kind = skSum
- Column = v1Column7
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column2: TcxGridDBColumn
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'FROMORDERNO'
- HeaderAlignmentHorz = taCenter
- Width = 125
- end
- object v1Column10: TcxGridDBColumn
- Caption = #21697#21517
- DataBinding.FieldName = 'PRTCodeName'
- HeaderAlignmentHorz = taCenter
- Width = 103
- end
- object v1Column3: TcxGridDBColumn
- Caption = #38376#24133
- DataBinding.FieldName = 'PRTMF'
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object v1Column4: TcxGridDBColumn
- Caption = #20811#37325
- DataBinding.FieldName = 'PRTKZ'
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object v1Column5: TcxGridDBColumn
- Caption = #25104#20998
- DataBinding.FieldName = 'PRTCF'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column6: TcxGridDBColumn
- Caption = #39068#33394
- DataBinding.FieldName = 'PRTColor'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column7: TcxGridDBColumn
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'PRTOrderQty'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column1: TcxGridDBColumn
- Caption = #21333#20215
- DataBinding.FieldName = 'PRTPrice'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column8: TcxGridDBColumn
- Caption = #24065#31181
- DataBinding.FieldName = 'PRICEBZ'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column8PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column9: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'MONEY'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column11: TcxGridDBColumn
- Caption = #20323#37329
- DataBinding.FieldName = 'YJMONEY'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object v1Column12: TcxGridDBColumn
- Caption = #27611#37325
- DataBinding.FieldName = 'MAOZHONG'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object v1Column13: TcxGridDBColumn
- Caption = #20928#37325
- DataBinding.FieldName = 'JINGZHONG'
- HeaderAlignmentHorz = taCenter
- Width = 63
- end
- object v1Column14: TcxGridDBColumn
- Caption = #20307#31215
- DataBinding.FieldName = 'TIJI'
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object v1Column15: TcxGridDBColumn
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'BZUNIT'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column15PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object v1Column16: TcxGridDBColumn
- Caption = #21253#35013#20214#25968
- DataBinding.FieldName = 'BZJS'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object ADOTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 448
- Top = 65533
- end
- object ADOCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 480
- Top = 65533
- end
- object ADOQuery1: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 504
- Top = 65533
- end
- object Order_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 522
- Top = 469
- end
- object DataSource1: TDataSource
- DataSet = Order_Sub
- Left = 504
- Top = 424
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas
deleted file mode 100644
index ca88715..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ConLCInPutDC.pas
+++ /dev/null
@@ -1,907 +0,0 @@
-unit U_ConLCInPutDC;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridLevel, cxGridCustomTableView, cxGridTableView,
- cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, cxMemo,
- cxRichEdit, ComCtrls, cxContainer, cxTextEdit, cxMaskEdit, cxButtonEdit,
- StdCtrls, ToolWin, DBClient, ADODB, ExtCtrls, BtnEdit, cxCalendar, StrUtils,
- cxDropDownEdit, cxCurrencyEdit, cxLookAndFeels, cxLookAndFeelPainters,
- cxNavigator, dxSkinsCore, dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmConLCInPutDC = class(TForm)
- ToolBar1: TToolBar;
- TBSave: TToolButton;
- TBClose: TToolButton;
- ScrollBox1: TScrollBox;
- ADOTemp: TADOQuery;
- ADOCmd: TADOQuery;
- ADOQuery1: TADOQuery;
- Label10: TLabel;
- Label24: TLabel;
- DCNO: TEdit;
- Label18: TLabel;
- FromPlace: TBtnEditC;
- Label19: TLabel;
- TOPlace: TBtnEditC;
- Label25: TLabel;
- ChuanInfo: TBtnEditC;
- Label26: TLabel;
- HangBanName: TBtnEditC;
- ToolBar2: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column2: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- Order_Sub: TClientDataSet;
- DataSource1: TDataSource;
- Label8: TLabel;
- CYDATE: TDateTimePicker;
- Label11: TLabel;
- XYZNO: TBtnEditC;
- v1Column3: TcxGridDBColumn;
- v1Column4: TcxGridDBColumn;
- Label13: TLabel;
- ESCXGS: TEdit;
- v1Column1: TcxGridDBColumn;
- Label20: TLabel;
- OrdConPrcNote: TBtnEditC;
- Label23: TLabel;
- ToolButton1: TToolButton;
- Label32: TLabel;
- BGTAITOU: TBtnEditC;
- Label38: TLabel;
- fileTT: TBtnEditC;
- Label1: TLabel;
- TOCOUNTRY: TBtnEditC;
- Label5: TLabel;
- Label7: TLabel;
- KHName: TBtnEditC;
- Label9: TLabel;
- YFCF: TBtnEditC;
- Label14: TLabel;
- YSFS: TBtnEditC;
- Label15: TLabel;
- ping: TBtnEditC;
- Label16: TLabel;
- Label17: TLabel;
- SSCDGS: TEdit;
- Label27: TLabel;
- SSCGGS: TEdit;
- Label6: TLabel;
- Label12: TLabel;
- Label21: TLabel;
- HDName: TBtnEditC;
- SellNOTE: TMemo;
- Label2: TLabel;
- TDShouHuoPerson: TMemo;
- Label3: TLabel;
- TDTongZhiPerson: TMemo;
- Label4: TLabel;
- ZhuMaiTou: TMemo;
- Label22: TLabel;
- DJYQ: TMemo;
- Label28: TLabel;
- ZXPLACE: TMemo;
- Label29: TLabel;
- Note: TMemo;
- Label30: TLabel;
- v1Column5: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1Column15: TcxGridDBColumn;
- v1Column16: TcxGridDBColumn;
- ToolButton2: TToolButton;
- BTDate: TDateTimePicker;
- DZY: TComboBox;
- YWY: TComboBox;
- BGY: TComboBox;
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure SKBankBtnDnClick(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure v1Column1PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Label36DblClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure Label29DblClick(Sender: TObject);
- procedure Label3DblClick(Sender: TObject);
- procedure XYZNOBtnUpClick(Sender: TObject);
- procedure OrdConPrcNoteBtnUpClick(Sender: TObject);
- procedure TOPlaceBtnUpClick(Sender: TObject);
- procedure KHNameBtnUpClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure v1Column15PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column8PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure DZYDropDown(Sender: TObject);
- procedure YWYDropDown(Sender: TObject);
- procedure BGYDropDown(Sender: TObject);
- procedure v1Column1PropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitData();
- procedure ZDYHelp(FButn: TcxButtonEdit; LType: string);
- function SaveData(): Boolean;
- { Private declarations }
- public
- PState, CopyInt: Integer;
- FMainId, FFMainId: string;
- FXS: Integer;
- { Public declarations }
- end;
-
-var
- frmConLCInPutDC: TfrmConLCInPutDC;
- newh: hwnd;
-
-implementation
-
-uses
- U_DataLink, U_ZDYHelp, U_Fun, U_ZDYHelpSel, U_CPBaoJiaChk, U_CPOutListCX,
- U_ProductOrderList_Sel, U_ZdyAttachment;
-
-{$R *.dfm}
-
-procedure TfrmConLCInPutDC.TBCloseClick(Sender: TObject);
-begin
- Close;
-end;
-
-procedure TfrmConLCInPutDC.InitData();
-begin
- CYDATE.DateTime := SGetServerDateTime(ADOTemp);
- BTDate.DateTime := CYDATE.DateTime;
- if PState = 0 then
- begin
- BTDate.Checked := False;
- BGY.Text := Trim(DName);
- DZY.Text := Trim(DName);
- end;
-// BTDate.Checked := False;
- with ADOQuery1 do
- begin
- Close;
- SQL.Clear;
- sql.Add(' select * from JYOrderCon_TT_Sub ');
- if PState = 1 then
- begin
- sql.Add('where TTId=''' + Trim(FMainId) + '''');
- end;
- if PState = 0 then
- begin
- sql.Add(' where 1=2');
- end;
- Open;
- end;
- SCreateCDS20(ADOQuery1, Order_Sub);
- SInitCDSData20(ADOQuery1, Order_Sub);
- with ADOQuery1 do
- begin
- Close;
- sql.Clear;
- sql.Add('select * ');
- sql.add('from JYOrderCon_TT where TTId=''' + Trim(FMainId) + '''');
- Open;
- end;
- if ADOQuery1.IsEmpty = false then
- SCSHDataNew(ADOQuery1, ScrollBox1, 2);
- if PState <> 0 then
- begin
- DZY.Text := ADOQuery1.fieldbyname('DZY').AsString;
- YWY.Text := ADOQuery1.fieldbyname('YWY').AsString;
- BGY.Text := ADOQuery1.fieldbyname('BGY').AsString;
- end;
-
- if CopyInt = 99 then
- begin
- PState := 0;
- FMainId := '';
- DCNO.Text := 'ϵͳԶ';
- OrdConPrcNote.Text := 'FOB';
- YFCF.Text := 'FREIGHT COLLECT';
-
- Order_Sub.DisableControls;
- with Order_Sub do
- begin
- First;
- while not Eof do
- begin
- Edit;
- FieldByName('TSID').Value := '';
- Post;
- Next;
- end;
- end;
- Order_Sub.EnableControls;
- end;
-end;
-
-procedure TfrmConLCInPutDC.ZDYHelp(FButn: TcxButtonEdit; LType: string);
-var
- FType, ZDYName, FText: string;
-begin
-end;
-
-procedure TfrmConLCInPutDC.FormShow(Sender: TObject);
-begin
- InitData();
-end;
-
-function TfrmConLCInPutDC.SaveData(): Boolean;
-var
- maxno, submaxno, MAXDCNO: string;
-begin
- try
- ADOCmd.Connection.BeginTrans;
- ///
- if Trim(FMainId) = '' then
- begin
- if GetLSNo(ADOCmd, maxno, 'DC', 'JYOrderCon_TT', 3, 1) = False then
- begin
- ADOCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(FMainId);
- end;
- if (Trim(DCNO.Text) = 'ϵͳԶ') and (FMainId = '') then
- begin
- if GetLSNo(ADOCmd, MAXDCNO, 'ZY', 'JYOrderCon_TT', 3, 1) = False then
- begin
- ADOCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- DCNO.Text := Trim(MAXDCNO);
- end;
-
- with ADOCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT where TTId=''' + Trim(FMainId) + '''');
- Open;
- end;
- with ADOCmd do
- begin
- if Trim(FMainId) = '' then
- begin
- Append;
- fieldbyname('XGCount').Value := 0;
- fieldbyname('EditFlag').Value := '';
- fieldbyname('EditNote').Value := '';
- fieldbyname('EditSQTime').Value := NULL;
- end
- else
- begin
- Edit;
- //fieldbyname('XGCount').Value:=fieldbyname('XGCount').AsFloat+1;
- end;
- FieldByName('TTId').Value := Trim(maxno);
- fieldbyname('fillCode').Value := trim(DCode);
- SSetsaveSqlNew(ADOCmd, 'JYOrderCon_TT', ScrollBox1, 2);
- if BTDate.Checked = True then
- begin
- fieldbyname('BTDate').Value := BTDate.DateTime;
- end
- else
- begin
- fieldbyname('BTDate').Value := null;
- end;
- FieldByName('TTType').Value := 'DC';
- FieldByName('ChkStatus').Value := '';
- FieldByName('SChkFlag').Value := 0;
- if Trim(FMainId) = '' then
- begin
- //FieldByName('SKDate').Value:=SGetServerDate(ADOTemp);
- FieldByName('Filler').Value := Trim(DName);
- end
- else
- begin
- FieldByName('Editer').Value := Trim(DName);
- FieldByName('EditTime').Value := SGetServerDateTime(ADOTemp);
- end;
- // FieldByName('Note').Value:=Trim(Note.Text);
- Post;
- end;
-
- with Order_Sub do
- begin
- First;
- while not Eof do
- begin
- if Trim(Order_Sub.fieldbyname('TSId').AsString) = '' then
- begin
- if GetLSNo(ADOCmd, submaxno, 'DTS', 'JYOrderCon_TT_Sub', 4, 1) = False then
- begin
- ADOCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡˮʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- submaxno := Trim(Order_Sub.fieldbyname('TSId').AsString);
- end;
- with ADOCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('select * from JYOrderCon_TT_Sub where TSId=''' + Trim(submaxno) + '''');
- Open;
- end;
- with ADOCmd do
- begin
- if IsEmpty then
- Append
- else
- Edit;
- FieldByName('TTId').Value := Trim(maxno);
- FieldByName('TSId').Value := Trim(submaxno);
- fieldbyname('BCID').Value := Order_Sub.fieldbyname('BCID').asstring;
- FieldByName('PRTCodeName').Value := Order_Sub.fieldbyname('PRTCodeName').Value;
- FieldByName('PRTEngCodeName').Value := Order_Sub.fieldbyname('PRTEngCodeName').Value;
- FieldByName('OrderUnit').Value := Order_Sub.fieldbyname('OrderUnit').Value;
- FieldByName('PRTMF').Value := Order_Sub.fieldbyname('PRTMF').Value;
- FieldByName('PRTKZ').Value := Order_Sub.fieldbyname('PRTKZ').Value;
- RTSetSaveDataCDS(ADOCmd, Tv1, Order_Sub, 'JYOrderCon_TT_Sub', 0);
- if Trim(Order_Sub.fieldbyname('PRTOrderQty').AsString) = '' then
- begin
- fieldbyname('PRTOrderQty').Value := 0
- end
- else
- begin
- FieldByName('PRTOrderQty').Value := Order_Sub.fieldbyname('PRTOrderQty').Value;
- end;
- if Trim(Order_Sub.fieldbyname('PRTPrice').AsString) = '' then
- begin
- fieldbyname('PRTPrice').Value := 0
- end
- else
- begin
- FieldByName('PRTPrice').Value := Order_Sub.fieldbyname('PRTPrice').Value;
- end;
- Post;
- end;
- Order_Sub.Edit;
- Order_Sub.FieldByName('TSId').Value := Trim(submaxno);
- //Order_Sub.Post;
- Next;
- end;
- end;
- with ADOCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrderCon_TT where DCNO=''' + Trim(DCNO.Text) + '''');
- Sql.Add(' and TTType=''DC''');
- Open;
- end;
- if ADOCmd.RecordCount > 1 then
- begin
- ADOCmd.Connection.RollbackTrans;
- Application.MessageBox('ձظ!', 'ʾ', 0);
- Exit;
- end;
- {with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrderCon_TT Set SChkFlag=0,SChkStatus='''' where TTID='''+Trim(maxno)+'''');
- //sql.add(' delete OrdConDanZH_Chk where MainId='''+Trim(maxno)+'''');
- ExecSQL;
- end; }
-// with ADOCmd do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('delete from OrdConDanZH_Chk where MainId=''' + Trim(FMainId) + '''');
-// execsql;
-// end;
- ADOCmd.Connection.CommitTrans;
- FMainId := Trim(maxno);
- Result := True;
- except
- Result := False;
- ADOCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmConLCInPutDC.TBSaveClick(Sender: TObject);
-var
- FReal: Double;
-begin
- ToolBar1.SetFocus;
-
-// if Note.Text = '' then
-// begin
-// application.MessageBox('עΪ', 'ʾ');
-// exit;
-// end;
-// if FPTaiTou.Text = '' then
-// begin
-// application.MessageBox('˲Ϊ', 'ʾ');
-// exit;
-// end;
- if FMainId <> '' then
- begin
- with ADOTemp do
- begin
- Close;
- SQL.Clear;
- sql.Add('select * from JYOrderCon_TT where TTId=''' + Trim(FMainId) + '''');
- Open;
- end;
- if (Trim(ADOTemp.FieldByName('ChkStatus').AsString) = 'ͨ') or (Trim(ADOTemp.FieldByName('ChkStatus').AsString) = '') then
- begin
- Application.MessageBox('˲!', 'ʾ', 0);
- Exit;
- end
- else if Trim(ADOTemp.FieldByName('ChkStatus').AsString) = '' then
- begin
- if ADOTemp.FieldByName('SChkFlag').AsBoolean = True then
- begin
- Application.MessageBox('в!', 'ʾ', 0);
- Exit;
- end;
-
- end;
- end;
- if SaveData() then
- begin
- Application.MessageBox('ɹ', 'ʾ', 0);
- Modalresult := 1;
- end;
-end;
-
-procedure TfrmConLCInPutDC.SKBankBtnDnClick(Sender: TObject);
-begin
- TBtnEditC(Sender).Text := '';
- TBtnEditC(Sender).TxtCode := '';
-end;
-
-procedure TfrmConLCInPutDC.TBRafreshClick(Sender: TObject);
-begin
- with Order_Sub do
- begin
- Append;
- FieldByName('BZUNIT').value := 'BALES';
- Post;
- end;
-end;
-
-procedure TfrmConLCInPutDC.TBFindClick(Sender: TObject);
-begin
- if Trim(Order_Sub.fieldbyname('TSId').AsString) <> '' then
- begin
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOCmd do
- begin
- Close;
- SQL.Clear;
- SQL.Add('Delete from JYOrderCon_TT_Sub where TSId=''' + Trim(Order_Sub.fieldbyname('TSId').AsString) + '''');
- ExecSQL;
- end;
- end;
- Order_Sub.Delete;
-end;
-
-procedure TfrmConLCInPutDC.v1Column1PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'SYiDuanZ';
- flagname := 'װ';
- if ShowModal = 1 then
- begin
- Self.Order_Sub.Edit;
- Self.Order_Sub.FieldByName('SYiDuanZ').Value := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.Label36DblClick(Sender: TObject);
-begin
- try
- frmZDYHelpSel := TfrmZDYHelpSel.Create(Application);
- with frmZDYHelpSel do
- begin
- flag := 'LbNameNote';
- flagname := 'ǩ';
- if ShowModal = 1 then
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not Eof do
- begin
- if ClientDataSet1.FieldByName('SSel').AsBoolean = True then
- begin
- if Trim(Self.ZhuMaiTou.Text) = '' then
- begin
- Self.ZhuMaiTou.Text := Trim(ClientDataSet1.fieldbyname('ZdyName').AsString);
- end
- else
- begin
- Self.ZhuMaiTou.Text := Self.ZhuMaiTou.Text + #13 + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
-
- end;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- end;
- finally
- end;
-end;
-
-procedure TfrmConLCInPutDC.ToolButton1Click(Sender: TObject);
-begin
- if Order_Sub.IsEmpty then
- Exit;
- CopyAddRowCDS(Order_Sub);
- with Order_Sub do
- begin
- Edit;
- FieldByName('TSID').Value := null;
- Post;
- end;
-end;
-
-procedure TfrmConLCInPutDC.Label29DblClick(Sender: TObject);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'TDShouHuoPerson';
- flagname := 'ᵥջ';
- if ShowModal = 1 then
- begin
- TDShouHuoPerson.Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.Label3DblClick(Sender: TObject);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'TDTongZhiPerson';
- flagname := 'ᵥ֪ͨ';
- if ShowModal = 1 then
- begin
- TDTongZhiPerson.Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.XYZNOBtnUpClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if trim(DParameters1) <> 'Ȩ' then
- begin
- TBAdd.Visible := false;
- TBDel.Visible := false;
- TBEdit.Visible := false;
- TBSave.Visible := false;
- end;
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.OrdConPrcNoteBtnUpClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
- if (OrdConPrcNote.Text = 'FOB') or (OrdConPrcNote.Text = 'FCA') then
- begin
- YFCF.Text := 'FREIGHT COLLECT';
-
- end
- else if (OrdConPrcNote.Text = 'CIF') or (OrdConPrcNote.Text = 'CFR') then
- begin
- YFCF.Text := 'FREIGHT PREPAID';
- end;
-end;
-
-procedure TfrmConLCInPutDC.TOPlaceBtnUpClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.KHNameBtnUpClick(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
-
- if ShowModal = 1 then
- begin
- self.KHName.TxtCode := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- self.KHName.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
-
- TDShouHuoPerson.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString) + #$d#$a + (StringReplace(CDS_HZ.fieldbyname('CoAddress').AsString, ' ', #$d#$a, [rfReplaceAll]));
- TDTongZhiPerson.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString) + #$d#$a + (StringReplace(CDS_HZ.fieldbyname('CoAddress').AsString, ' ', #$d#$a, [rfReplaceAll]));
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.ToolButton2Click(Sender: TObject);
-begin
- frmProductOrderList_Sel := TfrmProductOrderList_Sel.Create(self);
- with frmProductOrderList_Sel do
- begin
- if showmodal = 1 then
- begin
- while frmProductOrderList_Sel.Order_Main.Locate('SSel', True, []) do
- begin
- Self.Order_Sub.Append;
-
- Self.Order_Sub.FieldbyName('PRTPrice').Value := 0;
- Self.Order_Sub.FieldbyName('Money').Value := 0;
- Self.Order_Sub.fieldbyname('FromOrderno').Value := Order_Main.fieldbyname('Orderno').asstring;
- Self.Order_Sub.fieldbyname('FromMainId').Value := Order_Main.fieldbyname('MainId').asstring;
- Self.Order_Sub.fieldbyname('PRTCODE').Value := Order_Main.fieldbyname('MPRTCODE').asstring;
- Self.Order_Sub.fieldbyname('PRTCODENAME').Value := Order_Main.fieldbyname('MPRTCODENAME').asstring;
- Self.Order_Sub.fieldbyname('PRTMF').Value := Order_Main.fieldbyname('MPRTMF').asstring;
- Self.Order_Sub.fieldbyname('PRTKZ').Value := Order_Main.fieldbyname('MPRTKZ').asstring;
- Self.Order_Sub.fieldbyname('PRTCF').Value := Order_Main.fieldbyname('MPRTCF').asstring;
- Self.Order_Sub.fieldbyname('PRTORDERQTY').Value := Order_Main.fieldbyname('PRTORDERQTY').ASFLOAT;
- Self.Order_Sub.FieldByName('BZUNIT').value := 'BALES';
- Self.Order_Sub.Post;
- frmProductOrderList_Sel.Order_Main.Delete;
- end;
- end;
- free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.v1Column15PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
-// fsj := Trim(TEdit(Sender).Hint);
-// FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'BZUNIT';
- flagname := 'װλ';
- if ShowModal = 1 then
- begin
- with Order_Sub do
- begin
- Edit;
- Order_Sub.fieldbyname('BZUNIT').Value := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.v1Column8PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'PRICEBZ';
- flagname := '';
- if ShowModal = 1 then
- begin
- with Order_Sub do
- begin
- Edit;
- Order_Sub.fieldbyname('PRICEBZ').Value := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmConLCInPutDC.DZYDropDown(Sender: TObject);
-begin
- with ADOTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM SY_User WHERE Udept LIKE ''%֤%'' ');
-
- Open;
- end;
- DZY.Items.Clear;
- while not ADOTemp.eof do
- begin
- DZY.Items.Add(Trim(ADOTemp.fieldbyname('username').AsString));
- ADOTemp.next;
- end;
-end;
-
-procedure TfrmConLCInPutDC.YWYDropDown(Sender: TObject);
-begin
- with ADOTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where type=''jhdywy'' ');
-
- Open;
- end;
- YWY.Items.Clear;
- while not ADOTemp.eof do
- begin
- YWY.Items.Add(Trim(ADOTemp.fieldbyname('zdyname').AsString));
- ADOTemp.next;
- end;
-end;
-
-procedure TfrmConLCInPutDC.BGYDropDown(Sender: TObject);
-begin
- with ADOTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM SY_User WHERE Udept LIKE ''%֤%'' ');
-
- Open;
- end;
- BGY.Items.Clear;
- while not ADOTemp.eof do
- begin
- BGY.Items.Add(Trim(ADOTemp.fieldbyname('username').AsString));
- ADOTemp.next;
- end;
-end;
-
-procedure TfrmConLCInPutDC.v1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FFieldName: string;
- FQuantity, FUnitPrice, FCourierCharge: double;
-begin
- if TcxTextEdit(Sender).EditingText = '' then
- begin
- mvalue := '0';
- end
- else
- mvalue := TcxTextEdit(Sender).EditingText;
- FFieldName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- with Order_Sub do
- begin
- Edit;
- FieldByName(FFieldName).Value := Trim(mvalue);
- Post;
-
- FQuantity := FieldByName('PRTOrderQty').asfloat;
- FUnitPrice := FieldByName('PRTPrice').asfloat;
- end;
-
- with Order_Sub do
- begin
- Edit;
- FieldByName('MONEY').Value := (FQuantity * FUnitPrice);
- Post;
- end;
-
- tv1.Controller.EditingController.ShowEdit();
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCList.dfm
deleted file mode 100644
index 01f5874..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCList.dfm
+++ /dev/null
@@ -1,1231 +0,0 @@
-object frmContractDCList: TfrmContractDCList
- Left = 295
- Top = 58
- Width = 1148
- Height = 675
- Caption = #35746#33329#25253#20851#25351#31034#20070
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1140
- Height = 62
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 95
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object ToolButton3: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #36873#25321
- ImageIndex = 31
- Visible = False
- OnClick = ToolButton3Click
- end
- object TBAdd: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 2
- OnClick = TBAddClick
- end
- object TBEdit: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object ToolButton2: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #22797#21046
- ImageIndex = 38
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 378
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 58
- OnClick = ToolButton1Click
- end
- object ToolButton5: TToolButton
- Left = 441
- Top = 0
- Caption = #23457#26680#20154#23450#20041
- ImageIndex = 76
- Visible = False
- OnClick = ToolButton5Click
- end
- object ToolButton4: TToolButton
- Left = 536
- Top = 0
- AutoSize = True
- Caption = #36865#23457
- ImageIndex = 6
- OnClick = ToolButton4Click
- end
- object ToolButton9: TToolButton
- Left = 599
- Top = 0
- AutoSize = True
- Caption = #25764#38144#36865#23457
- ImageIndex = 7
- OnClick = ToolButton9Click
- end
- object ToolButton10: TToolButton
- Left = 686
- Top = 0
- AutoSize = True
- Caption = #23457#26680
- ImageIndex = 16
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 749
- Top = 0
- AutoSize = True
- Caption = #25764#38144#23457#26680
- ImageIndex = 17
- OnClick = ToolButton11Click
- end
- object ToolButton13: TToolButton
- Left = 836
- Top = 0
- AutoSize = True
- Caption = #30830#35748
- ImageIndex = 16
- Wrap = True
- OnClick = ToolButton13Click
- end
- object TBDel: TToolButton
- Left = 0
- Top = 30
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- OnClick = TBDelClick
- end
- object ToolButton14: TToolButton
- Left = 63
- Top = 30
- AutoSize = True
- Caption = #21462#28040#30830#35748
- ImageIndex = 17
- OnClick = ToolButton14Click
- end
- object ToolButton8: TToolButton
- Left = 150
- Top = 30
- AutoSize = True
- Caption = #20462#25913#21407#22240
- ImageIndex = 25
- Visible = False
- OnClick = ToolButton8Click
- end
- object ToolButton6: TToolButton
- Left = 237
- Top = 30
- AutoSize = True
- Caption = #19978#20256
- ImageIndex = 8
- Visible = False
- OnClick = ToolButton6Click
- end
- object ToolButton7: TToolButton
- Left = 300
- Top = 30
- AutoSize = True
- Caption = #19979#36733
- ImageIndex = 9
- Visible = False
- OnClick = ToolButton7Click
- end
- object TBExport: TToolButton
- Left = 363
- Top = 30
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 75
- OnClick = TBExportClick
- end
- object TBPrint: TToolButton
- Left = 426
- Top = 30
- AutoSize = True
- Caption = #25171#21360
- ImageIndex = 4
- OnClick = TBPrintClick
- end
- object ToolButton15: TToolButton
- Left = 489
- Top = 30
- AutoSize = True
- Caption = #26080#39044#35272#25171#21360
- ImageIndex = 4
- OnClick = ToolButton15Click
- end
- object ToolButton12: TToolButton
- Left = 588
- Top = 30
- AutoSize = True
- Caption = #30452#25509#25171#21360
- ImageIndex = 4
- OnClick = ToolButton12Click
- end
- object ComboBox1: TComboBox
- Left = 675
- Top = 33
- Width = 190
- Height = 24
- Style = csDropDownList
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 0
- Items.Strings = (
- #36135#36816#22996#25176#21333
- #35746#33329#25351#31034#20070)
- end
- object TBClose: TToolButton
- Left = 865
- Top = 30
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 179
- Width = 1140
- Height = 140
- Align = alClient
- TabOrder = 1
- object Tv1: TcxGridDBTableView
- PopupMenu = PopupMenu1
- Navigator.Buttons.CustomButtons = <>
- OnCellClick = Tv1CellClick
- OnCellDblClick = Tv1CellDblClick
- DataController.DataSource = DS_MAIN
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column17
- end
- item
- Kind = skSum
- Column = v1Column18
- end
- item
- Kind = skSum
- Column = v1Column19
- end
- item
- Kind = skSum
- Column = v1Column20
- end
- item
- Kind = skSum
- Column = v1Column9
- end
- item
- Kind = skSum
- Column = v1Column8
- end
- item
- Kind = skSum
- Column = v1FKPayment
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.OnGetContentStyle = Tv1StylesGetContentStyle
- Styles.Header = DataLink_DDMD.Default
- object v1Column14: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 44
- end
- object v1Column1: TcxGridDBColumn
- Caption = #35746#33329
- DataBinding.FieldName = 'isdc'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 70
- end
- object v1ConNo: TcxGridDBColumn
- Caption = #25253#20851
- DataBinding.FieldName = 'isbg'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 73
- end
- object v1Column3: TcxGridDBColumn
- Caption = #35746#33329#21333#32534#21495
- DataBinding.FieldName = 'DCNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 91
- end
- object v1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'GSNAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 71
- end
- object v1Column12: TcxGridDBColumn
- Caption = #20986#36816#26085#26399
- DataBinding.FieldName = 'CYDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 67
- end
- object v1Column21: TcxGridDBColumn
- Caption = #21457#31080#21495#30721
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 90
- end
- object v1OrdPerson1: TcxGridDBColumn
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'ZORDERNO'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 78
- end
- object v1CustomerNoName: TcxGridDBColumn
- Caption = #23458#25143
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 76
- end
- object v1Column2: TcxGridDBColumn
- Caption = #35013#36816#28207
- DataBinding.FieldName = 'FromPlace'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 74
- end
- object v1Column10: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'TOPlace'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 72
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'HDName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 91
- end
- object v1Column13: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'ChuanInfo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 70
- end
- object v1Column6: TcxGridDBColumn
- Caption = #35013#31665#20449#24687
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 92
- end
- object v1Column17: TcxGridDBColumn
- Caption = #24635#25968#37327
- DataBinding.FieldName = 'ZQTY'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 73
- end
- object v1Column18: TcxGridDBColumn
- Caption = #24635#37329#39069
- DataBinding.FieldName = 'ZMONEY'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 63
- end
- object v1Column19: TcxGridDBColumn
- Caption = #24635#25910#36141#37329#39069
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 106
- end
- object v1Column20: TcxGridDBColumn
- Caption = #24635#27611#37325
- DataBinding.FieldName = 'ZMAOZHONG'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 75
- end
- object v1Column9: TcxGridDBColumn
- Caption = #24635#20928#37325
- DataBinding.FieldName = 'ZJINGZHONG'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 61
- end
- object v1Column8: TcxGridDBColumn
- Caption = #24635#20307#31215
- DataBinding.FieldName = 'ZTIJI'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 103
- end
- object v1FKPayment: TcxGridDBColumn
- Caption = #24635#20214#25968
- DataBinding.FieldName = 'ZBZJS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1YJDCDate: TcxGridDBColumn
- Caption = #22791#22949#26085#26399
- DataBinding.FieldName = 'BTDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 87
- end
- object v1YJSHDate: TcxGridDBColumn
- Caption = #36816#36153#25215#20184
- DataBinding.FieldName = 'YFCF'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 84
- end
- object v1EditNote: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'YSFS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1EditSQTime: TcxGridDBColumn
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'FILLTIME'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1LCChuanQ: TcxGridDBColumn
- Caption = #21046#21333#20154
- DataBinding.FieldName = 'FILLER'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1YiDuanZ: TcxGridDBColumn
- Caption = #19979#19968#27493#25805#20316#21592
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 83
- end
- object v1LCQty: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'NOTE'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 500
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 62
- Width = 1140
- Height = 75
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 2
- object Label1: TLabel
- Left = 23
- Top = 18
- Width = 52
- Height = 12
- Caption = #26597#35810#26085#26399
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 165
- Top = 44
- Width = 52
- Height = 12
- Caption = #25351#31034#21333#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 165
- Top = 18
- Width = 52
- Height = 12
- Caption = #35746#33329#21333#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 328
- Top = 44
- Width = 39
- Height = 12
- Caption = #30446#30340#28207
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 341
- Top = 18
- Width = 26
- Height = 12
- Caption = #23458#25143
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BegDate: TDateTimePicker
- Left = 76
- Top = 14
- Width = 85
- Height = 20
- Date = 40675.464742650460000000
- Format = 'yyyy-MM-dd'
- Time = 40675.464742650460000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 76
- Top = 41
- Width = 86
- Height = 20
- Date = 40675.464761099540000000
- Format = 'yyyy-MM-dd'
- Time = 40675.464761099540000000
- TabOrder = 1
- end
- object zorderno: TEdit
- Tag = 2
- Left = 219
- Top = 40
- Width = 83
- Height = 20
- TabOrder = 2
- OnKeyPress = DCNOKeyPress
- end
- object DCNO: TEdit
- Tag = 2
- Left = 220
- Top = 14
- Width = 81
- Height = 20
- TabOrder = 3
- OnKeyPress = DCNOKeyPress
- end
- object TOPlace: TEdit
- Tag = 2
- Left = 371
- Top = 40
- Width = 83
- Height = 20
- TabOrder = 4
- OnKeyPress = DCNOKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 372
- Top = 14
- Width = 81
- Height = 20
- TabOrder = 5
- OnKeyPress = DCNOKeyPress
- end
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 319
- Width = 1140
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = Panel2
- end
- object Panel2: TPanel
- Left = 0
- Top = 327
- Width = 1140
- Height = 317
- Align = alBottom
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 4
- object Panel6: TPanel
- Left = 350
- Top = 127
- Width = 138
- Height = 30
- BevelInner = bvRaised
- Caption = #27491#22312#19978#20256#12290#12290#12290
- Color = clSkyBlue
- TabOrder = 0
- Visible = False
- end
- object cxGrid2: TcxGrid
- Left = 2
- Top = 2
- Width = 1136
- Height = 313
- Align = alClient
- TabOrder = 1
- object TV3: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DSSub
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Format = '0'
- Position = spFooter
- end
- item
- Format = '0'
- Position = spFooter
- end
- item
- Format = '0'
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = cxGridDBColumn10
- end
- item
- Kind = skSum
- Column = cxGridDBColumn11
- end
- item
- Kind = skSum
- Column = cxGridDBColumn12
- end
- item
- Kind = skSum
- Column = cxGridDBColumn9
- end
- item
- Kind = skSum
- Column = cxGridDBColumn8
- end
- item
- Kind = skSum
- Column = v1Column16
- end
- item
- Kind = skSum
- Column = cxGridDBColumn5
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'FROMORDERNO'
- HeaderAlignmentHorz = taCenter
- Width = 125
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Caption = #21697#21517
- DataBinding.FieldName = 'PRTCodeName'
- HeaderAlignmentHorz = taCenter
- Width = 103
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Caption = #38376#24133
- DataBinding.FieldName = 'PRTMF'
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object v1Column4: TcxGridDBColumn
- Caption = #20811#37325
- DataBinding.FieldName = 'PRTKZ'
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object v1Column5: TcxGridDBColumn
- Caption = #25104#20998
- DataBinding.FieldName = 'PRTCF'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Caption = #39068#33394
- DataBinding.FieldName = 'PRTColor'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn5: TcxGridDBColumn
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'PRTOrderQty'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Caption = #21333#20215
- DataBinding.FieldName = 'PRTPrice'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Caption = #24065#31181
- DataBinding.FieldName = 'PRICEBZ'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn8: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'MONEY'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Caption = #20323#37329
- DataBinding.FieldName = 'YJMONEY'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Caption = #27611#37325
- DataBinding.FieldName = 'MAOZHONG'
- HeaderAlignmentHorz = taCenter
- Width = 51
- end
- object cxGridDBColumn11: TcxGridDBColumn
- Caption = #20928#37325
- DataBinding.FieldName = 'JINGZHONG'
- HeaderAlignmentHorz = taCenter
- Width = 63
- end
- object cxGridDBColumn12: TcxGridDBColumn
- Caption = #20307#31215
- DataBinding.FieldName = 'TIJI'
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object v1Column15: TcxGridDBColumn
- Caption = #21253#35013#21333#20301
- DataBinding.FieldName = 'BZUNIT'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object v1Column16: TcxGridDBColumn
- Caption = #21253#35013#20214#25968
- DataBinding.FieldName = 'BZJS'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV3
- end
- end
- end
- object Panel3: TPanel
- Left = 342
- Top = 366
- Width = 138
- Height = 30
- BevelInner = bvRaised
- Caption = #27491#22312#19979#36733#12290#12290#12290
- Color = clSkyBlue
- TabOrder = 5
- Visible = False
- end
- object Panel4: TPanel
- Left = 544
- Top = 347
- Width = 237
- Height = 166
- TabOrder = 6
- Visible = False
- object Label13: TLabel
- Left = 48
- Top = 88
- Width = 6
- Height = 12
- end
- object Label14: TLabel
- Left = 37
- Top = 63
- Width = 52
- Height = 12
- Caption = #20844#21496#25260#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Panel5: TPanel
- Left = 1
- Top = 1
- Width = 235
- Height = 23
- Align = alTop
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = #20844#21496#25260#22836
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Image1: TImage
- Left = 213
- Top = 3
- Width = 22
- Height = 16
- ParentShowHint = False
- Picture.Data = {
- 07544269746D617076040000424D760400000000000036000000280000001500
- 0000110000000100180000000000400400000000000000000000000000000000
- 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6
- F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040
- 404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080
- 808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000
- 000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00}
- ShowHint = True
- Transparent = True
- OnClick = Image1Click
- end
- end
- object TSure: TButton
- Left = 77
- Top = 112
- Width = 85
- Height = 29
- Caption = #30830' '#23450
- TabOrder = 1
- OnClick = TSureClick
- end
- object TaiTou: TBtnEditA
- Left = 92
- Top = 59
- Width = 115
- Height = 20
- TabOrder = 2
- OnBtnClick = TaiTouBtnClick
- end
- object ETaiTou: TEdit
- Left = 80
- Top = 316
- Width = 121
- Height = 20
- TabOrder = 3
- Visible = False
- end
- object IFTT: TCheckBox
- Left = 44
- Top = 85
- Width = 121
- Height = 17
- Caption = #26159#21542#26174#31034#21457#31080#25260#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 137
- Width = 1140
- Height = 21
- Align = alTop
- TabOrder = 7
- Properties.CustomButtons.Buttons = <>
- Properties.Style = 9
- Properties.TabIndex = 0
- Properties.Tabs.Strings = (
- #24453#36865#23457
- #24050#36865#23457
- #24050#23457#26680
- #20840#37096)
- OnChange = cxTabControl1Change
- ClientRectRight = 0
- ClientRectTop = 0
- end
- object cxTabControl2: TcxTabControl
- Left = 0
- Top = 158
- Width = 1140
- Height = 21
- Align = alTop
- TabOrder = 8
- Visible = False
- Properties.CustomButtons.Buttons = <>
- Properties.Style = 9
- Properties.TabIndex = 0
- Properties.Tabs.Strings = (
- #24050#36865#23457
- #24050#23457#26680
- #20840#37096)
- OnChange = cxTabControl2Change
- ClientRectRight = 0
- ClientRectTop = 0
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 524
- Top = 188
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 644
- Top = 196
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 560
- Top = 188
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 168
- Top = 312
- end
- object DataSource1: TDataSource
- DataSet = CDS_Print
- Left = 372
- Top = 196
- end
- object Order_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 448
- Top = 192
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 328
- Top = 192
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 412
- Top = 196
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 680
- Top = 196
- end
- object PopupMenu1: TPopupMenu
- Left = 280
- Top = 192
- object N2: TMenuItem
- Caption = #20840#36873
- OnClick = N2Click
- end
- object N1: TMenuItem
- Caption = #20840#24323
- OnClick = N1Click
- end
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 192
- Top = 352
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 128
- Top = 304
- end
- object PopupMenu2: TPopupMenu
- Left = 592
- Top = 188
- object N11: TMenuItem
- Caption = #26684#24335'1'
- end
- object N21: TMenuItem
- Caption = #26684#24335'2'
- end
- object N31: TMenuItem
- Caption = #26684#24335'3'
- end
- end
- object CDS_Chk: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 152
- Top = 456
- end
- object DS_Chk: TDataSource
- DataSet = CDS_Chk
- Left = 176
- Top = 528
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 216
- Top = 440
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 816
- Top = 440
- end
- object DSSub: TDataSource
- DataSet = CDS_Sub
- Left = 736
- Top = 416
- end
- object cxGridPopupMenu3: TcxGridPopupMenu
- PopupMenus = <>
- Left = 864
- Top = 376
- end
- object CDS_Chker: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 712
- Top = 196
- end
- object cxGridPopupMenu4: TcxGridPopupMenu
- PopupMenus = <>
- Left = 328
- Top = 336
- end
- object CDS_SC: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 312
- Top = 360
- end
- object DS_SC: TDataSource
- DataSet = CDS_SC
- Left = 400
- Top = 432
- end
- object SaveDialog1: TSaveDialog
- Left = 489
- Top = 389
- end
- object IdFTP1: TIdFTP
- MaxLineAction = maException
- ReadTimeout = 0
- ProxySettings.ProxyType = fpcmNone
- ProxySettings.Port = 0
- Left = 501
- Top = 356
- end
- object ODPat: TOpenDialog
- Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Left = 516
- Top = 341
- end
- object ADOQuery1: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 636
- Top = 244
- end
- object DS_MAIN: TDataSource
- DataSet = Order_Main
- Left = 468
- Top = 224
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCList.pas
deleted file mode 100644
index 7d03117..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCList.pas
+++ /dev/null
@@ -1,1799 +0,0 @@
-unit U_ContractDCList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData,
- cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ADODB,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxGrid, DBClient, cxCheckBox, cxCalendar, cxSplitter, RM_Dataset, RM_System,
- RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, cxButtonEdit,
- cxDropDownEdit, ShellAPI, IdBaseComponent, IdComponent, IdTCPConnection,
- IdTCPClient, IdFTP, IniFiles, StrUtils, BtnEdit, cxPC, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu, dxSkinsCore,
- dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmContractDCList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBAdd: TToolButton;
- TBEdit: TToolButton;
- TBDel: TToolButton;
- TBPrint: TToolButton;
- TBClose: TToolButton;
- Tv1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- cxGridPopupMenu1: TcxGridPopupMenu;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- TBExport: TToolButton;
- v1OrdPerson1: TcxGridDBColumn;
- v1ConNo: TcxGridDBColumn;
- Order_Main: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- RMXLSExport1: TRMXLSExport;
- v1CustomerNoName: TcxGridDBColumn;
- PopupMenu1: TPopupMenu;
- N2: TMenuItem;
- ToolButton1: TToolButton;
- v1Column1: TcxGridDBColumn;
- ToolButton2: TToolButton;
- ADOQueryPrint: TADOQuery;
- CDS_Print: TClientDataSet;
- ToolButton3: TToolButton;
- PopupMenu2: TPopupMenu;
- N11: TMenuItem;
- N21: TMenuItem;
- N31: TMenuItem;
- Panel1: TPanel;
- Label1: TLabel;
- Label4: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- zorderno: TEdit;
- ToolButton4: TToolButton;
- ToolButton5: TToolButton;
- cxSplitter1: TcxSplitter;
- CDS_Chk: TClientDataSet;
- DS_Chk: TDataSource;
- v1Column8: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- Panel2: TPanel;
- cxGridPopupMenu2: TcxGridPopupMenu;
- v1Column2: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- CDS_Sub: TClientDataSet;
- DSSub: TDataSource;
- cxGridPopupMenu3: TcxGridPopupMenu;
- CDS_Chker: TClientDataSet;
- v1Column7: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- ToolButton6: TToolButton;
- ToolButton7: TToolButton;
- cxGridPopupMenu4: TcxGridPopupMenu;
- CDS_SC: TClientDataSet;
- DS_SC: TDataSource;
- SaveDialog1: TSaveDialog;
- IdFTP1: TIdFTP;
- ODPat: TOpenDialog;
- Panel3: TPanel;
- Panel6: TPanel;
- v1Column3: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- N1: TMenuItem;
- v1FKPayment: TcxGridDBColumn;
- v1YJDCDate: TcxGridDBColumn;
- v1YJSHDate: TcxGridDBColumn;
- ToolButton8: TToolButton;
- v1EditNote: TcxGridDBColumn;
- v1EditSQTime: TcxGridDBColumn;
- v1LCChuanQ: TcxGridDBColumn;
- v1YiDuanZ: TcxGridDBColumn;
- v1LCQty: TcxGridDBColumn;
- Panel4: TPanel;
- Label13: TLabel;
- Label14: TLabel;
- Panel5: TPanel;
- Image1: TImage;
- TSure: TButton;
- TaiTou: TBtnEditA;
- ETaiTou: TEdit;
- IFTT: TCheckBox;
- ToolButton9: TToolButton;
- ADOQuery1: TADOQuery;
- cxGrid2: TcxGrid;
- TV3: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- v1Column4: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridDBColumn11: TcxGridDBColumn;
- cxGridDBColumn12: TcxGridDBColumn;
- v1Column15: TcxGridDBColumn;
- v1Column16: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- Label2: TLabel;
- DCNO: TEdit;
- Label3: TLabel;
- TOPlace: TEdit;
- Label5: TLabel;
- KHName: TEdit;
- cxTabControl1: TcxTabControl;
- ToolButton10: TToolButton;
- ToolButton11: TToolButton;
- ComboBox1: TComboBox;
- ToolButton12: TToolButton;
- DS_MAIN: TDataSource;
- ToolButton13: TToolButton;
- ToolButton14: TToolButton;
- ToolButton15: TToolButton;
- cxTabControl2: TcxTabControl;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure TBAddClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure Tv1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure TBTPClick(Sender: TObject);
- procedure CheckBox1Click(Sender: TObject);
- procedure CheckBox2Click(Sender: TObject);
- procedure Tv1StylesGetContentStyle(Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
- procedure v1DeliveryDateCustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure zordernoChange(Sender: TObject);
- procedure ConNoKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton5Click(Sender: TObject);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure Tv2CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure ToolButton4Click(Sender: TObject);
- procedure zordernoKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton6Click(Sender: TObject);
- procedure ToolButton7Click(Sender: TObject);
- procedure TvSCCellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure ToolButton8Click(Sender: TObject);
- procedure TaiTouBtnClick(Sender: TObject);
- procedure TSureClick(Sender: TObject);
- procedure TBPrintClick(Sender: TObject);
- procedure Image1Click(Sender: TObject);
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure ToolButton11Click(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure ToolButton12Click(Sender: TObject);
- procedure ToolButton13Click(Sender: TObject);
- procedure ToolButton14Click(Sender: TObject);
- procedure ToolButton15Click(Sender: TObject);
- procedure DCNOKeyPress(Sender: TObject; var Key: Char);
- procedure cxTabControl2Change(Sender: TObject);
- private
- lstPat: TStringList;
- DQdate: TDateTime;
- procedure InitGrid();
- procedure SetSatas();
- procedure InitForm();
- function DelData(): Boolean;
- procedure ReadINIFile10();
- { Private declarations }
- public
- FFInt, FCloth: Integer;
- CANSHU1, canshu2: string;
-
- { Public declarations }
- end;
-
-var
- frmContractDCList: TfrmContractDCList;
-
-implementation
-
-uses
- U_DataLink, U_Fun, U_ZDYHelp, U_ConLCInPutDC, U_ZDYHelpSel;
-
-{$R *.dfm}
-
-procedure DrawDeskTop;
-var
- Canvas: TCanvas;
-begin
- Canvas := TCanvas.Create;
- Canvas.Handle := GetDC(0);
- Canvas.Pen.Color := clRed;
- Canvas.MoveTo(100, 100);
- Canvas.LineTo(200, 200);
- ReleaseDC(0, Canvas.Handle);
- Canvas.Free;
-end;
-
-procedure TfrmContractDCList.SetSatas();
-begin
- if CANSHU1 = 'ȷ' then
- begin
- cxTabControl1.TabIndex := 2;
- cxTabControl1.Visible := False;
- end;
-
- ToolButton3.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- TBAdd.Visible := False;
- ToolButton4.Visible := False;
- ToolButton9.Visible := False;
- ToolButton10.Visible := False;
- ToolButton11.Visible := False;
-
- ToolButton13.Visible := False;
- ToolButton14.Visible := False;
-
- case cxTabControl1.TabIndex of
- 0:
- begin
- TBDel.Visible := True;
- TBEdit.Visible := True;
- TBAdd.Visible := True;
- ToolButton4.Visible := True;
- end;
- 1:
- begin
- ToolButton9.Visible := True;
- if CANSHU1 = '' then
- begin
- ToolButton10.Visible := true;
- end;
- end;
- 2:
- begin
- if CANSHU1 = '' then
- begin
- ToolButton11.Visible := true;
- ToolButton13.Visible := TRUE;
- ToolButton14.Visible := TRUE;
-
- end;
- if CANSHU1 = 'ȷ' then
- begin
- ToolButton2.Visible := false;
- ToolButton13.Visible := TRUE;
- ToolButton14.Visible := TRUE;
-
- end;
- end;
- 3:
- begin
-
- end;
-
- end;
-
-end;
-
-procedure TfrmContractDCList.ReadINIFile10();
-var
- programIni: Tinifile; //ļ
- FileName: string;
-begin
- FileName := ExtractFilePath(Paramstr(0)) + 'SYSTEMSET.INI';
- programIni := Tinifile.create(FileName);
- server := programIni.ReadString('SERVER', 'ַ', '127.0.0.1');
- programIni.Free;
-end;
-
-procedure TfrmContractDCList.FormDestroy(Sender: TObject);
-begin
- frmContractDCList := nil;
-end;
-
-procedure TfrmContractDCList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmContractDCList.FormCreate(Sender: TObject);
-begin
- cxgrid1.Align := alClient;
- DQdate := SGetServerDate(ADOQueryTemp);
-end;
-
-procedure TfrmContractDCList.TBCloseClick(Sender: TObject);
-begin
- Close;
-
- WriteCxGrid('ϸ', Tv3, 'ָʾ');
- WriteCxGrid('б', Tv1, 'ָʾ');
-
-end;
-
-procedure TfrmContractDCList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
-
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- SQL.Add('SELECT * FROM (');
- sql.Add('select ');
- sql.Add('A.*');
- SQL.Add(',GSNAME=''֯''');
- sql.Add(',isdc=(case when QRDATE IS NOT NULL THEN '''' else '''' end )');
- sql.Add(',isbg=(case when (select count(*) from JYOrder_BaoGuan_Main E where E.DCNO=A.DCNO AND E.VALID=''Y'' AND bgStatus='''')>0 THEN '''' else '''' end )');
- SQL.Add(',ZORDERNO=CAST((SELECT STUFF(( SELECT '','' +convert(VARCHAR, FROMORDERNO) FROM JYOrderCon_TT_Sub B WHERE A.TTID=B.TTId FOR XML PATH('''')), 1, 1, '''') )AS VARCHAR)');
- SQL.Add(',ZQTY=(SELECT SUM(PRTORDERQTY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMONEY=(SELECT SUM(MONEY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMAOZHONG=(SELECT SUM(MAOZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZJINGZHONG=(SELECT SUM(JINGZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZTIJI=(SELECT SUM(tiji) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZBZJS=(SELECT SUM(BZJS) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- sql.Add(' from JYOrderCon_TT A ');
- SQL.Add('where ((FILLTIME>=''' + FormatDateTime('yyyy-MM-dd', BegDate.DateTime) + '''');
- SQL.Add('and FILLTIME<''' + FormatDateTime('yyyy-MM-dd', enddate.DateTime + 1) + ''') or ChkStatus=''˲ͨ'') ');
-// if canshu2 = '鳤' then
-// begin
-// sql.Add('and filler in (select UserName from SY_User where Udept=(select Udept from SY_User where SY_User.UserName=' + QuotedStr(Trim(DName)));
-// sql.Add('))');
-// end
-// else if CANSHU1 = '¼' then
-// begin
-// sql.Add('and filler=' + QuotedStr(Trim(DName)));
-// end;
-
- if cxTabControl1.TabIndex = 0 then
- begin
- SQL.Add('AND ISNULL(SChkFlag,0)=0 ');
- if CANSHU1 = '' then
- begin
- SQL.Add('AND 1<>1 ');
- end;
- end
- else if cxTabControl1.TabIndex = 1 then
- begin
- SQL.Add('AND ISNULL(SChkFlag,0)=1 AND ISNULL(ChkStatus,0)=0 ');
- end
- else if cxTabControl1.TabIndex = 2 then
- begin
- SQL.Add(' AND ChkStatus=1 ');
- end;
- SQL.Add(') AA WHERE 1=1');
- SQL.Add(fwhere);
-
- sql.Add('order by filltime desc');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
-
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmContractDCList.InitForm();
-begin
-
- ReadCxGrid('ϸ', Tv3, 'ָʾ');
- ReadCxGrid('б', Tv1, 'ָʾ');
- BegDate.DateTime := SGetServerDate10(ADOQueryTemp) - 90;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
-
- SetSatas();
- InitGrid();
-
-end;
-
-procedure TfrmContractDCList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active = False then
- Exit;
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
-end;
-
-procedure TfrmContractDCList.TBEditClick(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- if CANSHU1 = '¼' then
- begin
- if canshu2 = '鳤' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('and filler in ( select username from SY_User where UType=(select UType from SY_User where UserName=' + quotedstr(Trim(dname)));
- SQL.Add('))');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ܲ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- if Trim(Order_Main.fieldbyname('Filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('ܲ˵!', 'ʾ', 0);
- Exit;
- end;
- end;
-
- end;
-
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- sql.Add('select * from JYOrderCon_TT where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
- Open;
- end;
- if (Trim(ADOQueryTemp.FieldByName('ChkStatus').AsString) = 'ͨ') or (Trim(ADOQueryTemp.FieldByName('ChkStatus').AsString) = '') then
- begin
- Application.MessageBox('˲!', 'ʾ', 0);
- Exit;
- end
- else if Trim(ADOQueryTemp.FieldByName('ChkStatus').AsString) = '' then
- begin
- if ADOQueryTemp.FieldByName('SChkFlag').AsBoolean = True then
- begin
- Application.MessageBox('в!', 'ʾ', 0);
- Exit;
- end;
-
- end;
- try
- frmConLCInPutDC := TfrmConLCInPutDC.Create(Application);
- with frmConLCInPutDC do
- begin
- PState := 1;
- FMainId := Trim(Self.Order_Main.fieldbyname('TTId').AsString);
- if ShowModal = 1 then
- begin
-
- end;
- end;
- finally
- frmConLCInPutDC.Free;
- end;
-
-end;
-
-procedure TfrmContractDCList.TBDelClick(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- if CANSHU1 = '¼' then
- begin
- if canshu2 = '鳤' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('and filler in ( select username from SY_User where UType=(select UType from SY_User where UserName=' + quotedstr(Trim(dname)));
- SQL.Add('))');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ܲ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- if Trim(Order_Main.fieldbyname('Filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('ܲ˵!', 'ʾ', 0);
- Exit;
- end;
- end;
-
- end;
-// if Trim(Order_Main.fieldbyname('FillCode').AsString) <> Trim(DCode) then
-// begin
-// Application.MessageBox('ܲ˵!', 'ʾ', 0);
-// Exit;
-// end;
- if Order_Main.FieldByName('SChkFlag').AsBoolean = True then
- begin
- Application.MessageBox('ɾ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- if DelData() then
- begin
- Order_Main.Delete;
- end;
-end;
-
-function TfrmContractDCList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete JYOrderCon_TT where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
- ExecSQL;
- end;
-
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- Exit;
- SelExportData(Tv1, ADOQueryMain, 'ָʾ');
-end;
-
-procedure TfrmContractDCList.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmContractDCList.TBAddClick(Sender: TObject);
-var
- maxno: string;
-begin
- try
- frmConLCInPutDC := TfrmConLCInPutDC.Create(Application);
- with frmConLCInPutDC do
- begin
- PState := 0;
- FMainId := '';
-// BTDate.Checked := False;
- if ShowModal = 1 then
- begin
-
- end;
- end;
- finally
- frmConLCInPutDC.Free;
- end;
-end;
-
-procedure TfrmContractDCList.FormShow(Sender: TObject);
-begin
- if CANSHU1 = '' then
- begin
- cxTabControl1.Visible := false;
- cxTabControl2.Visible := True;
- cxTabControl1.TabIndex := 1;
- end;
- if CANSHU1 = '¼' then
- begin
- cxTabControl1.Tabs[3].Free;
- end;
- InitForm();
-end;
-
-procedure TfrmContractDCList.Tv1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- if ToolButton1.Visible = False then
- Exit;
- ToolButton1.Click;
-end;
-
-procedure TfrmContractDCList.TBTPClick(Sender: TObject);
-var
- FQty, FQty1, FMxQty, FPQty, FMxQtyS, FPQtyS: string;
-begin
-end;
-
-procedure TfrmContractDCList.CheckBox1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmContractDCList.CheckBox2Click(Sender: TObject);
-begin
- TBRafresh.Click;
-end;
-
-procedure TfrmContractDCList.Tv1StylesGetContentStyle(Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
-var
- id, id10: Integer;
-begin
- {try
- if Tv1.GroupedItemCount=0 then
- begin
- Id:=Tv1.GetColumnByFieldName('DeliveryDate').Index-tv1.GroupedItemCount;
- Id10:=Tv1.GetColumnByFieldName('SubStatus').Index-tv1.GroupedItemCount;
- if Trim(VarToStr(ARecord.Values[id]))='' then Exit;
- if Id<0 then Exit;
- if ARecord.Values[id10]='' then exit;
- if (ARecord.Values[id]-DQdate)>=4 then Exit;
- if ((ARecord.Values[id]-DQdate)>=0) and ((ARecord.Values[id]-DQdate)<4) then
- AStyle:=DataLink_.QHuangSe
- else
- if ARecord.Values[id]-DQdate<0 then
- begin
- AStyle:=DataLink_OrderManage.FenHongS;
- end;
- end else
- begin
-
- end;
- except
- end; }
-end;
-
-procedure TfrmContractDCList.v1DeliveryDateCustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- { Id:=TV1.GetColumnByFieldName('DeliveryDate').Index;//;-TV1.GroupedItemCount;
- Id10:=TV1.GetColumnByFieldName('SubStatus').Index;
- if Id<0 then Exit;
- if AViewInfo.GridRecord.Values[Id10]='' then Exit;
- if AViewInfo.GridRecord.Values[Id]-SGetServerDate(ADOQueryTemp)>=4 then Exit;
- if ((AViewInfo.GridRecord.Values[id]-SGetServerDate10(ADOQueryTemp))>=0) and ((AViewInfo.GridRecord.Values[id]-SGetServerDate(ADOQueryTemp))<4) then
- ACanvas.Brush.Color:=clYellow
- else
- if (AViewInfo.GridRecord.Values[id])-(SGetServerDate10(ADOQueryTemp)<0) then
- begin
- ACanvas.Brush.Color:=clRed;
- end;
- begin
- ACanvas.Brush.Color:=clRed;
- end else
- if AViewInfo.GridRecord.Values[Id]='Purple' then
- begin
- ACanvas.Brush.Color:=clPurple;
- end else
- if AViewInfo.GridRecord.Values[Id]='Olive' then
- begin
- ACanvas.Brush.Color:=clOlive;
- end else
- if AViewInfo.GridRecord.Values[Id]='Teal' then
- begin
- ACanvas.Brush.Color:=clTeal;
- end else
- if AViewInfo.GridRecord.Values[Id]='Background' then
- begin
- ACanvas.Brush.Color:=clBackground;
- end; }
-end;
-
-procedure TfrmContractDCList.N1Click(Sender: TObject);
-begin
- SelOKNo(Order_Main, False);
-end;
-
-procedure TfrmContractDCList.N2Click(Sender: TObject);
-begin
- SelOKNo(Order_Main, True);
-end;
-
-procedure TfrmContractDCList.ToolButton1Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- try
- frmConLCInPutDC := TfrmConLCInPutDC.Create(Application);
- with frmConLCInPutDC do
- begin
- PState := 1;
- FMainId := Trim(Self.Order_Main.fieldbyname('TTId').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- if ShowModal = 1 then
- begin
-
- end;
- end;
- finally
- frmConLCInPutDC.Free;
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton2Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- try
- frmConLCInPutDC := TfrmConLCInPutDC.Create(Application);
- with frmConLCInPutDC do
- begin
- PState := 1;
- CopyInt := 99;
- FMainId := Trim(Self.Order_Main.fieldbyname('TTId').AsString);
- if ShowModal = 1 then
- begin
-
- end;
- end;
- finally
- frmConLCInPutDC.Free;
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton3Click(Sender: TObject);
-begin
- ModalResult := 1;
-end;
-
-procedure TfrmContractDCList.zordernoChange(Sender: TObject);
-begin
- if ADOQueryMain.Active = False then
- Exit;
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
-end;
-
-procedure TfrmContractDCList.ConNoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
-
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- SQL.Clear;
- sql.Add('select ');
- sql.add('SYRName=(select Top 1 T.SYRName From JYOrderCon_Main T where T.ConNO=A.ConNo),');
- sql.add('JHDate=(select Top 1 M.DlyDate from JYOrder_Main M where M.OrderNo=A.DCNO),');
- sql.add(' PRTMaoZ=isnull(A.PRTMaoZ,(select Sum(D.CHMZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJIngZ=isnull(A.PRTJIngZ,(select Sum(D.CHJZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJianQty=isnull(A.PRTJianQty,(select Sum(D.QtyJian) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
-
- sql.add(',A.*, ');
- sql.add('LCChuanQ=(select Top 1 B.LCChuanQ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('YiDuanZ=(select Top 1 B.YiDuanZ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('LCQty=(select Sum(C.PRTOrderQty) from JYOrderCon_TT_Sub C where C.TTID in (select B.TTID from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC'')),');
- sql.add('FKPayment=isnull(A.PayMent,(select Top 1 Payment from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0)),');
- sql.Add('YWYZhuLi1=(select Top 1 YWYZhuLi from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),');
- sql.Add('YWY1=(select Top 1 YWY from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0) ');
- sql.Add(' from JYOrderCon_TT A where 1=1 ');
- if Trim(DParameters1) <> 'Ȩ' then
- begin
- sql.Add('and A.FillCode=''' + Trim(DCode) + '''');
- end;
-// sql.Add(' and ConNo like ''' + '%' + Trim(ConNo.Text) + '%' + '''');
- sql.Add(' and TTType=''' + Trim(DParameters2) + '''');
- Open;
- end;
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton5Click(Sender: TObject);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'OrdConChkerLC';
- flagname := '';
- MainType := Trim(DName);
- if ShowModal = 1 then
- begin
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmContractDCList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-var
- maxno: string;
-begin
- if Order_Main.IsEmpty then
- exit;
-// Label3.Caption := Trim(Order_Main.fieldbyname('FKPayment').AsString);
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- sql.Add(' select * from JYOrderCon_TT_Sub ');
- SQL.Add(' where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_Sub);
- SInitCDSData20(ADOQueryTemp, CDS_Sub);
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('select * from OrdConDanZH_Chk where MainId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-// Open;
-// end;
-// SCreateCDS20(ADOQueryTemp, CDS_Chk);
-// SInitCDSData20(ADOQueryTemp, CDS_Chk);
-// EditNote.Text := trim(Order_Main.fieldbyname('EditNote').AsString);
-// label10.Caption := trim(Order_Main.fieldbyname('LCChuanQ').AsString);
-// label7.Caption := trim(Order_Main.fieldbyname('YiDuanZ').AsString);
-// label12.Caption := trim(floattostr(Order_Main.fieldbyname('LCQty').AsFloat));
-end;
-
-procedure TfrmContractDCList.Tv2CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- if Order_Main.FieldByName('ConFlag1').AsBoolean = False then
- begin
- if CDS_Chk.IsEmpty then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete OrdCon_Chk where CKID=''' + Trim(CDS_Chk.fieldbyname('CKID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Chk.Delete;
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton4Click(Sender: TObject);
-var
- maxno: string;
- FCount: Integer;
-begin
-
- if Order_Main.IsEmpty then
- Exit;
- if CANSHU1 = '¼' then
- begin
- if canshu2 = '鳤' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('and filler in ( select username from SY_User where UType=(select UType from SY_User where UserName=' + quotedstr(Trim(dname)));
- SQL.Add('))');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ܲ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- if Trim(Order_Main.fieldbyname('Filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('ܲ˵!', 'ʾ', 0);
- Exit;
- end;
- end;
-
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('AND ISNULL(SChkFlag,0)=0 ');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ǰ״̬Ѹı䣬ˢº!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set SChkFlag=1,SChkTime=getdate() where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('')));
- sql.Add(',' + quotedstr(trim('TTId' + trim(Order_Main.FieldByName('TTID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- Order_Main.Delete;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
-
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.zordernoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- if Length(DCNO.Text) < 3 then
- Exit;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- SQL.Clear;
- sql.Add('select A.*, ');
- sql.add('SYRName=(select Top 1 T.SYRName From JYOrderCon_Main T where T.ConNO=A.ConNo),');
- sql.add('JHDate=(select Top 1 M.DlyDate from JYOrder_Main M where M.OrderNo=A.DCNO),');
- sql.add('FKPayment=isnull((select Top 1 Payment from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo),A.PayMent),');
- sql.Add('YWYZhuLi1=(select Top 1 YWYZhuLi from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo),');
- sql.Add('YWY1=(select Top 1 YWY from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo), ');
- sql.add('LCChuanQ=(select Top 1 B.LCChuanQ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('YiDuanZ=(select Top 1 B.YiDuanZ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('LCQty=(select Sum(C.PRTOrderQty) from JYOrderCon_TT_Sub C where C.TTID in (select B.TTID from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''))');
- sql.Add(' from JYOrderCon_TT A where 1=1 ');
- if Trim(DParameters1) <> 'Ȩ' then
- begin
- sql.Add('and A.FillCode=''' + Trim(DCode) + '''');
- end;
- sql.Add(' and DCNO like ''' + '%' + Trim(DCNO.Text) + '%' + '''');
- sql.Add(' and TTType=''' + Trim(DParameters2) + '''');
- Open;
- end;
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton6Click(Sender: TObject);
-var
- i, j: Integer;
- PatFile, HZStr: string;
- FTPPath, FConNo, MaxNo: string;
-begin
- if Order_Main.IsEmpty then
- Exit;
- lstPat := TStringList.Create;
- lstPat.Clear;
- if ODPat.Execute then
- begin
- lstPat.AddStrings(ODPat.Files);
- end;
-
- if lstPat.Count > 0 then
- begin
- try
- ReadINIFile10();
- server := ReadINIFileStr('SYSTEMSET.INI', 'SERVER', 'ַ', '127.0.0.1');
- IdFTP1.Host := server; //PicSvr;
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- IdFTP1.Quit;
- Application.MessageBox('ӵļ飡', 'ʾ', MB_ICONWARNING);
- Exit;
- end;
- end
- else
- begin
- Exit;
- end;
- Panel6.Visible := True;
- Panel6.Refresh;
- { with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select isnull(Count(*),0) MM from XD_File where ');
- SQL.Add(' filetype=''LC''');
- Open;
- j:=fieldbyname('MM').AsInteger;
- end;}
- try
- ADOQueryCmd.Connection.BeginTrans;
- for i := 0 to lstPat.Count - 1 do
- begin
-
- PatFile := ExtractFileName(lstPat[i]);
- HZStr := Copy(PatFile, (Pos('.', PatFile) + 1), (Length(PatFile) - Pos('.', PatFile)));
- if IdFTP1.Connected then
- begin
-
- if GetLSNo(ADOQueryCmd, MaxNo, 'LC', 'XD_File', 4, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡļʧܣ', 'ʾ', 0);
- Exit;
- end;
- IdFTP1.Put(lstPat[i], Trim('\LC') + '\' + Trim(MaxNo) + '.' + Trim(HZStr));
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from XD_File where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('XFID').Value := Trim(MaxNo);
- FieldByName('CYID').Value := Trim(Order_Main.fieldbyname('TTID').AsString);
- FieldByName('CYNO').Value := Trim(Order_Main.fieldbyname('LCNO').AsString);
- FieldByName('filename').Value := Trim(PatFile);
- FieldByName('FileDate').Value := SGetServerDate(ADOQueryTemp);
- fieldbyname('FileType').value := Trim('LC');
- FieldByName('Filler').Value := Trim(DName);
- FieldByName('HZStr').Value := '.' + Trim(HZStr);
- Post;
- end;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- if IdFTP1.Connected then
- IdFTP1.Quit;
- Panel6.Visible := False;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from XD_File where CYId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_SC);
- SInitCDSData20(ADOQueryTemp, CDS_SC);
- Application.MessageBox('ϴɹ', 'ʾ', 0);
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ϴʧܣ', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton7Click(Sender: TObject);
-var
- fHandle: THandle;
- FInt: Integer;
- FFName, FFName10, FPath: string;
-begin
- if CDS_SC.IsEmpty then
- Exit;
- Panel3.Visible := True;
- Panel3.Refresh;
- try
- ReadINIFile10();
- server := ReadINIFileStr('SYSTEMSET.INI', 'SERVER', 'ַ', '127.0.0.1');
- if Length(server) < 6 then
- begin
- server := '127.0.0.1';
- end;
- IdFTP1.Host := server; //PicSvr;
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- IdFTP1.Quit;
- Application.MessageBox('ӵļ飡', 'ʾ', MB_ICONWARNING);
- Exit;
- end;
- FPath := 'D:\Right1209\';
- if not DirectoryExists(ExtractFileDir(FPath)) then
- CreateDir(ExtractFileDir(FPath));
- FFName := Trim(CDS_SC.fieldbyname('XFID').AsString) + Trim(CDS_SC.fieldbyname('HZStr').AsString);
- FPath := FPath + FFName;
- if FileExists(FPath) = false then
- begin
- IdFTP1.Get('LC\' + FFName, FPath);
- end;
- Panel3.Visible := False;
- if IdFTP1.Connected then
- IdFTP1.Quit;
- ShellExecute(Handle, 'open', PChar(FPath), '', '', SW_SHOWNORMAL);
-
-end;
-
-procedure TfrmContractDCList.TvSCCellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- if CDS_SC.IsEmpty then
- Exit;
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete XD_File where XFID=''' + Trim(CDS_SC.fieldbyname('XFID').AsString) + '''');
- ExecSQL;
- end;
- CDS_SC.Delete;
-end;
-
-procedure TfrmContractDCList.ToolButton8Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- exit;
-
- if Order_Main.FieldByName('SChkFlag').AsBoolean = False then
- begin
- application.MessageBox('û', 'ʾ');
- exit;
- end;
- frmZDYHelpSel := TfrmZDYHelpSel.Create(self);
- with frmZDYHelpSel do
- begin
- flag := 'OrdConChker';
- flagname := 'ͬ';
- MainType := Trim(DName);
- if showModal = 1 then
- begin
- with ClientDataSet1 do
- begin
- first;
- while not eof do
- begin
- if fieldbyname('Ssel').AsBoolean = true then
- begin
- if CDS_Chk.Locate('Chker', Trim(fieldbyname('ZdyName').AsString), []) = False then
- begin
- application.MessageBox('ûиúͬ', 'ʾ');
- exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update OrdConDanZH_Chk Set ChkStatus='''',chknote='''',ChkTime=getdate()');
- sql.Add(' where Mainid=''' + Trim(Order_Main.fieldbyname('TTID').AsString) + '''');
- sql.Add(' and Chker=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
- ExecSQL;
- end;
- end;
- next;
- end;
- end;
-
- with Order_Main do
- begin
- Edit;
- fieldbyname('ChkStatus').Value := '';
-
- fieldbyname('EditSQTime').Value := SGetServerDate10(ADOQueryTemp);
- fieldbyname('EditFlag').Value := '1';
- Post;
- end;
- end;
- free;
- end;
-
-end;
-
-procedure TfrmContractDCList.TaiTouBtnClick(Sender: TObject);
-begin
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'taitou1';
- flagname := '˾̧ͷ';
- if ShowModal = 1 then
- begin
- TaiTou.Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- free;
- end;
-end;
-
-procedure TfrmContractDCList.TSureClick(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney: string;
-begin
- if Order_Main.IsEmpty then
- Exit;
- if Trim(Order_Main.FieldByName('ChkStatus').AsString) <> 'ͨ' then
- begin
- RM1.PreviewButtons := [pbExit];
- end
- else
- begin
- RM1.PreviewButtons := [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator];
- end;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ָʾ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- SQL.Add('select B.PRTPrice, ');
- sql.Add('YWYZhuLi=(select Top 1 YWYZhuLi from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),');
- sql.Add('YWY=(select Top 1 YWY from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0), ');
- sql.add(' PRTMaoZ=isnull(A.PRTMaoZ,(select Sum(D.CHMZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJIngZ=isnull(A.PRTJIngZ,(select Sum(D.CHJZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJianQty=isnull(A.PRTJianQty,(select Sum(D.QtyJian) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,SumPRTQty=(select Sum(D.Qty) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0)');
- sql.Add(' ,A.*,B.*');
- sql.Add(' from JYOrderCon_TT A');
- sql.Add(' left join JYOrderCon_TT_Sub B on A.TTID=B.TTID');
- sql.Add(' where A.TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
- if iftt.Checked = true then
- FTaiTou := 'SHAOXING MNC IMP & EXP CO.,LTD'
- else
- FTaiTou := '';
- RMVariables['Taitou'] := trim(TaiTou.Text);
- RMVariables['FTaiTou'] := trim(FTaiTou);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ָʾ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.TBPrintClick(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney: string;
- THID: DWORD;
-begin
- if Order_Main.IsEmpty then
- Exit;
- if combobox1.Text = '' then
- exit;
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + trim(ComboBox1.Text) + '.rmf';
- ExportFtErpFile(trim(ComboBox1.Text) + '.rmf', ADOQueryPrint);
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT A.*');
- SQL.Add(',GSNAME=''֯''');
- SQL.Add(',ZORDERNO=CAST((SELECT STUFF(( SELECT '','' +convert(VARCHAR, FROMORDERNO) FROM JYOrderCon_TT_Sub B WHERE A.TTID=B.TTId FOR XML PATH('''')), 1, 1, '''') )AS VARCHAR)');
- SQL.Add(',ZQTY=(SELECT SUM(PRTORDERQTY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMONEY=(SELECT SUM(MONEY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMAOZHONG=(SELECT SUM(MAOZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZJINGZHONG=(SELECT SUM(JINGZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZTIJI=(SELECT SUM(tiji) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZBZJS=(SELECT SUM(BZJS) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',DJYQ1= REPLACE(REPLACE(DJYQ, CHAR(13), ''''), CHAR(10), '''') ');
- SQL.Add(',DJYQ2=REPLACE(REPLACE(DJYQ, CHAR(13) + CHAR(10), CHAR(10)), CHAR(13), CHAR(10)) ');
- sql.Add(' from JYOrderCon_TT A ');
- SQL.Add('where ((FILLTIME>=''' + FormatDateTime('yyyy-MM-dd', BegDate.DateTime) + '''');
- SQL.Add('and FILLTIME<''' + FormatDateTime('yyyy-MM-dd', enddate.DateTime + 1) + ''') or ChkStatus=''˲ͨ'') ');
- SQL.ADD('AND TTID=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
-
- CreateThread(nil, 0, @DrawDeskTop, nil, 0, THID);
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\' + trim(ComboBox1.Text) + '.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.Image1Click(Sender: TObject);
-begin
- Panel4.Visible := False;
-end;
-
-procedure TfrmContractDCList.ToolButton9Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- exit;
-// if Trim(Order_Main.fieldbyname('FillCode').AsString) <> Trim(DCode) then
-// begin
-// Application.MessageBox('ܲ˵!', 'ʾ', 0);
-// Exit;
-// end;
- if CANSHU1 = '¼' then
- begin
- if canshu2 = '鳤' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('and filler in ( select username from SY_User where UType=(select UType from SY_User where UserName=' + quotedstr(Trim(dname)));
- SQL.Add('))');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ܲ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- if Trim(Order_Main.fieldbyname('Filler').AsString) <> Trim(DName) then
- begin
- Application.MessageBox('ܲ˵!', 'ʾ', 0);
- Exit;
- end;
- end;
-
- end;
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('AND ISNULL(SChkFlag,0)=1 AND ISNULL(ChkStatus,0)=0 ');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ǰ״̬Ѹı䣬ˢº!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- with ADOQuery1 do
- begin
- Close;
- sql.Clear;
- sql.Add('update JYOrderCon_TT set SChkFlag=0,SChkTime=NULL where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ֳ')));
- sql.Add(',' + quotedstr(trim('TTId' + trim(Order_Main.FieldByName('TTID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- execsql;
- end;
- Order_Main.Delete;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
-
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton10Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add('AND ISNULL(SChkFlag,0)=1 AND ISNULL(ChkStatus,0)=0 ');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ǰ״̬Ѹı䣬ˢº!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
-
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=1,ChkTime=getdate(), ');
- sql.Add('Chker=' + QUOTEDSTR(Trim(DNAME)));
- SQL.Add(' where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('')));
- sql.Add(',' + quotedstr(trim('TTId' + trim(Order_Main.FieldByName('TTID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- Order_Main.Delete;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
-
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton11Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add(' AND ChkStatus=1 ');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ǰ״̬Ѹı䣬ˢº!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=NULL,ChkTime=NULL, ');
- sql.Add('Chker=NULL');
- SQL.Add(' where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ֳ')));
- sql.Add(',' + quotedstr(trim('TTId' + trim(Order_Main.FieldByName('TTID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- Order_Main.Delete;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
-
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.cxTabControl1Change(Sender: TObject);
-begin
- SetSatas();
- InitGrid();
-end;
-
-procedure TfrmContractDCList.ToolButton12Click(Sender: TObject);
-var
- fPrintFile, FTaiTou, fImagePath2: string;
- EngMoney: string;
-begin
- if Order_Main.IsEmpty then
- Exit;
- if combobox1.Text = '' then
- exit;
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + trim(ComboBox1.Text) + '.rmf';
- ExportFtErpFile(trim(ComboBox1.Text) + '.rmf', ADOQueryPrint);
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT A.*');
- SQL.Add(',GSNAME=''֯''');
- SQL.Add(',ZORDERNO=CAST((SELECT STUFF(( SELECT '','' +convert(VARCHAR, FROMORDERNO) FROM JYOrderCon_TT_Sub B WHERE A.TTID=B.TTId FOR XML PATH('''')), 1, 1, '''') )AS VARCHAR)');
- SQL.Add(',ZQTY=(SELECT SUM(PRTORDERQTY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMONEY=(SELECT SUM(MONEY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMAOZHONG=(SELECT SUM(MAOZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZJINGZHONG=(SELECT SUM(JINGZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZTIJI=(SELECT SUM(tiji) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZBZJS=(SELECT SUM(BZJS) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- sql.Add(' from JYOrderCon_TT A ');
- SQL.Add('where ((FILLTIME>=''' + FormatDateTime('yyyy-MM-dd', BegDate.DateTime) + '''');
- SQL.Add('and FILLTIME<''' + FormatDateTime('yyyy-MM-dd', enddate.DateTime + 1) + ''') or ChkStatus=''˲ͨ'') ');
- SQL.ADD('AND TTID=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\' + '' + Trim(Order_Main.fieldbyname('ZORDERNO').AsString) + '.xls';
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\' + trim(ComboBox1.Text) + '.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton13Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add(' AND ChkStatus=1 ');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ǰ״̬Ѹı䣬ˢº!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set QRDATE=getdate() ');
-// sql.Add('Chker=' + QUOTEDSTR(Trim(DNAME)));
- SQL.Add(' where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ȷ')));
- sql.Add(',' + quotedstr(trim('TTId' + trim(Order_Main.FieldByName('TTID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
-// Order_Main.Delete;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- initgrid();
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton14Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then
- Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- SQL.Add('select * from JYOrderCon_TT A ');
- SQL.Add('where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + ''' ');
- SQL.Add(' AND ChkStatus=1 ');
- Open;
- end;
- if ADOQueryTemp.ISEMPTY = True then
- begin
- Application.MessageBox('ǰ״̬Ѹı䣬ˢº!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set QRDATE=NULL ');
- SQL.Add(' where TTId=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('ȡȷ')));
- sql.Add(',' + quotedstr(trim('TTId' + trim(Order_Main.FieldByName('TTID').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
-// Order_Main.Delete;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- initgrid();
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.ToolButton15Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney: string;
- Canvas: TCanvas;
-begin
- if Order_Main.IsEmpty then
- Exit;
- if combobox1.Text = '' then
- exit;
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + trim(ComboBox1.Text) + '.rmf';
- ExportFtErpFile(trim(ComboBox1.Text) + '.rmf', ADOQueryPrint);
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT A.*');
- SQL.Add(',GSNAME=''֯''');
- SQL.Add(',ZORDERNO=CAST((SELECT STUFF(( SELECT '','' +convert(VARCHAR, FROMORDERNO) FROM JYOrderCon_TT_Sub B WHERE A.TTID=B.TTId FOR XML PATH('''')), 1, 1, '''') )AS VARCHAR)');
- SQL.Add(',ZQTY=(SELECT SUM(PRTORDERQTY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMONEY=(SELECT SUM(MONEY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMAOZHONG=(SELECT SUM(MAOZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZJINGZHONG=(SELECT SUM(JINGZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZTIJI=(SELECT SUM(tiji) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZBZJS=(SELECT SUM(BZJS) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- sql.Add(' from JYOrderCon_TT A ');
- SQL.Add('where ((FILLTIME>=''' + FormatDateTime('yyyy-MM-dd', BegDate.DateTime) + '''');
- SQL.Add('and FILLTIME<''' + FormatDateTime('yyyy-MM-dd', enddate.DateTime + 1) + ''') or ChkStatus=''˲ͨ'') ');
- SQL.ADD('AND TTID=''' + Trim(Order_Main.fieldbyname('TTId').AsString) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- Canvas := TCanvas.Create;
-
- Canvas := TCanvas.Create;
-
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.PrintReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\' + trim(ComboBox1.Text) + '.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmContractDCList.DCNOKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmContractDCList.cxTabControl2Change(Sender: TObject);
-begin
- cxTabControl1.TabIndex := cxTabControl2.TabIndex + 1;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCListChk.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCListChk.dfm
deleted file mode 100644
index 906a06e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCListChk.dfm
+++ /dev/null
@@ -1,1287 +0,0 @@
-object frmContractDCListChk: TfrmContractDCListChk
- Left = 284
- Top = 163
- Width = 1180
- Height = 590
- Caption = #35746#33329#25351#31034#20070#23457#26680
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1164
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 95
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 2
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 59
- OnClick = TBFindClick
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 58
- OnClick = ToolButton1Click
- end
- object ToolButton4: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #23457#26680#36890#36807
- ImageIndex = 104
- OnClick = ToolButton4Click
- end
- object ToolButton2: TToolButton
- Left = 276
- Top = 0
- Caption = #23457#26680#19981#36890#36807
- ImageIndex = 109
- OnClick = ToolButton2Click
- end
- object ToolButton3: TToolButton
- Left = 371
- Top = 0
- AutoSize = True
- Caption = #36865#23457
- ImageIndex = 94
- OnClick = ToolButton3Click
- end
- object TBDelChker: TToolButton
- Left = 434
- Top = 0
- AutoSize = True
- Caption = #21024#38500#23457#26680#20154
- ImageIndex = 112
- Visible = False
- OnClick = TBDelChkerClick
- end
- object TBPrint: TToolButton
- Left = 533
- Top = 0
- AutoSize = True
- Caption = #25171#21360
- ImageIndex = 12
- OnClick = TBPrintClick
- end
- object TBExport: TToolButton
- Left = 596
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 75
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 659
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 55
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1164
- Height = 86
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 23
- Top = 15
- Width = 52
- Height = 12
- Caption = #21046#21333#26085#26399
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label9: TLabel
- Left = 179
- Top = 15
- Width = 39
- Height = 12
- Caption = #21512#21516#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 319
- Top = 15
- Width = 52
- Height = 12
- Caption = #25351#31034#21333#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 319
- Top = 65
- Width = 52
- Height = 12
- Caption = #20184#27454#26041#24335
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 378
- Top = 65
- Width = 52
- Height = 12
- Caption = #20184#27454#26041#24335
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label8: TLabel
- Left = 486
- Top = 15
- Width = 52
- Height = 12
- Caption = #20462#25913#21407#22240
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label10: TLabel
- Left = 319
- Top = 41
- Width = 39
- Height = 12
- Caption = #28322#30701#35013
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 363
- Top = 41
- Width = 21
- Height = 12
- Caption = '---'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label12: TLabel
- Left = 179
- Top = 41
- Width = 54
- Height = 12
- Caption = 'L/C'#33337#26399':'
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label13: TLabel
- Left = 235
- Top = 41
- Width = 21
- Height = 12
- Caption = '---'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label15: TLabel
- Left = 179
- Top = 67
- Width = 47
- Height = 12
- Caption = 'L/C'#25968#37327
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label16: TLabel
- Left = 231
- Top = 67
- Width = 21
- Height = 12
- Caption = '---'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BegDate: TDateTimePicker
- Left = 76
- Top = 11
- Width = 85
- Height = 20
- Date = 40675.464742650460000000
- Format = 'yyyy-MM-dd'
- Time = 40675.464742650460000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 76
- Top = 37
- Width = 86
- Height = 20
- Date = 40675.464761099540000000
- Format = 'yyyy-MM-dd'
- Time = 40675.464761099540000000
- TabOrder = 1
- end
- object ConNo: TEdit
- Tag = 2
- Left = 220
- Top = 11
- Width = 77
- Height = 20
- TabOrder = 2
- OnChange = FPNOChange
- OnKeyPress = ConNoKeyPress
- end
- object DCNO: TEdit
- Tag = 2
- Left = 377
- Top = 11
- Width = 83
- Height = 20
- TabOrder = 3
- OnChange = FPNOChange
- end
- object EditNote: TMemo
- Left = 540
- Top = 4
- Width = 449
- Height = 49
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- ScrollBars = ssVertical
- TabOrder = 4
- end
- end
- object cxSplitter1: TcxSplitter
- Left = 0
- Top = 227
- Width = 1164
- Height = 8
- HotZoneClassName = 'TcxMediaPlayer9Style'
- AlignSplitter = salBottom
- Control = Panel2
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 118
- Width = 1164
- Height = 22
- Align = alTop
- Style = 9
- TabIndex = 0
- TabOrder = 3
- Tabs.Strings = (
- #24453#23457#26680
- #24050#23457#26680
- #24050#23436#25104)
- OnChange = cxTabControl1Change
- ClientRectBottom = 22
- ClientRectRight = 1164
- ClientRectTop = 19
- end
- object Panel2: TPanel
- Left = 0
- Top = 235
- Width = 1164
- Height = 317
- Align = alBottom
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 4
- object cxGrid2: TcxGrid
- Left = 2
- Top = 2
- Width = 359
- Height = 313
- Align = alLeft
- TabOrder = 0
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DS_Chk
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.OnGetContentStyle = Tv1StylesGetContentStyle
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn1: TcxGridDBColumn
- Caption = #23457#26680#20154
- DataBinding.FieldName = 'Chker'
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_DDMD.Default
- Width = 61
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Caption = #23457#26680#26102#38388
- DataBinding.FieldName = 'ChkTime'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 107
- end
- object cxGridDBColumn36: TcxGridDBColumn
- Caption = #23457#26680#29366#24577
- DataBinding.FieldName = 'ChkStatus'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 74
- end
- object cxGridDBColumn4: TcxGridDBColumn
- Caption = #23457#26680#22791#27880
- DataBinding.FieldName = 'ChkNote'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 100
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object cxGrid4: TcxGrid
- Left = 361
- Top = 2
- Width = 312
- Height = 313
- Align = alLeft
- TabOrder = 1
- Visible = False
- object TvSC: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellDblClick = TvSCCellDblClick
- DataController.DataSource = DS_SC
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.OnGetContentStyle = Tv1StylesGetContentStyle
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn8: TcxGridDBColumn
- Caption = #19978#20256#20154
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_DDMD.Default
- Width = 53
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Caption = #19978#20256#26102#38388
- DataBinding.FieldName = 'FillTime'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 102
- end
- object cxGridDBColumn10: TcxGridDBColumn
- Caption = #25991#20214#21517#31216
- DataBinding.FieldName = 'FileName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 146
- end
- end
- object cxGridLevel3: TcxGridLevel
- GridView = TvSC
- end
- end
- object Panel3: TPanel
- Left = 430
- Top = 95
- Width = 138
- Height = 30
- BevelInner = bvRaised
- Caption = #27491#22312#19979#36733#12290#12290#12290
- Color = clSkyBlue
- TabOrder = 2
- Visible = False
- end
- object cxGrid3: TcxGrid
- Left = 673
- Top = 2
- Width = 489
- Height = 313
- Align = alClient
- TabOrder = 3
- object Tv3: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DS_Sub
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Format = '0'
- Position = spFooter
- end
- item
- Format = '0'
- Position = spFooter
- Column = v1PRTOrderQty
- end
- item
- Format = '0'
- Position = spFooter
- Column = v1PRTPrice
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1PRTOrderQty
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object cxGridDBColumn5: TcxGridDBColumn
- Caption = #36135#29289#21517#31216'('#20013#25991')'
- DataBinding.FieldName = 'PRTCodeName'
- HeaderAlignmentHorz = taCenter
- Width = 110
- end
- object cxGridDBColumn6: TcxGridDBColumn
- Caption = #36135#29289#21517#31216'('#33521#25991')'
- DataBinding.FieldName = 'PRTEngCodeName'
- HeaderAlignmentHorz = taCenter
- Width = 91
- end
- object v1PRTPrice: TcxGridDBColumn
- Caption = #38376#24133
- DataBinding.FieldName = 'PRTMF'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Styles.Header = DataLink_DDMD.handBlack
- Width = 61
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Caption = #20811#37325
- DataBinding.FieldName = 'PRTKZ'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object v1PRTOrderQty: TcxGridDBColumn
- Caption = #25968#37327
- DataBinding.FieldName = 'PRTOrderQty'
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_DDMD.Default
- Width = 45
- end
- object v1OrderUnit: TcxGridDBColumn
- Caption = #25968#37327#21333#20301
- DataBinding.FieldName = 'OrderUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'M'
- 'Y'
- 'Kg')
- HeaderAlignmentHorz = taCenter
- Styles.Header = DataLink_DDMD.Default
- Width = 65
- end
- end
- object cxGridLevel2: TcxGridLevel
- GridView = Tv3
- end
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 140
- Width = 1164
- Height = 87
- Align = alClient
- TabOrder = 5
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellClick = Tv1CellClick
- OnCellDblClick = Tv1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.OnGetContentStyle = Tv1StylesGetContentStyle
- Styles.Header = DataLink_DDMD.Default
- object v1Column1: TcxGridDBColumn
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'DCNO'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 70
- end
- object v1Column12: TcxGridDBColumn
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'SKDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- Options.Editing = False
- Width = 67
- end
- object v1ConNo: TcxGridDBColumn
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'ConNo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 73
- end
- object v1Column13: TcxGridDBColumn
- Caption = #25351#23450#36135#20195
- DataBinding.FieldName = 'HangWeiHangBan'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object v1DeliveryDate: TcxGridDBColumn
- Caption = #21253#35013#23436#25104#26085#26399
- DataBinding.FieldName = 'WanBiDate'
- OnCustomDrawCell = v1DeliveryDateCustomDrawCell
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 62
- end
- object v1Column4: TcxGridDBColumn
- Caption = #35201#27714#33337#26399
- DataBinding.FieldName = 'YaoQiuDate'
- HeaderAlignmentHorz = taCenter
- Width = 63
- end
- object v1Column5: TcxGridDBColumn
- Caption = #25289#36135#26085#26399
- DataBinding.FieldName = 'LaHuoDate'
- HeaderAlignmentHorz = taCenter
- Width = 78
- end
- object v1Column21: TcxGridDBColumn
- Caption = #21253#35013#31181#31867
- DataBinding.FieldName = 'BaoZhuangType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 74
- end
- object v1OrdPerson1: TcxGridDBColumn
- Caption = #36135#29289#27611#37325
- DataBinding.FieldName = 'PRTMaoZ'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 78
- end
- object v1CustomerNoName: TcxGridDBColumn
- Caption = #36135#29289#20928#37325
- DataBinding.FieldName = 'PRTJIngZ'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 76
- end
- object v1Column2: TcxGridDBColumn
- Caption = #21253#35013#20214#25968
- DataBinding.FieldName = 'PRTJianQty'
- Width = 58
- end
- object v1Column7: TcxGridDBColumn
- Caption = #20215#26684#26415#35821
- DataBinding.FieldName = 'OrdConPrcNote'
- HeaderAlignmentHorz = taCenter
- Width = 91
- end
- object v1Column18: TcxGridDBColumn
- Caption = #20215#26684#35828#26126
- DataBinding.FieldName = 'OrdConPrcShuoM'
- Width = 63
- end
- object v1Column6: TcxGridDBColumn
- Caption = #36215#36816#28207
- DataBinding.FieldName = 'FromPlace'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object v1Column10: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'TOPlace'
- HeaderAlignmentHorz = taCenter
- Width = 62
- end
- object v1Column17: TcxGridDBColumn
- Caption = #33337#20844#21496#24773#20917
- DataBinding.FieldName = 'ChuanInfo'
- Width = 73
- end
- object v1Column19: TcxGridDBColumn
- Caption = #25552#21333#36890#30693#20154
- DataBinding.FieldName = 'TDTongZhiPerson'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 87
- end
- object v1Column20: TcxGridDBColumn
- Caption = #25552#21333#25910#36135#20154
- DataBinding.FieldName = 'TDShouHuoPerson'
- Width = 75
- end
- object v1Column9: TcxGridDBColumn
- Caption = #23457#26680#29366#24577
- DataBinding.FieldName = 'ChkStatus'
- Options.Editing = False
- Width = 61
- end
- object v1Column8: TcxGridDBColumn
- Caption = #24050#36865#23457
- DataBinding.FieldName = 'SChkFlag'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 48
- end
- object v1Column3: TcxGridDBColumn
- Caption = #19994#21153#21161#29702
- DataBinding.FieldName = 'YWYZhuLi1'
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object v1Column11: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY1'
- HeaderAlignmentHorz = taCenter
- Width = 54
- end
- object v1YJDCDate: TcxGridDBColumn
- Caption = #39044#35745#21040#28207#26085
- DataBinding.FieldName = 'YJDCDate'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 71
- end
- object v1YJSHDate: TcxGridDBColumn
- Caption = #39044#35745#25910#27719#26085#26399
- DataBinding.FieldName = 'YJSHDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 83
- end
- object v1FKPayMent: TcxGridDBColumn
- Caption = #20184#27454#26041#24335
- DataBinding.FieldName = 'FKPayMent'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1EditNote: TcxGridDBColumn
- Caption = #20462#25913#21407#22240
- DataBinding.FieldName = 'EditNote'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1EditSQTime: TcxGridDBColumn
- Caption = #20462#25913#30003#35831#26085#26399
- DataBinding.FieldName = 'EditSQTime'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 83
- end
- object v1HCDay: TcxGridDBColumn
- Caption = #33322#31243#22825#25968
- DataBinding.FieldName = 'HCDay'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1LCChuanQ: TcxGridDBColumn
- Caption = 'L/C'#33337#26399
- DataBinding.FieldName = 'LCChuanQ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1YiDuanZ: TcxGridDBColumn
- Caption = #28322#30701#35013
- DataBinding.FieldName = 'YiDuanZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1LCQty: TcxGridDBColumn
- Caption = 'L/C'#25968#37327
- DataBinding.FieldName = 'LCQty'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1XGCount: TcxGridDBColumn
- Caption = #20462#25913#27425#25968
- DataBinding.FieldName = 'XGCount'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1fillcode: TcxGridDBColumn
- Caption = #21592#24037#36134#21495
- DataBinding.FieldName = 'fillcode'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 60
- end
- object v1filler: TcxGridDBColumn
- Caption = #21046#21333#20154
- DataBinding.FieldName = 'filler'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1JHDate: TcxGridDBColumn
- Caption = #20132#36135#26085#26399
- DataBinding.FieldName = 'JHDate'
- PropertiesClassName = 'TcxDateEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel4: TPanel
- Left = 162
- Top = 157
- Width = 231
- Height = 216
- TabOrder = 6
- Visible = False
- object Label2: TLabel
- Left = 48
- Top = 88
- Width = 6
- Height = 12
- end
- object Label14: TLabel
- Left = 93
- Top = 34
- Width = 48
- Height = 12
- Caption = #23457#26680#22791#27880
- end
- object Panel10: TPanel
- Left = 1
- Top = 1
- Width = 229
- Height = 23
- Align = alTop
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = ' '#21453#39304#20449#24687
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- OnMouseMove = Panel10MouseMove
- object Image2: TImage
- Left = 205
- Top = 3
- Width = 22
- Height = 16
- ParentShowHint = False
- Picture.Data = {
- 07544269746D617076040000424D760400000000000036000000280000001500
- 0000110000000100180000000000400400000000000000000000000000000000
- 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6
- F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040
- 404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080
- 808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000
- 000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00}
- ShowHint = True
- Transparent = True
- OnClick = Image2Click
- end
- end
- object Button1: TButton
- Left = 79
- Top = 160
- Width = 75
- Height = 25
- Caption = #30830#23450
- TabOrder = 1
- OnClick = Button1Click
- end
- object ChkNote: TRichEdit
- Left = 48
- Top = 48
- Width = 137
- Height = 105
- TabOrder = 2
- end
- end
- object Panel5: TPanel
- Left = 412
- Top = 143
- Width = 249
- Height = 174
- TabOrder = 7
- Visible = False
- object Label6: TLabel
- Left = 48
- Top = 88
- Width = 6
- Height = 12
- end
- object Label7: TLabel
- Left = 45
- Top = 63
- Width = 52
- Height = 12
- Caption = #20844#21496#25260#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Panel6: TPanel
- Left = 1
- Top = 1
- Width = 247
- Height = 23
- Align = alTop
- Alignment = taLeftJustify
- BevelOuter = bvNone
- Caption = #20844#21496#25260#22836
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Image1: TImage
- Left = 225
- Top = 3
- Width = 22
- Height = 16
- ParentShowHint = False
- Picture.Data = {
- 07544269746D617076040000424D760400000000000036000000280000001500
- 0000110000000100180000000000400400000000000000000000000000000000
- 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00FFFFFFFFFFFFF0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6
- F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFF404040404040404040404040404040404040404040404040
- 404040404040404040404040404040404040404040404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFF808080808080808080808080808080808080808080
- 808080808080808080808080808080808080808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000
- 000000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4000000000000
- 000000000000C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4000000000000C8D0D4
- C8D0D4000000000000C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4000000000000C8D0D4C8D0D4
- C8D0D4C8D0D4000000000000C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
- C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4808080404040F0CAA6FFFFFFFFFF
- FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FF00}
- ShowHint = True
- Transparent = True
- OnClick = Image1Click
- end
- end
- object TSure: TButton
- Left = 81
- Top = 120
- Width = 85
- Height = 29
- Caption = #30830' '#23450
- TabOrder = 1
- OnClick = TSureClick
- end
- object TaiTou: TBtnEditA
- Left = 100
- Top = 59
- Width = 115
- Height = 20
- TabOrder = 2
- OnBtnClick = TaiTouBtnClick
- end
- object ETaiTou: TEdit
- Left = 80
- Top = 316
- Width = 121
- Height = 20
- TabOrder = 3
- Visible = False
- end
- object IFTT: TCheckBox
- Left = 52
- Top = 85
- Width = 121
- Height = 17
- Caption = #26159#21542#26174#31034#21457#31080#25260#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 4
- end
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 544
- Top = 176
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 688
- Top = 224
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 552
- Top = 216
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 440
- Top = 296
- end
- object DataSource1: TDataSource
- DataSet = Order_Main
- Left = 352
- Top = 160
- end
- object Order_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 576
- Top = 184
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 320
- Top = 160
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 512
- Top = 160
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 576
- Top = 248
- end
- object PopupMenu1: TPopupMenu
- Left = 288
- Top = 160
- object N2: TMenuItem
- Caption = #26377#20379#24212#21830
- OnClick = N2Click
- end
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 440
- Top = 328
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 416
- Top = 296
- end
- object PopupMenu2: TPopupMenu
- Left = 648
- Top = 168
- object N11: TMenuItem
- Caption = #26684#24335'1'
- end
- object N21: TMenuItem
- Caption = #26684#24335'2'
- end
- object N31: TMenuItem
- Caption = #26684#24335'3'
- end
- end
- object CDS_Chk: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 288
- Top = 512
- end
- object DS_Chk: TDataSource
- DataSet = CDS_Chk
- Left = 224
- Top = 480
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 276
- Top = 480
- end
- object cxGridPopupMenu3: TcxGridPopupMenu
- Grid = cxGrid3
- PopupMenus = <>
- Left = 848
- Top = 512
- end
- object DS_Sub: TDataSource
- DataSet = CDS_Sub
- Left = 672
- Top = 528
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 744
- Top = 504
- end
- object CDS_Chker: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 832
- Top = 248
- end
- object CDS_SC: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 384
- Top = 416
- end
- object DS_SC: TDataSource
- DataSet = CDS_SC
- Left = 472
- Top = 488
- end
- object SaveDialog1: TSaveDialog
- Left = 561
- Top = 445
- end
- object IdFTP1: TIdFTP
- MaxLineAction = maException
- ReadTimeout = 0
- ProxySettings.ProxyType = fpcmNone
- ProxySettings.Port = 0
- Left = 573
- Top = 412
- end
- object ODPat: TOpenDialog
- Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Left = 588
- Top = 397
- end
- object cxGridPopupMenu4: TcxGridPopupMenu
- Grid = cxGrid4
- PopupMenus = <>
- Left = 496
- Top = 416
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCListChk.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCListChk.pas
deleted file mode 100644
index 9797cd8..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ContractDCListChk.pas
+++ /dev/null
@@ -1,1505 +0,0 @@
-unit U_ContractDCListChk;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData,
- cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ADODB,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridCustomTableView, cxGridTableView,
- cxGridDBTableView, cxGrid, DBClient, cxCheckBox, cxCalendar, cxSplitter,
- RM_Dataset, RM_System, RM_Common, RM_Class, RM_GridReport, RM_e_Xls,
- Menus, cxPC, cxButtonEdit, cxDropDownEdit, IdBaseComponent, IdComponent,
- IdTCPConnection, IdTCPClient, IdFTP,IniFiles,ShellAPI, BtnEdit;
-
-type
- TfrmContractDCListChk = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBPrint: TToolButton;
- TBClose: TToolButton;
- cxGridPopupMenu1: TcxGridPopupMenu;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- TBExport: TToolButton;
- Order_Main: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- RMXLSExport1: TRMXLSExport;
- PopupMenu1: TPopupMenu;
- N2: TMenuItem;
- ToolButton1: TToolButton;
- ADOQueryPrint: TADOQuery;
- CDS_Print: TClientDataSet;
- PopupMenu2: TPopupMenu;
- N11: TMenuItem;
- N21: TMenuItem;
- N31: TMenuItem;
- Panel1: TPanel;
- Label1: TLabel;
- Label9: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- ConNo: TEdit;
- ToolButton4: TToolButton;
- cxSplitter1: TcxSplitter;
- CDS_Chk: TClientDataSet;
- DS_Chk: TDataSource;
- ToolButton2: TToolButton;
- cxTabControl1: TcxTabControl;
- Panel2: TPanel;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn36: TcxGridDBColumn;
- cxGridDBColumn4: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- cxGridPopupMenu2: TcxGridPopupMenu;
- cxGridPopupMenu3: TcxGridPopupMenu;
- DS_Sub: TDataSource;
- CDS_Sub: TClientDataSet;
- ToolButton3: TToolButton;
- CDS_Chker: TClientDataSet;
- TBDelChker: TToolButton;
- cxGrid4: TcxGrid;
- TvSC: TcxGridDBTableView;
- cxGridDBColumn8: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- cxGridDBColumn10: TcxGridDBColumn;
- cxGridLevel3: TcxGridLevel;
- Panel3: TPanel;
- CDS_SC: TClientDataSet;
- DS_SC: TDataSource;
- SaveDialog1: TSaveDialog;
- IdFTP1: TIdFTP;
- ODPat: TOpenDialog;
- cxGridPopupMenu4: TcxGridPopupMenu;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column1: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1ConNo: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1DeliveryDate: TcxGridDBColumn;
- v1Column4: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1OrdPerson1: TcxGridDBColumn;
- v1CustomerNoName: TcxGridDBColumn;
- v1Column2: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- Label4: TLabel;
- DCNO: TEdit;
- cxGrid3: TcxGrid;
- Tv3: TcxGridDBTableView;
- cxGridDBColumn5: TcxGridDBColumn;
- cxGridDBColumn6: TcxGridDBColumn;
- v1PRTPrice: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- v1PRTOrderQty: TcxGridDBColumn;
- v1OrderUnit: TcxGridDBColumn;
- cxGridLevel2: TcxGridLevel;
- v1Column3: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- Panel4: TPanel;
- Label2: TLabel;
- Label14: TLabel;
- Panel10: TPanel;
- Image2: TImage;
- Button1: TButton;
- ChkNote: TRichEdit;
- v1YJDCDate: TcxGridDBColumn;
- v1FKPayMent: TcxGridDBColumn;
- Label3: TLabel;
- Label5: TLabel;
- v1YJSHDate: TcxGridDBColumn;
- v1EditNote: TcxGridDBColumn;
- Label8: TLabel;
- EditNote: TMemo;
- v1EditSQTime: TcxGridDBColumn;
- Label10: TLabel;
- Label11: TLabel;
- Label12: TLabel;
- Label13: TLabel;
- Label15: TLabel;
- Label16: TLabel;
- v1LCChuanQ: TcxGridDBColumn;
- v1YiDuanZ: TcxGridDBColumn;
- v1LCQty: TcxGridDBColumn;
- v1XGCount: TcxGridDBColumn;
- Panel5: TPanel;
- Label6: TLabel;
- Label7: TLabel;
- Panel6: TPanel;
- Image1: TImage;
- TSure: TButton;
- TaiTou: TBtnEditA;
- ETaiTou: TEdit;
- v1fillcode: TcxGridDBColumn;
- v1filler: TcxGridDBColumn;
- IFTT: TCheckBox;
- v1HCDay: TcxGridDBColumn;
- v1JHDate: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure Tv1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure TBTPClick(Sender: TObject);
- procedure CheckBox1Click(Sender: TObject);
- procedure CheckBox2Click(Sender: TObject);
- procedure Tv1StylesGetContentStyle(Sender: TcxCustomGridTableView;
- ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem;
- out AStyle: TcxStyle);
- procedure v1DeliveryDateCustomDrawCell(Sender: TcxCustomGridTableView;
- ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
- var ADone: Boolean);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure FPNOChange(Sender: TObject);
- procedure ConNoKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure Tv2CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure ToolButton4Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure Panel10MouseMove(Sender: TObject; Shift: TShiftState; X,
- Y: Integer);
- procedure Image2Click(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton3Click(Sender: TObject);
- procedure TBDelChkerClick(Sender: TObject);
- procedure TvSCCellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure TSureClick(Sender: TObject);
- procedure TBPrintClick(Sender: TObject);
- procedure Image1Click(Sender: TObject);
- procedure TaiTouBtnClick(Sender: TObject);
- private
- canshu1,canshu2,canshu3:string;
- DQdate:TDateTime;
- procedure InitGrid();
- procedure InitForm();
- function DelData():Boolean;
- procedure ReadINIFile10();
- { Private declarations }
- public
- FFInt,FCloth:Integer;
-
- { Public declarations }
- end;
-
-var
- frmContractDCListChk: TfrmContractDCListChk;
-
-implementation
-uses
- U_DataLink,U_Fun,U_ZDYHelp, U_ZDYHelpSel, U_ConLCInPutDC;
-
-{$R *.dfm}
-
-procedure TfrmContractDCListChk.FormDestroy(Sender: TObject);
-begin
- frmContractDCListChk:=nil;
-end;
-
-procedure TfrmContractDCListChk.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmContractDCListChk.FormCreate(Sender: TObject);
-begin
- canshu1:=Trim(DParameters1);
- canshu2:=Trim(DParameters2);
- canshu3:=Trim(DParameters3);
- cxgrid1.Align:=alClient;
- //BegDate.DateTime:=SGetServerDateTime(ADOQueryTemp)-7;
- //EndDate.DateTime:=SGetServerDateTime(ADOQueryTemp);
- DQdate:=SGetServerDate(ADOQueryTemp);
-end;
-
-procedure TfrmContractDCListChk.TBCloseClick(Sender: TObject);
-begin
- Close;
- WriteCxGrid('ͬ˶',Tv1,'ָʾ');
- WriteCxGrid('ͬϸ',Tv2,'ָʾ');
- WriteCxGrid('ͬSϸ',Tv3,'ָʾ');
-end;
-
-procedure TfrmContractDCListChk.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select ');
- sql.add('SYRName=(select top 1 T.SYRName From JYOrderCon_Main T where T.ConNO=A.ConNo),');
- sql.add('JHDate=(select Top 1 M.DlyDate from JYOrder_Main M where M.OrderNo=A.DCNO),');
- sql.add(' PRTMaoZ=isnull(A.PRTMaoZ,(select Sum(D.CHMZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJIngZ=isnull(A.PRTJIngZ,(select Sum(D.CHJZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJianQty=isnull(A.PRTJianQty,(select Sum(D.QtyJian) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
-
- SQL.ADD(',A.*, ');
- sql.add('LCChuanQ=(select Top 1 B.LCChuanQ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('YiDuanZ=(select Top 1 B.YiDuanZ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('LCQty=(select Sum(C.PRTOrderQty) from JYOrderCon_TT_Sub C where C.TTID in (select B.TTID from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC'')),');
- sql.add('FKPayment=isnull((select Top 1 Payment from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),A.PayMent),');
- sql.Add('YWYZhuLi1=(select Top 1 YWYZhuLi from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),');
- sql.Add('YWY1=(select Top 1 YWY from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0) ');
- sql.Add(' from JYOrderCon_TT A ');
- if Trim(canshu1)='Ȩ' then
- begin
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' where isnull(chkStatus,'''')<>''ͨ'' ');
- end else
- begin
- SQL.Add('where SKDate>='''+FormatDateTime('yyyy-MM-dd',BegDate.DateTime)+'''');
- SQL.Add('and SKDate<'''+FormatDateTime('yyyy-MM-dd',enddate.DateTime+1)+'''');
- sql.Add(' and isnull(chkStatus,'''')=''ͨ'' ');
- end;
- // SQL.Add(' and A.ZuoFeiFlag=0 ');
- end else
- begin
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' where exists(select * from OrdConDanZH_Chk OC where OC.MainId=A.TTId ');
- sql.Add(' and (OC.Chker='''+Trim(DName)+'''');
- sql.Add(' or OC.Chker in(select UserName from User_GongXiang UG where UG.UserId='''+Trim(DCode)+'''))');
- SQL.Add(' and isnull(chkStatus,'''')<>''ͨ'' )');
- sql.Add(' and isnull(chkStatus,'''')<>''ͨ'' and isnull(chkStatus,'''')<>''˲ͨ''');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- SQL.Add('where SKDate>='''+FormatDateTime('yyyy-MM-dd',BegDate.DateTime)+'''');
- SQL.Add('and SKDate<'''+FormatDateTime('yyyy-MM-dd',enddate.DateTime+1)+'''');
- sql.Add(' and( ');
- SQL.Add(' exists(select * from OrdConDanZH_Chk OC where OC.MainId=A.TTId ');
- sql.Add(' and (OC.Chker='''+Trim(DName)+'''');
- sql.Add(' or OC.Chker in(select UserName from User_GongXiang UG where UG.UserId='''+Trim(DCode)+'''))');
- sql.Add(' and isnull(chkStatus,'''')=''ͨ''))');
- end
- else
- begin
- SQL.Add('where SKDate>='''+FormatDateTime('yyyy-MM-dd',BegDate.DateTime)+'''');
- SQL.Add('and SKDate<'''+FormatDateTime('yyyy-MM-dd',enddate.DateTime+1)+'''');
- sql.Add(' and isnull(chkStatus,'''')=''ͨ'' ');
- end;
- end;
- sql.add(' and A.SChkFlag=''1''');
- end;
- SQL.Add(' and A.TTType='''+Trim(canshu2)+''' ');
- sql.add(' Order by A.EditFlag desc');
- Open;
- end;
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- if Order_Main.IsEmpty=False then
- Label5.Caption:=trim(Order_Main.fieldbyname('FKPayMent').AsString);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-
-procedure TfrmContractDCListChk.InitForm();
-begin
- ReadCxGrid('ͬ˶',Tv1,'ָʾ');
- ReadCxGrid('ͬϸ',Tv2,'ָʾ');
- ReadCxGrid('ͬSϸ',Tv3,'ָʾ');
- BegDate.DateTime:=SGetServerDate10(ADOQueryTemp)-7;
- EndDate.DateTime:=SGetServerDate10(ADOQueryTemp);
- Label5.Caption:='';
- InitGrid();
- if Trim(canshu1)='Ȩ' then
- begin
- v1fillcode.Visible:=True;
- end else
- begin
- v1fillcode.Visible:=False;
- end;
-end;
-
-procedure TfrmContractDCListChk.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active=False then Exit;
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
-end;
-
-function TfrmContractDCListChk.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete JYOrderCon_Sub where MainId='''+Trim(Order_Main.fieldbyname('MainId').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete JYOrderCon_Main where MainId='''+Trim(Order_Main.fieldbyname('MainId').AsString)+'''');
- ExecSQL;
- end;
-
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-
-procedure TfrmContractDCListChk.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then Exit;
- SelExportData(Tv1,ADOQueryMain,'б');
-end;
-
-procedure TfrmContractDCListChk.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmContractDCListChk.FormShow(Sender: TObject);
-begin
- InitForm();
-end;
-
-procedure TfrmContractDCListChk.Tv1CellDblClick(
- Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- if ToolButton1.Visible=False then Exit;
- ToolButton1.Click;
-end;
-
-procedure TfrmContractDCListChk.TBTPClick(Sender: TObject);
- var
- FQty,FQty1,FMxQty,FPQty,FMxQtyS,FPQtyS:String;
-begin
-end;
-
-procedure TfrmContractDCListChk.CheckBox1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmContractDCListChk.CheckBox2Click(Sender: TObject);
-begin
- TBRafresh.Click;
-end;
-
-procedure TfrmContractDCListChk.Tv1StylesGetContentStyle(
- Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
- AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
-var
- id,id10:Integer;
-begin
- {try
- if Tv1.GroupedItemCount=0 then
- begin
- Id:=Tv1.GetColumnByFieldName('DeliveryDate').Index-tv1.GroupedItemCount;
- Id10:=Tv1.GetColumnByFieldName('SubStatus').Index-tv1.GroupedItemCount;
- if Trim(VarToStr(ARecord.Values[id]))='' then Exit;
- if Id<0 then Exit;
- if ARecord.Values[id10]='' then exit;
- if (ARecord.Values[id]-DQdate)>=4 then Exit;
- if ((ARecord.Values[id]-DQdate)>=0) and ((ARecord.Values[id]-DQdate)<4) then
- AStyle:=DataLink_.QHuangSe
- else
- if ARecord.Values[id]-DQdate<0 then
- begin
- AStyle:=DataLink_OrderManage.FenHongS;
- end;
- end else
- begin
-
- end;
- except
- end; }
-end;
-
-procedure TfrmContractDCListChk.v1DeliveryDateCustomDrawCell(
- Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
- AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- { Id:=TV1.GetColumnByFieldName('DeliveryDate').Index;//;-TV1.GroupedItemCount;
- Id10:=TV1.GetColumnByFieldName('SubStatus').Index;
- if Id<0 then Exit;
- if AViewInfo.GridRecord.Values[Id10]='' then Exit;
- if AViewInfo.GridRecord.Values[Id]-SGetServerDate(ADOQueryTemp)>=4 then Exit;
- if ((AViewInfo.GridRecord.Values[id]-SGetServerDate10(ADOQueryTemp))>=0) and ((AViewInfo.GridRecord.Values[id]-SGetServerDate(ADOQueryTemp))<4) then
- ACanvas.Brush.Color:=clYellow
- else
- if (AViewInfo.GridRecord.Values[id])-(SGetServerDate10(ADOQueryTemp)<0) then
- begin
- ACanvas.Brush.Color:=clRed;
- end;
- begin
- ACanvas.Brush.Color:=clRed;
- end else
- if AViewInfo.GridRecord.Values[Id]='Purple' then
- begin
- ACanvas.Brush.Color:=clPurple;
- end else
- if AViewInfo.GridRecord.Values[Id]='Olive' then
- begin
- ACanvas.Brush.Color:=clOlive;
- end else
- if AViewInfo.GridRecord.Values[Id]='Teal' then
- begin
- ACanvas.Brush.Color:=clTeal;
- end else
- if AViewInfo.GridRecord.Values[Id]='Background' then
- begin
- ACanvas.Brush.Color:=clBackground;
- end; }
-end;
-
-procedure TfrmContractDCListChk.N1Click(Sender: TObject);
-var
- fPrintFile:string;
- Porderno:string;
-begin
- if Order_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ָʾ10.rmf' ;
- SDofilter(ADOQueryMain,' OrderNoM='''+Trim(Order_Main.fieldbyname('OrderNoM').AsString)+'''');
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- Porderno:=Trim(Order_Main.fieldbyname('OrderNoM').AsString);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['begindate']:=begindate.DateTime;
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- //RMVariables['printer']:=Trim(gUserName);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ָʾ10.rmf'),'ʾ',0);
- end;
- SDofilter(ADOQueryMain,'');
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- Order_Main.Locate('ordernoM',Porderno,[]);
-end;
-
-procedure TfrmContractDCListChk.N2Click(Sender: TObject);
-var
- fPrintFile:string;
- Porderno:string;
-begin
- if Order_Main.IsEmpty then Exit;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ָʾ.rmf' ;
- SDofilter(ADOQueryMain,' OrderNoM='''+Trim(Order_Main.fieldbyname('OrderNoM').AsString)+'''');
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- Porderno:=Trim(Order_Main.fieldbyname('OrderNoM').AsString);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['begindate']:=begindate.DateTime;
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- //RMVariables['printer']:=Trim(gUserName);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ָʾ.rmf'),'ʾ',0);
- end;
- SDofilter(ADOQueryMain,'');
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- Order_Main.Locate('ordernoM',Porderno,[]);
-end;
-
-procedure TfrmContractDCListChk.ToolButton1Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- try
- frmConLCInPutDC:=TfrmConLCInPutDC.Create(Application);
- with frmConLCInPutDC do
- begin
- PState:=1;
- FMainId:=Trim(Self.Order_Main.fieldbyname('TTId').AsString);
- TBSave.Visible:=False;
- ScrollBox1.Enabled:=False;
- if ShowModal=1 then
- begin
-
- end;
- end;
- finally
- frmConLCInPutDC.Free;
- end;
-end;
-
-procedure TfrmContractDCListChk.FPNOChange(Sender: TObject);
-begin
- if ADOQueryMain.Active=False then Exit;
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
-end;
-
-procedure TfrmContractDCListChk.ConNoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key=#13 then
- begin
- if Length(conno.Text)<3 then Exit;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select ');
- sql.add('SYRName=(select Top 1 T.SYRName From JYOrderCon_Main T where T.ConNO=A.ConNo),');
- sql.add('JHDate=(select Top 1 M.DlyDate from JYOrder_Main M where M.OrderNo=A.DCNO),');
- sql.add(' PRTMaoZ=isnull(A.PRTMaoZ,(select Sum(D.CHMZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJIngZ=isnull(A.PRTJIngZ,(select Sum(D.CHJZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJianQty=isnull(A.PRTJianQty,(select Sum(D.QtyJian) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(',A.*, ');
- sql.add('LCChuanQ=(select Top 1 B.LCChuanQ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('YiDuanZ=(select Top 1 B.YiDuanZ from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC''),');
- sql.add('LCQty=(select Sum(C.PRTOrderQty) from JYOrderCon_TT_Sub C where C.TTID in (select B.TTID from JYOrderCon_TT B where B.ConNo=A.ConNo and B.TTType=''LC'')),');
- sql.add('FKPayment=isnull((select Top 1 Payment from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),A.PayMent),');
- sql.Add('YWYZhuLi1=(select Top 1 YWYZhuLi from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),');
- sql.Add('YWY1=(select Top 1 YWY from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0) ');
- sql.Add(' from JYOrderCon_TT A ');
-
- if Trim(canshu1)='Ȩ' then
- begin
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' where isnull(chkStatus,'''')<>''ͨ'' ');
- end else
- begin
- SQL.Add('where A.ConNo like '''+'%'+Trim(ConNo.Text)+'%'+'''');
- sql.Add(' and isnull(chkStatus,'''')=''ͨ'' ');
- end;
- // SQL.Add(' and A.ZuoFeiFlag=0 ');
- end else
- begin
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' where exists(select * from OrdConDanZH_Chk OC where OC.MainId=A.TTId ');
- sql.Add(' and (OC.Chker='''+Trim(DName)+'''');
- sql.Add(' or OC.Chker in(select UserName from User_GongXiang UG where UG.UserId='''+Trim(DCode)+'''))');
- SQL.Add(' and isnull(chkStatus,'''')<>''ͨ'' )');
- sql.Add(' and isnull(chkStatus,'''')<>''ͨ'' and isnull(chkStatus,'''')<>''˲ͨ''');
- end else
- begin
- if cxTabControl1.TabIndex=1 then
- begin
- SQL.Add('where ( ');
- SQL.Add(' exists(select * from OrdConDanZH_Chk OC where OC.MainId=A.TTId ');
- sql.Add(' and (OC.Chker='''+Trim(DName)+'''');
- sql.Add(' or OC.Chker in(select UserName from User_GongXiang UG where UG.UserId='''+Trim(DCode)+'''))');
- sql.Add(' and isnull(chkStatus,'''')=''ͨ''))');
- end
- else
- begin
- SQL.Add('where isnull(chkStatus,'''')=''ͨ'' ');
- end;
- end;
- sql.add(' and A.SChkFlag=''1''');
- sql.add(' and A.ConNo like '''+'%'+Trim(ConNo.Text)+'%'+'''');
-
- end;
- SQL.Add(' and A.TTType='''+Trim(canshu2)+'''');
- //ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
- end;
-end;
-
-procedure TfrmContractDCListChk.Tv1CellClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-var
- maxno:string;
-begin
- if Order_Main.IsEmpty then exit;
- Label5.Caption:=trim(Order_Main.fieldbyname('FKPayMent').AsString);
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- sql.Add(' select * from JYOrderCon_TT_Sub ');
- SQL.Add(' where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Sub);
- SInitCDSData20(ADOQueryTemp,CDS_Sub);
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chk);
- SInitCDSData20(ADOQueryTemp,CDS_Chk);
- { with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from XD_File where CYId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_SC);
- SInitCDSData20(ADOQueryTemp,CDS_SC); }
- EditNote.Text:=trim(Order_Main.fieldbyname('EditNote').AsString);
- label13.Caption:=trim(Order_Main.fieldbyname('LCChuanQ').AsString);
- label11.Caption:=trim(Order_Main.fieldbyname('YiDuanZ').AsString);
- label16.Caption:=trim(floattostr(Order_Main.fieldbyname('LCQty').AsFloat));
-end;
-
-procedure TfrmContractDCListChk.Tv2CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- {if Order_Main.FieldByName('ConFlag1').AsBoolean=False then
- begin
- if CDS_Chk.IsEmpty then Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete OrdCon_Chk where CKID='''+Trim(CDS_Chk.fieldbyname('CKID').AsString)+'''');
- ExecSQL;
- end;
- CDS_Chk.Delete;
- end;}
-end;
-
-procedure TfrmContractDCListChk.ToolButton4Click(Sender: TObject);
-var
- maxno:string;
-begin
- if Order_Main.IsEmpty then Exit;
- if cxTabControl1.TabIndex<>0 then Exit;
- if trim(Order_Main.fieldbyname('ChkStatus').AsString)='' then
- begin
- application.MessageBox('IJͨ','ʾ');
- exit;
- end;
- if Order_Main.FieldByName('SChkFlag').AsBoolean=False then
- begin
- application.MessageBox('û,','ʾ',0);
- exit;
- end;
- if Trim(canshu1)='Ȩ' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select ChkStatus from OrdConDanZH_Chk where MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add(' and Isnull(ChkType,'''')='''' '); //and isnull(ChkStatus,'''')<>''''
- sql.Add(' and isnull(Chker,'''')<>'''+Trim(DName)+'''');
- sql.Add('Group by ChkStatus');
- Open;
- end;
- if ADOQueryTemp.RecordCount>1 then
- begin
- Application.MessageBox('Ȩδͨ!','ʾ',0);
- Exit;
- end else
- if ADOQueryTemp.RecordCount=1 then
- begin
- if Trim(ADOQueryTemp.FieldByName('ChkStatus').AsString)='ͨ' then
- begin
- {with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_Main Set ChkStatus=''ͨ'',ChkTime=getdate() where MainId='''+Trim(Order_Main.fieldbyname('Mainid').AsString)+'''');
- ExecSQL;
- end;}
- end else
- begin
- Exit;
- end;
- end else
- begin
- Exit;
- end;
- end;
-
-
- if Application.MessageBox('ȷҪִд˲','ʾ',32+4)<>IDYES then Exit;
- if Trim(canshu1)='Ȩ' then
- begin
- if CDS_Chk.Locate('Chker',Trim(DName),[])=True then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''ͨ'',ChkTime=getdate(),ChkType=''Ȩ'' where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add('Update OrdConDanZH_Chk Set ChkStatus=''ͨ'',ChkTime=getdate(),chknote='''',ChkType=''Ȩ'' where ');
- sql.Add('MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add(' and Chker='''+Trim(DName)+'''');
- ExecSQL;
- end;
- end else
- begin
- ADOQueryCmd.Connection.BeginTrans;
- if GetLSNo(ADOQueryCmd,maxno,'GK','OrdConDanZH_Chk',4,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!','ʾ',0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('CKID').Value:=Trim(maxno);
- FieldByName('MainID').Value:=Trim(Order_Main.fieldbyname('TTID').AsString);
- FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkStatus').Value:='ͨ';
- FieldByName('ChkType').Value:='Ȩ';
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''ͨ'',ChkTime=getdate(),ChkType=''Ȩ'' ');
- sql.Add(' where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- ExecSQL;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Order_Main.Delete;
- end;
- end else
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- //sql.Add('Update JYOrderCon_Main Set ChkStatus=''ͨ'',ChkTime=getdate() where MainId='''+Trim(Order_Main.fieldbyname('Mainid').AsString)+'''');
- sql.Add('Update OrdConDanZH_Chk Set ChkStatus=''ͨ'',ChkTime=getdate(),chknote='''' where ');
- sql.Add('MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add(' and Chker='''+Trim(DName)+'''');
- ExecSQL;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select ChkStatus from OrdConDanZH_Chk where MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add('Group by ChkStatus');
- Open;
- end;
- if ADOQueryTemp.RecordCount>1 then
- begin
- Order_Main.Delete;
- Exit;
- end else
- if ADOQueryTemp.RecordCount=1 then
- begin
- if Trim(ADOQueryTemp.FieldByName('ChkStatus').AsString)='ͨ' then
- begin
- {with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''ͨ'',ChkTime=getdate() where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- ExecSQL;
- end;}
- end;
- Order_Main.Delete;
- end;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where 1<>1');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chk);
- SInitCDSData20(ADOQueryTemp,CDS_Chk);
-end;
-
-procedure TfrmContractDCListChk.ToolButton2Click(Sender: TObject);
-var
- maxno:string;
-begin
- if Order_Main.IsEmpty then Exit;
- if Trim(canshu1)='Ȩ' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select ChkStatus from OrdConDanZH_Chk where MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add(' and Isnull(ChkType,'''')='''' ');
- sql.Add(' and isnull(Chker,'''')<>'''+Trim(DName)+''' and ChkStatus<>'''' ');
- sql.Add('Group by ChkStatus');
- Open;
- end;
- if ADOQueryTemp.RecordCount>1 then
- begin
- Application.MessageBox('Ȩδͨ!','ʾ',0);
- Exit;
- end else
- if ADOQueryTemp.RecordCount=1 then
- begin
- if Trim(ADOQueryTemp.FieldByName('ChkStatus').AsString)='ͨ' then
- begin
- {with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_Main Set ChkStatus=''ͨ'',ChkTime=getdate() where MainId='''+Trim(Order_Main.fieldbyname('Mainid').AsString)+'''');
- ExecSQL;
- end;}
- end else
- begin
- Exit;
- end;
- end else
- begin
- if Trim(Order_Main.FieldByName('ChkStatus').AsString)<>'' then
- begin
- Exit;
- end;
- end;
- end;
- if Trim(canshu1)<>'Ȩ' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrderCon_TT where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('ChkType').AsString)='Ȩ' then
- begin
- if Trim(ADOQueryTemp.fieldbyname('ChkStatus').AsString)='ͨ' then
- begin
- Application.MessageBox('Ȩ!','ʾ',0);
- Exit;
- end;
- end;
- end;
-
- Panel4.Visible:=True;
- ChkNote.Text:=trim(EditNote.Text);
-end;
-
-procedure TfrmContractDCListChk.Panel10MouseMove(Sender: TObject;
- Shift: TShiftState; X, Y: Integer);
-begin
- ReleaseCapture;
- TWinControl(Panel4).Perform(WM_SYSCOMMAND,$F012,0);
-end;
-
-procedure TfrmContractDCListChk.Image2Click(Sender: TObject);
-begin
- Panel4.Visible:=false;
-end;
-
-procedure TfrmContractDCListChk.Button1Click(Sender: TObject);
-var
- maxno:string;
-begin
- if Trim(ChkNote.Text)='' then
- begin
- Application.MessageBox('˱עΪ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִд˲','ʾ',32+4)<>IDYES then Exit;
- if Trim(canshu1)='Ȩ' then
- begin
- if CDS_Chk.Locate('Chker',Trim(DName),[])=True then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''˲ͨ'',EditFlag='''',ChkTime=getdate(),chknote='''',ChkType=''Ȩ'',SChkFlag=0 where TTId='''+Trim(Order_Main.fieldbyname('TTid').AsString)+'''');
- sql.Add('Update OrdConDanZH_Chk Set ChkStatus=''˲ͨ'',ChkTime=getdate(),ChkType=''Ȩ'',ChkNote='''+Trim(ChkNote.Text)+'''');
- sql.Add(' where MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add(' and Chker='''+Trim(DName)+'''');
- ExecSQL;
- end;
- CDS_Chk.Locate('Chker',Trim(DName),[]);
- with CDS_Chk do
- begin
- Edit;
- //FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkStatus').Value:='˲ͨ';
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- FieldByName('ChkNOte').Value:=Trim(ChkNote.Text);
- Post;
- end;
- end else
- begin
- ADOQueryCmd.Connection.BeginTrans;
- if GetLSNo(ADOQueryCmd,maxno,'GK','OrdConDanZH_Chk',4,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!','ʾ',0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('CKID').Value:=Trim(maxno);
- FieldByName('MainID').Value:=Trim(Order_Main.fieldbyname('TTID').AsString);
- FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- FieldByName('ChkStatus').Value:='˲ͨ';
- FieldByName('ChkNote').Value:=Trim(ChkNote.Text);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''˲ͨ'',EditFlag='''',ChkTime=getdate(),chknote='''',SChkFlag=0 where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- ExecSQL;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Order_Main.Delete;
- with CDS_Chk do
- begin
- Append;
- FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkStatus').Value:='˲ͨ';
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- FieldByName('ChkNOte').Value:=Trim(ChkNote.Text);
- Post;
- end;
- end;
- end else
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''˲ͨ'',EditFlag='''',ChkTime=getdate(),SChkFlag=0 where TTId='''+Trim(Order_Main.fieldbyname('TTid').AsString)+'''');
- sql.Add('Update OrdConDanZH_Chk Set ChkStatus=''˲ͨ'',ChkTime=getdate() ,ChkNote='''+Trim(ChkNote.Text)+'''');
- sql.Add(' where MainId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- sql.Add(' and Chker='''+Trim(DName)+'''');
- ExecSQL;
- end;
- with CDS_Chk do
- begin
- Edit;
- //FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkStatus').Value:='˲ͨ';
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- FieldByName('ChkNOte').Value:=Trim(ChkNote.Text);
- Post;
- end;
- Order_Main.Delete;
-
- end;
- if cxTabControl1.TabIndex=1 then
- begin
- Order_Main.Delete;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where 1<>1');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chk);
- SInitCDSData20(ADOQueryTemp,CDS_Chk);
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrderCon_TT where 1<>1');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Sub);
- SInitCDSData20(ADOQueryTemp,CDS_Sub);
- end;
- Panel4.Visible:=False;
-end;
-
-procedure TfrmContractDCListChk.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
- if Order_Main.IsEmpty then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdCon_Chk where 1<>1');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chk);
- SInitCDSData20(ADOQueryTemp,CDS_Chk);
- end;
-end;
-
-procedure TfrmContractDCListChk.FPNOKeyPress(Sender: TObject;
- var Key: Char);
-begin
- if Key=#13 then
- begin
- {if Length(FPNO.Text)<3 then Exit;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- SQL.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrderCon_TT A where 1=1 ');
- sql.Add(' and FPNO like '''+'%'+Trim(FPNO.Text)+'%'+'''');
- sql.Add(' and TTType='''+Trim(DParameters2)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end; }
- end;
-end;
-
-procedure TfrmContractDCListChk.ToolButton3Click(Sender: TObject);
-var
- maxno:string;
- FCount:Integer;
-begin
- if Order_Main.IsEmpty then exit;
- if Trim(canshu1)='Ȩ' then
- begin
- ADOQueryCmd.Connection.BeginTrans;
- if GetLSNo(ADOQueryCmd,maxno,'GS','OrdConDanZH_Chk',4,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!','ʾ',0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where 1=2');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('CKID').Value:=Trim(maxno);
- FieldByName('MainID').Value:=Trim(Order_Main.fieldbyname('TTID').AsString);
- FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- FieldByName('ChkStatus').Value:='';
- FieldByName('ChkType').Value:='Ȩ';
- //FieldByName('ChkNote').Value:=Trim(ChkNote.Text);
- Post;
- end;
- {with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set ChkStatus=''˲ͨ'',ChkTime=getdate(),chknote='''' where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- ExecSQL;
- end; }
- ADOQueryCmd.Connection.CommitTrans;
- //Order_Main.Delete;
-
- with CDS_Chk do
- begin
- Append;
- FieldByName('Chker').Value:=Trim(DName);
- FieldByName('ChkStatus').Value:='';
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- FieldByName('ChkType').Value:='Ȩ';
- Post;
- end;
- end else
- begin
- if Trim(Order_Main.fieldbyname('ChkStatus').AsString)='ͨ' then
- begin
- Application.MessageBox('ͨ!','ʾ',0);
- Exit;
- end;
- {if CDS_Chk.Locate('Chker',Trim(DName),[])=False then
- begin
- Exit;
- end;}
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Chker=Cast('''' as varchar(20))');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp,CDS_Chker);
- SInitCDSData20(ADOQueryTemp,CDS_Chker);
- while CDS_Chker.IsEmpty=False do
- begin
- CDS_Chker.Delete;
- end;
- try
- frmZDYHelpSel:=TfrmZDYHelpSel.Create(Application);
- with frmZDYHelpSel do
- begin
- flag:='OrdConChkerLC';
- flagname:='LC';
- MainType:=Trim(DName);
- if ShowModal=1 then
- begin
- with ClientDataSet1 do
- begin
- First;
- while not Eof do
- begin
- if FieldByName('SSEl').AsBoolean=True then
- begin
- CDS_Chker.Append;
- CDS_Chker.FieldByName('Chker').Value:=Trim(ClientDataSet1.fieldbyname('ZdyName').AsString);
- CDS_Chker.Post;
- end;
- Next;
- end;
- end;
- if CDS_Chker.IsEmpty then FCount:=9
- end;
- end;
- finally
- frmZDYHelpSel.Free;
- end;
- if FCount=9 then
- begin
- if CDS_Chker.IsEmpty then
- begin
- Application.MessageBox('ûѡ!','ʾ',0);
- Exit;
- end;
- end;
- if CDS_Chker.IsEmpty then Exit;
- CDS_Chker.DisableControls;
- with CDS_Chker do
- begin
- First;
- while not eof do
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from SY_User where UserName='''+Trim(CDS_Chker.fieldbyname('Chker').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- CDS_Chker.EnableControls;
- Application.MessageBox('˶!','ʾ',0);
- Exit;
- end;
- Next;
- end;
- end;
- CDS_Chker.EnableControls;
-
- if Application.MessageBox('ȷҪִд˲','ʾ',32+4)<>IDYES then Exit;
- //if CDS_Chk.IsEmpty then
- try
- ADOQueryCmd.Connection.BeginTrans;
- {with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrderCon_TT Set SChkFlag=1,SChkTime=getdate() where TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- ExecSQL;
- end;
- with Order_Main do
- begin
- Edit;
- FieldByName('SChkFlag').Value:=1;
- Post;
- end; }
- if CDS_Chk.Locate('Chker',Trim(DName),[])=True then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update OrdConDanZH_Chk Set Chkstatus='''',ChkTime=getdate() where CKID='''+Trim(CDS_Chk.fieldbyname('CKID').AsString)+'''');
- ExecSQL;
- end;
- with CDS_Chk do
- begin
- Edit;
- FieldByName('Chkstatus').Value:='';
- FieldByName('ChkTime').Value:=SGetServerDateTime(ADOQueryTemp);
- Post;
- end;
- end;
- with CDS_Chker do
- begin
- First;
- while not Eof do
- begin
- if CDS_Chk.Locate('Chker',Trim(CDS_Chker.fieldbyname('Chker').AsString),[])=False then
- begin
- if GetLSNo(ADOQueryCmd,maxno,'CK','OrdConDanZH_Chk',4,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!','ʾ',0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from OrdConDanZH_Chk where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('CKID').Value:=Trim(maxno);
- FieldByName('MainID').Value:=Trim(Order_Main.fieldbyname('TTID').AsString);
- FieldByName('Chker').Value:=Trim(CDS_Chker.fieldbyname('Chker').AsString);
- Post;
- end;
- with CDS_Chk do
- begin
- Append;
- FieldByName('Chker').Value:=Trim(CDS_Chker.fieldbyname('Chker').AsString);
- Post;
- end;
- end;
-
- Next;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧ!','ʾ',0);
- end;
-
- end;
-end;
-
-procedure TfrmContractDCListChk.TBDelChkerClick(Sender: TObject);
-begin
- {if Trim(CDS_Chk.fieldbyname('ChkStatus').AsString)<>'' then
- begin
- Application.MessageBox('˲ɾ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ','ʾ',32+4)<>IDYES then Exit;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('delete OrdConDanZH_Chk where CKID='''+Trim(CDS_Chk.fieldbyname('CKID').AsString)+'''');
- ExecSQL;
- end;
- CDS_Chk.Delete;}
-end;
-procedure TfrmContractDCListChk.ReadINIFile10();
-var
- programIni:Tinifile; //ļ
- FileName:string;
-begin
- FileName:=ExtractFilePath(Paramstr(0))+'SYSTEMSET.INI';
- programIni:=Tinifile.create(FileName);
- server:=programIni.ReadString('SERVER','ַ','127.0.0.1');
- programIni.Free;
-end;
-
-procedure TfrmContractDCListChk.TvSCCellDblClick(
- Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-var
- fHandle:THandle;
- FInt:Integer;
- FFName,FFName10,FPath:String;
-begin
- if CDS_SC.IsEmpty then Exit;
- Panel3.Visible:=True;
- Panel3.Refresh;
- try
- ReadINIFile10();
- server:=ReadINIFileStr('SYSTEMSET.INI','SERVER','ַ','127.0.0.1');
- if Length(server)<6 then
- begin
- server:='127.0.0.1';
- end;
- IdFTP1.Host :=server;//PicSvr;
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- IdFTP1.Quit;
- Application.MessageBox('ӵļ飡', 'ʾ', MB_ICONWARNING);
- Exit;
- end;
- FPath:='D:\Right1209\';
- if not DirectoryExists(ExtractFileDir(FPath)) then
- CreateDir(ExtractFileDir(FPath));
- FFName:=Trim(CDS_SC.fieldbyname('XFID').AsString)+Trim(CDS_SC.fieldbyname('HZStr').AsString);
- FPath:=FPath+FFName;
- if FileExists(FPath)=false then
- begin
- IdFTP1.Get('LC\'+FFName,FPath);
- end;
- Panel3.Visible:=False;
- if IdFTP1.Connected then IdFTP1.Quit;
- ShellExecute(Handle, 'open',PChar(FPath),'', '', SW_SHOWNORMAL);
-
-end;
-
-procedure TfrmContractDCListChk.TSureClick(Sender: TObject);
-var
- fPrintFile,FTaiTou:string;
- EngMoney:string;
-begin
- if Order_Main.IsEmpty then Exit;
- if Trim(Order_Main.FieldByName('ChkStatus').AsString)<>'ͨ' then
- begin
- RM1.PreviewButtons:=[pbExit];
- end else
- begin
- RM1.PreviewButtons:=[pbZoom,pbLoad,pbSave,pbPrint,pbFind,pbPageSetup,pbExit,pbExport,pbNavigator];
- end;
- fPrintFile:= ExtractFilePath(Application.ExeName) + 'Report\ָʾ.rmf';
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- SQL.Add('select B.PRTPrice, ');
- sql.Add('YWYZhuLi=(select Top 1 YWYZhuLi from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0),');
- sql.Add('YWY=(select Top 1 YWY from JYOrderCon_Main JRM where JRM.ConNO=A.ConNo and JRM.ZuoFeiFlag=0), ');
- sql.add(' PRTMaoZ=isnull(A.PRTMaoZ,(select Sum(D.CHMZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,PRTJIngZ=isnull(A.PRTJIngZ,(select Sum(D.CHJZ) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0))');
- sql.add(' ,SumPRTQty=(select Sum(D.Qty) from JYOrderCon_Main E inner join JYOrderCon_Sub C on C.Mainid=E.Mainid Inner join JYOrder_CR D on D.ConSubid=C.Subid where E.conNo=A.conNo and isnull(D.CRFlag,'''')='''' and E.ZuoFeiFlag=0)');
- sql.Add(' ,A.*,B.*');
- sql.Add(' from JYOrderCon_TT A');
- sql.Add('left join JYOrderCon_TT_Sub B on A.TTID=B.TTID');
- sql.Add(' where A.TTId='''+Trim(Order_Main.fieldbyname('TTId').AsString)+'''');
- Open;
- end;
- SCreateCDS20(ADOQueryPrint,CDS_Print);
- SInitCDSData20(ADOQueryPrint,CDS_Print);
- if FileExists(fPrintFile) then
- begin
- if iftt.Checked=true then
- FTaiTou:='SHAOXING MNC IMP & EXP CO.,LTD'
- else
- FTaiTou:='';
- RMVariables['Taitou']:=trim(TaiTou.Text);
- RMVariables['FTaiTou']:=trim(FTaiTou);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end else
- begin
- Application.MessageBox(PChar('û'+ExtractFilePath(Application.ExeName)+'Report\ָʾ.rmf'),'ʾ',0);
- end;
-end;
-
-procedure TfrmContractDCListChk.TBPrintClick(Sender: TObject);
-begin
- if Order_Main.IsEmpty then exit;
- TaiTou.Text:=trim(Order_Main.fieldbyname('SYRName').AsString);
- Panel5.Visible:=true;
-end;
-
-procedure TfrmContractDCListChk.Image1Click(Sender: TObject);
-begin
- panel5.Visible:=False;
-end;
-
-procedure TfrmContractDCListChk.TaiTouBtnClick(Sender: TObject);
-begin
- frmZDYHelp:=TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag:='Taitou1';
- flagname:='˾̧ͷ';
- if ShowModal=1 then
- begin
- Taitou.Text:=Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- free;
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DCDList_Sel.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DCDList_Sel.dfm
deleted file mode 100644
index 751613f..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DCDList_Sel.dfm
+++ /dev/null
@@ -1,536 +0,0 @@
-object frmDCDList_Sel: TfrmDCDList_Sel
- Left = 195
- Top = 125
- Width = 1121
- Height = 593
- Caption = #35746#33329#21333#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1105
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object ToolButton3: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #36873#25321
- ImageIndex = 31
- OnClick = ToolButton3Click
- end
- object ToolButton1: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1105
- Height = 77
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 23
- Top = 18
- Width = 52
- Height = 12
- Caption = #26597#35810#26085#26399
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 176
- Top = 45
- Width = 52
- Height = 12
- Caption = #25351#31034#21333#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 176
- Top = 18
- Width = 52
- Height = 12
- Caption = #35746#33329#21333#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 328
- Top = 45
- Width = 39
- Height = 12
- Caption = #30446#30340#28207
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 341
- Top = 18
- Width = 26
- Height = 12
- Caption = #23458#25143
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BegDate: TDateTimePicker
- Left = 76
- Top = 14
- Width = 85
- Height = 20
- Date = 40675.464742650460000000
- Format = 'yyyy-MM-dd'
- Time = 40675.464742650460000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 76
- Top = 40
- Width = 86
- Height = 20
- Date = 40675.464761099540000000
- Format = 'yyyy-MM-dd'
- Time = 40675.464761099540000000
- TabOrder = 1
- end
- object zorderno: TEdit
- Tag = 2
- Left = 230
- Top = 40
- Width = 83
- Height = 20
- TabOrder = 2
- OnChange = DCNOChange
- OnKeyPress = DCNOKeyPress
- end
- object DCNO: TEdit
- Tag = 2
- Left = 231
- Top = 14
- Width = 81
- Height = 20
- TabOrder = 3
- OnChange = DCNOChange
- OnKeyPress = DCNOKeyPress
- end
- object TOPlace: TEdit
- Tag = 2
- Left = 371
- Top = 40
- Width = 83
- Height = 20
- TabOrder = 4
- OnChange = DCNOChange
- OnKeyPress = DCNOKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 372
- Top = 14
- Width = 81
- Height = 20
- TabOrder = 5
- OnChange = DCNOChange
- OnKeyPress = DCNOKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 109
- Width = 1105
- Height = 445
- Align = alClient
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- PopupMenu = PopupMenu1
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column14: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 44
- end
- object v1Column1: TcxGridDBColumn
- Caption = #35746#33329
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 70
- end
- object v1ConNo: TcxGridDBColumn
- Caption = #25253#20851
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 73
- end
- object v1Column3: TcxGridDBColumn
- Caption = #35746#33329#21333#32534#21495
- DataBinding.FieldName = 'DCNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 91
- end
- object v1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'GSNAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 71
- end
- object v1Column12: TcxGridDBColumn
- Caption = #20986#36816#26085#26399
- DataBinding.FieldName = 'CYDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 67
- end
- object v1Column21: TcxGridDBColumn
- Caption = #21457#31080#21495#30721
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 90
- end
- object v1OrdPerson1: TcxGridDBColumn
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'ZORDERNO'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 78
- end
- object v1CustomerNoName: TcxGridDBColumn
- Caption = #23458#25143
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 76
- end
- object v1Column2: TcxGridDBColumn
- Caption = #35013#36816#28207
- DataBinding.FieldName = 'FromPlace'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 74
- end
- object v1Column10: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'TOPlace'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 72
- end
- object v1Column7: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'HDName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 91
- end
- object v1Column13: TcxGridDBColumn
- Caption = #33337#20844#21496
- DataBinding.FieldName = 'ChuanInfo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 70
- end
- object v1Column6: TcxGridDBColumn
- Caption = #35013#31665#20449#24687
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 92
- end
- object v1Column17: TcxGridDBColumn
- Caption = #24635#25968#37327
- DataBinding.FieldName = 'ZQTY'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 73
- end
- object v1Column18: TcxGridDBColumn
- Caption = #24635#37329#39069
- DataBinding.FieldName = 'ZMONEY'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 63
- end
- object v1Column19: TcxGridDBColumn
- Caption = #24635#25910#36141#37329#39069
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 106
- end
- object v1Column20: TcxGridDBColumn
- Caption = #24635#27611#37325
- DataBinding.FieldName = 'ZMAOZHONG'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 75
- end
- object v1Column9: TcxGridDBColumn
- Caption = #24635#20928#37325
- DataBinding.FieldName = 'ZJINGZHONG'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 61
- end
- object v1Column8: TcxGridDBColumn
- Caption = #24635#20307#31215
- DataBinding.FieldName = 'ZTIJI'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 103
- end
- object v1FKPayment: TcxGridDBColumn
- Caption = #24635#20214#25968
- DataBinding.FieldName = 'ZBZJS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1YJDCDate: TcxGridDBColumn
- Caption = #22791#22949#26085#26399
- DataBinding.FieldName = 'BTDATE'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 87
- end
- object v1YJSHDate: TcxGridDBColumn
- Caption = #36816#36153#25215#20184
- DataBinding.FieldName = 'YFCF'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Focusing = False
- Width = 84
- end
- object v1EditNote: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'YSFS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1EditSQTime: TcxGridDBColumn
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'FILLTIME'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.SaveTime = False
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1LCChuanQ: TcxGridDBColumn
- Caption = #21046#21333#20154
- DataBinding.FieldName = 'FILLER'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object v1YiDuanZ: TcxGridDBColumn
- Caption = #19979#19968#27493#25805#20316#21592
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 83
- end
- object v1LCQty: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'NOTE'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 500
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 544
- Top = 176
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 576
- Top = 280
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 552
- Top = 216
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 312
- Top = 248
- end
- object DataSource1: TDataSource
- DataSet = Order_Main
- Left = 440
- Top = 184
- end
- object Order_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 464
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBMain
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 336
- Top = 200
- ReportData = {}
- end
- object RMDBMain: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 392
- Top = 200
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 528
- Top = 280
- end
- object PopupMenu1: TPopupMenu
- Left = 288
- Top = 184
- object N2: TMenuItem
- Caption = #26377#20379#24212#21830
- end
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 360
- Top = 240
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 344
- Top = 288
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DCDList_Sel.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DCDList_Sel.pas
deleted file mode 100644
index 467b81e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DCDList_Sel.pas
+++ /dev/null
@@ -1,240 +0,0 @@
-unit U_DCDList_Sel;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData,
- cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ADODB,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxGrid, DBClient, cxCheckBox, cxCalendar, cxSplitter, RM_Dataset, RM_System,
- RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmDCDList_Sel = class(TForm)
- ToolBar1: TToolBar;
- TBClose: TToolButton;
- Panel1: TPanel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- Order_Main: TClientDataSet;
- RM1: TRMGridReport;
- RMDBMain: TRMDBDataSet;
- RMXLSExport1: TRMXLSExport;
- PopupMenu1: TPopupMenu;
- N2: TMenuItem;
- ADOQueryPrint: TADOQuery;
- CDS_Print: TClientDataSet;
- ToolButton3: TToolButton;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column14: TcxGridDBColumn;
- v1Column1: TcxGridDBColumn;
- v1ConNo: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- v1Column12: TcxGridDBColumn;
- v1Column21: TcxGridDBColumn;
- v1OrdPerson1: TcxGridDBColumn;
- v1CustomerNoName: TcxGridDBColumn;
- v1Column2: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- v1Column17: TcxGridDBColumn;
- v1Column18: TcxGridDBColumn;
- v1Column19: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column8: TcxGridDBColumn;
- v1FKPayment: TcxGridDBColumn;
- v1YJDCDate: TcxGridDBColumn;
- v1YJSHDate: TcxGridDBColumn;
- v1EditNote: TcxGridDBColumn;
- v1EditSQTime: TcxGridDBColumn;
- v1LCChuanQ: TcxGridDBColumn;
- v1YiDuanZ: TcxGridDBColumn;
- v1LCQty: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- Label1: TLabel;
- Label4: TLabel;
- Label2: TLabel;
- Label3: TLabel;
- Label5: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- zorderno: TEdit;
- DCNO: TEdit;
- TOPlace: TEdit;
- KHName: TEdit;
- ToolButton1: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure OrderNoKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton1Click(Sender: TObject);
- procedure DCNOChange(Sender: TObject);
- procedure DCNOKeyPress(Sender: TObject; var Key: Char);
- private
- DQdate: TDateTime;
- procedure InitGrid();
- procedure InitForm();
- { Private declarations }
- public
- FFInt, FCloth: Integer;
-
- { Public declarations }
- end;
-
-var
- frmDCDList_Sel: TfrmDCDList_Sel;
-
-implementation
-
-uses
- U_DataLink, U_Fun;
-
-{$R *.dfm}
-
-procedure TfrmDCDList_Sel.FormDestroy(Sender: TObject);
-begin
- frmDCDList_Sel := nil;
-end;
-
-procedure TfrmDCDList_Sel.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmDCDList_Sel.FormCreate(Sender: TObject);
-begin
- cxgrid1.Align := alClient;
-end;
-
-procedure TfrmDCDList_Sel.TBCloseClick(Sender: TObject);
-begin
- Close;
- WriteCxGrid('ָʾбѡ', Tv1, 'ָʾ');
-end;
-
-procedure TfrmDCDList_Sel.InitGrid();
-begin
-// if Length(Trim(self.ConNO.Text)) < 3 then
-// Exit;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select ');
- sql.Add('A.*');
- SQL.Add(',GSNAME=''֯''');
- SQL.Add(',ZORDERNO=CAST((SELECT STUFF(( SELECT '','' +convert(VARCHAR, FROMORDERNO) FROM JYOrderCon_TT_Sub B WHERE A.TTID=B.TTId FOR XML PATH('''')), 1, 1, '''') )AS VARCHAR)');
- SQL.Add(',ZQTY=(SELECT SUM(PRTORDERQTY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMONEY=(SELECT SUM(MONEY) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZMAOZHONG=(SELECT SUM(MAOZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZJINGZHONG=(SELECT SUM(JINGZHONG) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZTIJI=(SELECT SUM(tiji) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- SQL.Add(',ZBZJS=(SELECT SUM(BZJS) FROM JYOrderCon_TT_Sub C WHERE A.TTID=C.TTId)');
- sql.Add(' from JYOrderCon_TT A ');
- SQL.Add('where ((FILLTIME>=''' + FormatDateTime('yyyy-MM-dd', BegDate.DateTime) + '''');
- SQL.Add('and FILLTIME<''' + FormatDateTime('yyyy-MM-dd', enddate.DateTime + 1) + ''') or ChkStatus=''˲ͨ'') ');
-
- if DCNO.Text <> '' then
- begin
- SQL.Add('AND dcno like' + quotedstr('%' + trim(DCNO.text) + '%'));
- end;
- if KHName.Text <> '' then
- begin
- SQL.Add('AND KHName like' + quotedstr('%' + trim(KHName.text) + '%'));
- end;
- if zorderno.Text <> '' then
- begin
- SQL.Add('AND CAST((SELECT STUFF(( SELECT '','' +convert(VARCHAR, FROMORDERNO) FROM JYOrderCon_TT_Sub B WHERE A.TTID=B.TTId FOR XML PATH('''')), 1, 1, '''') )AS VARCHAR) like' + quotedstr('%' + trim(zorderno.text) + '%'));
- end;
- if TOPlace.Text <> '' then
- begin
- SQL.Add('AND TOPlace like' + quotedstr('%' + trim(TOPlace.text) + '%'));
- end;
-// else if cxTabControl1.TabIndex = 1 then
-// begin
-// SQL.Add('AND ISNULL(SChkFlag,0)=1 AND ISNULL(ChkStatus,0)=0 ');
-// end
-// else if cxTabControl1.TabIndex = 2 then
-// begin
-// SQL.Add(' AND ChkStatus=1 ');
-// end;
-//ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmDCDList_Sel.InitForm();
-begin
- BegDate.DateTime := SGetServerDate10(ADOQueryTemp) - 90;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- ReadCxGrid('ָʾбѡ', Tv1, 'ָʾ');
- InitGrid();
-end;
-
-procedure TfrmDCDList_Sel.FormShow(Sender: TObject);
-begin
- InitForm();
-end;
-
-procedure TfrmDCDList_Sel.ToolButton3Click(Sender: TObject);
-begin
- ModalResult := 1;
-end;
-
-procedure TfrmDCDList_Sel.OrderNoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmDCDList_Sel.ToolButton1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmDCDList_Sel.DCNOChange(Sender: TObject);
-begin
-
-// InitGrid();
-// if ADOQueryMain.Active then
-// begin
-// SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
-// SCreateCDS20(ADOQueryMain, Order_Main);
-// SInitCDSData20(ADOQueryMain, Order_Main);
-// end;
-end;
-
-procedure TfrmDCDList_Sel.DCNOKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DataLink.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DataLink.dfm
deleted file mode 100644
index 78038c4..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DataLink.dfm
+++ /dev/null
@@ -1,17985 +0,0 @@
-object DataLink_DDMD: TDataLink_DDMD
- OldCreateOrder = False
- OnDestroy = DataModuleDestroy
- Left = 343
- Top = 231
- Height = 349
- Width = 482
- object AdoDataLink: TADOQuery
- Connection = ADOLink
- Parameters = <>
- Left = 136
- Top = 8
- end
- object ADOLink: TADOConnection
- LoginPrompt = False
- Left = 48
- Top = 8
- end
- object ThreeImgList: TImageList
- Height = 24
- Width = 24
- Left = 48
- Top = 96
- Bitmap = {
- 494C01018900F000040018001800FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
- 000000000000360000002800000060000000A005000001002000000000000070
- 0800000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F800000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A5004F69BE004F69BE004F69BE000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00506CCA00173CB900506CCA000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A9897004F6ED5001740C9004F6ED5000000000000000000000000000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 0000000000000000000000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA006885E7006885
- E7006885E7001C4BE8001948E8001C4BE8006885E7006885E7006885E7000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 00000000000000000000000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE006A8AF3004A70
- F0004A70F0002957EE002957EE002957EE004A70F0004A70F0006A8AF3000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 000000000000000000000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF007F99ED007F99
- ED007F99ED003B64EF003B64EF003E67F0007F99ED007F99ED007F99ED000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB008EA6F6006989F3008EA6F6000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 000000000000000000000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4009AAFF700829CF5009AAFF7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F00ADBDF400ADBDF400ADBDF4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000008195DB0028397300283973002839
- 7300283973002839730028397300283973002839730028397300283973002839
- 7300283973002839730028397300283973002839730028397300283973002839
- 73002839730028397300283973007287D2000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000A4B3E50031437F002B38
- 680026335B002B396C008E9FD400C0C0C000C1C1C100C7C7C700C8C8C800D5D5
- D500DADADA000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CACACA00596FB9003E5194003E51
- 94003E5194003E5194003E5194003D5092003B4D8B00384A860034447C003241
- 77002F3E71002A3867002936620040529200C3C3C300DBDBDB00000000000000
- 0000000000000000000000000000000000002D3E7C00092EAA000429A7000429
- A7000429A7000429A7000429A7000429A7000429A7000429A7000429A7000429
- A7000429A7000429A7000429A7000429A7000429A7000429A7000429A7000429
- A7000429A7000429A7003B57B400354682000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000536AB6007089DA005570
- CD003E5ABA00566EBC0047589200B7C5F1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005E72B6008DA1E40090A5
- EB008DA3ED008BA2ED00879EEB008199E9007E96E4007B92E000758CD7007187
- D1006E84CC00687CC0006F7FB7004D5B8A000000000000000000000000000000
- 0000000000000000000000000000000000004057A7002345B600042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042AAA000328
- A300042AAA00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC004157A200334A9300374E9A002C3E7D002C3E7D002C3E
- 7D002C3E7D002C3E7D00374E9A0000000000374E9A002C3E7D002C3E7D002C3E
- 7D002C3E7D002C3E7D00374E9A0000000000374E9A002C3E7D002C3E7D002C3E
- 7D002C3E7D002C3E7D00374E9A0000000000000000006782DF006983DC00617C
- D6004461C2003A57B800576EBC00283A7700B7C5F10000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000008AA0EB00829CF5007995
- F4007290F4006989F3006082F2004C71ED004469E6003A5FDE00274DCD001D43
- C300143AB9000328A3003652AF006E7EB7000000000000000000000000000000
- 000000000000000000000000000000000000A7B7ED00435EBA00153AB7000930
- B3000930B3000930B3000930B3000930B3000930B3000930B3008191C600FFFF
- FF00FFFFFF000930B3000930B3000930B3000930B3000930B3000930B3000930
- B3000930B3000F35B5003D4F8D008499DF0033478A004F6CCC004F6CCC004F6C
- CC004F6CCC00657FD30033478A000000000033478A00657FD3004F6CCC004F6C
- CC004F6CCC00657FD30033478A000000000033478A00657FD3004F6CCC004F6C
- CC004F6CCC004F6CCC0033478A0000000000000000006F8AE5007891E300758E
- DF005873CF004663C3003A57B80047589300283B7800B7C5F100000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000096AAEE0093AAF60096AC
- F700829DF5007894F4006D8CF3005679EE004B6FE7004166DF002C51CE002146
- C400163BBA000328A30003269B00687CBE000000000000000000000000000000
- 000000000000000000000000000000000000000000003A4E93004E69C0002449
- C500163DC100163DC100163DC100163DC100163DC100153AB800FFFFFF00FFFF
- FF00FFFFFF00153AB800163DC100163DC100163DC100163DC100163DC100163D
- C1001F45C4004E69C600A8B7EE00000000004158A7001B47D800204BD900224C
- D9001B47D800829AE9004158A700000000004158A700829AE900204BD900224C
- D900204BD900829AE9004158A700000000004158A700829AE9001B47D800224C
- D900204BD9001B47D8004158A7000000000000000000778ACD009EB0EF00829A
- E800778FE00096A8E3008292C800344EA200576EBC0048599300B7C5F1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000097ABEE0097ADF70097AD
- F700829DF5007894F4006D8CF3005679EE00000000007A94E8002C51CE002146
- C400163BBA000328A30003269B00687CBE000000000000000000000000000000
- 00000000000000000000000000000000000000000000617ACE004E61A5004666
- D0001D44C9001D44C9001D44C9001D44C9001D44C9001C43C500A8B4DC00FFFF
- FF00FFFFFF001D44C9001D44C9001D44C9001D44C9001D44C9001D44C9001D44
- C9003E60D0005066AD0000000000000000004961B6002D58E7003861E9003A62
- E9002C57E7009BAFF3004961B600000000004961B6009BAFF3003861E9003A62
- E900365FE8009BAFF3004961B600000000004961B6009BAFF3002D58E7003A62
- E900365FE8002C57E7004961B60000000000000000003F59B0007E90D000A1B3
- EF00839AE5008A96BD00B3C0EB00384F9C00344EA200576EBC002A3D7900B7C5
- F100000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000099ADEE0098AEF70097AD
- F700829DF5007894F4006D8CF3005679EE00000000007A94E8002C51CE002146
- C400163BBA000328A30003269B00687CBE000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003A53A1005A73
- C600234ACF00234ACF00234ACF00234ACF00234ACF00234ACF001C3CA6004660
- B6004660B600234ACF00234ACF00234ACF00234ACF00234ACF00234ACF002F54
- D2005974CB003E549E0000000000000000004F69C0003C65EF00496FF0004C72
- F1003A64EF00A9BBF8004F69C000000000004F69C000A9BBF800496FF0004C72
- F100476EF000A9BBF8004F69C000000000004F69C000A9BBF8003C65EF004C72
- F100476EF0003A64EF004F69C0000000000000000000BECCF5004059B0007F92
- D100849BE8004E5C8A008A96BD008292C800384F9C00344EA200495A93002B3D
- 7A00B7C5F1000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000009AAEEF0098AEF70097AD
- F700829DF5007894F4006D8CF30011172D0000000000161B2B002C51CE002146
- C400163BBA000328A30003269B00687CBE000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000455E
- B200476ADF003158DB003158DB003158DB003158DB003158DB0092A2D700FFFF
- FF00FFFFFF003158DB003158DB003158DB003158DB003158DB003158DB00657E
- D0004159AB000000000000000000000000005770C700BBC9F600BECBF700BFCC
- F600BAC8F600B5C4F5005770C700000000005770C700B5C4F500BECBF700BFCC
- F600BECBF700B5C4F5005770C700000000005770C700B5C4F500BBC9F600BFCC
- F600BECBF700BAC8F6005770C70000000000000000000000000000000000BECC
- F5008093D100A2B4EF006576AF008A96BD00B3C0EB008292C800344EA200566E
- BC00495A9500B7C5F10000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000099ADF00097ADF70097AD
- F700829DF5007894F4006D8CF3001F1F1F000C0C0C001F1F1F002C51CE002146
- C400163BBA000328A30003269B00687CBE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000009AAD
- EC006984E0003C62E200375EE000375EE000375EE000375EE00095A5D900FFFF
- FF00FFFFFF00375EE000375EE000375EE000375EE000375EE000395FE000566C
- B600748ADC000000000000000000000000005B76D2005872C9005872C9007A7E
- 8E005872C9005872C9005B76D200000000005B76D2005872C9005872C9006F74
- 83005872C9005872C9005B76D200000000005B76D2005872C9005872C9005872
- C9005872C9005872C9005B76D200000000000000000000000000000000000000
- 0000435CB2007C8FD1009AADEF004E5C8A008A96BD00B3C0EB00384F9C00344E
- A200576EBC002C3F7C00B7C5F100000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000098ACF00094ABF60096AC
- F700829DF5007894F4006D8CF3003A405600333333003F4454002C51CE002146
- C400163BBA000328A30003269B00687CBE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000687ECB00587AE9003E64E5003E64E5003E64E5003E64E50097A7DB00FFFF
- FF00FFFFFF003E64E5003E64E5003E64E5003E64E5003E64E5005073E8004A63
- BB00000000000000000000000000000000000000000000000000000000007878
- 7800000000000000000000000000000000000000000000000000000000006666
- 6600000000000000000000000000000000000000000000000000000000005656
- 5600000000000000000000000000000000000000000000000000000000000000
- 0000BECCF500445DB3007C90D1006576AF004E5C8A008A96BD008292C800384F
- 9C00344EA2004A5B95002D3F7C00B7C5F1000000000000000000000000000000
- 000000000000000000000000000000000000000000008EA4EE00859FF50089A2
- F600859FF5007E99F5007592F4006283F000597AE9005072E1003E60D2003457
- C9002C4EC0001C3DAC003652AF007181BA000000000000000000000000000000
- 0000000000008282820080808000828282000000000000000000000000000000
- 0000657FD9006C83CD006686F2004C71F0004C71F0004C71F000CDD4EE00FFFF
- FF00FFFFFF004C71F0004C71F0004C71F0004C71F0006182F1007087D4000000
- 0000000000000000000000000000000000000000000000000000000000009090
- 9000000000000000000000000000000000000000000000000000000000008080
- 8000000000000000000000000000000000000000000000000000000000007070
- 7000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BECCF5008294D300A2B4EF006576AF008A96BD00B3C0
- EB008292C800344EA200576EBC004B5C9500B7C5F10000000000000000000000
- 000000000000000000000000000000000000000000006E84D0008AA1EE0090A6
- F00091A7F0008FA5F0008CA3EF00879FED00849BE8008097E3007B91DA00788D
- D400758ACF007083C5007283BE00576798000000000000000000000000000000
- 0000000000008080800040404000808080000000000000000000000000000000
- 0000D2DBF800536CC1008098E7005176F1005176F1005176F100CFD6EF00FFFF
- FF00FFFFFF005176F1005176F1005176F100597CF2007E97ED005870C3000000
- 0000000000000000000000000000000000000000000000000000000000009D9D
- 9D009A9A9A0099999900989898009494940094949400919191008E8E8E008C8C
- 8C008C8C8C008888880088888800858585008282820080808000808080007C7C
- 7C00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000465FB5008395D300A2B4EF004E5C8A008A96
- BD00B3C0EB00384F9C003B58B800576EBC002F3E750032437D00354787003B50
- 98004C64BB0000000000000000000000000000000000718BE2005771C8005771
- C8005771C8005771C8005771C800556EC400516ABD004E66B600485EA7006D71
- 7D00717170005E616D003A4A83005068B8000000000000000000000000000000
- 0000000000008080800045454500808080000000000000000000000000000000
- 0000000000007991E3006B81CC00587CF200587CF200587CF200D1D8EF00FFFF
- FF00FFFFFF00587CF200587CF200587CF200718FF4007388D200607AD5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000009999
- 9900000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000BECCF5004760B6008396D4006576AF004F5D
- 8A008A96BD008292C8004663C3003C59B900596DAF00586CAF005D72B800647B
- C8005C70B1004760B40000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000008080
- 8000CCCCCC008080800000000000000000000000000000000000000000000000
- 0000000000008080800050505000808080000000000000000000000000000000
- 00000000000000000000839AE800869FF3006686F3006586F300F3F5FA00FFFF
- FF00FFFFFF006586F3006586F3006586F300758AD1007189DF00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000364C99002B3D7B002B3D7B002B3D7B006367
- 73002B3D7B002B3D7B002B3D7B00364C99000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFCCF5007F92D400A2B4
- EF00869DE800778FE0006781D7005873CF003351B600203FA6000C2C96001B3B
- A8003D5ABD00667FD0004861B400000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000008080
- 8000D1D1D1008080800000000000000000000000000000000000000000000000
- 0000000000008080800055555500808080000000000000000000000000000000
- 00000000000000000000000000008B9FE0007E99F5006B8AF300FFFFFF00FFFF
- FF00FFFFFF006B8AF3006B8AF3007A96F400526CC50000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000031448600657ED100506CCA00506CCA00506C
- CA00506CCA00506CCA00657ED100314486000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004963B9008597
- D500A4B5EF00849BE600778FE0006781D7004461C200415DBA00445EB4001433
- 9B001839A7003A58BC005F73B4004A62B5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000008080
- 8000D5D5D5008080800000000000000000000000000000000000000000000000
- 0000000000008A8A8A0059595900808080000000000000000000000000000000
- 00000000000000000000000000005F77C90097ACF2007592F4005B73C3005B73
- C3005B73C3007290F4007491F40090A7F300849BE80000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000374C94006580D8000732C1000833C1000833
- C1000833C1000631C1006681D900374C94000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCCF5004A63
- BA008799D60093A7EB00859BE600778FE0008196DA0099A8D9008F9DCD008191
- C7003853AB001536A5005E78CD003F549B000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000008080
- 8000D8D8D80084848400C6C6C600000000000000000000000000000000000000
- 0000C6C6C6009898980067676700868686000000000000000000000000000000
- 0000000000000000000000000000C1CDF6005C75C8009FB1EF007F9AF5007F9A
- F5007F9AF500829CF500A1B4F300687FCD000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000445BAC00869EEC002C55DE003D62DF003E63
- DF003C61DF002A53DD00869EEC00445BAC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004D66BB00A3B5F1009EB0EF008FA4EA00596CAD00AAB9EF0000000000536B
- BC005A6999007F8FC400546DBE003A4C8B000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000009090
- 9000C3C3C3008E8E8E008A8A8A00000000000000000000000000000000000000
- 00008A8A8A00B5B5B5006E6E6E00969696000000000000000000000000000000
- 0000000000000000000000000000000000006B84DE008699DB00859FF500859F
- F500859FF50096ACF7008FA2E0005E79D6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004A63B900A1B4F600446BEC005F80EE006383
- EF005E7FEE004269EC00A1B4F6004A63B9000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004E67BD00A7B8F300A7B8F10095A9ED004C65BB0000000000000000000000
- 0000465CAA006B79A8004F66B400374883000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000B0B0
- B000A6A6A600B0B0B0008B8B8B00868686000000000000000000000000008686
- 860092929200ACACAC0078787800BBBBBB000000000000000000000000000000
- 000000000000000000000000000000000000D3DBF9005C75CC0094ABF6008CA5
- F6008CA5F600A6B7F100647CCD00AFBFF3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004F68BF00A6B9F800567AF2007B97F4007F9A
- F5007995F4005378F100A5B8F8004F68BF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000506AC000A3B5F400ADBDF4009DB0F1004D62AF00D1DAF800000000000000
- 0000000000003F56A1007284C00034437B000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D3D3D300D7D7D700DFDFDF00CECECE00AEAEAE009D9D9D0099999900C0C0
- C000C5C5C500B7B7B700D3D3D300000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A7B6EB00A4B7
- F800A2B6F8005E77CA00D3DBF900000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000556EC500B8C7F900597CF2007E99F500829C
- F5007C97F400577BF200B7C7F900556EC5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005C77D400AABBF5009BB0F50097ACF300829BEB006D81C9005169C1000000
- 000000000000000000003D5299003D539D000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000080808000B3B3B300E1E1E100F3F3F300EFEFEF00E9E9E900CDCD
- CD00A7A7A7008080800000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006D83CF00B2C0
- F100B1BFF1007C93E60000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005771C800B7C6F600BFCCF500C6D1F700C7D2
- F700C6D1F700BECBF500B7C6F6005771C8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008C9EDC00A9BAF50090A7F3007B95EE007993EA006C81C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000B0B0B0008A8A8A008080800080808000808080008A8A
- 8A00B0B0B0000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000007C93E6005771
- C9005771C8000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005B76D2005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005B76D2000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005974CF008C9EDD00A5B7F5007490EE00718DED006E8AE800526B
- C200000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D600556FC500556EC400546DC1005169
- BB00546EC5000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000D3D3D300C2C2
- C2003D4E860029355F0027335E0027335E0027335E0027335E0027335E002733
- 5E0027335E0027335E0027335E0027335E0029355F003D4E860098A7D800C2C2
- C200D4D4D4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000B9C6F1002C3C
- 75003D55A4003D55A4003D55A4003D55A4003D55A4003D55A4003D55A4003D55
- A4003D55A4003D55A4003D55A4003D55A4003D55A4003D55A40040518F00AFBD
- EC00000000000000000000000000000000000000000000000000000000004053
- 93003F64DE002A54DF004368E5007D97ED0099ADF0009EB1F000849BE700768F
- E2006984DB00506CCB004360C2003553B700213EA0003E57A900415187000000
- 000000000000000000000000000000000000000000002F3E710045569500475C
- A400435AA700435AA700435AA600435AA500445BA600435AA500445AA5004359
- A4004359A3004359A2004359A2004359A1004358A0004358A00043589F004358
- 9F00495A990044528B0043569E0000000000D6D6D600384A880023315C002331
- 5C0023315C0023315C0023315C0023315C0023315C0023315C0023315C002331
- 5C0023315C0023315C0023315C0023315C0023315C0023315C0023315C002331
- 5C0023315C0023315C00C0C0C000CECECE000000000000000000465DAD004055
- 99001336AC001034AB001034AB001034AB001034AB001034AB001034AB001034
- AB001034AB001034AB001034AB001034AB001034AB001336AC002C4BB4003D54
- A300000000000000000000000000000000000000000000000000000000002B3D
- 79001945D7001F42B5005466A300A7B7ED00A3B5F100AABAF2007781A4009AA3
- C30096A7E0004D6ACB0038509E004B5A8C00576CB3001B3898004A5EA1000000
- 0000000000000000000000000000000000006279C9004660B4002747B000072B
- A3000328A0000328A00003279F0003279F0003279E0003279D0003269C000326
- 9B0003269A000326990003269800032597000325960003259500032594000324
- 9300072895002743A2002E3D6F008EA1E1000000000026356E005A6CAB00566A
- B000566AB000566AB000566AB000566AB000566AB000566AB000566AB000566A
- B000566AB000566AB000566AB000566AB000566AB000566AB000566AB000566A
- B000566AB000566AB00000000000000000000000000000000000324791003E59
- B400042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC001338B1002D40
- 8100000000000000000000000000000000000000000000000000000000002D3E
- 7D000938D4001E378A004864C100CED6F000A3B5F100AABAF2007E8EC40090A0
- D700C7CFEB004D6ACB002F407900384F9D00A9B3D50013319500495EA4000000
- 000000000000000000000000000000000000283C80002748B5000429A8000429
- A7000429A6000429A5000429A5000328A3000328A2000328A2000328A0000328
- A00003279F0003279E0003279E0003279D0003269B0003269B0003269A000326
- 99000326980003259700495A99002D428A00000000002D4289005771CA00173F
- C500042FC000042FC000042FC000042FC000042FC000042FC000042FC000042F
- C000042FC000042FC000042FC000042FC000042FC000042FC000042FC000042F
- C000042FC0004F6DD30000000000000000000000000000000000364B95003F5C
- BD00042DB800042DB800042DB8001037BB001037BB001037BB001037BB001037
- BB001037BB001037BB001037BB000D35BB00042DB800042DB8001037BB003246
- 8B00000000000000000000000000000000000000000000000000000000003143
- 84000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D50013319500495EA4000000
- 0000000000000000000000000000000000002B3E8100042CB300042CB200042C
- B20003238D00506BC800042BAF00042BAD00042BAD00042BAC00042AAA000322
- 8800506AC3000429A8000429A8000429A7000429A6000429A500032184000328
- A3000328A2000328A100435EB8002638730000000000324793005873D0001842
- CF000533CC000533CC000533CC000533CC000533CC000533CC000533CC000533
- CC000533CC000533CC000533CC000533CC000533CC000533CC000533CC000533
- CC000533CC005171DB0000000000000000000000000000000000384E9900405D
- C200042FBF00042FBF00042FBF00405EC200405EC200405EC200405EC200405E
- C200405EC200405EC200405EC2003859C800042FBF00042FBF00113AC2003549
- 9000000000000000000000000000000000000000000000000000000000003346
- 87000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D50013319500495EA4000000
- 0000000000000000000000000000000000002D418600042DB800042DB700042D
- B600032492004F6BCA00042CB400042CB300042CB200042CB100042BB0000323
- 8C004F6AC700042BAD00042BAC00042BAC00042AAA00042AAA00032187000429
- A8000429A8000429A700435FBC002839770000000000364C9D00607CDA002851
- DC001643D9001643D9001643D9001643D9001643D9001643D9001643D9001643
- D9001643D9001643D9001643D9001643D9001643D9001643D9001643D9001643
- D9001643D9005C7BE400000000000000000000000000000000003A509D00405F
- C7000430C4000430C4000430C400374C9700374C9700374C9700374C9700374C
- 9700374C9700374C9700374C9700405FC7000430C4000430C400103AC700374C
- 9700000000000000000000000000000000000000000000000000000000003447
- 8B000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D50013319500495EA4000000
- 0000000000000000000000000000000000002F438B000530BE00042EBC00042E
- BC00032595004F6CCE00042EB900042DB700042DB7000328A200031F7E000219
- 6400374B8D00031F7C0003269A00042CB100042BB000042BAF0003238C00042B
- AD00042BAC00042AAB00425FBF002A3C7C00000000003E57AF00748FEA004F74
- F000426AEF00426AEF00426AEF00426AEF00426AEF00426AEF00426AEF00426A
- EF00426AEF00426AEF00426AEF00426AEF00426AEF00426AEF00426AEF00426A
- EF00426AEF007B97F400000000000000000000000000000000003F57A7004162
- D1000434D1000434D1000434D1003C54A1000000000000000000000000000000
- 000000000000000000003C54A1004162D1000434D1000434D100113ED3003C54
- A10000000000000000000000000000000000000000000000000000000000384D
- 94000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D50013319500495EA4000000
- 000000000000000000000000000000000000344A9400143ECA001740CA00153E
- C900072A9E005875D7000E38C5000B36C4000934C2000D2A8A00CDCCCA00CBCA
- C800C9C7C600CECCCB0003208300042EBB00042EBA00042EB90003249300042D
- B700042DB600042DB6004361C7002F42850000000000405AB1007D97EB006384
- F300587CF200587CF200587CF200587CF200587CF200587CF200587CF200587C
- F200587CF200587CF200587CF200587CF200587CF200587CF200587CF200587C
- F200587CF20089A2F600000000000000000000000000000000004058AC004567
- D6000E3DD8000E3DD8000C3BD8003F57A8000000000000000000000000000000
- 000000000000000000003F57A8004567D6000E3DD8000E3DD8001946DA003F57
- A800000000000000000000000000000000000000000000000000000000003A4F
- 98000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D50013319500495EA4000000
- 000000000000000000000000000000000000364B99001D46D100224AD2002149
- D1000A2DA3005F7CDC001A43CD001640CB00153FCA0016359B00EDEDEC00ECEC
- EB00EBEBEA00DBDCE20005258E000530C100042FBF00042FBF0003269800042F
- BD00042EBC00042EBB004362CB0031458A0000000000425BB300869DED007894
- F4006E8DF3006E8DF3006E8DF3006E8DF3006E8DF3006E8DF300637EDB00637E
- DB00637EDB00637EDB006C8AF0006E8DF3006E8DF3006E8DF3006E8DF3006E8D
- F3006E8DF30097ADF70000000000000000000000000000000000435CAF004B6C
- DB001E4BE1001D4AE0001947E000425AAD000000000000000000000000000000
- 00000000000000000000425AAD004A6CDB001E4BE1001E4BE1002853E200425A
- AD00000000000000000000000000000000000000000000000000000000003C51
- 9C000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D50013319500495EA4000000
- 000000000000000000000000000000000000394F9E00264FD8002C53D8002C53
- D7000D31A8006884E100254DD400214AD2002049D2001D45CC001639AF000826
- 8B004E67BA001034AC00113AC5000F3AC8000C37C7000A35C50004279C000632
- C3000531C200042FC0004262CF0033478F00000000003B519A00465898003A4D
- 9000364A8E00364A8E00364A8E00364A8E00364A8E00364A8E00C7CCDD009BA0
- AF00999EAD005967980035488A00364A8E00364A8E00364A8E00364A8E00364A
- 8E00364A8E00465898003D55A5000000000000000000000000004862B9005576
- E5003D66EE003D66EE00325DED004761B9000000000000000000000000000000
- 000000000000000000004761B9005475E5003D66EE003D66EE00436AEE004761
- B900000000000000000000000000000000000000000000000000000000004157
- A3000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D500133195004A5FA4000000
- 0000000000000000000000000000000000003D55A800375EE2004166E3004267
- E3001338B0007691E9003B61E000375DDE00355CDD00345BDD003057DB000F33
- AB006C87E4002951D800274FD700264ED6001834940017349400072074001330
- 9200122F91001338B3004869D800384E9800000000006179CC005A75D1005A75
- D1005A75D1005A75D1005A75D1005A75D1005A75D1005A75D100D0D7ED00D0D6
- E700CED4E5006A7FC7005873CD005A75D1005A75D1005A75D1005A75D1005A75
- D1005A75D1005A75D1004B5FA5000000000000000000000000004A64BB005A7B
- E8004D72F1004D72F1004068F0004A64BB000000000000000000000000000000
- 000000000000000000004A64BB00597AE8004D72F1004E73F1005176F1004A64
- BB0000000000000000000000000000000000000000000000000000000000435A
- A7000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D500133195004A5FA5000000
- 0000000000000000000000000000000000004059AD003F66E7004B70E8004D71
- E900163BB3007E98ED00456AE5004368E4004166E3003F64E2003C62E1001237
- AF00748FE900345BDD003259DC003158DC00B6B6BA00BFBDBB00BDBBB900BAB8
- B600AEAEB200173494004C6DDC003A509D0000000000738CE000466AE2003B61
- E0003B61E0003B61E0003B61E0003B61E0003B61E0003B61E0004665CE005773
- D3005773D3003557C9003A5FDC003B61E0003B61E0003B61E0003B61E0003B61
- E0003B61E0003B61E000566AB3000000000000000000000000004B65BC005F7F
- E8005C7FF2005C7FF2004D72F1004B65BC000000000000000000000000000000
- 000000000000000000004B65BC005D7DE8005C7FF2005D80F2005F81F2004B65
- BC0000000000000000000000000000000000000000000000000000000000455C
- AB000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007A92
- E300C7CFEB004D6ACB002F4079002D4CB400A9B3D500133195004A5FA5000000
- 000000000000000000000000000000000000425CB200486DEC004D6CD2003D55
- A600122C80005E6FA8003851A4004362CA004B70E800496EE700456AE600153A
- B3007A95EC003F64E3003E64E3003C62E200D7D5D400CDCCCA00CBCAC800C7C5
- C300CECCCB001F3B99005071E0003D54A20000000000B8C6F6009BB0F70093AA
- F60093AAF60093AAF60093AAF60093AAF60093AAF60093AAF60093AAF60093AA
- F60093AAF60093AAF60093AAF60093AAF60093AAF60093AAF60093AAF60093AA
- F60093AAF60093AAF6006C80C9000000000000000000000000004D67BE006A87
- E9007C97F4007C97F4006686F3004D67BE0000000000000000005A74CB004D67
- BE004D67BE004D67BE004D67BE00728DEA007D98F5007D98F5007F9AF5004D67
- BE004D67BE004D67BE004D67BE005A74CB000000000000000000000000004961
- B3000535D4001E378A004066E500CED6F000A3B5F100AABAF2008BA1E9007E95
- E200C7CFEB004D6ACB002F4079002D4CB400A9B3D500133195004A5FA5000000
- 0000000000000000000000000000000000004760B700587CF2005166AD00D7D5
- D400CBCAC800C9C7C600C7C5C300465DA9006283F2006082F1005C7EEF001B40
- BB008AA2F3005477ED005377ED005175EC004361C7004261C70014339B003D5C
- C5003C5CC5004166E2005678E8004259AC0000000000D7DFF900D5DEFC00D5DE
- FC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DE
- FC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DEFC00D5DE
- FC00D5DEFC00D5DEFC007387CC000000000000000000000000004E68BF006E8A
- EA008BA4F6008AA3F6007391F4004E68BF0000000000000000004E68C100607A
- D0004E71E7006382E900738EEA0089A2F4008CA5F6008CA5F6008CA5F600738D
- EA006483E9005A7BE800607AD0004E68C1000000000000000000000000004C65
- B8000535D4001E378A004864C100CED6F000A3B5F100AABAF2007E8EC40090A0
- D700C7CFEB004D6ACB002F407900384F9D00A9B3D500133195004A5FA5000000
- 0000000000000000000000000000000000004861B8006082F2005E73BB00E4E5
- EA00ECECEB00EBEBEA00EAEAE9005269B4006D8CF3006B8AF3006888F3001E43
- BE0092A9F5006082F1005F81F1005C7EF000597CEF00577AEF001A3FBB005175
- ED005074EC004A6FEB00597BEB00455DB100000000007185CC007589CE007589
- CE007589CE007589CE007589CE007589CE007589CE007589CE007589CE007589
- CE007589CE007589CE007589CE007589CE007589CE007589CE007589CE007589
- CE007589CE007589CE005870C6000000000000000000000000004F69C000738E
- EB009BB0F7009AAFF700809BF5004F69C0000000000000000000BFCDF600516A
- C3005A78E0006384F300819BF50098AEF7009CB1F7009CB1F7009CB1F700829D
- F5006686F3006183F200516AC300BFCDF6000000000000000000000000004E66
- BC000535D4001F42B5005466A300A7B7ED00A3B5F100AABAF2007882A5009AA3
- C30096A7E0004D6ACB0038509E004B5A8C00576CB300133195004A5FA5000000
- 0000000000000000000000000000000000004962B9006888F3007D97F0007086
- D000213FA3008D9DD2006A81CF007893F0007894F4007794F4007391F4002146
- BE009BB0F7006C8BF3006A8AF3006888F3006586F3006384F3001D42BE005D7F
- F1005C7FF1005478F0005C7EEF004761B7000000000000000000000000000000
- 0000000000000000000000000000C7C5C500AFADAC00898685007D7A78007D7A
- 78007D7A78007D7A78007D7A7800AFADAC008F8D8B0000000000000000000000
- 0000000000000000000000000000000000000000000000000000516BC2007B95
- EC00BAC9FA00B9C8F90097ADF700516BC2000000000000000000000000000000
- 000092A5EC00738EEB0098AEF700B4C4F900BBCAFA00BBCAFA00BAC9FA0097AD
- F7007892EC005A73C6000000000000000000000000000000000000000000536D
- C4000425940015349B002C469F005B6CA500727FA9007682A9006070A2005666
- 9F004B5D990035498D002A3F86001F357E00091F6A000D226800344374000000
- 0000000000000000000000000000000000004B65BC00708EF40089A2F60097AD
- F70097ADF70095ACF70093AAF60090A8F6008EA6F6008CA5F60088A2F60087A1
- F500859FF500829CF500809BF5007F9AF5007B97F4007995F4007894F4007491
- F4006F8DF3006283F2006987ED004B65BC000000000000000000000000000000
- 0000000000000000000000000000E0DEDE00D7D5D500D3D1D000D3D1D000D3D1
- D000D3D1D000D3D1D000D3D1D000D5D3D2009C9A990000000000000000000000
- 0000000000000000000000000000000000000000000000000000526CC3007A95
- EC00C4D1FA00C3D0FA009CB1F700526CC3000000000000000000000000000000
- 0000000000006179CB00809AEE00ABBDF800C9D5FB00C9D5FB00C1CEFA007B96
- EE006179CB007991E20000000000000000000000000033437C0027376D002737
- 6D0027376D0027376D0027376D0027376D0027376D0027376D0027376D002737
- 6D0027376D0027376D0027376D0027376D0027376D0027376D0027376D002737
- 6D00374780000000000000000000000000004D66BF007995F400829CF50091A8
- F6009AAFF70099AFF70097ADF70096ACF70094ABF60092A9F6008FA7F6008DA5
- F6008BA4F60088A2F60086A0F500849EF500819BF5007F9AF5007C97F4007592
- F4006D8CF3005E80F2006C86E0004F6AC5000000000000000000000000000000
- 0000000000000000000000000000DEDDDC00E4E3E200E4E3E200E4E3E200E4E3
- E200E4E3E200E4E3E200E4E3E200E4E3E2009A97960000000000000000000000
- 0000000000000000000000000000000000000000000000000000536DC600738E
- E900AFC0F900B0C0F9008FA7F600536DC4000000000000000000000000000000
- 0000000000006883DC00637BCD00869FF200BAC9FA00BAC9FA00A7B9F8006179
- CC006883DC00000000000000000000000000000000002E3F7B004662BF004F6C
- CD005F7DE3006685ED006988F1006382EB005F7FE8005B7BE4005474DD005070
- D9004C6CD5004564CC004463CA004766CC004D6BD100506ED400516FD500536F
- CC00364A91000000000000000000000000007990E200839CF0007E99F5007C97
- F400839EF500839EF500839EF500829CF500819BF5007F9AF5007C97F4007B97
- F4007A96F4007794F4007592F4007491F400718FF4006F8DF3006C8BF3006485
- F3005F81F2006485F3005C73C70091A5EB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000CED8F7005770
- C8006D8AEB006D8AEB006A83DA00C1CDF6000000000000000000000000000000
- 00000000000000000000000000005973CF007390F2007592F2006E86D6000000
- 000000000000000000000000000000000000000000003E539B00566EBF004463
- CA005B7AE2007490EE007E99F3006987EC005D7DE7005273E2003B60D8002F54
- D200244ACB000C35BE000831BA001239BE00254AC6002B50C9003256CD005D77
- CE004458A000000000000000000000000000000000007991E300506AC3005069
- C0005069C0005069C0005069C0005069C0005069C0005069C0005069C0005069
- C0005069C0005069C0005069C0005069C0005069C0005069C0005069C0005069
- C0005069C000506AC30000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C1CD
- F6005670C7005670C700647ED900000000000000000000000000000000000000
- 0000000000000000000000000000000000006580DC006681DD005D77CF000000
- 000000000000000000000000000000000000000000006079C700566CB6005D77
- CB006D87DD00748EE5007892E800708BE3006E88E1006A84DE00637DD8005E79
- D5005B76D200536DCA00516CC9005570CC005B75CE005E78D1005E78D100556B
- B2006880D2000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005972CA005972CA00C1CDF6000000
- 0000000000000000000000000000000000000000000000000000677FD1005068
- BC005068BC005068BC005068BC005068BC005068BC00485EA900485EA900485E
- A900485EA9005068BC005068BC005068BC005068BC005068BC005068BC006E85
- D300000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000879BE00044589E004458
- 9E00475A9E000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000DADADA00C7C7C700C0C0
- C000C0C0C000253566002A396E00AFBCE400C8C8C800D5D5D500DEDEDE000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000032458D00DDE2
- F600DFE4F700DFE4F700E0E5F700E0E6F700E0E6F700E1E7F800E3E8F800E3E8
- F800E4E9F800E4E9F800E5EAF800E5EAF800E6EBF800E7EBF900E7EBF900E8EC
- F900E9EDF900E9EDF90032458D00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000B9C6
- F1002C3F7D003E58AE003F58AA00425287000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000293973008C99C6008897C9004963B7001F3E
- A60003269C001F3EA6004963B7006A7EC2008C99C60029397300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000035499400D8DF
- F600C9D2F200C9D2F200CAD3F200CCD5F400CDD6F400CED7F400CFD7F400D0D8
- F400D0D8F400D2DAF500D3DBF500D4DBF500D6DDF500D6DDF500D7DEF500D9E0
- F600DAE0F600DBE1F70035499400000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000B9C6F1002E42
- 81004A5D9D000F309D000F2F9A003F58AA003044890000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005871C0003D54A2002C4082005165A9004A65
- BD000328A3004661BC005165A9004A598E002C3C7A005871C000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000384E9A00D5DC
- F600C3CEF300C4CFF300C4CFF300C5D0F300C5D0F300C6D0F300C8D2F400C9D3
- F400C9D3F400CBD4F400CCD5F400CCD5F400CED7F500CFD8F600D0D9F600D2DA
- F600D2DAF600D3DBF600384E9A00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000304285004B5F
- A1003F5AB70003269B00032698000F2F9A004453880031458A00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000042528C00516B
- C200042AAA00506AC40042528C008397DE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003F56AA00D7DF
- F9000537DD00C6D1F700C6D1F700C6D1F700C5D1F7000537DD00C5D1F700C4D0
- F700C4D0F700C4D0F700C4D0F700C3CFF7000537DD00C3CFF700C3CFF700C4D0
- F7000537DD00C4D0F7003F56AA00000000000000000000000000000000000000
- 000000000000000000000000000000000000BAC7F20035498F003E5BBE000F33
- AB000429A50003279F0003279D0003269B000F2F9A003F58AA00445489000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000034488D005771
- C600042EB9005771C60034488D00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000425AB000D8E0
- FA000538E500C7D3F900C7D3F900C7D3F900C6D2F9000538E500C6D2F900C6D2
- F900C6D2F900C6D2F900C6D2F900C5D1F9000538E500C5D1F900C4D0F800C4D0
- F8000538E500C4D0F800425AB000000000000000000000000000000000000000
- 0000000000000000000000000000BAC7F200374B93005165AD001035B100042A
- AA00A0AEDE000328A20003279F0003279D00032698000F2F9A003F58AA003247
- 8B00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000374C93005873
- CB00042FC0005873CB00374C9300000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000455EB600DAE2
- FC00053AEB00CAD5FB00CAD5FB00C9D5FB00C9D5FB00053AEB00C8D4FB00C8D4
- FB00C8D4FB00C7D3FB00C7D3FB00C7D3FB00053AEB00C7D3FB00C6D2FA00C6D2
- FA00053AEB00C6D2FA00455EB600000000000000000000000000000000000000
- 0000000000000000000000000000394E9700546AB2004A67CA000C32B200052C
- AD0099A6D000A0AEDD000328A20003279F0003269B00032698000F2F9A004555
- 890033478C000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003A509A005974
- D0000431C7005974D0003A509A00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004861B900DEE5
- FC000F42EC00D0DAFB00D0DAFB00CFD9FB00CFD9FB000F42EC00CED8FB00CED8
- FB00CED8FB00CDD8FB00CDD8FB00CDD8FB000F42EC00CCD7FB00CCD7FB00CCD7
- FB000F42EC00CBD6FB004861B900000000000000000000000000000000000000
- 000000000000BDC9F4003D54A0005C78D500395BCB002B4FC600A7B5E5001439
- B8000C32B200939FC600FFFFFF00A0AEDD0003279F0003279D0003269B000F2F
- 9A003F58AA0046568A0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004057A7005B77
- DA000636D6005B77DA004057A700000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000364C97002B3C76002B3C
- 76002B3C76002B3C76002B3C76002B3C76002B3C76002B3C76002B3C76002B3C
- 76002B3C76002B3C76002B3C76002B3C76002B3C76002B3C76002B3C76002B3C
- 76002B3C76002B3C7600000000000000000000000000000000004963BA00DFE6
- FC001949ED00D3DCFB00D3DCFB00D3DCFB00D3DCFB001A4AED00D2DBFB00D2DB
- FB00D2DBFB00D2DBFB00D2DBFB00D1DBFB001A4AED00D1DBFB00D1DBFB00D0DA
- FB001A4AED00CFD9FB004963BA00000000000000000000000000000000000000
- 0000BDC9F4003F57A3005F76C0004767D2003A5CCD003255C900FFFFFF00A7B5
- E5001439B80004269800939FC600FFFFFF000328A20003279F0003279D000326
- 98000F2F9A003F58AA0033488D00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000435BAE005F7D
- E0000E3EDF005F7DE000435BAE00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003F559E004E6CD000274D
- CD002B50CD002B50CD002B50CD002C51CD002C51CD002C51CD002C51CD002C51
- CD002C51CD002C51CD002C51CD002C51CD002C51CD002B50CD002B50CD002A4F
- CD00274DCD004E6CD000000000000000000000000000000000004A64BB00E2E8
- FD002251ED00D7DFFC00D6DFFC00D6DFFC00D6DFFC002453EE00D6DFFC00D6DF
- FC00D5DEFC00D5DEFC00D5DEFC00D5DEFC002453EE00D4DDFC00D4DDFC00D4DD
- FC002352ED00D2DBFB004A64BB00000000000000000000000000000000000000
- 00004259AA006379C4006883DF004A6AD5004364D2003B5DCD00A5B0D300FFFF
- FF00A7B5E5000C32B20004269800939FC600A0AEDD000328A20003279F000326
- 9B00032698000F2F9A0046568B003A4F99000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000465FB4006381
- E5001747E7006381E500465FB400000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005A75D1005771C8006472
- A8006A80CA005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005771C8005771C8005771C8007684
- B4006472A8005771C800000000000000000000000000000000004D66BE00E5EA
- FD003761EF003862EF003862EF003862EF003862EF003862EF003862EF003862
- EF003862EF003862EF003862EF003862EF003862EF003862EF003862EF003862
- EF003761EF00D8E0FC004D66BE00000000000000000000000000BECCF500465E
- B2007590E7006D88E5006985E200BDC7E700FFFFFF00B9C5EE003B5DCD003250
- B600A5B0D300A7B5E5001439B8000C32B200939FC600FFFFFF00A0AEDD000327
- 9F000F31A100405AB000364B9300000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004B65BC006B88
- EB002755EE006B88EB004B65BC00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005A74
- C7002247C100042FBF00042FBF00042FBF00042FBF00042FBF00042FBF00042F
- BF00042FBF00042FBF00042FBF00042FBF00042FBF00042FBF00042FBF004A60
- AA005A74C70000000000000000000000000000000000000000004E68BF00E6EC
- FD004169F000E1E7FD00E1E7FD00E1E7FD00E1E7FD00436BF000E0E6FC00E0E6
- FC00E0E6FC00DFE6FC00DFE6FC00DFE6FC00436BF000DEE5FC00DEE5FC00DEE5
- FC004169F000DBE2FC004E68BF000000000000000000BECCF5004961B7006D84
- D0007892E9007892E800728CE600617BCF00BAC3E100FFFFFF004364D2003B5D
- CD003250B600FFFFFF00A7B5E5001439B80004269800939FC60099A5CE000F32
- A700415BB5004B5B950000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004C66BD006E8B
- EB00305CEE006E8BEB004C66BD00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000007D93
- E0003457CD000432CA000432CA000432CA000432CA000432CA000432CA000432
- CA000432CA000432CA000432CA000432CA000432CA000432CA000432CA004B61
- AF007D93E00000000000000000000000000000000000000000004F69C000E7EC
- FD004B71F100E4E9FD00E4E9FD00E4E9FD00E4E9FD004D72F100E3E9FD00E3E9
- FD00E3E9FD00E3E9FD00E3E9FD00E3E9FD004D72F100E2E8FD00E2E8FD00E1E7
- FD004B71F100DEE5FC004F69C00000000000000000004B67C0006A83D30089A1
- F000889FED00819AEB007993E8006A85E200617BCF00BAC3E100B9C5EE004364
- D2003B5DCD00A5B0D300FFFFFF00A7B5E5000C32B2000426980003259500415C
- B9004C5E9A003B519B0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004D67BE00728E
- EC003862EF00728EEC004D67BE00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005E7BDD00234FE100234FE100234FE100234FE100234FE100234FE100234F
- E100234FE100234FE100234FE100234FE100234FE100234FE100224EE0004E64
- B500000000000000000000000000000000000000000000000000526CC300EBF0
- FD005D80F2006183F2006183F2006183F2006183F2006183F2006183F2006183
- F2006183F2006183F2006183F2006183F2006183F2006183F2006183F2006183
- F2005E80F200E4E9FD00526CC30000000000000000004C66BD00728FF20095AB
- F30099AEF20091A7F0008AA1EE007993E800728CE6006A85E200BAC3E100FFFF
- FF00B9C5EE003B5DCD003250B600A5B0D3001B40BC001B40B9004562C1003E56
- A200000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005069C0007B95
- ED004A70F0007B95ED005069C000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006984E1003E66EE003862ED003B64ED003B64ED003B64ED003B64ED003B64
- ED003B64ED003B64ED003B64ED003B64ED003B64ED003862ED003E66EE004F68
- C300000000000000000000000000000000000000000000000000536DC400ECF0
- FE00EBF0FD00EBF0FD00EBF0FD00EBF0FD00EBF0FD00EBF0FD00EAEFFD00EAEF
- FD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00E9EEFD00E9EEFD00E9EEFD00E8ED
- FD00E8EDFD00E6EBFD00536DC40000000000000000004D67BF007693F300A1B4
- F600A1B4F40099AEF20091A7F000819AEB007993E800728CE600617BCF00BAC3
- E100FFFFFF004364D2003B5DCD003250B600274BC2004A67C7005366A8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000516AC1007D97
- EE005176F1007D97ED00516AC100000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006781DA005378F100496FF0005176F1005176F1005176F1005176F1005176
- F1005176F1005176F1005176F1005176F1005075F100496FF0005378F1005975
- D100000000000000000000000000000000000000000000000000546EC500EDF1
- FE00EDF1FE00EEF2FE00EEF2FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1
- FE00EDF1FE00ECF0FE00ECF0FE00ECF0FE00ECF0FE00ECF0FE00ECF0FE00ECF0
- FE00EAEFFD00E7ECFD00546EC50000000000000000004E68C0007A96F400A9BB
- F700A3B4F1006078C7004B63B600506BC6007C95E7007993E8006A85E200617B
- CF00BAC3E100B9C5EE004364D2003A5CCD00516DCD00566AAB00445AAA000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000526BC200809A
- EE005A7DF200809AEE00526BC200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000647AC900728FF100577BF2005C7FF2005E80F2005F81F2006082F2006082
- F2006082F2006082F2005F81F2005E80F200567AF200587CF200728FF1009FB1
- F0000000000000000000000000000000000000000000000000005770C700F0F3
- FE007B97F40087A1F5008AA3F6008AA3F6008AA3F6008AA3F6008AA3F6008AA3
- F6008AA3F6008AA3F6008AA3F6008AA3F6008AA3F6008AA3F6008AA3F60087A1
- F5007A96F400EBF0FD005770C7000000000000000000506AC1007A96F400B1C1
- F900506AC100D2DBF80000000000A9BAF0004B63B6008AA1EE007993E800728C
- E6006A85E2005771CB004B6BD7005D79D7004960B30000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009FAFE9005671CC0000000000000000000000000000000000546EC50088A0
- EF006B8AF30088A0EF00546EC500000000000000000000000000000000005A72
- C600A1B1E900546EC50000000000000000000000000000000000000000000000
- 00005A75D1006E84D2007690EA007D97EB007F98EB007F98EB008099EB008099
- EB008099EB008099EB007F98EB007F98EB007A94EA007790EA006E84D2000000
- 00000000000000000000000000000000000000000000000000005871C800F0F3
- FE00F1F4FE00F2F5FE00F3F6FE00F3F6FE00F3F6FE00F3F6FE00F2F5FE00F2F5
- FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F1F4FE00F1F4FE00F0F3
- FE00EEF2FE00EBF0FD005871C8000000000000000000516BC2006F8DF300A9BB
- F800516BC200D3DBF90000000000BFCDF5004D66BA007F99ED00819AEB007993
- E800728CE6005776DD00637FDC005F73BA000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00008AA1EC006B81CD00AFBEF300000000000000000000000000556FC6008BA2
- F0007290F4008BA2F000556FC600000000000000000000000000000000007589
- D200879FEF00556FC60000000000000000000000000000000000000000000000
- 000000000000647EDB005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C900647EDB000000
- 00000000000000000000000000000000000000000000000000005872C900F1F4
- FD00F4F6FD00F5F7FD00F6F8FD00F6F8FD00F6F8FD00F6F8FD00F6F8FD00F5F7
- FD00F5F7FD00F5F7FD00F5F7FD00F5F7FD00F5F7FD00F5F7FD00F4F6FD00F4F6
- FD00F3F6FD00F1F4FD005872C9000000000000000000546FCB006680D90099AF
- F7006E84D1005E78D100D3DBF900556FCB00647BCA0099AEF2008AA1EE00819A
- EB00748FE7006984E0006277BF004D65BA000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00007993EE00748EE5005870C8000000000000000000000000005670C7008FA6
- F1007A96F4008FA6F1005670C70000000000000000000000000093A7ED007791
- E7007C96EE005E79D50000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCDF600536E
- C7009EB3F700B6C6F900C3D0FA00B7C6F800B1C1F800A8BAF50092A8F100809A
- EE00758FE900526BC20000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000819AEB006183F2005579F100486DE8004469E8004469E8005174E9006585
- F1007894F4006484F1005074E900466BE8004469E8004A6EE8004E73EF006586
- F3007992E500607AD70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C1CD
- F600748DDD0099AFF700ACBDF800B5C5F900AFBFF800A6B8F600869FF100809A
- EE006B81CC000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000095A8E600A8B9F300AABBF300A5B7F300A4B6F300A4B6F300A9B9F300AFBF
- F500B1C1F500AEBEF500A8B9F300A5B7F300A4B6F300A6B8F300AABAF300A8B9
- F30095A8E600607AD70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005670C8006982DC007C96ED0089A0EE00869EEE00839BED00738EE9006C83
- D0005671CA000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C900879CE90000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000CBCBCB00C7C7C70095A4D9002B3A6A002B3A6A002B3A6A002B3A6A002B3A
- 6A002B3A6A002B3A6A002B3A6A002B3A6A003040790095A4D900C5C5C500D3D3
- D300000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000DBDBDB00D1D1D100C9C9C900C7C7
- C700C7C7C700C5C5C500C5C5C500C5C5C50029386D0030417800C5C5C500D3D3
- D300000000000000000000000000000000000000000000000000000000000000
- 00007789C8002C375F0033458000C3C3C300C5C5C500D1D1D100DCDCDC000000
- 00000000000000000000DADADA00D5D5D500C3C3C300B1BCE500394B89007587
- C600DADADA000000000000000000000000000000000000000000000000000000
- 000000000000B2BFEE002D407D003758C6003758C6003758C6003758C6003758
- C6003758C6003758C6003758C6003758C6003C53A1002E407C00B1BFED000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000028387100032698000326
- 98004E66B6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000007F92D80029396C008494C80025346900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000CED7F60031417A00536BBC002D3D7800647BC90000000000000000000000
- 0000000000000000000000000000000000002D3D780041569B004B66BE00B7C5
- F100000000000000000000000000000000000000000000000000000000000000
- 000031458E003E58AF003358D600042CB300042CB300042CB300042CB300042C
- B300042CB300042CB300042CB300042CB3000D34B9003358D6003E58AF00BAC6
- F200000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002C3D79000328A2000328
- A2004F69BE000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008093D900324273005466A5008393C80027366B00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000354C98003C529C00425DB400384984003D54A200000000000000
- 00000000000000000000000000003D54A200425CB0002245B8003E55A1000000
- 000000000000000000000000000000000000000000000000000000000000BAC7
- F2004059B200345AD9000D36BE00042DB700042DB700042DB700042DB700042D
- B700042DB700042DB700042DB700042DB700042DB7000D36BE00345AD9003348
- 9100BAC7F2000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002F418200042BAD00042B
- AD00506BC6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000036457A005568AA00324DAA008494CC00293A7300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000007389D500495991001338B2003A59C0004054960094A6E5000000
- 000000000000A5B6EC002F42860040549600163BB400092EA9004B5B95000000
- 0000000000000000000000000000000000000000000000000000BCC8F300354A
- 95003359DA000D37C200042EBC00042EBC00042EBC00042EBC00042EBC00042E
- BC00042EBC00042EBC00042EBC00042EBC00042EBC00042EBC000D37C200415B
- B500354A9500BCC8F30000000000000000000000000000000000000000000000
- 000000000000364B94005C76CD00183DB800183DB800183DB8000D37C3000D37
- C3000D37C300183DB800183DB800183DB800364B940000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000003850
- 9D00455690002042B300042AA900042AA9008496D4002F428100000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000003B54A200042CB100042CB100042CB100435EBE003E51
- 9500344890004660BD002146C200072EB300042CB1004961AE00384D98000000
- 00000000000000000000000000000000000000000000384F9E00435DBA00335A
- DE000431C5000431C5000431C5000431C5000431C5000431C5000431C5000431
- C5000431C5000431C5000431C5000431C5000431C5000431C5000431C5000D39
- CB00335ADE00435DBA00BDC9F400000000000000000000000000000000000000
- 0000000000003A509B005B79DD001540CF001540CF001540CF001540CF001540
- CF001540CF001540CF001540CF001540CF003A509B0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003C54A3005365
- A400516CC700042CB200042CB200042CB2008497D90033468700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000788ED900163CBB00062FB700062FB700133ABE003C5C
- C900465EAF00163DBF00062FB700062FB7001138BA005062A2005E76C9000000
- 000000000000000000000000000000000000BDC9F400435FBD00335BE0000D3A
- CE000432CB000432CB000432CB000432CB000432CB000432CB000432CB000432
- CB000432CB000432CB000432CB000432CB000432CB000432CB000432CB000432
- CB000D3ACE00335BE0003A52A100BDC9F4000000000000000000000000000000
- 0000000000003E54A5006782DD006A84DD006A84DD006A84DD001D49DA001D49
- DA00617FE5006A84DD006A84DD006A84DD003E54A50000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000CED7F6006179C7004258A50033488F005568AA004D6A
- CC001239BE00042EBB00042EBB00042EBB008499DD00364A9000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000D0D8F7004762C1001139BE001139BE001139BE00143B
- C0002E53CD001139BE001139BE001139BE003959C30040539600BCC8F3000000
- 0000000000000000000000000000000000004159AD00345CE3000D3BD3000433
- CF000433CF000433CF000433CF000433CF000433CF000433CF000433CF000433
- CF000433CF000433CF000433CF000433CF000433CF000433CF000433CF000433
- CF000433CF000D3BD3004561C0004159AD000000000000000000000000000000
- 0000000000000000000000000000000000008197E500455FB6002D59ED002D59
- ED00587BF1008197E50000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004C5F9F005971BF004A66C5002447BA001237B4007288D2004F6FDB000432
- CD000432CD000432CD000432CD000432CD00849BE6003D53A0007087D9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005669AA003458D0002B50CE002B50CE002B50
- CE002B50CE002B50CE002B50CE002B50CE00596DAF00647CD000000000000000
- 0000000000000000000000000000000000004159A9000535D9000535D9000535
- D9000535D9000535D9000535D9000535D9000535D9000535D9000535D9000535
- D9000535D9000535D9000535D9000535D9000535D9000535D9000535D9000535
- D9000535D9000535D9003760E8004159A9000000000000000000000000000000
- 00000000000000000000000000004A62BC00526AC4004D6DD5003560EF003560
- EF003560EF00526AC4004A62BC008198E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005A74C9001C43C500042FC000042FC000042FC000728ADB005273E2000D3C
- D7000E3DD8000E3DD8000E3DD8000E3DD800869DEB004058A800576EB8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000465BA500395BCB00385CD400385CD400385C
- D400385CD400385CD400385CD400385CD4004B60A7004D66BC00D1DAF7000000
- 000000000000000000000000000000000000435BAF000537DD000537DD000434
- D200042CB100042CB100042EB9000537DD000537DD00042CB1000537DD000537
- DD000430C400042CB100042CB1000430C4000537DD00042CB1000537DD000537
- DD000537DD000537DD00365FE900435BAF000000000000000000000000000000
- 000000000000000000005C76D2005171DE003D66EF003D66EF003D66EF003D66
- EF003D66EF003D66EF005171DE00526BC1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005071DE000433CF000433CF000433CF000433CF00728DE4005779E9001A48
- E1001C4AE1001C4AE1001C4AE1001C4AE10089A1EF00445DB0004E71E500738C
- DE00000000000000000000000000000000000000000000000000000000000000
- 000000000000ABBBF0004159AB006580DD004B6DDD004669DC004669DC004669
- DC004669DC004669DC004669DC004669DC006480DE00576EB8004159AB000000
- 000000000000000000000000000000000000455EB300093BE300093BE2003B5A
- C000FFFFFF00FBFBFB00BCC3DD00093BE200093BE200F2F2F200093BE2000835
- CC007F90CB00FFFFFF00F5F5F5007F90CB00093BE200F2F2F200093BE200093B
- E200093BE200093BE2003861EB00455EB3000000000000000000000000000000
- 0000839AE6006279C7006A88EE004D72F1005879E5005D76CA004E68C3004E68
- C3004F68BD005879E5004D72F1004D72F1006279C700839AE600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006384F300456CF0004C72F1004C72F100466DF00088A1F5005E80F200335E
- EF003862EF003862EF003862EF003862EF008EA6F6004A64BC00093DEB00516A
- BE0000000000000000000000000000000000000000000000000000000000BFCC
- F5005A70BB00728BDF006D8AEA006180E7006180E7006180E7006180E7006180
- E7006180E7006180E7006180E7006180E7006180E700607FE7006B88EA005E73
- BD004A63BA00ABBBF10000000000000000004A64BB001949ED001B4BED001B4B
- ED001B4BED003761EF00C4D0F9001B4BED001B4BED00FFFFFF001B4BED00C2C9
- E2007F9AF5001B4BED001B4BED00708EF4001B4BED00F5F5F5004F6CCE003A5A
- C3001741CF001B4BED004068F0004A64BB000000000000000000000000000000
- 00005169C2008A9FE9005378F100617FE500536CBF007990E200000000000000
- 0000D2DBF800536CBF00617FE5005378F1008A9FE9005169C200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006F8DF3006787F3006F8DF3006F8DF3006888F30095ACF7006283F2004068
- F000466DF000466DF000466DF000466DF00091A8F6004B65BD00093DEB004B65
- BD00000000000000000000000000000000000000000000000000768EDF004C64
- B7007D97EB007590ED006D8AEB006D8AEB006D8AEB006D8AEB006D8AEB006D8A
- EB006D8AEB006D8AEB006D8AEB006D8AEB006D8AEB006D8AEB006D8AEB007C96
- ED006F85D0004C64B70000000000000000004B65BD002050ED002352ED00315D
- EF00E3E9FD00FFFFFF00C8D4FB002352ED002352ED00FFFFFF002352ED00FBFB
- FB005A7DF2002352ED002352ED005A7DF2002352ED00FFFFFF00C9D5FB00EDF0
- FA0092A0D0002352ED00446BF0004B65BD000000000000000000000000000000
- 00007288D000718FF4005B7EF200566EC10091A4EB0000000000000000000000
- 00000000000091A4EB00566EC1006684E700718FF4007288D000839AE7000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00007995F400839EF50090A8F60090A8F600859FF500A0B4F7006586F3004D72
- F1005378F1005378F1005378F1005378F10094ABF6004C66BE002553EE004F6A
- C50000000000000000000000000000000000000000005672CE00586FBE00738C
- DE007D97F1007C97F1007C97F1007C97F1007C97F1007C97F1007C97F1007C97
- F1007C97F1007C97F1007C97F1007C97F1007C97F1007C97F1007C97F1007D97
- F1007E99F1007790E200526DC700BFCCF5004C66BD002957EE002C59EE00BCCA
- FA007D98F500486FF0002C59EE002C59EE002C59EE00FFFFFF002C59EE00D8E0
- FC0088A2F6002C59EE002C59EE007B97F4002C59EE00FFFFFF002C59EE00476E
- F000F8F8F8002C59EE00486FF0004C66BD000000000000000000000000000000
- 00009EB1F2006B8AF300738FEE00D3DBF8000000000000000000000000000000
- 00000000000000000000D3DBF800566EC2006B8AF3009EB1F2004F69C2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000089A0EC009FB3F700AFC0F900B8C7F900A6B9F800ACBDF8006C8BF3006485
- F3006F8DF3006F8DF3006F8DF3006F8DF30099AFF7004E68C000667DCB000000
- 00000000000000000000000000000000000000000000516BC200516BC200516B
- C200516BC200516BC200516BC200516BC200516BC200516BC20094ABF60095AC
- F70095ACF70093AAF600879DE600516BC200516BC200516BC200516BC200516B
- C200516BC200516BC200516BC2005671CD004E68BF003963EF003E67F0006384
- F300FFFFFF00FFFFFF00CFD9FB00FFFFFF00FFFFFF00FFFFFF00FFFFFF003E67
- F000ACBDF800FFFFFF00FFFFFF00ACBDF8003E67F000FFFFFF00FFFFFF00F2F5
- FE009FB3F7003E67F0004F74F1004E68BF000000000000000000000000000000
- 0000A4B6F3007391F4007C97ED00000000000000000000000000000000000000
- 0000000000000000000000000000526DC8007391F400A4B6F3005069C1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000768CD400B1C0F200B5C5F900B4C4F9009EB3F700A7B9F800718FF4006D8C
- F3007C97F4007D98F5007D98F5007D98F5009CB1F7004F69C1007991E3000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000007189E000A3B6F800A2B6
- F800A2B6F800A0B4F7007A8FD6006882DC000000000000000000000000000000
- 0000000000000000000000000000000000004F69C0003F68F000476EF000486F
- F000486FF000486FF000486FF000486FF000486FF000486FF000486FF000486F
- F000486FF000486FF000486FF000486FF000486FF000486FF000486FF000486F
- F000486FF000476EF0005075F1004F69C0000000000000000000000000000000
- 0000A9BAF300809BF500839CEF00000000000000000000000000000000000000
- 0000000000000000000000000000536EC900809BF500A9BAF300516BC2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006881DB00506AC200657BC9008196DB008FA2E5008EA5F0008FA7F6007794
- F400859FF5008AA3F6008AA3F6008AA3F6009FB3F700506AC200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFCDF600AFBFF500B0C0
- F900B0C0F900ACBDF6006078C9009FB1F0000000000000000000000000000000
- 000000000000000000000000000000000000506AC100466DF0004E73F1005075
- F1005075F1005075F1005075F1005075F1005075F1005075F1005075F1005075
- F1005075F1005075F1005075F1005075F1005075F1005075F1005075F1005075
- F1005075F1004E73F1004F74F100566FC3000000000000000000000000000000
- 0000A5B5EA00A2B6F8008AA3F6007A92E4000000000000000000000000000000
- 000000000000000000007A92E4007D90D600A2B6F800A5B5EA005C77D4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005871CF008A9C
- DC00A8B9F6009BB0F700A4B7F800A5B8F800A3B6F800536DC400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000007F94D800C4D1
- FA00C9D5FB008DA0DF006983DD00000000000000000000000000000000000000
- 000000000000000000000000000000000000BFCDF6008499E0006686F3005A7D
- F2006283F2006283F2006283F2006283F2006283F2006283F2006283F2006283
- F2006283F2006283F2006283F2006283F2006283F2006283F2006283F2006082
- F2005A7DF2006686F300526CC500BFCDF6000000000000000000000000000000
- 00008597D800B3C3F90097ADF700637ACA0092A7EC0000000000000000000000
- 00000000000092A7EC00637ACA0096AAEE00B3C3F9008597D800849BE8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005872
- CF00758BD20097ADF70097ADF700A0B4F700A1B5F700546EC500000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000667DCD00BCCA
- F700CDD8FB006D84CF009FB1F000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000536DC60090A2E200718F
- F4006787F3006B8AF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8B
- F3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3005D80
- F200718FF40090A2E200BFCDF600000000000000000000000000000000000000
- 00005B74C900B9C6F200B2C2F9009FB1EF00657BCB007C92E500000000000000
- 0000D3DBF900657BCB009FB1EF009AAFF700B9C6F2005B74C900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006883DC00A7B9F40098AEF700849EF5009EB3F700556FC600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005771C900A9B8
- EC00CAD5FB005771C80000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFCDF600536EC70091A4
- E2006384F300708EF4007592F4007592F4007592F4007592F4007592F4007592
- F4007592F4007592F4007592F4007592F4007592F4007592F4007290F4007491
- F40091A4E200536EC70000000000000000000000000000000000000000000000
- 0000000000006B84DE008093D600BCCAFA00ACBDF800A7B9F800AFBFF500AFBF
- F500ADBDF600ACBDF800BCCAFA00C5D1F9006B84DE0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000093A7ED00677ECD009DAFEE0094ABF6005771C800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000009FB1F000667D
- CD009AAFF40093A8ED0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C1CD
- F60099A9E3008CA5F6007894F40086A0F50086A0F50086A0F50086A0F50086A0
- F50086A0F50086A0F50086A0F50086A0F500839EF5007894F40093AAF6005670
- C800C1CDF6000000000000000000000000000000000000000000000000000000
- 000000000000000000006B85DE00C2CEF400C2CFFA00B7C7F900A9BBF800A9BB
- F800B0C0F900C2CFFA00C2CEF400798ED5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000093A8ED005D76CA008DA5F6005771C800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005771
- C9008297E1000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005771C9009AAAE300ABBDF8008AA3F6008EA6F6008FA7F6008FA7F6008FA7
- F6008FA7F6008FA7F6008FA7F6008EA6F6007E99F500ABBDF8009DACE500C1CD
- F600000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E76CC008D9EDB00B5C2ED00C6D2F800C6D2
- F800C6D2F8008D9EDB005E76CC00879CE9000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000C1CDF6008FA2E5005771C800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000647E
- DA00667DCD000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000C1CDF6005771C9009DACE50090A8F60099AFF7009DB2F7009FB3F7009FB3
- F7009FB3F7009EB3F7009DB2F70098AEF700ABBDF8009DACE5005771C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000C1CDF6005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005874CF00C1CDF600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D6D6D600CDCDCD00C7C7C7007487C6002938
- 6D0025346A00C5C5C500C7C7C700CBCBCB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005E72B6002632
- 5B0026325B0026325B0026325B0026325B0026325B0026325B0026325B002632
- 5B0026325B0026325B0026325B0026325B0026325B0026325B00687BBC00CFCF
- CF0000000000000000000000000000000000000000000000000000000000D3D3
- D300C0C0C00025346D0027315900273159002731590027315900273159002731
- 590027315900273159002731590027315900273159002E3D7300C0C0C000CBCB
- CB00DEDEDE000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000DFE5F90032406C005261
- 970046568B00455AA500DFE5F900000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004C64B4003F59AE002C52
- D2000D35BA000E36BB000E36BB000E36BB000E36BB000E36BB000E36BB000E36
- BB000E36BB000D35BA000C34BA00284ECE00142A74002240A6003C54A5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000293973004E67B80003269B0003269B0003269B0003269B000326
- 9B0003269B0003269B0003269B0003269B004E67B80029397300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000B7C5F100293C7A0045548D0017369D001C3A
- 9E00032083003F57A70043528600283873000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000006E85CF00273773002534690025346900364D96006E85
- CF00000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000354C97004A68CE003358
- D600355AD200365AD200365AD200365AD200365AD200365AD200365AD200365A
- D200365AD2003358D2002C52D1004166DF000A2479001335A500425FC0000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000002B3C77004E68BC0003279F0003279F0003279F0003218700021C
- 700003228A0003279F0003279F0003279F004E68BC002B3C7700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000334685006F7EB1003F5AB20003269B002946
- A900032288000F2F99003F58A90048599300B6C5F10000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00007287D100293B7900233576000C2A8F000C2A8F000C2A8F00172F82002335
- 7600293B79000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002E407F005271DE004166
- E2005374E3005677E4005777E4005777E4005777E4005777E4005777E4005777
- E4005777E4005072E3004267E0005275EA0003218700092EA9004160CA000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000002D3E7C004E68BF000328A4000328A4000328A40003238C00FFFF
- FF0003238F000328A4000328A4000328A4004E68BF002D3E7C00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000007483B4003D59B800072CA4000328A1002947
- AD000321870003269A00072999003751AA003244840000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000293B7B00143090000328A1001638A8001638A8001638A8000328A1000328
- A100143090004F67B60000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003C54A30033468A003346
- 8A0033468A003A4C8B0030438400304384003043840030438400304384003043
- 84003043840030438400304384003043840003249100042DB500365BD9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000031448500506BC700042BAE00042BAE00042BAE00042BAE00042B
- AE00042BAE00042BAE00042BAE00042BAE00506BC70031448500000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000006880D0006170A400173CB7001036B5001237B5000F34B1003D5B
- BF0006258B00062BA7000429A3000328A000465FB0003D4D81006179C7000000
- 0000000000000000000000000000000000000000000000000000788DD9002F44
- 8D002045BD004B68CA00566FBF003E509000374D9A00374D9A004D609F00566F
- BF002045BD002648B70044569700788DD9000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000364A8F003358D30003279F0003279F0003279F0003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F00042AA900042EBB00375DDC000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000034468900506CCA00042CB300042CB300042CB300042CB300042C
- B300042CB300042CB300042CB300042CB300506CCA0034468900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000BAC7F200455796008496D300153BBC00183EBD00193EBC001F44BC004361
- C60008278E000D32AE000A2FAB00052AA6001F3FAA00485FAA00324279000000
- 0000000000000000000000000000000000000000000000000000374D98001E3F
- AD00506ED3005C75C60042559800D0D8F70000000000000000006B83D3004255
- 98005C75C6000B35C000546EC1003A509A000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000384D9500375DDE000430C2000430C2000430C2000430C2000430C2000430
- C2000430C2000430C2000430C2000430C2000430C2000430C200375DDE000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000036498E004F6CCD00042DB800042DB800042DB800042DB800042D
- B800042DB800042DB800042DB800042DB8004F6CCD0036498E00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000465FB2008B98C8004968D0001E44C4002147C6002146C500284CC4004866
- CC000B2B94001439B7001035B2000D32AE000429A500324FB2004D5E98000000
- 000000000000000000000000000000000000000000007B92DD00354EA200113C
- CC005F78CF004559A100889DE30000000000000000000000000000000000889D
- E3004559A100133ECC003156D3005165AC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00003D54A000375EE3000433CE00829DF500829DF500829DF500829DF500829D
- F500829DF500829DF500829DF500829DF5000433CE000433CE00375EE3000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003A4F9700506ED4000430C2000430C2000430C2000430C2000430
- C2000430C2000430C2000430C2000430C200506ED4003A4F9700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000091A0D1004769D800234BD1003055D4003055D4002F54D3004062D4005371
- D7001132A0002146C5001D42C100193EBC001035B3000A2FAD002C4BB4003F55
- A2000000000000000000000000000000000000000000435AB000254DD4003059
- E2004D63B000D1DAF80000000000000000000000000000000000000000000000
- 0000D1DAF800355BDC001E4BE0006682E0000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004057A600375FE6000636D4000737D4000737D4000737D4000737D4000737
- D4000737D4000737D4000737D4000737D4000737D5000636D400375FE6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003C529C004F6ED7000431C7000431C7000431C7000431C7000431
- C7000431C7000431C7000431C7000431C7004F6ED7003C529C00000000000000
- 000000000000000000000000000000000000000000000000000000000000D1DA
- F8008EA2E6002A52D7002F56D800375CDB00375CDB00365BDA004668DA005876
- DC001334A300274CCB002348C7001F44C300163BB9000F34B3001035AF003B4C
- 8400CED7F70000000000000000000000000000000000465EB400355BE0003660
- EB004A64BE000000000000000000000000000000000000000000000000000000
- 000000000000355CE1002250E9006986E7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000435BAD003961E8000D3DDB00103FDB00103FDB00103FDB00103FDB00103F
- DB00103FDB00103FDB00103FDB00103FDB000F3EDB000D3DDB003A62E8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F55A0004F6FDB000432CC000432CC000432CC000432CC000432
- CC000432CC000432CC000432CC000432CC004F6FDB003F55A000000000000000
- 000000000000000000000000000000000000000000000000000000000000677F
- D4006683E6002E56DD00395FDF003F64E1003E63E0003D62DF005777E2005E7C
- E2001638A9002D52D100294ECD00254AC9001B40BF00153AB9000E34B3004A5C
- 9D005B74C300000000000000000000000000000000004962B9004167E700305C
- EE004D68C2000000000000000000000000000000000000000000000000000000
- 0000000000003059E2003661EF006D8AEB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004962B8003E66EE001B4BE80092A9F60092A9F60092A9F60092A9F60092A9
- F60092A9F60092A9F60092A9F60092A9F6002250E9001C4BE8004169EE000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000435AAA005576E3001441D8001542D8001542D8001542D8001542
- D8001542D8001542D8001542D8001441D8005576E300435AAA00000000000000
- 0000000000000000000000000000000000000000000000000000D2DBF8005C71
- BB00365FE800446AEA004B70EC004C71EC004B70EB004B70EB006785EB006987
- EA001B3EB200395EDC003459D8003055D400264BCA002045C400183EBE004A65
- C0003F508C00CED7F7000000000000000000000000005772CE006C85DE003C65
- EF006A80CD007990E20000000000000000000000000000000000000000000000
- 00007990E2003F68F0006989F300748CDF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004B65BD004068F0002352ED002E5AED002E5AED002E5AED002E5AED002E5A
- ED002E5AED002E5AED002E5AED002E5AED002C59ED002352ED00446BF0000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000465EAF005879E7001E4ADE001F4BDE001F4BDE001F4BDE001F4B
- DE001F4BDE001F4BDE001F4BDE001E4ADE005879E700465EAF00000000000000
- 00000000000000000000000000000000000000000000000000008EA3E9007E90
- D1003D65ED004D72F0005277F0005378F0005277F0005176EF00708DF0006E8B
- EE001E41B7003F64E1003A5FDD00355AD9002B50CF00254AC9001D43C3003858
- C200495C9E008499DF00000000000000000000000000839AE600667DCC00577B
- F2005B7BE800576EC10091A4EB000000000000000000000000000000000091A4
- EB00516ABF00597CF2007E99F500677ECC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004D67BE00426AF0002A57EE003862EF003862EF003862EF003862EF003862
- EF003862EF003862EF003862EF003862EF003560EF002B58EE00476EF0000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004861B4005B7CEA002853E4002954E4002954E4002954E4002954
- E4002954E4002954E4002954E4002853E4005B7CEA004861B400000000000000
- 00000000000000000000000000000000000000000000000000006D87DD0091A3
- DF00476EF000567AF2005A7DF2005B7EF2005A7DF200587CF2007794F4007390
- F2002044BB004469E5004065E2003A5FDD002F54D3002A4FCE002248C8002C4F
- C1004D62AB005E76C70000000000000000000000000000000000526BC3008199
- E8005075F1005475E200526BC000D3DBF80000000000000000007990E300526B
- C0005878E3007290F4008AA0E900526BC30000000000000000004E67C1005C74
- C4004E67C1000000000000000000000000000000000000000000000000000000
- 00004F69C000466DF0003963EF00A6B9F800A6B9F800A6B9F800A6B9F800A6B9
- F800A6B9F800A6B9F800A6B9F800A6B9F800496FF0003A64EF004E73F1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004D67BE006182F1003C65EE003E66EE003E66EE003E66EE003E66
- EE003E66EE003E66EE003E66EE003B64ED006182F1004D67BE00000000000000
- 0000000000000000000000000000000000000000000000000000516CC700AEBE
- F300567AF2006586F3006989F3006989F3006888F3006686F3007D98F5007D98
- F5002549BF004E73ED00486DE9004469E500385DDB003257D6002A50CF002348
- C400506BC3003D539D0000000000000000000000000000000000000000006881
- DA00869FF1006D8CF3005F81F2005679EB004C70E8004D71E7005C7FF2006D8C
- F300708EF4006586F300577BF2004E6CD500BFCDF600000000005069C1006384
- F3005069C1000000000000000000000000000000000000000000000000000000
- 0000506AC100486FF0004068F0005579F1005579F1005579F1005579F1005579
- F1005579F1005579F1005579F1005579F1005176F1004169F0005075F1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005069C0006485F300466DF000496FF000496FF000496FF000496F
- F000496FF000496FF000496FF000466DF0006485F3005069C000000000000000
- 00000000000000000000000000000000000000000000000000004F69C000AFBF
- F4005A7DF2006989F300708EF400718FF4006F8DF3006D8CF3007E99F500829C
- F500274ABF005378F0004D72ED00476CE8003B60DE00355AD9002D53D3001940
- C300526CC5003C4F910000000000000000000000000000000000000000000000
- 0000657CCC008FA3EA00839EF5006283F2005277F1005C7FF20086A0F50097AD
- F700A1B3F1006D8CF3006C8BF3005479F100516BC400BFCDF600516BC2006586
- F300516BC2000000000000000000000000000000000000000000000000000000
- 0000516BC2004A70F000486FF0005F81F2005F81F2005F81F2005F81F2005F81
- F2005F81F2005F81F2005F81F2005F81F2005A7DF200496FF0005378F1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000516AC1006888F3005075F1005277F1005277F1005277F1005277
- F1005277F1005277F1005277F1005075F1006888F300516AC100000000000000
- 0000000000000000000000000000000000000000000000000000506AC100AFBF
- F400577BF2006787F300708EF4007794F4007693F4007491F4007C97F40086A0
- F500294CBF00577BF2005176EF004B70EB003E63E100355BDB002C53D400163E
- C500536DC7003D50940000000000000000000000000000000000000000000000
- 0000849AE800576FC7007085D100859DEF00849CEF00849CEF00859AE4007389
- D3005770C500839EF5007592F4006F8DF3005270D600526CC500526CC3006A8A
- F300526CC3000000000000000000000000000000000000000000000000000000
- 0000556FC5004D72F1005378F100B8C7F900B9C8F900B9C8F900B9C8F900B9C8
- F900B9C8F900B9C8F900B9C8F900B9C8F9006C8BF3005579F1005C7EF000536D
- C400536DC400536DC40000000000000000000000000000000000000000000000
- 000000000000536CC3006E8DF30092A9F60094ABF60094ABF60094ABF60094AB
- F60094ABF60094ABF60094ABF60091A8F6006E8DF300536CC300000000000000
- 0000000000000000000000000000000000000000000000000000526CC300ADBD
- F4008BA4F60099AFF7009EB3F7008BA4F6007491F4007290F4007D98F5008DA5
- F6002C4EBF005A7DF2004F74F1004269EE005D7DE9007993E900869DE8007B92
- E0008397D8004054980000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000556EC700768EDE0087A1F500829DF5007290F4006A83DB007C97
- F400556EC5000000000000000000000000000000000000000000000000000000
- 00005670C6005C7DEA005579F1007C97F4007D98F5007D98F5007D98F5007D98
- F5007D98F5007D98F5007D98F5007D98F5007290F4005A7DF2005E80F0003761
- ED003761ED00456AE50000000000000000000000000000000000000000000000
- 000000000000546DC400708EF400042DB5000429A80003269C0003208300031E
- 79000320810003269A000429A700042CB300708EF400546DC400000000000000
- 0000000000000000000000000000000000000000000000000000536DC400ABBB
- ED008295D7006F84CE008599DA00B3C2F300B4C4F90091A8F6006B8AF30089A2
- F6002A4DBF004B71F100466DF0006787F30093A4DD008092CF00677ABC008797
- CD00A7B3DC0041569A0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000C1CDF600566FC7007A91DF008DA5F6008DA5F60086A0F500839E
- F500566FC6000000000000000000000000000000000000000000000000000000
- 0000556FC7005B7CEA00587CF2007F9AF500849EF50086A0F50086A0F50086A0
- F50086A0F50086A0F50086A0F500859FF5007592F4005B7EF2005B7EF2000834
- C5000A36CA004568DA0000000000000000000000000000000000000000000000
- 000000000000556EC5007391F4009EB3F700A3B6F800A3B6F800A3B6F800A3B6
- F800A3B6F800A3B6F800A3B6F8009EB3F7007391F400556EC500000000000000
- 00000000000000000000000000000000000000000000000000005873CF00536E
- C7009FB1F000AEBEF3009FB1F0005A74C9008E9FDD00B4C3F5006888F3007995
- F4002448BF004E73F1007C97F200889BDC006680D9009CAFEE00ACBCF1006780
- D400445AA6004860B10000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005E79
- D6005771C8005771C8005771C8005771C80095ACF70095ACF70095ACF70086A0
- F5005771C8000000000000000000000000000000000000000000000000000000
- 00006B85DE005B78DB005479F1006283F2006B8AF3006F8DF3007391F4007391
- F4007391F4007391F400718FF4006D8CF3005C7FF2004A70F0004A70F000324B
- 9C002648B700506BC20000000000000000000000000000000000000000000000
- 0000000000005770C7007693F400A6B9F800AFC0F900B1C1F900B1C1F900B1C1
- F900B1C1F900B1C1F900AFC0F900A5B8F8007592F4005770C700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000859BE900ACBCF1009CB1
- F7002A4FC8005E77CA00859BE900000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005872
- C9006E8BED007C96EE007F99EF00859EF00098ADF2009AAEF20097ACF2007C96
- EE005872C9000000000000000000000000000000000000000000000000000000
- 0000AFBFF3005D76CA005879E5005277F1005579F100577BF200587CF200587C
- F200587CF200587CF200587CF200567AF2005075F1004C72F100446BF0006379
- C500526AB9005B72C40000000000000000000000000000000000000000000000
- 0000000000005871C8007491F400042DB5000429A80003269C0003208300031E
- 79000320810003269A000429A700042CB3007391F4005871C800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000008497D900AEBF
- F8007189DA007C93E50000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005B76
- D2005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005B76D2000000000000000000000000000000000000000000000000000000
- 000000000000859CE9005771C8005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005771C90093A8ED0000000000000000000000000000000000000000000000
- 0000000000005872C9006D8CF3006686F3007391F4007A96F4007E99F5007F9A
- F5007E99F5007A96F4007290F4006485F3006D8CF3005872C900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005A76D200A1B0
- E80094A4DA000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004E6ACE005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005B76D200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005A76
- D2005A76D2000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000253671003E4D
- 8200495991008699DD0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004A60AE003544
- 7900485EA900435BAC00435BAC00435BAB00435BAB00435BAA00435BA900435A
- A8004259A7004259A600435AA6004259A500435AA500435AA500435AA5004556
- 910033406D00455BA50000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000008197DC0044579500405B
- B8005B73C4005A679400293D8500B9C6F100000000000000000000000000293D
- 8500293D8500B9C6F100000000000000000000000000647BCB00364784004761
- B500072BA3000328A1000328A00003279F0003279F0003279F0003279D000326
- 9C0003269C0003269A0003269A00032699000325970003259700032596002643
- A3004A5FA6003342760000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000008197DD002A3C7B003755BB003E5B
- BD008798D100465BA000465BA0002A3E83000000000000000000BAC6F200465B
- A000465BA0002A3E830000000000000000000000000033478A004B61AA002748
- B5000429A7000429A7000429A6000429A5000328A4000328A3000328A2000328
- A1000328A00003279F0003279F0003279E0003279D0003269C0003269B000326
- 9A002745A8004B5E9E0000000000000000000000000037477F00CDD6F6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000354787004963B7002B4EC0007188D4006273
- B0004B64B500123DCC00123DCC004A6BD80032499A0032499A004B64B500123D
- CC00123DCC004A6BD800384FA2000000000000000000314588004361C700042C
- B300042CB2003252BF00DEE3F400C0CAEA003353BD00042BAD00042BAC00425F
- C000FFFFFF008194D400042AA900042AA900BFC8E800FFFFFF00FFFFFF000328
- A4000328A300435EBB000000000000000000000000006D789F004B62B1000000
- 000000000000000000000000000000000000000000000000000000000000293C
- 7A00283871002838710028387100283871002838710028387100283871002838
- 71002838710028387100293C7A00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000005169BE004A64BA002A4EC400042EB9007289D7006677
- B8004F69C0001240DA000535D8001240DA004E69BF004E69BF004B6EE3000535
- D8001240DA004B6EE3003D55AC00000000000000000034488C004362CA00042D
- B800042DB600DEE4F500FFFFFF00FFFFFF00AFBBE200042BAF00042CB100617A
- CE00FFFFFF008191CA000429A800042BAD00C0CAEA00FFFFFF00FFFFFF00042A
- AA00042AA900425EBD000000000000000000000000007D89B10035447D00A3B4
- EB00000000000000000000000000000000000000000000000000000000003447
- 8400949DBE00435DB600435DB600435EB6004761B7004963B8004A64B8004E67
- BB004E67BB004C66BA002B3C7600000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000546CC000384C90002B50C800042FBE00042FBE002B4FC700869A
- DC005E74BB004C71ED001344E7000539E600476DED00476DED001344E7001344
- E7004C71ED00536DCA00BECCF5000000000000000000364A91004363CE000530
- BE00042EBC00FFFFFF00FFFFFF00FFFFFF00FFFFFF000429A700042DB60091A3
- DE00FFFFFF006177BF00042BAC00042CB300EEF1F900FFFFFF00DEE3F100042B
- AE00042BAE00425FC100000000000000000000000000707DAA004B66C0004959
- 9400000000000000000000000000000000000000000000000000000000000000
- 0000BAC6F20094A0C8007A8ED1002647B6002C4CB8003150B9003755BB00415E
- BF00435FBF003856BC0031438300000000000000000026356E0026356E002635
- 6E0026356E0026356E0026356E0026356E0026356E0026356E0026356E002635
- 6E0026356E0026356E0026356E0026356E0026356E0026356E0026356E002635
- 6E0026356E0026356E0031458E00000000000000000000000000000000000000
- 0000394E97004D68C5002C52D1000431C7000431C7000431C6000431C6000431
- C5003358D0006478C2005C76D2005378F1001748EC001748EC001748EC005C76
- D200435CB600BECCF5000000000000000000000000003A509A004768D700133D
- CA00153EC9004062D300E0E5F600C3CCEA001A3CAD000A32B700647ED800FFFF
- FF00FFFFFF000429A700042FBE00042FBD00FFFFFF00FFFFFF008F9FD400042D
- B800042DB8004362C90000000000000000000000000054639C006980CC004964
- BF00546CC0000000000000000000000000000000000000000000000000000000
- 0000000000003C5094006E7FBC00516CC9003858C1003E5CC2004462C5004F6B
- C800536ECA004764C600344789000000000000000000435FBC00435FBC00435F
- BC00435FBC00435FBC00435FBC00435FBC00435FBC00435FBC00435FBC00435F
- BC00435FBC00435FBC00435FBC00435FBC00435FBC00435FBC00435FBC00435F
- BC00435FBC00435FBC002C3E7B0000000000000000000000000000000000BCC9
- F400536BBD00385DD7000C39CE000E3ACE000E3ACD000E3ACD000E3ACC000E3A
- CC003B5FD600667BC4006981D5006787F300315DEF00315DEF00315DEF006981
- D500455FB800BFCCF5000000000000000000000000003C52A000496BDA001C46
- D1002149D1001F48D0001D44C900173CB600173DBD001640CB00E1E6F800FFFF
- FF00FFFFFF000B33B8000A35C4000833C300FFFFFF00FFFFFF00516BBF00042F
- BE00042FBD004363CD000000000000000000000000003D5196008596D0003F5F
- C80040539500556EC30000000000000000000000000000000000000000000000
- 000000000000384D9600586FBA00516DCD004563C9004C69CC00516DCD005C76
- D0005F7AD100536FCD00374C8F0000000000000000004361C700042CB400042C
- B400042CB400042CB400042CB400042CB400042CB400042CB400042CB400042C
- B400042CB400042CB400042CB400042CB400042CB400042CB400042CB400042C
- B400042CB400042CB40032468800000000000000000000000000000000003E55
- AB004266DD001A45D6001944D5001D47D5001C46D4001C46D4001D47D4004669
- DB0092A4E6006F87D6007F9AF500567AF2004C72F1004C72F1004C72F1007F9A
- F5006F87D6004761BA000000000000000000000000003F56A5004C6EDF00244D
- D7002C53D7002A51D6002951D600254DD400234BD3002F55D500FFFFFF00FFFF
- FF00EFF2F900163FCA00153FCB00133DCA00FFFFFF00FFFFFF00193CAE000833
- C4000632C3004364D100000000000000000000000000B3C0EF006475B0007089
- DA002D52CE004E6CCF004F64AF005E77CC009CAEED0000000000000000009CAE
- ED004C65BC005E78D1005C78D8005371D700607CD9006681DB006A85DC00758E
- DF007A92E0006883DB003E539D0000000000000000004568DE000D3BD5000E3C
- D5000E3CD5000E3CD5000E3CD5000E3CD5000E3CD5000E3CD5000E3CD5000E3C
- D5000E3CD5000E3CD5000E3CD5000E3CD5000E3CD5000E3CD5000E3CD5000E3C
- D5000E3CD5000C3AD5003F57A5000000000000000000ABBCF100435AA9005B78
- D9002E57E000345CE100385FE200385FE100385FE100385FE0008FA5EE00778B
- CE007F93DA0088A2F600819BF50087A1F500899BDD00899BDD00A5B8F800819B
- F50088A2F600A5B8F8004E68C3000000000000000000445CAF005073E700345C
- E2004267E3006F8BE9006D89E800DAE1F900FFFFFF00FFFFFF00FFFFFF007A8F
- D4002B4FC7002D54D900385DDA00F0F3FC00FFFFFF005771C8002147C8001C46
- D1001540D0004668D900000000000000000000000000000000004960AE0095A5
- D900113DCE002F55D4004B6CDA004D64B200455BA5004359A6004258A500485E
- A6005269B9006480DE005A78DD00627EDE006E88E100728CE1007790E3008299
- E400869CE600718BE1004158A30000000000000000004D72EA002652E6002A56
- E7002A56E7002A56E7002A56E7002A56E7002A56E7002A56E7002A56E7002A56
- E7002A56E7002A56E7002A56E7002A56E7002A56E7002A56E7002A56E7002A56
- E7002955E700224FE500465FB40000000000000000004E68C3007B8DCC006383
- EC003E65E6004469E700456AE700466BE700456AE600456AE60096ABF000798C
- D0008699DD00A1B5F700A1B5F700B7C7F9006E82CB006E82CB00899CDE00A1B5
- F700A1B5F700B7C7F9004F6AC5000000000000000000465FB4005275EA003D64
- E7004D71E900FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008296D800375A
- CD003C62E100385EDF00BFCBF400FFFFFF00BBC6E900284BBE002D55DA002750
- D9001D48D600486BDD0000000000000000000000000000000000889CE2008090
- C5001F49D600244DD7003057D9005A79E0005A78DE005976D6005C78D600617F
- E2006B86E300617FE2006B87E400708BE5007993E7007F97E800849BE80092A7
- EB0090A5EA007690E500455CAA0000000000000000005579F1003F68F000456C
- F000456CF000456CF000456CF000456CF000456CF000456CF000456CF000456C
- F000456CF000456CF000456CF000456CF000456CF000456CF000456CF000456C
- F000446BF0003761EF004C66BD000000000000000000475FB200B8C5EF005175
- ED004E73EB005376EC005376EC005376EC005477EC005376EB006F8CEE00A9B9
- F1006F84CD00C0CEFA00C0CEFA008FA0DF00A9B9F000A9B9F0006F84CD00C0CE
- FA00C0CEFA008FA0DF00BFCDF60000000000000000004963B9005478EE00456B
- EB00587BED00FFFFFF00FFFFFF00FFFFFF00FFFFFF00B9C5EB004567D900486D
- E700456AE60094A9F000FFFFFF00FFFFFF004D69C800365BD400395FE0003058
- DE00244EDB004A6DE100000000000000000000000000000000000000000098AB
- EA0098ABED004066E600466BE7005376E900587AE9005D7DEA006987EC006E8B
- EC00738FEC007E98EE00839CEF0089A1EF0094A9F10099ADF10098ADF100CCD5
- F400B2C2F5006886EB004C65B90000000000000000005D80F2006586F3007491
- F4007B97F4007B97F4007B97F4007B97F4007B97F4007B97F4007B97F4007B97
- F4007B97F4007B97F4007B97F4007B97F4007B97F4007B97F4007B97F4007995
- F4006F8DF300597CF200516BC20000000000000000008095DE00A9BBF800577B
- F2006F8DF3006F8DF3006F8DF3006F8DF3006F8DF3006F8DF3006F8DF300708E
- F4008AA3F5007F91D3007F91D300B4C3F4006F8DF2006F8DF2008AA3F4007D91
- D2007D8FD300AFBFF3006982D90000000000000000004D67BE00597CF2005579
- F1006E8DF3006B8AF0006785EA006585EE006686F3006384F2006082F1006888
- F100C0CDF800FFFFFF00FFFFFF00AEBBE7005074EA005074EC004D72EA00456A
- E900345DE6004E72E90000000000000000000000000000000000000000000000
- 0000A2B0E0007E99F0004E73EC005F80EE006686EF006B89EF007692F0007B96
- F100809AF1008BA3F30091A8F30096ACF400A1B4F500A0B3F500A5B7F500677D
- C800ABB9E8009BB0F4005069BF0000000000000000005E7DEA00718DEC007792
- ED007A95EC007A95EC007A95EC007A95EC007A95EC007A95EC007A95EC007A95
- EC007A95EC007A95EC007A95EC007A95EC007A95EC007A95EC007A95EC007993
- ED007590EC006D8AEC00546EC500000000000000000099ACEE00B1C1F9007290
- F400839EF5007F9AF5007D98F5007D98F5007D98F5007D98F5007D98F5007D98
- F5007D98F500BBCAFA00BBCAFA0097ADF7007F9AF5007D98F5007D98F500B0C0
- F800A5B8F7007995F400536ECA0000000000000000004E68BF005B7EF2005D80
- F2007A96F4007894F4007693F4007391F400718FF4006F8DF300A1B5F700EBF0
- FD00FFFFFF00FFFFFF00B4C0E9005370D0005C7EF0005B7EF000597CEF004E73
- ED003B63EB005074EC0000000000000000000000000000000000000000000000
- 00005A74C900B4C1EC00829DF4006C8BF3007391F4007995F400829DF40087A1
- F5008DA5F50098AEF6009DB2F600A3B6F700A1B5F700A5B8F700BECBF600617C
- D8005A74C900A4B4E800546EC50000000000000000005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005A75D1000000000000000000A4B4EE00D3DCFB0087A1
- F50097ADF70092A9F6008EA6F6008AA3F6008AA3F6008AA3F6008AA3F6008AA3
- F6008AA3F60097ADF70096ACF70094ABF6008FA7F6008DA5F6008BA4F6007F9A
- F5006C8BF3005B7EF2004760B90000000000000000004F69C0005D80F2006586
- F300849EF500829DF500819BF5007E99F50093AAF600C3D0FA00FFFFFF00FFFF
- FF00FFFFFF009BABE1005E78D1006987ED006888F3006686F3006586F300597C
- F200436AEF005277F00000000000000000000000000000000000000000000000
- 00000000000093A8ED006D82CE00B1C1F8008AA3F600829DF5009AAFF700A1B5
- F700A6B9F800ACBDF800A8BAF800AFC0F900B5C4F4007E93D6005A76D2000000
- 000000000000C1CDF6005771C900000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000096AAEC00DFE6FC00D2DB
- FB00B5C5F900B7C7F900B4C4F900ADBEF800AABCF800A6B9F800A0B4F700B3C3
- F800DCE3F900DDE4FC00B6C6F900B3C3F900AFC0F900AEBFF800ACBDF80097AD
- F7007F9AF5006787F3004861B8000000000000000000516BC2006082F200708E
- F4009AAFF700FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00D5DBF10098A8
- DC00758BD300859FF500839EF500829CF5007F9AF5007D98F5007B97F4006989
- F3004F74F1005579F10000000000000000000000000000000000000000000000
- 00000000000000000000BBC9F50095A6DE00C2CEF300B9C8F900A8BAF800A4B7
- F800A7B9F800B6C6F900C2CFFA00C1CEF800647CCD00647EDA00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000798FD900DCE3FC00E6EB
- FD00BECCFA00C1CEFA00C1CEFA00BBCAFA00B4C4F900ACBDF800A4B7F800A4B4
- EA0093A3DB00E7ECFD00D9E1FC00BBCAFA00BCCAFA00BBCAFA00B6C6F9009DB2
- F700839EF5006F8DF300516AC7000000000000000000526CC3005F81F200718F
- F400A2B6F800FFFFFF00FFFFFF00E8EBF600D9DEF000B2BDE3008598D9008CA1
- E60092A9F40090A8F6008EA6F6008CA5F60089A2F60087A1F500859FF5006E8D
- F3005075F1005579F10000000000000000000000000000000000000000000000
- 00000000000000000000000000007C93E400667FCC008799D900BDC9F100C0CD
- F600C1CDF600A5B5EA008497DB00657DCD009DB1EF0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000637AC700B8C7F800E6EB
- FD00DDE4FC00C6D2FA00C3D0FA00BBCAFA00B3C3F900A5B8F800A7B8F3006177
- C4005068BE00E6ECFD00E7ECFD00E0E6FC00BCCAFA00BBCAFA00B6C6F9009BB0
- F700819BF5007B97F400657FD8000000000000000000536DC4006685EC006C8B
- F300A3B6F800A4B5EE0092A1D30097A7DD0098A8E1009BACE700A2B6F800A1B5
- F7009FB3F7009BB0F70099AFF70097ADF70094ABF60091A8F6008CA5F6006B8A
- F3005075F1005E7EEC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFCDF600516AC3008699
- DD00DBE2FC00E7ECFD00E6ECFD00E4E9FD00D0DAFB00A6B6EB00536ECA000000
- 0000000000005C73C400A3B3EB00CBD6F900E2E8FD00E0E6FC00DEE5FC00C3D0
- FA008AA0EE006177C8000000000000000000000000007A92E5006079CC00728E
- EE007794F400829DF5008AA3F6008DA5F6008DA5F6008BA4F60089A2F60088A2
- F60087A1F500839EF500829DF500819BF5007B97F4007693F4006C8BF3005E80
- F2006786ED005F78CC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCDF600516B
- C7008499DE009CAEEF00A7B8F2008BA0E7007489D100526AC000000000000000
- 000000000000839AE7004F69C2006D82CD0091A7EE009FB2F10094A9EF006C85
- D9005870C3005E79D300000000000000000000000000000000005974CF00617A
- CD005F81F2006586F3006888F3006A8AF3006A8AF3006A8AF3006A8AF3006989
- F3006989F3006888F3006888F3006787F3006586F3006384F3006082F2005E7D
- E5006079CD006984DD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005975D1005069C0004F69C000526CC7006680DA00D3DBF800000000000000
- 0000000000000000000000000000839AE7004F68BF004F68BF004F68BF005E79
- D5009FB0EF000000000000000000000000000000000000000000000000007C93
- E5005771C8005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005771C8005771C8005771C8005D76
- CC007C93E5000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D3D3D300C2C2C200C0C0
- C000263159002631590026315900263159002631590026315900263159002631
- 5900263159002631590026315900263159002631590026315900263159002631
- 59002E3D7100C0C0C000D6D6D600000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005065A9005065A9005065A9005065A9005065A9005065A9005065A9005065
- A9005065A9005065A9005065A9005065A9005065A9005065A9005065A9005065
- A9002736660000000000000000000000000000000000C4C4C4004E63A6003D51
- 93003D5193003D5193003D5193003D5193003D5193003D5193003D5193003D51
- 93003D5193003D5193003D5193003D5193003D5193003D5193003D5193003D51
- 93003D5193004E63A600DBDBDB00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004F69BF000328A300FFFFFF00E5E9F600E5E9F600E5E9F600E5E9F600E5E9
- F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F6004F69
- BF002C3D7B0000000000000000000000000000000000000000003D57AE00435D
- B30007299A0007299A0007299A0007299A0007299A0007299A0007299A000729
- 9A0007299A0007299A0007299A0007299A0007299A0007299A0007299A000628
- 9A00435DB3003D57AE0000000000000000000000000000000000000000000000
- 00005972C900374D9E0034499400425AAE00768DD80000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000273465007287CC005971
- C3005971C3005971C3005971C3005971C3005971C3005971C3005971C3005971
- C3005971C3005971C3005971C3005971C3002734650000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000506AC400042AAA00FFFFFF00E6EAF700E6EAF700E6EAF700E6EAF700E6EA
- F700E6EAF700E6EAF700E6EAF700E6EAF700E6EAF700E6EAF700E6EAF700506A
- C4002F40800000000000000000000000000000000000000000003E58AF004660
- B9000F32A4001032A4001032A4001032A4001032A4001032A4001032A4001032
- A4001032A4001032A4001032A4001032A4001032A4001032A4001032A4000D30
- A3004661B9003E58AF0000000000000000000000000000000000000000005C75
- CF00536CC2005B77D4005874D200566EC1004C60A100354A9300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002A3A73006B86E1001639
- AC001639AC001639AC001639AC001639AC001639AC001639AC001639AC001639
- AC001639AC001639AC001639AC002446B7002A3A730000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000506BC800042CB100FFFFFF009397A5009397A5009397A5009397A5009397
- A5009397A5009397A5009397A5009397A5009397A500E6EAF800E6EAF800506B
- C8003245860000000000000000000000000000000000000000003F59B0004863
- BF00173AAE0015359F0015349C0015349C0015349C0015349C0015349C001534
- 9C0015349C0015349C0015349C0015349C0015349C0015349C0015359F001538
- AE004A65C0003F59B000000000000000000000000000000000005E79D3005269
- B900345CE4001744DB000434D200254CCF004666D300586DB6008499DF000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002C3E7B006984E1000328
- A4000328A4000328A4000328A4000328A4000328A4000328A4000328A4000328
- A4000328A4000328A4000328A400163AB2002C3E7B0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000506ED200042FBF00FFFFFF00E6EBF800E6EBF800E6EBF800E6EBF800E6EB
- F800E6EBF800E6EBF800E6EBF800E6EBF800E6EBF800E6EBF800E6EBF800506E
- D200374B92000000000000000000000000000000000000000000415BB2004D6A
- CA002649BF002343AC00E0DFDE00E0DFDE00E0DFDE00E0DFDE00E0DFDE00E0DF
- DE00E0DFDE00E0DFDE00E0DFDE00E0DFDE00E0DFDE00E0DFDE002343AC002246
- BE00506CCB00415BB200000000000000000000000000607AD1006881D5005176
- F1001344E8000639E3000537DD000434D2000433CE000935C900586EB700374A
- 8D00849BE0000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000033458900738DE7000A32
- B8000A32B800375BD2006B86E0006480DE00163CBC000A32B8000A32B8000A32
- B8000A32B8000A32B8000A32B8001C42C2003345890000000000000000003449
- 9100334589005E76C90000000000000000000000000000000000000000000000
- 00004F6ED6000431C500FFFFFF009398A6009398A6009398A6009398A6009398
- A6009398A6009398A6009398A6009398A6009398A600E6EBF900E6EBF9004F6E
- D6003A4F99000000000000000000000000000000000000000000425CB3004F6D
- D0002E52C8002949B300DCDBDA00F3F4F800F3F4F800F3F4F800F3F4F800F3F4
- F800F3F4F800F3F4F800F3F4F800F3F4F800DCDBDA00DCDBDA002949B300284D
- C500526FD100425CB300000000000000000000000000455EB7007C96EA004D72
- F1002856EE001445E8000639E3000535D8000434D2000433CE004162D100596E
- B700384A8E000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000364A91007E95E3002349
- C8002C51CF00607BD80044589B007A8CCE006884E200143CC300113AC200113A
- C200113AC200113AC200113AC2001E45C800364A910000000000869BE100627C
- D600607CDA004D62A40000000000000000000000000000000000000000000000
- 00004F6FDB000432CD00FFFFFF00E5EAF900E5EAF900E5EAF900E5EAF900E5EA
- F900E5EAF900E5EAF900E5EAF900E5EAF900E5EAF900E5EAF900E5EAF9004F6F
- DB003D539F000000000000000000000000000000000000000000435DB400516F
- D5003559CF003050BA00D8D7D600F3F4F800F3F4F800F3F4F800F3F4F800F3F4
- F800F3F4F800F3F4F800F3F4F800F3F4F700D8D7D600D8D7D6003050BA002F54
- CD005573D700435DB4000000000000000000000000004A62B600859DEE005176
- F1003C65EF002856EE001445E8000537DD000535D8000434D2000935C9004162
- D1005A6FB800859BE00000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005068BE00788DD3005B7A
- E0005375E400586DB4006D85D6004559A0007F96E1004063D8001841CA001841
- CA001841CA001841CA001841CA001841CA0042579E00000000003D55A8003B60
- DB002F55D600607EE200BDC9F400000000000000000000000000000000000000
- 00005073E5000536D900FFFFFF009398A8009398A8009398A8009398A8009398
- A8009398A8009398A8009398A8009398A8009398A800E6EBFB00E6EBFB005073
- E500425AAC000000000000000000000000000000000000000000455FB6005676
- E0004367DD003D5DC700DDDDDC00BABED100F3F3F700F2F3F700F2F3F700F2F3
- F700F2F3F700F2F3F700F2F3F700F2F3F700DDDDDC00DDDDDC003D5DC7003C61
- DB005B7AE100455FB6000000000000000000000000005570CB00859BE6007C97
- F4006384F3005075F1003C65EF001445E8000639E3000537DD000434D2000433
- CE000935C9005A70B9003A4D910096A7E1000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005D76CF006073
- BB00798ED200556FC70000000000BDCBF400576CB300859EF0002751DE002751
- DE002751DE002751DE002751DE002751DE00667CCB004058A8006B82D0002751
- DE002751DE003D63E3004E68C000000000000000000000000000000000000000
- 00005174EA00093BE200FFFFFF00E6EBFC00E6EBFC00E6EBFC00E6EBFC00E6EB
- FC00E6EBFC00E6EBFC00E6EBFC00E6EBFC00E6EBFC00E6EBFC00E6EBFC005174
- EA00465FB20000000000000000000000000000000000000000004660B7005778
- E5004B6EE3004463CC00E1E1E000858FAF00DBDEE800F2F3F700F2F3F700F2F3
- F700F2F3F700F2F3F700F2F3F700DBDDE700E1E1E000E1E1E0004463CC004368
- E2005D7DE6004660B7000000000000000000000000008197E5007386CE0091A8
- F6007693F4006384F3005075F1002856EE001445E8000639E3000535D8000434
- D2000433CE004162D100979DB700888786000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000738B
- DD004760BA00BECCF5000000000000000000445CB0008AA1EC002F59E6002F59
- E6002F59E6002F59E6002F59E6002F59E6006A88EE00748DE1006A88EE002F59
- E6002F59E6003C63E800516CC700000000000000000000000000000000000000
- 00005579EF001344E800FFFFFF00E7ECFC00E7ECFC00E7ECFC00E7ECFC00E7EC
- FC00E7ECFC00E7ECFC00E7ECFC00E7ECFC00E7ECFC00E7ECFC00E7ECFC005579
- EF004962B90000000000000000000000000000000000000000004761B8005A7B
- EA005376E9004A69D000E5E4E4007C86A700838BAC00B7BBCF00F5F6F900FEFE
- FE00FEFEFE00E2E5EC00B6BACD008089A900E5E4E400E5E4E4004A69D000496E
- E7006080EB004761B800000000000000000000000000000000004D66BE0094A5
- E300829DF5007794F4006384F3003C65EF002856EE001445E8000537DD000535
- D8000434D2008794C700C5C5C500B3B3B300B0B0B00000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005570CC008EA4EF00355FED00355F
- ED00355FED00355FED00355FED00355FED003E67EF00456CEF003962ED00355F
- ED00355FED00436AEF004761BA00000000000000000000000000000000000000
- 00005F81F2002856EE00FFFFFF00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EE
- FD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD005F81
- F2004D66BD0000000000000000000000000000000000000000004963BA005E80
- F2006283F2005876DA00ECEBEB007780A2007780A1007780A100F1F2F600F1F2
- F600F1F2F600C1C6D500747E9F00737D9F00ECEBEB00ECEBEB005876DA00577B
- F2006686F3004963BA00000000000000000000000000000000000000000090A4
- EA009AABE5009FB3F700849EF5006384F3005075F1003C65EF001445E8000639
- E3009BABE100CECECE00C4C4C400BBBBBB00B5B4B3008A898800B1B0B0000000
- 00000000000000000000000000000000000000000000000000006D87DD00637A
- C7007087D8005D77D30000000000D2DBF8005B72C10089A2F300456CF000456C
- F000456CF000456CF000456CF000456CF0007F98EA00647AC40090A3E400456C
- F000456CF000587CF2005671CE00000000000000000000000000000000000000
- 00006485F300325EEF00FFFFFF00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEF
- FD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD006485
- F3004E67BF0000000000000000000000000000000000000000004A64BB006082
- F2006989F3005F7BDA00EFEFEE00747E9F00747E9F00737D9F00F1F2F600F1F2
- F600F1F2F600E8EAEF00717A9D00717A9D00EFEFEE00EFEFEE005F7BDA005E80
- F2006989F3004A64BB0000000000000000000000000000000000000000000000
- 0000556DC0009BABE5009FB3F7007794F4006384F3005075F1002856EE00A7B7
- ED00E7E7E700D7D7D700CECECE00C4C4C400C5C5C500B5B4B4008B8A89000000
- 00000000000000000000000000000000000000000000AEBEF2005B72C200869F
- F0007B95EF00536CBF00D2DBF8007990E2007C8FD4007995F4004C72F1004C72
- F1004C72F1004C72F1004C72F1004C72F1006C83CD005771CE00687DC7005277
- F1004C72F1006C8BF3007990E200000000000000000000000000000000000000
- 00006989F3003D66EF00FFFFFF00989DAA00989DAA00989DAA00989DAA00989D
- AA00989DAA00989DAA00989DAA00989DAA00989DAA00EBF0FD00EBF0FD006989
- F3004F68C00000000000000000000000000000000000000000004B65BC006384
- F300718FF4006580DB00F2F1F100717A9D00717A9D00717A9C00F1F2F600F1F2
- F600F1F2F600F1F2F5006F7899006F789900F2F1F100F2F1F1006580DB006485
- F3006C8BF3004B65BC0000000000000000000000000000000000000000000000
- 000091A4EB00566FC1009CADE600849EF5007794F4006384F300B7C6F400F5F5
- F500EFEFEF00E0E0E000D7D7D700CECECE00BBBBBB00C5C5C500B5B5B500B1B1
- B1000000000000000000000000000000000000000000657FD9008195DD006F8D
- F3007794F400738AD5005D78D300556DC10089A0EC006686F3005277F1005277
- F1005277F1005277F1005277F1005277F1005E75C300D2DBF8004F69C5007B97
- F4005E80F200879FEF00D2DBF800000000000000000000000000000000000000
- 00007391F4005277F100FFFFFF00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1
- FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE007391
- F400516BC20000000000000000000000000000000000000000004D67BE006787
- F300809BF500728BDC00F7F7F6006C7697006B7597006B759600F0F1F500F0F1
- F500F0F1F500CDD1DC006972950069729400F7F7F600F7F7F600728BDC007290
- F400718FF4004D67BE0000000000000000000000000000000000000000000000
- 0000000000000000000091A5EB009DAEE6009FB3F700CCD5F300F8F8F800FAFA
- FA00F9F9F900EFEFEF00E7E7E700E0E0E000CECECE00C4C4C400BBBBBB00B6B5
- B5008B8A8900000000000000000000000000000000004E68BF008FA6F3005B7E
- F2006183F2007693F40094A9F300829CF5006485F3006183F2006183F2006183
- F2006183F2006183F2006183F2006A8AF3004E68BF0000000000000000004F68
- C1004E68BF006F89DF0000000000000000000000000000000000000000000000
- 00007794F4005C7FF200FFFFFF009DA1AC009DA1AC009DA1AC009DA1AC009DA1
- AC009DA1AC009DA1AC009DA1AC009DA1AC009DA1AC00EFF3FE00EFF3FE007794
- F400526CC30000000000000000000000000000000000000000004D67BF006989
- F30086A0F5007990DC00F9F9F900697295006972940068729400CDD0DC00F0F1
- F500F0F1F5006F77980067709100666F9100F9F9F900F9F9F9007990DC007894
- F4007491F4004D67BF0000000000000000000000000000000000000000000000
- 00000000000000000000000000005972C500D0D5E900F7F7F700F7F7F700F8F8
- F800FAFAFA00F5F5F500EFEFEF00E7E7E700D7D7D700CECECE00C4C4C400C7C7
- C700A6A6A500A9A9A9000000000000000000000000004F69C0008CA5F6006082
- F2006989F3006989F3006989F3006989F3006989F3006989F3006989F3006989
- F3006989F3006989F3006989F3006C8BF3004F69C00000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00007C97F4006787F300FFFFFF00F0F3FE00F0F3FE00F0F3FE00F0F3FE00F0F3
- FE00F0F3FE00F0F3FE00F0F3FE00F0F3FE00F0F3FE00F0F3FE00F0F3FE007C97
- F400536DC40000000000000000000000000000000000000000004E68C0006B8A
- F3008DA5F6007F95DD00FBFAFA0067709100666F9100666F9100656E9100656E
- 9100646E9000646E8F00636D8F00636D8F00FBFAFA00FBFAFA007F95DD007F9A
- F5007794F4004E68C00000000000000000000000000000000000000000000000
- 0000000000000000000000000000A2B2EC00BAB9B800ECECEC00F6F6F600F7F7
- F700F8F8F800F9F9F900F5F5F500EFEFEF00E0E0E000D7D7D700CECECE00C3C3
- C300BFBFBE00908F8F00000000000000000000000000506AC1008AA3F6006A8A
- F3007D98F5007E99F5007B97F400708EF400708EF400708EF400708EF400708E
- F400708EF4007A96F4007995F4007491F400506AC10000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000849EF5007C97F400FFFFFF00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5
- FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00849E
- F500556FC6000000000000000000000000000000000000000000506AC100708E
- F4009CB1F7008D9FDE00FDFDFD00616A8D00606A8C00606A8C005F698B005F69
- 8B005F698A005F688A005E6789005E678900FDFDFD00FDFDFD008D9FDE008BA4
- F6007C97F400506AC10000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000B7B7B700ECECEC00F7F7
- F700F6F6F600F8F8F800FAFAFA00F9F9F900EFEFEF00E7E7E700E0E0E000CECE
- CE00D3D3D3009B9A99000000000000000000000000005B76D300526CC300526C
- C300526CC300526CC300526CC3007388CF00A2B2E700B3C3F900A0B4F6008FA1
- E0006D82CC00526CC300526CC300526CC300607BD70000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000088A2F600829DF500FFFFFF0058595C0074757A00F3F6FE0058595C007475
- 7A00F3F6FE0058595C0074757A00F3F6FE0058595C0074757A00F3F6FE0088A2
- F6005670C7000000000000000000000000000000000000000000516BC2007290
- F400A4B7F80093A4DE00FEFEFE00FEFEFE00FEFEFE00FEFEFE00FEFEFE00FEFE
- FE00FEFEFE00FEFEFE00FEFEFE00FEFEFE00FEFEFE00FEFEFE0093A4DE0091A8
- F6007F9AF500516BC20000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BEBCBB00EDEC
- EC00F7F7F700F7F7F700F8F8F800FAFAFA00F5F5F500EFEFEF00E7E7E700DADA
- DA00DADAD9009C9A990000000000000000000000000000000000000000000000
- 0000000000000000000000000000718AE0006178C900B5C4F500A0B3F300546D
- C40092A7EC000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000089A2F60086A0F500FFFFFF00A5A4A2006C6D7100F4F7FE00A5A4A2006C6D
- 7100F4F7FE00A5A4A2006C6D7100F4F7FE00A5A4A2006C6D7100F4F7FE0089A2
- F6005871C8000000000000000000000000000000000000000000526CC3007491
- F400ABBDF80099A9DE00E5E5E500E5E5E500E5E5E500E5E5E500E5E5E500E5E5
- E500E5E5E500E5E5E500E5E5E500E5E5E500E5E5E500E5E5E50099A9DE0097AD
- F700819BF500526CC30000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000B8B8B700BEBD
- BC00EDECEC00F6F6F600F7F7F700F8F8F800F9F9F900F5F5F500EFEFEF00E6E6
- E600CFCFCE009F9E9E0000000000000000000000000000000000000000000000
- 000000000000000000009FB1F0006F84CF00A2B2E900A9BBF800AABCF7008C9F
- DF00647ACA009FB1F00000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00007D97EE0091A7F1009AAEF200191918007F8FC200A1B4F300191918007F8F
- C200A1B4F300191918007F8FC200A1B4F300191918007D8DC2009AAEF2007D97
- EE005872C9000000000000000000000000000000000000000000546EC5007491
- F400B7C7F900B9C8F900B9C8F900B9C8F900B9C8F900B9C8F900B9C8F900B9C8
- F900B9C8F900B9C8F900B9C8F900B9C8F900B9C8F900B9C8F900B9C8F90099AF
- F700819BF500546EC50000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B8B8B800EBEAEA00F6F6F600F5F5F500F7F7F700F9F9F900F9F9F900CDCC
- CB00A4A4A3000000000000000000000000000000000000000000000000000000
- 0000000000005770C800A1B3EF009BB0F7009BB0F7009BB0F7009BB0F7009BB0
- F7009BB0F7008DA2EB005770C800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005872C9005872C9005872C9005F5F5F004F5E92005872C9005F5F5F004F5E
- 92005872C9005F5F5F004F5E92005872C9005F5F5F004F5E92005872C9005872
- C9005B76D2000000000000000000000000000000000000000000556FC6006D8C
- F300A6B9F800AFC0F900B1C1F900B2C2F900B2C2F900B2C2F900B2C2F900B2C2
- F900B2C2F900B2C2F900B2C2F900B2C2F900B2C2F900B1C1F900ADBEF800849E
- F5007894F400556FC60000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000B6B4B300D7D5D500ECECEB00F6F6F600F8F8F700E6E5E500A7A6
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000005871C800A5B7F300A3B6F800A3B6F800A3B6F800A3B6F800A3B6
- F800A3B6F80095AAF1005871C800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D2D1D0008080800000000000D2D1D0008080
- 800000000000D2D1D0008080800000000000D2D1D00080808000000000000000
- 00000000000000000000000000000000000000000000000000005670C7006382
- EA00849DEE00889FEE008AA0EE008AA0EE008AA0EE008AA0EE008AA0EE008AA0
- EE008AA0EE008AA0EE008AA0EE008AA0EE008AA0EE008AA0EE00879FEE007B94
- ED006886EB005670C70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000B2B1B100A8A6A600BCBAB900B3B1B000A7A6A6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000647EDB008D9FDF00B4C4F900ADBEF800A8BAF800A6B9F800AABC
- F800ACBDF800879ADC006B85DE00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000808080009090900000000000808080009090
- 9000000000008080800090909000000000008080800090909000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000006B85DE005A74CF005872C9005872C9005B76
- D2006B85DE000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D1D1D100CFCFCF00C9C9C900C7C7C700C5C5
- C500C5C5C500C5C5C50091A1D70029386D00C5C5C500C8C8C800D3D3D3000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BAC6F200364A91004F63
- A5008793BC00A7B0CF00D9DFF300D9DFF400D9DFF400D9DFF400D9DFF400D9DF
- F400D9DFF400D9DFF400D9DFF400D9DFF400D9DFF400D9DFF400D9DFF400DADF
- F200A5AECE003A4D930000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000029396C00526297008494C8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000002F448B002E3F7B002A3B78002A3B78002A3B
- 78002A3B78002A3B78002A3B78002A3B78002A3B78002A3B78002A3B78002A3B
- 78002A3B7800354B970000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000435BAE007182BB005C77
- D3007B90D7006979B200A3ADCF00C0CBEE00C0CBEE00C0CBEE00C0CBEE00C0CB
- EE00C0CBEE00C0CBEE00C0CBEE00C0CBEE00C0CBEE00C0CBEE00C0CBEE00C4CE
- EF00CFD7F200A3ADD00000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00008093D9005466A5004059AA008393C8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BAC6F2004F609F002C3D7B004E66B700506AC400506A
- C400506AC400506AC400506AC400506AC400506AC400506AC400506AC400506A
- C400506AC4002D3F7F0000000000000000000000000000000000000000000000
- 000000000000000000002E4696001F3376001F3376001F3376001F3376001F33
- 76001F3376001F3376001F3376001F3376001F3376002E469600000000000000
- 00000000000000000000000000000000000000000000354992008699DA004868
- D200607BD8008699DA005C6CA700B7C4ED00B7C4ED00B7C4ED00B7C4ED00B7C4
- ED00B7C4ED00B7C4ED00B7C4ED00B7C4ED00B7C4ED00B7C4ED00B7C4ED00B7C4
- ED00BCC8EE00CFD6EF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004B62
- B20036457A00324DAA00032597008494CC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000BAC6F20031458D00526ECE002F4183000328A000042CB200042C
- B200042CB200042CB200042CB200042CB200042CB200042CB200042CB200042C
- B200506CC9003043850000000000000000008E8C8A00BBB9B700BBB9B700BBB9
- B700BBB9B700BBB9B70029429500042DB700042DB700042DB700042DB700042D
- B700042DB700042DB700042DB700042DB7004F6ED70029429500BBB9B700BBB9
- B700BBB9B700BBB9B700BBB9B7008E8C8A00000000003B509D008EA3E9005D7B
- E0005D7BE0008EA3E9003B509D00A7B7EE00A7B7EE00A7B7EE00A7B7EE00A7B7
- EE00A7B7EE00A7B7EE00A7B7EE00A7B7EE00A7B7EE00A7B7EE00A7B7EE00A7B7
- EE00A7B7EE00C4CEF00000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000045569000546C
- BD004762BF007186CE002B4BB6008496D4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000374D9A002C459A000732C1006582E30035498F00042BAE000430C2000430
- C2000430C2000430C2000430C2000430C2000430C2000430C2000430C2000430
- C2004F6DD300364B9300000000000000000093918F00D8D8D700D8D8D700D8D8
- D700D8D8D700D8D8D7002F4AA4001942CD001D46CE001E46CE001E46CE001E46
- CE001E46CE001E46CE001E46CE001C45CE005474E1002F4AA400D8D8D700D8D8
- D700D8D8D700D8D8D700D8D8D70093918F00000000003D54A40095A9ED006885
- E6006885E60095A9ED003D54A400A5B6F000A5B6F0001442D9001442D9001442
- D9001442D9001442D9001442D9001442D9001442D9001442D9001442D900A5B6
- F000A5B6F000C3CEF10000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003C54A300516CC7004F6B
- C8007184C600344581007184C6009BABE0000000000000000000B9C6F1002E42
- 8800B9C6F100000000000000000000000000000000000000000000000000BDC9
- F4002E489F000833C5000D3AD0007791EB00374C9700042DB6000432CA000432
- CA000432CA000432CA000432CA000432CA000432CA000432CA000432CA000432
- CA004F6FD9003A4F9900000000000000000098969400F5F5F400F5F5F400F5F5
- F400F5F5F400F5F5F4003652B4003D63E300476BE300486CE400486CE400486C
- E400486CE400486CE400486CE400466BE3005D7DEA003652B400F5F5F400F5F5
- F400F5F5F400F5F5F400F5F5F40098969400000000004058AB009EB1F200738E
- EB00738EEB009EB1F2004058AB00A9BAF300A9BAF3001443DE001443DE001443
- DE001443DE001443DE001443DE001443DE001443DE001443DE001443DE00A9BA
- F300A9BAF300C7D0F30000000000000000000000000000000000000000000000
- 0000CED7F60092A4E3006179C70033488F002D3C71005568AA004161CB007287
- CC00334687004A5EA40033468700A6B2DA0000000000BAC6F2002F4489004A5E
- A4002F448900BAC6F2000000000000000000000000000000000000000000425A
- AE005271D9005676E1006583E800859EEF003B509D00042EBC000434D1000434
- D1000434D1000434D1000434D1000434D1000434D1000434D1000434D1000434
- D1004F70DF003C53A100000000000000000099989600A3A19F00A3A19F00A3A1
- 9F00A3A19F00A3A19F003D5DC6007994ED0088A0EF00A6B7F200B5C4F500B5C4
- F500B5C4F500B3C2F400A2B4F200859EEF006382EB003D5DC600A3A19F00A3A1
- 9F00A3A19F00A3A19F00A3A19F0099989600000000004660B700B2C2F80094AB
- F60094ABF600B2C2F8004660B700B0C0F800B0C0F80088A1F50088A1F50088A1
- F50088A1F500B0C0F80088A1F50088A1F50088A1F50088A1F50088A1F500B0C0
- F800B0C0F800CBD5F70000000000000000000000000000000000536BBE004C5F
- 9F004A66C5003857C0002447BA007288D200344889004F6FDB004258A4004F67
- B9004A6BD800123DCC004A6BD8004F67B9003950A1004F67B9004A6BD800123D
- CC004A6BD8004F67B9000000000000000000000000000000000000000000445C
- AF000432CA000432CA000432CA000432CA000432CA000535D9000537E1000537
- E1000537E1000537E1000537E1000537E1000537E1000537E1000537E1000537
- E1004F73EA00445CAF0000000000000000000000000000000000000000000000
- 000000000000000000004C6BD2003F5EC8003F5EC8003F5EC8003F5EC8003F5E
- C8003F5EC8003F5EC8003F5EC8003F5EC8003F5EC8004C6BD200000000000000
- 000000000000000000000000000000000000000000004962B900BFCDFA00ACBD
- F800ACBDF800BFCDFA004962B900B4C4F900B4C4F9001647EC001647EC001647
- EC001647EC00B4C4F9001647EC001647EC001647EC001647EC001647EC00B4C4
- F900B4C4F900CED8F800000000000000000000000000000000003A4F96005A74
- C900042FC000042FC000042FC000728ADB003A4F96005273E200485FAF00536E
- C4004B6EE3000535D8001240DA004B6EE300536DC4004B6EE3001240DA001240
- DA004B6EE300536EC40000000000000000000000000000000000000000004760
- B700063AE800073BE900073BE900073BE900073BE900073BE900073BE900073B
- E900073BE900073BE900073BE900073BE900073BE900073BE900073BE900063A
- E8005075EF004760B70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000003C59BC00708CEB006683E6005374
- E1004F70DE005070DA004F6ED700314A9A000000000000000000000000000000
- 000000000000000000000000000000000000000000004A63BB00CAD5FB00BFCD
- FA00BECCFA00CAD5FB004A63BB00B7C7F900B7C7F9001849EC001849EC001849
- EC001849EC00B7C7F9001849EC001849EC001849EC001849EC001849EC00B7C7
- F900B7C7F900D0D9F800000000000000000000000000000000004056A3005071
- DE000433CF000433CF000433CF00728DE4004056A3005779E9007F96E3004962
- B7005772CF001344E7000539E6001344E700476DED001344E7000539E6004C71
- ED005772CF00455EB70000000000000000000000000000000000000000004963
- BA000E41EC001042EC001143EC001143EC001143EC001143EC001143EC001143
- EC001143EC001143EC001143EC001143EC001143EC001143EC001143EC000E41
- EC005378F1004963BA0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000425FC3007893EE004C6EDE00355A
- D6001C45CE00042FC0004F6FD900354DA0000000000000000000000000000000
- 000000000000000000000000000000000000000000004C66BD00D6DEF900DCE3
- F900DBE2F900D6DEF9004C66BD00C3D0FA00C5D1FA00305CEE00305CEE00305C
- EE00305CEE00C5D1FA00305CEE00305CEE00305CEE00305CEE00305CEE00C5D1
- FA00C3D0FA00D6DEF900000000000000000000000000000000004A64BB006384
- F3004C72F1004C72F1004C72F10088A1F5004A64BB005E80F2003862EF005D80
- F2008CA2EC005E78D5005378F1001748EC001748EC001748EC005378F1004A64
- BE00BFCCF5000000000000000000000000000000000000000000000000004C65
- BC001F4FED002553EE002654EE002654EE002654EE002654EE002654EE002654
- EE002654EE002654EE002654EE002654EE002654EE002654EE002654EE001E4E
- ED005A7DF2004C65BC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000004360C5006C88E700738DE4006E88
- E2006781DE005A77D9005976D6003750A3000000000000000000000000000000
- 00000000000000000000000000000000000000000000536ECA004D67BE004D67
- BE004D67BE004D67BE004D67BE00C9D5FB00CBD6FB003E67F0003E67F0003E67
- F0003E67F000CBD6FB003E67F0003E67F0003E67F0003E67F0003E67F000CBD6
- FB00C9D5FB00D9E0F900000000000000000000000000000000004B65BD006F8D
- F3006F8DF3006F8DF3006F8DF30095ACF7004B65BD006283F200466DF0006888
- F30092A7EC006780D7006787F300315DEF00315DEF00315DEF006686F3004C66
- C000BFCDF6000000000000000000000000000000000000000000000000004D66
- BE002755EE00305CEE00325EEF00325EEF00325EEF00325EEF00325EEF00325E
- EF00325EEF00325EEF00325EEF00325EEF00325EEF00325EEF00325EEF002755
- EE005E80F2004D66BE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000004F6DD3004360C500405DBC003F5A
- B8003E58B4003B54AC003952A900435EB7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000004F68BF00CFD9FB00D2DBFB004B71F1004B71F1004B71
- F1004B71F100D2DBFB00B1C1F900B1C1F900B1C1F900B1C1F900B1C1F900D2DB
- FB00CFD9FB00DCE3F900000000000000000000000000000000004C66BE007995
- F40090A8F60090A8F60090A8F600A0B4F7004C66BE006586F3007391F40097AB
- ED00536CC3007C97F400567AF2004C72F1004C72F1004C72F100567AF2006D85
- D9004E68C100BFCDF60000000000000000000000000000000000000000004E68
- BF00305CEE003B64EF003D66EF003D66EF003D66EF003D66EF003D66EF003D66
- EF003D66EF003D66EF003D66EF003D66EF003D66EF003D66EF003D66EF002F5B
- EE006183F2004E68BF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000DFDEDE00EFEE
- EE00C9C8C7008C8A880000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000516BC200D9E1FC00DDE4FC006586F3006586F3006586
- F3006586F300DDE4FC006586F3006586F3006586F3006586F3006586F300DDE4
- FC00D9E1FC00E3E8FB00000000000000000000000000000000004E68C00089A0
- EC00AFC0F900B9C8F900B8C7F900ACBDF8004E68C0006C8BF3005E77CA006D86
- DA009CB1F700819BF50087A1F5009EB3F7007D93DE009DB2F70087A1F50088A2
- F60099AFF7006C85DA000000000000000000000000000000000000000000516A
- C1004169F0005075F1005378F1005378F1005378F1005378F1005378F1005378
- F1005378F1005378F1005378F1005378F1005378F1005378F1005378F1004068
- F0006888F300516AC10000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000DFDEDE00EFEE
- EE00C9C8C7008C8A880000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000526CC300DEE5FC00E1E7FD00E2E8FD00E2E8FD00E2E8
- FD00E2E8FD00E2E8FD00E2E8FD00E2E8FD00E2E8FD00E2E8FD00E2E8FD00E1E7
- FD00DDE4FC00E4EAFB00000000000000000000000000000000006681DA00768C
- D400B5C5F900B9C8F900B4C4F900A7B9F8004F69C100718FF4006179CC007189
- DC00ACBDF800A1B5F700AFC0F9008397DF00536EC7008297DF00AEBFF800A1B5
- F700AABCF8006F89DC000000000000000000000000000000000000000000526C
- C3004A70F0005A7DF2005E80F2005E80F2005E80F2005E80F2005E80F2005E80
- F2005E80F2005E80F2005E80F2005E80F2005E80F2005E80F2005E80F200496F
- F0006B8AF300526CC30000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000DFDEDE00EFEE
- EE00C9C8C7008C8A880000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000546DC400E2E8FD00E6EBFD00CDD8FB00CDD8FB00CDD8
- FB00CDD8FB00CDD8FB00CDD8FB00CDD8FB00CDD8FB00CDD8FB00CDD8FB00E6EB
- FD00E2E8FD00E6EBFB0000000000000000000000000000000000000000006881
- DB00657BC9007388D2008196DB008EA5F000506AC2008FA7F600ADBCF0005D76
- CA00879CE000B4C4F900879CE0005D76CA00C1CDF600556FC800869ADF00B3C3
- F900879BE000556FC8000000000000000000000000000000000000000000536D
- C4005075F1006485F3006989F3006989F3006989F3006989F3006989F3006989
- F3006989F3006989F3006989F3006989F3006989F3006989F3006989F3005075
- F1006E8DF300536DC40000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000DFDEDE00EFEE
- EE00C9C8C7008C8A880000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000566FC600E7ECFD00EBF0FD0096ACF70098AEF70098AE
- F70098AEF70098AEF70098AEF70098AEF70098AEF70098AEF70098AEF700EBF0
- FD00E7ECFD00EBEFFD0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005871CF00A8B9F600AABC
- F800B6C3F100677FCE00AEBEF000B3C3F9000000000000000000C1CDF6005874
- CF00C1CDF600000000000000000000000000000000000000000000000000566F
- C600597CF2007290F4007D98F500809BF500809BF500809BF500809BF500809B
- F500809BF500809BF500809BF500809BF500809BF500809BF5007D98F500587C
- F200718FF400566FC60000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000DFDEDE00EFEE
- EE00C9C8C7008C8A880000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000005771C800E9EEFD00EDF1FE0095ACF7009EB3F7009FB3
- F7009FB3F700A0B4F700A0B4F7009FB3F7009FB3F7009EB3F7009BB0F700EDF1
- FE00E9EEFD00EDF1FD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000758BD200ACBC
- F500A9BBF800C9D5FB0096ACF700A1B5F7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005770
- C700567AF2006D8CF3007B97F400839EF500839EF500849EF500859FF500859F
- F500859FF500859FF500849EF500849EF500839EF500819BF5007A96F4005479
- F1006F8DF3005770C70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000DFDEDE00EFEE
- EE00C9C8C7008C8A880000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000005872C900EAEFFD00ECF0FE00EEF2FE00EFF3FE00EFF3
- FE00F0F3FE00F0F3FE00F0F3FE00F0F3FE00EFF3FE00EFF3FE00EFF3FE00ECF0
- FE00EAEFFD00EFF2FD0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006883DC00768B
- D300A7B9F400849EF5007592F4009EB3F7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005871
- C8004A70F0005D80F2006989F3007290F4007491F4007491F4007491F4007491
- F4007491F4007491F4007491F4007491F4007290F4006F8DF3006888F300486F
- F0006A8AF3005871C80000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000009E9C9A009997
- 9500959391008B89870000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000005B76D2005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C90000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000093A7ED009DAFEE0086A0F50094ABF6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005B76
- D2005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005B76D20000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005D76CA0096A8E7008DA5F6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000C1CDF6005B74CB008FA2E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000DDDDDD00C9C9C900C7C7C700C2C2C2008FA0D5003A4A
- 7A003A4A7A00C0C0C000C1C1C100C7C7C700D5D5D500DCDCDC00000000000000
- 0000000000000000000000000000000000000000000000000000DEDEDE006B80
- C20027335F0026335D002A386D00C3C3C300C3C3C300C4C4C400D1D1D100D5D5
- D500000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000C7C7C700C0C0C0006679B80027325B0027325B0027325B0027325B002732
- 5B0027325B0027325B0027325B0027325B0027325B00273462007385C800C7C7
- C700D6D6D6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003A4B82004B5B
- 94004B5A9300B2BFEE0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004C64B5004656
- 8A0098A5CE0098A4CD00828FB90031458A00DEE3F80000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002A3A750003279E0003279E0003279E0003279E000327
- 9E0003279E0003279E0003279E0003279E0003279E00435DB6003F58B0000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000B8C6F2003D4E8E003F59B2000F30
- 9F000F309F004B5E9F003D4E8E00B8C6F2000000000000000000000000000000
- 00000000000000000000000000000000000000000000314792009BA8D200526D
- C5002647B5002041B0001B3DAE00909ECB00293D7F0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002D3D7A00092DA5006077C400768ACC00092DA5006077
- C40096A6D800092DA5006077C4008A9BD4000328A300435EBA004059B1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000B9C8F2003D5091004C5FA1000F31A3000327
- 9F0003279F003F5AB6004C5FA1003D5091000000000000000000000000000000
- 000000000000000000000000000000000000000000002E4285008FA0DB004A66
- C6003C5AC0003655BD003151BA00697FC9002B3E7C0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002E407F00092EAA008C9DD700B5C0E600092EAA008C9D
- D700C5CEEB00092EAA008C9DD700BDC7E800042AA900425EBD00415AB2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000DEDEDE00DEDEDE00CECECE00CECECE00C7C7C700C0C0C000C0C0
- C000C0C0C000C0C0C000C0C0C00092A2D700394B8A0093A2D800C0C0C000DEDE
- DE00000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000003F5193004C61A500435EBB000328A3000328
- A3000328A3000F32A800435EBB004C61A500BBC8F20000000000000000000000
- 0000000000000000000000000000000000000000000030448A008296D9005D77
- D000516DCA004C68C8004764C6006079CC002D3F810000000000000000000000
- 00000000000000000000000000008196DC00293A7500293A740033478C000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000334688000A31B5006E85D30091A2DD000A31B500607A
- CF0098A8E0000A31B500607ACF0091A2DD00042CB4004361C700435CB4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000007F92D8003E4C7E0093A5E4000000
- 000000000000BDC9F300374E9D004F68BC004A6FE800657ECF00455FBB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004153940041539400415394001338B100042A
- AB00042AAB004360C1004153940041539400465CA90000000000000000000000
- 000000000000000000000000000000000000000000006D83D4005669A80092A4
- E300788FDC00758DDB00768DDA004B69CD0032468B0000000000000000000000
- 0000000000008398DE00505F9800A4B1DD003E5BBD003957BB005F77C7005160
- 9400647CCB000000000000000000000000000000000000000000000000000000
- 0000000000000000000035498E000A33BB0091A3E000B5C1EA000A33BB008C9F
- DF00BDC8ED000A33BB008C9FDF00CDD5F100042EB9004362CA00445DB5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000002E4185005467A7005068BB000000
- 0000000000003950A000506ABE004A6EE5006C8BF1007389D4004661BC000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000425596001439B500042B
- B000042BB0004361C40042559600000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000425AAE005468
- A90097A9E50092A5E5008399E1003C5ECD003448900000000000000000000000
- 0000000000003B53A2009EABD5005B75CC003252BE002D4EBB002748B70094A2
- D000364A8D000000000000000000000000000000000000000000000000000000
- 00000000000000000000384B9300042FBF00042FBF00042FBF00042FBF00042F
- BF00042FBF00042FBF00042FBF00042FBF00042FBF004363CF00455EB6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000008296DB0043528900516BBE00384C95000000
- 0000BDC9F400516BC1004A6EE600204EE800738AD500435DB600BECCF5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004D64B7004F65B20000000000000000000000000043569900143ABA00042D
- B500042DB5004361C700435699000000000000000000000000004960AF00BAC9
- F300000000000000000000000000000000000000000000000000000000006E86
- D700384E9A00384E99004264D4004062D200374B950000000000000000000000
- 00000000000034488D0094A5DF005470CD004765C8004260C6003C5BC200788C
- D000314384000000000000000000000000000000000000000000000000000000
- 000000000000000000003C529D000A36CA008CA1E600B5C3EF000A36CA008CA1
- E600B8C5EF000A36CA008CA1E600C1CCF2000432CA004365D7004760B8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000475994004D69C7000932BD00556DBD003E54
- A400556EC700204FEB006C8BF300758BD700BFCCF50000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004B62
- B5004665CC004559A0000000000000000000000000004559A0001C42C3000D36
- BF000D36BF004766CF004559A0000000000000000000000000004559A0005067
- B700445AA300BCCAF40000000000000000000000000000000000000000000000
- 0000000000003D54A400486BDF004669DC003C529F0000000000000000000000
- 0000000000003D55A5008294D3007F95E0006D86DA006882D700647FD6006982
- D60035498E000000000000000000000000000000000000000000000000000000
- 000000000000000000003F55A2000735D0000735D0000735D0000735D0000735
- D0000735D0000735D0000735D0000735D0000735D0004467DB004862B9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000566AB2003356CB000431C6005D78D7005570
- C9004C71ED006C8BF300758CD7004761BA000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004C63B6005B70
- B6004969D300465AA300465AA300465AA300465AA300465AA300284DCA001A42
- C7001A42C7004D6CD300465AA300465AA300465AA300465AA300465AA3004666
- D200536ABB00445CA70000000000000000000000000000000000000000000000
- 0000000000004058A9004B6EE3004A6DE1003E55A50000000000000000000000
- 0000000000006F85D7005A6DB00094A7E6008197E2007E95E0007E95E0005673
- D400384C93000000000000000000000000000000000000000000000000000000
- 000000000000000000004259A800103ED700A0B2EF00A0B2EF00103ED700A0B2
- EF00A0B2EF00103ED700A0B2EF00A0B2EF00103ED700486BE0004963BA000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000A8B7ED005470CF000E3ACC000434D1004268E800476D
- ED002050ED00778CD8004862BC00BFCCF5000000000000000000000000000000
- 000000000000000000000000000000000000000000004D65B8005E72BA00516F
- D5005472D8005C77D1005974D1005974D1005A74D1005C77D1002A50CF00274D
- CD00274DCD005876D9005D78D1005A74D1005974D1005974D1005B75D100284E
- CE004D6DD700556DBE00BDC9F400000000000000000000000000000000000000
- 000000000000435CAF004F72E8004D70E5004159AA0000000000000000000000
- 00000000000000000000465FB500586CB2009BADE80097A9E8008BA0E5004969
- D5003A5099000000000000000000000000000000000000000000000000000000
- 000000000000000000004760B3005B668B008895BE008996BF008B98C1008C99
- C2008D9AC3008F9CC500909DC600919EC7008B9ACB005073E9004B65BC000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000AAB9EF004D61A5000D3CD7000537DE000539E600053AEB000C3F
- EC005579F1006B85D8005F76C6004B65BE009DB0EE0000000000000000000000
- 0000000000000000000000000000000000004B63B7005574DC003A5FD9003C61
- D9004064DB003F63DB003F63DB003F63DB003F63DB003F63DB004064DB004064
- DB004064DB004064DB004064DB003F63DB003F63DB003F63DB003F63DB003F63
- DB003B60D900395ED900556FC3004B63B7000000000000000000000000000000
- 0000000000004862B9005579F0005578EE00465FB50000000000000000000000
- 000000000000000000000000000000000000BFCDF8004159A7005474E1005272
- DF004056A3000000000000000000000000000000000000000000000000000000
- 000000000000000000004A62B70039456E0054659F005566A0005869A300596A
- A4005B6CA6005D6EA8005F70AA006071AB00919DC6005477ED004C66BD000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005E77CC005971C5000537E1000539E800053AEB001244EC002654
- EE003B64EF007B97F40086A0F500839BEB006A80CB00526DCA00000000000000
- 0000000000000000000000000000000000004D65BA005777E2004266DE00486B
- DF004C6EDF004C6EDF004C6EDF004C6EDF004C6EDF004C6EDF004C6EDF004C6E
- DF004C6EDF004C6EDF004C6EDF004C6EDF004C6EDF004C6EDF004C6EDF004C6E
- DF00486BDF004266DE005770C7004D65BA000000000000000000000000000000
- 0000000000004963BB00597CF200597CF2004963BA0000000000000000000000
- 00000000000000000000000000000000000000000000445CAD005878E5005676
- E3004259A9000000000000000000000000000000000000000000000000000000
- 000000000000000000004C66BD0036426A0051629B0052639C0054659E005667
- A0005768A1005A6BA4005B6CA5005C6DA6008E9AC200597CF1004D67BE000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D1DAF8004D62AE005B79DF00053AEA00053AEB00093DEB002E5AEE00426A
- F000567AF200809BF50093AAF600AEBFF8007287CE00546ECB00000000000000
- 000000000000000000000000000000000000BFCBF5005C76CB006381E7005274
- E3005778E5005475E4005274E3005274E3005374E3005677E5005979E5005979
- E5005979E5005979E5005677E4005374E3005274E3005274E3005475E4005576
- E4005374E3006381E7004A63B600BFCBF5000000000000000000000000000000
- 0000000000004A64BC005D80F2005C7FF2004A64BC0000000000000000000000
- 000000000000000000000000000000000000000000004760B3005D7DEA005B7B
- E800455DAF000000000000000000000000000000000000000000000000000000
- 000000000000000000004F69C000333E63004A5A8F004B5B90004E5E93005060
- 9500516196005464990055659A0056669B008A95BB006283F2004F69C0000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000546BBC005C7CE8001849EC001446EC002856EE003D66EF006D8CF3009BB0
- F700BDCBF9007487CE00536EC90091A5EB000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFCCF5004D66BC005C77
- D0005F7FEC004C65B8004C65B8004C65B8004C65B8004C65B8007792EE00738F
- EE00738FEE007994EF004C65B8004C65B8004C65B8004C65B8004C65B8005E7F
- EC005C77D0004D66BC0000000000000000000000000000000000000000000000
- 0000000000004D67BE006485F3006485F3004D67BE0000000000000000000000
- 000000000000000000000000000000000000000000004C66BD006787F2006484
- F0004A63B9000000000000000000000000000000000000000000000000000000
- 00000000000000000000506AC100313C5F004857890049588A004C5B8D004D5C
- 8E004F5E90005160920053629400546395008994B7006686F300506AC1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000647DD4003D66EF000A3EEB002F5BEE00446BF0006888F300BAC8F800A2B1
- E6006E83CD009FB1EF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCCF5004D66
- BF004F74ED004D66BB000000000000000000000000004D66BB007F9AF1007E99
- F1007E99F1007893F0004D66BB000000000000000000000000004D66BB005A76
- D2004D66BF00BFCCF50000000000000000000000000000000000000000000000
- 0000000000004E68BF006888F3006E8DF3005B73C4004E68C100839AE700BFCD
- F60000000000000000000000000000000000000000004E68BF006B8AF3006989
- F3004D67BE000000000000000000000000000000000000000000000000000000
- 00000000000000000000516BC2002F395A004554840046558500485787004A59
- 89004B5A8A004E5D8D004F5E8E00516090008690B2006A8AF300516BC2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006280E8002654EE002251ED005C7FF20094ABF600B7C6F6006E84CE005C77
- D400AEBEF3000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000BFCD
- F6005673D5004E68BF000000000000000000000000004E68BF0089A2F5008BA4
- F5008BA4F5007C97F4004E68BF000000000000000000000000004E68BF004E68
- C100BFCDF6000000000000000000000000000000000000000000000000000000
- 0000000000004F69C0006B8AF300849EF500B9C7F700A8B8ED00768AD1005C74
- C500536CC0007991E300AEBEF30000000000000000004F69C0006F8DF3006D8C
- F3004F69C0000000000000000000000000000000000000000000000000000000
- 00000000000000000000546DC4002B3452003F4C7700414E790043507B004451
- 7C0046537E00485580004A5782004B588300838CAB007391F400546DC4000000
- 0000000000000000000000000000000000000000000000000000000000005972
- CA006183F2008FA7F600AABAF100637BCC006B84DD00D3DBF900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000506AC1009FB3F700A4B7
- F800A4B7F80086A0F500506AC100000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000516BC2007290F400829CF500819BF500809BF5007E99F50089A2
- F6009BB0F700B4C4F900B7C7F900AEBEF200788ED600647BC8007C97F4007693
- F400516BC2000000000000000000000000000000000000000000000000000000
- 00000000000000000000556EC50029314E003C4870003E4A7200404C7400424E
- 7600434F770046527A0047537B0049557D008189A6007794F400556EC5000000
- 00000000000000000000000000000000000000000000000000007C93E6007A8F
- D700A2B4EF008699DA005C75CC00D3DBF9000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000516BC200516BC200516BC200ADBEF800B1C1
- F900B1C1F90091A8F600516BC200516BC2005973CE0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000526CC3007391F40087A1F50086A0F500859FF500839EF500829D
- F500829CF5007F9AF50086A0F50099AFF700B9C8F900C2CFFA008CA5F6007A96
- F400526CC3000000000000000000000000000000000000000000000000000000
- 00000000000000000000566FC600272F49003B466C003B466C003E496F003F4A
- 7000414C7200434E740045507600465177007E86A1007B97F400566FC6000000
- 00000000000000000000000000000000000000000000000000005872CA009BAC
- E7005C75CC007C93E60000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000627CD2005F7FEA00748FEC00B7C7F900BDCB
- FA00BDCBFA00A7B9F8007E98ED006080EA00546FCA0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000536DC4006384F30093AAF6008FA7F6008BA4F60089A2F60088A2
- F60087A1F500849EF500839EF500829DF500819BF50087A1F500839EF5007F9A
- F500536DC4000000000000000000000000000000000000000000000000000000
- 000000000000000000005871C800242B4400343D5C0038426200384262003943
- 63003B4565003D4767003F496900404A6A00787F99007E99F5005871C8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000BFCDF600536DC6006781DA00AEBFF800C2CF
- FA00C3D0FA0094ABF6006E87DB00536DC6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000009FB1F0005D77CF005771C700637CCF007993E90086A0
- F40095ACF70097ADF70092A9F6008FA7F6008DA5F6008BA4F6008AA3F60086A0
- F500556FC6000000000000000000000000000000000000000000000000000000
- 000000000000000000005872C90027304F00262D4400282E4400292F4500292F
- 4500292F4500292F4500292F4500292F4500515870007794F4005872C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000BFCDF600536EC70094ABF6009FB3
- F700A0B4F700718ADD00536EC700BFCDF6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D3DBF90093A7ED005874CD005C75
- C900647ED300879EEB008EA6F60099AFF70099AFF70094ABF60090A8F6008AA3
- F6005670C7000000000000000000000000000000000000000000000000000000
- 000000000000000000005872CA00879FF0008FA6F00093A9F20095AAF20095AA
- F20095AAF20095AAF20094AAF20092A8F200849DF0007A93E7005872CA000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000C1CDF6006F88DC00829C
- F500829CF500556FC700C1CDF600000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000CED8
- F800859CE9005771C9006179CC006680D60092A8F00097ADF7009EB3F70089A2
- F6005771C8000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000C1CDF6005874
- CF005874CF000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000AFBFF3007C93E4005771
- C8005771C9000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002A3B7700DBE0F100DDE2
- F200DEE3F300DFE4F300DFE4F300E0E5F300E0E5F300E2E7F400E3E7F500E3E7
- F500E3E7F500E5E9F600E5E9F600E6EAF600E8ECF700E8ECF700E8ECF700E8EB
- F600E9ECF700EAEDF700000000000000000000000000D3D3D3005F5D5E005E5C
- 5C0037363800B9B9B90000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002D3F7F00D7DDF100C8D0
- EC00C9D1ED00CAD2ED00CBD3ED00CCD3ED00CDD4ED00CED5EE00D0D7EF00D1D8
- EF00D2D9EF00D3D9EF00D4DAF000D5DBF100D7DDF200D7DDF200D7DDF100D9DE
- F200DADFF200E6EAF8000000000000000000000000007B7979008D8B8A007D7B
- 7A006462620039383900CFCFCF00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000030448600D6DCF200C3CC
- EC003E5DC4003E5DC4003E5DC4003F5EC4003F5EC4003F5EC400C9D2EF00C9D2
- EF00CAD2EF00CBD3EF00CDD5F000CDD5F000CFD6F000D0D7F000D1D8F100D2D9
- F100D3DAF100E0E5F500000000000000000000000000858383009E9B9A00A19F
- 9E00676564006462620039383900000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000384C9700D7DEF500C6D0
- F1003F61D2003F61D2003F61D2003F61D2003F61D2003F61D200C4CEF000C4CE
- F100C4CEF100C4CEF100C3CEF100C3CEF100C3CEF100C3CEF100C3CEF100C4CE
- F100C4CEF100D7DEF50000000000000000000000000000000000D3D3D3008583
- 8200A19F9E007D7B7A006765640039383900CFCFCF0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000687AB8007084C600566E
- BC00566EBC00566EBC00566EBC00566EBC00566EBC00566EBC00566EBC00566E
- BC00566EBC00566EBC00566EBC00566EBC00566EBC00566EBC00566EBC00566E
- BC00566EBC007084C60023336700000000000000000032479000304589003045
- 8900304589003045890030458900304589003045890030458900304589003045
- 8900304589003045890030458900304589003045890030458900304589003045
- 89003045890030458900859AE00000000000000000003B519F00D9E0F700C8D2
- F4003F63DA003F63DA003F63DA003F63DA003F63DA003F63DA00C6D1F400C6D1
- F400C6D1F400C5D0F300C5D0F300C5D0F300C4CFF300C4CFF300C4CFF300C3CE
- F300C3CEF300D6DDF7000000000000000000000000000000000000000000D3D3
- D3009E9B9A00A19F9E007D7B7A006462620039383900CFCFCF00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004259A600344FA700405C
- BB001D3FAF001D3FAF001D3FAF001D3FAF001D3FAF001D3FAF001D3FAF001D3F
- AF001D3FAF001D3FAF001D3FAF001D3FAF001D3FAF001D3FAF001D3FAF001D3F
- AF003956B900344FA70027366E0000000000000000005C74C5005873D0005873
- D0005873D0005873D0005873D0005873D0005873D0005873D0005873D0005873
- D0005873D0005873D0005873D0005873D0005873D0005873D0005873D0005873
- D0005873D0005873D0003D529A0000000000000000003F57A700DBE2F900CAD4
- F6004065E0004065E0004065E0004065E0004065E0004065E000C8D3F600C8D3
- F600C8D3F600C7D2F600C7D2F600C7D2F600C6D1F500C6D1F500C6D1F500C5D0
- F500C5D0F500D7DEF80000000000000000000000000000000000000000000000
- 0000858382009E9B9A00A19F9E00676564006462620039383900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000425CB300032491003550
- AB001C3FB2001C3FB2001C3FB2001C3FB2001C3FB2001C3FB2001C3FB2001C3F
- B2001C3FB2001C3FB2001C3FB2001C3FB2001C3FB2001C3FB2001C3FB2003251
- BA003550AB0003249100293972000000000000000000587BED001444E6000E2A
- 8A001744DB000F2B8A001744DB000F2B8A000F2B8A000F2B8A000F2B8A001744
- DB000F2B8A000F2B8A000F2B8A001744DB000F2B8A000F2B8A001744DB000F2B
- 8A001644DB000D2A8A005268B70000000000000000004761B700DEE5FB00D1DA
- FA005176EF005075EF005075EF005075EF005075EF005075EF00D0DAFA00D0DA
- FA00D0DAFA00CFD9FA00CFD9FA00CFD9FA00CED8FA00CED8FA00CED8FA00CDD7
- FA00CCD7FA00DAE1FB0000000000000000000000000000000000000000000000
- 000000000000D3D3D30085838200A19F9E007D7B7A006765640039383900CFCF
- CF00000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000435EBB000429A5000429
- A500324FB0002C4DBC00163BB500163BB500163BB500163BB500163BB5001235
- A8001235A800163BB500163BB500163BB500163BB500163BB5002C4DBC000327
- 9E000429A5000429A5002E3F7D0000000000000000006383EE002352ED006886
- EB00335EEF006A88EE00335EEF006985E2006985E2006985E2006986E600335E
- EF006A88EE006A88EB006986E600335EEF005F71B0006883DF00335EEF006A88
- EE00325EEF006786EE00566EBE0000000000000000004963BA00E0E6FC00D4DD
- FC00597CF200597CF200597CF200597CF200597CF200597CF200D4DDFC00D4DD
- FC00D4DDFC00D3DCFB00D3DCFB00D3DCFB00D3DCFB00D3DCFB00D2DBFB00D2DB
- FB00D0DAFB00DDE4FC0000000000000000000000000000000000000000000000
- 00000000000000000000D3D3D3009E9B9A00A19F9E007D7B7A00646262003938
- 3900CFCFCF000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000425FBF00042AAA00042A
- AA000328A400304EB200294CBE001338B7001338B7001338B7001136AF000E2F
- 9E000E2F9E001338B7001338B7001338B7001338B700294CBE00304EB200042A
- AA00042AAA00042AAA003042820000000000000000006D8AEB00305CEE002B43
- 9400243D90003D63E300243D9000354C9800486CE400354C9800304896003960
- E300284192002C44940030489600385EDE007692EF005075F1003D66EF002841
- 92003960E300253E92005A70C10000000000000000004A64BB00E2E8FD00D8E0
- FC006283F2006283F2006183F2006183F2006183F2006183F200D8E0FC00D7DF
- FC00D7DFFC00D7DFFC00D7DFFC00D7DFFC00D6DFFC00D6DFFC00D6DFFC00D5DE
- FC00D4DDFC00DFE6FC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000858382009E9B9A00A19F9E00676564006462
- 6200393839000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004361C400052CB000062D
- B100062DB100052BAC00304FB6001138B9001138B9001138B9000F31A3008598
- D8008598D8000E33B1001138B9001138B900264AC0002F4EB600042AAB00042B
- B000042BB000042BB0003346870000000000000000007691ED00496FF0003D51
- 94006381E700394D91005D7DE6005D7DE600394D91005D7DE6005D7DE600394D
- 91005D7DE6007483B3007483B3006583E6007483B3007483B3006280E4003C50
- 93005A7AE600374C93005F76C50000000000000000004D66BE00E6EBFD00DEE5
- FC007290F4007290F4007290F4007290F4007290F4007290F400DEE5FC00DEE5
- FC00DEE5FC00DEE5FC00DDE4FC00DDE4FC00DDE4FC00DDE4FC00DDE4FC00DCE3
- FC00DAE2FC00E2E8FD0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D3D3D30085838200A19F9E007D7B
- 7A005A585700373A4600354A9200425BB3000000000000000000A6B6EC002C3F
- 820000000000000000000000000000000000000000004967CD001A40C0002045
- C2002247C3002146C3002146C3003F5DC300284CC3001A3DB1007791E5004C6D
- DC004B6CDB008C9EDD00183BAF003052C4001C41BF001D43C2001C42C2001C42
- C200193FC000133ABF00384C920000000000000000007A94EE005378F10092A7
- EE007693F40099AEF2007693F4007693F40099AEF2007693F4007693F40099AE
- F2007693F40094A7E60095A8EA007995F40094A7E60095A8EA007995F40099AE
- F2007391F4008DA4F1005871C40000000000000000004E68BF00E6ECFD00E1E7
- FD007A96F4007A96F4007A96F4007A96F4007A96F4007A96F400E2E8FD00E1E7
- FD00E1E7FD00E1E7FD00E1E7FD00E1E7FD00E0E6FC00E0E6FC00E0E6FC00DFE6
- FC00DDE4FC00E4E9FD0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D3D3D3009E9B9A008D8C
- 8A00646262009E9D9D0034343C0052629D00899DE3006B82D2003B4D8D003A49
- 8000CED7F600000000000000000000000000000000004C6BD200254AC8002D52
- CA002F53CB002F53CB002F53CB00294DC5003B57B70091A3E0005878E1005777
- E0005777E0007993E70091A3E0003855B6002B50CA002B50CA002B50CA002A4F
- CA00264BC9001C43C6003A50970000000000000000007B96EE00597CF2004B5C
- 96004E5E93007D96E9004E5E93004E5E93007D96E9004E5E93004E5E93007D96
- E9004E5E93005A699A00576698007A94E8005A699A00576698007A94E8005060
- 9500718CE8003D519300536DC40000000000000000004F69C000E8EDFD00E3E9
- FD00829CF500829CF500829CF500829CF500829CF500829CF500E5EAFD00E5EA
- FD009DB2F7009DB2F7009DB2F7009DB2F7009DB2F7009DB2F7009DB2F7009BB0
- F700E0E6FC00E6EBFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000858382008885
- 8500BBBAB900BBB9B7009E9D9D0032343D00485CA6004A5EA500556FC5004354
- 8E00A5B6EB00000000000000000000000000000000004E6DD6002F54CF003B5E
- D2003F61D3003F61D3003E61D300274ABC0096A7E200849CEA006482E5006381
- E5006381E5006381E500839BEA0095A7E2003457CD003A5DD200395CD200395C
- D2003257D000254CCD003D529D0000000000000000007B93E700819CF30092A9
- F600A3B6F800A4B7F800A6B9F800A8BAF800A6B9F800A8BAF800A8BAF800A6B9
- F800A8BAF800A9BBF800ABBDF800A6B9F800ADBEF800AABCF800A4B7F8009FB3
- F70094ABF60087A1F5005771C9000000000000000000526CC300EBF0FD00E7EC
- FD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00E9EEFD00E9EEFD00E9EE
- FD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E7EC
- FD00E5EAFD00E8EDFD0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C3CE
- F20083838700F0F0F000CCCBCA00BBB9B70032343D002347BF000534D400556C
- B6003B4D8F004057A8000000000000000000000000005575E0004669DD005877
- E0005D7BE1005373DE003759CA0098ACF0007B95EC007B95EC007B95EC007B95
- EC007B95EC007A95EC007A95EC007A95EC009EAEE7003457C9004E6FDD005777
- E0004B6DDD00375CDA00435AA70000000000000000005872CA00495891004A59
- 9100697EC8006D82CF006D82CF006D82CF006D82CF006D82CF006D82CF006D82
- CF006D82CF006D82CF006D82CF006D82CF006D82CF006D82CF006D82CF006C82
- CF006B82CE006980CE0093A8ED000000000000000000536DC400ECF0FE00E9EE
- FD007693F4007693F4007693F4007693F4007693F4007693F4007693F4007693
- F4007693F4007693F4007693F4007693F4007693F4007693F4007693F400708E
- F400E6ECFD00E9EEFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004660
- B9006A7CBD00CFCECE00F0F0F000CCCBCA009E9D9D002B3049000537DE004668
- D7005772CC00576CB300475EAE0000000000000000005878E4005072E2006683
- E6006885E5004162CF00A3B3E900879FEF00879FEF00879FEF00879FEF00869E
- EF00869EEF00869EEF00859EEF00869FF0009EB1F200A1B1E8003E5FCE006683
- E6005979E4003F64DF00465DAE00000000000000000000000000000000008380
- 7E00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000546EC500EDF1FE00EBF0
- FD00809BF500809BF500809BF500809BF500809BF500809BF500809BF500809B
- F500809BF500809BF500809BF500809BF500809BF500809BF500809BF5007794
- F400E8EDFD00EBF0FD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004E69
- C6006A80CE0088888B00CFCECE00F0F0F00093919000383D55000539E8000534
- D4002F54D3005470CE005D74C60000000000000000005A7BE800597AE700728D
- EA004D6DD700A4B4EA00ACBDF60093A9F20093A9F20093A9F20092A8F20092A8
- F20092A8F20091A7F20091A7F20091A7F20091A7F2009DB1F300A3B3EB00718D
- EA006482E800476CE5004961B30000000000000000000000000000000000918F
- 8F00908D8B00918E8C00928F8D0093908E0094918F0095929000979492009895
- 9300999694009B9896009C9997009D9A98009E9B99009F9C9A009B999800A09F
- 9E00B6B4B400D6D6D6000000000000000000000000005770C700F0F3FE00EDF1
- FE00839EF5008AA3F6008CA5F6008EA6F6008FA7F6008FA7F6008FA7F6008FA7
- F6008FA7F6008FA7F6008FA7F6008FA7F6008DA5F6008CA5F6008AA3F6007693
- F400EAEFFD00ECF0FE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008FA1E00099AAE300848692004A6AD700305CEE001E4EED004B70
- EE005E77CB004A63BB000000000000000000000000005C7EEE006383F0005273
- E000B4C4F800ADBEF700ACBDF700ACBDF700ACBDF700ABBCF700ABBCF700ABBC
- F700ABBCF700AABCF700AABCF700AABCF700A9BBF700A9BBF700A9BBF700A9B9
- EE00486BDF004D72ED004F68BE00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005871C800F0F3FE00EDF1
- FE00F0F3FE00F1F4FE00F1F4FE00F1F4FE00F1F4FE00F1F4FE00F0F3FE00F0F3
- FE00F0F3FE00F0F3FE00F0F3FE00F0F3FE00EFF3FE00EFF3FE00EEF2FE00ECF0
- FE00EAEFFD00EDF1FE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000A1B1EB009AAFF7007995F4005479F100436BF000305CEE003B64
- EF00617CD8004F69C4000000000000000000000000005C7FF200466BE500A6B6
- EF00ADBEF800AFC0F900B0C0F900B0C0F900B0C0F900B0C0F900B0C0F900AFC0
- F900AFC0F900AFC0F900AFC0F900AEBFF800ADBEF800ADBEF800ABBDF800AABC
- F800A0B2ED003A61E400526CC300000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005872C900F1F4FD00F1F4
- FD00F2F5FD00F3F6FD00F3F6FD00F3F6FD00F3F6FD00F3F6FD00F3F6FD00F3F6
- FD00F2F5FD00F2F5FD00F2F5FD00F2F5FD00F1F4FD00F1F4FD00F1F4FD00F0F3
- FD00EFF2FD00EEF2FD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009FB0EF00B0C0F700ACBDF8009BB0F7006787F3005479F1005E80F200486F
- F0005A7CED00566EC1000000000000000000000000005578EB0098ACEE0095AC
- F7009AAFF7009DB2F7009EB3F7009EB3F7009FB3F7009EB3F7009EB3F7009EB3
- F7009EB3F7009EB3F7009DB2F7009DB2F7009CB1F7009BB0F70099AFF7008EA6
- F6008BA4F60092A7ED00546EC500000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000839AE8005B76D3005B76D300536FCA009EB3F70093AAF6007086D1005B76
- D3005B76D3005B76D300000000000000000000000000617ACC005670C7005670
- C7005670C7005670C7005670C7005670C7005670C7005670C7005670C7005670
- C7005670C7005670C7005670C7005670C7005670C7005670C7005670C7005670
- C7005670C7005670C7005670C800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000AEBEF30095AAF200889EE600566FC8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000007289D700637BCE0092A7EC000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000C9C9C900A1ADDA0058648C00545664005456640054566400545664005456
- 6400545664005456640054566400545664005456640053556300525E8800C2C2
- C200D4D4D4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000DCDCDC00C4C4C4003847
- 7D0027345E0027345E0027345E0027345E0027345E0027345E0027345E002734
- 5E0027345E0027345E0027345E0027345E0027345E0027345E0027345E002734
- 5E0038477D00C4C4C40000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000C3CEF1005E607000999CA600B0B1BA00B0B1BA00B0B1BA00B0B1BA00B0B1
- BA00B0B1BA00B0B1BA00B0B1BA00B0B1BA00B0B1BA00B0B1BA00999BA600BEC9
- EE00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002B3C
- 78000328A30003208200E8E8E700E5E4E300E0DFDE00DBDAD900032082000328
- A3000328A3000328A3000328A3000328A3000328A3000328A3000328A300435E
- BA002B3C78000000000000000000000000000000000000000000000000000000
- 00000000000000000000A3B3EA002F3E73003F4F840044579700495DA100495D
- A100495DA100445797003F4F86002F3F7400A3B3EA0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000060647500A6A9B60025377600253776002537760025377600253776006870
- 92007B819B002537760025377600253776002537760025377600253776006569
- 7A00000000000000000000000000000000000000000000000000000000000000
- 00000000000029386A005469AE005065AC005065AC005065AC005065AC005065
- AC005065AC005065AC005065AC005065AC005065AC005469AE00344686000000
- 0000000000000000000000000000000000000000000000000000000000002C3F
- 7E00042AA90003218700E8E8E700EFEEED00EAE9E800E5E4E30003218700042A
- A900042AA900042AA900042AA900042AA900042AA900042AA900042AA900425E
- BD002C3F7E000000000000000000000000000000000000000000000000000000
- 0000000000004159A70035447A00455EAF002F4BAB001E3DA400032699000326
- 9900032699001E3DA4002F4BAB00455EAF0035447A004159A700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000063677800A2A4B400263877002638770026387700263877002C3D77005960
- 7A0059607A002638770026387700263877002638770026387700263877006367
- 7800000000000000000000000000000000000000000000000000000000000000
- 0000000000002B3C7800536CBF000328A0000328A0000328A0000328A0000328
- A0000328A0000328A0000328A0000328A0000328A000536CBF00354994000000
- 0000000000000000000000000000000000000000000000000000000000002F42
- 8300042BAF0003238C00DFDFDD00F3F3F100F3F3F200EFEFEE0003238C00042B
- AF00042BAF00042BAF00042BAF00042BAF00042BAF00042BAF00042BAF004360
- C3002F4283000000000000000000000000000000000000000000000000000000
- 00002E42880042538E004760B1000B2EA10003279F0003279F0003279F000327
- 9F0003279F0003279F0003279F000B2EA1004760B10042538E002E4288000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000676B7C009FA2B20028397800283978002839780028397800283978003A42
- 63003B425C00283978002839780028397800283978002839780028397800676B
- 7C00000000000000000000000000000000000000000000000000000000000000
- 0000000000002E3F7E00536DC3000429A8000429A8000429A80003279E000326
- 99000325970003269A0003279F000429A7000429A800536DC300374D97000000
- 0000000000000000000000000000000000000000000000000000000000003448
- 8E00042EBB0003259500CAC9C800E3E2E000E6E6E500EAEAE90003259500042E
- BB0003279D00032595000325950003259500032595000325950003279D004262
- CB0034488E000000000000000000000000000000000000000000000000003147
- 8F003654B900082DA9000429A8000429A8000429A8000429A8000429A8000429
- A8000429A8000429A8000429A8000429A8000429A800082DA9003654B9003147
- 8F00000000000000000000000000000000000000000000000000000000000000
- 00006F738300A7ABBB002B3C7B003963EF00446BF000486FF000496FF000496F
- F000496FF000496FF000486FF000476EF000325EEF00466DF0002B3C7B006F73
- 8300000000000000000000000000000000000000000000000000000000000000
- 00000000000034478B005470CD00042DB600042BAC000320800003208000586B
- AB00ADB6D50003208000031F7E0003269B00042DB6005470CD003B519F000000
- 000000000000000000000000000000000000000000000000000000000000364B
- 94000430C20003269B00C1C0BE00DAD9D800DEDDDC00E2E1E00003269B000430
- C20003269B0002175D0002175D000110410002175D0002175D0003269B004364
- D100364B94000000000000000000000000000000000000000000475FB1004658
- 9A00082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00FFFFFF00FFFF
- FF00FFFFFF00042BAC00042BAC00042BAC00042BAC00042BAC00082EAE004658
- 9A00475FB1000000000000000000000000000000000000000000000000000000
- 000073778700AAAFBF002C3D7C004068F000486FF000496FF000496FF000496F
- F000496FF000496FF000496FF000496FF0003761EF00486FF0002C3D7C007377
- 8700000000000000000000000000000000000000000000000000000000000000
- 000000000000364A91005773D300042DB60003228A0003218700032187000321
- 870003238D00032187000321870003218500042CB4005773D3003C53A3000000
- 000000000000000000000000000000000000000000000000000000000000394F
- 9A000633C80004289F00B5B4B200D2D1CF00D6D5D300DAD9D70004289F000633
- C70004289F00031860000318600002114300031860000318600004289F004365
- D500394F9A0000000000000000000000000000000000A8B7ED003E508E004964
- BF00042CB100042CB100042CB100042CB100042CB100042CB100FFFFFF00FFFF
- FF00FFFFFF00042CB100042CB100042CB100042CB100042CB100042CB1004964
- BF003E508E00A8B7ED0000000000000000000000000000000000000000000000
- 000075798A00AFB3C3002E3E7E003E67F000456CF000456CF000456CF000456C
- F000456CF000456CF000456CF000456CF0003761EF00486FF0002E3E7E007579
- 8A00000000000000000000000000000000000000000000000000000000000000
- 000000000000394D98005875D8000429A5000324920003249200042AA900042C
- B200042CB200032493000324920003249200042DB5005875D8003E56A6000000
- 0000000000000000000000000000000000000000000000000000000000003E55
- A4001E49D800193BAC00AFADAC00B3B1B000BAB8B600C1BFBD00193BAC00204A
- D800193BAC00091743000D1E58000A194900091743000D1E5800193BAD004B6D
- DF003E55A400000000000000000000000000000000003F5194004966C8001139
- BF000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE00FFFFFF00FFFF
- FF00FFFFFF000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE001139
- BF004966C8003F51940000000000000000000000000000000000000000000000
- 00007C819200B7BACA00304180003661EF003B64EF003B64EF003B64EF003B64
- EF003B64EF003B64EF003B64EF003B64EF00305CEE00466DF000304180007C81
- 9200000000000000000000000000000000000000000000000000000000000000
- 0000000000003F55A4005878E1000429A8000429A8000429A8000328A1000328
- A1000328A10003279F000429A8000429A800042FBD005878E100425BAE000000
- 0000000000000000000000000000000000000000000000000000000000004159
- AA002A54DF002649BB002445B3002445B3002445B3002445B3002649BB002D56
- DF002649BB002445B3002445B3002445B3002445B3002445B3002649BB004E71
- E4004159AA00000000000000000000000000000000004D62A9003659CC00123B
- C300173FC400173FC400173FC400173FC400173FC400173FC400FFFFFF00FFFF
- FF00FFFFFF00173FC400173FC400173FC400173FC400173FC400173FC400123B
- C4003558CC004D62A90000000000000000000000000000000000000000000000
- 000080849500BBBFCF0032428100315CED00355FED00355FED00355FED00355F
- ED00355FED00355FED00355FED00355FED002B58EC00456CEF00324281008084
- 9500000000000000000000000000000000000000000000000000000000000000
- 0000000000004259AB005879E6002044BC00ADBBE7003C5BC400032699000326
- 99000326990003239000042DB800C9D2EF000431C6005879E600445DB1000000
- 0000000000000000000000000000000000000000000078767600D3D3D300445D
- B000365EE5003B62E6003B62E6003B62E6003B62E6003B62E6003B62E6003B62
- E6003B62E6003B62E6003B62E6003B62E6003B62E6003B62E6003B62E6005376
- E900445DB000D3D3D300807F7F0000000000000000005069BE002E53CE001D45
- CA00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00FFFFFF00FFFF
- FF00FFFFFF00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB001D45
- CA002D52CE005069BE0000000000000000000000000000000000000000000000
- 000084889800BDC2D200334482002D59EA00315CEA00315CEA00315CEA00315C
- EA00315CEA00315CEA00315CEA00315CEA002855E900446BEC00334482008488
- 9800000000000000000000000000000000000000000000000000000000000000
- 000000000000455EB100597BEB000430C200042FBF00042FBF00032187000323
- 8D0003238D0003249100042FBF00042FBF000434D300597BEB00465FB5000000
- 00000000000000000000000000000000000000000000EBEBEB00AEADAC007979
- 7D00728EEE005D80F200567AF200567AF200567AF200567AF200567AF200567A
- F200567AF200567AF200567AF200567AF200567AF200567AF2005C7FF2004F67
- BB0079797D00AEADAC007C7A790000000000000000005774D4002850D5003459
- D700395ED800395ED800395ED800395ED800395ED800395ED800FFFFFF00FFFF
- FF00FFFFFF00395ED800395ED800395ED800395ED800395ED800395ED8003459
- D700224BD4005773D30000000000000000000000000000000000000000000000
- 00008B8F9F00C5C9D90035468400234FE2002551E2002551E2002551E2002551
- E2002551E2002551E2002551E2002551E2001F4CE2004066E600354684008B8F
- 9F00000000000000000000000000000000000000000000000000000000000000
- 0000000000004B64BB006082F2001445E9001240D700123FD600123FD600123F
- D600123FD600123FD600123FD600113DD1001143EC006082F2004B64BB000000
- 00000000000000000000000000000000000000000000CFCECE00EBEBEB00AFAE
- AD005F71B000829CF0006A8AF3006384F3006384F3006384F3005673D4004F6A
- C2004F6AC2006283F0006384F3006384F3006384F3006A8AF300829DF5007979
- 7F00AFAEAD00EBEBEB007F7D7C0000000000000000005A77D8003057DA003E63
- DD004569DF004569DF004569DF004569DF004569DF004569DF00FFFFFF00FFFF
- FF00FFFFFF004569DF004569DF004569DF004569DF004569DF004569DF003E63
- DD002B53DA005975D70000000000000000000000000000000000000000000000
- 00008E92A300C7CCDD00374785001E4ADE00214DDF00214DDF00214DDF00214D
- DF00214DDF00214DDF00214DDF00214DDF001B48DE003E64E400374785008E92
- A300000000000000000000000000000000000000000000000000000000000000
- 0000000000004C65BC006485F3001E4DED001D4CE9001C49DE007691EB00E8ED
- FB00E8EDFB001C49DD001C49DE001D4CE9001949ED006586F3004C65BC000000
- 00000000000000000000000000000000000000000000807E7E00D0CFCF00EBEB
- EB007E7E81006878B1008DA4F100708EF400708EF400708EF400A4B0D800E4E4
- E300D6D5D400627CD500708EF400708EF4007794F4008FA7F6006D80BF00B0AF
- AF00EBEBEB00D0CFCF00D3D3D30000000000000000005C79DB00375EDF00486C
- E3005173E3005173E3005173E3005173E3005173E3005173E300FFFFFF00FFFF
- FF00FFFFFF005173E3005173E3005173E3005173E3005173E3005173E300486C
- E3003058DE005B78DB0000000000000000000000000000000000000000000000
- 00009195A600CBD0E000384987001A47DB001B47DA001B47DA001B47DA001B47
- DA001B47DA001B47DA001B47DA001B47DA001744DB003D62E100384987009195
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000004D66BD006888F3002856EE002957EE002956EC002854E5002854
- E5002854E5002854E7002956EC002957EE002150ED006888F3004D66BD000000
- 0000000000000000000000000000000000000000000000000000D3D3D3008584
- 8300EBEBEB00B2B1B10084848700A1B4F30090A8F6008AA3F600C9C8C600D4D3
- D100E0DFDD006F83C5008AA3F60090A8F6007E8EC00084848700B2B1B100D2D2
- D10085848300D3D3D3000000000000000000000000005C78D5005074EA005477
- EA006886EC006886EC006886EC006886EC006886EC006886EC00536CBE00536C
- BE00536CBE006886EC006886EC006886EC006886EC006886EC006886EC005477
- EA004A6FE9005D78D50000000000000000000000000000000000000000000000
- 0000989CAC00D0D5E6003A4B8900113ED300123FD300123FD300123FD300123F
- D300123FD300123FD300123FD300123FD3000F3CD3003A5FDB003A4B8900989C
- AC00000000000000000000000000000000000000000000000000000000000000
- 0000000000004F68C0006E8DF3003E67F0004068F0004068F0004068F0004068
- F0004068F0004068F0004068F0004068F000335EEF006E8DF3004F68C0000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300D4D3D200EBEBEB00B3B3B2007C89B400ABBBF4009DB2F7009FA6C200C3C1
- BF00C9C7C5008598D8009DB2F700AEBFF80088878B00B3B3B200EBEBEB008B89
- 8700D3D3D300000000000000000000000000000000005D76C900597CEE005578
- EE007390F0007491F1007491F1007491F1007491F1007491F1007491F1007491
- F1007491F1007491F1007491F1007491F1007491F1007491F1007390F0005679
- EE005377EE005D77CA0000000000000000000000000000000000000000000000
- 00009A9EAF00D3D8E9003B4C8A000D3AD0000E3BD0000E3BD0000E3BD0000E3B
- D0000E3BD0000E3BD0000E3BD0000E3BD0000C39D000395ED9003B4C8A009A9E
- AF00000000000000000000000000000000000000000000000000000000000000
- 0000000000005069C100718FF400F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5
- FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00F1F4FE007290F4005069C1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00008B898800D5D4D400EBEBEB008B8A8E007E8BB400B4C3F40092A2D9008494
- C6008494C600A8BAF500B5C5F9008896C300B4B4B300EBEBEB00D5D4D4008684
- 83000000000000000000000000000000000000000000566FC2006685EE00567A
- F1007C97F400809BF500819BF500819BF500819BF500819BF500EDF1FD00FFFF
- FF00EDF1FD00819BF500819BF500819BF500819BF500819BF5007D98F500587B
- F1006081ED00566FC20000000000000000000000000000000000000000000000
- 00009DA1B200D6DBEC003C4D8B000835CC000936CC000936CC000936CC000936
- CC000936CC000936CC000936CC000936CC000835CC00375CD5003C4D8B009DA1
- B200000000000000000000000000000000000000000000000000000000000000
- 000000000000516BC2007491F400F1E0CB00F1E0CB00F1E0CB00F1E0CB00F1E0
- CB00F1E0CB00F1E0CB00F1E0CB00F1E0CB00F5EADA007592F400516BC2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D3D3D300908E8D00EBEBEB00B7B6B50091919300CBD6FB00C3D0
- FA00C3D0FA00949FC50091909400B7B6B500D7D6D600908E8D0093918F009290
- 8F000000000000000000000000000000000000000000AEBEF3005B73C5006886
- EC007391F40088A2F60093AAF60096ACF70096ACF70096ACF700FFFFFF00FFFF
- FF00FFFFFF0096ACF70096ACF70096ACF70095ACF7008AA3F6007693F4006B89
- ED005B72C500AEBEF30000000000000000000000000000000000000000000000
- 0000A3A7B800DBE0F1003F4F8D000431C5000431C5000431C5000431C5000431
- C5000431C5000431C5000431C5000431C5000431C500365AD1003F4F8D00A3A7
- B800000000000000000000000000000000000000000000000000000000000000
- 000000000000536DC4007E99F500F3E2CB00F3E2CB00F3E2CB00F3E2CB00F3E2
- CB00F3E2CB00F3E2CB00F3E2CB00F3E2CB00F5EADA007E99F500536DC4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000D3D3D300D8D7D700EBEBEB00B8B7B6009DA6C500CDD8
- FB00CDD8FB0094939600B8B7B600EBEBEB009391900099979500A5A4A200A5A4
- A200939291000000000000000000000000000000000000000000607AD600647D
- D0006384F3007F9AF50093AAF600A2B6F800A2B6F800A2B6F800FFFFFF00FFFF
- FF00FFFFFF00A2B6F800A2B6F800A2B6F80095ACF700829CF5006686F300657E
- D200607AD6000000000000000000000000000000000000000000000000000000
- 0000A6AABA00DDE3F3003F518E000430C2000430C2000430C2000430C2000430
- C2000430C2000430C2000430C2000430C2000430C2003558CD003F518E00A6AA
- BA00000000000000000000000000000000000000000000000000000000000000
- 000000000000546EC500819BF500F0F3FE00F1F4FE00F1F4FE00F1F4FE00F1F4
- FE00F1F4FE00F1F4FE00F1F4FE00F1F4FE00F3F6FE00819BF500546EC5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000096949300D9D9D800EBEBEB0097979900919D
- C500919DC500B9B8B800EBEBEB00D9D9D800D3D3D300A09E9C00CCCCCC00CCCC
- CC00A09E9C00000000000000000000000000000000000000000000000000536F
- CA006989F3006A8AF300849EF500A8BAF800ADBEF800AEBFF800E1E3E800F2F2
- F200E1E3E800AEBFF800ADBEF800A9BBF80087A1F5006D8CF3006B8AF300536F
- CA00000000000000000000000000000000000000000000000000000000000000
- 0000A9ADBD00DFE5F60040518F003558CA003558CA003558CA003558CA003558
- CA003558CA003558CA003558CA003558CA003558CA003558CA0040518F00A9AD
- BD00000000000000000000000000000000000000000000000000000000000000
- 000000000000556FC600829DF500F4E4CB00F5E4CB00F5E4CB00F5E4CB00F5E4
- CB00F5E4CB00F5E4CB00F5E4CB00F5E4CB00F6EADA00829DF500556FC6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D3D3D3009B999800EBEBEB00BBBA
- BA00BBBABA00DBDBDA009B999800D3D3D3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005570CB006780D400718EEE00819BF50090A8F6009FB3F700AFC0F900B1C1
- F900AFC0F900A1B5F70093AAF600849EF5007490ED006981D4005570CB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000AEB2C200E2E8F90042539000425390004253900042539000425390006776
- A6006776A600425390004253900042539000425390004253900042539000AEB2
- C200000000000000000000000000000000000000000000000000000000000000
- 0000000000005871C800829CF500CACCD100CBCDD100CBCDD100CBCDD100CBCD
- D100CBCDD100CBCDD100CBCDD100CBCDD100D9DBDF00829CF5005871C8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D5D5D300DDDCDB00EBEB
- EB00EBEBEB009D9C9B00D5D5D300000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000627DD8006179CA007A95F1007D98F500849EF5008BA4F6008EA6
- F6008BA4F60086A0F5007F9AF5007D97F1006179CA00627DD800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B0B4C400E3E9FA0043549100435491004354910043549100435491003543
- 740035437400435491004354910043549100435491004354910043549100B6BA
- CB00000000000000000000000000000000000000000000000000000000000000
- 0000000000005872C9007C97F400A5A7AC00A5A7AB00A5A7AB00A5A7AB00A5A7
- AB00A5A7AB00A5A7AB00A5A7AB00A5A7AB00BEC0C4007D98F5005872C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A19F9D00DEDD
- DC00DEDDDC00D5D5D50000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000AFBFF3005E77CA006881D4006B85E2007691ED007792
- ED007691ED006C86E2006881D4005E77CA00AFBFF30000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000094A2D300D8DEEF0094A0C700445492004454920044549200445492004454
- 920044549200445492004454920044549200445492004454920094A0C70094A2
- D300000000000000000000000000000000000000000000000000000000000000
- 0000000000005872C9007C96EE008FA5F00094AAF20095AAF20097ACF20097AC
- F20097ACF20096ABF20095AAF20093A9F200889FF0007C96EE005872C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000C2CEF60096A3D400B5B9CA00B5B9CA00B5B9CA00B5B9CA00B5B9
- CA00B5B9CA00B5B9CA00B5B9CA00B5B9CA00B5B9CA00B5B9CA0096A3D4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D1D1D100CBCBCB00C7C7C700C5C5C5007C8FCD005368AF00354785003546
- 8100364783004358A100566CB5007F91D100C7C7C700C7C7C700C9C9C900DADA
- DA00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000DDDDDD00C9C9C900C7C7C700C2C2C200B1BCE5003446
- 820029376700C0C0C000C0C0C000C5C5C500CDCDCD00DADADA00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000ACACAC00A4A4A400A4A4A400A4A4A4008A8A
- 8A008A8A8A00A4A4A400B3B3B300C7C7C7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008EA2E10031458B004B64B5004561C1002E4FBE00143AB9002347
- BF00143BBC002449C7002E53CD004566D4004B61AF003D56AA0097A9E8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000008297DD00485A9900415C
- B9003654B7002E3F7C008196DC00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A4A4A40000000000000000002A3B7400354476003F518C004D66B7004F67
- B9004F68BA00485DA50040518D00374677007288CB0000000000C7C7C700A4A4
- A400000000000000000000000000000000000000000000000000000000000000
- 00005068BA00374885004B62AD002345B600082EAD00042AAB00617ACB008295
- D7005974CB00042DB600042EB9000832BF003E61D500506AC4004258A5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000008297DE00304381003755BB000F34
- AE00082DAB004B60A4002F4180008297DE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000009494
- 940000000000B7C3EE0032427D004C61A5004E69C3004B69CE003F62D6004063
- D9004064DA004365D4004B69CF004F6AC6003A497D002C3E7B00AAB9EB00D3D3
- D30096969600D3D3D30000000000000000000000000000000000000000000000
- 0000415393004B65BE002E50BF00042CB300042CB2001B3FB7008194D6008194
- D5006179CA003353BE00042CB100042DB5000832C0002E53CE004C6ACF005B74
- C900000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005169BD00394B89004D65B300082FB000042B
- AF00042BAE003655BD004C61A700314483000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000096969600D3D3
- D30095A5DF00959392007D8294004464CE00385DD7004368E3005175EB005275
- EB005174EA004D72EA004469E5003B60DC004963B7007D81940091908F000000
- 0000000000009F9F9F000000000000000000000000000000000093A5E4003E52
- 96003256CD001D44C8002349C900274CCA008B9FE20091A4E4008B9FE100879B
- DE008498DC006A82D2002245B800042AAB00042BAF00042CB400042EB9004D6A
- CB004258A20095A9E7000000000000000000283870003551AE003552B000455F
- B4004964B6004B65B800546EBB005E76BC005F78C000657DC200788DC500788D
- C500788DC500788DC5007287C4005F78C0005E76BC005E76BC004B65B8004963
- B5004963B5003A56B1003E59B0002D3E75000000000000000000000000000000
- 00000000000000000000546CC1004C66BC002A4EC400042EB900042DB800042D
- B800042DB700042DB7000830B8003657C50035488B00A8B7ED00000000000000
- 000000000000000000000000000000000000000000009A9A9A0000000000B7C4
- EF00C7C6C500E1E1E000F0F0F00094A0C8003D5DC9002D50C400183BAD001739
- A8001738A7001D40B300284BBF003757C300D1D0D000EDECEC00DDDCDB00B1AF
- AE00A4B5E80000000000B3B3B3000000000000000000000000003A519D00546D
- C1002D52D100365BD3003D60D500496AD8009DAEE9009CADE80096A8E60093A6
- E5008197DF002348C300052EB700042CB200042AAB00042BAD00042CB2002F53
- C9005069BF003D54A30000000000000000002A3C760003279F00032699001032
- A300032699001032A30003279F001032A30003279F000326990003279F000326
- 9C001033A800032699001032A30003279F0003279F0003279F0003279F000327
- 9F0003279F0003279F002947AD002A3C76000000000000000000000000000000
- 000000000000566FC3003F5396002B50C800042FBE00042FBE00042FBD00042F
- BD00042EBC00042EBC00042EBB000831BC004F66B100384D9600BCC8F3000000
- 0000000000000000000000000000000000000000000000000000000000003344
- 8000E7E6E600F3F3F300F7F7F700BAB9B8007580A700233F9C00425AAB00425A
- AA00455CA700334EA500203B9800747FA500EBEAEA00F9F9F900EFEFEF009EA3
- B7002F3E7300000000009A9A9A0000000000000000006D85D6004F64AD005272
- DB004668DA005070DD005373DE007D95E600A8B8EE00A6B6ED00A1B2EB009EAF
- E9006782DC002248C800173EC2000B34BC00042BB000042AAB00042BAC000830
- B8003F60CD004C61A90000000000000000002D3E7C000328A400042695002545
- B000042695002545B0000328A4002545B0000328A400042695000328A4000426
- 95002545B000042695002545B0000328A4000328A4000F32A8003250B5003250
- B5000F32A8000328A4002949B2002D3E7C000000000000000000000000000000
- 00007A8FDC0041559B004E69C4000430C2000430C2000430C2000430C2000430
- C2000430C1000430C100042FC000042FC0003E5FCE004E63A900364D98000000
- 00000000000000000000000000000000000000000000000000007388CB003A49
- 7C00ADB9E100FAFAFA00EBEBEA00CCCAC900A5A3A100797F9800384677003543
- 7500324172003B4B8000797F9800A6A4A300DFDEDD00EEEEEE00FBFBFA004862
- B7003F4E82005D73BE009F9F9F0000000000000000004D63AB005F7DE1004D6F
- E100758FE9007691E9007792E900BBC8F400BAC8F400B8C6F300B3C2F200B0BF
- F000ACBCEF00496BDA003E61D5003156CF00163DC1000831B900042CB300042A
- AB00082FB1004563C70098AAE90000000000324687000D33B3000D2B8F005670
- C9000D2B8F005670C9000E34B3005670C9000E34B3000D2B8F000E34B3000D2B
- 8F005670C9000D2B8F005670C9000E34B3000E34B3001B399C00304AA400304A
- A4001B399C001439B5002D4EBD0032468700000000000000000000000000BDCB
- F400546DC000355AD6000A37CE000D3ACE000E3ACE000E3ACD000E3ACC000E3A
- CC000E3ACC000E3ACC000E3ACC000D39CB000A36C9001841CC004C6ACF005871
- C7000000000000000000000000000000000000000000A4B2E5003A4879004C66
- BF005074EA004060CC0098A4CC00C5C3C100D3D2D000A1B3ED00000000000000
- 00000000000000000000A1B3ED00D3D2D000D5D3D20097A2C8003656C2003A5F
- DD00506BC8003D4D8200A4A4A4000000000000000000566FC2005E7DE6006180
- E700859DED0088A0EE0088A0EE00C2CEF600C1CDF500C0CCF500BCC9F400B8C6
- F300B5C3F3007892E6004F6FDC004466D800294ECC001940C3000932BA00042B
- AC00042BAC006B82D000617ACD000000000035488C002145BD001D378D00788E
- D7001D378D00788ED7002549BF00788ED7002549BF001D378D002549BF001D37
- 8D00788ED7001D378D00788ED7002549BF002549BF001C368F006B7CB6006B7C
- B6001C368F002549BF003858C50035488C000000000000000000000000004B61
- B4003C61DC001440D4001541D4001B46D5001C46D4001C46D4001D47D4001C46
- D3001C46D3001D47D3001D47D3001C46D2001641D100123ED000284FD300455A
- A3008A9EE400000000000000000000000000000000005B71B70042538D004765
- C8005073E8003154CA002541A000D5D4D200A1B3ED0000000000000000000000
- 0000000000000000000000000000A1B3ED009CA3BB001F3A9600274ABE00466B
- E7004565D000475A9C009F9F9F0000000000000000005D77CF006684E9007590
- EC0094A9F100A3B5F300B9C7F600CBD5F800C9D4F800C7D2F700C2CEF600C0CC
- F500BCC9F400AFBFF1006582E3005575DE00395DD3002A4FCC001A41C300042C
- B2003252BB008598D700465FB10000000000384C92003658C8002E4696008398
- DC002E4696008398DC003B5CCA008398DC003B5CCA002E4696003B5CCA002E46
- 96008398DC002E4696008398DC003B5CCA003B5CCA0029408C00828FB900828F
- B90029408C003B5CCA004262CB00384C920000000000000000006680D5005067
- B300214CDB001D49DB00234DDB002A53DC002A53DC002A53DC002A53DB002A52
- DA002A52DA002A52DA002A52D9002A52D900244DD7001F49D6001944D500556E
- C5003E57A800D1DAF8000000000000000000000000003A4E9000495DA1003D5E
- CC004A6DE1002548BE003751AA007382B8000000000000000000000000000000
- 0000000000000000000000000000000000003D4C8100324CA3001B3EB0004D72
- EA004063D5005066B100A4A4A40000000000000000006F89E3007893EF0094AA
- F200D6DEFA00D7DFFA00D7DFFA00D7DFFA00D6DEFA00D5DDFA00D1DAF900CED8
- F900C7D2F800BAC8F50097ABEE00728DE8005776DF005372DB009BADE800133B
- C0003354C300425FC200364A8B00000000003E539E005A77D9005A71BD00879C
- E3005A71BD00879CE3006983DD00879CE3006983DD005A71BD006983DD005A71
- BD00879CE3005A71BD00879CE3006983DD006983DD006983DD006983DD006983
- DD006983DD006782DC005371D7003E539E0000000000526DC9005B75C800466B
- E800345DE6003D64E6004368E700466BE700456AE600456AE600456AE6004469
- E500456AE5004469E4004469E4004469E4004469E4004065E300385FE1002F58
- E0005876DC004B61AF00000000000000000000000000222F59004F67B500385B
- D1004063D7001D3FB100425AAB00D4D4D4000000000000000000000000000000
- 00000000000000000000000000000000000038477900425AAA001032A1005174
- E9004266DC00546DBF008A8A8A000000000000000000718BE5007E99F0009EB2
- F400DCE3FB00DDE4FB00DDE4FB00DDE4FB00DCE3FB00DAE1FA00D6DEFA00D4DD
- FA00C4D0F800C8D3F800C2CEF60094A9EE006481E4007B94E600A1B2EB003D5F
- CE004866CC003354C20036488A00000000004158A3005C7ADD00637CCD00849B
- E6006A81CE00859BE600738DE100859BE500738DE1006A81CE00738DE1006A81
- CE00859BE5006A81CE00859BE500738DE100738DE100738DE100738DE100728C
- E100718BE1006C86E0005372DB004158A300000000004E67BA006380E500365F
- EA00456BEB004D72EB005276EC005376EC005477EC005376EB005376EB005376
- EB005376EA005376EA005376EA005376E9005376E9005073E900496EE7003059
- E300456AE6005972CC00000000000000000000000000232F59004F67B500385B
- D1004164D8001E40B200425AAB00D6D6D6000000000000000000000000000000
- 00000000000000000000000000000000000039477900465DA8001133A2005174
- E9004266DC00546DBF008A8A8A000000000000000000728DE400819BF100A5B7
- F500D6DEFB00E2E8FC00E2E8FC00E2E8FC00E1E7FC00E0E6FC00DBE2FA00D8E0
- FA00CBD6F900CED8F900C9D4F800C3CFF600758FE8009CAEED00A8B8EE004062
- D2007C92DD007289D600364A900000000000455CA9003158D900375CDA00395E
- DA003B60DA003B60DA003B60DA003B60DA003B60DA003B60DA003B60DA003B60
- DA003B60DA003B60DA003B60DA003B60DA003B60DA003B60DA003B60DA003A5F
- DA00395EDA00365BDA003C61DB00455CA900000000005C75CC005579F100355F
- ED005478F0005E80F0006182F1006182F0006182F0006182F0006182F0006182
- EF006182EF006182EF006081EE006181EE006181EE006080ED005A7CEC004268
- E900345DE7005677E400BFCCF5000000000000000000374577004E65B200385B
- CE004467DB001E41B600435CAD0093A5DE000000000000000000000000000000
- 0000000000000000000000000000000000003C4B7C00425AAB001537A8005275
- EA003F63D900526BBC00A4A4A4000000000000000000647ED100849EF200A4B7
- F600D3DCFB00D5DEFB00E2E8FC00EAEFFD00E9EEFD00E8EDFD00E5EAFD00E1E7
- FC00DFE5FB00D7DFFA00CDD7F900CDD7F800C0CCF500BAC8F400B2C1F2009FB0
- EA008A9FE3006680D7006079CA0000000000BFCCF5004967CA00335BE3002651
- E100335BE200375EE300385FE3003960E3003960E3003960E3003960E3003960
- E3003960E3003960E3003960E3003960E300385FE300385FE300375EE3002C56
- E1002550E100335BE3004B64B900BFCCF500000000006583E9005A7DF2005C7F
- F2007B97F4007E99F5007D98F5007D98F5007D98F5007D98F5007D98F5007D98
- F5007D98F500829DF50086A0F500859FF500809BF5007E99F5007B97F4006384
- F3004C71F000466DEF005773CE0000000000000000005D71B90045558F004664
- C7005275E9003356CB002642A2009C9A990096A8E20000000000000000000000
- 000000000000000000000000000096A8E2007A809800203B98002B4EC000476C
- E6004666CF00495C9E00A4A4A40000000000000000005D74C2007E99F10099AE
- F600D8E0FB00DCE3FC00DEE5FC00E7ECFD00ECF0FE00EBF0FD00DAE1FB00CBD6
- FA00CED8FA00DAE1FA00D6DEFA00D1DAF900C5D1F700BECBF500B6C4F300A0B1
- EB0094A7E7006983D70097A9E80000000000000000004E68BF00506DD000456A
- E9004F73EA005578EB005578EB005578EB005578EB005578EB005578EB005578
- EB005578EB005578EB005578EB005578EB005578EB005578EB005578EB004268
- E800446AE900506DD000BFCCF50000000000000000006D8AEA006C8BF3007491
- F4008FA7F60092A9F6008EA6F6008AA3F6008AA3F6008AA3F60086A0F500849E
- F500839EF50097ADF7009BB0F7009AAFF70093AAF6008FA7F6008AA3F600718F
- F400587CF200436BF0004E68C10000000000000000009FAFE3003F4D7E004B66
- BD005174E9004464CF007985AD00BEBCBA009E9C9B0096A8E200000000000000
- 0000000000000000000096A8E2009E9C9B00ABA9A8007884AA003B5BC5003A5F
- DB004F6BC80042518500ACACAC0000000000000000004D67C100728CE50091A8
- F500D8E0FC00E2E8FD00E3E9FD00E2E8FD00E4E9FD00EEF2FE00E4E9FC00DBE2
- FB00E3E8FC00DEE5FB00D9E0FA00D4DDFA00C9D4F800C1CDF500BAC8F400A0B1
- EC00A0B1EA00788CCF00000000000000000000000000BFCDF600516BC4005774
- D6005E80EF006A89F0006E8CF1006E8CF1006E8CF1006E8CF1006E8CF1006E8C
- F1006E8CF1006E8CF1006E8CF1006E8CF1006E8CF1006E8CF1006B8AF0005679
- EF005774D500516BC400000000000000000000000000718CEA008EA6F6008AA3
- F6009FB3F700A3B6F800A2B6F8009AAFF70097ADF70093AAF600859FF500829D
- F5008AA3F600A7B9F800AABCF800ABBDF800A5B8F800A2B6F8009CB1F7007C97
- F4006183F2004A70F0004E68C00000000000000000000000000034467F004F63
- A5004163D20099A5CC00BFBEBE00C8C6C400BCBBB900B7B5B50093A5DE00D4D4
- D400D4D4D4006C7AB000B7B5B500BDBBB900D6D4D300C2C1C10098A4CB004061
- D0005067B20034447700C7C7C700000000000000000000000000536CC500738D
- E000C0CEFA00DDE4FC00E8EDFD00EBF0FD00E9EEFD00E6ECFD00E4E9FD00EDF1
- FE00EAEFFD00E3E8FC00DFE5FB00D9E0FA00CED8F900C5D1F700B7C5F400A9B9
- EF007F93D500455DAA000000000000000000000000000000000000000000C1CD
- F6005876DA005F7FEA006A87EB006D8AEB006D8AEB006D8AEB006D8AEB006D8A
- EB006D8AEB006D8AEB006D8AEB006D8AEB006B88EB006986EB006281EA005771
- C900C1CDF600000000000000000000000000000000006882DA009DB2F700BDCB
- FA00AEBFF800B4C4F900B5C5F900ACBDF800A0B4F7008CA5F600718FF400738C
- E1006F87D600C8D4FB00BCCAFA00B3C3F900B8C7F900B4C4F900AEBFF8008AA3
- F6006888F3004E73F1005671CD00000000000000000000000000000000003646
- 8200B4B3B200E8E8E700F9F9F900ECEBEB009CA8D0002642A000425BAC00425A
- AB00425AAB003550A800233E9B009CA8CE00F5F4F400F8F8F700E4E3E2007D83
- 97003242780000000000000000000000000000000000000000009CAEEE005B73
- C600AEBFF800CAD5FB00E2E8FD00EEF2FE00EDF1FE00EAEFFD00E3E9FD00E9EE
- FD00EAEFFD00E6EBFD00E0E6FC00DBE2FA00CED8F900C1CDF600B0C0F300AFBD
- ED00596DB20097A9E80000000000000000000000000000000000000000000000
- 00005771C9005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8005771C8005771C8005771C800C1CD
- F60000000000000000000000000000000000000000006179CC00809AF300B9C8
- F900BAC9FA00B3C3F900B4C4F900A6B9F80096ACF7007D98F5006D8AED005F77
- C800556EC400BAC9FA00CCD7FB00BECCFA00B4C4F900B2C2F900ABBDF800859F
- F5006082F200567AF2006882DB0000000000000000000000000000000000ACBB
- ED00C4C3C200D8D7D600EBEAEA00BAC6ED004262CD003255CA001D40B300183B
- AD00173AAC002245B9002F52C5003E5EC900F8F8F800E7E6E600D4D3D200ACAB
- A900A6B5E8000000000000000000000000000000000000000000000000006883
- DC0096ABF100B3C3F900CCD7FB00EAEFFD00EEF2FE00EDF1FE00E6EBFD00E1E7
- FD00E2E8FD00E6ECFD00E1E7FC00DBE2FA00C9D4F900B9C7F600B0C0F3007485
- C400617AD0000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005570CC006F87DA008EA6
- F600CBD6FB00C5D1FA00B5C5F9009EB3F700859FF5007894F400637CCD00617C
- D8007993E200859CE800B1C1F900C7D3FB00BAC9FA00B0C0F900A7B9F8007995
- F4006082F2005F7EE700AEBEF3000000000000000000B3B3B300000000000000
- 0000C6C5C300C8C7C600DFDFDE004264D3005174EA005174E8004265D9003E61
- D5003E61D4004669DD004F72E5005376EA00A6B2DB00DDDCDB00C3C2C1008EA0
- D900000000000000000000000000000000000000000000000000000000000000
- 00006883DC005E76C9007992E400A9BBF800B8C7F900C9D5FB00D2DBFB00D0DA
- FB00C9D4FA00C6D2F900CED8F900C3CFF800B7C6F700A2B1E5005C72BE000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000C1CDF6005772
- CC006E88DC007A94EA007D97ED006E89E5006A83D3005871C700000000000000
- 0000000000008FA4EA00556FC7006980CF007C96EB007A95EC00738EEB00617D
- DA005D76C9006B84DA00000000000000000000000000000000009A9A9A000000
- 000000000000A6B6E90038487C005064AC004D68C0004361C7003A5DD1003E61
- D5003E61D5003F60CF004463CA004D68C50049598E0034447900A6B6E9000000
- 0000B3B3B300ACACAC0000000000000000000000000000000000000000000000
- 0000000000009CAFEE005871C9007B95E80091A8F400A1B5F700ABBDF800ABBC
- F700A6B8F700BDCBF900C0CDF800BCCAF7008092D300536CC1009BADEC000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005E79D6005771C8005670C7005874CD006B84DD00D3DBF900000000000000
- 0000000000000000000000000000859BE9005670C7005670C7005670C700647E
- D9009FB1F0000000000000000000000000000000000000000000D3D3D3009696
- 96000000000000000000000000003A497A00445487004A5C9B005068B600526A
- B8005169B9005066AF004B5E9D00455588005E74BB000000000000000000B3B3
- B3009A9A9A000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005670C800677ECD007089DB0096AAEE009DB1
- F200A8B9F30093A6E70091A2DF006F84CD007A91E30000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009F9F9F00BDBDBD0000000000000000008598D8005065AD00344478002A36
- 60002A3661003E4F87005065AD008598D8000000000000000000BDBDBD00BDBD
- BD00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009D9B9B0092908F0086858500BFBFBF00C0C0C000C0C0C000C5C5C500C7C7
- C700C7C7C700DADADA00DBDBDB00DCDCDC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000030448A00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000DCDCDC00DADADA00CACACA00C5C5C500C0C0C000C0C0C000213166001521
- 490015214900C0C0C000C1C1C100C7C7C700D2D2D200DADADA00DCDCDC000000
- 00000000000000000000000000000000000000000000283B80004F6CCD00506C
- CB00506ABE00506AC000516BC500475CA5002E46920000000000000000000000
- 00000000000000000000000000002E469200516BC500506BC300506ABE00506C
- CB004F6CCD004F6CCD0000000000000000000000000000000000000000000000
- 0000A5A3A200C2C0BF00AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003349920035447C00B9C6
- F100000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000006C82CD001E306E002F3F740038509D004E66B60042548F003751
- AB003751AB001E3377004E66B60038509D003F4F88001E306E006C82CD000000
- 00000000000000000000000000000000000000000000293D8400042EBC00042E
- BC00042EBC00042EBC00042EBC002A408B00BBC7F20000000000000000000000
- 0000000000000000000000000000BBC7F2001B389800042EBC00042EBC00042E
- BC00042EBC00042EBC0000000000000000000000000000000000000000000000
- 0000A5A3A200BFBDBC00AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003D54A2006271A7003D54
- A200000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000203372005264A0005268B30039497D003F518D005067B4001F3E
- A6001F3EA6004C60A2003F518D0039497D004963B7005264A000203372000000
- 000000000000000000000000000000000000000000002B3E8600042FBF00042F
- BF00042FBF00042FBF001D399C00BBC7F2000000000000000000000000000000
- 0000000000000000000000000000000000002C438E001D399C00042FBF00042F
- BF00042FBF00042FBF0000000000000000000000000000000000000000000000
- 0000A5A3A200D1D0CF00AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000657ECC00647AC5004051
- 8D008397DE000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000031479600465A9E002948AE004E68BC003C58B5001638A7000328
- A0000328A0002443AC003C58B5004E68BC002948AE00465A9E00314796000000
- 000000000000000000000000000000000000000000002E428D000431C5000431
- C5000431C5000431C5002148CC003A4D9300869AE10000000000000000000000
- 0000000000000000000000000000BBC8F300566CB7003358D0000431C5000431
- C5000431C5000431C50000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000A8B7ED005D78CF004664
- C9004F63A4000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006F86D200253C
- 85002B429000455793004C66C000042AAA00042AAA00042AAA00042AAA00092E
- AC00092EAC00042AAA00042AAA00042AAA001B3EB2004C66C00045579300344C
- 9C00253C85007F95DB000000000000000000000000002F4590000432C9000432
- C9001F3EA5000432C9000432C9005671C8003B4F9600889CE200000000000000
- 00000000000000000000BDC8F300354B99003358D3000432C9000432C9001F3E
- A5000432C9000432C90000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D0D8F700728AD900173E
- C1005871C800A8B7EE0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D0D8F700263A8000566A
- AE004B5FA1004C67C4001237B400042BAF00042BAF001F42B800506BC800506B
- C800516BC2003D5BC1001F42B800042BAF00042BAF001237B4004C67C400485E
- A900566AAE00263A8000000000000000000000000000324893000835CC002341
- A800334A9A002442A9000835CC00254DD2005A74CB003E539A00000000000000
- 000000000000BDC9F300374E9C005B71BD000835CC000835CC002442A900334A
- 9A002341A8000835CC0000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000007A8FD700123B
- C500375ACE004359AD0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004B64B800465A9C004B68
- C9003D5CC5001B40BB00042CB4000D34B6004160C600546DC000364886003345
- 84002E41810044599F00546DC0004160C600042CB400042CB4001B40BB00294C
- BF004B68C900465A9C000000000000000000000000004159B0003B53A900BCC9
- F40000000000BCC9F400384FA0001945D6001945D6003359D9004358A1008A9E
- E400BDC9F400647AC5004468DE001945D600324FB400324B9F0091A6EB000000
- 0000BCC9F4003B53A90000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006D83CD00355A
- D8000433CF005B76D0004259A900D1DAF8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000435DB2004659
- 99000F38C1001039C2000F38C1005168B3002B428C00A7B6EC00000000000000
- 00000000000000000000A7B6EC002B428C004766CF000F38C1001039C2005673
- D30045589800435DB20000000000000000000000000000000000000000000000
- 00000000000000000000BDC9F4003956BA00224CDA00224CDA006B84D600465A
- A5003D55A6004B6EE100224CDA00224CDA00354EA10091A6EC00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006E84CC003E63
- DF000737D6004468E0005A72C000556FC8000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005A74C7004B61
- AC001A42C8001A42C8003155CD0033488D00A7B7ED0000000000000000000000
- 0000000000000000000000000000A7B7ED005B75CB003055CD001A42C8004E6D
- D4004960AB005A74C70000000000000000000000000000000000000000000000
- 00000000000000000000000000003C53A700415DBE002B54DE004368E2007189
- D9006E84CD002B54DE002B54DE00415DBE0093A7EC0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000667DC700607F
- E8001241DE002450E100607EE2005369B4000000000000000000000000000000
- 0000000000000000000000000000000000000000000096A9E80030499C005A72
- C300244BCE00244BCE00506FD800506AC0000000000000000000000000000000
- 0000000000000000000000000000000000004D64AF004F6FD800234ACE003D60
- D4005871C30030499C0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000BECAF4004059AD003B62E5003B62
- E5003B62E5004B67CA003B55AC0094A8EE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A7004C63B200455EB3005E77CE007189DA005973
- CC004762B90044579B00475DA7004862B6005C77D2005E7CE2006583E7006681
- D8005970C000425BB40000000000000000000000000000000000000000000000
- 00000000000000000000000000004A63BA004A63BA004A63BA005D74C2007995
- F3002855EC002855EC002C58EC006282EF007790E20000000000000000000000
- 000000000000000000000000000000000000000000005D78D5005273E0004669
- DD003A5FDB003A5FDB006481E200000000000000000000000000000000000000
- 0000000000000000000000000000000000003E549D006481E300355BDA00395E
- DB004367DD004B6DDE002D459400000000000000000000000000000000000000
- 000000000000000000000000000000000000BECCF500455DB200446AE900446A
- E900446AE9006C85DE005065B3008CA1E8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A7006886EB006D87E0005F7AD500546EC200546F
- C8005A74CB004E6DD6003B5DCD002E52CA003E62D8004568DE005778E5007994
- F1007C97F4006881DB0000000000000000000000000000000000000000000000
- 00000000000000000000000000008BA1EA006F8BEB006E8BEB007993ED006C8B
- F300325EEF00325EEF00325EEF00486FF000536CBF00D2DBF800000000000000
- 000000000000000000000000000000000000000000005E7AD8005676E3004E70
- E2004368E000466AE1006986E600000000000000000000000000000000000000
- 0000000000000000000000000000000000004157A2006B86E1003E63DF004267
- E0004A6DE1004F71E20030489900000000000000000000000000000000000000
- 0000000000000000000000000000BECCF500475FB5008396D9004B70EC004B70
- EC004B70EC006081EF00879CE5005369B6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A7006282EC00839DF3007C97F3006886EA005878
- E4004E6FDE001D45CB000D36C1000F38C200395ED6005071E0006583E700869F
- F20087A1F5007791EA0000000000000000000000000000000000000000000000
- 00000000000000000000000000008DA3EE005378F100496FF0004C72F1004169
- F0003D66EF003D66EF003D66EF003D66EF007087D6005873D000000000000000
- 00000000000000000000000000000000000000000000455CA700556EBF00718B
- E5004D70E5004A6EE500718DEA00AABAEF000000000000000000000000000000
- 000000000000000000000000000000000000485EA8006F8BEA00496DE5005677
- E6006D88E500546DBF003E58B300000000000000000000000000000000000000
- 00000000000000000000BFCCF5008DA0DF007C97F4005D80F2006A83D700455F
- BB004962BB005D80F2005D80F200708EF400586FBD008FA3E900000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A700879FF000A5B8F70093AAF5006D8AEA005A7A
- E400476ADD002047CB000D36C0000F38C2003A5ED6005071E0006684E70091A8
- F3009FB3F600839BEC0000000000000000000000000000000000000000000000
- 00000000000000000000000000008498DF007693F4005176F1005176F1005176
- F1005176F10091A7F00099ADF10096ABF1008EA5EF008DA0E100526CC7000000
- 0000000000000000000000000000000000000000000000000000667ED5005C75
- C7006081EE006383EF006A88EE00425BAC00ADBCF10000000000000000000000
- 0000000000000000000000000000ADBCF1007690E5006A89EF006383EF007994
- F1005872C600667ED5000000000000000000000000004E69C5004A65C000BFCC
- F50000000000BFCCF5004D66BD00829DF5006686F3006686F3004761BC0098AB
- F000BFCCF5007089D9006686F3006686F30098AAEB005970BF0090A3EA000000
- 0000BFCCF5004A65C00000000000000000000000000000000000000000000000
- 0000A5A3A200D2D1D000AAA7A70089A1F000A5B8F70093AAF5006D8AEA005A7A
- E400476ADD002047CB000D36C0000F38C2003A5ED6005071E0006684E70091A8
- F300A0B4F600849CEC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000798ED70090A8F6005D80F2005D80F2005D80
- F2005D80F2006B81CF00506AC100506AC100506AC100506AC100566FCD000000
- 00000000000000000000000000000000000000000000000000005370CB005D73
- BE006989F2006E8CF2006A89F2006982D6003E59B100ADBCF100000000000000
- 00000000000000000000ADBCF1003E59B2007C97F4006989F2006E8CF200849E
- F4005970BC005370CB000000000000000000000000004761B8008296DA004862
- BB00BFCCF5004E67BE0096A6E1006E8DF3006E8DF300778DDB0098ABF0000000
- 0000000000004C65BD00778DDB006E8DF3007F9AF5009CAEEC005C73BF00BFCC
- F5004862BB008296DA0000000000000000000000000000000000000000000000
- 0000A7A5A300D2D1D000AEACAB0089A1F000A5B8F70093AAF5006D8AEA005A7A
- E400476ADD002047CB000D36C0000F38C2003A5ED6005071E0006684E70091A8
- F300A0B4F600849CEC0000000000000000000000000000000000000000000000
- 00000000000000000000000000007489D1009BB0F7006787F3006787F3006787
- F3006787F300859BE900516BC400000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000728BDD005069BA006F8B
- EB006E8DF3007894F4007894F4007F9AF5006B84D700465FB300ADBCF1000000
- 0000000000005D79D100465FB3006781D5007491F4007894F4007894F4007290
- F4006A88EB004F68BA000000000000000000000000004963BA007F9AF50097AD
- F700A0AFE40097ADF7007F9AF5008498DE004B64BF0098ABF000000000000000
- 00000000000000000000BFCCF5004F67BF007F9AF5007F9AF5008DA5F60091A2
- DE0097ADF7007F9AF50000000000000000000000000000000000000000000000
- 0000A5A3A200BFBDBC00AAA7A70089A1F000A5B8F70093AAF5006D8AEA005A7A
- E400476ADD002047CB000D36C0000F38C2003A5ED6005071E0006684E70091A8
- F3009DB2F600839CED0000000000000000000000000000000000000000000000
- 00000000000000000000000000005972C600B1C1F500839EF5007D98F5007D98
- F5007D98F5008BA4F600879EE900536DC6000000000000000000000000000000
- 00000000000000000000000000000000000000000000D2DBF800425CB6006983
- D9006A82D100809BF2007E99F5008DA5F60088A2F6008BA4F6008DA5F60086A0
- F50086A0F5008EA6F6008CA5F60088A2F6008BA4F600829CF500849EF200617C
- D8006882D900425CB6000000000000000000000000004B64BB0087A1F50087A1
- F5009EB3F70087A1F50087A1F5004D66C00098ABF00000000000000000000000
- 0000000000000000000000000000BFCCF5008A9EE00087A1F50087A1F5009EB3
- F70087A1F50087A1F50000000000000000000000000000000000000000000000
- 0000A5A3A200BFBDBC00AAA7A700849DF000A4B7F70093AAF5006D8AEA005A7A
- E400476ADD002047CB000D36C0000F38C200385DD6004D6FDF006280E60089A1
- F20091A8F5007E98EC0000000000000000000000000000000000000000000000
- 00000000000000000000000000005973CF00AEBEF30094ABF60086A0F50086A0
- F50086A0F50089A2F60097ADF7006C83D2000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000008EA2E9004460
- BC004964C100667DCA00849EF20097ADF70097ADF70097ADF70090A8F6008DA5
- F6008EA6F60094ABF60097ADF70097ADF70093AAF60089A2F300687FCA004E6B
- C8004460BC008EA2E9000000000000000000000000004C65BC008FA7F6008FA7
- F6008FA7F6008FA7F60090A2E20098ABF0000000000000000000000000000000
- 000000000000000000000000000000000000526AC20090A2E2008FA7F6008FA7
- F6008FA7F6008FA7F60000000000000000000000000000000000000000000000
- 0000A5A3A200BFBDBC00AAA7A7007691EE009CB1F50091A8F4006D8AEB005979
- E4004669DD001F46CB00143CC3002147C7004567D8005D7BE1006885E7007994
- F1007B96F3007691EC0000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D50099AAE800A5B8F80092A9F60092A9
- F60092A9F60092A9F6009AAFF7008EA4EB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004965C2006E85D20094ABF6009BB0F7009EB3F700A2B6F800A2B6
- F800A2B6F800A1B5F7009EB3F7009DB2F70095ACF700748AD5004965C2000000
- 000000000000000000000000000000000000000000004E67BE00A1B5F700A1B5
- F700A1B5F700A1B5F700B3C3F8004E68C100BFCDF60000000000000000000000
- 0000000000000000000000000000BFCDF6009BABDE00B3C3F800A1B5F700A1B5
- F700A1B5F700A1B5F70000000000000000000000000000000000000000000000
- 0000817F7E00B9B8B600C1C0BE00787F9E007A93E7007994EF006A87EA006984
- E100647ED800576DB9005468A800475DA7006981D600748DDD00778DDF00546E
- C800637BCD006C85DC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000859CE9008699DD00BAC9FA00A6B9F800A6B9
- F800A6B9F800A6B9F800A6B9F800A2B6F8005771C90000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004763BF006D87DB007C96ED006A80C8006D84D20099AEF200A0B4
- F7009EB3F7008399E3006D84D2006A7FC7007491F400718ADD00405DBC000000
- 000000000000000000000000000000000000000000004F69C000A9BBF800A9BB
- F800A9BBF800A9BBF800A9BBF800A0ADDF00526CC70000000000000000000000
- 0000000000000000000000000000526CC700B9C8F900A9BBF800A9BBF800A9BB
- F800A9BBF800A9BBF80000000000000000000000000000000000000000000000
- 0000BFBEBC00D9D8D700E3E2E1007A7877005974CF005F77C9005E74C000556B
- B800516BC200899EE500C9D4F600000000000000000000000000000000000000
- 000092A7ED005874CD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000AFBFF3007D91D600B0C0F900A1B5F700A4B7
- F800A5B8F800A2B6F8009BB0F7008AA3F6006D84D4007C93E600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008197E5004862BC005971C2005974D0006B85DB006B84D6008AA3
- F60087A1F5004965C0006B85DB005974D000627BCF004862BC008197E5000000
- 00000000000000000000000000000000000000000000556FCC005069C0005069
- C0005069C0005069C0005069C0005069C000556FCC0000000000000000000000
- 0000000000000000000000000000556FCC005069C0005069C0005069C0005069
- C0005069C0005069C00000000000000000000000000000000000000000000000
- 0000CFCDCC00EBEBEA00F8F8F8007A7877000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D3DBF9006F84D000A7B8F300B1C1F500B2C2
- F500B2C2F500B1C1F500B0C0F500AABAF30093A6E8005872CA00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000D2DBF8008197E50000000000000000005871C300728D
- EA00708CEA009DAFEE0000000000000000006B85DC00D2DBF800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009C9A9A00959392008C8A8900000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DADA
- DA002F417A002834600028346000283460002834600028346000283460002834
- 600028346000283460002834600028346000283460002834600028346000CACA
- CA00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000092A1D7002635640026356300C3C3C300CACACA00D3D3D300000000000000
- 0000000000000000000000000000D5D5D50090A1D5002532600025326000C8C8
- C800DADADA0000000000000000000000000000000000C2C2C200C0C0C0003345
- 7F0034437B0034437B0034437B0034437B0034437B0034437B0034437B003443
- 7B0034437B0034437B0034437B0034437B0034437B0034437B0034437B003443
- 7B0033457F00C0C0C000D6D6D600000000000000000000000000000000000000
- 00002A3970000525910004208000031D7300031D7300031D7300031D7300031D
- 7300031D7300031D7300031D7300031D7300031D7300031D7300031D73000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000B9C6
- F100405396003F5AB6003F5AB5002A3D7D00B9C6F10000000000000000000000
- 0000000000000000000000000000B7C5F1003F5291003E58AF003E58AF00283A
- 7800B7C5F100000000000000000000000000000000000000000000000000364B
- 99007E93D7007D92D7007D92D7007C91D7007C91D7007C91D7007B90D7007B90
- D7007B90D7007A8FD700798FD700798FD700788ED700788ED700778DD70099A9
- E100364B99000000000000000000000000000000000000000000000000000000
- 00002D407F00637BCA005771CB006684EA006684EA006684EA006684EA006684
- EA006684EA006684EA006684EA006684EA006584EA008AA1EF00032288000000
- 000000000000000000000000000000000000000000003855B5003A56B5003B57
- B5003C57B4003D58B5003D58B5003D58B5003D58B5003D58B5003D58B5003D58
- B5003D58B5003D58B5003D58B5003D58B5003D58B5003D58B5003D58B5003C58
- B5003B57B5003A56B50026377400000000000000000000000000BAC6F2002C40
- 83003E5AB9000F32A8000F32A800415599002B3F8000B9C6F100000000000000
- 00000000000000000000B9C6F1002A3E7D003F5AB4000F31A0000F31A0004052
- 94002A3C7B00B7C5F1000000000000000000000000000000000000000000384F
- 9D008398DC008398DC008297DC008297DC008297DC008196DC008196DC008196
- DC008196DD008095DC007F94DC007F94DC007E94DC007E94DC007E94DD009EAE
- E500384F9D000000000000000000000000000000000000000000000000000000
- 000030438400667ECF00536ECB005D7EEB005D7EEB005D7EEB005D7EEB005D7E
- EB005D7EEB005D7EEB005D7EEB005D7EEB005D7EEB00879FF00003238D000000
- 000000000000000000000000000000000000000000003753B2000F34AF001236
- AE00163AB000173AB000173AB000173AB000173AB000173AB000173AB000173A
- B000173AB000173AB000173AB000173AB000173AB000173AB000173AB0001539
- B0001337AF000F34AF00283A7C000000000000000000BAC6F2002E4288004358
- A0000F34AD00042AAA00042AA9003E5BBC0042569D002D418500000000000000
- 000000000000B9C6F1002C41820041569A000F32A7000328A1000328A1003F5A
- B700415598002B3F7F0000000000000000000000000000000000000000003A51
- A2008A9EE100899DE100899DE100889DE100879CE100879CE100869BE100869B
- E100869BE100859AE100859AE100859AE1008499E1008499E1008499E100A2B2
- E8003A51A2000000000000000000000000000000000000000000000000000000
- 000032478A006780D3004C68C8005477EA005477EA005477EA005477EA005477
- EA005477EA005477EA005477EA005477EA005477EA00829CF000032493000000
- 000000000000000000000000000000000000000000003C58B800173CB5001D40
- B6002244B6002345B7002345B6002446B7002446B7002446B7002446B7002446
- B7002446B7002446B7002446B7002446B7002345B6002345B6002345B7002144
- B7001E41B700183DB6002A3D810000000000000000006678B5004261C800183D
- BC001036B7001036B7000F35B6000A31B4001338B700405EC40032468E00BAC7
- F200BAC7F2004459A4003F5DC2001035B200042BAD00042BAC00042BAC00042A
- AB000F34AE003E5BBD002F428800000000000000000000000000000000003E56
- AA0097AAEC0097AAEC000633C9000633C9000633C9000633C9000633C9000633
- C9000633C90092A7EB0092A7EB0092A7EB0091A6EB0091A6EB0091A6EB00ABBB
- F0003E56AA000000000000000000000000000000000000000000000000000000
- 0000374C96006883DB003C5CC6004268E9000434D2004268E9004268E9004268
- E9004268E9004268E9004268E9000434D2004268E9007893F00003279D000000
- 000000000000000000000000000000000000000000004764C600284CC4003254
- C4003556C5003556C5003556C5003556C5003556C5003556C5003556C5003556
- C5003556C5002B4BB5000626910003269B00677FCF004160C8003556C5003556
- C5003254C400284CC4002F448D0000000000000000007D8DC1007D93DC001C42
- C200183EBF001A40C000193FBF00143BBC001037BB00183EBD00465CA900344A
- 9200344991003F5EC6001036B700042CB400042CB300042CB200042CB200042B
- B0001035B400798ED40032478C00000000000000000000000000000000004159
- AE00A1B3F200A1B3F200A1B3F200A0B3F200A0B3F2009FB2F2009FB2F2009EB1
- F2009EB1F2009DB0F2009DB0F2009CB0F2009BAFF1009BAFF1009BAFF100B1C1
- F4004159AE000000000000000000000000000000000000000000000000000000
- 00003A509A006984DF003455C4003962EA000434D3003962EA003962EA003962
- EA003962EA003962EA003962EA000434D3003962EA00728FEF000328A1000000
- 000000000000000000000000000000000000000000004C6ACD003054CB003C5D
- CC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5F
- CC003F5FCC000728960003279F0003279F002343AD006D85D5004A68CE003F5F
- CC003C5DCC003155CB00314792000000000000000000384E9A007F8FC4007F95
- DF001D44C5002147C7002248C7001E44C4001B42C300163DC1004564CD004860
- AD00485FAD00153CBE000831BA000730B900042DB700042DB700042DB7001037
- B9007A90D8007C8BBE00BAC7F20000000000000000000000000000000000425C
- B300A9BBF600A9BBF6001541D3001541D3001541D3001541D3001541D3001541
- D3001541D3001541D3001541D3001541D3001541D3001541D300A3B6F600B8C7
- F800425CB3000000000000000000000000000000000000000000000000000000
- 00003C53A1006985E2002B4EC300305BEA000534D400305BEA00305BEA00305B
- EA00305BEA00305BEA00305BEA000534D400305BEA006C8AF0000429A6000000
- 000000000000000000000000000000000000000000005471D4003C5FD2004969
- D3004B6AD2004B6AD2004B6AD2004B6AD2004B6AD2004B6AD2004B6AD2004B6A
- D2003D5BC100072CA400072CA400072CA400072CA4002646B100758CD9004B6A
- D2004969D2003C5FD100344A9700000000000000000000000000BDC9F4003C53
- A200839AE5002C52D2002A50D1003055D2002E53D1002C52D100264DCE002D52
- CF002B50CF001E46CB001C44CA001A42C900143DC600103AC500173FC700808F
- C500394F9B00BCC8F3000000000000000000000000000000000000000000455F
- B600B6C6F900B6C6F900244DD600244DD600244DD600244DD600244DD600244D
- D600244DD600244DD600244DD600244DD600244DD600244DD600B1C1F900C0CE
- FA00455FB6000000000000000000000000000000000000000000000000000000
- 00004259AD006987EA001B41C1001E4DEA000535D6001E4DEA001E4DEA001E4D
- EA001E4DEA001E4DEA001E4DEA000535D6001E4DEA006081F000042BB0000000
- 000000000000000000000000000000000000000000006581E1005273E000627F
- E1006682E1006682E1006682E1006682E1006682E1006682E1005571CF001435
- A2001035AF001035AF001035AF001035AF001035AF001035AF001035AF00859B
- E3006C87E3005373E0003A51A30000000000000000000000000000000000BDCB
- F4008393CD00859CE7003056D600375CD800365BD700355AD6003056D5002E54
- D4002C52D300274ED100254CD000234BD0001942CC001E46CE007E95E2003A52
- A000BDC9F4000000000000000000000000000000000000000000000000004660
- B700BCCAFA00BCCAFA00BBCAFA00BBCAFA00BAC9FA00BAC9FA00B9C8F900B9C8
- F900B9C8F900B9C8F900B8C7F900B8C7F900B7C7F900B7C7F900B7C7F900C4D1
- FA004660B7000000000000000000000000000000000000000000000000000000
- 0000455EB2006987ED00133ABE00153CBF000535D7001546EA001546EA001546
- EA001546EA001546EA001546EA000535D7001546EA005A7DF100042DB6000000
- 000000000000000000000000000000000000000000006D89E8005D7DE7006F8B
- E800748FE900748FE900748FE900748FE900748FE900748FE900173496001336
- A9001336A900153AB500153AB500153AB500153AB500153AB5001439B1003250
- B4008B9FE3006885E8003C55A800000000000000000000000000000000000000
- 00004059AB008495D000869DEA003A5FDC003F64DD003D62DC003A5FDB00385D
- DB00355BDA003157D7002E55D6002C53D600254DD4008097E5008292CB00BDC9
- F400000000000000000000000000000000000000000000000000000000004760
- B800C1CEFA00C2CFFA003358D7003358D7003358D7003358D7003358D7003358
- D7003358D7003358D7003358D7003358D7003358D7003358D700BCCAFA00C8D4
- FB004760B8000000000000000000000000000000000000000000000000000000
- 00004761B8006988F1000B34BD009DB2F6000535D7000C3FEA000C3FEA000C3F
- EA000C3FEA000C3FEA000C3FEA000535D7000C3FEA005478F000042EBA000000
- 000000000000000000000000000000000000000000007591EF006887EE007B96
- F000819BF000819BF000819BF000819BF000819BF000819BF000142F8C00142F
- 8C00142F8C001A3FBA001A3FBA001A3FBA001A3FBA001A3FBA002949B400142F
- 8C00324B9D008DA3EB004058AE00000000000000000000000000000000000000
- 000000000000BECCF500455EB5006483EA005275E8004F72E7004B6FE600496D
- E500466BE4004267E3004166E3004267E2007C8FD100425BB000BDCBF4000000
- 0000000000000000000000000000000000000000000000000000000000004962
- BA00CBD6FB00CBD6FB004164D8004164D8004164D8004164D8004164D8004164
- D8004164D8004164D8004164D8004164D8004164D8004164D800C7D3FB00CFD9
- FB004962BA000000000000000000000000000000000000000000000000000000
- 00004A64BC006989F300042DB6009AAFF3002242AE002245BA000538E4000538
- E4000538E4000538E4000538E4000434D2000538E4004F73EB00042EBC000000
- 000000000000000000000000000000000000000000007E99F500708EF400829D
- F50094ABF60097ADF70099AFF70099AFF70099AFF70099AFF70099AFF70099AF
- F70099AFF7002448BF002448BF002448BF002448BF002448BF00B7C7F90099AF
- F70091A8F6007E99F500445DB400000000000000000000000000000000000000
- 000000000000BFCCF5004861BA006887EE00597BEC00597BEC005578EB005275
- EA005074EA004C70E800496EE8004B6FE7005670CB00465EB400BFCCF5000000
- 0000000000000000000000000000000000000000000000000000000000004A63
- BB00D0DAFB00D1DBFB00D0DAFB00CFD9FB00CFD9FB00CFD9FB00CED8FB00CED8
- FB00CED8FB00CDD8FB00CDD8FB00CDD8FB00CCD7FB00CCD7FB00CCD7FB00D2DB
- FB004A63BB000000000000000000000000000000000000000000000000000000
- 00004B65BD006989F300042CB4009AAEF2009BADEC009AAEF2000537E1000537
- E1000537E1000537E1000537E1000433D0000537E1004F73EA00042EBC000000
- 000000000000000000000000000000000000000000007C97F4006989F3007995
- F40088A2F6008FA7F60098AEF700A3B6F800A3B6F800A3B6F800A3B6F800A3B6
- F800A3B6F8002646B3002646B3002646B3002646B3002646B300BECCFA00A1B5
- F70095ACF700819BF500455EB600000000000000000000000000000000000000
- 0000BFCCF5004B65BE005975D300577AF0005E80F0006384F1005E80EF005C7E
- EF00597CEE005477ED005276ED004E73EC00597BEC005973CF004861B9000000
- 0000000000000000000000000000000000000000000000000000000000004B64
- BC00D5DEFC00D5DEFC005070D9005070D9005070D9005070D9005070D9005070
- D9005070D9005070D9005070D9005070D9005070D9005070D900D0DAFB00D5DE
- FC004B64BC000000000000000000000000000000000000000000000000000000
- 00004C66BD006989F300042CB2009AAEF1000433CE000537DE000537DE000537
- DE000537DE000537DE000537DE000433CE000537DE004F72E800042EBC000000
- 00000000000000000000000000000000000000000000ADBEF8009AAFF700A0B4
- F700A7B9F800ACBDF800ADBEF8009FB3F700A4B7F800A6B9F800A7B9F800A7B9
- F800A8BAF800223C9000223C9000223C9000223C9000223C9000C0CEFA009FB3
- F70093AAF600809BF5004660B70000000000000000000000000000000000BFCD
- F6005B76D5006183F200577BF2007693F4007894F4007592F400718FF4006E8D
- F3006B8AF3006888F3006586F3006384F3005277F1004A70F0005C7FF2004D67
- C000BFCDF6000000000000000000000000000000000000000000000000004D66
- BD00DDE4FC00DDE4FC005F7BDA005F7BDA005F7BDA005F7BDA005F7BDA005F7B
- DA005F7BDA005F7BDA005F7BDA005F7BDA005F7BDA005F7BDA00D9E1FC00DBE2
- FC004D66BD000000000000000000000000000000000000000000000000000000
- 00004E68BF006989F300042BAD000535D9000432CA000535D9000535D9000535
- D9000535D9000535D9000535D9000432CA000535D9004F71E300042EBC000000
- 000000000000000000000000000000000000000000007391F400456CF000456C
- F000456CF000456CF0003A60E000A8BAF800ABBDF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800ABBD
- F800A7B9F800A2B6F8004962B900000000000000000000000000BFCDF6004E68
- C1006384F3005C7FF2006C8BF300829DF500819BF5007F9AF5007290F400718F
- F4006F8DF3006F8DF3006F8DF3006C8BF3006485F300577BF2004E73F1005D78
- D6004E68C100BFCDF60000000000000000000000000000000000000000004E67
- BE00E1E7FD00E1E7FD00E1E7FD00E0E6FC00E0E6FC00E0E6FC00E0E6FC00E0E6
- FC00DFE6FC00DEE5FC00DEE5FC00DEE5FC00DEE5FC00DDE4FC00DDE4FC00DFE6
- FC004E67BE000000000000000000000000000000000000000000000000000000
- 00004F69C0006989F300042AAB000535D6000431C7000535D6000535D6000535
- D6000535D6000535D6000535D6000431C7000535D6005072E200042EBC000000
- 000000000000000000000000000000000000000000007894F4004B71F1004B71
- F1004B71F1004B71F1004B71F100365BD700365BD700365BD700365BD700365B
- D700365BD700365BD700365BD700365BD700365BD700365BD700365BD700365B
- D700365BD700365BD7004A63BB000000000000000000BFCDF6004F69C2005C77
- D6005F81F2007290F400849EF5008CA5F60089A2F600829DF5006B8AF300A3B6
- F800A3B6F8006A8AF3007391F4007592F400718FF4006989F3005A7DF2005D80
- F2005A76D6004F69C20000000000000000000000000000000000000000004F68
- BF00E5EAFD00E5EAFD006D87DB006D87DB006D87DB006D87DB006D87DB006D87
- DB006D87DB006D87DB006D87DB006D87DB006D87DB006D87DB00E1E7FD00E1E7
- FD004F68BF000000000000000000000000000000000000000000000000000000
- 0000506AC1006989F300042AA9000434D3000431C5000434D3000434D3000434
- D3000434D3000434D3000434D3000431C5000434D3004F70DF00042EBC000000
- 000000000000000000000000000000000000000000007C97F4005075F1005075
- F1005075F1005075F1005075F1005075F1005075F1005075F1005075F1005075
- F1005075F1005075F1005075F1005075F1005075F1005075F1005075F1005075
- F1005075F1005075F1004B65BC000000000000000000778EDB005B7EF2005579
- F10086A0F50098AEF700A0B4F70091A8F6007D98F5006888F3008FA1E000506A
- C400506AC40095ACF7005B7EF2006B8AF300829CF500809BF5007995F4005378
- F1003E67F0005075F100506AC40000000000000000000000000000000000516A
- C100EAEFFD00EAEFFD00EAEFFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E8ED
- FD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E7ECFD00E6EB
- FD00516AC1000000000000000000000000000000000000000000000000000000
- 0000526CC3006989F3000328A4000433CE000430C1000433CE000433CE00B2C0
- F000B2C0F0000433CE000433CE000430C1000433CE004F6FDC00042EBC000000
- 00000000000000000000000000000000000000000000849EF5005B7EF2005B7E
- F2005B7EF2005B7EF2005B7EF2006384F300829CF5007E91D5004E67BE004E67
- BE004E67BE004E67BE004E67BE004E67BE004E67BE004E67BE004E67BE004E67
- BE004E67BE004E67BE004E68C10000000000000000008B9FE0008FA7F600577B
- F20089A2F60099AFF7009EB3F700829CF5006C8BF3009AAFF700516BC400BFCD
- F600BFCDF6008EA1E00095ACF7005D80F2007E99F500819BF5007A96F4005479
- F1003E67F00086A0F500516BC40000000000000000000000000000000000526B
- C200EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00ECF0FE00ECF0FE00ECF0
- FE00ECF0FE00EBF0FD00EBF0FD00C8CCD800C8CBD600C8CBD600C8CCD700C6CA
- D700526BC2000000000000000000000000000000000000000000000000000000
- 0000536DC4006989F3000328A2000432CB00042FBF000432CB000432CB000432
- CB000432CB000432CB000432CB00042FBF000432CB004F6FDA00042EBC000000
- 0000000000000000000000000000000000000000000088A2F6006183F2006183
- F2006183F2006183F2006183F200839EF5008195D600536CC000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000526CC50090A2E1009AAF
- F7007F9AF5008EA6F60091A8F6006E8DF3009BB0F7008FA2E100BFCDF6000000
- 000000000000526CC5008FA1E10095ACF7006F8DF3007693F400718FF4005378
- F1008DA5F6008D9FE100BFCDF60000000000000000000000000000000000526C
- C300F0F3FE00F0F3FE00F0F3FE00EFF3FE00EFF3FE00EFF3FE00EFF3FE00EFF3
- FE00EFF3FE00EEF2FE00EEF2FE00CBCED800516BC100526CC300526CC300526C
- C300526CC3000000000000000000000000000000000000000000000000000000
- 0000546EC5006989F3000328A0000431C800042EBC000431C8000431C8000431
- C8000431C8000431C8000431C800042EBC000431C800506FD800042EBC000000
- 000000000000000000000000000000000000000000008DA5F6006787F3006787
- F3006787F3006787F3006989F3008597D700546DC10091A5EB00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCDF600536E
- C7009DB2F7006082F2006082F20090A3E100536EC700BFCDF600000000000000
- 00000000000000000000BFCDF600536EC70095ACF7004F74F1004E73F10091A3
- E100536EC700BFCDF6000000000000000000000000000000000000000000546E
- C500F4F7FE00F5F7FE00F5F7FE00F4F7FE00F4F7FE00F4F7FE00F4F7FE00F4F7
- FE00F4F7FE00F3F6FE00F3F6FE00CFD1D800FAFBFF00FAFBFF00F5F7FD00536E
- C700BFCDF6000000000000000000000000000000000000000000000000000000
- 00005670C7006888F30003269C000430C2000430C2000430C2000430C2000430
- C2000430C2000430C2000430C2000430C2000430C200506ED400042EBC000000
- 00000000000000000000000000000000000000000000506AC100506AC100506A
- C100506AC100506AC100506AC10091A5EB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C1CD
- F60092A4E20092A9F60092A9F600556FC700C1CDF60000000000000000000000
- 0000000000000000000000000000C1CDF60090A3E2008DA5F6008CA5F600556F
- C700C1CDF600000000000000000000000000000000000000000000000000556F
- C600F5F7FE00F7F9FE00F7F9FE00F6F8FE00F6F8FE00F6F8FE00F6F8FE00F6F8
- FE00F6F8FE00F5F7FE00F5F7FE00D0D2D800FAFBFF00F5F7FD00B7C2E800C1CD
- F600000000000000000000000000000000000000000000000000000000000000
- 00005771C8006586F30003269900042FC000042FC000042FC000042FC000042F
- C000042FC000042FC000042FC000042FC000042FC0004F6DD2000430C2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005670C8008DA1E3008DA1E300C1CDF6000000000000000000000000000000
- 0000000000000000000000000000000000005670C8008DA1E3008DA1E300C1CD
- F600000000000000000000000000000000000000000000000000000000005670
- C700F5F7FE00F7F9FE00F8FAFE00F8FAFE00F8FAFE00F8FAFE00F8FAFE00F8FA
- FE00F8FAFE00F8FAFE00F7F9FE00D2D4D800F4F6FD00B7C3E8005670C8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005771C8005D80F20003259700032597000325970003259700032597000325
- 970003259700032597000325970003259700032597003F57A6000536D9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005771
- C9005871C8005871C8005871C8005871C8005871C8005871C8005871C8005871
- C8005871C8005871C8005871C8005871C8005771C900C1CDF600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005A76D2005771C8005A73C9005A73C9005A73C9005A73C9005A73C9005A73
- C9005A73C9005A73C9005A73C9005A73C9005A73C9005A73C9005771C8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000C7C7C700C0C0C000AEBA
- E40028345E0028345E0028345E0028345E0028345E0028345E0028345E002834
- 5E0028345E0028345E0028345E0028345E0028345E0028345E0028345E004053
- 9300AEBAE400C0C0C000D6D6D600000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B9C6F1002A3B78002F448B00B9C6F1000000000000000000000000002F44
- 8B002A3B78002F448B0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000C5CEF3006A7FC8002A3A75002433
- 6900243369002A3A7500364D95006A7FC8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002E42
- 86002445B400042AAA00042AAA00042AAA00042AAA00042AAA00042AAA00042A
- AA00042AAA00042AAA00042AAA00042AAA00042AAA00042AAA00042AAA00586F
- BA002D3F7F000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000374887006D84CF005B73C7007286C800566EBE000E30A300334FB1008496
- D5006D84CF005D74C10000000000000000000000000000000000000000000000
- 000000000000000000004259A70046589700455EAF002F4BAB001333A0000326
- 9900032699001333A0001E3DA4002F4BAB004658970035447A004259A7000000
- 0000000000000000000000000000000000000000000000000000000000004256
- 9B008E9ED10095A7E2009FB0E900A1B1E9009DADE40099A9DF008E9ED3008999
- CD008595C7007C8BBB007785B5007381AF007180B2007A8ABF008191C3004256
- 9B00000000000000000000000000000000000000000000000000000000003043
- 8600042CB30003279D0003238F0003238F0003238F0003238F0003238F000323
- 8F0003238F0003238F0003238F0003238F0003238F0003238F0003238F00506C
- CA00304386000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000364C98009EADDD008492C30031448600506CCA00042CB400314486008391
- C3009EADDD008291C30000000000000000000000000000000000000000000000
- 0000B9C6F1002E42880042538E002B49AE000B2EA10003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F002B49AE004760B10042538E00B9C6
- F100000000000000000000000000000000000000000000000000000000002736
- 6E00708ADF007993E70091A7F10098ADF1008CA2EB007F96E200667FD0005A73
- C6004F68BC003751A5002B44980020398C001D3892002D4AAC00516CC8002736
- 6E00000000000000000000000000000000000000000000000000000000003448
- 8F00042FBD00E0E6F700DFE4F600DFE4F600DEE3F600DEE3F600DDE2F600DDE2
- F600DCE2F600DAE0F500DAE0F500DAE0F500D9DFF500D9DFF500D8DEF400506E
- D10034488F000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000BAC7F20033478B00374D9C00BAC7F2004F6CCE00042EB90033478B00374D
- 9C0033478B00374D9C0000000000000000000000000000000000000000000000
- 0000334686006E7AA6004C65B8000328A3000328A3000328A3000328A3000328
- A3000328A3000328A3000328A3000328A3000328A3001336A900415CB7002F42
- 8400B9C6F1000000000000000000000000000000000000000000000000002A3A
- 74006A84DE00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE00415FC4002A3A
- 7400000000000000000000000000000000000000000000000000000000003B52
- 9F000433D000C5D0F400C4CFF400C2CDF300C1CDF300C0CCF300BECAF200BECA
- F200BDC9F200BBC8F200BBC8F200B9C6F100B7C5F100B6C4F100DAE1F7005071
- DE003B529F000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000384D9600384D9600384D9600384D9600384D
- 9600384D9600384D9600384D9600384D96001F46CB000C37C600384D96000000
- 000000000000000000000000000000000000000000000000000000000000475F
- B100BCBFC900A6ABBA00808DB6001438AE00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00415D
- BD0046589A00475FB10000000000000000000000000000000000000000003042
- 8200718BDF00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004461C4003042
- 8200000000000000000000000000000000000000000000000000000000003F57
- A8000536D900C6D1F600C6D1F600C4D0F600C4D0F600C3CFF600C1CDF500C0CC
- F500BFCCF500BECBF500BDCAF500BCC9F500BAC8F500B9C7F500DCE3F9005073
- E5003F57A8000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000617BD4001F44C1002C50C6005F79D3005F79
- D3005F79D3005F79D3005F79D3006079D3005A78DC00133ECD003754BA000000
- 0000000000000000000000000000000000000000000000000000A8B7ED005665
- 9800B2B6C300ADB1BF00A9AEBE004A63B7001439B200042CB100042CB100042C
- B100042CB100042CB100042CB100042CB100042CB100042CB100042CB1001439
- B6004964BF003E508E0000000000000000000000000000000000000000003346
- 8800708ADF00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE00415FC4003346
- 880000000000000000000000000000000000000000000000000000000000435B
- B0000538E300CAD5F900C9D4F900A4A9BC00A3A8BC00A3A8BC00A2A8BC00C3CF
- F800C2CFF800BFCCF700BECBF700BDCBF700BCCAF700BBC9F700DDE4FA004F73
- EB00435BB0000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E7CE0002C53D7003D52A0003D52A0003D52
- A0003D52A0003D52A0003D52A0003D52A0005670CA00163BB4003D52A0000000
- 0000000000000000000000000000000000000000000000000000455BAE00A2A9
- BF00B1B6C300B1B6C300B1B6C3008794C0004B65BB00153AB700042DB600042D
- B600042DB600042DB600042DB600042DB600042DB600042DB600042DB600042D
- B6002B4EC2004C62AD000000000000000000000000000000000000000000364A
- 8F007790E1007C95E90092A8F10098ADF1008CA2EB007F96E200667FD0005A73
- C6004F68BC003751A5002B44980020398C001D3892002D4AAC00516CC800364A
- 8F00000000000000000000000000000000000000000000000000000000004861
- B800053AEB00CFD9FB00CED8FB00A6ABBD00A6ABBE00A6ABBE00A4A9BD00A4A9
- BD00A3A9BD00A2A8BD00A2A8BD00A1A7BD00C1CEFA00C0CEFA00DFE6FC005075
- F1004861B8000000000000000000000000000000000000000000374E9B002C3F
- 7E002C3F7E002C3F7E002C3F7E002C3F7E002C3F7E002C3F7E002C3F7E002C3F
- 7E002C3F7E00374E9B00000000004259AB008099EB005879E7004960AF000000
- 00000000000000000000000000000000000000000000788DD7008D98BA00CACE
- D900C1C5D300C1C5D300C1C5D300C1C5D300BDC2D10097A4CE00274CC500173F
- C400173FC400173FC400173FC400173FC400173FC400173FC400173FC400173F
- C400153DC400395BCD00788DD70000000000000000000000000000000000D1DA
- F7003D529D003D529D003D529D003D529D003D529D003D529D003D529D003D52
- 9D003D529D003D529D003D529D003D529D003D529D003D529D003D529D00D1DA
- F700000000000000000000000000000000000000000000000000000000004962
- BA00053AEB00D1DBFB00D0DAFB00CFD9FB00CED8FB00CDD8FB00CBD6FB00CAD5
- FB00C9D5FB00C7D3FB00C6D2FA00C6D2FA00C4D1FA00C3D0FA00E1E7FD005075
- F1004962BA00000000000000000000000000000000000000000032468C00506D
- CF00506DCF00506DCF00506DCF00506DCF00506DCF00506DCF00506DCF00506D
- CF00506DCF0032468C00000000004C66C0008195D8004462C700445DB0000000
- 000000000000000000000000000000000000000000004963B600B6BCD100CBCF
- DB00C6CAD800C6CAD800C6CAD800C6CAD800C6CAD800C4C9D8006780D1003256
- CD00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234A
- CB002148CB003357CF004963B600000000000000000000000000000000005E77
- CD0092A4E00094A8EC009EB1F300A1B4F3009CAEED0098AAE8008EA0DC00899A
- D5008596CF007C8CC3007787BC007282B6007182BB007A8CC9008697D3005E77
- CD00000000000000000000000000000000000000000000000000000000004A64
- BB000E41EC00D5DEFC00D4DDFC00A8ADBD00A8ADBD00A8ADBD00A7ACBD00A6AC
- BD00A6ACBD00A6ABBD00A5AABD00A5AABD00C8D4FB00C7D3FB00E3E9FD005479
- F1004A64BB000000000000000000000000000000000000000000384E99004F6F
- DA000432CB000432CB000432CB000432CB000432CB000432CB000432CB000432
- CB000432CB00384E9900000000005069C4003D5DC9003156D300466AE2000000
- 000000000000000000000000000000000000000000003D54A200D6D9E200CED2
- DF00CED2DF00CED2DF00CED2DF00CED2DF00CED2DF00CED2DF00A7B3DB007088
- D7003D60D3002E53D2002E53D2002E53D2002E53D2002E53D2002E53D2002E53
- D2002C52D2003257D3003D54A20000000000000000000000000000000000435B
- AC006F89DF007892E8008FA6F10096ABF1008AA0EA007E95E200657ED0005972
- C6004E68BC003751A5002B4498001F388C001C3792002D4AAC00506BC800435B
- AC00000000000000000000000000000000000000000000000000000000004C66
- BD002553EE00DDE4FC00DDE4FC00ACB0BE00ACB0BE00ACB0BE00ABB0BD00ABB0
- BE00ABB0BE00A9AEBD00A9AEBD00A9AEBD00D1DBFB00D0DAFB00E7ECFD005E80
- F2004C66BD000000000000000000000000000000000000000000455EB5004F74
- EF0098ABEA005474DD005474DD00445EB400445EB4005474DD005474DD00435D
- B100053AE900455EB50000000000516CC9008B9EDE00536FCE004B65BC000000
- 000000000000000000000000000000000000000000004158A600DFE2EB00D8DC
- E900DADEEA00DADEEA00DADEEA00DADEEA00DADEEA00DADEEA00DADEEA00D8DD
- EA00B6C1E7005373DF004569DF004569DF004569DF004569DF004569DF004569
- DF004468DF003A5FDC004158A600000000000000000000000000000000004A63
- BA00708AE000859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004361C4004A63
- BA00000000000000000000000000000000000000000000000000000000004D67
- BE00305CEE00E1E7FD00E0E6FC00DFE6FC00DEE5FC00DDE4FC00DCE3FC00DBE2
- FC00DAE2FC00D8E0FC00D8E0FC00D7DFFC00D6DFFC00D5DEFC00E9EEFD006485
- F3004D67BE0000000000000000000000000000000000000000004761B8005176
- F1009AADEC005575DE005575DE00455FB400455FB4005575DE005575DE00455F
- B300073CEB004761B80000000000526DC9004D6BCE004366D9005577E8000000
- 00000000000000000000000000000000000000000000435BAB00E3E6EF00DCE0
- ED00E0E4EF00E0E4EF00E0E4EF00E0E4EF00E0E4EF00E0E4EF00E0E4EF00E0E4
- EF00DDE1EF008CA1E8005F7EE4005173E3005173E3005173E3005173E3005173
- E3004F71E3004267E000435BAB00000000000000000000000000000000004C66
- BD00718BDF00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004461C4004C66
- BD00000000000000000000000000000000000000000000000000000000004E68
- BF003C65EF00E4E9FD00E4E9FD00B0B3BE00B0B3BE00AFB3BE00AFB3BE00AFB3
- BF00AEB2BE00ADB1BE00ADB1BE00ACB0BE00DAE2FC00D9E1FC00EBF0FD006989
- F3004E68BF0000000000000000000000000000000000000000004A63BA00567A
- F200A0B1EC00A0B1EC00A0B1EC00A0B1EC00A0B1EC00A0B1EC00A0B1EC0094A2
- D2001546EC004A63BA00000000004D67BE0099AEF6007995F4005971C3000000
- 00000000000000000000000000000000000000000000475EB400E6E9F200E2E6
- F200E5E8F300E5E8F300E5E8F300E5E8F300E5E8F300E5E8F300E5E8F300E5E8
- F300E5E8F300C3CDF00095A9EC006A87E9005C7CE8005C7CE8005C7CE8005C7C
- E800597AE8005375E700475EB400000000000000000000000000000000004D67
- BE00718BDF00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004260C5004D67
- BE0000000000000000000000000000000000000000000000000000000000516A
- C1005378F100EAEFFD00EAEFFD00B4B7BE00B3B6BE00B3B6BE00B2B5BE00B2B5
- BE00B2B5BE00B2B5BF00B2B5BF00B0B3BE00E2E8FD00E1E7FD00EFF3FE007491
- F400516AC10000000000000000000000000000000000000000004E67BE006283
- F2009FABD3006174B5006174B5006174B5006174B5006174B5006174B5005F73
- B500325EEF004E67BE0000000000556FCC005B76CE005573D9006382EA000000
- 000000000000000000000000000000000000000000007790E100A7B3DC00EBEE
- F900EDF0FA00EDF0FA00EDF0FA00EDF0FA00EDF0FA00EDF0FA00EDF0FA00EDF0
- FA00EDF0FA00EDF0FA00EBEFFA00D0D9F8007E99F1007390F0007390F0007390
- F0006988EF006E8CF0007790E100000000000000000000000000000000006680
- DA0096A7E4009EB0EB00A6B7F000A8B8F000A4B4EC00A0B0E80096A6DE0093A2
- D9008E9ED4008595CA008191C4007D8DC0007C8CC3008294CE00899BD8006680
- DA0000000000000000000000000000000000000000000000000000000000526B
- C2005F81F200ECF0FE00ECF0FE00EBF0FD00EBF0FD00EAEFFD00E9EEFD00E8ED
- FD00E7ECFD00E6ECFD00E6ECFD00E6EBFD00E5EAFD00E4E9FD00F1F4FE007995
- F400526BC20000000000000000000000000000000000000000005069C1006787
- F300B2C0ED008399E2008399E2006B7CB7006B7CB7008399E2008399E2006779
- B4004068F0005069C10000000000506AC100A5B8F70088A2F6005F76C6000000
- 00000000000000000000000000000000000000000000BFCDF6006C81CA00F1F4
- FD00F1F4FD00F1F4FD00F1F4FD00F1F4FD00F1F4FD00F1F4FD00F1F4FD00F1F4
- FD00F1F4FD00F1F4FD00F1F4FD00EFF2FD00AFBFF8008AA3F500819BF5007E99
- F500718FF4007E98F100CED8F70000000000000000000000000000000000D3DB
- F900516AC100516AC100516AC100516AC100516AC100516AC100516AC100516A
- C100516AC100516AC100516AC100516AC100516AC100516AC100516AC100D3DB
- F90000000000000000000000000000000000000000000000000000000000536C
- C4006B8AF300EFF3FE00EFF3FE00EEF2FE00EDF1FE00EDF1FE00ECF0FE00EBF0
- FD00EBF0FD00EAEFFD00E9EEFD00E8EDFD00E7ECFD00E7ECFD00F3F6FE007E99
- F500536CC4000000000000000000000000000000000000000000526CC3006B8A
- F300B8C5EE0090A3E40091A4E4007585B9007585B90091A4E40090A3E4006E7E
- B5004A70F000526CC300000000005671CD009EADDF007086D000516BC2000000
- 00000000000000000000000000000000000000000000000000005975D100CAD1
- ED00F2F5FE00F3F6FE00F3F6FE00F3F6FE00F3F6FE00F3F6FE00F3F6FE00F3F6
- FE00F3F6FE00F3F6FE00F3F6FE00F3F6FE00DAE2FC00B6C6F90095ACF700829C
- F500809BF500768DDD0000000000000000000000000000000000000000006882
- DB0094A6E40094A8EC009EB1F300A1B4F3009CAEED0098AAE8008EA0DC008A9B
- D6008697D0007C8CC3007787BC007282B6007182BB007A8CCB008899D8006882
- DB0000000000000000000000000000000000000000000000000000000000556F
- C600819BF500F2F5FE00F2F5FE00DADDE500D9DCE400D9DCE400D8DBE400D8DB
- E400D8DBE400D7DAE400D7DAE400D6D9E400E0E4F000EDF1FE00F6F8FE0087A1
- F500556FC60000000000000000000000000000000000000000005670C7006A8A
- F3005A7DF2006586F3006B8AF3006F8DF3006F8DF3006D8CF3006586F300597C
- F200476EF0005670C70000000000546DC400B1C1F80098AEF700647BCA000000
- 000000000000000000000000000000000000000000000000000000000000607A
- D700F4F6FD00F4F7FE00F5F7FE00F5F7FE00F5F7FE00F5F7FE00F5F7FE00F5F7
- FE00F5F7FE00F5F7FE00F5F7FE00F5F7FE00F5F7FE00F4F7FE00E0E6FC009FB2
- F500758AD500607AD7000000000000000000000000000000000000000000546E
- C5006A84DE00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004260C500546E
- C500000000000000000000000000000000000000000000000000000000005670
- C70088A2F600F3F6FE00E9ECF3008E8C8D008986860089868600898686008986
- 860089868600898686008986860089868600BABBC100E5E8F300F7F9FE008BA4
- F6005670C70000000000000000000000000000000000000000005871C8006C8A
- ED00809AEF00859EF000889FF00089A1F00089A1F00089A1F000849DF0007F99
- EF007A95EE005871C800000000005973CF00A8B5E0007F92D200556EC5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D6DCF200F4F7FE00F5F7FE00F6F8FE00F6F8FE00F6F8FE00F6F8FE00F6F8
- FE00F6F8FE00F6F8FE00F6F8FE00F6F8FE00F6F8FE00F6F8FE00F3F6FE00ACBA
- E800546FCA00000000000000000000000000000000000000000000000000556F
- C6006D88DF00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004562C500556F
- C600000000000000000000000000000000000000000000000000000000005771
- C8008DA5F600F5F7FE00E1E3EA00EEEEEF00FDFDFD00FDFDFD00FDFDFD00FDFD
- FD00FDFDFD00FDFDFD00FDFDFD00FDFDFD00A09FA100DFE2EA00F8FAFE008CA5
- F6005771C80000000000000000000000000000000000000000005B76D2005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005B76D200000000005974CF007C8FD1007A91DC007D97EE000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005C74C900D8DDF200F4F6FD00F6F8FE00F7F9FE00F8FAFE00F8FAFE00F8FA
- FE00F8FAFE00F8FAFE00F8FAFE00F8FAFE00F6F8FE00F5F7FE00F4F6FD005B74
- C900BFCDF6000000000000000000000000000000000000000000000000005670
- C7006D88DF00859CEA0097ACF2009AAEF1008DA3EB008198E3006880D1005C75
- C7005069BC003851A5002C45990020398C001E399300324EAE004663C5005670
- C70000000000000000000000000000000000000000000000000000000000728C
- E20093A8F0009BAFF20099ABE900B3B2B400B5B3B200ABA9A700ABA9A700ABA9
- A700ABA9A700ABA9A700ABA9A700B5B3B200919BBB0099ABE9009AAEF200748A
- D8006B85DE000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000B0C0F9009BB0F7005871C8005871C8005871
- C8005871C8005871C8005871C8005871C800B3C3F900A6B9F8005871C8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000627DD900CDD4EF00F4F6FD00F6F8FE00F5F7FE00F5F7
- FE00F5F7FE00F5F7FE00F6F8FE00F5F7FE00CDD4EF007E91D300627DD9000000
- 0000000000000000000000000000000000000000000000000000000000005872
- C9006F89DF007993E70090A6F10098ADF1008CA2EB007F96E200667FD0005A73
- C6004F68BC003751A5002B44980020398C001D3892002F4CAD00556FC9005872
- C900000000000000000000000000000000000000000000000000000000000000
- 00005872C9005872C9005872C900A1A1A700EDECED00F4F4F300E8E8E700E8E8
- E700E8E8E700EBEBEA00F4F4F300EDECED006277BF005872C9005872C9006B85
- DE00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000ABBCF400B9C7F600ACBBF000A5B6EF00A5B6
- EF00A5B6EE00A5B6EF00A5B6EF00A7B6EF00BAC9FA00A4B7F8007E97E8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D5007489D100AFBBE500F3F6FD00F3F6
- FD00F3F6FD00F3F6FD00D5DCF200AFBBE5005E79D500AFBFF300000000000000
- 0000000000000000000000000000000000000000000000000000000000006B85
- DE0096A7E5009DAFEB00A6B7F000A9B9F100A5B5ED00A1B1E80098A8E00094A3
- DA00909FD5008696CB008191C5007E8EC1007E8EC5008494CF008A9CDA006B85
- DE00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000B1B1B1009C999800ABABAA00EDECEC00E4E3
- E300E4E3E300D8D7D600ABABAA00959391000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C900ABBCF400ABBCF4005872C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CED8F8007C93E5005771C9005871
- C8005871C8005771C9005E79D6007C93E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000009F9E9D009F9C
- 9B009F9C9B000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000DCDCDC00DADADA0098A8DC006075BD00455BA3003B4C8B003A4B
- 8900394B88003849850042579C005C71B700C8C8C800D2D2D200DADADA000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000009BAFEC004B61AF007787C000A0ABD400BAC5EA00B5C1
- E700B1BDE500ACB9E20092A0CF006E7EB600465EB000A3B4EC00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000859AE000344991003F51
- 90003F5190003F5190003F5190003F5190003F5190003F5190003F5190003F51
- 90003F5190003F5190003F5190003F5190003F5190003F5190003F5190003F51
- 90003F51900030468E0000000000000000000000000000000000000000000000
- 0000465FB40095A1CD00DCE1F100BBC8F100AABAEE00A7B7ED009CAEE90094A7
- E8008CA1E500889DE4007991E0006882DC00C8D3F800CED7F500929EC90096A9
- E800000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000AFBEED004C5D9500364E9D00364E9D00364E9D00364E
- 9D00364E9D00A3B2E50000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004D64B6002A3B78002A3B
- 7800344B960000000000344B96002A3B78002A3B78002A3B78002A3B78002A3B
- 78002A3B78002A3B78002A3B78002A3B78002A3B7800344B9600000000002A3B
- 78002A3B78002A3B7800000000000000000000000000344A96005C72BF00506E
- D300506ED300506ED300506ED300506ED300506ED300506ED300506ED300506E
- D300506ED300506ED300506ED300506ED300506ED300506ED300506ED300506E
- D300506ED3005C72BF0000000000000000000000000000000000000000008EA2
- E800C5CAE000E9EDFA00D7DEF500C4CEF100BBC7EF00ADBCEC0092A5E500889D
- E2007D94DF008096E0008096E0009CAEE900AFBFF400BAC8F600E3E8FA003E51
- 9400859AE1000000000000000000000000000000000000000000000000000000
- 000000000000B9C8F20040529200324FB0000C2FA10003279F0003279F000327
- 9F002947AD00788DD80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000006E7CAC00ACB6DC00A8B5
- E0002D3F7F00000000002D3F7F00A5B3E100A4B2E000A4B2E000A4B2E000A3B1
- E000A3B1E000A3B1E000A2B0DF00A2B0E000A2B0E0002D3F7F0000000000A1B0
- E000A0AFDF00A5B1DA005067BA000000000000000000364C9700506FD8000431
- C8000431C8000431C8000431C8000431C8000431C8000431C8000431C8000431
- C8000431C8000431C8000431C8000431C8000431C8000431C8000431C8000431
- C8000431C800506FD800000000000000000000000000000000009DAFED004860
- B200F2F4F900E2E7F500DBE0F400C4CEEE00B5C1EA00ADBBE9009FAFE50095A7
- E2008C9FE000879BDE007B91DC00ADBDF000BBC9F600D3DCF900D4DCF900B9C1
- DE003D50940096A9E80000000000000000000000000000000000000000000000
- 0000BAC7F300425496004C60A8000C31A9000429A6000429A6000429A6000429
- A600193CAE004C61B00000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000ACBAE800899DDF00A7B6
- E700546CC10000000000546CC100A5B4E600869ADE00869ADE008499DD008499
- DD008499DD008398DD008398DD008297DD006C7BAF00546CC100000000006B7A
- AF00A0B0E5007F94DC0033478D0000000000000000003F57A7005072E4000535
- D9000535D9000535D9000535D9000535D9000430C3000430C2000430C2000430
- C2000430C2000430C2000430C2000430C3000535D9000535D9000535D9000535
- D9000535D9005072E400000000000000000000000000506BC80098A5CF00ECEF
- FA00F0F1F600F0F1F400E5E8F100D2D8EC00C4CCE800B8C2E500A2B0DF0099A9
- DD0090A1DA00899BD900B4C2EE00C1CDF500DCE3F900D7DFF900BFCAED00A6B5
- E600C8D1F0008492C2000000000000000000000000000000000000000000BAC9
- F3005066B3003153C3000D34B9000A32B9000A32B9000A32B9000A32B9000A32
- B9000A32B9004E61A200889DE300000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000AFBDEC008DA1E300AEBC
- EC00000000000000000000000000B0BEEA008A9FE3008A9FE300889DE200889D
- E200879CE200879CE300869BE200869BE2005667A60000000000000000005869
- A700AAB8E8008399E200374B95000000000000000000435CAF005074EA000638
- E1000638E1000638E1000638E1000E3EE2003C60D6000533CA000533CA000533
- CA000533CA000533CA000533CA003C60D6000638E1000638E1000638E1000638
- E1000638E1005074EA000000000000000000000000005B71B900DEE3F200DAE0
- F600E6E9F400EAECF000EBECF000D5DAE900CAD0E600C6CDE700C0C9E700B8C2
- E400B2BDE300AAB7E300CED7F600C6D1F500DDE3F900C1CBEC00AAB8E400A9B8
- E8007B91DA0097A7D90099ABEA00000000000000000000000000BCCAF400455A
- A500395BCC00163EC400133BC300133BC300133BC300133BC300133BC300133B
- C300133BC3004E66B700556DC200000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000B2C0F00094A8EA00B0BF
- EF005B74CA00000000005B74CA00AFBEEF0090A4E80090A4E8008FA4E8008FA4
- E8008FA4E8008EA3E8008CA1E7008CA1E7007381BA005B74CA00000000007483
- BB00AABAED00899FE7003A509C0000000000000000004760B700567AF0001445
- E9001445E9001445E9001445E9001B4AEA008199E900889EE900889EE900889E
- E900889EE900889EE900889EE9008199E9001445E9001445E9001445E9001445
- E9001445E900567AF000000000000000000000000000AFBADD00D5DDF700CAD3
- F200D7DCEF00E0E4EF00E6E8EC00DDE0E900D9DDEA00C1C9E600627CD0005B75
- CC005771CA008FA1DC00D3DBF700E2E7F900C4CDED00B3BFE600B3BFE7007288
- D300516DCC007E93D8004C64B500000000000000000000000000445CA9006E82
- C7001E46CD001C45CD001C45CD001C45CD00274DCE006B86DE001E46CD001C45
- CD001C45CD00516DCE004A5FA700000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BCCAF600A2B4F200A2B4
- F200BBC9F600BCC9F500BAC8F6009FB2F2009FB2F2009FB2F2009EB1F2009DB0
- F2009DB0F2009CB0F2009CB0F2009BAFF100AABBF400B7C6F600B8C6F600A7B8
- F30099ADF10099ADF1004259AD0000000000000000004C65BC006586F300335E
- EF00345FEF00345FEF00345FEF00345FEF00345FEF00345FEF00345FEF00345F
- EF00345FEF00345FEF00345FEF00345FEF00345FEF00345FEF00345FEF00345F
- EF00335EEF006586F3000000000000000000758BDE00C6D1F500AABAEE00BCC8
- EF00C4CDEB00C8CFE800CFD4E700ADB9E1006880CF00657FD300758CD900738A
- D8006F87D6005B76CE004A66C4004C66BF00BCC5E4007A8DCC00697FC9005C76
- CC007189D7005673D5006D7EBA007288D9000000000000000000000000004E67
- BF00708BE700335ADE002D56DE00879DE7006679BE00475FB2006F89E6003159
- DE002D56DE003F64E1005C75CF004B62B9000000000000000000000000000000
- 00000000000000000000000000000000000000000000BFCCF800A8BAF500A8BA
- F500A7B9F500A7B9F500A6B8F500A5B7F500A5B7F500A5B7F500A5B7F500A4B6
- F500A4B6F500A3B6F500A2B5F500A2B5F500A1B4F500A1B4F500A0B3F500A0B3
- F5009FB3F5009FB3F500455EB40000000000000000004D67BE006C8BF300446B
- F000456CF000456CF000456CF000456CF000456CF000456CF000446BF000446B
- F000446BF000446BF000456CF000456CF000456CF000456CF000456CF000456C
- F000446BF0006C8BF3000000000000000000516CC700B1C0F100A7B7ED00ADBC
- EC00B8C3E800BBC5E500C9D0E6006880D0006780D4007B91DB006879B2005C6C
- A7005B6BA5006E81C500637CCF004965C3008E9DCF008192CC006E83CB006B84
- D5007089DA006A85DD008E9DD4004E67C0000000000000000000000000000000
- 0000788CCD00738EEB006B89EC00596EBA00627BD400000000008093D6005779
- E900365EE6003860E600597AE800576CB8000000000000000000000000000000
- 00000000000000000000000000000000000000000000C3D0FA00B0C0F900AFC0
- F900AFC0F900AEBFF800AEBFF800ADBEF800ADBEF800ADBEF800ACBDF800ABBD
- F800ABBDF800ABBDF800AABCF800AABCF800AABCF800A9BBF800A9BBF800A8BA
- F800A7B9F800A7B9F8004962BA0000000000000000004F69C0007391F4005378
- F1005479F1005479F1005479F100829CF300819BEF007E98EE007E98EE007D97
- EE007D97EE007E98EE007E98EE00819BEF00718FF4005479F1005479F1005479
- F1005378F1007491F4000000000000000000435CB0009BADEC00A2B2EB00A0B0
- E900ABB9E500AFBBE300C5CDE7005E78CE007088D9007E90CE007189D800E0E6
- F900000000005668A2006D81C5005B76CE007085CC0098A7D9007B8FD3007990
- DB00728BDD007B93E200A4B3E4004159A9000000000000000000000000000000
- 00004D67C200798DD1008499DC0090A4EA0000000000000000005A71BF0089A0
- EC004A6FEE003E66ED005276EE006079D3000000000000000000000000000000
- 00000000000000000000000000000000000000000000CBD6FB00BBCAFA00BBCA
- FA004068F0004068F0004068F0004068F0004068F0004068F000B8C7F9004068
- F0004068F0004068F0004068F0004068F0004068F000B5C5F900B5C5F900B4C4
- F900B4C4F900B4C4F9004C65BC000000000000000000536DC400809BF500708E
- F4007592F4007A96F40096ACF4002750D900053AEB00053AEB007B97F4007A96
- F4007A96F4007995F4007894F4007894F400667DCB0097ACF4007D98F5007592
- F400708EF400809BF5000000000000000000445CAF008098E60092A6E800849A
- E20094A5DF0099A9DD00B9C3E4005873D000758BD6005E6EA900000000000000
- 000000000000E0E6F9005C6CA7007088D6005873CB00B1BDE3008FA0DA008DA0
- E1007F96E1008CA1E600B2C0EC00445CAF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004F6A
- C5008A9EE1004F74F1004F74F1006586F3005873CE0000000000000000000000
- 00000000000000000000000000000000000000000000CED8FB00C1CEFA00C1CE
- FA00496FF000496FF000496FF000496FF000496FF000496FF000BECCFA00BECC
- FA00BDCBFA00BCCAFA00BCCAFA00BCCAFA00BCCAFA00BBCAFA00BBCAFA00BAC9
- FA00BAC9FA00B9C8F9004D67BE000000000000000000556EC500839EF5007A96
- F400859FF50099AFF700889ADE000D40EC000D40EC000D40EC00A2B6F800A1B5
- F7007D98F5007C97F4007B97F4007B97F400536FD000889BDE0098AEF700859F
- F5007A96F400839EF5000000000000000000445CAE007690E400899EE5007C93
- DF008A9DDD008FA0DA00B1BDE3005470CE007289D4005D6EA800000000000000
- 000000000000000000005F6EA900738AD8005C76CD00B7C1E40099A9DE0096A8
- E300879CE30095A8E900B7C4ED00455EB1000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000AEBE
- F2005E75C4006686F300577BF2005D80F2005A72C200AEBEF200000000000000
- 00000000000000000000000000000000000000000000D1DBFB00C6D2FA00C6D2
- FA005176F1005176F1005176F1005176F1005176F1005176F100C4D1FA005176
- F1005176F1005176F1005176F1005176F1005176F1005176F1005176F1005176
- F100C0CEFA00BFCDFA004E68BF0000000000000000005770C700819BF5007491
- F4008FA7F6009DAFF0006078CB002553EE002553EE002553EE00B1C1F900B0C0
- F9002553EE002553EE002553EE002553EE002C58E9006078CB009EB0F000839E
- F5007592F400839DF3000000000000000000445CAD006E88E2008198E300718A
- DD007F94DA008497D800A8B5E0004F6BCA006B83D4006677B000000000000000
- 000000000000738ADA006B7BB400758CD900627CD000C0C9E700A4B2E1009FAF
- E60092A5E6009EB0EB00BBC7EF00465FB3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00006F89DF008DA5F4006686F3006082F2006C85D900546FCB00000000000000
- 00000000000000000000000000000000000000000000D8E0FC00D1DBFB00D1DB
- FB006384F3006384F3006384F3006384F3006384F3006384F300CED8FB006384
- F3006384F3006384F3006384F3006384F3006384F3006384F3006384F3006384
- F300CBD6FB00CAD5FB00516BC200000000000000000093A8ED005872CA005872
- C9005872C9005A78DB00567AF200567AF200567AF200567AF200CBD6FB00CAD5
- FB00567AF200567AF200567AF200567AF200567AF200567AF2005A78DB005872
- C9005872C9005872CA000000000000000000516BC3007E95E3006580DB006B84
- D8007086D1006B81C9007F91CC005872C6004A66C400637CCE006878B0005F70
- AA006070AB008091CF007B91DB00647ED300C2CAE700C6CDE700B9C3E600AEBC
- EA00AEBDED00A8B8EF00A7B4E0005471CC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000576FC600A0AFE7008BA4F6007D98F5007F95E300536DC6000000
- 00000000000000000000000000000000000000000000DBE2FC00D6DFFC00D6DF
- FC006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF300D3DCFB00D3DC
- FB00D3DCFB00D2DBFB00D2DBFB00D2DBFB00D1DBFB00D1DBFB00D1DBFB00D0DA
- FB00D0DAFB00CFD9FB00526CC30000000000000000000000000000000000556E
- C500C0CEFA006F8DF3006F8DF3006F8DF3006F8DF3006F8DF300D6DFFC00D5DE
- FC006F8DF3006F8DF3006F8DF3006F8DF3006F8DF3006F8DF3006F8DF300C3D0
- FA00556EC500000000000000000000000000748CDB008FA3E500506ED4006C84
- D5006980CB006B81CB0092A2D600B1BDE4004D68C0004A66C4006B83D4007088
- D600748BD8007088D9006780D4006880CF00DADEEB00CBD1E700C5CDE900B7C3
- EC00BDC9F100AABAEF008494CE007790E1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000009FB1EF00637AC800A4B4ED007A96F40086A0F500758AD5000000
- 00000000000000000000000000000000000000000000DEE5FC00DAE2FC00DAE2
- FC007592F4007592F4007592F4007592F4007592F4007592F400D8E0FC007592
- F4007592F4007592F4007592F4007592F4007592F4007592F4007592F4007592
- F400D5DEFC00D4DDFC00546DC400000000000000000000000000000000005770
- C700DCE3FC00DFE6FC00E0E6FC00E1E7FD00E0E6FC00E0E6FC00DFE6FC00DFE6
- FC00DFE6FC00DEE5FC00DEE5FC00DEE5FC00DCE3FC00DCE3FC00D9E1FC00D7DF
- F9005770C700000000000000000000000000BDCBF40097A7DD005772CE00617B
- CF006B82CF00A3B1E000B1BDE500E3E8F800C5CEEE005D76CA004F6BCA00536F
- CD005873D0005E78CF00667FD000ADB9E100DEE1EA00D6DBEA00D2D8ED00C6D0
- F000C4CFF200BDCAF3005D74C100BFCDF6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000092A7EC006A7FCB0092A9F60086A0F5008BA3F100849B
- E8000000000000000000000000000000000000000000E6EBFD00E2E8FD00E2E8
- FD00E2E8FD00E2E8FD00E2E8FD00E1E7FD00E1E7FD00E1E7FD00E1E7FD00E0E6
- FC00E0E6FC00E0E6FC00E0E6FC00DFE6FC00DFE6FC00DFE6FC00DEE5FC00DEE5
- FC00DEE5FC00DBE2FC005770C7000000000000000000000000000000000093A8
- ED005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- CA0093A8ED0000000000000000000000000000000000566AAC009EADDE00A0B0
- E500AEBCE800AAB8E600D2DAF500D5DDF800C3CFF500C4CFF200B1BDE400B1BD
- E300BAC4E500C6CEE800C9D0E700D0D5E800E8EAEE00EDEEF200E6E9F200DDE2
- F600D9E0F700DFE4F500AABBF100000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000778BD200ABBBEF009DB2F7008298
- E0005871C900C1CDF600000000000000000000000000E7ECFB00E5EAFD00E4E9
- FD00E5EAFD00E6EBFD00E5EAFD00E5EAFD00E5EAFD00E5EAFD00E4E9FD00E4E9
- FD00E4E9FD00E3E9FD00E3E9FD00E3E9FD00E3E9FD00E2E8FD00E2E8FD00E1E7
- FD00DFE6FC00DEE5FC005871C800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004F69BE0093A0CC00C5CF
- F000B0BEEA00D0D8F500D6DEF900C1CDF500C0CCF500A2B2E7008FA0DB008FA0
- DA0099A9DD00B0BCE400BCC6E600C8CFE900E2E6F100ECEEF200F2F3F600E4E9
- F700EAEEFB00A1AFDA0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000007C93E500687FCD00ADBCED008DA5
- F600788EDA005874CD000000000000000000000000009FAFE100E7ECFB00E8ED
- FB00E8EDFB00E8EDFB00E8EDFB00E7ECFB00E7ECFB00E7ECFB00E7ECFB00E7EC
- FB00E7ECFB00E6EBFB00E6EBFB00E6EBFB00E6EBFB00E5EAFB00E5EAFB00E5EA
- FB00E4EAFB00E3E8FB006B85DE00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D1DAF8004C62AA00B4BE
- DE00C5D0F400D7DFF900D8DFF900BAC8F500BDCAF4008599DC00899CDD00899C
- DD0094A5DF00ADBBE700BAC5EA00C6CFED00D9DEF100E8EBF600F2F3F800F4F6
- FB00CED3E9005972C70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000093A8ED005C75CC00A5B7
- F5008EA6F400778DD70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000889D
- E400CAD0E800DDE3F900B3C3F500BBC9F600879CE3007C93DF00778FDF007C93
- E000869BE300A0B1EA00AEBDED00BECAF100CCD5F400DCE2F800ECF0FB005C74
- C70092A7EC000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000AFBF
- F3006B85DE005A74CF005B76D200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004A61AA0094A2D100D0D9F7009CAEED00637FDC00748DE100849AE500899E
- E60093A7E900A3B4ED00A8B8EF00AABAEF00D6DEF800E2E7F600A4B1DC009FB1
- F000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D1DAF800526AC0006175B500AEBCEB009CAEEA008BA0E7006E89E3007690
- E4008199E8009CAFEE00B3C2F300C7D2F600B7C2E6006E83CC005D78D5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000BFCCF500778DDF005771CA005068BA005169
- BC00526BBE00546DC1005C77D2007A92E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000C4C4C400B9B9B9004558
- 9700253159002531590025315900253159002531590025315900253159002531
- 5900253159002531590025315900253159002531590025315900253159004558
- 9700BDBDBD00DADADA0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000DCDCDC00DADADA00C7C7C7007486C4004659970028345F002835
- 5F0028355F0028345F002F3F770046599700C8C8C800D2D2D200DADADA000000
- 00000000000000000000000000000000000000000000A6A4A400E2E2E200E2E2
- E200E2E2E200E2E2E200E2E2E200E2E2E200E2E2E200E2E2E200E2E2E200E2E2
- E200E2E2E200E2E2E200E2E2E200E2E2E200A6A4A400B6B5B500A09E9E000000
- 00000000000000000000000000000000000000000000000000002C3B75004B62
- AC0003279D0003279D0003279D0003279D0003279D0003279D0003279D000327
- 9D0003279D0003279D0003279D0003279D0003279D0003279D0003279D004B62
- AC002C3B75000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000CED7F7003C54A200475B9D00455FB6003754B6001739AA001336
- A9001336A9001739AA002343AF003754B600475B9D00384881003C54A2000000
- 00000000000000000000000000000000000000000000A7A6A500E2E2E200D6D6
- D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6
- D600D6D6D600D6D6D600D6D6D600D6D6D600A7A6A500D8D8D800B7B6B600D5D5
- D5000000000000000000000000000000000000000000000000002B3D7900435E
- BB00546393005A6792005A6792000328A300546393005A679200546393000328
- A300546393005A679200546393000328A3005A6792005A67920054639300435E
- BB002B3D790000000000000000000000000000000000B1BCE500465792003441
- 6E00333F6800333F6800333F6800333F6800333F6800333F6800333F6800333F
- 6800333F6800333F6800333F6800333F6800333F6800333F6800333F6800333F
- 680034416E00485C9B0000000000000000000000000000000000000000000000
- 0000BAC6F2002D418600445796003352B8001337AE000429A8000429A8000429
- A8000B30AB000429A8000429A8000429A8003352B8004761B70044579600BAC6
- F2000000000000000000000000000000000000000000A8A7A600E2E2E200D6D6
- D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6D600D6D6
- D600D6D6D600D6D6D600D6D6D600D6D6D600A8A7A600ECECEC00D8D8D800A1A1
- A000D5D5D50000000000000000000000000000000000000000002D407F00435F
- BF008190C2008194D4008194D400092EAC008190C2008194D4008392C300042A
- AA007080B8008194D4007080B800092EAC008194D4008194D4008392C300435F
- BF002D407F00000000000000000000000000000000002D3F7F0043548D004B60
- A8004A60A9004A60A9004A60A9004A60A9004A60A9004A60A9004A60A900495F
- A700465BA000425698004256980042569800465BA000495FA7004A60A9004A60
- A9004B60A80044559000DBE2F800000000000000000000000000000000000000
- 000032468C004C61A700405DBE00042BAD00042BAD002245B700617ACC00677F
- CD006B81CB00617ACC004360C1002245B700042BAD001B3FB600405DBE003246
- 8C00BAC6F20000000000000000000000000000000000AEACAB00E6E6E600DCDC
- DC00DCDCDC00DCDCDC00DCDCDC00718BE400DCDCDC00DCDCDC00DCDCDC00718B
- E400DCDCDC00DCDCDC00DCDCDC00718BE400AEACAB00EFEEEE00ECECEC00CDCD
- CD00B6B5B400A3A1A1000000000000000000000000000000000032478A004261
- C800042DB600042DB600042DB600042DB600042DB600042DB600042DB600042D
- B6008196DA008196DA008196DA00042DB600042DB600042DB600042DB6004261
- C80032478A00000000000000000000000000000000003E58B5001544DF000537
- E0001229760026387700042AAB00042AAB00042AAB00042AAB00182F7F004142
- 4A0079777700ADACAC00ADACAC00ADACAC007977770041424A00182F7F00042A
- AB00042AAB001B3EB4003F51920000000000000000000000000000000000455C
- AE004160C6001037BB00042DB7002F52C4005069BA003D509100859AE100A8B7
- ED00C1CCF200859AE1004B61B1003D5091006981D0002E51C300042DB7004160
- C600495DA200455CAE00000000000000000000000000B3B1B100ECECEC00E4E4
- E400E4E4E400E4E4E400E4E4E400758FE800E4E4E400E4E4E400E4E4E400758F
- E800E4E4E400E4E4E400E4E4E400758FE800BCBBBA00B3B1B100B3B1B100B3B1
- B100B3B1B100B3B1B10000000000000000000000000000000000354890004262
- CD0055659D005A699B005A699B00042FBD0055659D005A699B0055659D00042F
- BD008196DE008196DE008196DE00042FBD005A699B005A699B0055659D004262
- CD0035489000000000000000000000000000000000003555BE000839DD000537
- E000032187002A3B7500042CB200042CB200042CB200042AAA004D4B4C009493
- 92009492920043414200454344004341420094929200949392004D4B4C004C66
- C0004B67C7001439B70041548F00000000000000000000000000869BE1004255
- 96001C42C300042FBD00042FBD001038C0004161CA004D62A700BCC8F3000000
- 0000000000000000000000000000B4C2F0005264A2006B83D100294EC6001C42
- C3004966C70042559600000000000000000000000000B8B6B600F1F1F100EBEB
- EB007892EB007892EB007892EB007892EB007892EB007892EB007892EB007892
- EB007892EB007892EB007892EB007892EB007B95EE007B95EE007B95EE00F1F1
- F100F1F1F100B8B6B60000000000000000000000000000000000384D96004364
- D3008192CB008197E1008197E1000934C5008192CB008197E1008494CD000934
- C50090A3E5008197E10092A5E5000934C5008197E1008197E1008494CD004364
- D300384D9600000000000000000000000000000000003555BE000537DE000537
- E000032187002C3C7600042DB700042DB700042DB600072AA0008F8E8D008483
- 82004342450024283900202537001E23360041404400848382008F8E8D004760
- B2004F6BCA00143BBC00455794000000000000000000000000003C54A3004F66
- B5000934C300153EC6004162D1000934C300143DC6004363CF00384E9B00BCC8
- F300000000000000000000000000000000005671C4005466A700647ED5000833
- C3003558CE004E66B600000000000000000000000000C0BEBD00F9F9F900F6F6
- F600F6F6F600F6F6F600F6F6F6007E98F100F6F6F600F6F6F600F6F6F6007E98
- F100F6F6F600F6F6F600F6F6F6007E98F100F6F6F600F6F6F600F6F6F600F6F6
- F600F9F9F900C0BEBD00000000000000000000000000000000003C54A1004266
- DC000433D0000433D0000433D0000433D0000433D0000433D0000433D0000433
- D0000433D0000433D0000433D0000433D0000433D0000433D0000433D0004266
- DC003C54A100000000000000000000000000000000003555BE000537DE000537
- E000032187002F3F79000E38C6000E38C6000D34B500434757006D6B6B004242
- 4900333540002D2F3C00292C3B00262A3800313648002C303D006D6B6B004347
- 57000D34B5001B43C9004B5FA00000000000000000005B74CA005067B2004467
- D9002E54D4006882D700465BA300617DDC00214AD2001842D0004A6AD700556A
- B5003D53A40000000000000000000000000000000000B7C5F100465BA3002B52
- D3001742D0004063D8006C83CF000000000000000000C2C1C000FBFBFB00F9F9
- F9007F99F2007F99F2007F99F2004E73EF004E73EF004E73EF004E73EF004E73
- EF007F99F2007F99F2007F99F2007F99F2007F99F2007F99F2007F99F200F9F9
- F900FBFBFB00C2C1C000000000000000000000000000000000003F58A8004368
- E1005669A8005B6CA5005B6CA5000535D8005669A8005B6CA5005669A8000535
- D8005669A8005B6CA5005669A8000535D8005B6CA5005B6CA5005669A8004368
- E1003F58A800000000000000000000000000000000003555BE000537DE000537
- E0000321870030417A001B44CE001B44CE00193EBA004E4C4C004D4B4C004243
- 4A00393B42003537400032333F002E313E0025293800222839004D4B4C004E4C
- 4C00193EBA00264DD0004E62A40000000000000000004760B700556EC8003A5F
- DB004266DD00657AC4004760B6006B7FC0006480E0002750D8002750D8004E6F
- DC00566DB800BDCBF40000000000000000000000000000000000556DC1003F63
- DB001F49D600365CDB004E66BA000000000000000000C5C3C300FDFDFD00FCFC
- FC00FCFCFC00FCFCFC00FCFCFC004F74F00099AEF50099AEF50099AEF5004F74
- F000FCFCFC00FCFCFC00FCFCFC00819BF400FCFCFC00FCFCFC00FCFCFC00FCFC
- FC00FDFDFD00C5C3C30000000000000000000000000000000000425AAD004469
- E6008295D600819AEE00819AEE000A3ADE008295D600819AEE008598D7000A3A
- DE008295D600819AEE008598D7000A3ADE00819AEE00819AEE008598D7004469
- E600425AAD00000000000000000000000000000000003555BE000537DE000537
- E0000321870032427C002951D6002951D6002448C0004F4D4E004F4D4E004545
- 4A006060650072737A0053555D00353741002B2F3D00272B3A004F4D4E005856
- 56002448C0003056D7005166AA0000000000000000004058A8005775D900375D
- DD005576E3005D71B7008CA1E6004059AC006D81C4006883E300254FDB002D55
- DD004F70DF004159AC00BECCF5000000000000000000000000008CA1E6005374
- E300254FDB00335ADD00445BA8000000000000000000C8C7C600FFFFFF00FFFF
- FF00829CF500829CF500829CF5005075F1005075F1005075F1005075F1005075
- F100829CF500829CF500829CF500829CF500829CF500829CF500829CF500FFFF
- FF00FFFFFF00C8C7C600000000000000000000000000000000004862B9004A70
- F0001C4CEC001C4CEC001C4CEC001C4CEC001C4CEC001C4CEC001C4CEC001C4C
- EC001C4CEC001C4CEC001C4CEC001C4CEC001C4CEC001C4CEC001C4CEC004C71
- F0004862B900000000000000000000000000000000003555BE000537DE000537
- E0000321870035457F004368E4004368E4003E60D1004F526000686666004E4C
- 4D00959495008C8C8E008283880044444A00373944003A3C4400686666004F52
- 60003D5FD1004469E400586DB6000000000000000000455EB2006482E6004167
- E7006180E7005168B600C6D1F50000000000BECCF500465FB6006E8BEB003A62
- E700335CE5005577E8005D75C600465FB6000000000000000000C6D1F5005477
- EA003D64E7003B62E700455EB2000000000000000000CAC8C700FEFEFE00FEFE
- FE00FEFEFE00FEFEFE00FEFEFE00829CF500FEFEFE00FEFEFE00FEFEFE00829C
- F500FEFEFE00FEFEFE00FEFEFE00829CF500FEFEFE00FEFEFE00FEFEFE00FEFE
- FE00FEFEFE00CAC8C700000000000000000000000000000000004A64BB004E73
- F1006777AC006777AC006777AC006777AC006777AC006777AC006777AC006777
- AC006777AC006777AC006777AC006777AC006777AC006777AC006777AC005075
- F1004A64BB00000000000000000000000000000000003555BE000537DE000537
- E00003218700324176005275EB005275EB004D6FDE004F5C8B008F8D8D005452
- 530071707000969496006F6E710049494E003A3B4300514F51008F8D8D004F5C
- 8B004D6FDE004E72EA005C72BB0000000000000000004861B7006885E8004B70
- ED005E7FEE00556CBC00AEBDF2000000000000000000BFCCF5007187D0006E8B
- EE004067EB003F66EB005D7EEC00627ACB00BFCCF50000000000AEBDF2005A7C
- EE003C64EB00446AEB004861B7000000000000000000C9C7C600FCFCFC00FBFB
- FB00FBFBFB00FBFBFB00FBFBFB00809AF300FBFBFB00FBFBFB00FBFBFB00809A
- F300FBFBFB00FBFBFB00FBFBFB00809AF300FBFBFB00FBFBFB00FBFBFB00FBFB
- FB00FCFCFC00C9C7C600000000000000000000000000000000004B65BC005075
- F10090A4E80099AFF70090A4E80090A4E80099AFF70090A4E80090A4E80099AF
- F70090A4E80090A4E80099AFF70090A4E80090A4E80099AFF70090A4E8005479
- F1004B65BC0000000000000000000000000000000000465EB2001743D5001844
- D60019307D0039497A00809AF300657AC2006D84D1005D77D100908E8E007F7D
- 7D00575555004F4D4D004D4B4D0047474A00545254007F7D7D00908E8E003E52
- 94004158A5004059AC005F75C10000000000000000004B65BC006F8BEB005075
- F0006384F2005B73C50090A4EB000000000000000000000000004B65BE00748C
- DB007290F300426AEF00466DEF006081F0004B65BE00BFCDF50090A4EB006384
- F200466DEF004D72F0004F68BC000000000000000000BDBBBA00E8E8E800DEDE
- DE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDE
- DE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDEDE00DEDE
- DE00E8E8E800BDBBBA00000000000000000000000000000000004D67BE00587C
- F2004C72F1004C72F1004C72F1004C72F1004C72F1004C72F1004C72F1004C72
- F1004C72F1004C72F1004C72F1004C72F1004C72F1004C72F1004C72F1005E80
- F2004D67BE00000000000000000000000000000000005E79D0006B86E2006179
- CA005669AB005669AB007B97F4006279C4006B84D6007B97F4006879B2005959
- 5F00757373008F8E8D008F8E8D008F8E8D007573730059595F006879B2005669
- AB004D62AA004B62AE00617AD30000000000000000006580D9007087D2006A8A
- F3005B7EF2006A87EA00536CC00000000000000000000000000000000000BFCD
- F6005069C3007995F4005479F1005479F1006685F000667FD000536CC0006384
- F300587CF2006686F300778FDE000000000000000000AEADAC00D2D2D200D2D2
- D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2
- D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2D200D2D2
- D200D2D2D200AEADAC00000000000000000000000000000000004D67BF005B7E
- F2004D5B8B005563930055639300556393005563930055639300556393005563
- 9300556393005563930055639300556393005563930055639300556599006283
- F2004D67BF0000000000000000000000000000000000627ACE007592F4003E4E
- 8000343D5D006071AB0089A2F60089A2F60089A2F60089A2F600829AEA007A8E
- D5006A7191005A585800646262005A5858006A7191007A8ED500829AEA00829C
- F5006D8CF3006F8CF1008EA3E90000000000000000009FB0EF005B74C5007B96
- F100567AF2006A8AF3006881D400000000000000000000000000000000000000
- 0000BFCDF6007D93DE007E99F5005F81F2006485F3007592F2008197E2006686
- F3006888F3007793F000B7C4F20000000000000000005263A1005F6FA8005F6F
- A8005F6FA8005F6FA8005F6FA8005F6FA8005F6FA8005F6FA8005F6FA8005F6F
- A8005F6FA8005F6FA8005F6FA8005F6FA8005F6FA8005F6FA8005F6FA8005F6F
- A8005F6FA8005263A100000000000000000000000000000000004E68C0005F81
- F2002C3B6C003242790032427900324279003242790032427900324279003242
- 7900324279003242790032427900324279003242790039497E005B6894006787
- F3004E68C000000000000000000000000000000000005C75CC00728ADD00404F
- 8100404C72006575AC0091A8F60092A9F60092A9F60093AAF60097ADF70099AE
- F30095A9EB008C9EDD008C9EDD008C9EDD0095A9EB0098ADF30094ABF600819B
- F5007390F2006983D80000000000000000000000000000000000516CC8008196
- DF005D80F2006283F2006C8AEF006681DA000000000000000000000000000000
- 000000000000526BC4007E94DF00849EF5007C97F400809BF5008FA7F6007592
- F4007D98F5007E94DF00000000000000000000000000556CBD005A79DF000536
- D900042EBB00042BAE00042EBB000536D9000536D9000536D9000536D9000536
- D9000536D9000536D9000536D9000536D900042EBB00042BAE00042EBB000536
- D9005A79DF00556CBD0000000000000000000000000000000000506AC1006686
- F30038446D003E4C7A003E4C7A003E4C7A003E4C7A003E4C7A003E4C7A003E4C
- 7A007982A2005C688F00737D9E004A5782003E4C7A003E4C7A00646F9400708E
- F400506AC1000000000000000000000000000000000000000000000000008DA2
- E800536DC400536DC4004E66B8004B62B0004E66B800536DC400546DC0005870
- BF007D8DC6008D9BC7008E9BC7008D9BC7007789C5004F69BE00556EC100637A
- CE008DA2E8000000000000000000000000000000000000000000000000005D78
- CF00819CF3006787F3006888F300718EEF006C85D6005770C40092A5EC00AEBE
- F300C8D2F60092A5EC005671CE005A73C600A7B9F8009AAFF70095ACF7008FA6
- F400788ED6005D78CF00000000000000000000000000566FC6006A89F200053A
- EA005574DB006886EB005574DB00053AEA00053AEA00053AEA00053AEA00053A
- EA00053AEA00053AEA00053AEA00053AEA004D6CD3006482E7004D6CD300053A
- EA006A89F200566FC60000000000000000000000000000000000516BC2006A8A
- F3003D486E0044517A0044517A0044517A0044517A0044517A0044517A004451
- 7A009097B0007881A000848CA8007881A00044517A0044517A00687294007491
- F400516BC2000000000000000000000000000000000000000000000000000000
- 000000000000DAE1F900637BCE00556FC600637BCE00DAE1F9006C84D800607B
- D9007D98F500AABCF800ADBEF800AABCF8007491F4005775D9006C84D8000000
- 000000000000000000000000000000000000000000000000000000000000D3DB
- F900859AE100859FF5006D8CF3007491F4007A96F4007892EC00647CCC006078
- C8006078C800647CCC006D85D9007F99EC00A3B6F8009DB2F7008EA6F600899E
- E200526CC500000000000000000000000000000000005771C8007794F4001C4C
- ED0090A7F4007995F40090A7F4001E4EED001E4EED001E4EED001E4EED001E4E
- ED001E4EED001E4EED001E4EED001E4EED0090A7F4007995F40090A7F4001C4C
- ED007794F4005771C80000000000000000000000000000000000526CC3006D8C
- F300434D6E00485378004A557B004A557B004A557B004A557B004A557B004A55
- 7B004A557B004A557B004A557B004A557B004A557B004A557B006F7896007995
- F400526CC3000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000A8B8F0005570
- CB00466BE300CFD8F800CFD8F800CFD8F8004165E300546ECA00A8B8F0000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005871C800869AE2008AA3F4007995F4007A96F400819BF500829DF5007F9A
- F5007F9AF500859FF50088A2F6008FA7F60099AFF70095ACF70099AEF5005871
- C800BFCDF600000000000000000000000000000000005872C900889FEB0091A6
- EC0097ABED0098ABED0098ABED0099ACED0099ACED0099ACED0099ACED0099AC
- ED0099ACED0099ACED0099ACED0099ACED0099ACED0098ABED0097ABED0091A6
- EC00889FEB005872C900000000000000000000000000000000005670C6007794
- F400AABCF800ADBEF800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800ADBEF800A9BBF800829C
- F500546EC5000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D3DBF9006179D1008A9EE2009AAFF40099AFF70097ADF70097AD
- F7009AAFF7009AAFF7009DB2F700A0B4F7008B9FE200687FCC005D78D5000000
- 000000000000000000000000000000000000000000005B76D2005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005B76D200000000000000000000000000000000005A74C7008CA3
- ED009BB0F700A6B9F800A9BBF800AABCF800AABCF800AABCF800AABCF800AABC
- F800AABCF800AABCF800AABCF800AABCF800A9BBF800A5B8F80098AEF70092A7
- EF005972C6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005772CD00637BCC007A8FD90092A8F00098AD
- F0009AAEF10092A8F000879DE6007A8FD9005772CD0092A7ED00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000728BDF007289
- D7009BAFF1009FB2F200A0B3F200A0B3F200A0B3F200A0B3F200A0B3F200A0B3
- F200A0B3F200A0B3F200A0B3F200A0B3F200A0B3F2009EB1F2009AAEF1007389
- D700728BDF000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000009FB1F000728BE0005771C8005771
- C8005771C8005771C8005A75D100728BE0000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003044890030448900000000000000000000000000000000000000
- 0000000000003044890000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000DBDBDB002E3F79002632
- 5B0026325B0026325B0026325B0026325B0026325B0026325B0026325B002632
- 5B0026325B0026325B002E3E7700C5C5C500C5C5C500C5C5C500C7C7C7000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000263569004F5E9400000000000000000000000000000000000000
- 0000536BBA002635690000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000027366E004F65
- AE004F64AC00485B9B004F64AC004F64AC00485B9B004F64AC004F64AC00485B
- 9B004F64AC004F64AC002736680026335C0026335B0026335B0026335B002632
- 5D002E3F7900CBCBCB0000000000000000000000000000000000000000000000
- 00000000000029397200627DD900334992000000000000000000000000003349
- 92005E71B3002939720000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000003F58AD003D59B9003857BF003857
- BF003857BF003857BF003857BF003857BF003857BF003857BF003857BF003857
- BF003857BF003857BF003857BF003857BF003857BF003857BF003857BF003857
- BF003857BF003857BF003A5097005169BF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000002C3D7A004F69
- BE000328A200032082001D3EAC000328A200032082001D3EAC000328A2000320
- 82001D3EAC004F69BE002C3D7A001D3EAC000328A200032082001D3EAC004F69
- BE002C3D7A000000000000000000000000000000000000000000000000000000
- 0000000000002C3C7700617DDA00445591007389D300000000007389D300495A
- 9300526FD2002C3C770000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000283C82000730BA00042EB900042E
- B900042EB900042EB900042EB900042EB900042EB900042EB900042EB900042E
- B900042EB900042EB900042EB900042EB900042EB900042EB900042EB900042E
- B900042EB900042EB9003453B900283C820000000000364C9A002C3E7D002C3E
- 7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E
- 7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E7D002C3E
- 7D002C3E7D002C3E7D00000000000000000000000000000000002E407E004F69
- C200042AA900032187001D3FB100052AA900042288001E40B100052AA9000321
- 87001D3FB1004F69C2002E407E001D40B300062CAB00052389001F42B400506A
- C4002F4180000000000000000000000000000000000000000000000000000000
- 0000000000002E3F7C00617DDB005872C70032478800CED7F70033478800647B
- CB002447BB002E3F7C0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000027387A00042BAD00042BAD00042B
- AD00042BAD00042BAD00042BAD00042BAD00042BAD00042BAD00042BAD00042B
- AD00042BAD00042BAD00042BAD00042BAD00042BAD00042BAD00042BAD00042B
- AD00042BAD00042BAD001035B10027387A00000000002F4284005872CB004F6B
- C8004F6BC8004F6BC8004F6BC8004F6BC8004F6BC8004F6BC8004F6BC8004F6B
- C8004F6BC8004F6BC8004F6BC8004F6BC8004F6BC8004F6BC8004F6BC8004F6B
- C8004F6BC8005872CB0000000000000000000000000000000000304385004760
- B30005248C0006258D000E2C910009278D0009278D000F2D900009278D000827
- 8D000D2B90004760B300304385002346BC000E34B5000B2A91002548BD00516C
- C900314487000000000000000000000000000000000000000000000000000000
- 00000000000032458600617EDF00173CBA005472D800435492005D7ADA001238
- B700042BAF003245860000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000002A3C7E00042BB000042BB000042B
- B000042BB000042BB000042BB000042BB000042BB000042BB000042BB000042B
- B000042BB000042BB000042BB000042BB000042BB000042BB000042BB000042B
- B000042BB000042BB000042BB0002A3C7E0000000000354A92005875D600BBC2
- DA00D0D8F400D0D8F400D0D8F400CED6F300CED6F300CED6F300CED6F300CCD5
- F200CDD6F300CED6F300CED6F300D0D8F400D1D9F400D1D9F300D3DAF400D5DC
- F400E9EDFA005875D6000000000000000000000000000000000035498F00516E
- CF001239BE00102F98002D50C600183EBF00133299002F52C600183EBF001231
- 99002B4FC600526FCF0035498F003256CE001F46C8001938A1003357CE005472
- D500384D95000000000000000000000000000000000000000000000000000000
- 00000000000034478B00627FE100042CB4002E53CB005B73C7002E53CB00042C
- B400042CB40034478B0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000002C408400042EB900042EB900042E
- B900042EB900042EB900042EB900042EB900042EB900042EB900042EB900042E
- B900042EB900042EB900042EB900042EB900042EB900042EB900042EB900042E
- B900042EB900042EB900042EB9002C40840000000000384E99005876DB00BDC4
- DC00D2DAF500D1D9F500D1D9F500D1D9F500D1D9F500D1D9F500CFD7F400CFD7
- F400CED7F400CED7F400CED7F400CED7F500CED7F500CED7F500CED7F500CED7
- F500E6EBF9005876DB0000000000000000000000000000000000374D94005371
- D4001840C50015359E003256CC001E45C70018379F003558CC001E45C6001736
- 9F003054CC005371D400374D94003A5ED600274ED100203FA8003A5ED6005574
- DB003B519D000000000000000000000000000000000000000000000000000000
- 000000000000374B8F006280E300042EB9000932BC004164D8000932BC00042E
- B900042EB900374B8F0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000002F448C000430C2000430C2000430
- C2000430C2000430C2000430C2000430C2000430C2000430C2000430C2000430
- C2000430C2000430C2000430C2000430C2000430C2000430C2000430C2000430
- C2000430C2000430C2000430C2002F448C00000000003C53A0005A79E000C0C7
- DE00D5DDF700D3DBF600D3DBF600D3DBF700D2DAF600D2DAF600D2DAF700D1D9
- F600D2DAF700D1D9F600D0D9F600D0D9F600D0D9F600CFD8F600CFD8F600CFD8
- F600E6EBFA005A79E0000000000000000000000000000000000039509A004B66
- C2001838A4001B3BA5002241A7001D3CA4001D3CA4002341A7001D3CA4001C3B
- A4001F3EA6004B66C20039509A004064DC002F56DA002645AE004064DC005777
- E1003F56A4000000000000000000000000000000000000000000000000000000
- 0000000000003B509A00617FE5000430C4000430C4000430C4000430C4000430
- C4000430C4003B509A0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000354B9B000534D4000534D4000534
- D4000534D4000534D4000534D4000534D4000534D4000534D400042AAA00042A
- AA00042AAA00042EB9000534D4000534D4000534D4000534D4000534D4000534
- D4000534D4000534D4000534D400354B9B0000000000435CAF006181EC00C2C9
- E000D8E0FA00D8E0FA00D7DFFA00D7DFFA00D7DFFA00D7DFFA00D6DEFA00D6DE
- FA00D6DEFA00D6DEFA00D6DEFA00D5DDFA00D5DDFA00D4DDFA00D4DDFA00D4DD
- FA00E9EEFC006181EC00000000000000000000000000000000003F56A5005676
- E1002951D9002545AF004468DE003259DA002847AF004669DE003259DA002645
- AE003F64DC005676E1003F56A5004F73EB003F66E8003352BA004E72EA00597B
- EB00455FB3000000000000000000000000000000000000000000000000000000
- 0000000000003E539E006180E7000432C9000432C9000432C9000432C9000432
- C9000432C9003E539E0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000003850A3000537DD000537DD000537
- DD000537DD000537DD000537DD000537DD000537DD000537DD00C5C3C200C3C1
- BF00C0BEBC00042EBC000537DD000537DD000537DD000537DD000537DD000537
- DD000537DD000537DD000537DD003850A300000000004660B6006182F100C5CB
- E100DAE1FB00DAE1FB00DAE1FB00D9E1FB00D9E1FB00D9E1FB00D8E0FB00D8E0
- FB00D8E0FB00D7DFFB00D7DFFB00D7DFFB00D6DEFB00D6DEFB00D6DEFB00D6DE
- FB00EBF0FD006182F10000000000000000000000000000000000425AAA005778
- E5003058DF002A4AB300496DE300385FE0002D4CB3004D70E300385EDF002B4A
- B200456AE2005778E500425AAA005579F000476DEE003A59BF005478F0005A7D
- F1004963BB000000000000000000000000000000000000000000000000000000
- 0000000000004056A3006180E9000433CE000433CE000433CE000433CE000433
- CE000433CE004056A30000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000003B54AA000539E5000537E0000434
- D1000433CE000433CE000433CE000433CE000433CE000433CE00D9D8D700D7D5
- D400D4D2D100042BB0000433CE000433CE000433CE000433CE000433CE000433
- CE000434D3000538E2000539E5003B54AA00000000004962BA006283F200C7CD
- E300DEE5FC00DDE4FC00DDE4FC00DCE3FC00DCE3FC00DCE3FC00DBE2FC00DBE2
- FC00DBE2FC00DAE2FC00DAE2FC00DAE2FC00D9E1FC00D9E1FC00D8E0FC00D8E0
- FC00EBF0FD006283F20000000000000000000000000000000000445DB100506E
- D2002A4AB7002F4FB8003553B9003251B8003251B7003856BA003251B8003150
- B8003150B9004F6DD200445DB1005D80F2005075F100405EC1005B7EF2005C7F
- F2004C66BD000000000000000000000000000000000000000000000000000000
- 000000000000455DAE006887ED001543DC001543DC001543DC001543DC001543
- DC001543DC00455DAE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000003F59B000193BAD004565CF005D7D
- EA006082F2006082F2006082F2006082F2006082F2006082F200D9D7D600D3D1
- D000CDCBCA00516DCD006082F2006082F2006082F2006082F2006082F2006082
- F2005B7BE5003959C2001646E9003F59B000000000004C65BC006B8AF300CCD1
- E300E3E9FD00E2E8FD00E2E8FD00E2E8FD00E1E7FD00E1E7FD00E0E6FC00E0E6
- FC00E0E6FC00DFE6FC00DFE6FC00DFE6FC00DEE5FC00DEE5FC00DEE5FC00DDE4
- FC00EDF1FE006B8AF300000000000000000000000000000000004A64BB005A7D
- F1004169EF003857BF005B7EF1004C71F0003D5BC0005E80F1004C71F0003B59
- BF005478F000597CF1004A64BB006684E8005F81F2004D68C2006482E8005E80
- F2004E68BF000000000000000000000000000000000000000000000000000000
- 0000000000004760B3006D8BF0001F4CE1001F4CE1001F4CE1001F4CE1001F4C
- E1001F4CE1004760B30000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000415AB1005E7CE2005579F100486F
- F000466DF000466DF000466DF000466DF000466DF000466DF000F1F0F000EFED
- ED00ECEBEA003B5DCC00466DF000466DF000466DF000466DF000466DF000466D
- F000486FF000587CF2002247C400415AB100000000004D67BE006B8AF300CED3
- E300E5EAFD00E5EAFD00E5EAFD00E4E9FD00E4E9FD00E4E9FD00E3E9FD00E3E9
- FD00E2E8FD00E2E8FD00E2E8FD00E1E7FD00E1E7FD00E1E7FD00E0E6FC00E0E6
- FC00EFF3FE006B8AF300000000000000000000000000000000004B65BD005C7F
- F200466DF0003E5CC1006183F2005176F100425FC1006586F3005176F100405E
- C100597CF2005B7EF2004B65BD006D89E9006787F300536DC2006986E8005F81
- F2004F69C1000000000000000000000000000000000000000000000000000000
- 0000000000004A63B8006F8DF1002854E7002854E7002854E7002854E7002854
- E7002854E7004A63B8004A63B8004A63B8004A63B8004A63B800516BC7000000
- 000000000000000000000000000000000000425BB200597CF2005277F1005277
- F1005277F1005277F1005277F1005277F1005277F1005277F1004766CD004766
- CD004766CD004B6CDA005277F1005277F1005277F1005277F1005277F1005277
- F1005277F1005277F1004D68C400425BB200000000004E68BF006B8AF300CFD4
- E300E7ECFD00E6ECFD00E6ECFD00E6ECFD00E6EBFD00E6EBFD00E5EAFD00E5EA
- FD00E5EAFD00E4E9FD00E4E9FD00E4E9FD00E3E9FD00E3E9FD00E3E9FD00E2E8
- FD00F0F3FE006B8AF300000000000000000000000000000000004C66BD005473
- D9003D5BC100425FC1004965C2004763C1004864C1004C67C3004763C1004561
- C100425FC2005372D9004C66BD00728DE9006F8DF3005871C3006E8AE8006082
- F200516BC2000000000000000000000000000000000000000000000000000000
- 0000000000004F69C0007894F4003D66EF003D66EF003D66EF003D66EF003D66
- EF003C65EF004F69C0003656C2005579F1005378F1007592F4004F69C0000000
- 000000000000000000000000000000000000445DB5006C8BF3006C8BF3006C8B
- F3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8B
- F3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8BF3006C8B
- F3006C8BF3006C8BF3007491F400445DB50000000000516BC2006D8CF300D3D7
- E400EBF0FD00EAEFFD00EAEFFD00EAEFFD00E9EEFD00E9EEFD00E9EEFD00E9EE
- FD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E7ECFD00E7ECFD00E7ECFD00E6EC
- FD00F2F5FE006D8CF300000000000000000000000000000000004E68BF005F81
- F200567AF2004C67C200718FF4006586F300516BC2007693F4006586F3004F69
- C2006888F3005D80F2004E68BF00829DF5007C97F4005D75C3007491F4005F81
- F200536DC4000000000000000000000000000000000000000000000000000000
- 000000000000506AC1007C97F400476EF000476EF000476EF000476EF000476E
- F000466DF000506AC1003555C2005176F1005075F1007290F400506AC1000000
- 000000000000000000000000000000000000455EB6007A96F4007A96F4007A96
- F4007A96F4007A96F4007A96F4007A96F4007A96F4007A96F4007A96F4007A96
- F4007A96F4007A96F4007A96F4007A96F4007A96F4007A96F4007A96F4007A96
- F4007A96F4007A96F4007A96F400455EB60000000000526CC3007491F400D6D9
- E400EDF1FE00EDF1FE00EDF1FE00ECF0FE00ECF0FE00EBF0FD00EBF0FD00EBF0
- FD00EAEFFD00EAEFFD00EAEFFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E8ED
- FD00F4F7FE007491F400000000000000000000000000000000004F69C0006082
- F2005B7EF2004F6AC2007794F4006B8AF300566FC3007C97F4006B8AF300536D
- C2006D8CF3005E80F2004F69C00086A0F5007995F400566FC3006989F3005C7F
- F200556FC6000000000000000000000000000000000000000000000000000000
- 000000000000516BC200819BF5005075F1005075F1005075F1005075F1005075
- F1005075F100516BC2002A4DBF004169F0004068F0006B8AF300516BC2000000
- 0000000000000000000000000000000000004660B70086A0F50086A0F50086A0
- F50086A0F50086A0F50086A0F50086A0F50086A0F50086A0F50086A0F50086A0
- F50086A0F50086A0F50086A0F50086A0F50086A0F50086A0F50086A0F50086A0
- F50086A0F50086A0F50086A0F5004660B70000000000546DC4007491F400D8DB
- E400F0F3FE00EFF3FE00EFF3FE00EFF3FE00EEF2FE00EEF2FE00EDF1FE00EDF1
- FE00EDF1FE00ECF0FE00ECF0FE00ECF0FE00EBF0FD00EBF0FD00EBF0FD00EAEF
- FD00F4F7FE007491F40000000000000000000000000000000000506AC1005775
- DA004D68C200546EC2005B73C4005A72C3005B73C3006077C4005B73C3005871
- C300526CC3005674DA00506AC1009CB1F70096ACF7007A91DC00819BEF006483
- EB005670C7000000000000000000000000000000000000000000000000000000
- 000000000000536DC40088A2F6006485F3006485F3006485F3006485F3006485
- F3006384F300536DC4000F35B6001546EC001546EC00577BF200536DC4000000
- 0000000000000000000000000000000000005570CD00A3B6F500A0B4F700A0B4
- F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4
- F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4F700A0B4
- F700A0B4F700A0B4F7008798D6005570CD00000000005770C7007B97F4001B46
- D500254ED600274FD600274FD6002850D6002850D6002850D6002850D6002850
- D6002850D6002850D6002850D6002850D6002850D600274FD600274FD600214A
- D5001B46D5007B97F40000000000000000000000000000000000526CC3006283
- F2006989F3005D75C300859FF5007E99F500657BC3008DA5F6007F9AF5006279
- C4007A96F4006082F200526CC300375EE5003159E4002551E3005771C8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000546DC4008BA4F6006F8DF3006F8DF3006F8DF3006F8DF3006F8D
- F3006E8DF300546DC400042BB0000538E5000538E5005075EF00546DC4000000
- 000000000000000000000000000000000000000000004963BA004963BA004963
- BA004963BA004963BA004963BA003D5BC300042EBC003B57B9004963BA004963
- BA004963BA004963BA003B57B900042EBC004963BA004963BA004963BA004963
- BA004963BA004963BA005670CE0000000000000000005871C800829CF5003E67
- F0005176F1005579F100577BF200597CF200597CF200597CF200597CF200597C
- F200597CF200597CF200597CF200597CF200587CF200577BF2005579F1004A70
- F0003E67F000829CF50000000000000000000000000000000000536DC4006283
- F2006C8BF3006077C3008AA3F600839EF5006B80C40092A9F600849EF500657B
- C3007C97F4006183F200536DC4005771C8005771C8005771C8005A76D2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000556EC6008FA7F6007995F4007995F4007995F4007995F4007995
- F4007995F400556EC600042AA9000434D3000434D3005073E900556EC6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004A64BB000430C4004760B300000000000000
- 000000000000000000004760B3000430C4000000000000000000000000000000
- 000000000000000000000000000000000000000000005872C90089A1F00093A9
- F2009DB0F2009FB2F400A0B3F400A1B4F400A1B4F400A1B4F400A1B4F400A1B4
- F400A1B4F400A1B4F400A1B4F400A1B4F400A0B3F400A0B3F4009FB2F40098AD
- F20093A9F20089A1F00000000000000000000000000000000000546EC5005876
- DA00566FC3006379C4006C81C5006E82C4007083C5007587C6006E82C400687D
- C4005B73C4005775DA00546EC500000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005770C8009DB1F3008CA5F6008CA5F6008CA5F6008CA5F6008CA5
- F6008CA5F600697ECB0003269B00042AAA000930B3005D78D6005770C7000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000516ABE002049D4004862BD004D66BD004D66
- BD004D66BD004D66BD004862BD002049D3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005670C7005D80
- F200587CF2005972C3008EA6F60093AAF600798AC500A3B6F80087A1F5005B73
- C3006989F3005B7EF2005670C700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000647EDA0095A8E80097ADF70096ACF70096ACF70096ACF70096AC
- F70096ACF700758AD4001A36940003269B002042B3005E78CF005874CF000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000536CC0006481E4000B39D4000434D3000434
- D3000434D3000434D3000B39D4006D88E3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005771C8006583
- EB00809AEE007B92DD009BB0F700AEBFF8009FAEDF00B2C2F9009EB3F7007C92
- DD00809AEE006382EB005771C800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000093A8ED007086D2009DB2F70098AEF7009CB1F7009DB2F7009AAF
- F70095ACF70096A9EB005E74BF0016349A004D6ACB00657BC5007C93E6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000006680D9007489D400879FF200829DF500829D
- F500829DF500829DF500879FF2007489D4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005A76D2005771
- C8005771C8002A4DBF00425FC100566FC3005B73C3005A72C3004360C100294C
- BF005771C8005771C8005A76D200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C900647EDB0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005A76D2005771C8005771C8005771C8005771C8005771C8005771C8005771
- C8005A76D2000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000031458E000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000008196DC002F42
- 820056659A002F4282008196DC00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000DADADA00CECECE00C0C0C000C0C0C0009EACDC00273360002631
- 590026315900384987008D9DD300C0C0C000C0C0C000CECECE00D3D3D3000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000859AE000364C98004C5D99005F79CD003D5C
- C4002447BD003D5CC4005F79CD00697CBD00364C9800859AE000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000002B3F800030458B0000000000000000000000
- 00000000000000000000000000004055A3007085D00000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000CED7F6002A3D7D0056669F004B5989002A3A
- 73002A3A73007381AE005264A4002A3A73000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004D66
- BC007D94DF007B94E7007F97E7008098E7008199E7008199E7008199E7008199
- E7008199E7008199E7008199E7008199E7008098E7007F97E7007C94E5006377
- BB004D66BC000000000000000000000000000000000000000000000000000000
- 00000000000000000000A9B9EE005062A1006E81C300627CD300294EC600294E
- C600294EC600294EC600294EC6004161CD006E81C3005062A10039509E000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008196DB002E4187005366A6003F4E84007287D200000000000000
- 0000000000000000000090A3E30039487D003F4E84002E4187008196DB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004F65B600213783007181B600A3B4EB000000
- 000000000000354B97007281B300213783000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000D2DBF8004E66
- B7006686F3006888F3006F8DF3007592F4007693F4007693F4007693F4007693
- F4007693F4007693F4007693F4007693F4007391F4006F8DF3006888F3007F99
- F0004E66B700D2DBF80000000000000000000000000000000000000000000000
- 000000000000627ACE00465A9E006882DB004A6AD6003E61D3003E61D3002E53
- CF002E53CF002E53CF002E53CF003257D0005674D900748CDD006E82C600627A
- CE00000000000000000000000000000000000000000000000000000000000000
- 0000364C980047578E005568AB003C58B800576CAF0030428500000000000000
- 0000000000000000000030468D005568AB004B65BB005568AB0047578E000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000002F428600324CA4004F5E9300000000000000
- 000000000000A5B6EC004F5E9300324CA4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000AEBDF100556C
- BB00617FE30040508500576AAB00819BF500819BF500435180005D70B000829C
- F500829CF5005A6CAB005C6FAF00819BF500425080005669AA005469AF007B97
- F400556CBB00AEBDF10000000000000000000000000000000000000000000000
- 00005469B1008BA0E8005E7CE2005A6DB400445AA9004D67C0006F83C8007590
- EA004469E3003A60E1004E67BE00445DB200445AA9005A6DB4007388CF009FB0
- EA005469B100ABBBF00000000000000000000000000000000000000000000000
- 0000A8B7ED00495A96006A81CF00042DB6001C41BD005771C500BAC7F2000000
- 000000000000374B9400576FBE002045BE000E35B8006880CF004D5E9B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000334689002440A30033468900000000000000
- 00000000000000000000334689001C399F000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000008FA3E900627A
- CD004862BC0036488600445BA9006283F2006283F20031417700445BA9006283
- F2006283F200445BA900445BA9006283F20031417700445BA900445BA9007290
- F400627ACD008FA3E900000000000000000000000000000000004B66BF00435C
- B4008F9FDA005878E0005B71BD009DAFED0000000000000000004860B5008299
- E7005B7DEC004E6EDD00455EB40000000000000000009DAFED00516AC600859C
- E60092A3DB004761BA004B66BF00000000000000000000000000000000000000
- 000000000000455EB2006B7DB900042FBF00042FBF003C5DCC00465EB2000000
- 0000000000005267AE004161CE00042FBF004363CE007081BD00455EB2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000465EB100364A8F002B49AB00364A8F00000000000000
- 000000000000364A8F00364A8F001D3CA5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000768EE1006079
- CD003955B3002F458F003751A8005075F1005075F100273975003751A8005075
- F1005075F1003751A8003751A8005075F100273975003751A8003751A8006183
- F2006079CD00768EE10000000000000000000000000000000000455FB600A4B4
- E900708CE9006076C4005169BB00000000000000000000000000627CD500798F
- DC006A89F2005471D500627CD5000000000000000000000000004E67C5006076
- C400708CE9006E82CB00455FB600000000000000000000000000000000000000
- 000000000000D1DAF70044589E002048CD000431C7000E39CA00485CA000899D
- E300A9B9EF005772D1001740CB000431C7007189D70044589E00BDC9F3000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000394D9500394D95003350B300394D9500000000000000
- 0000000000003953AE00394D95001E3EAC000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000007790E100657E
- D3002844A200243D8E002C48A7003E67F0003E67F0001E3274002C48A7003E67
- F0003E67F0002C48A7002C48A7003E67F0001E3274002C48A7002C48A7005075
- F100657ED3007790E100000000000000000000000000000000004861B8008CA3
- EF004F74F100607EE0004A63BC00000000000000000000000000AEBDF200657A
- C400839EF500586FBF00AEBDF200000000000000000000000000BFCCF5008DA1
- E800839EF500587CF2004861B800000000000000000000000000000000000000
- 0000000000000000000000000000778DD7002C55DE000536D9004D6FE100576D
- BA005369B4000D3DDA000536D9002751DE00455DB00000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000003E53A1003E53A1004260C2003E53A100000000000000
- 0000000000004260C2003E53A1002143B8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000516AC2005E7A
- D8000D257600112D8A00123095001A45D6001A45D6000C216800123095001A45
- D6001A45D60012309500123095001A45D6000C2168001230950012309500335B
- E1005E7AD800516AC200000000000000000000000000000000004962B9008FA4
- EF005E7DE500516ABD0090A4EA00000000000000000000000000D2DBF8006076
- C20087A1F500576FBF00D2DBF800000000000000000000000000000000005970
- C0008CA1EC00849EF5004962B900000000000000000000000000000000000000
- 00000000000000000000000000005C71BD006886EA000E3FE200204EE5005A78
- DE00607BDA000538E2000A3CE3005E7EEA00758CDE0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000004157A7004157A7004A66C9004157A700000000000000
- 0000000000004A66C9004157A7002246BD000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004D66BA005E7A
- D80003185F0005207B00062489000833C3000832BD0004195F00062489000833
- C3000832BD0005218000062489000833C30004195F0005218000062489001A43
- CE005E7AD8004D66BA00000000000000000000000000000000004A63BA0092A8
- F0005971C4007790E2000000000000000000000000000000000000000000546C
- BF0091A7F2005068BD0000000000000000000000000000000000000000007790
- E200697EC90091A7F2004A63BA00000000000000000000000000000000000000
- 00000000000000000000000000005570CC00768DD9004068EF00073BEA003560
- EE003A63EE00073BEA003963EE00778EDD000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000445CAD00445CAD00516ED000445CAD00000000000000
- 000000000000516ED000445CAD002449C4000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004960B2005D7D
- EA0002175D000216580002165800042CB300042BAC0002175D0002175D00042C
- B300042BAC000216580002175D00042CB30002175D000216580002165800173E
- C2005D7DEA004960B200000000000000000000000000000000004C65BC007A8D
- D000000000000000000000000000000000000000000000000000000000004C65
- BC009AAEF1004C65BC0000000000000000000000000000000000000000000000
- 000000000000526CC9004C65BC0000000000000000005F7FE9006381E9006382
- E9006483E9006483E9006483E9006784EA006A87EA006484EE001A4AED001A4A
- ED001A4AED002654EE006484EE006986EA006583E9006483E9006483E9006483
- E9006382E9006381E9004A64BB00000000000000000000000000000000000000
- 000000000000000000004963B9004963B900607CDC004963B900000000000000
- 000000000000607CDC004963B9003458D2000000000000000000000000000000
- 000000000000000000000000000000000000000000003C4E9300405190000D26
- 7800031F7D00031F7D00031F7D00031F7D00031F7D00031F7D00031F7D00031F
- 7D00031F7D00031F7D00031F7D00031F7D00031F7D00031F7D00031F7D00031F
- 7D000D2678003C4E8C00879DE200000000000000000000000000536ECA004F6A
- C50000000000000000000000000000000000000000000000000000000000536E
- CA009DB0F200536ECA0000000000000000000000000000000000000000000000
- 00000000000000000000536ECA000000000000000000587CF2001949ED001D4D
- ED002050ED002150ED002150ED002352ED002352ED002352ED002352ED002352
- ED002352ED002352ED002352ED002352ED002251ED002150ED002150ED001F4F
- ED001D4DED001949ED004B65BC00000000000000000000000000000000000000
- 000000000000000000004C66BD004C66BD006782E0004C66BD00000000000000
- 0000000000006782E0004C66BD003C60D7000000000000000000000000000000
- 000000000000000000000000000000000000000000007A93E4003F64E0004569
- E0004A6DE0004C6EE0004D6FE1004D6FE1004D6FE1004D6FE1004D6FE1004D6F
- E1004D6FE1004D6FE1004D6FE1004D6FE1004D6FE1004D6FE1004C6EE000486B
- E0004569E0004266DD004C64B700000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000546ECB006177C5006177
- C5007893ED006177C5006177C5005C73C4000000000000000000000000000000
- 000000000000000000000000000000000000000000005B7EF2001F4FED002453
- EE002957EE002A57EE002B58EE002D5AEE002D5AEE002D5AEE002D5AEE002D5A
- EE002D5AEE002D5AEE002D5AEE002D5AEE002C59EE002B58EE002A57EE002755
- EE002453EE001F4FED004C66BD00000000000000000000000000000000000000
- 000000000000000000004D67BE004D67BE006E88E2004D67BE00000000000000
- 0000000000006E88E2004D67BE004365DA000000000000000000000000000000
- 000000000000000000000000000000000000000000007290F4006A8AF3006888
- F300708EF4007290F4007290F4007391F4007391F4007391F4005771CE00354A
- 940032458D007391F4007391F4007391F4007290F4007290F4007290F4006E8D
- F3006888F3006A8AF3005771C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000556FCC005069C0005069
- C000A9BAF3005069C0005069C0005069C0000000000000000000000000000000
- 000000000000000000000000000000000000000000004E68BF004E68BF004E68
- BF004E68BF004E68BF004E68BF004E68BF005870C300829AEB00426AF000426A
- F000426AF0004D72F100849CEE005870C3004E68BF004E68BF004E68BF004E68
- BF004E68BF004E68BF00546FCB00000000000000000000000000000000000000
- 000000000000000000004F69C0004F69C000879EE9004F69C000000000000000
- 000000000000879EE9004F69C0005171DE000000000000000000000000000000
- 000000000000000000000000000000000000000000005872CA005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9003C53A3005072
- E2000535D7005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C90093A8ED00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000516A
- C100B0C0F600516AC10000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005975D1007B90DA007592F4004D72F1007794
- F4007995F4004D72F1007592F4007D92DD000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000506AC100506AC1009AAEF0005D75C600000000000000
- 0000D3DBF9009AAEF000506AC1005977DF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000425AAF004F73
- EB000538E3000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000092A7EC00526B
- C200A0B3F400526BC20092A7EC00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000006278C800869EF2005F81F2006989F300A1B3
- EE00A3B3ED00567AF2005C7FF200859EF20092A5EC0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000516BC200516BC200A3B2E7008396D900000000000000
- 0000607BD700A3B2E700516BC200607DE1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004760B8005075
- F100053AEB000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000009FB1F000BDCAF6009FAE
- E3007287CF00A6B4E400CAD5F800798DD2000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000007A92E4008CA4F4006D8CF3006A8AF30099ABEA00556F
- CB00556FCB00859FF5006A8AF3006D8CF3007389D3007A92E400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000546DC400546DC400718AE0007388CF00C9D3F500C9D3
- F500B2C0EC00718AE000546DC4006E89E4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004C65BD005075
- F100053AEB000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000627DD8009AAAE1005973
- CF00D3DBF9005973CF00A4B2E300C0CBF1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000005971C80086A0F5007592F4007C97F4006B81CC009FB1
- F000AEBEF300A7B9F5007F9AF5007592F40092A7EE005D75C800D3DBF9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000556EC500556EC500000000009FB1F000556EC500556E
- C5005D78D50000000000556EC5007892E6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004E68BF005075
- F100053AEB000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000566FC7007085CF00D3DB
- F90000000000D3DBF9007488D100C7D1F6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000006983DD007E92DA007F9AF5007F9AF5009AAFF7005D78D5000000
- 0000000000008DA0DF009CB1F7007F9AF50094ABF6008195DC00627DD9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000566FC600566FC6000000000000000000000000000000
- 00000000000000000000566FC6008AA0EB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000516AC1005075
- F100053AEB000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000647EDA00B1BEE8005B76
- D200D3DBF9005B76D200AAB8E800A5B5ED000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000647EDA0090A3E4009DB2F70093AAF600AABCF7008497D900000000000000
- 0000000000007C93E5008497D900A9BBF7008BA4F60097ADF70093A6E8000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000647EDA008B9FE2005B76D200AFBFF300000000000000
- 0000000000005B76D2008C9EDF00A2B2E7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005971C7005075
- F1001345EC000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000009FB2F000D3DCF900B2BF
- E9007B8FD400AEBCE700CDD7F800798ED5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005B76D2008195D900AEBDF100A0B4F700A3B4ED005A74CF00000000000000
- 000000000000000000005A74CF00A1B1EC00ACBDF700A2B2EC00778CD5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000C1CDF600BFCBF200A2B1E600778BD3005872C9005872
- C9005872C900A0AFE300BCC9F2006F84D0000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005972CB006A86
- E4006A86E4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000758AD300BFCA
- EF00D7DFF900C1CBEF00758AD3006B85DE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000007C93E6005C75CC00A5B6EF006F84D0009FB2F000000000000000
- 000000000000000000009FB2F0006F84D0008296DA005872CA00879CE9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000677ECE00A0B0E400C8D3F600CAD4F500CAD4
- F500CAD4F500A6B5E8006F85D00093A8ED000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000093A8ED005872
- CA005872CA000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A62004656900000000000000000000000000000000000000000000000
- 00000000000000000000DADADA00C1C1C1002C3C720025315900253159002531
- 590025315900253159002531590025315900C1C1C100C8C8C800DADADA000000
- 0000000000000000000000000000000000000000000000000000798CD2001926
- 54001F2E65002233700024367500243675002436750024367500243675002436
- 7500243675002436750024367500243675002436750024367500243675000000
- 0000000000000000000000000000000000000000000000000000000000002E3E
- 79002A396C0090A1D600C8C8C800B6C3EC00667CC4003D559D0025356A002535
- 6A00243468003C5198006277BD00ABB9E500C3C3C30090A1D6002A396C002E3E
- 7900000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA00000000000000000000000000000000000000
- 00000000000000000000000000000000000027387100425CB10013339E001333
- 9E0013339E0013339E001F3DA300425CB1000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000001A2755002231
- 6A003655BD001C41BA00042CB300042CB300042CB300042CB300042CB300042C
- B300042CB300042CB300042CB300042CB300072FB400193EB9003656C200273A
- 7D00667DCD000000000000000000000000000000000000000000000000003B51
- 9F0003279F0022377D002F3F79003C56AA002F4CAF001F3FA9000F31A3000F31
- A3000F31A3001F3FA9002F4CAF003C56AA002F3F790022377D0003279F003B51
- 9F00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B200000000000000000000000000000000000000
- 000000000000000000000000000000000000293A7500435DB60003279E000327
- 9E0003279E0003279E001334A300435DB6000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000001B2957002333
- 6D003555BF00042DB700042DB700042DB700042DB700042DB700042DB700042D
- B700042DB700042DB700042DB700042DB700042DB700042DB7003556C500AAAF
- BE00293D80000000000000000000000000000000000000000000000000005871
- C1001C368C00374986003F57A9001639AD001034AB002344B1003553B7003553
- B7003553B7002344B1001034AB001639AD003F57A900374986001C368C005871
- C100000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B200000000000000000000000000000000000000
- 0000000000000000000000000000000000002C3D7B00435EBB000328A4000328
- A4000328A4000328A4001336AA00435EBB000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000001D2A5A002435
- 70003656C300042EBB00042EBB00042EBB00042EBB00042EBB00042EBB00042E
- BB00042EBB00042EBB00042EBB00042EBB00042EBB00042EBB003658C800B6BB
- C8002A3E84000000000000000000000000000000000000000000000000008297
- DE003C4E8D003C58B6002244B6002849B8005C73C1009EA8C800CCCCCC006C6C
- 6C00CCCCCC009EA8C8005D74C200294AB9002244B6003C58B6003C4E8D008297
- DE00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F800000000000000000000000000000000000000
- 000000000000000000000000000000000000314486004361C500042CB100042C
- B100042CB100042CB1001439B6004361C5000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000001F2D5F002839
- 77003658C9000430C3000430C3000430C3000430C3000430C3000430C3000430
- C3000430C3000430C3000430C3000430C3000430C3000430C3003559CF00BEC3
- D1002E438D000000000000000000000000000000000000000000D0D8F7003C4E
- 91002348C300163DBE004B66C100DFDEDE00F5F5F500F8F8F800F9F9F900FAFA
- FA00FAFAFA00FBFBFB00F8F8F800E2E2E2004D68C300163DBE002348C3003D50
- 9300D0D8F7000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000033478C004362C900042DB700042D
- B700042DB700042DB700143BBC004362C9000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000203063002A3B
- 7B00375ACD000633C8000633C8000633C7000633C7000633C7000633C7000633
- C7000633C7000633C7000633C7000633C7000633C8000633C800375BD300C3C8
- D600314691000000000000000000000000000000000000000000566FC400455C
- A900113AC3004765CB00B1B4BB00E2E2E200F5F5F500F6F6F600F7F7F700F8F7
- F700F8F8F800F9F9F900F9F9F900FAFAFA00B7BAC1004967CD00113AC300455C
- A900566FC4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F80000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000364A91004363CF00042FBE00042F
- BE00042FBE00042FBE00143CC3004363CF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000213164002B3D
- 7E003D5FD1000F3BCD00103CCE00123ECF00123ECF00123ECF00123ECF00123E
- CF00123ECF00123ECF00123ECF00123ECF00103CCE000F3BCE003D61D700C6CB
- DA003248940000000000000000000000000000000000D1DAF7003F539C004463
- CA003156CF00A2AAC700E1E1E100EEEDED00D6D6D600F3F3F300F4F4F400F5F5
- F500F6F5F500F7F6F600F7F7F700F8F7F700E9E9E900A8B1CE003055D0004463
- CA003F539C00D1DAF70000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F80000000000000000000000000000000000000000003B519C003B519C003B51
- 9C003B519C003B519C003B519C003B519C003B519C004366D8000432CB000432
- CB000432CB000432CB00143FCE004366D8003B519C003B519C003B519C003B51
- 9C003B519C003B519C003B519C004B63BA00000000000000000025356A002E41
- 8400496BDA00214BD900244ED9002750D9002750D9002750D9006985E5006985
- E5006985E5002750D9002750D9002750D900244ED900204AD800486BDF00CFD4
- E400364D9C0000000000000000000000000000000000556EC7004B68C700385E
- DD009CA5C800E5E4E400E9E8E800EAEAEA00EBEAEA00E1E0E000EEEDED00EBEB
- EB00EFEFEF00F1F0F000F1F1F100F2F1F100F3F3F300F1F0F000A5AED100385E
- DD004B67C700556EC70000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000004F6ED500516FD5005270
- D6005270D6005270D6005270D6005270D6005370D600496CDE000E3CD4000E3C
- D4000E3CD4000E3CD400113ED4004A6DDF005270D6005270D6005270D6005270
- D6005270D6005270D600506ED4003E55A300000000000000000027366E003044
- 88004E6FDE002A53DE002E57DF00325ADF00325ADF005878E500112B8400112B
- 8400112B8400325ADF00325ADF00325ADF002E57DF002A53DE004F72E400D3D8
- E8003951A000000000000000000000000000000000004960B3004C6DDB003A61
- E300C8C9D000E7E6E600E6E6E600E6E5E500E7E6E600E8E7E700BEBEBE00D2D2
- D200D5D4D400EDECEC00EEEDED00EEEEEE00F0EFEF00F1F0F000CFD1D8003960
- E2005473D9004660B7000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 00000000000000000000000000000000000000000000476BE300244FDD002852
- DE002953DE002953DE002953DE002953DE002A53DE00224DDD001C48DC001C48
- DC001C48DC001C48DC001C48DC00224DDD002953DE002953DE002953DE002953
- DE002953DE002852DE00496DE3004058AA000000000000000000283870003246
- 8C005475E200335BE300385FE3003C62E3003C62E3005268B000607FE8007792
- EC007792EC00607FE8003C62E3003C62E300385FE300325BE3005476E700D6DB
- EC003B52A50000000000000000000000000000000000455EB2005474E0004369
- E900E0E0E000EFEEEE00EDECEC00EAE9E900E9E8E800E7E6E6007B7979006A68
- 68007F7D7D00E9E8E800EAE9E900EBEAEA00ECECEC00EDECEC00DEDDDD004268
- E8005878E100455EB2000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000005175ED00325CEA003760
- EA003760EA003760EA003760EA003760EA003760EA003760EA003760EA003760
- EA003760EA003760EA003760EA003760EA003760EA003760EA003760EA003760
- EA003760EA003760EA00577AEE00465FB50000000000000000002B3B7500354A
- 9400607FE800446AEA004A6FEB004F73EB004F73EB0042548F0042548F004F73
- EB0042548F0042548F004F73EB004F73EB004A6FEB004369EA006081EE00DFE4
- F5003F58AD00000000000000000000000000000000004A64BB006E8BEE005A7D
- F200E9E9E900F9F8F800F8F8F800F6F6F600F5F5F500F4F4F4009F9E9C009290
- 8E009F9D9B00EDECEC00EBEBEB00EAE9E900E7E6E600E6E5E500D7D6D600587C
- F2007490EE004A64BB00000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 000000000000000000000000000000000000000000005579F1003E67EF00446B
- EF00446BEF00446BEF00446BEF00446BEF00446BEF00446BEF00446BEF00446B
- EF00446BEF00446BEF00446BEF00446BEF00446BEF00446BEF00446BEF00446B
- EF00446BEF00446BEF005C7FF2004963BA0000000000000000002D3E7800384D
- 97006685EC004C71EF005377EF00597CF000597CF00044569100364B90008BA3
- F400364B900044569100597CF000597CF0005377EF004B70EF006686F100E3E9
- FA00415BB10000000000000000000000000000000000526CC100819BEF006384
- F300DBDDE200FCFCFC00FBFBFB00FAFAFA00F9F9F900F9F8F800E0DFDF005856
- 5500DEDDDD00F3F3F300F2F1F100F1F0F000EEEDED00EDECEC00CCCDD2006183
- F20089A1F100526CC100000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000597CF2004B71F1005277
- F1005277F1005277F1005277F1005277F1005277F1005277F1005277F1005277
- F1005277F1005277F1005277F1005277F1005277F1005277F1005277F1005277
- F1005277F1005277F1006183F2004A64BB0000000000000000002E407A003A50
- 9A006B89EE005277F1005B7EF2006384F3006384F300394D91003B57B400223C
- 90003B57B400394D91006384F3006384F3005B7EF2005277F1006C8BF300E6EC
- FD00445DB400000000000000000000000000000000005F79D2008DA1E6006D8C
- F300BEC5DE00FAFAFA00FDFDFD00FDFCFC00FCFCFC00FCFBFB00FBFAFA007674
- 7300F9F9F900F8F7F700F7F7F700F6F6F600F4F4F400F0EFEF00B7BDD6006B8A
- F30092A5E7005F79D200000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A500DCDBDB0088878700000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000587CF2005479F1006183
- F2006888F3006888F3006888F3006A8AF3006E8DF3006D8CF3006D8CF3006D8C
- F3006D8CF3006D8CF3006D8CF3006E8DF3006A8AF3006989F3006888F3006888
- F3006686F3006183F2006082F2004C66BD00000000000000000030417B003C51
- 9C007792EF006283F2006C8BF3007592F4007592F4007592F400294190002941
- 9000294190007592F4007592F4007592F4006B8AF3006183F2007693F400E6EC
- FD00465FB70000000000000000000000000000000000919FD0005C74C500A6B8
- F3009FB3F700C5CADA00EFEFEF00FFFFFF00FFFFFF00FFFEFE00FEFEFE008785
- 8400FEFEFE00FDFDFD00FDFDFD00FCFCFC00ECECEC00C4C9D9009DB2F600A3B5
- F3005D75C5008A97C600000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00EBEBEB0085848300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005A7BE9006987EA006E8A
- EA00728EEA00738EEB00738EEB00748EEB007994EB00849EF5007B97F4007B97
- F4007B97F4007B97F4007C97F4008CA5F600748EEB00738EEB00738EEB00728E
- EA00718DEA006E8AEA005E7EE9004D67BE00000000000000000031427C003D53
- 9C007C96F0006A8AF3007491F4007E99F5007E99F5007E99F5007E99F5007E99
- F5007E99F5007E99F5007E99F5007E99F5007491F4006888F3007C97F400E6EC
- FD004761B800000000000000000000000000000000007F7E7D008390C10092A3
- DD0091A8F600B2C1F300C2C3C700FFFFFF00FFFFFF00FFFFFF00FFFFFF009D9B
- 9A00FFFFFF00FEFEFE00FEFEFE00EBEBEB00C0C1C500B1C1F3008DA5F50091A2
- DD00818FBE008785840000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A989700E7E7E6008C8A8800000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004E68BF004E68BF004E68
- BF004E68BF004E68BF004E68BF004E68BF004E68BF007391F40087A1F50087A1
- F50087A1F50087A1F5008BA4F600829DF5004E68BF004E68BF004E68BF004E68
- BF004E68BF004E68BF004E68BF00546FCB00000000000000000032437D003E53
- 9E007F99F000708EF4007B97F400849EF500849EF500849EF500849EF500849E
- F500849EF500849EF500849EF500849EF5007A96F4006F8DF300819BF500E6EC
- FD004862B90000000000000000000000000000000000B2B0AF009A9CA6005E76
- C70096ACF700A3B6F800B8C4EC00E5E5E500FBFBFB00FFFFFF00FFFFFF00D7D6
- D600FFFFFF00FFFFFF00FBFBFB00E5E5E500B7C3EC00A0B4F70092A9F6005E76
- C7009498A100B5B4B30000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA004863C0004D68
- C1004D68C2004D68C2004D68C2004D68C2004D68C2004C66C1004964C1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000506AC1007290F400A2B6F800A3B6
- F800A3B6F800A3B6F8009FB3F700859FF5000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000034447F004056
- A00088A0F1007B97F40086A0F50091A8F60094ABF60095ACF70095ACF70095AC
- F70095ACF70095ACF70094ABF60091A8F600849EF5007A96F40089A2F600E6EC
- FD004A64BB0000000000000000000000000000000000BDBCBB00A3A1A0007978
- 77007B90D300BAC8F600A9BBF800C9D5FB00D1D8F200D0D3DE00CECECE006D6D
- 6D00CECECE00D0D3DE00D1D8F200C8D4FB00A5B8F800B8C6F6007B90D3007372
- 71009B999800B5B4B300000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE00607EE4005D7C
- E2005E7DE3005E7DE3005E7DE3005E7DE3005E7DE3005D7CE2006B87E5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000516BC2007693F400B0C0F900B1C1
- F900B1C1F900B1C1F900ABBDF8008AA3F6000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000034457F004156
- A1008DA4F2007F9AF50088A2F60094ABF60097ADF70098AEF7009AAFF7009AAF
- F70099AFF70098AEF70097ADF70094ABF60087A1F5007E99F5008DA5F600E6EC
- FD004C65BC0000000000000000000000000000000000B4B3B200908E8D007D7B
- 7A006C7BAA00758AD200B8C6F200B8C7F900C1CEFA00CED8FB00D5DEFC00D5DE
- FC00D5DEFC00CDD8FB00BFCDFA00B6C6F900B6C4F200748AD200707DAE007371
- 700089888700B1B0AF000000000000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF00728DEA0094A9
- ED0096AAEC0096AAEC0096AAEC0096AAEC0096AAEC0093A8ED007B95EB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000526CC3007A96F400BDCBFA00BDCB
- FA00BDCBFA00BDCBFA00B5C5F9008FA7F6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000354681004157
- A2008FA6F100819BF50089A2F60093AAF60096ACF70097ADF70098AEF70098AE
- F70098AEF70097ADF70095ACF70093AAF60087A1F5007F9AF5008FA7F600E6EC
- FD004D66BD0000000000000000000000000000000000A9A8A600898887006E6C
- 6B008C8B8B00919BBC00637BCB00C6D1F700C0CEFA00BECCFA00BAC9FA00BAC9
- FA00B7C7F900BCCAFA00BECCFA00C4D0F700627ACB0097A1C200989796006F6E
- 6D00817F7E00ADABAA00000000000000000000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB00ADACAC0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000536DC5007C97F400CBD6FB00CDD8
- FB00CDD8FB00CDD8FB00C0CEFA0093AAF6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000364882004156
- 9D006984E30097ADF7009AAFF7009DB2F7009EB3F7009FB3F7009FB3F7009FB3
- F7009FB3F7009EB3F7009EB3F7009DB2F70099AFF7009CB0F3007B8FD500E6EC
- FD004F69C00000000000000000000000000000000000B3B3B300A19F9D00CBCA
- CA00F2F1F100DEDEDE00B9B9B9007D808B008891B2006B81D3005771C8005771
- C8005771C8006681D8008A93B4007D808B00A8A8A800D1D1D100F2F2F200D6D5
- D500A9A8A6009F9F9F000000000000000000000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000546EC5007995F400C7D3FB00CCD7
- FB00CDD8FB00CAD5FB00B7C7F9008EA6F6000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004459A7003D4F
- 91005366A900506AC100506AC100506AC100506AC100506AC100506AC100506A
- C100506AC100506AC100506AC100506AC100506AC100506AC1006E82CB00E6EC
- FD005069C0000000000000000000000000000000000000000000B4B4B400AAA9
- A700E4E4E400D2D1D100BAB9B900A09F9D00A0A09F0000000000000000009896
- 94000000000000000000B4B4B400A09E9D00B1B0B000C9C9C900E1E0E000B1AF
- AE00A0A09F000000000000000000000000000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000556FC6006F8DF300B2C2F900BECC
- FA00C0CEFA00B6C6F900A2B6F800829CF5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000B9C6F2003B4F
- 950097A0C200C9D0E900E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6EC
- FD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00CCD3
- F000506AC3000000000000000000000000000000000000000000000000000000
- 00009F9D9B00A9A7A500A1A09E00C8C8C800000000000000000092918F009896
- 940092918F000000000000000000D5D5D5009F9D9B00A9A7A5009F9D9B00C8C8
- C800000000000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005A76D2005771C8005771C8005771
- C8005771C8005771C8005771C8005771C8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000D3D3D300C0C0
- C0004153940034458000344580009FADDD00C0C0C000C0C0C000C0C0C000C0C0
- C000C0C0C000C0C0C000CBCBCB00CECECE00CECECE00DADADA00DEDEDE00DEDE
- DE00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000B8C5
- F1002338820014309000143090002F407C00A8B8E80000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BECCF4003D56AA003A57
- BC008CA2EB008695CC008695CC002650DD003A57BC003D56AA00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000DCDCDC00C4C4C400C1C1
- C1003E5194003E5194003E5194003E5194003E5194003E5194003E5194003D50
- 92003B4D8B003647800034447C00324177002C3B6C002A38670029366200B1BC
- E500C4C4C400DDDDDD0000000000000000000000000000000000000000000000
- 0000D4D4D400C5C5C50030428100273567002735670027356700273567002735
- 670027356700273567002735670027356700273567002F428100D1D1D1000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000435BB5004967CD003761
- EE008A9AD4004964C1004964C10095ABF5003761EE004967CD00BECCF5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000637A
- CC0091A4E50095A9EC0095A9ED0091A6ED008EA4ED008BA2ED00849CEB008199
- E9007E96E400788FDB00758CD7007187D1006A7FC500687CC0006F7FB700455A
- A300000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002D4188008895C1008895C1008895C1008895C1008895
- C1008895C1008895C1008895C1008795C1006474A9002D438D00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000536DC9004068F00097AC
- F5004A65C20000000000000000008E9DD6009EB2F600476EF000455DB700BECC
- F500000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000405A
- B4008CA5F60089A2F60089A2F6007C97F4007391F4006989F300567AF2004C71
- ED004469E6003157D600274DCD001D43C3000A2FAE000328A3003652AF002636
- 6A00000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BAC6F200283C8200283C8200283C8200283C8200283C
- 8200283C8200283C8200283C8200283C82002E479500BAC6F200000000000000
- 0000000000000000000000000000000000000000000028387100283871002838
- 7100283871002838710028387100283871002838710028387100283871002838
- 7100293C7A000000000000000000000000000000000000000000000000000000
- 0000000000004B62B100283871000000000000000000A5B6EF006283F200697F
- CC00000000000000000000000000000000004C67C30095A4D9006888F3006E86
- D8004861BA000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000435D
- B500A3B6F800ACBDF800A2B6F8008DA5F600829DF5007894F4006283F2005679
- EE004B6FE700365BD7002C51CE002146C4000B30AE000328A30003269B002838
- 6D00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000002B408A00283C7E00283C7E00283C
- 7E00283C7E00283C7E00283C7E002B408A000000000000000000000000000000
- 000000000000000000000000000000000000000000004862B8004E67BA005069
- BB004D66BA004C66BA004A64B8004660B700435EB600435DB6007D8FCC00929D
- C00033447F000000000000000000000000000000000000000000000000000000
- 0000A3B4EB0035447D003446820000000000000000009AAADC00A6B9F8007591
- F1004D67C4000000000000000000000000009BAFEC004159B200B2C2F8007391
- F4006F85D0000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000455F
- B700A8BAF800ADBEF800A2B6F8008DA5F600829DF5007894F4006283F2000000
- 0000829BEF00365BD7002C51CE002146C4000B30AE000328A30003269B002A39
- 6D00000000000000000000000000000000003A53A7002D438E002D438E002D43
- 8E002D438E002D438E002D438E002D438E002D438E002D438E002D438E002D43
- 8E002D438E002D438E002D438E002D438E002D438E002D438E002D438E002D43
- 8E002D438E002D438E002D438E003A53A700000000004F69BF002948B1002F4D
- B3002B4AB2002646B0002142AF001739AB001033A9001538AA00929EC4003749
- 8600ACBBEB000000000000000000000000000000000000000000000000000000
- 000033488F0051629F00445CA90000000000000000004F67BD00B9C4EA00B1C1
- F9006F85CF004E69C50000000000465EB6006177C1005266B10095A3D300839E
- F50099ACEC000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004761
- B800A9BBF800ADBEF800A2B6F8008DA5F600829DF5007894F4006283F2000000
- 0000829BEF00365BD7002C51CE002146C4000B30AE000328A30003269B002A3A
- 6F00000000000000000000000000000000002F44910094A7E90099ABEA009BAD
- EA009BADEA009CAEEA009CAEEA009CAEEA009CAEEA009CAEEA009CAEEA009CAE
- EA009CAEEA009CAEEA009CAEEA009CAEEA009CAEEA009CAEEA009CAEEA009BAD
- EA009AACEA0099ABEA008CA1E7002F449100000000005C76CC004C68C7005570
- CA004B67C7004562C500405EC4003454C000546FCA006E80BC00B1BFED000000
- 0000000000000000000000000000000000000000000000000000000000004455
- 92004964BF006980CC00B4C3EF00000000000000000000000000BFCCF5005169
- BF00C5D1FA00A5B7F6007D91D3007A8DCB00A5B8F7006485F3005872C5004357
- 9F008796CD000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004B65
- BC00A9BBF800ADBEF800A2B6F8008DA5F600829DF5007894F40013192E000000
- 0000171C2C00365BD7002C51CE002146C4000B30AE000328A30003269B002D3D
- 71000000000000000000000000000000000032499900617EE100708AE400718B
- E400718BE400718BE400718BE400718BE400718BE400718BE400718BE400718B
- E400718BE400718BE400718BE400718BE400718BE400718BE400718BE400718B
- E400718BE400708AE4009CAEEC003249990000000000607AD1005873CF00627C
- D2005873D000526ECD004D6ACC004261C9004F6CCC00586FBA00000000000000
- 0000000000000000000000000000000000000000000000000000556EC3004D67
- BC003F5FC8008596D0000000000000000000000000000000000000000000BFCC
- F500C4CCEC00C8D4FB00A9BBF700425DB90097A7DD00A4B7F8005E80F1005A73
- C7003B519C000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004D67
- BE00A8BAF800ADBEF800A2B6F8008DA5F600829DF5007894F4001F1F1F000C0C
- 0C001F1F1F00365BD7002C51CE002146C4000B30AE000328A30003269B002F3E
- 720000000000000000000000000000000000334B9D005D7BE1006683E3006683
- E3006683E3006683E3006683E3006683E3006683E3006683E3006683E3006683
- E3006683E3006683E3006683E3006683E3006683E3006683E3006683E3006683
- E3006683E3006683E3009BAEED00334B9D00000000006580D700637ED6006F88
- DA00647FD700607BD6005A76D4004E6CD1004766CF005C77D2005871C5000000
- 000000000000000000000000000000000000CCD6F700455EB10044599E003255
- CA00385ACB008392C20000000000000000000000000000000000000000000000
- 0000536BC100C4CCEC00C8D4FB008E9ED8004F67BA0098A7DE006485F3005E80
- F1005B74C800BCC8F30000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004F69
- C000A5B8F800ACBDF800A2B6F8008DA5F600829DF5007894F4003C4257003333
- 330041465600365BD7002C51CE002146C4000B30AE000328A30003269B002F3F
- 740000000000000000000000000000000000354DA1005474E1005B7AE1005B7A
- E1005B7AE1005B7AE1005B7AE1005B7AE1005B7AE1005B7AE1005B7AE1005B7A
- E1005B7AE1005B7AE1005B7AE1005B7AE1005B7AE1005B7AE1005B7AE1005B7A
- E1005B7AE1005B7AE10099ACEE00354DA100000000006C86E0007891E300889E
- E6007E96E4007992E300748EE2006984E0006480DE005977DC006580D8005269
- B900485EA600445BAA004359A600455BA5005570CC004F6FDA003459D5002F55
- D40095A5D9004960AE0000000000000000000000000000000000000000000000
- 000000000000BFCCF500556DC300D5DCF600D5DCF6008E9DD6009AA9E000A4B7
- F8006485F3005D76CA0040549E002D44910019379D002D438F00374B90000000
- 000000000000000000000000000000000000000000000000000000000000536D
- C60090A8F6009AAFF7009DB2F7008FA7F60086A0F5007E99F5006C8BF3006383
- F000597AE9004769DA003E60D2003457C9002244B6001C3DAC003652AF003141
- 7600000000000000000000000000000000003952A9004065E000466AE100466A
- E100466AE100466AE100466AE100466AE100466AE100466AE100466AE100466A
- E100466AE100466AE100466AE100466AE100466AE100466AE100466AE100466A
- E100466AE100466AE10093A8EE003952A900000000006E89E5007E96E70094A8
- EB008BA1EA00869DE8008199E8007690E600718BE5006B86E3006683E3006B86
- E300607EE2005270D3005A76D5005A78DE004A6CDE003158D900264FD8006D88
- E2008090C500879CE10000000000000000000000000000000000000000000000
- 00000000000000000000D2DBF8005873CE005873CE00657FD9004E68C1009AAA
- E200A4B7F8005E80F1005E77CB003E55A3006A84D8000D37C2002846AA00BDC9
- F40000000000000000000000000000000000000000000000000000000000718A
- E1008CA3EE0093A8F00096ABF00093A8F00091A7F1008FA5F00089A1EF00879F
- ED00849BE8007E94DF007B91DA00788DD4007286C9007083C5007283BE004F66
- B400000000000000000000000000000000003B55AC00385FE0003C62E1003C62
- E1003C62E1003C62E1003C62E1003C62E1003C62E1003C62E1003C62E1003C62
- E1003C62E1003C62E1003C62E1003C62E1003C62E1003C62E1003C62E1003C62
- E1003C62E1003C62E10091A7EF003B55AC00000000006D89E7007C96EA0097AB
- EE009DB0F00093A8EE008DA3ED00839BEC007D97EB007792E9006D89E8006381
- E7006482E700607FE6005E7DE6005072E3004065E1003D62E100335ADF00A8B6
- E400566BB8000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCDF600506A
- C3009BABE2006485F3005E80F1005F78CC008C9CD100839BE9001543DA00475F
- B300BFCCF5000000000000000000000000000000000000000000000000000000
- 00005771C800888C9C0094939200888C9C005771C8005771C8005771C800556E
- C400516ABD004B62AE00485EA7006D717D006C6B6B005E616D003A4A83000000
- 0000000000000000000000000000000000003C56AE002E56DE003259DE003259
- DE003259DE003259DE003259DE003259DE003259DE003259DE003259DE003259
- DE003259DE003259DE003259DE003259DE003259DE003259DE003259DE003259
- DE003259DE003259DE008EA4EE003C56AE00000000005F80EE00A0B3F500ACB9
- E700B9C6F100A5B7F500A0B3F5009DB1F40097ACF40092A9F400869FF200819B
- F1007D97F100728FF0006C8AF0006786EF005B7DED005074EC007F99F0005C76
- CC00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000006F89
- DF00516DCC009EADE400A4B7F8006485F3006C80C5004E67BF0093A3DD003761
- EF005270D600516AC30000000000000000000000000000000000000000000000
- 00000000000080808000C6C6C600808080000000000000000000000000000000
- 0000000000000000000000000000808080004646460080808000000000000000
- 0000000000000000000000000000000000003D57AF001C47D8001E49D8001E49
- D8001E49D8001E49D8001E49D8001E49D8001E49D8001E49D8001E49D8001E49
- D8001E49D8001E49D8001E49D8001E49D8001E49D8001E49D8001E49D8001E49
- D8001E49D8001E49D80089A0EB003D57AF0000000000859FF400A6B6E8005E76
- C700768BD200BDCAF600A4B7F700A8BAF700A4B7F7009FB3F60094ABF6008EA6
- F50088A1F500809BF5007A96F4007592F4006384F300839DF400B3C1ED00D3DB
- F900000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005B75
- D2006B87E6005A72C800A0AFE500AEBFF8007F93D7009FB1EF005671CD009FB3
- F600496FF0005E7AD900BFCDF600000000000000000000000000000000000000
- 00000000000080808000CBCBCB00808080000000000000000000000000000000
- 0000000000000000000000000000808080004C4C4C0080808000000000000000
- 0000000000000000000000000000000000003E58B0001340D5001441D5001441
- D5001441D5001441D5001441D5001441D5001441D5001441D5001441D5001441
- D5001441D5001441D5001441D5001441D5001441D5001441D5001441D5001441
- D5001441D5001441D500869DE9003E58B00000000000A3B3E8006078C800B4C1
- F2005974CF007D91D600BBC9F800A2B6F800AEBFF800ACBDF800A1B5F7009CB1
- F70097ADF7008BA4F600859FF5007E99F50097ADF700B6C2EE006A80CD000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005B76
- D3009AACED006C85D8005770C7008598D9005872CA0000000000000000009AA8
- DF00A8BAF700597CF200526BC400000000000000000000000000000000000000
- 00000000000080808000D0D0D0007F7F7F000000000000000000000000000000
- 0000000000000000000000000000888888005050500080808000000000000000
- 0000000000000000000000000000000000003F59B1000B39D3000B39D2000B39
- D2000B39D2000B39D2000B39D2000B39D2000B39D2000B39D2000B39D2000B39
- D2000B39D2000B39D2000B39D2000B39D2000B39D2000B39D2000B39D2000B39
- D2000B39D2000B39D200839AE8003F59B1000000000000000000000000000000
- 00000000000000000000647EDA0096A8E300C1CEF800C3D0FA00B1C1F900A9BB
- F800A5B8F800ABBDF800BAC9F900C1CCF400627BCE00BBC9F500000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005972C800A9BBF8007995F2007389D6000000000000000000000000000000
- 00005872CF009AAAE3008FA4EB005C77D4000000000000000000000000000000
- 00000000000080808000D4D4D40082828200C6C6C60000000000000000000000
- 00000000000000000000C6C6C600969696006060600086868600000000000000
- 000000000000000000000000000000000000415BB2000433CE000433CE000433
- CE000433CE000433CE000433CE000433CE000433CE000433CE000433CE000433
- CE000433CE000433CE000433CE000433CE000433CE000433CE000433CE000433
- CE000433CE000433CE008299E600415BB2000000000000000000000000000000
- 00000000000000000000000000005874CF00657DCD008497DB00B9C7F300C1CD
- F600C0CDF600A7B6E700889AD900667FCC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000C1CDF600BDC8EE00B4C4F90089A2F4005973CF0000000000000000000000
- 00005973CF00899DDE00B1C0F1005D78D5000000000000000000000000000000
- 00000000000090909000C0C0C0008B8B8B008A8A8A0000000000000000000000
- 000000000000000000008A8A8A00B1B1B1006A6A6A0096969600000000000000
- 000000000000000000000000000000000000415BB3000432CB000432CB000432
- CB000432CB000432CB000432CB000432CB000432CB000432CB000432CB000432
- CB000432CB000432CB000432CB000432CB000432CB000432CB000432CB000432
- CB000432CB000432CB008198E400415BB3000000000000000000000000000000
- 0000000000000000000000000000000000009FB1F0006B85DE005771C8005771
- C8005771C800647EDA0093A8ED00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005D74CA00C4CDEF00BECCFA008297DB005974CF00000000005974
- CF008297DB009CB0F5009DACE100718AE2000000000000000000000000000000
- 000000000000B0B0B000A4A4A400ADADAD008A8A8A0086868600000000000000
- 000000000000868686008F8F8F00A4A4A40076767600BBBBBB00000000000000
- 000000000000000000000000000000000000425CB4000432C9000432C9000432
- C9000432C9000432C9000432C9000432C9000432C9000432C9000432C9000432
- C9000432C9000432C9000432C9000432C9000432C9000432C9000432C9000432
- C9000432C9000432C9008198E300425CB4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000C1CDF6005F76CC00C8D4FB00A9BBF7009BACE400A9BB
- F700C8D4FB00C7D0F000C1CDF600000000000000000000000000000000000000
- 00000000000000000000D3D3D300D6D6D600DFDFDF00CECECE00ADADAD009C9C
- 9C0097979700BBBBBB00C0C0C000B4B4B400D3D3D30000000000000000000000
- 000000000000000000000000000000000000445EB5000430C4000430C4000430
- C4000430C4000430C4000430C4000430C4000430C4000430C4000430C4000430
- C4000430C4000430C4000430C4000430C4000430C4000430C4000430C4000430
- C4000430C4000430C4008197E200445EB5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000C1CDF600C7D0F000CED8FB00B7C7F900CED8
- FB00C7D0F0005F76CD0000000000000000000000000000000000000000000000
- 000000000000000000000000000080808000B3B3B300E1E1E100F3F3F300EEEE
- EE00E8E8E800CBCBCB00A6A6A600808080000000000000000000000000000000
- 000000000000000000000000000000000000445EB500889BDB00889BDB00889B
- DB00889BDB00889BDB00889BDB00889BDB00889BDB00889BDB00889BDB00889B
- DB00889BDB00889BDB00889BDB00889BDB00889BDB00889BDB00889BDB00889B
- DB00889BDB00889BDB00889BDB00445EB5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005D75CC00A1B0E200CED7F400A1B0
- E2005D75CC00C1CDF60000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000B0B0B0008A8A8A00808080008080
- 8000808080008A8A8A00B0B0B000000000000000000000000000000000000000
- 0000000000000000000000000000000000004C67C400445EB500445EB500445E
- B500445EB500445EB500445EB500445EB500445EB500445EB500445EB500445E
- B500445EB500445EB500445EB500445EB500445EB500445EB500445EB500445E
- B500445EB500445EB500445EB5004C67C4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DEDE
- DE00D3D3D300CECECE00CECECE00C0C0C00097A7D7005769A700293462002530
- 5800253058002934620032427B005769A700C0C0C000C7C7C700CECECE00D6D6
- D600DEDEDE00DEDEDE0000000000000000000000000000000000000000000000
- 0000C7C7C70045599A0026336000B2BDE500C7C7C700D2D2D200000000000000
- 0000000000000000000000000000DADADA00C2C2C200475C9D002633620096A6
- DB0000000000000000000000000000000000000000000000000000000000DEDE
- DE00D3D3D300CECECE00CECECE00C0C0C00097A7D7005769A700293462002530
- 5800253058002934620032427B005769A700C0C0C000C7C7C700CECECE00D6D6
- D600DEDEDE00DEDEDE000000000000000000000000000000000000000000DEDE
- DE00D3D3D300CECECE00CECECE00C0C0C00097A7D7005769A700293462002530
- 5800253058002934620032427B005769A700C0C0C000C7C7C700CECECE00D6D6
- D600DEDEDE00DEDEDE0000000000000000000000000000000000000000000000
- 000000000000000000004259A70046589700455EAF002F4BAB001333A0000326
- 9900032699001333A0001E3DA4002F4BAB004658970035447A004259A7000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000029387000364FA0008697D0002C3E8000758AD60000000000000000000000
- 0000000000000000000000000000000000002E4286004359A5008596D0002739
- 78007185D0000000000000000000000000000000000000000000000000000000
- 000000000000000000004259A70046589700455EAF002F4BAB001333A0000326
- 9900032699001333A0001E3DA4002F4BAB004658970035447A004259A7000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000004259A70046589700455EAF002F4BAB001333A0000326
- 9900032699001333A0001E3DA4002F4BAB004658970035447A004259A7000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B9C6F1002E42880042538E002B49AE000B2EA10003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F002B49AE004760B10042538E00B9C6
- F100000000000000000000000000000000000000000000000000000000000000
- 0000263A7E007082BE00505F92003A53A60033478E0000000000000000000000
- 000000000000000000000000000000000000294091007789C700505F94002942
- 96003B529E000000000000000000000000000000000000000000000000000000
- 0000B9C6F1002E42880042538E002B49AE000B2EA10003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F002B49AE004760B10042538E00B9C6
- F100000000000000000000000000000000000000000000000000000000000000
- 0000B9C6F1002E42880042538E002B49AE000B2EA10003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F002B49AE004760B10042538E00B9C6
- F100000000000000000000000000000000000000000000000000000000000000
- 00002F4284004D5F9E00415CB7000328A3000328A3000328A3000328A3000328
- A3000328A3000328A3000328A3000328A3000328A3001336A900415CB7002F42
- 8400B9C6F1000000000000000000000000000000000000000000000000000000
- 0000243E92006676A8005169BB007488CD002E459600576EC300000000000000
- 0000000000000000000000000000A4B3EB00526CBF005F6EA4005B72BF003A54
- A9002F407C000000000000000000000000000000000000000000000000000000
- 00002F4284004D5F9E00415CB7000328A3000328A3000328A3000328A3000328
- A3000328A3000328A3000328A3000328A3000328A3001336A900415CB7002F42
- 8400B9C6F1000000000000000000000000000000000000000000000000000000
- 00002F4284004D5F9E00415CB7000328A3000328A3000328A3000328A3000328
- A3000328A3000328A3000328A3000328A3000328A3001336A900415CB7002F42
- 8400B9C6F100000000000000000000000000000000000000000000000000475F
- B100415DBD00082EAE00042BAC00042BAC00042BAC00042BAC00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00042BAC00042BAC00042BAC00042BAC00042BAC00415D
- BD0046589A00475FB10000000000000000000000000000000000000000000000
- 00005C6FB200354A9100A3B3EB004258A100657ECF002F4CB000000000000000
- 00000000000000000000708ADA003953A6005668A70098AAE90000000000586D
- B800374C9100000000000000000000000000000000000000000000000000475F
- B100415DBD00082EAE00042BAC00042BAC00042BAC00042BAC001338B100CFD6
- EE00FFFFFF001338B100042BAC00042BAC00042BAC00042BAC00042BAC00415D
- BD0046589A00475FB1000000000000000000000000000000000000000000475F
- B100415DBD00082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00415D
- BD0046589A00475FB10000000000000000000000000000000000A8B7ED003E50
- 8E001439B600042CB100042CB100042CB100042CB100042CB100FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00042CB100042CB100042CB100042CB100042CB1001439
- B6004964BF003E508E0000000000000000000000000000000000000000000000
- 00006373AC00435BA8005A72C600647ED1004A63B7001F48D1007D93DE000000
- 000000000000D1DAF800455BAC00294EC700445CAD000000000098AAE9007485
- C100485FB2000000000000000000000000000000000000000000A8B7ED003E50
- 8E001439B600042CB100042CB100042CB100042CB100042CB100CFD6EF00FFFF
- FF00FFFFFF00CFD6EF001439B600042CB100042CB100042CB100042CB1001439
- B6004964BF003E508E0000000000000000000000000000000000A8B7ED003E50
- 8E001439B600042CB100042CB100042CB100042CB100042CB1001439B600CFD6
- EF00042CB100042CB100042CB100042CB100042CB100042CB100042CB1001439
- B6004964BF003E508E0000000000000000000000000000000000455BAE004C62
- AD00042DB600042DB600042DB600042DB600042DB600042DB600FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00042DB600042DB600042DB600042DB600042DB600042D
- B6002B4EC2004C62AD0000000000000000000000000000000000000000000000
- 00004B5EA0007A8DCC004157A1004760B3003D5BBD003158DC004A62B800D2DB
- F800000000005671CB00425EBF003058DE00465CA9006680D400435DB3006778
- B3008699DF000000000000000000000000000000000000000000455BAE004C62
- AD00042DB600042DB600042DB600042DB600042DB600143ABA00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00D0D7F100143ABA00042DB600042DB600042DB600042D
- B6002B4EC2004C62AD0000000000000000000000000000000000455BAE004C62
- AD00042DB600042DB600042DB600042DB600042DB600042DB600D0D7F100FFFF
- FF00042DB600042DB600042DB600042DB600042DB600042DB600042DB600042D
- B6002B4EC2004C62AD00000000000000000000000000788DD7004F63AA00395B
- CD00173FC400173FC400173FC400173FC400173FC400173FC400FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00173FC400173FC400173FC400173FC400173FC400173F
- C400153DC400395BCD00788DD700000000000000000000000000000000000000
- 0000D1DAF8004D64B2008596D3007E98EC00819BEF006D8BEE0098AAEA00536D
- C4004F4E4E008699DD00728FF2006D8BF0007994EC008FA4EB008C9EDD008CA0
- E6000000000000000000000000000000000000000000788DD7004F63AA00395B
- CD00173FC400173FC400173FC400264BC800D2D9F300FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00264BC800173FC400173FC400173F
- C400153DC400395BCD00788DD7000000000000000000788DD7004F63AA00395B
- CD00173FC400173FC400173FC400173FC400264BC800D2D9F300FFFFFF00FFFF
- FF00173FC400173FC400173FC400173FC400173FC400173FC400173FC400173F
- C400153DC400395BCD00788DD70000000000000000004963B600546DC0003357
- CF00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00234ACB00234ACB00234ACB00234ACB00234ACB00234A
- CB002148CB003357CF004963B600000000000000000000000000000000000000
- 000000000000BFCCF5005F79CD006E82C900788DD7008297DE00667DCC00BCC5
- E300D7D6D6005F75C3008095DA008A9EE4007689D1006278C300526BC1000000
- 000000000000000000000000000000000000000000004963B600546DC0003357
- CF00234ACB00234ACB00234ACB00D4DBF400FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00D4DBF4002F54CE00234ACB00234A
- CB002148CB003357CF004963B60000000000000000004963B600546DC0003357
- CF00234ACB00234ACB00234ACB002F54CE00D4DBF400FFFFFF00FFFFFF00FFFF
- FF00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234A
- CB002148CB003357CF004963B60000000000000000003D54A2005C76D0003257
- D3002E53D2002E53D2002E53D2002E53D2002E53D2002E53D200FFFFFF00FFFF
- FF00FFFFFF00FFFFFF002E53D2002E53D2002E53D2002E53D2002E53D2002E53
- D2002D53D2003257D3003D54A200000000000000000000000000000000000000
- 0000000000000000000000000000AEBEF300859BE900788DD900CAD1E900EEEE
- ED00EBEAEA00C2C6D6007382B6007289D900AFBEF300D3DBF900000000000000
- 000000000000000000000000000000000000000000003D54A2005C76D0003257
- D3002E53D2002E53D2002E53CF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00D6DDF5002E53D2002E53
- D2002D53D2003257D3003D54A20000000000000000003D54A2005C76D0003257
- D3002E53D2002E53D2002E53D200D6DDF500FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF002E53
- D2002D53D2003257D3003D54A20000000000000000004158A600627CD900365C
- DC004569DF004569DF004569DF004569DF004569DF004569DF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF004569DF004569DF004569DF004569DF004569DF004569
- DF004468DF003A5FDC004158A600000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000A6A6A5006E6D6D00DAD9
- D900E8E7E700BFBDBC009A9897009D9D9D000000000000000000000000000000
- 000000000000000000000000000000000000000000004158A600627CD900365C
- DC004569DF004569DF004569DF004569DF004569DF004569DF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF004569DF004569DF004569DF004569DF004569DF004569
- DF004468DF003A5FDC004158A60000000000000000004158A600627CD900365C
- DC004569DF004467DC00B6C2EA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF004569
- DF004468DF003A5FDC004158A6000000000000000000435BAB006681DE003F64
- E1005173E3005173E3005173E3005173E3005173E3005173E300FFFFFF00FFFF
- FF00FFFFFF00FFFFFF005173E3005173E3005173E3005173E3005173E3005173
- E3004F71E3004368E100435BAB00000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000807E7E00ACABAA00A0A0
- 9F00F1F0F000BCBAB900AEACAB0082807F000000000000000000000000000000
- 00000000000000000000000000000000000000000000435BAB006681DE003F64
- E1005173E3005173E3005173E3005173E3005173E3005173E300FFFFFF00FFFF
- FF00FFFFFF00FFFFFF005173E3005173E3005173E3005173E3005173E3005173
- E3004F71E3004368E100435BAB000000000000000000435BAB006681DE003F64
- E1005173E3004764C7004C66BA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005173
- E3004F71E3004368E100435BAB000000000000000000475EB4006C86E0005275
- E7005C7CE8005C7CE8005C7CE800FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00E1E7FB005C7CE8005C7C
- E800597AE8005375E700475EB400000000000000000000000000000000000000
- 0000000000000000000000000000000000009796960094929100BFBDBC00EAEA
- E9008A898900C0BEBC00A8A6A400989694000000000000000000000000000000
- 00000000000000000000000000000000000000000000475EB4006C86E0005275
- E7005C7CE8005C7CE8005C7CE8005C7CE8005C7CE8005C7CE800FFFFFF00FFFF
- FF00FFFFFF00FFFFFF005C7CE8005C7CE8005C7CE8005C7CE8005C7CE8005C7C
- E800597AE8005375E700475EB4000000000000000000475EB4006C86E0005275
- E7005C7CE8005B7BE5004E69C300DCE1F100FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005C7C
- E800597AE8005375E700475EB40000000000000000007790E100687FCD006E8C
- F0007491F1007491F100738FEE00677DC500E0E5F300FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF007D98F2007491F1007491F1007491
- F1006988EF006E8CF0007790E100000000000000000000000000000000000000
- 00000000000000000000000000008B8A8900ABAAA900BAB9B800CBCAC9008786
- 860000000000D2D2D100E7E6E500B6B5B4008987870000000000000000000000
- 000000000000000000000000000000000000000000007790E100687FCD006E8C
- F0007491F1007491F1007491F1007491F1007491F1007491F100FFFFFF00FFFF
- FF00FFFFFF00FFFFFF007491F1007491F1007491F1007491F1007491F1007491
- F1006988EF006E8CF0007790E10000000000000000007790E100687FCD006E8C
- F0007491F1007491F1007491F1006078C900677DC500E0E5F300FFFFFF00FFFF
- FF007491F1007491F1007491F1007491F1007491F1007491F1007491F1007491
- F1006988EF006E8CF0007790E1000000000000000000BFCDF6005971C3007E98
- F1007E99F500819BF500819BF5006B82CD007084C700E2E6F400FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00E7ECFD00819BF500819BF500819BF5007E99
- F5007290F4007E98F100CED8F700000000000000000000000000000000000000
- 00000000000000000000000000009F9E9D00C0BFBE00E5E4E4008F8D8C000000
- 0000000000008F8F8D00E2E2E100E4E3E3009E9C9B00B3B1B100000000000000
- 00000000000000000000000000000000000000000000BFCDF6005971C3007E98
- F1007E99F500819BF500819BF500819BF500819BF500819BF500FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00819BF500819BF500819BF500819BF500819BF5007E99
- F5007290F4007E98F100CED8F7000000000000000000BFCDF6005971C3007E98
- F1007E99F500819BF500819BF5007E98F1006B82CD007084C700FFFFFF00FFFF
- FF00819BF500819BF500819BF500819BF500819BF500819BF500819BF5007E99
- F5007290F4007E98F100CED8F7000000000000000000000000005975D100768D
- DD00829CF5008BA4F6008BA4F60089A2F3007489CD00788AC800FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00E9EEFD0092A9F6008BA4F6008BA4F6008BA4F600829C
- F500809BF500768DDD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000C8C8C700DFDFDF00F2F2F100C7C7C6000000
- 000000000000D3D3D300A3A2A100F2F2F200C1C0BF00908E8D00000000000000
- 00000000000000000000000000000000000000000000000000005975D100768D
- DD00829CF5008BA4F6008BA4F6008BA4F6008BA4F6008BA4F600FFFFFF00FFFF
- FF00FFFFFF00FFFFFF008BA4F6008BA4F6008BA4F6008BA4F6008BA4F600829C
- F500809BF500768DDD00000000000000000000000000000000005975D100768D
- DD00829CF5008BA4F6008BA4F6008BA4F60089A2F3007489CD00E3E7F400FFFF
- FF008BA4F6008BA4F6008BA4F6008BA4F6008BA4F6008BA4F6008BA4F600829C
- F500809BF500768DDD000000000000000000000000000000000000000000607A
- D70095ABF50092A9F600A0B4F700A2B6F800A2B6F800A0B3F4008998C900E7EA
- F400FFFFFF00A8BAF800A2B6F800A2B6F800A2B6F800A2B6F8009FB3F70094AA
- F500758AD500607AD70000000000000000000000000000000000000000000000
- 000000000000000000009A989700F8F8F800C9C8C80094949400000000000000
- 000000000000000000000000000098979700F8F8F800E2E2E2009F9E9C000000
- 000000000000000000000000000000000000000000000000000000000000607A
- D70095ABF50092A9F600A0B4F700A2B6F800A2B6F800A2B6F800FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00A2B6F800A2B6F800A2B6F800A2B6F8009FB3F70094AA
- F500758AD500607AD7000000000000000000000000000000000000000000607A
- D70095ABF50092A9F600A0B4F700A2B6F800A2B6F800A2B6F8008898CF00A2B6
- F800A2B6F800A2B6F800A2B6F800A2B6F800A2B6F800A2B6F8009FB3F70094AA
- F500758AD500607AD70000000000000000000000000000000000000000000000
- 000090A2E2009CB1F7009CB1F700AEBFF800AEBFF800AEBFF80091A0D000929F
- CA00DBE0F300AEBFF800AEBFF800AEBFF800AEBFF800A9BBF8009CB1F7008EA1
- E300546FCA000000000000000000000000000000000000000000000000000000
- 00000000000095959400C6C5C400E3E3E20092918F0000000000000000000000
- 000000000000000000000000000000000000E9E9E900EEEEEE00C5C5C4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000090A2E2009CB1F7009CB1F700AEBFF800AEBFF800AEBFF8008B99C7008B99
- C7008B99C700AEBFF800AEBFF800AEBFF800AEBFF800A9BBF8009CB1F7008EA1
- E300546FCA000000000000000000000000000000000000000000000000000000
- 000090A2E2009CB1F7009CB1F700AEBFF800AEBFF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800A9BBF8009CB1F7008EA1
- E300546FCA000000000000000000000000000000000000000000000000000000
- 00005870C70092A5E300A3B6F700ACBDF800B5C5F900B9C8F900B6C5F600A1AE
- D900B6C5F600B9C8F900B9C8F900B9C8F900ACBDF800A2B6F800A1B5F7005870
- C700BFCDF6000000000000000000000000000000000000000000000000000000
- 0000C7C7C700A8A7A500DDDDDC009C9A9900D3D3D30000000000000000000000
- 0000000000000000000000000000000000009C9B9900F3F2F200DFDFDE00BDBD
- BD00000000000000000000000000000000000000000000000000000000000000
- 00005870C70092A5E300A3B6F700ACBDF800B5C5F900B9C8F900B9C8F900B9C8
- F900B9C8F900B9C8F900B9C8F900B9C8F900ACBDF800A2B6F800A1B5F7005870
- C700BFCDF6000000000000000000000000000000000000000000000000000000
- 00005870C70092A5E300A3B6F700ACBDF800B5C5F900B9C8F900B9C8F900B9C8
- F900B9C8F900B9C8F900B9C8F900B9C8F900ACBDF800A2B6F800A1B5F7005870
- C700BFCDF6000000000000000000000000000000000000000000000000000000
- 00000000000000000000627DD900879BE300A0B3F500A3B6F800A4B7F8009FB3
- F7009FB3F700A2B6F800A3B6F800A0B4F700879BE300677ECC00627DD9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A19F9D00EBEBEA00C0BFBE00000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000A6A5A500C4C3C200A2A0
- 9E00000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000627DD900879BE300A0B3F500A3B6F800A4B7F8009FB3
- F7009FB3F700A2B6F800A3B6F800A0B4F700879BE300677ECC00627DD9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000627DD900879BE300A0B3F500A3B6F800A4B7F8009FB3
- F7009FB3F700A2B6F800A3B6F800A0B4F700879BE300677ECC00627DD9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D500637BCC007C91DA0092A8F00091A7
- F10092A8F10092A8F000879DE7007B90D9005E79D500AFBFF300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A4A2A000D2D1D0009A999800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000009C9A9900A5A3
- A100000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D500637BCC007C91DA0092A8F00091A7
- F10092A8F10092A8F000879DE7007B90D9005E79D500AFBFF300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D500637BCC007C91DA0092A8F00091A7
- F10092A8F10092A8F000879DE7007B90D9005E79D500AFBFF300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CED8F8007C93E5005771C9005871
- C8005871C8005771C9005E79D6007C93E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009C9A99009D9B9A0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000009C9A
- 9900000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CED8F8007C93E5005771C9005871
- C8005871C8005771C9005E79D6007C93E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CED8F8007C93E5005771C9005871
- C8005871C8005771C9005E79D6007C93E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000808080007D7D7D009D9D
- 9D00C5C5C500C5C5C500C5C5C500C5C5C500C7C7C700C7C7C700C8C8C800CECE
- CE00CFCFCF000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DEDE
- DE00D3D3D300CECECE00CECECE00C0C0C00097A7D7005769A700293462002530
- 5800253058002934620032427B005769A700C0C0C000C7C7C700CECECE00D6D6
- D600DEDEDE00DEDEDE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000B0B0B000A6A6A600F9F8
- F800838382009E9E9E0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000004259A70046589700455EAF002F4BAB001333A0000326
- 9900032699001333A0001E3DA4002F4BAB004658970035447A004259A7000000
- 0000000000000000000000000000000000000000000026366D0026366D002636
- 6D0026366D0026366D0026366D0026366D0026366D0026366D0026366D002636
- 6D0026366D0026366D0026366D0026366D0026366D0026366D0026366D002636
- 6D0026366D0026366D0026366D0031458D0000000000354A88002E3D70002E3D
- 70002E3D70002E3D70002E3D70002E3D70002E3D70002E3D70002E3D70002E3D
- 70002E3D70002E3D70002E3D70002E3D70002E3D70002E3D70002E3D70002E3D
- 70002E3D70002E3D7000D2D2D20000000000000000000000000086868600DCDC
- DC00ACABA9008988870080808000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B9C6F1002E42880042538E002B49AE000B2EA10003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F002B49AE004760B10042538E00B9C6
- F100000000000000000000000000000000000000000003269B000D2A90000D2A
- 90000D2A90000D2A90000D2A90000D2A90000D2A90000D2A90000D2A90000D2A
- 90000D2A90000D2A90000D2A90000D2A90000D2A90000D2A90000D2A90000D2A
- 90000D2A90000D2A90000D2A9000293973000000000030438600E6EAF700E5E9
- F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9
- F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9F600E5E9
- F600E5E9F600E5E9F60000000000000000000000000000000000000000008F8F
- 8F00DCDCDB00A5A4A2008A898800D3D3D3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00002F4284004D5F9E00415CB7000328A3000328A3000328A3000328A3000328
- A3000328A3000328A3000328A3000328A3000328A3001336A900415CB7002F42
- 8400B9C6F100000000000000000000000000000000000429A8002E3F7E000000
- 00004F70DE004F70DE004F70DE004F70DE004F70DE0039509D00354A9100506E
- D400506ED400506ED400506ED400506ED400000000003A51A1005475E2005979
- E3005979E3005878E3003A51A1000000000000000000354A9200E5EAF8004364
- D2000430C2000430C2003659CE000430C2000430C2000430C2000430C2000430
- C2000430C2003659CE000430C2000430C2000430C2003659CE000430C2000430
- C2004364D200E5EAF80000000000000000000000000000000000000000000000
- 0000CECECE00EBEBEA00C0BFBE008A8988007E7E7E00D3D3D300000000000000
- 0000000000000000000000000000B6C3F0003E55A10000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000475F
- B100415DBD00082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00415D
- BD0046589A00475FB100000000000000000000000000082EAE00314284000000
- 00005073E8000537DE000537DE000537DE005073E8003E55A900394F9B004F6F
- DB000432CD000432CD000432CD004F6FDB00000000004058AF005F80EF002A56
- E9002A56E9002855E9004058AF000000000000000000384E9800E5EAF9004162
- D1000432C9000432C900365BD3000432C9000432C9000432C9000432C9000432
- C9000432C900365BD3000432C9000432C9000432C900365BD3000432C9000432
- C9004365D600E5EAF90000000000000000000000000000000000000000000000
- 00007E7E7E00CECECE00EBEBEA00A5A4A2008A8988007E7E7E00000000000000
- 00000000000000000000B6C3F000273872002E417F0000000000000000000000
- 0000000000000000000000000000000000000000000000000000A8B7ED003E50
- 8E001439B600042CB100042CB100042CB100042CB100042CB100042CB100042C
- B100042CB100042CB100A0AFE100042CB100042CB100042CB100042CB1001439
- B6004964BF003E508E000000000000000000000000001137B800334689000000
- 00004F74EF00053AE900053AE900053AE9004F74EF00425CB2003D55A5005072
- E3000535D8000535D8000535D8005072E30000000000435CB4006A8AF300426A
- F000426AF0003F68F000435CB40000000000000000003B519F00DADFED004A64
- B9000937D0000A38D0003B60D9000A38D0000A38D0000A38D0000A38D0000A38
- D0000A38D0003B60D9000A38D0000A38D0000A38D0003A5FD9000A38D0000836
- D0004467DB00E6EBFA0000000000000000000000000000000000000000000000
- 0000D3D3D3007E7E7E00CECECE00C0BFBE00A5A4A2008A898800D3D3D3000000
- 000000000000B6C5F100283873006472A000364E960000000000000000000000
- 0000000000000000000000000000000000000000000000000000455BAE004C62
- AD00042DB600042DB600042DB600042DB600042DB600042DB600042DB600042D
- B600042DB60003279F00FFFFFF009FAFE200042DB600042DB600042DB600042D
- B6002B4EC2004C62AD000000000000000000000000002248C800384D95000000
- 00005B7EF2001D4DED001D4DED001D4DED005B7EF200455FB600455FB6005075
- F100053AEB00053AEB00053AEB005075F10000000000455FB6007592F4006686
- F3006686F300597CF200455FB60000000000000000004159AB00E5EAFB007E98
- ED003958C0001D48D700496DE5001D49DA001A41C3002F4FBA00B8C4EB003B5B
- C6001D49DC00496DE5001E4BDF001E4BDF001E4BDF00496DE5001D4ADF001543
- DE00496DE500E5EAFB0000000000000000000000000000000000000000000000
- 00000000000000000000D3D3D300CECECE00EBEBEA00C0BFBE00706F6E005C5C
- 5C009DADE2006979AE008192CC007E8EC7006077C40000000000000000000000
- 00000000000000000000000000000000000000000000788DD7004F63AA00395B
- CD00173FC400173FC400173FC400173FC400173FC400173FC400173FC400173F
- C400173FC40012329D00FFFFFF00FFFFFF00A6B6E800173FC400173FC400173F
- C400153DC400395BCD00788DD70000000000000000002B51D0003C519B000000
- 00006485F300305CEE00315DEF00305CEE006485F3004760B7004760B7005075
- F100053AEB00053AEB00053AEB005075F100000000004760B7007590EC008BA2
- EE008BA2EE00849DEE004760B7000000000000000000445DB100E6EBFC004A6F
- EA00C7D1F2004260C6004868D3003656BF008FA1DE00D4DCF90089A1F200B0BD
- E8002D52CC005074EB002854E6002854E6002854E6005074EB002854E6001C4A
- E5004B70EA00E6EBFC0000000000000000000000000000000000000000000000
- 00000000000000000000000000007E7E7E00CECECE00EBEBEA00737271006367
- 74003D5093008195D7005871C3007A8CCA00A2B3E90000000000000000000000
- 000000000000000000000000000000000000000000004963B600546DC0003357
- CF00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234A
- CB00234ACB001C3BA300FFFFFF00FFFFFF00FFFFFF00ABBAEB00234ACB00234A
- CB002148CB003357CF004963B60000000000000000003459D7003E54A1000000
- 00006C8BF300446BF000456CF000446BF0006D8CF3004861B9004861B9005075
- F100053AEB00053AEB00053AEB005075F100000000005069C7004861B9004861
- B9004861B9004861B9005069C70000000000000000004761B700E6ECFD004D72
- EF006D8BF100CAD4F40090A1DA00D5DDFA0099AEF600476DEE00325DED00ADBE
- F70092A3DD00577AF000325DED00325DED00325DED00577AF000325DED002351
- EB004E73EF00E6ECFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000D3D3D3007E7E7E00A7A7A70081859400455B
- A6007084C7005A75D2004F6AC7008496D300B7C5F10000000000000000000000
- 000000000000000000000000000000000000000000003D54A2005C76D0003257
- D3002E53D2002E53D2002B4FC700FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00AFBEEE002E53
- D2002D53D2003257D3003D54A20000000000000000004368E300445CAD000000
- 00007D98F5006989F3006D8CF3006A8AF3007D98F5004A64BB004A64BB005176
- F100083CEB00083CEB00083CEB005176F1000000000000000000000000000000
- 000000000000000000000000000000000000000000004B65BC00E6ECFD007290
- F4006283F2006586F3006586F3006586F3006586F3006586F3006586F3006586
- F3008CA5F600667FD2006586F3006586F300607FE6005874D1005975D400577B
- F2007592F400E6ECFD0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2B1E600788ED9008CA4
- F5006B8AF0005071DF003257D000123ABF004E5F9B00465CAC00000000000000
- 000000000000000000000000000000000000000000004158A600627CD900365C
- DC004569DF004569DF003854B200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008BA1
- EB004468DF003A5FDC004158A60000000000000000004D71E9004760B3000000
- 0000829DF5007794F400829CF5007894F400829DF5004C65BC004C65BC00587C
- F2001647EC001647EC001647EC00587CF2000000000000000000000000000000
- 000000000000000000000000000000000000000000004C66BD00E6ECFD005277
- F1004B71F1005075F1006D8CF3005075F1005075F1005075F1005075F1005075
- F1005075F100C5CEEC004667D600496CDF00657DCE00B5C1E9009EAEE1003862
- EF00567AF200E6ECFD0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000BFCCF5004862BC0095ACF7007C97
- F400718FF4003D63E3000534D1000431C600556EC200475890004F67B7000000
- 00000000000000000000000000000000000000000000435BAB006681DE003F64
- E1005173E3005173E300415CB600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005173
- E3004F71E3004368E100435BAB0000000000000000005579EF004A63B9000000
- 0000829CF5007592F40086A0F5007592F400829CF5004D66BE004D66BE005E80
- F2002453EE002453EE002453EE005E80F2000000000000000000000000000000
- 000000000000000000000000000000000000000000004E68BF00E6ECFD005479
- F1005479F100597CF2007491F400597CF200597CF200597CF200597CF200597C
- F200597CF200CDD7F90099A9DD007E92D500CED8FB00ACBDF800C4D0F900365A
- D200587CF200E6ECFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000BFCCF5004963BD007E92DA008AA3F600859F
- F5007E99F5002250E9000F3FDD000534D1002146C400556FC20042538B000000
- 00000000000000000000000000000000000000000000475EB4006C86E0005275
- E7005C7CE8005C7CE8004963B900FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00C2CEF6005C7C
- E800597AE8005375E700475EB40000000000000000006787F3004F68BF000000
- 00004F69C0004F69C0004F69C0004F69C0004F69C000556FCC004F69C0006A8A
- F3004068F0004169F0004068F0006B8AF3000000000000000000000000000000
- 00000000000000000000000000000000000000000000506AC100E6ECFD00577B
- F2006586F3006D8CF300829CF5006D8CF3006D8CF3006D8CF3006D8CF3006D8C
- F3006D8CF300829CF5007491F4006D8CF3006D8CF300829CF5006C8BF300D2DB
- FA008094D700DFE5F60000000000000000000000000000000000000000000000
- 00000000000000000000BFCDF500889BDD00AFC0F900B4C4F900D1DBFB00B6C6
- F9006A8AF300476EF000345FEF002250E9000534D1000431C6003356C900394C
- 8E00B9C6F200000000000000000000000000000000007790E100687FCD006E8C
- F0007491F1007491F1007491F1007491F1007491F1007491F1007491F1007491
- F1007491F1005C73C000FFFFFF00FFFFFF00CAD5F9007491F1007491F1007491
- F1006988EF006E8CF0007790E10000000000000000006F8DF3005069C1000000
- 0000000000000000000000000000000000000000000000000000516AC100718F
- F4004E73F1004F74F1004E73F100718FF4000000000000000000000000000000
- 00000000000000000000000000000000000000000000526CC300E6ECFD007995
- F400819BF50088A2F60088A2F60088A2F60088A2F60088A2F60088A2F60088A2
- F60088A2F60088A2F60088A2F60088A2F60088A2F60088A2F60087A1F500839E
- F500D8E0FC00E8EDFD0000000000000000000000000000000000000000000000
- 000000000000000000004F6BC600B9C5EF00ABB9E9008E9FD9006F83CB0096A6
- DD00B2C2F8005579F100466DF000345FEF001040DD000534D1000935C8005B6F
- B2003A4D8F00CED7F700000000000000000000000000BFCDF6005971C3007E98
- F1007E99F500819BF500819BF500819BF500819BF500819BF500819BF500819B
- F500819BF500677CC400FFFFFF00FFFFFF00819BF500819BF500819BF5007E99
- F5007290F4007E98F100CED8F70000000000000000007894F400516BC2000000
- 0000000000000000000000000000000000000000000000000000526CC3007894
- F4005C7FF2005D80F2005C7FF2007894F4000000000000000000000000000000
- 00000000000000000000000000000000000000000000536DC400E6ECFD00597C
- F2006F8DF3007C97F4008FA7F600819BF500819BF500819BF500819BF500819B
- F500819BF5008FA7F600819BF500819BF500819BF5008EA6F6007A96F4005075
- F1005F81F200E6ECFD0000000000000000000000000000000000000000000000
- 00000000000000000000546FCB005975D1006580D9007990E300BFCDF600546F
- CB008FA0DA007491F4005479F100466DF0002250E9001040DE000534D1004161
- CC00596BAC0037488700314075003C539C0000000000000000005975D100768D
- DD00829CF5008BA4F6008BA4F6008BA4F6008BA4F6008BA4F6008BA4F6008BA4
- F6008BA4F6006F83C500FFFFFF00D4DDFC008BA4F6008BA4F6008BA4F600829C
- F500809BF500768DDD0000000000000000000000000088A2F600546DC4000000
- 0000000000000000000000000000000000000000000000000000546EC500839E
- F5007794F4007A96F4007894F400839EF5000000000000000000000000000000
- 000000000000000000000000000000000000000000005670C700E6ECFD005378
- F100577BF2006384F3007F9AF5006E8DF3006E8DF3006E8DF3006F8DF3006F8D
- F3006F8DF300829DF5006E8DF3006E8DF3006C8BF3007E99F5006082F2003F68
- F000587CF200E6ECFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000007488CF00B1BFF000829DF500466DF000345FEF002250E900042D
- B600082BA100788AC60040539300B8C5F200000000000000000000000000607A
- D70095ABF50092A9F600A0B4F700A2B6F800A2B6F800A2B6F800A2B6F800A2B6
- F800A2B6F8008E9FD800A2B6F800A2B6F800A2B6F800A2B6F8009FB3F70094AA
- F500758AD500607AD70000000000000000000000000092A9F600556EC5000000
- 0000000000000000000000000000000000000000000000000000566FC60087A1
- F500829CF50087A1F500829DF50087A1F5000000000000000000000000000000
- 000000000000000000000000000000000000000000005771C800E6ECFD00496F
- F0005A7DF2005E80F2007E99F5006183F2006183F2006283F2006283F2006283
- F2006283F2007F9AF5006283F2006183F2006183F2007D98F5005D80F2005378
- F1004B71F100E6ECFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000007991E400687DCA00B3C1F1005277F100466DF000345FEF001035
- B200788CCF009CA8CF00BAC7F300000000000000000000000000000000000000
- 000090A2E2009CB1F7009CB1F700AEBFF800AEBFF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800A9BBF8009CB1F7008EA1
- E300546FCA00000000000000000000000000000000009AAFF700566FC6000000
- 00000000000000000000000000000000000000000000000000005770C7008AA3
- F60088A2F60096ACF7008AA3F6008AA3F6000000000000000000000000000000
- 000000000000000000000000000000000000000000005771C800E6ECFD00E6EC
- FD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6EC
- FD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6EC
- FD00E6ECFD00E6ECFD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000092A7EC006179CA009CB1F7004F74F100385CD2008196
- DA009FACD6004F67B50000000000000000000000000000000000000000000000
- 00005870C70092A5E300A3B6F700ACBDF800B5C5F900B9C8F900B9C8F900B9C8
- F900B9C8F900B9C8F900B9C8F900B9C8F900ACBDF800A2B6F800A1B5F7005870
- C700BFCDF60000000000000000000000000000000000A8BAF8005872C9000000
- 00000000000000000000000000000000000000000000000000005872C9007D97
- EE0090A7F10097ACF20090A7F1007D97EE000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005670C700647ED2008A9DDC005B74
- CA00C1CDF6000000000000000000000000000000000000000000000000000000
- 00000000000000000000627DD900879BE300A0B3F500A3B6F800A4B7F8009FB3
- F7009FB3F700A2B6F800A3B6F800A0B4F700879BE300677ECC00627DD9000000
- 00000000000000000000000000000000000000000000AFBFF5005872C9000000
- 00000000000000000000000000000000000000000000000000005B76D2005872
- C9005872C9005872C9005872C9005872C9000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005771C8008EA0DF00A5B2DD00C1CD
- F600000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D500637BCC007C91DA0092A8F00091A7
- F10092A8F10092A8F000879DE7007B90D9005E79D500AFBFF300000000000000
- 000000000000000000000000000000000000000000005872C9005B76D2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005771C800A3B0DE005C75CB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CED8F8007C93E5005771C9005871
- C8005871C8005771C9005E79D6007C93E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00004A60B0002839760026356C00283976004A60B000A3B3EA00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DCDC
- DC00DADADA00C9C9C900C7C7C700C7C7C700C0C0C000C0C0C000A4B1DD00333F
- 6900303A6200465690000000000000000000CBCBCB0025325F0025325F002532
- 5F0025325F0025325F0025325F0025325F0025325F0025325F0025325F002532
- 5F0025325F0025325F0025325F0025325F0025325F0025325F0025325F002532
- 5F0025325F0025325F0026346600CBCBCB000000000042579E0036457D002E3C
- 6D00283868008D9DD300C0C0C000C0C0C000C0C0C000C0C0C000C2C2C200CECE
- CE00CECECE00CECECE00DEDEDE00DEDEDE00DEDEDE0000000000000000000000
- 00000000000000000000000000000000000000000000000000003B53A4002840
- 93001A3FBA003453BC003F5CBD003453BC001A3FBA000C31B0003B53A4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000D5DCF600384C8A00445698002D49
- A7004D67C1006780D300627ACA0000000000000000003855B5003A56B5003B57
- B5003C57B4003D58B5003D58B5003D58B5003D58B5003D58B5003D58B5003D58
- B5003D58B5003D58B5003D58B5003D58B5003D58B5003D58B5003D58B5003C58
- B5003B57B5003A56B5002637740000000000000000003F59B0005A78DE004D67
- BE00334279002A3C780000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005069C0002E47A2000734
- C8005069BC00475AA20043579D00475AA2005069BC002D52CE002E47A2005069
- C000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000394D8C0043569800435CB0004E69
- C1006982D500768FE2004962B20000000000000000003753B2000F34AF001337
- AF00163AB000173AB000173AB000173AB000173AB000173AB000173AB000173A
- B000173AB000173AB000173AB000173AB000173AB000173AB000173AB0001539
- B0001337AF000F34AE00283A7C000000000000000000415BB2006F8DF3002F58
- E2003C57B1002A38700000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003F56A9001843D5003059
- E1004059AC008A9FE600000000008A9FE6004059AC005A70BC001843D5003F56
- A900ACBCF1000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000D5DCF60044579900425BAF00324DAA008196
- DB0097AAE900889FED004961B2000000000000000000415EBF001F44BC00274A
- BD002D4EBD002D4EBD002D4EBD002D4EBD002D4EBD002D4EBD002D4EBD002D4E
- BD002D4EBD002D4EBD002D4EBD002D4EBD002D4EBD002D4EBD002D4EBD002C4E
- BD00284BBD001F44BC002D41860000000000000000004A65BF00657DCF00899F
- E800647ED800536DC1003F57A700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003B61DF002A57EE006076
- C20000000000000000000000000000000000000000008FA3E9002A57EE003B61
- DF00445DB6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000D5DCF6003E508F0046589A00314CA9005670C4008297DB00AFBF
- F3008DA5F400607ACD00D8E0F80000000000000000004764C600284CC4003254
- C4003556C5003556C5003556C5003556C5003556C5003556C5003556C5003556
- C5003556C5003556C5003556C5003556C5003556C5003556C5003556C5003556
- C5003254C400284CC4002F448D000000000000000000BFCCF5004862BC006A81
- D000556FC5003355C700506CCC004E65B40090A3E20000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000486CE8003C65ED00556C
- BC000000000000000000000000000000000000000000000000003963EF004A6E
- E600445DB4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003F519100475A9C00435CAF005771C5008297DB00A6B6EB00849E
- F2005C76CE004C63AF000000000000000000000000004C6ACD003155CB003C5D
- CC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5F
- CC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5FCC003F5F
- CC003C5DCC003155CB0031479200000000000000000000000000BFCCF5004A64
- BD008FA4E8005670C400647DD100425596003645760035498F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000006080EB004A6FEE005168
- BB00000000000000000000000000000000000000000000000000476EF0006080
- EB00455EB5000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000D5DCF700475A9C00425BAF00324DAA008297DB00A8B8EC00A8B9F2005E79
- CF004F65B000D8E0F8000000000000000000000000005C79DA004668D8005674
- DA005876DA005876DA005876DA005876DA005876DA005876DA005876DA005876
- DA005876DA005876DA005876DA005876DA005876DA005876DA005876DA005876
- DA005674DA00486AD900374E9D00000000000000000000000000000000000000
- 00004F68C1007087D40095A8E9004462C8005570CA00465AA00032458600B8C5
- F100000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000008397DB006888F3006F88
- DF0000000000000000000000000000000000C9D4F8004A64BD006886EC007F92
- D100607AD3000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000D3D3
- D300485584004B63B4004A65C000758CD800ABBBF2008FA6F400607BD100D8E0
- F80000000000000000000000000000000000000000006581E1005273E000627F
- E1006682E1006682E1006682E1006682E1006682E1006682E1006682E1006682
- E1006682E1006682E1006682E1006682E1006682E1006682E1006682E1006682
- E1006380E1005474E0003A51A300000000000000000000000000000000000000
- 0000BFCDF600506AC3007288D500637AC5004563C8003B5BC800394A86003142
- 7D00A4B3EA00293B7B00283871002E4185000000000000000000000000000000
- 000000000000000000000000000000000000000000006076C20096ACF4007391
- F4004C64BE0090A4EA000000000090A4EA004C64BE009DACDE00A0B3F3005E73
- BB004159AB000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000A2A2A2007A7978006B6969006A6867006B6969007A797800C5C5C5007371
- 710072737D005366A8007088D7007F96E30089A2F400667FD300526AB5000000
- 000000000000000000000000000000000000000000006D89E8005D7DE7006F8B
- E800748FE900748FE900748FE900748FE900748FE900748FE900748FE900748F
- E900748FE900748FE900748FE900748FE900748FE900748FE900748FE900748F
- E900718CE900607FE7003C55A800000000000000000000000000000000000000
- 000000000000BFCDF600536CC50098AAE900637AC6004566D4003954B1003A49
- 7E0035406900576EB900566DBA00556BB400374E9900CED7F700000000000000
- 000000000000000000000000000000000000000000005C76D2008295D6009EB2
- F500859BE400697EC9006076C200697EC900859BE400A9BBF800A0AEDF004362
- CC002D4FC300BDCBF40000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000A3A2
- A200AAA9A900DAD9D900EDEDEC00E7E7E700EBEBEB00D8D7D60078767500706E
- 6D007D7B7A005567A300637AC4007B95EB00647ED400546CB700D8E0F8000000
- 000000000000000000000000000000000000000000007C97F400708EF400829D
- F4008EA6F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6
- F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6F5008EA6
- F50088A1F5007794F400425CB300000000000000000000000000000000000000
- 00000000000000000000000000005770C800748BD900879DE8004D5D97004E65
- B4004A6AD3000430C2000430C2000430C2004162D1005971C00046589B000000
- 0000000000000000000000000000000000000000000000000000000000005D77
- D3009CABE200BECBF500BCCAF600BECBF5009CABE200687CC600798FDA0086A0
- F5004B71F1002E50C400435BAE00BDCBF4000000000000000000000000000000
- 000000000000000000000000000000000000000000008C8B8B00A7A5A500ECEB
- EB00BFBDBC00AAA8A700A09E9D009A9897009F9D9C00A8A6A500CFCECD00E6E5
- E500A4A3A200BABABA009C9EAD006C80C200D8E0F80000000000000000000000
- 000000000000000000000000000000000000000000007E99F500708EF400829D
- F50093AAF60097ADF70099AFF70099AFF70099AFF70099AFF70099AFF70099AF
- F70099AFF70099AFF70099AFF70099AFF70099AFF70099AFF70099AFF70099AF
- F70091A8F6007E99F500445DB400000000000000000000000000000000000000
- 0000000000000000000000000000C1CDF6005872CA006F85D000516BBE004A6C
- DC00123ED2000433D0000433D0000433D0000937D2002F56D8005775D700455E
- B500BDCBF4000000000000000000000000000000000000000000000000000000
- 0000657FD9004C65BF004C65BC004C65BF00657FD900AEBEF2004C65BF007A90
- DB0086A0F5001848EB002F51C500445CAE000000000000000000000000000000
- 00000000000000000000000000000000000000000000A2A1A000EDECEC00D1CF
- CF00A09E9D00B1B1B000BEBDBC00C3C2C200C2C2C200B6B5B400AFADAC00CAC8
- C800E6E5E50087858400A19F9D00D5D5D3000000000000000000000000000000
- 000000000000000000000000000000000000000000007D98F5006989F3007995
- F40088A2F6008FA7F60098AEF700A3B6F800A3B6F800A3B6F800A3B6F800A3B6
- F800A3B6F800A3B6F800A3B6F800A3B6F800A3B6F800A3B6F800A3B6F800A0B4
- F70096ACF700819BF500455EB600000000000000000000000000000000000000
- 000000000000000000000000000000000000AEBEF3005E6FAD004B6FE7001242
- E0000537DE000537DE000537DE000537DE000537DE000537DE001B49E1005E76
- CA00455DB2008DA2E80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCDF6004D66
- C0007A90DB004B71F1001848EB003052C500BDCBF40000000000000000000000
- 00000000000000000000000000000000000000000000EDEDED00D7D6D500B4B2
- B100B9B8B700B9B8B700B7B6B500B7B7B600BCBABA00C1C0C000A19F9E00AEAC
- AB00CFCECD0088868500C8C8C800000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005C79DA002E55D6002E55
- D6002E55D6002E55D6006D87E0008DA5F60094ABF60097ADF7009AAFF7009AAF
- F7009AAFF7009AAFF7009AAFF7009AAFF7009AAFF70099AFF70097ADF70090A8
- F60086A0F5007794F4004761B800000000000000000000000000000000000000
- 0000000000000000000000000000000000004963BC006A87E8002553EE002553
- EE002553EE007C97F4007F9AF1007C97F4002553EE002553EE002553EE002553
- EE004A70F0006983DB0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000BFCDF6007B91DC0086A0F5004B71F1003153C700475EB100BDCBF4000000
- 00000000000000000000000000000000000088878700D9D7D700ADABAA00B2B1
- B100C1C0BF00C3C3C200C3C2C200C0C0BF00BFBFBF00BBBABA00BCBCBB00B4B3
- B200A8A6A500DCDBDB0088878700000000000000000000000000000000000000
- 000000000000000000000000000000000000000000007391F400456CF000456C
- F000456CF000456CF0003A60E000A8BAF800ACBDF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800ABBD
- F800A7B9F800A2B6F8004962B900000000000000000000000000000000000000
- 0000000000000000000000000000000000004A64BB00718DEB003E67F0003E67
- F0006888F300667CC5005A71C100667CC5006888F3003E67F0003E67F0003E67
- F000486FF000718CE90000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004F69C3007B92DC0086A0F5001848EB003154C700485FB2000000
- 00000000000000000000000000000000000085848300D0CECD00A3A1A000C4C3
- C300CECDCD00D0D0D000D1D0CF00CAC9C900C7C6C600C2C2C000B6B4B400BCBC
- BC009F9D9C00EBEBEB0085848300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000007894F4004B71F1004B71
- F1004B71F1004B71F1004B71F100365BD700365BD700365BD700365BD700365B
- D700365BD700365BD700365BD700365BD700365BD700365BD700365BD700365B
- D700365BD700365BD7004A63BB00000000000000000000000000000000000000
- 0000000000000000000000000000000000004F69C4007892E700567AF200567A
- F20091A3E4009DB0EE00000000009DB0EE0091A3E400567AF200567AF2005D80
- F2007794F4006B83D40000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000BFCDF600506AC4007C92DD004B71F1001848EB003254C800BFCB
- F400000000000000000000000000000000008C8A8800CBCAC9009E9D9C00CBCA
- CA00D8D7D700DBDBDB00DDDDDD00D7D7D600CFCFCE00C7C6C600B9B7B600B8B8
- B8009A989700E7E7E6008C8A8800000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000819BF5005579F1005579
- F1005579F1005579F1005579F1005579F1005D80F2007E99F500819BF500819B
- F500819BF500819BF500819BF500819BF500819BF500819BF500819BF500819B
- F500819BF500819BF5004C66BD00000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000556FCC0096ACF7007995
- F4005971C4000000000000000000000000005D75C500809AF10087A1F500728A
- DB004F69C200BFCDF60000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000BFCDF6007D93DD0086A0F5004B71F1003355
- C9004A62B400BFCBF50000000000000000008F8D8D00D1D0CF00A4A2A100D2D2
- D100E7E7E700EDEDED00F0F0F000ECEBEB00E4E4E400DADADA00C2C0BE00B6B6
- B500A09E9D00EDEDEC008F8D8D00000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000849EF5005B7EF2005B7E
- F2005B7EF2005B7EF2005B7EF2006384F300829CF5007E91D5004E67BE004E67
- BE004E67BE004E67BE004E67BE004E67BE004E67BE004E67BE004E67BE004E67
- BE004E67BE004E67BE004E68C100000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D3DBF9009AACEA008FA7
- F600647BC800000000000000000000000000657BC800859FF5009CB1F700516A
- C400BFCDF6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000536DC6007E94DE0086A0F5001848
- EB003456CA004B63B500000000000000000093929100DCDADA00AFADAD00C5C5
- C400EBEBEB00F0F0F000F6F6F600F2F2F200E8E8E800DFDEDE00C2C2C200AFAD
- AC00AAA8A700E2E1E00093929100000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000088A2F6006183F2006183
- F2006183F2006183F2006183F200839EF5008195D600536CC000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006278C900A2B4
- F3008A9EE2009FB1F000000000009FB1F000869BE3009BB0F700788FDD00BFCD
- F600000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000C1CDF600536CC500859AE0004B71
- F1001848EB003457CA00BFCBF50000000000ACACAC00EAE9E900C6C4C400A7A5
- A400EBEBEB00F0F0F000F6F6F600F3F3F300E9E9E900DFDFDF00C3C2C200A09F
- 9D00BFBDBC00C4C3C200ACACAC00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000008EA6F6008EA6F6008EA6
- F6008EA6F6008EA6F6008EA6F600546DC10091A5EB0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005974
- CF0098AAE400B2C2F900B4C4F900ADBEF8007D93DF00566FC700C1CDF6000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000566FC8008295D400A1B1E500798F
- DD0086A0F5004B71F1005E78D1005169BE0000000000BFBEBD00F2F2F200D7D6
- D600A8A7A600CDCCCC00E6E6E600E9E9E900DDDDDD00C3C2C100B3B1B000D1CF
- CF00ECEBEB00ADACAC0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000506AC100506AC100506A
- C100506AC100506AC100506AC10091A5EB000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C1CD
- F6005C75CC00C1CEFA00B9C8F900B7C7F9005771C900C1CDF600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000005874CF008DA0DF00C4CEF100657B
- C5008B9FE30086A0F5006781DB00556DC600000000009F9E9D00C7C6C500F2F2
- F200C6C4C400AFADAD00A4A2A1009E9C9C00A3A1A000ADABAA00D7D6D500EDEC
- EC00C6C5C4000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000093A8ED009CAEE900A0B2EF008195DB00C1CDF60000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000C1CDF6005874CF00556EC300B0BD
- E7007A8CCA008399E1005872CA00C1CDF6000000000000000000A09F9F00C5C3
- C200EAE9E900DCDADA00D1D0CF00CBCAC900D0CECD00D9D7D700F0F0F000C4C3
- C100A09F9F000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000C1CDF6005770
- CA00BFCCF5000000000000000000000000000000000000000000000000000000
- 0000B0AFAF00A19F9F00A9A7A500B0AEAC00A9A7A500A19F9F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000D3D3D300C2C2C2003B4E
- 91003B4E8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E
- 8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E8E003B4E
- 8E003B4E9100C2C2C200000000000000000000000000D6D6D600566AB0002836
- 6700283667002836670028366700283667002836670028366700283667002836
- 6700283667002836670028366700283667002836670028366700283667002836
- 6700283667005468AB00DEDEDE00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B6C3F000414F800023316200000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000455CA5002F3E
- 7100475CA400445BA800435AA700435AA600435AA600435AA500435AA500435A
- A500445AA5004359A3004359A3004359A2004359A1004359A1004358A0004353
- 8C002D3A660043589F0000000000000000000000000000000000000000003850
- A3000536DB000536DB000536DB000536DB000536DB000536DB000536DB000536
- DB000536DB000536DB000536DB000536DB000536DB000536DB000536DB004368
- E4003850A3000000000000000000000000000000000000000000293C8000042D
- B6000000000000000000042DB6006780D3006780D3005B75CF005772CE00536F
- CC004765C9004765C9003F5EC7003758C5003758C5000931B800000000000000
- 0000042DB600293C800000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000CCD6
- F60022357800435BAA0023336900000000000000000000000000000000000000
- 000000000000000000000000000000000000000000006279C90030427E004660
- B400072BA3000328A1000328A00003279F0003279F0003279F0003279D000326
- 9C0003269C0003269A0003269A00032699000325970003259700032596002643
- A300495EA5002E3D710000000000000000000000000000000000000000003851
- A1000535D8000535D8000535D8000535D8000535D8000535D8000535D8000535
- D8000535D8000535D8000535D8000535D8000535D8000535D8000535D8004368
- E1003851A10000000000000000000000000000000000000000002A3E8200042D
- B7000000000000000000042DB7003052C4003052C4003052C4003052C4003052
- C4003052C4003052C4003052C4003052C4003052C400042DB700000000000000
- 0000042DB7002A3E820000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002F43
- 840043538C00425CB00025356D00000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000283C8000495EA8002748
- B5000429A7000429A7000429A6000429A5000328A4000328A3000328A2000328
- A1000328A00003279F0003279F0003279E0003279D0003269C0003269B000326
- 9A002745A800485B9B000000000000000000000000000000000000000000384F
- 9F000534D4000534D4000534D4000534D4000534D4000534D4000534D4000534
- D4000534D4000534D4000534D4000534D4000534D4000534D4000534D4004367
- DF00384F9F0000000000000000000000000000000000000000002B3F8400042E
- B900042EB900042EB900042EB900395AC800395AC800395AC800395AC800395A
- C800395AC800395AC800395AC800395AC800395AC800042EB900042EB900042E
- B900042EB9002B3F840000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000046589600405B
- B8000F33A900435EBA002A3B7700000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002B3D81004361C700042C
- B300042CB200042CB100042BB000042BAF00042BAE00042BAD00042BAC00042A
- AB00042AAA00042AAA00042AA9000429A8000429A7000429A6000429A6000328
- A4000328A300435EBB000000000000000000000000000000000000000000384E
- 9B000634CD000735CD000735CD00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000735CD000735CD004366
- D900384E9B0000000000000000000000000000000000000000002D418700042E
- BC00042EBC00042EBC00042EBC004C6ACF004C6ACF004C6ACF004C6ACF004C6A
- CF004C6ACF004C6ACF004C6ACF004C6ACF004C6ACF00042EBC00042EBC00042E
- BC00042EBC002D4187000000000000000000000000000000000090A3E3003B51
- A2002F4385002F4284002E4284002E4183002E4183002E408100405DBD000F34
- AF00042AAA00425EBD002C3E7D002B3D7C002B3C7A002B3C7A002B3C79002A3C
- 7800344A95008196DC000000000000000000000000002D4185004362CA00042D
- B800042DB600042DB600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00042AAA00042A
- AA00042AA900425EBD000000000000000000000000000000000000000000384E
- 98000E3ACB000F3ACB000F3ACB000C2FA3000C2FA3000C2FA3000C2FA3000C2F
- A3000C2FA3000C2FA3000C2FA3000C2FA3000C2FA3000F3ACB000F3ACB004567
- D600384E980000000000000000000000000000000000000000002F438A00042F
- BE000000000000000000042FBE005673D3005673D3005673D3005673D3005673
- D3005673D3005673D3005673D3005673D3005673D300042FBE00000000000000
- 0000042FBE002F438A00000000000000000000000000546CC100405498004D66
- B7004261CA004362CA004362C9004261C7004361C7004361C7001036B600042C
- B100042BB0003655BE00425FC1004360C100425FBF00425EBE00435FBE004661
- B9004B60A8003B4C87000000000000000000000000002F438A004363CE000530
- BE00042EBC00042EBB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0003259600042B
- AE00042BAE00425FC1000000000000000000000000000000000000000000384D
- 9800153FCA001740CA001740CA001740CA001740CA001740CA001740CA001740
- CA001740CA001740CA001740CA001740CA001740CA001740CA001740CA004868
- D500384D9800000000000000000000000000000000000000000030448C00042F
- C0000000000000000000042FC0005F7AD7005F7AD7005F7AD7005F7AD7005F7A
- D7005F7AD7005F7AD7005F7AD7005F7AD7005F7AD700042FC000000000000000
- 0000042FC00030448C00000000000000000000000000506AC100294FD0000C38
- CA000D38C8000C37C6000C37C6000934C3000833C2000833C1000631BF00052F
- BD00042EBC00042EBA00042EB900042DB800042DB600042DB600042DB500042C
- B300042CB2002346BB00354B96000000000000000000334993004A6BD800143E
- CA00153EC900143DC800123CC8000C30A8000A2FA700092EA700062BA4001437
- A9001437A9000328A1000328A1000328A00003279F0003279F0003279F00042D
- B800042DB8004362C90000000000000000000000000000000000000000003A50
- 9B00254CCF00274ECF00274ECF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00274ECF00274ECF004D6D
- D8003A509B000000000000000000000000000000000000000000324790000430
- C3000430C3000430C3000430C300718ADD00718ADD00718ADD00718ADD00718A
- DD00718ADD00718ADD00718ADD00718ADD00718ADD000430C3000430C3000430
- C3000430C300324790000000000000000000000000004B6BD7001440D1001641
- D1001943CF001943CF001842CE00153FCB00143ECA00133DC900103AC7000E38
- C5000D37C4000B35C2000933C1000832BF000630BD00052FBC00052FBB00042E
- B900042DB8000831B90033468A000000000000000000354B98004E6FDC001D46
- D1002149D1001F48D0001D46CF001A43CD001841CC001640CB002148CC00D1D9
- F400D1D9F4000B36C5000A35C4000833C3000530C1000530C100042FBF00042F
- BE00042FBD004363CD0000000000000000000000000000000000000000003B51
- 9C002D53D2003055D2003055D2002745A9002745A9002745A9002745A9002745
- A9002745A9002745A9002745A9002745A9002745A9003055D2003055D2005070
- D9003B519C000000000000000000000000000000000000000000334893000430
- C4000430C4000430C4000430C4007B92E0007B92E0007B92E0007B92E0007B92
- E0007B92E0007B92E0007B92E0007B92E0007B92E0000430C4000430C4000430
- C4000430C40033489300000000000000000000000000496CE1001945D800214B
- D800264FD800254ED700234CD500214AD3001F48D1001E47D1001B44CE001A43
- CD001841CC00163FCA00143DC800133DC800103AC5000F39C4000E38C3000A34
- C0000933BF000630BD00364A90000000000000000000384F9D005172E000264F
- D8002C53D7002A51D6002951D600254DD400234BD300214AD200D3DBF500FFFF
- FF00FFFFFF00254CCF00153FCB00133DCA000F3AC8000E39C7000C37C7000833
- C4000632C3004364D10000000000000000000000000000000000000000003C53
- 9D003358D400375CD400375CD400375CD400375CD400375CD400375CD400375C
- D400375CD400375CD400375CD400375CD400375CD400375CD400375CD4005271
- DA003C539D000000000000000000000000000000000000000000354A95000532
- C70000000000000000000532C700859BE300859BE300859BE300859BE300859B
- E300859BE300859BE300859BE300859BE300859BE3000532C700000000000000
- 00000532C700354A95000000000000000000000000004E72EA002B56E5003961
- E6003D64E5003B62E3003A61E300375EE100365DE000355CDF003259DD003057
- DC002F56DB002C54D9002B53D8002A52D700274FD500264ED400244CD3002149
- D1001E47D0001640CD003A519B0000000000000000003C54A7005879E800375E
- E2004267E3004065E2003F64E2003B61E0004569E100D9E0F800FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00D6DDF700365BDA00264ED600244DD600224BD4001E47
- D2001742D0004B6CDB0000000000000000000000000000000000000000003E55
- A1004366D900486AD900486AD900FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00486AD900486ADA005776
- DC003E55A1000000000000000000000000000000000000000000394F99000D39
- CB000D39CB000D39CB000D39CB009CAEEA009CAEEA009CAEEA009CAEEA009CAE
- EA009CAEEA009CAEEA009CAEEA009CAEEA009CAEEA000D39CB000D39CB000D39
- CB000D39CB00394F99000000000000000000000000005176EE00335DEB00436A
- EB00486DEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF002C53
- D8002850D7001E48D4003E54A00000000000000000003F58AB005C7DEC003F66
- E7004D71E9004B6FE700496EE7005073E600DBE2F900FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00D8DFF8003158DC002F56DB002D55DA002951
- D900204AD6004E6FDE0000000000000000000000000000000000000000004056
- A2004A6CDB005171DD005171DD00405AB000405AB000405AB000405AB000405A
- B000405AB000405AB000405AB000405AB000405AB0005171DD005070DD005977
- DD004056A20000000000000000000000000000000000000000003B519B00113D
- CE00113DCE00113DCE00113DCE00113DCE00113DCE00113DCE00113DCE00113D
- CE00113DCE00113DCE00113DCE00113DCE00113DCE00113DCE00113DCE00113D
- CE00113DCE003B519B000000000000000000000000005378F1003B64EF004D72
- F0005277EF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00385E
- DF003259DD00264FDA004157A6000000000000000000415AB1006081F000486D
- EC00587BED005679EC005477EC00DDE4FA00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005F7EE6003A60E000395FE000335A
- DE002952DC005173E20000000000000000000000000000000000000000004157
- A5005272DD005978DE005978DE005978DE005978DE005978DE005978DE005978
- DE005978DE005978DE005978DE005978DE005978DE005978DE005978DE005D7B
- E0004157A50000000000000000000000000000000000000000003E539E001641
- D1001641D1001641D1001641D100728CE300728CE3006783E0006480E000607D
- E0005574DD005574DD004D6EDC004568DA004568DA001641D1001641D1001641
- D1001641D1003E539E00000000000000000000000000587CF2004A70F0006283
- F2006989F3006888F3006787F3006485F3006384F3006183F2005F81F2005D80
- F2005C7FF200597CF100587BF100567AF0005478EF005276EE005074EC004E73
- EB00486DEA00365FE700465FB3000000000000000000455EB6006787F300597C
- F2006E8DF3006D8CF3006B8AF3005B77D5005772CF005570CD00FFFFFF00FFFF
- FF00FFFFFF004C69CB004A68CB004866CA004563C9004564CA004D71E700486D
- E9003A62E700597BEA000000000000000000000000000000000000000000435A
- A800617FE2006A86E3006A86E300FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF006A86E3006985E300617E
- E100435AA80000000000000000000000000000000000000000004258A2001E48
- D50000000000000000001E48D5004E6FDE004E6FDE004E6FDE004E6FDE004E6F
- DE004E6FDE004E6FDE004E6FDE004E6FDE004E6FDE001E48D500000000000000
- 00001E48D5004258A2000000000000000000000000005A7DF2005176F1006C8B
- F3007592F4007491F4007290F400708EF4006E8DF3006D8CF3006A8AF3006989
- F3006787F3006485F3006384F3006283F2005F81F2005E80F2005C7FF100597C
- F0005176EF003D65EC004962B80000000000000000004660B7006B8AF3006183
- F2007A96F4007894F4007693F4007391F400718FF4006F8DF300FFFFFF00FFFF
- FF00FFFFFF005671CE006384F3006082F1005C7EF0005B7EF000597CEF005276
- EE004269EB005C7EEE000000000000000000000000000000000000000000445B
- AA006985E300728CE500728CE5005A6FB7005A6FB7005A6FB7005A6FB7005A6F
- B7005A6FB7005A6FB7005A6FB7005A6FB7005A6FB700728CE500718BE5006481
- E300445BAA0000000000000000000000000000000000000000004359A500234C
- D700234CD700234CD700234CD7005978E0005978E0005978E0005978E0005978
- E0005978E0005978E0005978E0005978E0005978E000234CD700234CD700234C
- D700234CD7004359A5000000000000000000000000005D80F200587CF2007693
- F400809BF500FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF006485
- F3005B7EF200456CF0004C66BD0000000000000000004761B8006E8DF3006A8A
- F300849EF500829DF500819BF5007E99F5007C97F4007A96F400FFFFFF00FFFF
- FF00FFFFFF005E78CF006D8CF3006C8BF3006888F3006686F3006586F3005E80
- F2004B71F0006082F1000000000000000000000000000000000000000000465D
- AB00708BE5007A94E8007A94E8007A94E8007A94E8007A94E8007A94E8007A94
- E8007A94E8007A94E8007A94E8007A94E8007A94E8007A94E8007892E6006683
- E400465DAB000000000000000000000000000000000000000000455BA8002750
- D9002750D9002750D9002750D9006481E4006481E4006481E4006481E4006481
- E4006481E4006481E4006481E4006481E4006481E4002750D9002750D9002750
- D9002750D900455BA8000000000000000000000000006183F2006586F30088A2
- F60096ACF7007F92D2007D90D1007C90D2007A8ED1007A8ED100778CD100758A
- D000758AD1007288D1007086D0007086D1006E85D0006C83CF006B82D0007B97
- F4006E8DF3005277F1004F69C00000000000000000004963BA007491F4007995
- F4009BB0F70099AFF70097ADF70093AAF60091A8F60090A8F600FFFFFF00FFFF
- FF00FFFFFF007187D100839EF500829CF5007F9AF5007D98F5007B97F400718F
- F400597CF2006686F3000000000000000000000000000000000000000000485F
- AF007F98EA008AA0EB008AA0EB008AA0EB008AA0EB008AA0EB008AA0EB008AA0
- EB008AA0EB008AA0EB008AA0EB008AA0EB008AA0EB008AA0EB0089A0EB006A86
- E500485FAF0000000000000000000000000000000000000000004A60AD003058
- DE0000000000000000003058DE007A94EA007A94EA007A94EA007A94EA007A94
- EA007A94EA007A94EA007A94EA007A94EA007A94EA003058DE00000000000000
- 00003058DE004A60AD000000000000000000000000006183F2006A8AF3008FA7
- F600A2B6F800A0B4F7009FB3F7009CB1F7009BB0F70099AFF70097ADF70095AC
- F70094ABF60091A8F60090A8F6008EA6F6008CA5F6008AA3F60089A2F600849E
- F5007693F400577BF200506AC10000000000000000004B64BB007693F4007D98
- F500A6B9F800A4B7F800A2B6F8009FB3F7009DB2F7009BB0F700FFFFFF00FFFF
- FF00FFFFFF007B8FD1008EA6F6008CA5F60089A2F60087A1F500859FF5007995
- F4005F81F2006888F30000000000000000000000000000000000000000004960
- B000879EEB0093A8ED0093A8ED0093A8ED0093A8ED0093A8ED0093A8ED0093A8
- ED0093A8ED0093A8ED0093A8ED007D8EC9007D8EC9007D8EC9007B8DC9005A73
- C4004960B00000000000000000000000000000000000000000004C62AF00355C
- E0000000000000000000355CE000849CEC00849CEC00849CEC00849CEC00849C
- EC00849CEC00849CEC00849CEC00849CEC00849CEC00355CE000000000000000
- 0000355CE0004C62AF000000000000000000000000006183F2006989F30091A8
- F600ADBEF800ACBDF800AABCF800A7B9F800A6B9F800A5B8F800A2B6F800A1B5
- F7009FB3F7009CB1F7009BB0F7009AAFF70097ADF70096ACF70094ABF6008CA5
- F6007A96F4005A7DF200516BC20000000000000000004C65BC007C96EF007F9A
- F500ADBEF800AFC0F900ADBEF800AABCF800A8BAF800A6B9F800A3B6F800899A
- D3008798D2008496D2009AAFF70098AEF70094ABF60092A9F60090A8F6007B97
- F4006283F200718EEE0000000000000000000000000000000000000000004B62
- B2008EA4ED009BAEEF009BAEEF009BAEEF009BAEEF009BAEEF009BAEEF009BAE
- EF009BAEEF009BAEEF009BAEEF008494CC00485EAB00485EAB00485EAB005167
- B0004B62B20000000000000000000000000000000000000000004F64B1003960
- E2003960E2003960E2003960E2008FA5EF008FA5EF008FA5EF008FA5EF008FA5
- EF008FA5EF008FA5EF008FA5EF008FA5EF008FA5EF003960E2003960E2003960
- E2003960E2004F64B1000000000000000000000000006581E0006183F200708E
- F400A2B6F800A9BBF800ACBDF800ABBDF800AABCF800AABCF800A8BAF800A6B9
- F800A5B8F800A2B6F800A1B5F700A0B4F7009CB1F70099AFF70093AAF6007B97
- F4006283F2005D80F2005570CB0000000000000000007990E3005F77C8008AA2
- F1008AA3F60091A8F60094ABF60094ABF60093AAF60093AAF60090A8F6008EA6
- F6008DA5F6008AA3F60088A2F60086A0F500829DF500809BF5007995F4007391
- F4007D97EF005D74C70000000000000000000000000000000000000000004D65
- B6009BAEF000ABBBF200ABBBF200ABBBF200ABBBF200ABBBF200ABBBF200ABBB
- F200ABBBF200ABBBF200ABBBF20092A0CF00C7D2F600AEBEF200718CE7004C65
- B900BFCCF5000000000000000000000000000000000000000000536AB7004267
- E6004267E6004267E6004267E600A2B4F300A2B4F300A2B4F300A2B4F300A2B4
- F300A2B4F300A2B4F300A2B4F300A2B4F300A2B4F3004267E6004267E6004267
- E6004267E600536AB7000000000000000000000000005C75CB006282EC006686
- F3007995F400829CF500849EF50086A0F500859FF500849EF500839EF500829D
- F500829CF500809BF5007F9AF5007E99F5007B97F4007894F4007290F4006586
- F3006183F2006583EC007A92E500000000000000000000000000546FCB006078
- C9007C97F400809BF500829DF500839EF500829DF500829DF500819BF500819B
- F500809BF5007F9AF5007E99F5007E99F5007B97F4007A96F4007794F400718B
- E6005E75C8006680D90000000000000000000000000000000000000000004E66
- B80097ABEF00AEBEF300B1C1F300B2C1F300B2C1F300B2C1F300B2C1F300B2C1
- F300B2C1F300B2C1F300B1C1F30096A3CF00A6B7F100738EE800546DC200BFCC
- F500000000000000000000000000000000000000000000000000546BB900466B
- E7000000000000000000466BE700AABBF400AABBF400AABBF400AABBF400AABB
- F400AABBF400AABBF400AABBF400AABBF400AABBF400466BE700000000000000
- 0000466BE700546BB9000000000000000000000000006983DD006079CB00627E
- E0006586F3006888F3006A8AF3006B8AF3006B8AF3006B8AF3006B8AF3006B8A
- F3006B8AF3006A8AF3006A8AF3006A8AF3006989F3006888F3006586F3006A88
- EC006380E0005D77CC0000000000000000000000000000000000000000007991
- E3005069C0005069C0005069C0005069C0005069C0005069C0005069C0005069
- C0005069C0005069C0005069C0005069C0005069C0005069C0005069C000506A
- C3007991E3000000000000000000000000000000000000000000000000004F67
- BA00879FEE009DB0F100A5B6F100A8B9F200A8B9F200A8B9F200A8B9F200A8B9
- F200A8B9F200A7B8F100A5B6F1008898CD006986E7005770C4004F67BD000000
- 0000000000000000000000000000000000000000000000000000576DBB00496E
- E9000000000000000000496EE900B2C2F500B2C2F500B2C2F500B2C2F500B2C2
- F500B2C2F500B2C2F500B2C2F500B2C2F500B2C2F500496EE900000000000000
- 0000496EE900576DBB0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000516A
- C000516ABD00516ABD00516ABD00516ABD00516ABD00516ABD00516ABD00516A
- BD00516ABD00516ABD00516ABD00516ABD00516AC000BFCDF500000000000000
- 00000000000000000000000000000000000000000000000000007790E100546B
- BE005A71C1005A71C1005A71C1005A71C1005A71C1005A71C1005A71C1005A71
- C1005A71C1005A71C1005A71C1005A71C1005A71C1005A71C1005A71C1005A71
- C100546BBE007790E10000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000B6C5F1006177C500273773002534
- 6A0025346A0027377300364D96006177C5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000002D4085003A4A7D0047589300556AB000556A
- B000556AB000556AB0004F62A100475893002D4085008195DB00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000005B74C7004455
- 94004F64AD005062A1004057A900000000000000000000000000000000000000
- 00006780CF005369B3004F64AD005062A1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00008297DD00334580005467A7003351B7001134AA002444B1004E68BF004E68
- BF004E68BF004E68BF003C59B9002444B1003351B700506ABE005467A7008297
- DD00000000000000000000000000000000000000000013131300121212001111
- 1100111111001111110011111100111111001111110011111100111111001111
- 1100111111001111110011111100111111001111110011111100121212001212
- 120013131300141414001111110000000000031D3D00093C7B00093C7B00093C
- 7B00093C7B00093C7B00093C7B00093C7B00093C7B00093C7B00093C7B00093C
- 7B00093C7B00093C7B00093C7B00093C7B00093C7B00093C7B00093C7B00093C
- 7B00093C7B00093C7B00010D1D00000000000000000000000000374E9E005671
- CE000B206700435FBF0041569C002A3B75002A3B75002A3B75002A3B75002A3B
- 7500364C960010266E000B206700435FBF00D1DAF80000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00003A4B8900566DB800415EC100294AB900546FC70093A3DB00E7EBF700E7EB
- F700B9BCC600E7EBF700C2CBEA0093A3DB00294AB9001136B100415EC1003A4B
- 89005068BB00000000000000000000000000000000003B3B3B003C3C3C003C3C
- 3C003C3C3C003C3C3C003C3C3C003C3C3C003C3C3C003C3C3C003C3C3C003C3C
- 3C003C3C3C003C3C3C003C3C3C003D3D3D003D3D3D003D3D3D003D3D3D003D3D
- 3D003D3D3D003D3D3D001B1B1B00000000000C458B001D54AB001E54A9001E54
- A9001E54AA001E54AA001E54AA001E54AA001E54AA001E54AA001E54AA001E54
- AA001E54AB001E54AB001E54AB001E54AB001E54AB001E54AB001D54AB001D54
- AB001D54AB001C54AE000D468C000000000000000000000000003E58AE00274F
- D600021C7100153EC700455DAE000E2D9A000E2D9A000E2D9A000E2D9A000E2D
- 9A003A54AE00031E7900021C7100153EC7000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000859A
- E0005971C1003253C2000D34B6008999CC00CACFDF00E6EAF800E6EAF800E6EA
- F800C9CDD900E6EAF800E6EAF800E6EAF8008999CC00415FC5000D34B6005971
- C1003D4F8F00859AE0000000000000000000000000002A2A2A002E2E2E003939
- 39003939390039393900393939003939390039393900393939003A3A3A003A3A
- 3A003A3A3A003A3A3A003A3A3A003A3A3A003A3A3A003A3A3A003A3A3A003A3A
- 3A003B3B3B00323232001F1F1F00000000000F47910014439D0014439D001544
- 9E0015449E0015449E0015449E0015449E0015449E0015449E0015449E001544
- 9E0015449E0015449E0015449E0015449E0015449E0015449E0015449E001544
- 9E0015449E003E8AD8000C458B00000000000000000000000000000000006983
- DA00435CB300516CCA0000000000000000000000000000000000000000000000
- 000000000000435CB300435CB3003754B7000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003B53A3005A70
- BB000934C5004B6AD300E1E6F800E5EAF800DADFEC00E5EAF800E5EAF800E5EA
- F800E5EAF800E5EAF800E5EAF800E3E8F600E5EAF800E5EAF800E1E6F8000934
- C5004162D1005A70BB0000000000000000000000000032323200343434003C3C
- 3C003C3C3C003C3C3C003C3C3C003C3C3C003C3C3C003C3C3C003D3D3D003D3D
- 3D003D3D3D003D3D3D003D3D3D003D3D3D003D3D3D003D3D3D003D3D3D003D3D
- 3D003E3E3E003838380012121200000000000F47920015459F001546A0001546
- A0001647A1001647A1001647A1001647A1001647A1001647A1001647A1001647
- A1001647A1001647A1001647A1001647A1001647A1001647A1001647A1001647
- A1001647A1001D55AF000C458B00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000003F56A6001939A600869BE10000000000000000000000
- 000000000000000000000000000000000000000000008A9DE4004E61A8005271
- D8002A50D100CDD6F500E5EAF900E5EAF900E5EAF900E5EAF900E5EAF900E5EA
- F900E5EAF900E5EAF900E5EAF900E5EAF900E5EAF900E5EAF900E5EAF9002A50
- D100123DCD005271D8008A9DE4000000000000000000272727004E4E4E004040
- 40003F3F3F003F3F3F003F3F3F003F3F3F003F3F3F003F3F3F00404040004040
- 4000404040004040400040404000404040004040400040404000404040004040
- 4000424242004B4B4B0005050500000000000F4892001749A300184CA600194D
- A7001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4F
- A9001A4FA9001B4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4F
- A9001B51AB00448EDA000C458B00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000007A8FDB002D469B004E66BC0000000000000000000000
- 00000000000000000000000000000000000000000000425AAE005B75CA003359
- D9008497D600D2D7E400E5EAFA00E5EAFA00E5EAFA00E5EAFA00E5EAFA00E5EA
- FA00E5EAFA00E5EAFA00E5EAFA00E5EAFA00E5EAFA00E5EAFA00E5EAFA008497
- D6000938D3003359D900425AAE00000000000000000000000000121212002C2C
- 2C00686868006161610055555500464646004646460046464600464646004646
- 46004646460046464600464646004747470049494900535353005E5E5E004A4A
- 4A00303030001313130000000000000000000F4893001A4EA8001B51AB001C54
- AE001E57B1001E57B1001E57B1001E57B1001E57B1001E57B1001E57B1001E57
- B1001E57B1001E57B1001E57B1001E57B1001E57B1001E57B1001E57B1001E57
- B1001E57B1004C92DC000B448A000000000000000000465EB3006279C300607C
- D900617EDE00617EDE00627EDE00637FDF00637FDF00637FDF00637FDF00637F
- DF00627EDE00617EDE00607DDE005F7CDE004F64AB008A9EE500000000000000
- 000000000000000000000000000000000000000000005871C8004268E7000537
- DF00E5EAFB00DFE4F500E5EAFB00E5EAFB00E5EAFB00E5EAFB00E5EAFB00E5EA
- FB00E5EAFB00E5EAFB00E5EAFB00E5EAFB00E5EAFB00E5EAFB00E5EAFB00E5EA
- FB00809AEE000537DF005871C800738BDD000000000000000000000000000202
- 02002F2F2F003C3C3C00525252006A6A6A004F4F4F00494949004A4A4A004A4A
- 4A004A4A4A004A4A4A004A4A4A00515151006D6D6D0058585800434343001C1C
- 1C0002020200000000000000000000000000104894001A4EA8001B52AC001C55
- AF001E58B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58
- B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58
- B2001E58B2001E58B2000B448A0000000000000000004057A6006B85DC00355B
- DA002F54CE003D62DC00365BD3003E63DB00365AD2003357CF00365AD2003256
- CE003E63DC003055CE003A5FDC002B50CD00647CCB00556FC700000000000000
- 000000000000000000000000000000000000000000005C78D8002A56EA000539
- E600E5EBFC00E5EBFC00E5EBFC00E5EBFC00E5EBFC00E5EBFC00E5EBFC00E5EB
- FC00E5EBFC00E5EBFC00D5DAE6009C9B9D00E5EBFC00E5EBFC00E5EBFC00E5EB
- FC00C2CFF8000539E6005C78D800536ECA000000000000000000000000000000
- 0000020202000F0F0F001E1E1E003A3A3A0065656500585858004D4D4D004D4D
- 4D004D4D4D004D4D4D00606060006A6A6A0033333300202020000F0F0F000000
- 000000000000000000000000000000000000104894001A4EA8001B52AC001C55
- AF001E58B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58B2001E58
- B2001E58B2001E58B2001E58B2001E58B200053D8200053D82000D418700053D
- 8200053D8200053D8200053D820003254F00000000005066B100758FE600476B
- E300032597004A6AD700082A9C004B6BD700082A9C0003259700082A9C000325
- 97004B6BD700032597004768D600032597007B93E100485FAE00000000000000
- 000000000000000000000000000000000000000000005C7CE9001849EC00053A
- EB00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00E6ECFD00C5CA
- D900B8BDCA00C9CCD6009B989800B8B9BF00E6ECFD00E6ECFD00E6ECFD00E6EC
- FD00E8EDFD00053AEB005C7CE9004862BC000000000000000000000000000000
- 0000000000000000000000000000000000000101010031313100545454005454
- 5400545454004646460026262600010101000000000000000000000000000000
- 000000000000000000000000000000000000114995001A4EA8001C53AD001D56
- B0001F59B3001F59B3001F59B3001F59B3001F59B3001F59B3001F59B3001F59
- B3001F59B3001F59B3001F59B3001F59B3001C54AE003D5978006C715C003458
- 88001C54AE001C54AE001A4FA900053D820000000000657BC5007F9AF1007490
- F0000328A000607DDD000328A000607DDD000328A0000328A0000328A0000328
- A000607DDD000328A000607DDD000328A0007D98F200758BD8005C76D2000000
- 000000000000000000000000000000000000000000006683E9002C59EE001B4B
- ED00CBD0DD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00E9EEFD00ADAB
- A9009C999700E0E4F100E8EDFD00E8EDFD00E8EDFD00E8EDFD00E8EDFD00CBD0
- DD00BABECB001B4BED006683E9004A63BB000000000000000000000000000000
- 0000000000000000000000000000000000000000000028282800595959005959
- 590059595900444444001B1B1B00000000000000000000000000000000000000
- 000000000000000000000000000000000000114A9600194FA9001C53AD001D57
- B1001F5AB4001F5AB4001F5AB4001F5AB4001F5AB4001F5AB4001F5AB4001F5A
- B4001F5AB4001F5AB4001F5AB4001F5AB4001C54AE003F463C0032372C003B45
- 42001A4FA9001A4FA9001A4FA900053D8200000000006C83D3008AA3F500859F
- F4000328A4006D87E1000328A4006D87E1000328A4000328A4000328A4000328
- A4006D87E1000328A4006D87E1000328A4007A95F00094A9EF00526AC0000000
- 000000000000000000000000000000000000000000006A88EB003761EF002755
- EE00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00CACA
- CB00C3C1C000E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EEFD00E9EE
- FD00D8DDEA002755EE006A88EB004B64BC000000000000000000000000000000
- 000000000000000000000000000000000000040404003F3F3F005D5D5D005D5D
- 5D005D5D5D005A5A5A003B3B3B00030303000000000000000000000000000000
- 000000000000000000000000000000000000114A97001A4FA9001D54AE001E58
- B200205BB500205BB500205BB500205BB500205BB500205BB500205BB500205B
- B500205BB500205BB500205BB500205BB5001C54AE0043586C00D3D6B6003956
- 7B001A4FA9001A4FA9001A4FA900053D820000000000748AD6008DA5F60095AC
- F7000328A4007891E3000328A4007891E3000328A4000328A4000328A4000328
- A4007891E3000328A4007891E3000328A4006E88E20095ACF7006A80CB000000
- 00000000000000000000000000000000000000000000708BEB00426AF000335E
- EF00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEF
- FD008D8A8800EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEFFD00EAEF
- FD00D4D8E600335EEF00708BEB004C66BF000000000000000000000000000000
- 000000000000000000000000000000000000434343005F5F5F00636363006363
- 6300636363006363630060606000333333000000000000000000000000000000
- 000000000000000000000000000000000000114B97001A50AA001D55AF001E59
- B300205CB600205CB600205CB600205CB600205CB600205CB600205CB600205C
- B600205CB600205CB600205CB600205CB6005495DE003786D500327DCE00327D
- CE00327DCE00327DCF002D77C400032F6500000000007A91E200839EF50094AB
- F6000328A4007D94E2000328A4007D94E2000328A4000328A4000328A4000328
- A4007D94E2000328A4007D94E2000328A4007991E20090A8F60098ACF0000000
- 000000000000000000000000000000000000000000006D85D8007391F4004C72
- F100EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1
- FE0098959300EDF1FE00EDF1FE00EDF1FE00EDF1FE00EDF1FE00E9EDFA00EDF1
- FE007588C8004C72F1006D85D8007990E3000000000000000000000000000000
- 0000000000000000000000000000020202004E4E4E0065656500666666006666
- 6600666666006666660066666600414141000000000000000000000000000000
- 000000000000000000000000000000000000124B98001A4FA9001D55AF001F59
- B300215CB600215CB600215CB600215CB600215CB600215CB600215CB600215C
- B600215CB600215CB600215CB600215CB600215CB600215CB600215CB600215C
- B600215CB6006EA7E8000B4489000000000000000000829BED007290F400849E
- F5003C5BC30095AAF2003454BE008EA4ED00173AAF000328A4000D31A9000328
- A4007D94E2000328A4007D94E2000328A4007891E30088A2F60090A8F60092A7
- EC000000000000000000000000000000000000000000647AC700819CF3005E80
- F200C1C6D400CCCFDA00E2E6F100EEF2FE00EEF2FE00EEF2FE00EEF2FE00EEF2
- FE009E9B9900EEF2FE00EEF2FE00EEF2FE00EEF2FE00EEF2FE00EEF2FE00C1C6
- D4005370D2005E80F2006479C700BFCDF6000000000000000000000000000000
- 0000000000000000000000000000131313005151510068686800696969006969
- 69006969690069696900696969004A4A4A000000000000000000000000000000
- 000000000000000000000000000000000000124C99001A50AA001D56B0001F59
- B300215DB700215DB700215DB700215DB700215DB700215DB700215DB700215D
- B700215DB700215DB700215DB700215DB700215DB700215DB700215DB700215D
- B700215DB70070A9EA000B44890000000000000000008098E700859FF5008CA5
- F6009AAFF70092A9F60094ABF6008CA5F600859EF1008099EC006E89E100617C
- D8009EB3F7003E5DC30095AAF200294AB9007D97EB007D98F5007D98F500617C
- D8000000000000000000000000000000000000000000526CC8008399E4007D98
- F5007582AE00D7DAE400EFF3FE00EFF3FE00EFF3FE00EFF3FE00EFF3FE00EFF3
- FE00A8A5A400EFF3FE00EFF3FE00EFF3FE00EFF3FE00EFF3FE00EFF3FE007582
- AE006282EE007E99F500526CC800000000000000000000000000000000000000
- 0000000000000000000000000000222222005B5B5B006F6F6F00707070007070
- 7000707070007070700070707000585858000000000000000000000000000000
- 000000000000000000000000000000000000134C99002661B5003071C2003479
- C900377DCD00377DCD00377DCD00377DCD00377DCD00377DCD00377DCD00377D
- CD00377DCD00377DCD00377DCD00377DCD00377DCD00377DCD00377DCD00377C
- CD00387ECE002360B9000B448A00000000000000000000000000AFBFF300AFBF
- F3007C92E5007C92E5007C92E5005E79D5005E79D500566FC700687ECD006A80
- CD006A80CD00768BD9007B91DB007F97E4008098E600809AEF007893EE006077
- CA0093A7ED000000000000000000000000000000000000000000536EC900889D
- E4007F9AF5006377B900D1D5E100F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5
- FE00DCDDE200F2F5FE00F2F5FE00F2F5FE00F2F5FE00F2F5FE00D1D5E1007F9A
- F50095ACF7008A9FE20000000000000000000000000000000000000000000000
- 00000000000000000000000000001D1D1D005A5A5A0072727200737373007373
- 7300737373007373730073737300555555000000000000000000000000000000
- 000000000000000000000000000000000000134C9A002D6ABC00377ACB003B81
- CF003D84D2003D84D2003D84D2003D84D2003D84D2003D84D2003D84D2003D84
- D2003D84D2003D84D2003D84D2003D84D2003D84D2003D84D2003D84D2003D84
- D2003D84D20074ABEB000B448A00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000C1CD
- F600AFBFF300859BE9007C93E5007C93E5005E79D6005E79D6005770C8004D6A
- CC00647EDA000000000000000000000000000000000000000000BFCDF6006178
- C9009DB2F700869FF1006878B100DDE0E700C8CAD100ECEFF700F3F6FE00F3F6
- FE00F3F6FE00F3F6FE00F3F6FE00F3F6FE00DADDE400C0C5D6006878B1009DB2
- F7009EAFEE005C74C70000000000000000000000000000000000000000000000
- 00000000000000000000000000000D0D0D005E5E5E0075757500767676007676
- 7600767676007676760076767600565656000000000000000000000000000000
- 000000000000000000000000000000000000134D9B001E57B1006AA0E30070A6
- E700225FB90074ABEB0074ABEB00225FB90074ABEB0074ABEB00225FB90074AB
- EB0074ABEB00225FB90074ABEB0074ABEB00225FB90074ABEB0074ABEB00225F
- B90074ABEB0074ABEB000C458A00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000006B85DE002C57
- E700647CCD00647CCD005A72CB000000000000000000000000000000000092A7
- EC00A7B8F300A6B9F80094AAF2008A92AF00C9CCD500F4F7FE00F4F7FE00F4F7
- FE00D4D6DD00F4F7FE00F4F7FE00F4F7FE008A92AF007182BB0094AAF200ABBB
- F4006279C90092A7EC0000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000039393900696969007C7C7C007C7C
- 7C007C7C7C008181810067676700191919000000000000000000000000000000
- 0000000000000000000000000000000000001A529A007FB5F200337ECF003481
- D1003786D5003786D5003786D5003786D5003786D5003786D5003786D5003786
- D5003786D5003786D5003786D5003786D5003786D5003786D5003786D5003786
- D5003786D5007FB5F2000C458B00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000005872
- C9005872C9005872C9005872CA00000000000000000000000000000000000000
- 000092A7EC005F77CA009AABE600B5C5F900AEBEF40096A5D7007985AD007985
- AD007985AD007985AD008694C00096A5D700B6C6F900B3C3F8009AACE70092A7
- EC00000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000002020200494949008F8F8F008A8A
- 8A00898989007070700044444400020202000000000000000000000000000000
- 0000000000000000000000000000000000000D468B001A4FA9001A4FA9001A4F
- A9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4F
- A9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4FA9001A4F
- A9001A4FA9000C458B00010D1C00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000C1CDF6005872CD00A0B0EB00B9C8F900BECCFA00BBCAFA00BCCA
- FA00BCCAFA00BBCAFA00BDCBFA00BFCDFA00A1B2EB007489D3005872CD000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000007070700525252005D5D
- 5D005D5D5D003535350007070700000000000000000000000000000000000000
- 000000000000000000000000000000000000031C3B000D468B000D468B000D46
- 8B000D468B000D468B000D468C000D468C000D468C000D468C000D478C000D46
- 8C000D468C000D468C000D468C000D468C000D468C000D468C000D468C000D46
- 8C000D468C000D468C0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005874CD007287D1008B9FE100ACBCF400ACBC
- F500ADBDF500ACBCF4009DAEEA008C9FE1005874CD0093A7ED00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000319F700032A07100319F
- 700031A07000319F710032A0710032A0700031A0710032A07000D58F6A00D58F
- 6A00D58F6A00D58F6A00D58F6A00D58F6A00D58F6A00000000001560BC001560
- BD001560BD001660BD0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000101000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BD8B6B00D39E7A00D39E
- 7B00D39E7A00D39E7A00D39E7A00D49E7A00D49E7A00D49E7A00D49E7A00D49E
- 7A00D49E7A00D49F7A00D49F7A00D49F7A00D49F7A00D59F7A00D59F7A00D59F
- 7A00D59F7A00D59F7A0073513D000000000000000000CC886500EEA97A00EEA9
- 7A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A001361DF001361
- DF001361DF001361DF000F3EB000EEA97A00EEA97A00EEA97A00EEA97A00EEA9
- 7A00EEA97A00EEA97A00CC88650000000000000000000DC9920013B98C0013B9
- 8C0013B98C0013B98C0013B98C0013B98C000EC992002FA17100D58F6A00EBA5
- 7D00E19D7900E19D7900E19D7900E19D7900D58F6A00000000001661BE00076E
- E600076EE6000578EA0000000000000000000000000000000000000000000000
- 00000000000000000000000000002A9C75002A9C75002A9C7500000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000C2937200F5C49C00F3BD
- 9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD
- 9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD9400F3BD
- 9400F3BD9400F5C49C00D09775000201010000000000CC886500EEA97A00E59E
- 7500DF977200DF977200DF977200DF977200DF977200DC936F000353DC000353
- DC000352DB000353DB000F3FB100DD946F00DF977200DF977200DF977200DF97
- 7200DF977200E59E7500CC88650000000000000000000DCA930013B98C000DCA
- 93000DCA93000DCA94000DCA930013B98C000DCA93002FA27200D58F6A00ECA5
- 7D00E29E7900ECA57D00ECA57C00E29E7900D58F6B00000000001662C000057A
- EB000388F000057BEA0000000000000000000000000000000000000000000000
- 000000000000040F0B000000000035CD980015B0810038D19B000D3427000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000DDAB8600C5967400F5C9
- A300E8B69000E8B69000E8B69000E8B69000E8B69000E8B69000E8B69000E8B6
- 9000E8B69000E8B68F00E8B68F00E8B68F00E8B68F00E8B68F00E8B68F00E8B6
- 8F00F5C9A300CF9D7A00D09775000202010000000000CD896500EEA97A00DF97
- 7200DF977200DF977200DF977200DF977200DF977200DB916E000455DC000455
- DC000454DC000454DC000E40B300DC926E00DF977200DF977200DF977200DF97
- 7200DF977200DF977200CD89650000000000000000000DCB950013BA8D000DCB
- 95000DCC94000DCB94000DCB940013B98C000ECB94002EA27300D68F6A00ECA5
- 7E00E39E7A00ECA67D00ECA67D00E39E7A00D5906B00000000001764C300057C
- EB000389F000057CEB0000000000000000000000000000000000000000000000
- 000002090600000000002A9C750013B0820013B0820017B6870025977100030C
- 0900000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000F4C49B00F0C19800E7B8
- 9100F7D3B400EBBD9600F5C89F00F5C79E00F5C79E00F5C79E00F5C79E00F5C7
- 9E00F5C79E00F5C79E00F5C79E00F5C79E00F5C79E00F5C79E00EBBC9600D8A6
- 8200ECB89000F2BD9400D09775000202010000000000CE8A6600EEA97B00E19A
- 7400ECA77F00ECA77E00ECA77E00ECA87F00ECA87E00E09873000657DE000657
- DE000657DF000657DF000E42B700E2997400ECA77F00ECA77F00ECA77F00ECA7
- 7F00ECA87F00E1997400CE8A660000000000000000000DCD970013BD8F000ECE
- 97000ECE97000DCE97000ECE980013BC8E000ECD97002CA57500D6906B00EDA7
- 7F00E5A17B00ECA77E00ECA77E00E6A17B00D6906B00000000001A66C7000581
- ED00038DF1000581ED0000000000000000000000000000000000000000000000
- 00002A9C750032D59F0014B1830010CF9E0010CF9D0012C1910031D39D0023A0
- 78000D3225000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000F5C89E00F5C89E00F4C7
- 9D00D3A58200F8D9BC00F5CAA100F5CAA100F5CAA100F5CAA100F5CAA100F5CA
- A100F5CAA100F5CAA100F5CAA100F5CAA100F5CAA100F5CAA100F8D9BC00F1BE
- 9600F4C19800F4C19800D09775000202010000000000CF8A6700EEA97C00E39C
- 7600EDA98100ECA98000ECA98000ECA98000ECA98000DE9671000759E0000759
- E0000759DF000759E0000D44BA00E0977200ECA88000EDA98000ECA98000EDA9
- 8000EDA98000E39C7600CF8B670000000000000000000ECF990012C090000ECF
- 98000ECF99000ECF99000ECF990012BF8F000ECF99002BA67500D6906C00EDA8
- 7F00E7A27C00ECA87F00ECA87F00E7A27C00D6906B00000000001A68CB000482
- ED00038EF1000483EE0000000000000000000000000000000000000000000223
- 1A002BD19C0014B2840013B2840016D2A10011D09E0010D09E0016B6870027CB
- 9900259670000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000F5C89E00F5C89E00F5C8
- 9E00F3C59C00DBAD8800F9DFC500F2C59D00F2C59D00F2C59D00F2C59D00F2C5
- 9D00F2C59D00F2C59D00F2C59D00F2C59D00F2C59D00F9DFC700E2B38D00F4C4
- 9B00F4C49B00F4C49B00D09775000302010000000000D08B6800EEA97D00E49F
- 7800EEAA8100EEAB8200EDAA8200EDAB8200EDAA8200DC936F00095AE100095A
- E100085AE100095AE1000D45BD00DD947000EEAB8100EDAA8200EEAA8100EDAB
- 8200EEAA8100E49F7800CF8B670000000000000000000ED09A0011C392000ED0
- 9A000ED09A000ED09A000ED09A0011C191000FD09A002AA67700D7906C00EDA9
- 8000E8A47D00EDA98000EDA98000E8A47D00D7906B00000000001B6ACD000486
- EF00038FF2000486EE000000000000000000000000000000000001150F002AA0
- 750015B3840013B283000FCE9B0080EFD0006EE5BF000FD19E0013B7880024C9
- 96001FB78A000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000F6CDA400F6CDA400F6CD
- A400F5CCA300F5CCA300F5CCA300FBE8D400E9B79000E9B79000E9B79000E9B7
- 9000E9B79000E9B79000E9B79000E9B79000ECBF9700F5C89F00F5C89F00F5C8
- 9E00F5C89E00F5C89E00D09775000302010000000000D28E6900EFAE8200ECA9
- 8100F0B08600F0B08600F0B08600F0AF8600F0AF8600D68A68000D60E4000D60
- E4000D60E4000D60E5000E4DC800D78B6900F0B08600F0B08600F0B08600F0AF
- 8600F0AF8600ECAA8100D28D6900000000000000000013D59F0010CB97000ED3
- 9C000FD39D000ED39D000ED39D0010C9960014D5A00027AA7800D7916D00EDAB
- 8100EBA88000EDAA8200EEAA8200ECA88000D8926C00000000001E6ED200048C
- F1000391F300048BF1000000000000000000000000002AA078001BD09D001DD2
- 9F000FD09E0016D4A3005DE7BF0040AC890033A37E0055DCB3000FD29F0011C0
- 90001ACC99002598710002090700000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000F6D0A700F6D0A700F6D0
- A700F6CFA600F6CFA600F6CFA600FDF2E600FDF4EA00FBEBD900FBEBD900FBEB
- D900FBEBD900FBEBD900FDF4EA00FDF4EA00F5CBA200F5CBA200F5CBA200F5CA
- A100F5CAA100F5CAA100D09775000302010000000000D38E6900EAA77D00E8A5
- 7E00EBA88000EBA88000EBA88000EBA88000EBA88000D38564000E62E6000E62
- E6000E61E5000E62E6000E50CC00D3866500EBA88100EAA98100EBA88000EBA8
- 8000EBA88000E8A57D00D38E6A00000000000000000016D7A20010CE9A000FD4
- 9E000ED59E000FD59E000ED49E0010CC990017D7A20026AA7900D8926D00EDAB
- 8300EDAC8200EEAC8200EEAB8300EEAC8200D8926D00000000001F6FD400038E
- F1000393F200038EF10000000000000000000001010018CF9C001CD4A00010D3
- A00016D5A3005CE8C00046CFA80000000000071E1600269F770047E4B9000FD3
- A0000FD3A0001DB78A001B725500000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000F7D3AA00F7D3AA00F7D3
- AA00F6D2A900F6D2A900F6D3AA003786A9000685C4000685C5000299E8000299
- EC000299EF00038FE300038FE3004FA4D400F6D0A800F6CEA500F6CEA500F6CD
- A400F6CDA400F6CDA400D09775000302010000000000D48F6A00DB926E00DA90
- 6E00DB926E00DB926E00DB926E00DB926E00DB926E00CE7F5F001064E7001064
- E7001064E7001064E7001054D000CE806000DB916E00DB926E00DB926E00DB92
- 6E00DB916E00DB926E00D48F6B0000000000000000001AD9A5000FD29D000ED5
- A0000FD5A0000FD6A0000FD69F0010D19C001BD9A60025AC7A00D9936D00EEAE
- 8400EDAC8300EEAC8300EEAC8300EEAC8300D9926D00000000002071D7000393
- F3000393F3000393F30000000000000000002AA379001AD5A10010D4A1000FD4
- A1005BEAC1004CD7B1002CAA7F000000000000000000071E160051DCB30044E4
- B8000FD3A1001DD3A10023A178000C2F23000000000000000000000000000000
- 00000000000000000000000000000000000000000000F7D5AD00F7D5AD00F7D5
- AD00F7D7B100F9E2CA000C8ABA00069AD60004AFF20003AFF50003ACF60002AA
- F60002A8F60002A3F60001A2F70001A0F700019DF700F9E2CA00F2D7B600F7D3
- AA00F7D3AA00F7D3AA00D09775000302010000000000D6916C00CC7C5D00CC7C
- 5D00CC7C5D00CC7C5D00CC7C5D00CC7C5D00CC7C5D00CC7C5D001368E9001368
- E9001367EA001367EA00125BD900CC7C5D00CC7C5D00CC7C5D00CC7C5D00CC7C
- 5D00CC7C5D00CC7C5D00D6906C00000000000000000022DDAB000ED9A3000FD9
- A3000FD9A3000ED8A3000ED9A2000FD8A30025DFAC0022B07E00D9946E00F0B2
- 8A00EFAE8500EEAE8500EFAE8400EFAE8400D9946E00000000001584EA005DC7
- FB005DC7FB005DC7FB00000000000000000006140F003BCDA1003EE2B60056E9
- C0002EAF830000020100000000000000000000000000000000000820180027A4
- 7A004DDCB2000FD5A10015D5A1001CB88B000000000000000000000000000000
- 00000000000000000000000000000000000000000000F7D5AD00F7D5AD00F7D5
- AD00F8DFC3000997CA000999CE0005B5F40005B5F50004B4F50004B1F50003AE
- F50003ACF60002A8F60002A7F60002A5F60001A0F700019FF700F8DFC300F7D8
- B200F7D5AD00F7D5AD00D09775000302010000000000F4B78D00F5B88D00F4B8
- 8D00F4B78D00F4B78D00F4B88D00F4B88D00F4B88D00F0AF86001469EB001469
- EB00166BEB001369EB00135EDD00F2B28900F4B78D00F4B78D00F4B88D00F4B8
- 8D00F4B88D00F5B78D00F5BC9300D7916C000000000027E0AE000EDAA4000EDA
- A5000FDBA4000FDAA4000FDAA5000FDAA40029E0AE0022B17F00D9946E00EFB4
- 8C00EFAF8600EEAF8500EFAF8500EFAF8600DA936E0000000000000000001584
- EA001584EA001584EA00000000000000000000000000259E760087EBCD00FFFF
- FF00010504000000000000000000000000000000000000000000000000000821
- 180027A67A0036E0B30010D5A20013D4A1000C2E230000000000000000000000
- 00000000000000000000000000000000000000000000F7D5AD00F7D5AD00EED2
- B0000B9BCA000AA5D60009AFE40006B9F50006B8F50005B6F50005B5F50004B2
- F50004B1F50003ACF50002ABF60002AAF60002A5F60002A3F60001A2F700F5D7
- B500F4D6B400F7D5AD00D09775000302010000000000F5B98F00EFB08700EFB0
- 8700EFB08700EFB08700EFB08700EFAF8700EFB08700E8A57E00146BEC00146B
- EC002073EE00156AEC001462E000EAA78000EFB08700EFB08700EFB08700EFB0
- 8700EFB08700EFB08700F5BD9400D8926D00000000002CE2B1000FDBA6000FDC
- A5000FDBA6000FDBA6000FDCA6000FDCA6002EE3B10021B38100DA946E00F0B7
- 8F00EFAF8600EFB08600EFB08600EFB08600DA946F0000000000000000000000
- 0000000000000000000000000000000000000000000004100C0028A1790028A2
- 7A00000000000000000000000000000000000000000000000000000000000000
- 00000822190049DCB10033E0B2000FD6A300259C740002090600000000000000
- 00000000000000000000000000000000000000000000F1D3B300F5D8B700C9A5
- 8A0035C4E7000BC3F4000BC3F4000AC1F40009C0F40008BEF40007BCF50006B9
- F50006B8F50005B5F50004B4F50004B2F50036AAD700A89D9000C3A28900E1B5
- 9300F5D8B700F5D8B700DFB090000302010000000000F7C79F00F2B58C00F6BB
- 9000F6BC9000F6BB9000F6BB9100F6BB9000F6BB9000EAA78000176DEE00176D
- EE005196F400176EED001568E700EAA78000F6BB9000F7BB9100F6BB9100F6BB
- 9100F6BB9000F6BB9000F7C7A000D9936E000000000037E6B5000FDEA9000FDE
- A8000FDEA9000FDEA90010DEA9000FDEA90039E6B60020B88500DB956F00F1BD
- 9400F0B18800EFB18800EFB18700EFB18700DB956F0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000008231A0027A77E0046DDB10010D6A30026A97E000C2E22000000
- 00000000000000000000000000000000000000000000E8C2A200E6BA9600E0B2
- 90009EA5980055D2EA000CC5F3000BC3F4000BC3F4000AC2F40009C0F40008BD
- F40007BCF50006B8F50005B6F5000AB6F300BE9F8800CDA88C00DEB59300E8BB
- 9700E8BC9700E8BC9700C39071000000000000000000F8CCA600F3B78D00F6BC
- 9100F7BC9100F7BC9100F7BC9100F6BC9100F6BD9100EAA88100176EEE001970
- EE0069A8F700176FEE00166BEA00E6A27C00F7BC9100F7BD9100F7BC9100F6BC
- 9100F6BC9200F6BC9100F8CCA600DA946E00000000003DE8B8000FE0A9000FDF
- AA000FDFAA0010E0A9000FE0AA000FDFA9003EE8B9001FB98600DB957000F2C0
- 9700F0B18800F0B18700EFB28800F0B18800DB956F0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000009241B0028AA7F002BDFAF0014D09E0027A177000000
- 00000000000000000000000000000000000000000000DAA88600ECCAAC00E7BB
- 9800D7AE9000B3A7930074D9EA000CC5F3000BC3F3000BC3F4000BC3F4000AC1
- F40009C0F40007BCF40021B7E60097A49D00D8B29200E4B99600E9BD9900E9BE
- 9900E9BE9A00EECFB100564235000000000000000000F9DFC700F7BE9300F7BE
- 9300F7BE9300F7BE9300F7BE9300F7BE9300F7BE9300E7A47E00186FEF00277A
- F1007AB4F900186FEF00186EEE00E7A47E00F7BE9300F7BE9300F7BE9300F7BE
- 9300F7BE9300F7BE9300FAE8D800DA946F000000000041E9BA000FE1AB000FE1
- AC000FE0AB0010E0AB0010E1AB000FE1AB0043EABB001EBB8800DC956F00F2C2
- 9900F0B28800EFB38900EFB28800F0B28800DC956F0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000009241B0044DDB10028DFAF001DBC8E000000
- 000000000000000000000000000000000000000000000000000055413400DAA8
- 8600EAC09B00E9BE9900E5BB98009CE8F30011CDF2000FCAF3000DC8F3000CC5
- F3000EC9F400C1A78F00DAB59500E8BF9C00ECC29D00ECC29D00ECC39D00F2D6
- B900DEAE8D0056423500000000000000000000000000DA957000AE8989003648
- 99001E359200454C910061517800B67E6200BF82600095654A00146BEC00146B
- EC00146BEC00146BEC00BF82600095654A00B67E63008C6B70007F708E00203E
- 9A001A3B9B00374E9D00DA9570008D654A00000000004CECBE0010E3AE000FE3
- AD0010E2AE000FE2AD000FE3AE0010E3AD004EECBF001DBE8B00DC967000F5F9
- F700F7E1BA00F7E1BA00F7E1BA00F7E1BA00DC96700000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000A261C002AAC7F0040DCB00029A4
- 7A00020806000000000000000000000000000000000000000000000000005541
- 3400F2D8BD00ECC19E00EBC19C00CBB99E00AFEEF80012CEF20010CCF30013CE
- F3005CBFC800E3BD9A00ECC39E00EEC59F00EEC59F00EEC59F00EEC5A000DFB0
- 8E00574335000000000000000000000000000000000017234F000E33A0001F5D
- CE000D46BB000B4ECB000A44BB000C2890001C3796005B568400062E9E00062E
- 9E00062E9E00062E9E00947272005C5984000F379E000D3FAD000C4CC4000E48
- BE001662DF002063D400615A7500000000000000000051EDC0000FE3AF0010E4
- AF0010E4AE0010E4AF0010E3AF0010E4AE0053EDC1001DC18D0054392B00D796
- 7000F2AF8500F3AE8500F2AE8500F2AE850035261D0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000A271D002BAC800026C1
- 94001B7256000000000000000000000000000000000000000000000000000000
- 0000DCAA8800F5DBC100EDC59F00ECC39D00CDC2A600BFF1FA0015D3F2005AC7
- CE00DCB99800EEC7A100EEC7A100EFC8A200EFC8A200EFC8A200F4DBC0005844
- 360000000000000000000000000000000000000000000C317F001653C5003880
- ED000E50CC000C5FE3000448CE000E35A5000E34A4000D35A600103CAD004990
- F1004990F100103CAD001345B2000E36A3000E35A5000E35A5000D40B5000E50
- CC00387BEC003880ED000C317F00000000000000000056EEC20010E5AF000FE5
- B00010E5B00010E4AF0010E5B00010E5B00058EEC2001CC28F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000000A271D003ADB
- AD002BB285000B2C210000000000000000000000000000000000000000000000
- 00000000000058443600DDAD8B00F0CAA300F1CBA400F1CBA400F0CBA400F1CC
- A400F2CCA500F2CDA500F2CDA500F3CEA600F5DDC300E1B593005B4637000000
- 000000000000000000000000000000000000000000000B317F00215BCA005195
- F8000C5BDD000C5FE3000E60E3002672E6002A6CDD00124FCB00123AA300173F
- A5001241AE001241AB000E45B6000D4CCB00206CE4002270E7000E60E3000C5B
- DD005091F6005195F8000B317F0000000000000000005FEFC40010E7B10010E7
- B10010E6B10010E7B10010E6B10010E6B10061EFC5001CC59100000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000A29
- 1E002CAF840032C0930000000000000000000000000000000000000000000000
- 000000000000000000005A453700F7DFC600F7DEC200F7DEC200F7DEC200F7DE
- C200F7DFC200F7DFC300F7DFC300F8DFC300E2B695005D473800000000000000
- 00000000000000000000000000000000000000000000092869002158C700579B
- FD001C6CE6003781EC00478AEB000D48C8000D40B8000D34A000000001000000
- 00000000000000000200061B48000F3EA5000D49C8002464D800478AEB001C6C
- E6005698FC00579BFD0009286900000000000000000063F0C50010E7B20010E7
- B20010E7B20010E7B20010E7B20010E7B20065F0C5001CC79200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000B291F002CB1850013392C00000000000000000000000000000000000000
- 0000000000000000000000000000B28B6F00E8BC9800E8BC9800E8BC9800E8BD
- 9800E8BD9900E8BE9900E8BE9900E9BE99005E48380000000000000000000000
- 00000000000000000000000000000000000000000000061C4A001B50BE00599C
- FD0097C3FA001859D4000D47C7000D36A4000820620000030B00000000000000
- 000000000000000000000000000001040B000F40A9000E46BC000D48C70097C3
- FA009BC8FD00599CFD00061C4A00000000000000000068F0C70010E7B20010E7
- B20010E7B20010E7B20010E7B20010E7B20068F0C7001DC89400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000B2B20002FAE8400020806000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000092963001143
- B8000C329600071C570001030C00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000001040C000C3A
- 9A000E42B0001249BB000000020000000000000000001BCB970020CA970021CB
- 980021CB980021CB980021CB98001FCB970018C3900000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000B2B20002EAE83000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000009D9E9E009D9E9E009D9E
- 9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E
- 9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E9E009D9E
- 9E009D9E9E009D9E9E0000000000000000000000000000000000000000000534
- 6A0012589F0012589F0012589F0012589F0012589F0012589F0012589F001258
- 9F0012589F0012589F0012589F0012589F0012589F0012589F0012589F001258
- 9F0005346A000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002E54
- D4003569DC003569DC003569DC003569DC00173BB60006338400093889000938
- 8900093889000C3C8F0006338400173BB6003568DC003568DC003568DC003568
- DC002E54D40000000000000000000000000000000000CCCCCC00CCCCCC00CCCC
- CC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCC
- CC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCC
- CC00CCCCCC00CCCCCC0000000000000000000000000000000000000000000534
- 6A000F509400073B7500073A7400073973000739720007387100063770000637
- 6F0006376F0006366E0006356D0005356D0005356C0005346B0005346B000E50
- 940005346A000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002E54
- D400366DDD00366DDD00366DDD00366CDD00173BB6000633840013469D001346
- 9D0013469D000E3E920006338400173BB600366CDD00366CDD00366CDD00366C
- DD002E54D40000000000000000000000000000000000CCCCCC00CCCCCC00CCCC
- CC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCC
- CC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCCCC00CCCC
- CC00CCCCCC00CCCCCC0000000000000000000000000000000000000000000534
- 6A000F519500F6DDB600F6DDB500F6DDB400F6DDB400F6DCB300F6DCB300F6DC
- B300F6DCB200F6DCB200F6DCB200F9E9C100FAEDD200F9E9CD00F7E1BD000F51
- 950005346A000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002E54
- D4005799EB005799EB005799EB0072B7FF00173BB600063384001548A0001448
- A00014489F001142970006338400173BB6005799EB005799EB005799EB005799
- EB002E54D40000000000000000000000000000000000CDCDCD00CCCCCC00DF98
- 7100EBA27900EBA27900EAA27900EAA27900EAA27900EAA27900EAA27900FCC8
- A500EAA27900EAA27900EBA27900EAA27900EAA27900EAA27900EAA27900DF98
- 7100CCCCCC00CCCCCC0000000000000000000000000000000000000000000534
- 6A0011549900F6DFB900F6DFB800F6DEB700F6DEB700F6DDB500F6DDB400F6DD
- B400F6DDB400F6DDB400F6DDB400F6DDB400F8E5BB00FCF5D300FDF6DD001154
- 990005346A0000000000000000000000000000000000BD846200E8A97F00EEA9
- 7A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00EEA9
- 7A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00EEA97A00D595
- 7000140E0B000000000000000000000000000000000000000000000000000000
- 0000D4D4D400BFBFBF00BFBFBF00BFBFBF009C9C9C0006338400194FA700184E
- A700184EA700184EA500063384009C9C9C00BFBFBF00BFBFBF00C3C3C300B3B3
- B3000000000000000000000000000000000000000000CECECE00CDCDCD00DE97
- 7100EBA37A00EBA27A00EAA37A00E9A17800EAA17900EBA37A00EAA27A00FCC8
- A500EAA27A00EAA27900EBA37900EBA27A00EAA37A00EBA37A00EBA27A00DF98
- 7100CDCDCD00CDCDCD0000000000000000000000000000000000000000000535
- 6B0011559B00F6E0BB00F6DFB900F6DFB800F6DEB800F6DEB700F6DDB600F6DD
- B600F6DDB500F6DDB400F6DDB400F6DDB400F6DDB400F7DFB700FBF1CC001155
- 9A0005356B0000000000000000000000000000000000B57D5B00F6BB9100E09B
- 7300D5916A00D6926B00D8946C00D8956D00D9956D00DA966F00DB976F00DB97
- 6F00DB976F00DD997100DE997100DE997100E09A7200E09A7200E09B7300E09C
- 7400B07C5E000000000000000000000000000000000000000000000000000000
- 0000D4D5D500BFBFBF00CBCBCB00CDCDCD009C9C9C0006338400093889000938
- 8900093889001951AA00063384009C9C9C00CBCBCB00CBCBCB00BFBFBF00B3B3
- B3000000000000000000000000000000000000000000CFCFCF00CECECE00DB94
- 6E00EBA37A00EAA37A00E8A17800DC977000E0997100E8A07900EAA37A00FCC8
- A500EBA47A00EBA37A00EBA37B00EBA37A00EBA37A00EBA37A00EAA47B00DF98
- 7100CECECE00CECECE0000000000000000000000000000000000000000000535
- 6C0012569D00F6E0BC00F6E0BB00F6E0BA00F6E0BA00F6DFB900F6DEB700F6DE
- B700F6DEB700F6DDB600F6DDB500F6DDB500F6DDB500F6DDB500F6DEB5001256
- 9D0006356C0000000000000000000000000000000000B67E5C00FDEFE200EDAC
- 8300E9A37A00E9A37A00E9A37A00E9A37A00E9A37A00E9A37A00E9A37A00E9A3
- 7A00E9A47A00E9A47A00E9A47B00E9A47B00E9A47B00E9A47B00E9A47B00E19C
- 7400D3946F000000000000000000000000000000000000000000000000000000
- 0000D6D6D600C3C3C300D3D3D300D6D6D6009C9C9C00063384001D58B0001D57
- B0001D57AF0011449800063384009C9C9C00D6D6D600D3D3D300BFBFBF00B3B3
- B3000000000000000000000000000000000000000000D1D1D100D0D0D000CC87
- 6300D18C6800CF896500CA856200CE9B8100C7825F00D18C6800EBA47B00FCC8
- A500ECA57C00ECA57C00E8A37B00E9A27A00EBA57C00EBA57C00ECA57C00DF9A
- 7300D0D0D000D0D0D00000000000000000000000000000000000000000000637
- 6F001359A000F7E2C000F7E2BF00F7E2BE00F7E2BE00F6E0BD00F6E0BB00F6E0
- BB00F6E0BB00F6DFBA00F6DFB900F6DFB900F6DFB900F6DEB800F6DEB8001359
- A10006366F0000000000000000000000000000000000B67E5D00F4C19600EDB1
- 8700E19C7400EAA57C00EAA57C00EAA67D00EAA67D00EAA67D00EAA67D00EAA6
- 7D00EAA67D00EBA77D00EBA77E00EBA77E00EBA87E00EBA87E00EBA87E00EAA7
- 7E00E6A57B00C88D6B0000000000000000000000000000000000000000000000
- 0000D9D9D900D0CFCF00D8D8D900D8D9D9009C9C9C0006338400215EB800205D
- B700205EB7001952A900063384009C9C9C00D9D8D800D9D8D800C4C4C400B3B3
- B3000000000000000000000000000000000000000000D2D2D200D1D1D100D7A7
- 8E00C7836000CD8E6F00DBBCAC00E4E2E100D49E8100C9846100E59F7800FBC7
- A400EBA67D00E6A27900DE9A7300DC977000EAA57D00ECA67D00ECA67D00DF9A
- 7300D1D1D100D1D1D10000000000000000000000000000000000000000000737
- 7000135AA300F7E3C100F7E2C000F7E2C000F7E2C000F7E2BF00F7E1BE00F7DF
- BC00F7E0BA00F7E1BB00F7E0BA00F7E0BA00F7E0BB00F7E0BA00F7E0BA00135B
- A3000737710000000000000000000000000000000000B7805E00F3C29700CC8F
- 6900E19E7600EAA67D00EBA87E00EBA87E00EBA87E00EBA87F00ECA97F00ECA9
- 7F00ECA97F00ECA97F00ECAA8000ECAA8000ECAA8000ECAA8000EDAA8000EDAB
- 8100E9A77E00DB9C760000000000000000000000000000000000000000000000
- 0000DADADA00D6D6D600DADADA00DADADB009C9C9C00063384003786D5003786
- D5003786D5001E5AB200063384009C9C9C00DADADA00DADADA00CCCCCC00B3B3
- B3000000000000000000000000000000000000000000D3D3D300D2D2D200E6E4
- E300DFC4B500E6E4E300E6D6CC00E8BBA100E5DED900CE906F00DA956F00F5BF
- 9D00EAA57D00D9946D00CB876300CA866300E8A37A00EBA77E00ECA77E00E09B
- 7400D2D2D200D2D2D20000000000000000000000000000000000000000000738
- 7200145BA400F8E3C300F7E3C200F7E3C100F7E3C100F7E2C000F7E2BF00F7E1
- BD00F6DFBA00F7DFBA00F7E1BB00F7E1BC00F7E1BC00F7E0BB00F7E0BB00145C
- A5000738720000000000000000000000000000000000B77F5E00F3C39700C286
- 6100E8AB8200E5A47A00ECAA8000EDAA8000EDAB8100EDAB8100EDAB8100EDAB
- 8100EDAC8200EDAC8200EDAC8200EEAC8300EEAD8300EEAD8300EEAD8400EEAD
- 8400EDAD8300E9AA800000000000000000000000000000000000000000000606
- 0600DCDBDB00DCDCDB00DBDCDB00DBDBDC009C9C9C00063384002260BA002260
- BA002260BA002260BA00063384009C9C9C00DBDBDB00DBDBDC00D3D3D300ADAD
- AD002C2C2C0000000000000000000000000000000000D5D5D500D4D4D400E19C
- 7500ECA98000ECA98000EDA98000EDA98000ECAA8200E9DAD100CA866200CE8D
- 6B00CB876400E4D5CE00E9E5E300DFBFAE00D08D6800E29F7700ECA87F00E09C
- 7500D4D4D400D4D4D4000000000000000000000000000000000000000000073A
- 7600155EA900F8E5C400F8E4C300F8E4C300F8E4C300F8E4C300F7E3C200F7E2
- C100F6E1BE00F5DAB400F5DCB300F6DEB900F7E3C000F7E2BF00F7E2BE00155F
- A900083A760000000000000000000000000000000000B7806000F2C49900CC90
- 6A00EEC49900EBAC8300EDAD8400F0B08600F0B18700F0B18700F1B18800F1B1
- 8800F1B28800F1B38800F1B38900F1B38900F1B48900F1B48900F2B48A00F2B4
- 8B00F2B48B00F3B58B00936A5000000000000000000000000000000000001935
- BF009F9F9F00D4D4D500DEDFDE00DFDEDE009C9C9C003786D5003786D5003786
- D5003786D5003786D5003786D5009C9C9C00DEDEDF00DEDEDF00D1D0D000A3A3
- A3001226AD0000000000000000000000000000000000D7D7D700D6D6D600EBB1
- 8F00FCC9A600FCC9A600FCC9A600FCC9A600FCC9A600F9CAAB00DEB49D00C887
- 6500D6A99100EBCDBA00F4C4A600ECE7E400CC8B6900DCA07E00F3BD9B00EBB1
- 8F00D5D5D500D5D5D5000000000000000000000000000000000000000000083B
- 78001660AB00F8E5C700F8E5C500F8E5C400F8E5C400F8E4C300F8E4C300F8E4
- C300F8E3C200F5DFB700F5DBB200F5DCB400F7E1BE00F7E3C000F7E3C0001660
- AB00083C780000000000000000000000000000000000B8816000F2C79A00D195
- 6E00E5B28700EFC09400ECAF8500F2B48A00F2B48A00F2B48B00F3B58B00F3B6
- 8B00F3B68B00F3B68B00F3B68C00F3B68C00F4B78D00F4B78D00F4B78D00F4B8
- 8E00F4B88E00F4B88E00CA926F00000000000000000000000000000000001935
- BF00A1A1A1009F9F9F00D5D5D500E0DFDF00DFE0E000E0DFE0002A8F60000CC7
- 90002A8F6000E0E0E000E0DFE000E0E0DF00DFE0E000D2D2D2009C9C9C004275
- DB001226AD0000000000000000000000000000000000D8D8D800D7D7D700E19E
- 7700EDAB8200EEAB8200EEAB8200EDAB8200EDAB8200EDAB8200EEE9E700E7D1
- C300ECE3DE00EBA98100EDAB8200EBB99A00D29B7E00CA866300DB977200E19E
- 7700D7D7D700D7D7D7000000000000000000000000000000000000000000093C
- 7A001662AD00F8E6C900F8E5C800F8E5C700F8E5C700F8E5C500F8E4C400F8E4
- C300F8E4C300F8E1BF00F5DFB800F4DAB000F5DFBA00F7E1BF00F7E3C2001661
- AD00093D7A0000000000000000000000000000000000B8826100F1C89B00D69A
- 7200D79B7300F0C99C00F2B58B00F4B78D00F4B88D00F4B88E00F4B88E00F4B9
- 8E00F4B98E00F5B98F00F5B98F00F5BA8F00F6BA9000F6BB9000F6BB9000F6BB
- 9000F6BB9000F6BB9000E8AD8500624836000000000000000000000000001935
- BF004275DB00A2A2A2009F9F9F00E1E1E100E1E1E100E1E1E1000CC790002A8F
- 60002E54D4002A8F6000E1E1E100E1E1E100D2D2D2009D9D9D00A4A5A5004A8D
- EB001226AD0000000000000000000000000000000000DADADA00D9D9D900E19F
- 7800EEAD8400EEAD8400EEAD8400EEAD8400EEAD8400EEAD8400EEAD8400FCC8
- A500EEAD8500EEAD8400EEAD8400EEAD8400EFD7C800ECD9CF00CA866300DA98
- 7200D9D9D900D9D9D90000000000000000000000000000000000000000000A3F
- 7E001864B200F8E7CB00F8E7CA00F8E7CA00F8E7CA00F8E6C900F8E5C800F8E5
- C800F8E5C800F8E5C500F8E4C400F8E2C100F6DBB400F5DBB300F7E0BD001864
- B1000A3F7E0000000000000000000000000000000000B8836200EFC99C00DFA3
- 7B00DFA37B00E2A77F00FFFAF100FDF1DF00FDEFDB00FDEDD900FCEAD200FBE9
- CF00FAE7CC00F9E2C400F9E1C100F8DFBE00F8DDBA00F7DCB800F7DCB800F6DB
- B700F6DAB600F6DAB600F5D9B500D7A481000000000000000000000000001935
- BF003562DA005092EF004275DB00A0A0A000D8D9D900E4E3E300154BA300F1B1
- 8700F1B18700E4E4E300E3E3E300D5D5D500A4A4A5004275DB004B8EEC001934
- BF001226AD0000000000000000000000000000000000DBDBDB00DADADA00E2A0
- 7900EFAE8500EEAE8500EFAE8500EEAE8500EFAE8500EFAE8500EEAE8500FCC9
- A600EEAE8500EFAE8500EEAE8500EFAE8500ECAE8700F2E4DC00E5C7B500D28E
- 6A00DADADA00DADADA0000000000000000000000000000000000000000000A41
- 81001965B300F8E8CC00F8E7CB00F8E7CB00F8E7CB00F8E7CA00F8E6C900F8E6
- C900F8E6C900F8E5C800F8E5C700F8E5C700F6E0BB00F5DAB300F6DCB6001865
- B3000A40810000000000000000000000000000000000B9836300EFCA9C00E3A8
- 7F00E3A87F00E3A87F00E7AE8700E9AF8500E9AF8500E9AF8500E9AF8500E9AF
- 8500E9AF8500E9AF8500E9AF8500E9AF8500E9AF8500E9AF8500E9AF8500DBA0
- 790091674E008A624A00886149003D2C21000000000000000000000000000C17
- 3A002E54D4003563DA005699F100A1A1A300A0A0A000DADAD900154BA300F1B1
- 8700F1B18700E5E5E500D5D5D6009D9D9D004275DB004B8EEC002447CA001226
- AD00060E340000000000000000000000000000000000DCDCDC00DBDBDB00E2A1
- 7900EFAF8600EEAF8600EEAE8500EFAF8600EFAF8600EFAF8600EFAF8600FCC9
- A600EEAE8600EEAF8600EFAF8600EFAF8600EFAF8600ECB58F00F5EFEB00CC88
- 6400DBDBDB00DBDBDB0000000000000000000000000000000000000000000B41
- 82001966B500F8E8CE00F8E8CD00F8E8CC00F8E8CC00F8E7CB00F8E7CA00F8E7
- CA00F8E7CA00F8E6C900F8E5C800F8E5C800F8E2C300F6E0BC00F5DDB5001967
- B5000B42820000000000000000000000000000000000B8846300EFCA9D00E8AD
- 8400EFB58A00EFB58B00EFB58B00EFB48A00EEB48A00EEB48A00EDB38900EDB3
- 8900EDB38900ECB28800ECB18800ECB18700EBB08600EAB08600EAAF8600DCA0
- 790017100B000000000000000000000000000000000000000000000000000000
- 00001935BF002E54D4003664DA004275DB00A1A1A300A0A0A000063384000633
- 840006338400D6D6D6009D9D9D00A4A5A5005093EF00244ACB001934BF00060E
- 33000000000000000000000000000000000000000000DEDEDE00DDDDDD00E3A1
- 7A00EFB18700EFB18800EFB08700EFB08800EFB18700EFB18700EFB18800FCCA
- A700EFB18700EFB18700EFB18800F0B18800EFB18800EFB08800EFB08800F5EA
- E300DDDDDD00DDDDDD0000000000000000000000000000000000000000000C44
- 87001B69B900F9E9D000F8E9CF009B9280009B9280009B927F009B927F009B92
- 7F009B927E009B917E009B917D009B917D009B917D00BFB29900F8E5C7001B69
- B8000C44870000000000000000000000000000000000BA866500EECC9F00F6BC
- 9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC
- 9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100E2A7
- 7F00140E0A000000000000000000000000000000000000000000000000000000
- 0000000000000B1535001935BF003664DB00579BF2004275DB00A0A0A000DBDC
- DB00D8D7D800A3A4A7004275DB00579AF100878CA6001226AD00060D2F000000
- 00000000000000000000000000000000000000000000DFDFDF00DEDEDE00E3A3
- 7B00EFB28800F0B18800EFB28800F0B18800EFB18800EFB18800F0B28800FCCA
- A700EFB28800F0B18800EFB28800EFB28900F0B18800EFB18800F0B18800EFD1
- BD00DEDEDE00DEDEDE0000000000000000000000000000000000000000000D45
- 8A001B6AB900F9EAD100F9E9D000565544005755450057554400575644005755
- 44005655440057554500575544005756440086806C009B917D00F8E7CA001B69
- BA000D45890000000000000000000000000000000000BC886700EDCC9F00F6BC
- 9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100FADDB800FADD
- B800FADDB800FADDB800FADDB800FADDB800FADDB800FADDB800FADDB800D198
- 7300050302000000000000000000000000000000000000000000000000000000
- 000000000000000000000B1432002E54D4003664DB00589BF200A0A1A400A0A0
- A0009D9D9D004275DB00579BF200061D9400ABABAB00050C2D00000000000000
- 00000000000000000000000000000000000000000000E1E1E100E0E0E000E2A3
- 7B00EFB28900F0B28900F0B28900F0B28900F0B28800F0B28900EFB28900FCCA
- A700F0B28900EFB28900EFB28900EFB28900EFB28900EFB28900F0B28900E9B7
- 9800DFDFDF00DFDFDF0000000000000000000000000000000000000000000D47
- 8C001C6BBB00F9EAD200F9EAD100908974009089740090897400908974009089
- 7400908974009089740090897400908974005A5A48009B917E00F8E7CB001C6A
- BB000D468C0000000000000000000000000000000000BF8A6900EDCD9F00F6BC
- 9100F6BC9100F6BC9100F6BC9100F6BC9100F6BC9100F3D2AE00DDAC8E00DDAC
- 8E00DDAC8E00DDAC8E00DDAC8E00DDAC8E00DDAC8E00DDAC8E00DDAC8E003B2B
- 2000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000001935BF002E54D4003664DB004275DB009FA1
- A5009D9FA700589CF200061D9400A0A5BF00ABABAB0000000000000000000000
- 00000000000000000000000000000000000000000000E3E3E300E2E2E200E3A3
- 7C00E3A37C00E3A37C00E3A37C00E3A37C00E3A37C00E3A37C00E3A37C00EBB2
- 9000E3A37C00E3A37C00E3A37C00E3A37C00E3A37C00E3A37C00E3A37C00E3A3
- 7C00E2E2E200E2E2E20000000000000000000000000000000000000000000E49
- 90003786D5003786D5003786D500F5F6EF00E3E5D200D3D6B600D3D6B600D3D6
- B600D3D6B600D3D6B600D3D6B600DDDFC70064634F002F5B83003786D5003786
- D5000E4990000000000000000000000000000000000087634C00D9A68600D89D
- 7800D69C7700D69B7700D69B7700D49A7500C18B6900271C1500000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000A122E001935BF003563DA0072B7
- FF0072B7FF001934BF00ABABAB00CCCCCC00ABABAB0000000000000000000000
- 00000000000000000000000000000000000000000000E4E4E400E3E3E300E3E3
- E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3
- E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3E300E3E3
- E300E3E3E300E3E3E30000000000000000000000000000000000000000000B39
- 71000E4A93000E4B92000F4A920068675400686754006867540072725E007272
- 5E0072725E0072725E006868540068675400455C6D00183A5E000E4B92000F4A
- 92000B3971000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000009112C002E54D4003F82
- E6003F82E6001226AD00ABABAB00CCCCCC00ABABAB0000000000000000000000
- 00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000006C6B5700646351006463
- 510064635100646351006D6C5800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000001935BF003F82
- E6003F82E600050A2600ABABAB00E4EBEB00ABABAB0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004545380073725D007372
- 5D0073725D0073725D0045453800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000509
- 1800020616000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000030448900BECAF4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000026366A007D94E1004256
- 9C00687FCF000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000A3B3E90029396C003B4A7E0043549300485C9E00485C
- 9E00485C9E00435493003B4B80002A396E00A3B3E90000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000CCCC
- CC003E5291002B3767002A386800445799004D60A1005166AC005267AC005166
- AE005267AB005064A8004E63A7004A5D9B002F3D6E0029366400293665009FAD
- DC00D3D3D3000000000000000000000000000000000034343300232323002222
- 220022222200212121002121210020202000202020001F1F1F001F1F1F001E1E
- 1E001E1E1E001D1D1D001D1D1D001D1D1D001C1C1C001C1C1C001B1B1B001B1B
- 1B001B1B1B001A1A1A0034343300000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000028387000869FF1007D95
- E6004A5DA0000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000003E55A3002F3E7400455EAF002F4BAB001E3DA400032699000326
- 9900032699001E3DA4002F4BAB00455EAF002F3E74003E55A300000000000000
- 0000000000000000000000000000000000000000000000000000CBCBCB0093A2
- D800475891005166B1004E60A2004E69C0003B58BA003856B9003B58B9003754
- B7003653B6003552B300304DAF003551AE003545790047568D004C60A3002A37
- 670092A1D7000000000000000000000000000000000036363500F4E0BD00F7E2
- BF00F7E2BE00F7E2BE00F7E1BD00F7E1BC00F7E1BC00F7E0BB00F7E0BB00F7E0
- BA00F7E0BA00F7E0BA00F7E0BA00F7E0BA00FAEFCC00F9EED000F7EBCF00F5E5
- C900F2DFC000F2DAB60034343300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000002B3B75008BA1EB00829A
- EA006A87EB003349900000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000293D85003D4E8900465FB0000B2EA10003279F0003279F0003279F000327
- 9F0003279F0003279F0003279F000B2EA100465FB0003D4E8900293D85000000
- 0000000000000000000000000000000000000000000000000000000000004860
- B200506BC8003B5BC4005570CA005E78D1003D5DC8004664CA004563C9004563
- C9004361C7003F5DC3003B5AC0003151BA0049598E004E67B800324EAE004A5A
- 93004157A4000000000000000000000000000000000039393700F7E3C100F7E3
- C100F7E2C000F7E2BF00F7E2BE00F7E2BE00F7E2BE00F7E1BD00F7E1BC00F7E0
- BB00F7E0BB00F7E0BA00F7E0BA00F7E0BA00F8E3BC00FCF3CE00FDF7D800FEF9
- E400FEF9E700F3DEBB0034343300000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000304180009CAEED007F96
- E1004B67C7004368E40030418000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000002D41
- 8A003654B900082DA9000429A8000429A8000429A8000429A8000429A8000429
- A8000429A8000429A8000429A8000429A8000429A800082DA9003654B9002D41
- 8A00000000000000000000000000000000000000000000000000000000003C52
- 9E005978E100617FE4006F8BE800859DED006D89E9006E8AEA006C89E9006B88
- E8006986E7006481E300617EE1005C7ADE007F93D4005270D3004362CB005971
- C10033458400000000000000000000000000000000003E3D3B00F8E4C400F8E4
- C400F7E4C300F7E4C300F7E3C200F7E3C100D8C7A9008C817100F7E2BF00F7E2
- BE00F7E2BE00B4A48C00756C5D00736A5C00F5DEBA00F7E0BB00F7E0BB00FCF5
- D300FDF7DB00F8EBD00034343300000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000334486009EB0EE007F96
- E1004B67C7004468E40033448600000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000445DAE004154
- 9500082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00082EAE004154
- 9500445DAE00000000000000000000000000000000000000000000000000435B
- AD006E8CEF007994F1007C97F3008DA5F500819BF400829CF500809AF4007F9A
- F4007C97F3007692EF00738FED006F8BEB007F98E9005F7DE0005876DB006079
- CC00384C90000000000000000000000000000000000040403C00F8E5C700F8E5
- C700F8E4C500F8E4C400F7E4C300F7E4C300B7AA940026262600F7E3C100F7E2
- C000F7E2C0001D1D1D001C1C1C001F1F1E00615A4E00F5DFBB00F7E1BC00F7E1
- BC00FBEFCC00FAF1D20034343300000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000035488B009FB1EE007F96
- E1004B67C7004468E40035488B00000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000A7B6EC00384987004863
- BE00042CB100042CB100042CB100042CB100042CB100042CB100042CB100042C
- B100042CB100042CB100042CB100042CB100042CB100042CB100042CB1004863
- BE0038498700A7B6EC0000000000000000000000000000000000000000004862
- B9007A96F4008AA3F6008EA6F60092A9F60093AAF60093AAF60092A9F60091A8
- F6008EA6F60088A2F600839DF400809AF4007591EF006F8BEB006784E700637E
- D5003D539C000000000000000000000000000000000042423E00F8E6C900F8E6
- C900F8E5C800F8E5C700F8E4C500F8E4C400B9AB950029292900F7E4C300F7E3
- C200E2D0B20025252400C9B79D00EDD9B7001B1B1B00AA9C8500F7E2BE00F7E1
- BD00F7E1BC00F9E9C30034343300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003A4F9700A0B2EE007F96
- E1004B67C7004469E5003A4F9700000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000394B8E004A67C800133A
- BF000C35BE000C35BE000C35BE00FFFFFF00FFFFFF00A2B2E5000C35BE000C35
- BE000C35BE00A2B2E500FFFFFF00FFFFFF000C35BE000C35BE000C35BE001239
- BE004A67C800394B8E0000000000000000000000000000000000000000006F89
- DE00859FF5009FB3F700B2C2F900B7C7F900B8C7F900B9C8F900B7C7F900B5C5
- F900B3C3F900ABBDF800A6B9F800A0B4F70094ABF6008CA5F6007894F400617A
- CE006B85DA000000000000000000000000000000000047474200F8E7CC00F8E7
- CC00F8E7CB00F8E7CB00F8E6CA00F8E6C900BBAF9A0030303000F8E5C700F8E4
- C500F8E4C500F7E4C300F7E4C300F7E4C30022222200766E6100F7E3C100F7E2
- C000F7E2BF00F7E2BF0034343300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000003D539E00A0B2EE007F96
- E1004B67C7004469E5003D539E00000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004A5DA500395BCD00153D
- C400173FC400173FC400173FC400FFFFFF00FFFFFF00FFFFFF00173FC400173F
- C400173FC400FFFFFF00FFFFFF00FFFFFF00173FC400173FC400173FC400153D
- C400395BCD004A5DA5000000000000000000000000000000000000000000D3DB
- F8007C95E8009DB2F700B2C2F900C9D5FB00BAC5E800AEB8D800A1AAC900A0A9
- C8009DA7C8009AA6CE009CAAD700A1B1E6009FB3F7008CA5F6007E99F500556E
- C200D2DBF800000000000000000000000000000000004A494400F8E8CE00F8E8
- CE00F8E7CD00F8E7CC00F8E7CB00F8E7CB00BCB09D0033333300F8E6C900F8E5
- C800F6E3C50056524C00BDAF9900C9B9A10026262600AB9F8B00F7E4C300F7E3
- C200F7E3C100F7E3C10034343300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000004056A300A1B3EE007F96
- E1004B67C7004569E5004056A300000000000000000000000000000000000000
- 000000000000000000000000000000000000000000005169BD003357CF002148
- CB00234ACB00234ACB00234ACB009DA9D000FFFFFF00FFFFFF00ABBAEB00234A
- CB00ABBAEB00FFFFFF00FFFFFF009DA9D000234ACB00234ACB00234ACB002148
- CB003357CF005169BD0000000000000000000000000000000000000000000000
- 00005E76C700869DE9009CB1F700A2AFD900ADB5CF00D6D9E100EDECEB00ECEB
- EA00ECEBEA00E4E4E800D2D5E100A2ACCE0097ADF70088A2F6007791E70092A5
- EC0000000000000000000000000000000000000000004C4C4600F9E9CF00F9E9
- CF00F8E8CE00F8E8CE00F8E7CD00F6E5CA00BDB19F0037373700F8E7CB00F8E6
- CA00F8E6CA002E2E2E002D2D2D002C2C2C006E685E00F7E3C300F8E4C400F7E4
- C300F7E4C300F7E4C30034343300000000000000000000000000000000000000
- 0000000000000000000000000000000000004962B9006B82CC00B4C4F900A7B9
- F80098AEF7007692F2006279CA00465EB3000000000000000000000000000000
- 000000000000000000000000000000000000000000005D78D5002D54D500365B
- D700395ED800395ED800395ED800395ED8003353BE00A4AFD400FFFFFF00FFFF
- FF00FFFFFF00A4AFD4003353BE00395ED800395ED800395ED800395ED800385D
- D8002E54D5005F79D50000000000000000000000000000000000000000000000
- 000000000000CED8F7006B84DB005C72BD00C7CBDB00CDCBCA00A19F9E009997
- 960099989600B8B7B500D1D0CE00CACEDE005972C5006B84DB00CED8F7000000
- 0000000000000000000000000000000000000000000051514900F9EAD200F9EA
- D200F9E9D100F9E9D100F9E9D000464544003E3E3E003D3D3D00F8E8CE00F8E7
- CD00F8E7CD00353535009E948500E2D3B900E2D2B800F3E2C400F8E6C900F8E5
- C800F8E5C700F8E5C70036363400000000000000000000000000000000000000
- 0000000000000000000000000000516AC4006980CD0087A0F3009DB1F3008AA3
- F4007993ED005C7AE0006081EE006078CC00BFCCF50000000000000000000000
- 00000000000000000000000000000000000000000000607BD800365CDC004266
- DE004569DF004569DF004569DF004569DF004569DF003D5CC300FFFFFF00FFFF
- FF00FFFFFF003D5CC3004569DF004569DF004569DF004569DF004569DF004468
- DF003A5FDC006681DB0000000000000000000000000000000000000000000000
- 000000000000000000000000000093A7ED006475AC0083879400ACAAA900C3C1
- C000C7C5C4009896950081879B006879B4000000000000000000000000000000
- 0000000000000000000000000000000000000000000053534B00F9EBD400F9EB
- D400F9EAD300F9EAD200F9E9D100E1D3BD005D5B570041414100F9E9CF00F8E8
- CE00F8E8CE0039393900383838003636360033333300CBBDA700F8E7CB00F8E6
- CA00F8E6C900F8E6C90036363500000000000000000000000000000000000000
- 0000000000000000000000000000677FD0007A95F1008CA1E80096ACF500839D
- F100728DEA004F6ED7004667D4005276EC004D65BE00BFCDF600000000000000
- 00000000000000000000000000000000000000000000657FDC003F64E1004D70
- E3005173E3005173E3005173E3005173E3005173E300BCC9F400FFFFFF00FFFF
- FF00FFFFFF00BCC9F4005173E3005173E3005173E3005173E3005173E3004F71
- E3004368E1006C85DE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000009D9D9D005D5C5C00A9A7A500AFAD
- AB00B7B5B300C0BEBD00646363009D9D9D000000000000000000000000000000
- 0000000000000000000000000000000000000000000053534B00F9ECD500F9EC
- D500F9EBD400F9EBD400F9EAD300F9EAD200DACEB900504F4D00F9E9D100F9E9
- D000F9E9D0006B6760006A66600069655F0067635C00D7C9B100F8E7CC00F8E7
- CB00F8E7CB00F8E7CB0038383600000000000000000000000000000000000000
- 000000000000556FCD00637CD1006B85D9008096E1009CAEED0088A1F3007792
- EC006582E4004363CF003354C3002446B5003C63E8005B75CF00506AC3000000
- 000000000000000000000000000000000000000000006680D6006080EC006080
- EB006886EC006886EC006886EC00C5D1F800FFFFFF00FFFFFF00B2BBDA005670
- C400B2BBDA00FFFFFF00FFFFFF00C5D1F8006886EC006886EC006886EC006181
- EB006181EC006780D60000000000000000000000000000000000000000000000
- 000000000000000000000000000059595900ACABAA00C2C1C000BDBCBA00B7B6
- B400AFADAB00A8A6A500B7B5B400AEADAC000000000000000000000000000000
- 0000000000000000000000000000000000000000000058584F000C5DDD000B5C
- DC000A5ADA000959D9000958D8000855D6000754D5000653D4000551D2000550
- D100044FD100034DCF00034DCE00024CCE00024BCD00024BCD00024BCD00024B
- CD00024BCD00024BCD003A3A3800000000000000000000000000000000000000
- 00005671CD00637CD1005C7DEC006E86D7008A9FE500A1B3F000819BF000718C
- E9005F7DE1003D5ECB002D4EBD001F41B0001033A500375FE7005C76D000BFCD
- F60000000000000000000000000000000000000000006279C8006E8CF0006887
- EF007491F1007491F1007491F100FFFFFF00FFFFFF00FFFFFF00657FD3007491
- F100657FD300FFFFFF00FFFFFF00FFFFFF007491F1007491F1007491F1006988
- EF006E8CF0006279C80000000000000000000000000000000000000000000000
- 00000000000000000000000000007E7E7D00D1D0D000D2D2D100CDCCCB00C7C6
- C500BFBDBC00A8A6A400A8A6A400B9B7B600AAAAAA0000000000000000000000
- 000000000000000000000000000000000000000000005A5A50000C5EDE000C5D
- DE000B5BDC000A5ADB000A59DA000957D8000856D7000755D6000653D4000652
- D3000551D200044FD000044ED000034DCF00024CCE00024BCD00024BCD00024B
- CD00024BCD00024BCD003C3C3900000000000000000000000000000000000000
- 0000607AD1005375EB004D69C8007990DD0094A8EA00A0B3F3007B96EE006A86
- E6005977DD003758C600284AB9001A3CAB0004248F000C2E9F00375FE700526C
- C500BFCDF600000000000000000000000000000000005169BB007E97F0006F8D
- F300819BF500819BF500819BF500FFFFFF00FFFFFF00BAC2DC00819BF500819B
- F500819BF500BAC2DC00FFFFFF00FFFFFF00819BF500819BF500819BF5007290
- F4007E98F1005169BB0000000000000000000000000000000000000000000000
- 0000000000000000000000000000C2C1C100E0DFDE00E1E0E000DBDBDA00D5D4
- D300CCCBCA00B4B3B100A6A4A300ACAAA8006969690000000000000000000000
- 000000000000000000000000000000000000000000005D5C52000D5FE0000D5F
- DF000C5DDD000B5CDD000B5BDC000A59DA000958D9000857D8000754D6000753
- D5000652D4000550D200044FD100044ED000034DCE00034CCE00024BCD00024B
- CD00024BCD00024BCD003E3E3B000000000000000000000000005973CF005F79
- D2003251B7003F5BB8005772C9008DA2E700A1B3F10092A9F4006F8BE8005D7B
- E0004C6CD5002C4DBC001E40AF001031A00003238D0003238D0003238D00375F
- E7005E78D200536EC700000000000000000000000000AEBDF200586EBF00869E
- F0008FA7F60096ACF70096ACF7008497D8008497D80096ACF70096ACF70096AC
- F70096ACF70096ACF7008497D8008497D80096ACF70096ACF70091A8F60089A1
- F000586FBF00AEBDF20000000000000000000000000000000000000000000000
- 0000000000000000000000000000A9A9A8004D4D4D00F7F6F600F1F1F100EBEA
- EA00E2E1E000C8C7C600B9B7B60070706F004D4D4D0000000000000000000000
- 00000000000000000000000000000000000000000000626156000E61E1000E61
- E1000D60E0002A70E4003D79E6003270E0000B5BDC000A5ADB000958D9000857
- D8000856D7000753D5000652D4002769DF003B77E500306CDD00044ECF00034C
- CE00024BCD00024BCD0043433F0000000000000000005973CF005F78D3004068
- EE003B59BF00516DCB006882D8009CAFEE00A3B5F40091A8F400708CE900607E
- E3005070DA003255C7002447BC00183BB1001033A6001033A6001033A600193E
- B8003B64ED005F78D300C1CDF6000000000000000000000000005C76D2006980
- CE008BA4F6009DB2F700A2B6F800A2B6F800A2B6F800A2B6F800A2B6F800A2B6
- F800A2B6F800A2B6F800A2B6F800A2B6F800A2B6F8009CB1F7008FA7F6006F85
- D0005C76D2000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004D4D4D004D4D4D00FDFDFD00F8F8F800F2F1
- F100E9E8E800CFCECD00B9B7B6004D4D4D004D4D4D0000000000000000000000
- 00000000000000000000000000000000000000000000646458000E61E1000E61
- E1001F6BE4002E65D00013389600133896002A5CBF000B5CDC000A5ADA000959
- D9000957D8000855D6001B62DC002D63CE0017327100133896002A5EC500034D
- CF00034CCE00024CCE004545400000000000000000005F79D3003C65EE00426A
- F0006183F2007491F40088A2F600B3C3F900ADBEF8009EB3F700829CF5007491
- F4006787F3004F74F100446BF0003B64EF003761EF003761EF003761EF003761
- EF003761EF003B64ED005872CD00000000000000000000000000000000004E68
- C30094ABF60097ADF700A8BAF800AEBFF800AEBFF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800A5B8F80095ACF70095ACF7004E68
- C300000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004D4D4D004D4D4D00BCBCBC00E6E6E600CBCB
- CB00BABAB9009A9999007A7A79004D4D4D006969690000000000000000000000
- 0000000000000000000000000000000000000000000067665A000E61E1000E61
- E1001565E200133CA000526D9700506C9700163A8B000C59D5000B5BDC000A5A
- DB000A59DA000957D800115BD900123BA0004774C500506C97001742A400044E
- D000034ECF00034DCF004848420000000000000000003761EF000936CC00214A
- D4005475E4006E8AE900869EEF0098ADF50088A1F5007B96F0005C7BE2004E6E
- DA003F60CF002648B900193BAB000E2F9E000324930003269A000328A000042B
- AD00042DB500042EBB005872C900000000000000000000000000000000000000
- 00004F6AC500758AD3009EB2F400A8BAF800B2C2F900B7C7F900BCCAFA00BCCA
- FA00BBCAFA00B6C6F900B1C1F900A7B9F80098ADF2006F85D1004F6AC5000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000515151004D4D4D004D4D4D004D4D4D004D4D
- 4D004D4D4D004D4D4D004D4D4D004D4D4D000000000000000000000000000000
- 000000000000000000000000000000000000000000006B6B5D00579BF000579B
- F000579BF000579BF00046453D0048473F00345E98004C89D600579BF000579B
- F000579BF000579BF000579BF000579BF0003D3C360048473F00345E9800579B
- F000579BF000579BF0004B4B45000000000000000000486CE800496DE8005477
- EA006D8AED007994EE00849DF0008BA2F000849DF0007E98EE00708DED006A88
- ED006483EB005678EA005174EA004C70E800486CE800486CE800486CE800486C
- E800486CE800486CE8005872C900000000000000000000000000000000000000
- 0000000000005E79D3005F76C5009FB3F500A3B6F800A4B7F8009FB3F7009FB3
- F7009FB3F700A3B6F800A0B4F7009FB3F5005F76C5005E79D300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000AAAAAA004D4D4D004D4D4D004D4D4D004D4D
- 4D004D4D4D004D4D4D004D4D4D004D4D4D000000000000000000000000000000
- 000000000000000000000000000000000000000000006E6D5F004078AF002380
- E4002380E4002380E4003D3C36003D3C3600164883001F6EC5002380E4002380
- E4002380E4002380E4002380E4002380E4003D3C36003D3C3600164883002380
- E4002380E4003770A9004F4E470000000000000000005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005872C9005872C9005872C9005872C9005872C9005872
- C9005872C9005872C9005B76D200000000000000000000000000000000000000
- 00000000000000000000AEBEF2005C74C500768CD500859AE40090A6F10091A7
- F10090A6F100839AE500758AD5005C73C400AEBEF20000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000AAAAAA004D4D4D004D4D4D004D4D
- 4D004D4D4D004D4D4D004D4D4D00AAAAAA000000000000000000000000000000
- 000000000000000000000000000000000000000000006E6D5F006C6C5E006B6B
- 5D006A695C0069685B00A9A98A00B8B9980032363F0052544F00636257006261
- 5600626156005F5F54005E5E53005E5D5300D4D4AB00B8B998002C313B005858
- 4F0058584F0057564E0079786D00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000051504400515044000000000000000000000000000000
- 0000000000000000000000000000000000006867580051504400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000CDD6F6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000038477E0041486200404761003E455F003D44
- 5F003C435E003B435D003B425D003A415C000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000B6C3F0002939
- 740027366B000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000002737730027377300B6C5F0000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000B6C5F00027377300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000474E6A007A8ABF0013339F0013339F001333
- 9F0013339F0013339F0013339F007988BD000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000B7C5F1004A5B99003E59
- B1003E59B1002C3B73008195DB00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000273770003F519200283B7A000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000B7C5F1002B3E7C004E5E9400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000048516E007B8BC10003279E0003279E000327
- 9E0003279E0003279E0003279E007B8BC0000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000B9C6F1002E4281003F5AB6000F31
- A3000F31A3004A5D9E002D3E79008196DC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000002A3C7800435EB90040549800B9C6F10000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000002E4282004B5D9F004961B100000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004B5472007C8CC3000328A2000328A2000328
- A2000328A2000328A2000328A2007B8BC3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000B9C6F100304285004C5FA1000F33A9000328
- A4000328A4003E5AB9004C5FA1002F417E000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000304486004260C5001E42BA00445AA50032468E00BAC7F2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000BAC7F200354990003F5EC4001E42BA004A65BD00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000515978007D8EC800042AAB00042AAB00042A
- AB00042AAB00042AAB00042AAB007B8CC7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BAC7F2004E62AA003E5CC2001035B400042BB000042B
- B000042BB000042BB0001035B4003E5CC200344688008499DF00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000034488E004363CC00143BBF003F5FCB00455DAC00354A95000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000BCC8F300384D97004F66B1001038BF00143BBF004C67C400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000535C7C007C8ECB00042CB100042CB100042C
- B100042CB100042CB100042CB1007B8DCA000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000BAC7F200374B94003F5EC7001037B900042DB600042DB600042D
- B600042DB600042DB600042DB6001037B9004F65AF0036498C00859AE1000000
- 00000000000000000000000000000000000000000000374C9500374C9500374C
- 9500374C9500374C9500374C9500374C9500374C9500374C9500374C9500374C
- 9500374C9500374C95004364D300143DC700103AC6003E60D1004760B300BDC9
- F400000000000000000000000000000000000000000000000000000000000000
- 00003A519D005169B8003E60D1000430C300143DC7004D6AC900374C9500374C
- 9500374C9500374C9500374C9500374C9500374C9500374C9500374C9500374C
- 9500374C9500374C95004259AC00000000000000000000000000000000000000
- 0000000000000000000000000000555E7F007D8FCE00042DB600042DB600042D
- B600042DB600042DB600042DB6007C8ECD000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000BCC8F300394F98005167B200153CC0000932BC000932BC000932BC000932
- BC000932BC000932BC000932BC000932BC004161CC005167B200394C91000000
- 000000000000000000000000000000000000000000004D6DD6001441D8001441
- D8001441D8001441D8001441D8001441D8001441D8001441D8001441D8001441
- D8001441D8001441D8001441D8000838D5000535D5000535D500103ED7004C67
- C1003F57AA00BECCF50000000000000000000000000000000000BECCF5004159
- AB003E63DE00103ED7000535D5000535D5000838D5001441D8001441D8001441
- D8001441D8001441D8001441D8001441D8001441D8001441D8001441D8001441
- D8001441D8001F4AD9003E55A500000000000000000000000000000000000000
- 00000000000000000000000000005A6488007E92D400042FBF00042FBF00042F
- BF00042FBF00042FBF00042FBF007C90D2000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000BDC9
- F400536BBC00496AD7002C51D000284ECE002A50D0002048CD001C44CC001C44
- CC001C44CC001C44CC001C44CC002A50D000254CCE002C51D000496AD7003D52
- 9C00899EE400000000000000000000000000000000004F70DD000637DD000738
- DD000738DD000738DD000738DD000738DD000738DD000738DD000738DD000738
- DD000738DD000738DD000738DD000738DD000738DD000738DD000738DD004167
- E6004F6AC700435BB100000000000000000000000000BECCF500455EB2005871
- CB001141DF000738DD000738DD000738DD000738DD000738DD000738DD000738
- DD000738DD000738DD000738DD000738DD000738DD000738DD000738DD000738
- DD000738DE001544DF004259AD00000000000000000000000000000000000000
- 00000000000000000000000000005E678B007F92D5000531C4000531C3000531
- C3000531C3000531C3000531C4007D91D4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000003D56
- A500506ED2005370D2005673D3005B77D4005A78DC002B52D400254DD300254D
- D300254DD300254DD300244CD3005A78DC005974D3005673D3005370D2005D72
- B9004056A000D1DAF8000000000000000000000000005677E4001848E7001D4C
- E8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4C
- E8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8002552
- E9004B70ED00536FCE00BFCCF50000000000000000004962BA005C77D2004A6F
- ED001C4BE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4C
- E8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4CE8001D4C
- E8001C4BE8002653E900455EB500000000000000000000000000000000000000
- 0000000000000000000000000000606A8F008295D800113CCB00153FCC00153F
- CC00153FCC00153FCC00123DCC008094D7000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000004B62
- AF003F56A5003F56A5003F56A5003F56A5005D79D8002A52D9002F56DA002F56
- DA002F56DA002F56DA002951D9005D79D7003F56A5003F56A5003F56A5003F56
- A5003F58AA00000000000000000000000000000000006785EA00496FF0005479
- F1005579F1005579F1005579F1005579F1005579F1005579F1005579F1005579
- F1005579F1005579F1005579F1005579F1005579F1005579F1005579F1005176
- F1004B71F1005A7DF2004A64BD0000000000000000005E79D600577BF200466D
- F0005479F1005579F1005579F1005579F1005579F1005579F1005579F1005579
- F1005579F1005579F1005579F1005579F1005579F1005579F1005579F1005579
- F1005479F1005176F1004A64BB00000000000000000000000000000000000000
- 0000000000000000000000000000657097008C9EE000365CDB003F64DC003F64
- DC003F64DC003F64DC00365CDB008A9DDF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000445DB100607DE000375FE5004167E6004167
- E6004167E6004167E600375FE500607DE0000000000000000000000000000000
- 000000000000000000000000000000000000000000006E8AEA005E80F200708E
- F400718FF400718FF400718FF400718FF400718FF400718FF400718FF400718F
- F400718FF400718FF400718FF400718FF400718FF400718FF400718FF4006989
- F3006E8DF300607AD600BFCCF50000000000000000004E67C0006681D9006A8A
- F3006E8DF300718FF400718FF400718FF400718FF400718FF400718FF400718F
- F400718FF400718FF400718FF400718FF400718FF400718FF400718FF400718F
- F4006F8DF3006586F3004B65BC00000000000000000000000000000000000000
- 00000000000000000000000000006973990091A4E300466AE1005475E4005475
- E4005475E4005475E400466AE1008FA1E1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004760B5006381E5003E65EA004A6FEB004A6F
- EB004A6FEB004A6FEB003E65EA006280E5000000000000000000000000000000
- 00000000000000000000000000000000000000000000738EEB006D8CF30087A1
- F5008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5
- F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008BA4F6007F9A
- F500657FD7004C66C000000000000000000000000000BFCDF6004F68C2006C86
- D9007E99F50089A2F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5
- F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5F6008CA5
- F600849EF5007391F4004C66BD00000000000000000000000000000000000000
- 00000000000000000000000000006B769E0096A8E5005879E7006684E9006684
- E9006684E9006684E9005879E70094A5E4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004964BB006683E800466DEE005478F0005478
- F0005478F0005478F000456CEE006582E8000000000000000000000000000000
- 000000000000000000000000000000000000000000006985E300738EEB007C96
- EC00829BED00829BED00829BED00829BED00829BED00829BED00829BED00829B
- ED00839CED0096ABEF00B8C7F900C5D1FA00C1CEFA00ACBDF8008CA5F6004F69
- C200BFCDF600000000000000000000000000000000000000000000000000BFCD
- F6006D86DA0086A0F500A0B4F700C3D0FA00C1CEFA00B4C4F800869EED00839C
- ED00829BED00829BED00829BED00829BED00829BED00829BED00829BED008099
- ED007B95EC00728EEB004F69C00000000000000000000000000000000000717F
- AF00889FE90091A6EA009AACEB00A8B8ED00B0C0F4008BA3F20087A0F20087A0
- F20087A0F20087A0F200849EF200AFBFF4009DAEE90097AAE90090A4E8008E9A
- C200616D9500CDD7F70000000000000000000000000000000000000000000000
- 00000000000000000000000000004D67BE006B88EA005479F1006686F3006686
- F3006686F3006686F3005479F1006A87EA000000000000000000000000000000
- 00000000000000000000000000000000000000000000506AC100506AC100506A
- C100506AC100506AC100506AC100506AC100506AC100506AC100506AC100506A
- C100506AC100506AC1009BB0F700BDCBFA00B5C5F90096ACF7006882D800BFCD
- F600000000000000000000000000000000000000000000000000000000000000
- 0000536CC5006E87DB0088A2F600B9C8F900B2C2F9009DB0F000506AC100506A
- C100506AC100506AC100506AC100506AC100506AC100506AC100506AC100506A
- C100506AC100506AC100506AC30000000000000000000000000000000000BAC6
- F40093A2D8008BA4F5007693F30092A9F500A0B4F6009AAFF60098AEF60098AE
- F60098AEF60098AEF60097ADF6009FB3F6007E99F4007592F3008CA4F5006571
- 9900869CE0000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004D67BF006D8AEA005C7FF200708EF400708E
- F400708EF400708EF4005C7FF2006D8AEA000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000516BC20088A2F600A3B6F80098AEF7006F87DA00516BC4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000BFCDF600536DC6006E88DB0095ACF70092A9F6008AA1EE00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00007684B5009BA9D90099AFF7009AAFF700A6B9F800A7B9F800A7B9F800A7B9
- F800A7B9F800A7B9F800A7B9F800A6B9F80087A1F50099AFF70092A0D100879C
- E100000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000004E68C000708CEA006485F3007995F4007995
- F4007995F4007995F4006485F300708BEA000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000536DC4006A8AF3007693F400536DC600BFCDF600000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BFCDF600708ADD006C8BF300708CEC00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000BAC6F4007683B400B3C3F900B2C2F900BDCBFA00C0CEFA00C0CE
- FA00C0CEFA00C0CEFA00BDCBFA00B2C2F9009DA9D5006A76A000889CE2000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000506AC1007590EC007491F4008CA5F6008CA5
- F6008CA5F6008BA4F6007491F400748FEC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000556FC600577BF200657FDB00BFCDF60000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005770C8006B85DD006181EB00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BAC6F400A1AEDA00B2C2F900B6C6F900CBD6FB00CBD6
- FB00CBD6FB00C8D4FB00B8C7F900B2C2F9006C77A100889DE200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000516BC2007892EC007B97F40095ACF70095AC
- F70095ACF70095ACF7007B97F4007691EC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000005670C7005B78DA005670C8000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000C1CDF6005871C9006D86D800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000007482B2009EABD900B4C4F900D1DBFB00D5DE
- FC00D5DEFC00C5D1FA00B6C6F9009AA8D5008A9DE30000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000526CC3007994EC00829CF5009EB3F7009EB3
- F7009EB3F7009EB3F700819BF5007993EC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000BAC6F4007381B200C1CEFA00C1CE
- FA00C1CEFA00A7B2D900717DA7008A9EE3000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000546EC5007A94ED00829CF500B0C0F900B0C0
- F900B0C0F900A9BBF800829CF5007993ED000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000BAC6F300A6B1DA00B3C3
- F900B3C3F900737EA8008B9EE400000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000556FC600738FEC007693F400A3B6F800A6B9
- F800A6B9F80098AEF7007693F400728EEC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000007181B0009DAA
- D8009CA9D7008B9FE40000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005670C7006D88E5007590ED00859DEE00869E
- EE00869EEE00829AEE007691ED006C88E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000CED8F7000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000008D8B8B00918F8D00918F8D00918F8D00918F8D00918F
- 8D00918F8D00918F8D00918F8D00918F8D00918F8D008D8B8B00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000A3B3EA002F3E73003F4F840044579700495DA100495D
- A100495DA100445797003F4F86002F3F7400A3B3EA0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000A3B3EA002F3E73003F4F840044579700495DA100495D
- A100495DA100445797003F4F86002F3F7400A3B3EA0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000082807F00F7F7F700B2B2B200B2B2B200B2B2B200B2B2
- B200B2B2B200B2B2B200B2B2B200B2B2B200F7F7F70082807F00000000000000
- 000000000000000000000000000000000000000000000000000000000000AEBD
- EC007A87B4008E9ED100808EBC00F0EFEF00EFEEEE00EDEDEC00EBEAEA00E9E9
- E800E8E7E700E5E5E400E4E3E3008E99BE008E9AC3008E9AC300808EBC008293
- CC008293CC008293CE0000000000000000000000000000000000000000000000
- 0000000000004159A70035447A00455EAF002F4BAB001E3DA400032699000326
- 9900032699001E3DA4002F4BAB00455EAF0035447A004159A700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000004159A70035447A00455EAF002F4BAB001E3DA400032699000326
- 9900032699001E3DA4002F4BAB00455EAF0035447A004159A700000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000030458D0025356E004B494900717170007171700071717000717170007171
- 700071717000717170007171700071717000717170004B49490025356E000000
- 0000000000000000000000000000000000000000000000000000BAC6F2002E42
- 8700798ED2002446B60003228900031E7B000322890003228900BCBAB900B7B5
- B400B2B0AF00A7A5A400A2A09E00031E7B00032289000322890003228900042A
- AB00042AAB008194D50000000000000000000000000000000000000000000000
- 00002E42880042538E004760B1000B2EA10003279F0003279F0003279F000327
- 9F0003279F0003279F0003279F000B2EA1004760B10042538E002E4288000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00002E42880042538E004760B1000B2EA10003279F0003279F0003279F000327
- 9F0003279F0003279F0003279F000B2EA1004760B10042538E002E4288000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000029386E00283564004D4C4B00767675006261600062616000626160006261
- 600062616000626160006261600062616000767675004D4C4B0028356400768C
- CF000000000000000000000000000000000000000000BAC6F20031458C006A79
- B2001B40B8001D41B90003238D00031F7F0003238D0003238D00CAC8C700C5C3
- C200C0BEBD00B6B4B300B1AFAD00031F7F0003238D0003238D0003238D00042C
- B100042CB1008195D70000000000000000000000000000000000000000003147
- 8F003654B900082DA9000429A8000429A8000429A8000429A8000429A8000429
- A8000429A8000429A8000429A8000429A8000429A800082DA9003654B9003147
- 8F00000000000000000000000000000000000000000000000000000000003147
- 8F003654B900082DA9000429A8000429A8000429A8000429A8000429A8000429
- A8000429A8000429A8000429A8000429A8000429A800082DA9003654B9003147
- 8F000000000000000000000000000000000000000000344892004358A100425F
- BF00425FBF0041528C0076757500ACACAC00ACACAC00ACACAC00ACACAC00ACAC
- AC00ACACAC00ACACAC00ACACAC00ACACAC00ACACAC007675750041528C00425F
- BF00425FBF004358A10000000000000000000000000034488F00879BDD00264B
- C3001038BD00284CC4000D2D98000C2888000D2D98000D2D9800E0DFDF00DDDB
- DB00D9D7D700D1CFCE00CDCBCA000C2888000D2D98000D2D98000D2D98001038
- BD001038BD00869ADE0000000000000000000000000000000000475FB1004658
- 9A00082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00082EAE004658
- 9A00475FB1000000000000000000000000000000000000000000475FB1004658
- 9A00082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00082EAE004658
- 9A00475FB10000000000000000000000000000000000324588004260C5001036
- B600042CB200021A6B00021A6B00021A6B00021A6B00021A6B00021A6B00021A
- 6B00021A6B00021A6B00021A6B00021A6B00021A6B00021A6B00021A6B00042C
- B2001036B6004260C500000000000000000000000000364B9400889DE100183F
- C300183FC3002F53CA0013339C00112D8C0013339C0013339C00EBEAE900E7E6
- E600E3E2E200DCDBDA00D8D7D600112D8C0013339C0013339C0013339C00183F
- C300183FC300889DE100000000000000000000000000A8B7ED003E508E004964
- BF00042CB100042CB100042CB100042CB100042CB100042CB100042CB100042C
- B100042CB100042CB100042CB100042CB100042CB100042CB100042CB1004964
- BF003E508E00A8B7ED00000000000000000000000000A8B7ED003E508E004964
- BF00042CB100042CB100042CB100042CB100042CB100042CB100042CB100042C
- B100042CB100042CB100042CB100042CB100042CB100042CB100042CB1004964
- BF003E508E00A8B7ED00000000000000000000000000354A8F004362CB00042E
- B900042EB900042EB900042EB900042EB900042EB900042EB900042EB900042E
- B900042EB900042EB900042EB900042EB900042EB900042EB90003269C000325
- 940003269C004362CB00000000000000000000000000394F99008A9FE3002047
- CA002047CA003559CF001938A100173391001733910017339100F4F3F300F1F0
- F000EDEDEC00E6E5E500E3E2E100173391001938A1001938A1001938A1002047
- CA002047CA008A9FE3000000000000000000000000003F5194004966C8001139
- BF000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE00FFFFFF00FFFF
- FF00FFFFFF000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE001139
- BF004966C8003F5194000000000000000000000000003F5194004966C8001139
- BF000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE000C35
- BE000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE000C35BE001139
- BF004966C8003F5194000000000000000000000000003C529D004C6CD8002048
- CE00234ACF00234ACF00234ACF00234ACF00234ACF00234ACF00234ACF00234A
- CF00234ACF00234ACF00234ACF00234ACF00234ACF00234ACF002243B2002343
- AC001F41B1004B6BD8000000000000000000000000003E55A30091A6EA003157
- D6003157D6004668D8003350B2002D4BAE002D4BAE002D4BAE002D4BAE002D4B
- AE002D4BAE002D4BAE002D4BAE002D4BAE002D4BAE002D4BAE003350B2003157
- D6003157D60090A5EA000000000000000000000000004D62A9003659CC00123B
- C300173FC400173FC400173FC400173FC400173FC400173FC400FFFFFF00FFFF
- FF00FFFFFF00173FC400173FC400173FC400173FC400173FC400173FC400123B
- C4003558CC004D62A9000000000000000000000000004D62A9003659CC00123B
- C300173FC400173FC400173FC400173FC400173FC400173FC400173FC400173F
- C400173FC400173FC400173FC400173FC400173FC400173FC400173FC400123B
- C4003558CC004D62A9000000000000000000000000004157A4005373DE00385D
- D9003C61D9003C61D9003C61D9003C61D9003C61D9003C61D9003C61D9003C61
- D9003C61D9003C61D9003C61D9003C61D9003C61D9003C61D9003C61D9003C61
- D900365BD8005272DE000000000000000000000000004058A90094A9ED003A5F
- DD003A5FDD004669DF004E70E0004E70E0004E70E0004E70E0004E70E0004E70
- E0004E70E0004E70E0004E70E0004E70E0004E70E0004E70E0004E70E0003A5F
- DD003A5FDD0093A8ED000000000000000000000000005069BE002E53CE001D45
- CA00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00FFFFFF00FFFF
- FF00FFFFFF00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB001D45
- CA002D52CE005069BE000000000000000000000000005069BE002E53CE001D45
- CA00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234A
- CB00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB00234ACB001D45
- CA002D52CE005069BE00000000000000000000000000445BAB005B7BE4005072
- E2005676E3005676E3005676E3005676E3005676E3005676E3005676E3005676
- E3005676E3005676E3005676E3005676E3005676E3005676E3005676E3005676
- E3004C6FE1005979E400000000000000000000000000435CAF0097ACF0004368
- E3004368E3004368E3004368E3004368E3004368E3004368E3004368E3004368
- E3004368E3004368E3004368E3004368E3004368E3004368E3004368E3004368
- E3004368E30097ACF0000000000000000000000000005774D4002850D5003459
- D700395ED800395ED800395ED800FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00395ED800395ED800395ED8003459
- D700224BD4005773D3000000000000000000000000005774D4002850D5003459
- D700395ED800395ED800395ED800FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00395ED800395ED800395ED8003459
- D700224BD4005773D3000000000000000000000000004C65BA006A89EF007E99
- F100A4B6F500A8BAF500A8BAF500A8BAF500A8BAF500A8BAF500A8BAF500A8BA
- F500A8BAF500A8BAF500A8BAF500A8BAF500A8BAF500A8BAF500A8BAF50090A7
- F3007A95F1006786EF000000000000000000000000004862B9009EB2F600587B
- F000587BF0005070D9004F6ED7004F6ED7004F6ED7004F6ED7004F6ED7004F6E
- D7004F6ED7004F6ED7004F6ED7004F6ED7004F6ED7004F6ED7004F6ED700587B
- F000587BF0009DB2F6000000000000000000000000005A77D8003057DA003E63
- DD004569DF004569DF003E5EC800FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF004569DF004569DF004569DF003E63
- DD002B53DA005975D7000000000000000000000000005A77D8003057DA003E63
- DD004569DF004569DF003E5EC800FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF004569DF004569DF004569DF003E63
- DD002B53DA005975D700000000000000000000000000506AC1006F8DF30090A7
- F5008C90A3006C6A6A006C6A6A006C6A6A006C6A6A006C6A6A006C6A6A006C6A
- 6A006C6A6A006C6A6A006C6A6A006C6A6A006C6A6A006C6A6A006C6A6A00B6C6
- F8008AA3F5006B8AF3000000000000000000000000004A64BB00A1B5F7006183
- F2006183F2005876DA00BDC9F100BDC9F100BDC9F100BDC9F100BDC9F100BDC9
- F100BDC9F100BDC9F100BDC9F100BDC9F100BDC9F100BDC9F100BDC9F1006183
- F2006183F200A0B4F7000000000000000000000000005C79DB00375EDF00486C
- E3005173E3005173E3004967CD00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005173E3005173E3005173E300486C
- E3003058DE005B78DB000000000000000000000000005C79DB00375EDF00486C
- E3005173E3005173E3004967CD00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005173E3005173E3005173E300486C
- E3003058DE005B78DB00000000000000000000000000526CC3006C8BF3009CB1
- F700959392009593920095939200959392009593920095939200959392009593
- 920095939200959392009593920095939200959392009593920095939200C6D2
- FA0092A9F6006787F3000000000000000000000000004B65BC00A4B7F8006A8A
- F3006A8AF300607CDA00C4CEF1009DAEE8009DAEE8009DAEE8009DAEE8009DAE
- E8009DAEE8009DAEE8009DAEE8009DAEE8009DAEE8009DAEE8009DAEE8006A8A
- F3006A8AF300A3B6F8000000000000000000000000005C78D5005074EA005477
- EA006886EC006886EC006886EC006886EC006886EC006886EC00FFFFFF00FFFF
- FF00FFFFFF006886EC006886EC006886EC006886EC006886EC006886EC005477
- EA004A6FE9005D78D5000000000000000000000000005C78D5005074EA005477
- EA006886EC006886EC006886EC006886EC006886EC006886EC006886EC006886
- EC006886EC006886EC006886EC006886EC006886EC006886EC006886EC005477
- EA004A6FE9005D78D500000000000000000000000000000000005974CF006782
- DB009C9A9900A09D9C0096939200969392009693920096939200969392009693
- 9200969392009693920096939200969392009693920096939200A09D9C007A94
- ED006681DB005974CF000000000000000000000000004D67BE00AABCF8007C97
- F4007C97F4006F88DC00D1D9F400B2C0EC00B2C0EC00B2C0EC00B2C0EC00B2C0
- EC00B2C0EC00B2C0EC00B2C0EC00B2C0EC00B2C0EC00B2C0EC00B2C0EC007C97
- F4007C97F400A9BBF8000000000000000000000000005D76C900597CEE005578
- EE007390F0007491F1007491F1007491F1007491F1007491F100FFFFFF00FFFF
- FF00FFFFFF007491F1007491F1007491F1007491F1007491F1007390F0005679
- EE005377EE005D77CA000000000000000000000000005D76C900597CEE005578
- EE007390F0007491F1007491F1007491F1007491F1007491F1007491F1007491
- F1007491F1007491F1007491F1007491F1007491F1007491F1007390F0005679
- EE005377EE005D77CA0000000000000000000000000000000000000000005A75
- D1006B6968009D9A9900615F5F00BFBFBE00BCBCBB00BAB9B800B4B3B200B1B0
- AE00ADACAB00A6A5A400A2A1A0009F9D9C0097959300615F5F009D9A99005771
- C8005A75D100000000000000000000000000000000004E68BF00ADBEF800849E
- F500849EF500778EDC00D7DEF400BCC8EE00BCC8EE00BCC8EE00BCC8EE00BCC8
- EE00BCC8EE00BCC8EE00BCC8EE00BCC8EE00BCC8EE00BCC8EE00BCC8EE00849E
- F500849EF500ACBDF800000000000000000000000000566FC2006685EE00567A
- F1007C97F400809BF500819BF500819BF500819BF500819BF500FFFFFF00FFFF
- FF00FFFFFF00819BF500819BF500819BF500819BF500819BF5007D98F500587B
- F1006081ED00566FC200000000000000000000000000566FC2006685EE00567A
- F1007C97F400809BF500819BF500819BF500819BF500819BF500819BF500819B
- F500819BF500819BF500819BF500819BF500819BF500819BF5007D98F500587B
- F1006081ED00566FC20000000000000000000000000000000000000000000000
- 000074727100A3A09F0067656500E2E1E100DFDFDE00DDDCDC00D7D7D600D5D4
- D300D1D1D000CBCAC900C8C7C600C4C3C200BCBBBA0067656500A3A09F000000
- 000000000000000000000000000000000000000000004F69C000B0C0F9008DA5
- F6008DA5F6007F95DD00DDE2F600C6D0F000C6D0F000C6D0F000C6D0F000C6D0
- F000C6D0F000C6D0F000C6D0F000C6D0F000C6D0F000C6D0F000C6D0F0008DA5
- F6008DA5F600AFC0F900000000000000000000000000AEBEF3005B73C5006886
- EC007391F40088A2F60093AAF60096ACF70096ACF70096ACF700798AC500798A
- C5007F92D10096ACF70096ACF70096ACF70095ACF7008AA3F6007693F4006B89
- ED005B72C500AEBEF300000000000000000000000000AEBEF3005B73C5006886
- EC007391F40088A2F60093AAF60096ACF70096ACF70096ACF70096ACF70096AC
- F70096ACF70096ACF70096ACF70096ACF70095ACF7008AA3F6007693F4006B89
- ED005B72C500AEBEF30000000000000000000000000000000000000000000000
- 000085838200AFADAB0073717000F2F2F200F1F1F000F0EFEF00EDECEC00EBEB
- EA00E9E9E900E5E5E500E3E3E200E1E0E000DCDBDB0073717000AFADAB000000
- 00000000000000000000000000000000000000000000516BC200B5C5F9009EB3
- F7009EB3F7008EA0DE00E5EAF700D5DCF200D5DCF200D5DCF200D5DCF200D5DC
- F200D5DCF200D5DCF200D5DCF200D5DCF200D5DCF200D5DCF200D5DCF2009EB3
- F7009EB3F700B4C4F90000000000000000000000000000000000607AD600647D
- D0006384F3007F9AF50093AAF600A2B6F800A2B6F800A2B6F800A2B6F800A2B6
- F800A2B6F800A2B6F800A2B6F800A2B6F80095ACF700829CF5006686F300657E
- D200607AD6000000000000000000000000000000000000000000607AD600647D
- D0006384F3007F9AF50093AAF600A2B6F800A2B6F800A2B6F800A2B6F800A2B6
- F800A2B6F800A2B6F800A2B6F800A2B6F80095ACF700829CF5006686F300657E
- D200607AD6000000000000000000000000000000000000000000000000000000
- 00008E8C8A00B5B3B10079777600F6F6F600F5F5F500F5F5F400F3F3F300F2F2
- F200F1F0F000EEEEEE00ECECEC00EBEAEA00E7E7E60079777600B5B3B1000000
- 00000000000000000000000000000000000000000000526CC300B8C7F900A7B9
- F800A7B9F80096A6DF00E9EDF800DCE1F400DCE1F400DCE1F400DCE1F400DCE1
- F400DCE1F400DCE1F400DCE1F400DCE1F400DCE1F400DCE1F400DCE1F400A7B9
- F800A7B9F800B6C6F9000000000000000000000000000000000000000000536F
- CA006989F3006A8AF300849EF500A8BAF800ADBEF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800ADBEF800A9BBF80087A1F5006D8CF3006B8AF300536F
- CA0000000000000000000000000000000000000000000000000000000000536F
- CA006989F3006A8AF300849EF500A8BAF800ADBEF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800ADBEF800A9BBF80087A1F5006D8CF3006B8AF300536F
- CA00000000000000000000000000000000000000000000000000000000000000
- 0000908F8E00959391007F7D7C00F7F7F700F7F7F700F7F7F700F6F6F600F6F6
- F600F5F5F500F4F4F400F3F3F200F2F1F100EFEFEF007F7D7C00959391000000
- 00000000000000000000000000000000000000000000536DC400BAC9FA00B0C0
- F900B0C0F9009DADDF00EDF0F900E3E8F600E3E8F600E3E8F600E3E8F600E3E8
- F600E3E8F600E3E8F600E3E8F600E3E8F600E3E8F600E3E8F600E3E8F600B0C0
- F900B0C0F900B9C8F90000000000000000000000000000000000000000000000
- 00005570CB006780D400718EEE00819BF50090A8F6009FB3F700AFC0F900B1C1
- F900AFC0F900A1B5F70093AAF600849EF5007490ED006981D4005570CB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00005570CB006780D400718EEE00819BF50090A8F6009FB3F700AFC0F900B1C1
- F900AFC0F900A1B5F70093AAF600849EF5007490ED006981D4005570CB000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000008B898800EBEBEA00EDECEC00EEEEED00F1F1F100F3F2
- F200F4F4F400F6F6F600F7F7F700F7F7F700F7F7F7008B898800000000000000
- 00000000000000000000000000000000000000000000556FC600BECCFA00C0CE
- FA00C0CEFA00ADB9E100F4F6FA00EDF0F800EDF0F800EDF0F800EDF0F800EDF0
- F800EDF0F800EDF0F800EDF0F800EDF0F800EDF0F800EDF0F800EDF0F800C0CE
- FA00C0CEFA00BDCBFA0000000000000000000000000000000000000000000000
- 000000000000627DD8006179CA007A95F1007D98F500849EF5008BA4F6008EA6
- F6008BA4F60086A0F5007F9AF5007D97F1006179CA00627DD800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000627DD8006179CA007A95F1007D98F500849EF5008BA4F6008EA6
- F6008BA4F60086A0F5007F9AF5007D97F1006179CA00627DD800000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000918F8D00E4E4E300E6E5E400E7E7E600EAEAE900ECEB
- EB00EDEDEC00F0EFEF00F1F1F100F3F2F200F5F5F500918F8D00000000000000
- 000000000000000000000000000000000000000000005670C700A6B9F800C1CE
- FA00C3D0FA00BCC8EE00F9FAFE00F4F6FC00F4F6FC00F4F6FC00F4F6FC00F4F6
- FC00F4F6FC00F4F6FC00F4F6FC00F4F6FC00F4F6FC00F4F6FC00F4F6FC00C3D0
- FA00C0CEFA00A4B7F80000000000000000000000000000000000000000000000
- 00000000000000000000AFBFF3005E77CA006881D4006B85E2007691ED007792
- ED007691ED006C86E2006881D4005E77CA00AFBFF30000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000AFBFF3005E77CA006881D4006B85E2007691ED007792
- ED007691ED006C86E2006881D4005E77CA00AFBFF30000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000908F8E00959391009593910095939100959391009593
- 91009593910095939100959391009593910095939100908F8E00000000000000
- 000000000000000000000000000000000000000000005771C9005771C8005771
- C8005771C8005771C800ABB8E300ABB8E300ABB8E300ABB8E300ABB8E300ABB8
- E300ABB8E300ABB8E300ABB8E300ABB8E300ABB8E300ABB8E300ABB8E3005771
- C8005771C8005771C80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000339F7000339F7000339F7000339F7000339F7000339F
- 7000339F7000339F7000339F7000339F7000339F7000339F7000000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000000E332400339F
- 70000E3324000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000DEDE
- DE00D3D3D300CECECE00CECECE00C0C0C00097A7D7005769A700293662002531
- 5800253158002633600032427B005769A700C0C0C000C7C7C700CECECE00D6D6
- D600DEDEDE00DEDEDE0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000032A0720012BC8E0012BC8E0012BC8E0012BC8E0012BC
- 8E0012BC8D0012BC8E0012BC8D0012BC8E003CD7A70032A17200000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000F3424003AD6A60013BA
- 8C003AD6A6000F34240000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000004259A70046599700455EAF002F4BAB001333A0000326
- 9900032699001333A0001E3DA4002F4BAB004659970035457A004259A7000000
- 00000000000000000000000000000000000000000000000000007E7E7E003C3C
- 3C007B7B7B008A8A8A00D8D8D800000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000031A1720012BD8E0012BC8E0012BD8E0012BC8E0012BD
- 8E0012BC8E0012BD8E0012BD8E0012BD8E003CD7A70031A17200000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000F34240032A1710013BA8C0013BA
- 8C0013BA8C0031A071000F342400000402000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000B9C6F1002E42880042538E002B49AE000B2EA10003279F0003279F000327
- 9F0003279F0003279F0003279F0003279F002B49AE004760B10042538E00B9C6
- F1000000000000000000000000000000000000000000000000009E9E9E005959
- 5900333333006B6B6B0088888800C6C6C6000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000030A2730011C090000DCB95000CCA94000DCB94000CCB
- 95000CCB94000CCB95000CCA95000CCB95003CD7A70030A27300000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000F34240030A1720035D5A50011BE8E0012BD
- 8E0013BB8D0035D5A50030A172000F3424000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00002F4284004D609E00415CB7000328A3000328A3000328A3000328A3000328
- A3000328A3000328A3000328A3000328A3000328A3001336A900415CB7002F42
- 8400B9C6F1000000000000000000000000000000000000000000000000007676
- 76003C3C3C00ADACAC00C4C3C2008D8D8D0080808000B0B0B000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002DA5750011C291000CCD97000DCD97000CCC96000CCC
- 96000CCC97000DCC96000DCC96000DCC97003BD7A7002EA57400000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000F34240030D4A30012BD8E0012BD8E000DCB95000DCB
- 96000DCB950012BD8E0012BD8E0030D4A3000F34240000040200000000000000
- 000000000000000000000000000000000000000000000000000000000000475F
- B100415DBD00082EAE00042BAC00042BAC00042BAC00042BAC00042BAC00042B
- AC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00042BAC00415D
- BD0046599A00475FB10000000000000000000000000000000000000000000000
- 0000E0DFDF00CECCCC00C0BEBD00A09E9D00605F5E006F6F6E0027377200B6C3
- F000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002CA6760011C392000DCE98000DCE98000DCD97000DCE
- 97000DCD98000DCE98000DCD97000CCE97003BD7A7002CA67600011C14000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000F3424002DA5750012BE8F0012BE8F000ECC97000ECC96000DCC
- 96000ECC96000ECD970012BE8E0012BF8F002DA575000F342400000000000000
- 0000000000000000000000000000000000000000000000000000A8B7ED003E50
- 8E001439B600042CB100042CB100042CB100042CB100042CB100A0AFE100A0AF
- E100042CB100042CB100042CB100042CB100042CB100042CB100042CB1001439
- B6004964BF003E508E0000000000000000000000000000000000000000000000
- 0000CBCACA00DAD9D900C7C6C500767574007777760071737A003E508B002738
- 7300B6C5F0000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000002BA7760010C492000DCE98000DCF99000DCF99000DCE
- 98000DCF99000DCE99000DCE99000DCF99003AD7A6002BA87700000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000F3424002CA676002AD3A20011C090000ECD98000ECD98000ECE97000ECD
- 98000DCE97000ECE98000ECD980011C190002AD4A1002CA676000F3424000000
- 0000000000000000000000000000000000000000000000000000455CAE004C63
- AD00042DB600042DB600042DB600042DB600042DB600042DB600FFFFFF00FFFF
- FF009FAFE200042DB600042DB600042DB600042DB600042DB600042DB600042D
- B6002B4EC2004C63AD0000000000000000000000000000000000000000000000
- 00009A999900E3E2E200C8C7C6009291910085888F001F3A95003E57A9003E50
- 8B00283873000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000028AA790010C794000DD19B000DD19B000ED19B000DD1
- 9B000ED19B000DD19B000ED19B000DD19A0038D7A60028AA7900000E0B000000
- 0000000000000000000000000000000000000000000000000000000000000F34
- 240024D4A10010C9950010C995000ED09B000ED09A000ED09A000ED09B000ED0
- 9A000ED09A000ED09A000ED09A000ED09A0010C9960010C9950024D4A1000F34
- 24000000000000000000000000000000000000000000788DD7004F63AA00395B
- CD00173FC400173FC400173FC400173FC400A6B6E800FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00A6B6E800173FC400173FC400173FC400173FC400173FC400173F
- C400153DC400395BCD006C83D400000000000000000000000000000000000000
- 0000B0B0B00093929200B3B2B2006883E0005070DC003B5CCB00092A99000F2D
- 93003E57A900293A7500B6C5F100000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000027AC7A0010C795000DD29C000ED29C000ED29C000ED2
- 9C000ED29C000DD29D000DD29D000DD29C0037D6A60026AB7A00000E0B000000
- 00000000000000000000000000000000000000000000000000000F34240027AB
- 7A000FCC98000FCC97000ED19C000ED19C000ED19C000ED19B000FD19C000ED2
- 9C000ED19C000ED29B000ED19C000ED29C000ED19B000FCB97000FCC980027AA
- 7A000F342400000000000000000000000000000000004963B600546DC0003357
- CF00234ACB00234ACB00234ACB00ABBAEB00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00ABBAEB00234ACB00234ACB00234ACB00234ACB00234A
- CB002148CB003357CF004963B600000000000000000000000000000000000000
- 0000000000006F75900091939D006E8CF2006A88EC005574DD002143B300092A
- 99000F2D930040528C002A3B7500B6C5F1000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000025AD7B0011C996000ED39D000DD39D000ED39E000DD3
- 9E000ED39D000DD39E000ED39D000DD49D0036D6A60025AD7B00000E0B000000
- 000000000000000000000000000000000000000000000F34240026AC7B001ED4
- A1000FCF9A000ED39D000ED39D000ED29D000ED39D000ED29D000FD39D000ED3
- 9D000ED29D000ED39D000ED39D000ED39D000FD29D000ED39C0010CE99001ED4
- A10026AC7A000F3424000000000000000000000000003D54A2005C76D0003257
- D3002E53D2002E53D2002E53D200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
- FF00FFFFFF00FFFFFF00FFFFFF00AFBEEE002E53D2002E53D2002E53D2002E53
- D2002D53D2003257D3003D54A200000000000000000000000000000000000000
- 000000000000BECCF500455FB900829DF5007B97F4006C89EC003B5CCB002143
- B300092A99003E57A90040528D002A3C76000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000022B17E0010CB98000ED6A0000ED69F000ED6A0000ED6
- A0000ED6A0000ED6A0000ED6A0000ED6A00033D7A60022B07D00000000000000
- 0000000000000000000000000000000000000F342400D0F5EB0057E7BE0057E7
- BE0056E9BF0057EABF00CEF5EB000ED59F000ED5A0000ED5A0000ED5A0000ED6
- A0000ED5A0000FD6A0000ED59F000ED59F0023DBA900CEF5EB0056EABF0057E7
- BE0057E7BE00D0F5EB000F34240000000000000000004158A600627DD900365C
- DC004569DF003C5BC200B4BFE200FFFFFF00FFFFFF00FFFFFF003D5CC3003854
- B200B4BFE200FFFFFF00FFFFFF00FFFFFF00B8C6F2004569DF004569DF004569
- DF004468DF003A5FDC004158A600000000000000000000000000000000000000
- 00000000000000000000000000004762BB00627BD4007D98F5006B89EC005574
- DD003B5CCB00092A99000F2D93003E57A9002C3D7800B6C5F100000000000000
- 00000000000000000000000000000000000020B27F0021B27F0021B27F0021B2
- 7F0020B27F0021B27F0021B27F0010CC99000ED7A2000ED7A1000FD7A1000ED7
- A1000ED8A1000ED7A1000ED7A1000ED7A10031D7A60021B27F0020B27F0021B2
- 7F0020B27F0020B27F0021B27F000000000021B17E0021B17F0021B17F0020B1
- 7F0021B17F0021B17F0019B885000FD7A2000ED7A1000ED7A1000FD7A1000FD6
- A1000FD7A2000FD6A1000FD7A1000ED7A10027DEAC0018B9850021B07E0021B1
- 7F0021B17E0021B17E0021B17F000000000000000000435BAB006681DE003F64
- E1005173E3004764C700415CB600FFFFFF00FFFFFF00BECBF5005173E3004764
- C700415CB600FFFFFF00FFFFFF00FFFFFF00FFFFFF00BCC9F4005173E3005173
- E3004F71E3004368E100435BAB00000000000000000000000000000000000000
- 0000000000000000000000000000BFCCF5004963BC00627CD5007894F4006D8A
- EC005574DD002143B300092A99000F2D930042548E002C3E7900B6C5F1000000
- 00000000000000000000000000000000000005291D0042E6B8003EDCB0003EDC
- B0003EDCB0003EDCB0003EDCB00011CE9B000ED9A3000ED8A2000ED8A3000ED8
- A3000ED8A2000ED8A2000ED8A3000FD9A2003EDCB0003EDCB0003EDCB0003EDC
- B0003EDCB00038E3B40005291D00000000000000000000000000000000000000
- 0000000000000000000017BB87000FD8A3000FD8A3000FD8A3000FD8A2000FD9
- A3000FD8A2000FD8A2000ED9A3000ED8A3002CE0AE0017BA8700000000000000
- 00000000000000000000000000000000000000000000475EB4006C86E0005275
- E7005C7CE8005C7CE800526ECB00BCC5E500C2CEF6005C7CE8005C7CE8005C7C
- E800526ECB00BCC5E500FFFFFF00FFFFFF00FFFFFF00FFFFFF00C0CCF5005C7C
- E800597AE8005375E700475EB400000000000000000000000000000000000000
- 000000000000000000000000000000000000BFCCF5004A64BD007E99F5007E99
- F5006D8AEC003B5CCB002143B300092A99003E57A90042548F002D3E79000000
- 0000000000000000000000000000000000000000000005291D001CB7830052EB
- C0000FDAA5000EDBA5000EDAA4000FDBA5000EDBA5000FDAA5000EDBA5000FDB
- A5000FDBA5000EDBA5000FDBA5000FDBA5000FDBA4000EDBA5000EDBA50049E9
- BC001CB7830005291D0000000000000000000000000000000000000000000000
- 0000000000000000000014BD8A000FDBA5000FDBA6000FDBA6000FDBA6000FDA
- A5000FDBA6000FDBA5000FDAA6000FDBA50035E4B40014BD8A00000000000000
- 000000000000000000000000000000000000000000007790E100687FCD006E8C
- F0007491F1007491F1007491F1007491F1007491F1007491F1007491F1007491
- F1007491F100657FD3005C73C000C3CBE800FFFFFF00FFFFFF00FFFFFF007491
- F1006988EF006E8CF0007790E100000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000004D67C0006C85
- D80088A2F6006D8AEC005574DD003B5CCB00092A99000F2D93003E57A9002E40
- 7B00B6C5F100000000000000000000000000000000000000000005291D001AB8
- 84000FDCA6000FDCA6000FDCA6000EDCA7000EDCA6000FDCA6000FDCA6000FDC
- A6000EDCA6000FDCA6000EDDA6000FDCA6000FDCA6000FDCA6000FDCA6001AB8
- 840005291D000000000000000000000000000000000000000000000000000000
- 0000000000000000000013BF8B000FDCA7000FDCA7000FDCA7000FDCA7000FDC
- A6000FDCA60010DCA7000FDCA6000FDCA70039E6B70013BF8B00000000000000
- 00000000000000000000000000000000000000000000CED8F7005971C3007E98
- F1007D98F500819BF500819BF500819BF500819BF500819BF500819BF500819B
- F500819BF500819BF5007088D600677CC400FFFFFF00FFFFFF00CFD9FA007E99
- F5007290F4007E98F100CED8F700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000BFCDF6004E68
- C1006D85D9007E99F5006D8AEC005574DD002143B300092A99000F2D93004354
- 8D004C526E00AFBEEE0000000000000000000000000000000000000000000529
- 1D0060F0C7000FDDA7000EDDA7000FDDA7000FDDA7000EDDA7000FDEA7000FDD
- A7000FDDA7000EDDA8000FDEA7000FDDA7000FDDA7000EDDA8005AEEC4000529
- 1D00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000012C08C000FDDA8000FDDA80010DDA8000FDDA8000FDD
- A8000FDDA8000FDEA8000FDEA8000FDDA8003DE7BA0012C08C00000000000000
- 00000000000000000000000000000000000000000000000000005975D100758C
- DD007F9AF5008BA4F6008BA4F6008BA4F6008BA4F6008BA4F6008BA4F6008BA4
- F6008BA4F6008BA4F6008BA4F6007A8FD700C9D0E800D4DDFC008BA4F600819B
- F500809BF500768DDD0000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000000000000BFCD
- F6004F69C2007E99F5007894F4006B89EC003B5CCB002143B300092A99007B7E
- 8F00686769005557690000000000000000000000000000000000000000000000
- 000005291D0017BD87006FF3CD000FE0AA000FDFAA000FE0AA000FDFA90010DF
- AA000FDFAA000FDFA9000FE0A9000FE0A9006AF2CB0017BD880005291D000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000010C28D0010E0AB0010E0AB000FE0AB000FE0AA0010E0
- AA0010E0AA000FDFAA000FE0AB000FDFAA0045EBBD0010C28D00000000000000
- 000000000000000000000000000000000000000000000000000000000000607A
- D7008CA4F4008BA4F6009DB2F700A2B6F800A2B6F800A2B6F800A2B6F800A2B6
- F800A2B6F800A2B6F800A2B6F800A2B6F800A2B6F800A2B6F8009CB1F70092A9
- F400758AD500607AD70000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000516BC4006881D9007D98F5006C89EC005674D700949AAF00F4F4
- F400E3E2E200B1B2B800697CC200000000000000000000000000000000000000
- 00000000000005291D0015BE880010E0AA000FE0AA000FE1AB000FE0AA000FE1
- AB000FE0AA0010E1AB000FE1AA000FE1AB0015BE880005291D00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000FC38E000FE1AC000FE1AB000FE1AC0010E1AC000FE1
- AC000FE1AC000FE1AB0010E1AB000FE1AC004AECC0000FC38E00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00008599E00094ABF60097ADF700AEBFF800AEBFF800AEBFF800AEBFF800AEBF
- F800AEBFF800AEBFF800AEBFF800AEBFF800AEBFF800A5B8F80095ACF7008CA0
- E100546FCA000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000BFCDF600536DC6006882DA007A95ED00B9BFD400BFBEBC00EEEE
- ED00CDCED400898D9C005A638700000000000000000000000000000000000000
- 0000000000000000000005291D007BF6D2000FE1AC0010E1AB000FE1AC000FE1
- AB000FE2AB000FE1AB000FE2AC0078F5D10005291D0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000FC38E000FE2AD0010E2AD000FE2AD000FE2AD000FE2
- AD0010E2AD0010E2AD0010E2AD0010E2AD004DEDC1000FC38E00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000576FC80090A3E300A0B4F600ACBDF800B5C5F900B9C8F900B9C8F900B9C8
- F900B9C8F900B9C8F900B9C8F900B9C8F900A9BBF8009CB1F70098ADF5005870
- C700BFCDF6000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000BFCDF600536EC700ADB2C100EDECEC00EDECEC00BFC0
- C6008F93A2008F93A2006A6E7E00000000000000000000000000000000000000
- 000000000000000000000000000005291D0013C28B0086F8D60010E4AD000FE3
- AD000FE4AE0084F7D50012C18B0005291D000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000EC48F0010E4AF0010E4AF0010E4AF0010E4AF0010E4
- AE0010E4AF0010E4AF0010E4AF000FE4AF0053EFC5000EC48F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000627DD900879BE3009FB3F500A3B6F800A4B7F8009FB3
- F7009FB3F700A2B6F800A3B6F800A0B4F700859BE200667DCC00627DD9000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000787D9300B5B5B900C9CAD000AFB4
- C300B3B8C800B3B9C8007286CC00000000000000000000000000000000000000
- 00000000000000000000000000000000000005291D0012C38C0010E4AE0010E4
- AE0010E4AE0011C38C0005291D00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000EC48F0010E5B00010E5B00010E5B00010E5B00010E5
- B00010E5B00010E5B0000FE5B0000FE4B00055F0C5000EC48F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000005E79D500637BCC007C91DA0092A8F00091A7
- F10092A8F10092A8F000869CE7007B90D9005E79D500AFBFF300000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000006974A1009095A500BCC1
- D000BCC1D100A3A8B80000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000005291D008DF9D80010E4
- AF008DF9D80005291D0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000EC48F000FE5B10010E6B00010E6B00010E5B0000FE5
- B10010E6B10010E5B00010E6B10010E6B10057F0C8000EC48F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000CED8F8007C93E5005771C9005871
- C8005871C8005771C9005E79D6007C93E5000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000007489C8008E92
- A200828BAF007A8ED40000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000000000005291D000FC5
- 8E0005291D000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000EC48F000EC48F000EC48F000EC48F000EC48F000EC4
- 8F000EC48F000EC48F000EC48F000EC48F000EC48F000EC48F00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000339F70000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000000F342400339F
- 7000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000FED6AE00FED6AE00FED6AE00FED7B000FED7
- B000FED8B100FED9B400FEDAB600FEDAB600FEDCB900FEDCB900000000000000
- 0000000000000000000000000000000000000000000025242200262624002625
- 23000E86F2000E86F2000E86F2000E86F2000E86F2000E86F2000E86F2000E86
- F2000E86F2000E86F2000E86F2000E86F2000E86F2000E86F2000E86F2000E86
- F200262524002625240000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000032A0710032A071000F342400000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000000000000F3424003CD7A70032A0
- 7100000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000001111110014141400FED4AA00FED4AA00FED4AA00FED5AC00FED5
- AE00FED6AF00FED8B200FED8B200FED9B400FEDAB700FFDBB900111111000000
- 0000000000000000000000000000000000000000000026252300282724002727
- 2400037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037F
- EE00037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037F
- EE00272625000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000031A172003BD7A70030A271000F3424000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000F34240030A2710017CA950031A1
- 7200000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000003F3F3F00ACAC
- AC00ACACAC00ACACAC0063626200FFCD9D00FFCD9D00FFCE9F00FFD0A300FFD2
- A600FFD4AA00FFD7AF00FFD8B100FFD9B500FFDDBC00FFDDBC0063636300ACAC
- AC00ACACAC004B4B4B0000000000000000000000000027262400292826002929
- 2600037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037F
- EE00037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037FEE00037F
- EE002A2927002928260000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000030A3730010BF8E0039D6A60030A373000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000F34240030A3730039D6A6001FCE9A0030A3
- 7300000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000ACACAC00D1D1D100D1D1
- D100D1D1D100D1D1D10032323200C49F7B00C4A07E00C4A17F00C4A38300C4A5
- 8700C4A68800C4A78B00C4A88E00C4A99100C4AC9600C4AC960032323200CCCC
- CC00CCCCCC00CCCCCC00000000000000000000000000292927002E2D2A002E2D
- 2A00FBE7D000FBE6D000FBE7CF00FCE6CF00FBE7D000FBE7D000FBE6D000FCE7
- D000FBE6CF00FBE6CF00FBE7D000FCE7CF00FBE6D000FBE6CF00FBE7CF00FBE6
- CF002D2C2A002D2C2A0000000000000000000003020000040300000403000004
- 0300000403000004030000090600000403000004030000040300000403000000
- 00002DA5750010BF8E0010BF8E0010BF8E002DA575000F342400000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000F34240034D5A40010BF8E0010BF8E0030D4A2002DA5
- 7500000000000004030000040300000403000004030000090600000403000004
- 03000004030000040300000403000003020000000000ACACAC00D4D4D400D4D4
- D400D4D4D400D4D4D400333131009E8373009E8373009E8373009E8474009E84
- 74009E8475009E8576009E8576009E8577009E8577009E85770033313100C8CC
- CA00CECECE00CECECE000000000000000000000000002B292700302E2C00302E
- 2D00FBE7D000FCE7D000FCE7D000FBE7D100FBE7D100FCE7D000FBE7D100FBE7
- D100FBE7D000FBE7D100FBE7D000FBE7D000FCE7D100FBE7D100FCE7D000FBE7
- D000302E2C00302F2C0000000000000000002CA676002CA776002CA676002CA6
- 75002CA675002BA676002BA675002CA675002BA676002CA676002CA676002CA6
- 76002BA7760010BF8E000DCA940010C08E0031D4A3002CA675000F3424000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000805000F3424002CA6750010C08F0010C08E000DCA940037D6A5002BA7
- 76002CA676002CA676002CA676002BA676002BA676002BA675002BA676002CA6
- 76002CA675002CA676002BA675002CA6760000000000ACACAC00D7D7D700D7D7
- D700D7D7D700D7D7D700D6D6D600D6D6D600D5D5D500D5D5D500D5D5D500D4D4
- D400D4D4D400D4D4D400D3D3D300D3D3D300D3D3D300D2D2D200D2D2D20039A4
- 7600C4CDCA00D1D1D1000000000000000000000000002C2A290033312E003231
- 2F00C4D1D700C4D0D700C4D0D700C4D0D700C4D0D800C4D0D700C4D1D700C4D1
- D800C4D1D700C4D1D700C4D1D800C4D0D800C4D0D800C4D1D700C4D0D800C4D0
- D70033302F0033302F0000000000000000002AA777003CD7A7003CD7A7003CD7
- A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7
- A7003CD7A70010BF8E000DCB95000DCC95000FC18F002ED4A2002BA777000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000F3424002BA777002ED4A20010C18F000DCC95000DCB95000DCB95003CD7
- A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7A7003CD7
- A7003CD7A7003CD7A7003CD7A7002AA7770000000000ACACAC00DCDCDC00EDED
- ED00269B6A00279B6A00279B6A00279B6900279A6900289A6900289A6800289A
- 6800289A6800289968002899680028996800289968002899680028996800CBE8
- DC00EAEAEA00D7D7D7000000000000000000000000002F2E2B00373534003735
- 3400FBE8D400FBE9D300FCE9D400FBE8D400FCE9D300FCE8D400FBE8D300FCE9
- D400FBE9D400FBE8D300FBE9D300FBE8D300FCE9D300FBE9D400FCE8D400FCE8
- D4003836340037363300000000000000000028AA7A0010C18F0010C18F0010C1
- 8F0010C18F0010C18F0010C18F0010C18F0010C18F0010C18F0010C18F0010C1
- 8F0010C18F000FC793000ECE98000DCE98000DCE98000DCE98000FC4920027AA
- 7A000F3424000006040000000000000000000000000000000000000604000F34
- 240019C895000FC492000DCE98000DCF98000DCE98000ECE980010C18F0010C1
- 8F0010C18F0010C18F0010C18F0010C18F0010C18F0010C18F0010C18F0010C1
- 8F0010C18F0010C18F0019D29F0028AA7A0000000000A3A3A300E0E0E000F9FC
- FB004ACC9F004ACC9F004ACC9F004ACC9F004ACC9F004ACC9F004ACC9F004ACC
- 9F004ACC9F004ACC9F004ACC9F004ACC9F004ACC9F004ACC9F004ACC9F002899
- 6800FFFFFF00DADADA00000000000000000000000000302E2C003A3836003A38
- 3600C4D2DA00C4D2DA00C4D2DA00C4D2DA00C4D3DA00C4D2DA00C4D2DA00C4D2
- DA00C4D2DA00C4D3DA00C4D2DA00C4D2DA00C4D2DA00C4D2DA00C4D2DA00C4D2
- DA003A3836003A383600000000000000000026AB7B000FC3900010C18F000EC9
- 95000ECF99000DD099000DD09A000DD099000DCF9A000DD09A000DD099000DD0
- 99000ED099000DCF9A000ED09A000ED099000ED09A000ECF9A000DCF990019C9
- 970026AC7B000F342400000000000000000000000000000000000F34240026AC
- 7B000FC793000DCF99000ECF9A000DD099000ED099000ED09A000DD099000ED0
- 99000DD099000ED099000DD09A000DCF9A000DCF9A000DD09A000DD099000DD0
- 9A000EC9950010C18F0020D6A20026AB7B0000000000A1A1A100EAEAEA00F4FA
- F70047CA9D0023A6740023A6740024A4720024A4720024A4720024A4720024A4
- 720024A4720024A4720024A4720024A4720024A4720024A4720023A67400279B
- 6B00FFFFFF00E5E5E500000000000000000000000000312F2E003D3B38003C3A
- 3900FCE9D500FCEAD500FCE9D500FBEAD600FCEAD500FCE9D500FCE9D600FCEA
- D500FCEAD600FCEAD500FCEAD500FCEAD600FBEAD600FCE9D500FCEAD600FBE9
- D5003D3B39003D3B3900000000000000000024AD7C000FC492000ECA96000DD1
- 9B000DD29B000ED29B000DD19B000ED19A000DD19B000DD19B000ED29B000ED1
- 9B000DD29B000ED19B000DD19A000DD19B000DD19B000ED19B000ED19B000FC9
- 950019CB990024AD7C000004030000000000000000000F34240024AD7C0019CB
- 99000DD19B000ED19B000ED19B000ED19B000DD19B000DD19A000DD19B000DD2
- 9B000ED19B000ED19B000DD19B000DD19B000DD29B000DD19B000ED29B000ED1
- 9B000DD19B000ECA960027D9A60024AD7C0000000000A7A7A700FFFFFF00EEFA
- F5005AE0B60026C18F0026C8950026C8950026C8950026C8950026C8950026C8
- 950026C8950026C8950026C8950026C8950026C8950026C8950026C08E0023A2
- 7000FFFFFF00FFFFFF000000000000000000000000003533310043403E004240
- 3E00C4D3DC00C4D4DC00C4D4DC00C4D4DC00C4D4DB00C4D3DC00C4D4DC00C4D4
- DC00C4D4DC00C4D3DC00C4D3DC00C4D4DC00C4D4DC00C4D4DC00C4D3DB00C4D3
- DC0042403E0043403E00000000000000000021B17F000FC995000ED49E000ED4
- 9E000DD49E000DD49E000ED49E000ED49E000ED49E000DD49E000ED49E000ED4
- 9D000ED49E000ED49E000ED49E000ED49E000ED49E000DD49E000ED49E000ED5
- 9E000ED49E000FCF9A0022B07F000F3424000F34240017D09C000FCF9A000ED4
- 9E000DD49E000ED49E000DD49E000ED49E000ED49E000ED49E000ED49E000ED4
- 9E000ED49D000ED49E000DD49E000ED49E000ED49E000ED49E000DD49E000ED4
- 9E000ED49E000ED49E0034DFB00021B17F0000000000A8A8A800FFFFFF00E6F8
- F2006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEE
- C8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC80021A7
- 7400FFFFFF00FFFFFF0000000000000000000000000036343200454341004643
- 4000FBEAD700FCEBD800FCEBD800FCEBD700FCEBD800FCEBD800FCEBD700FCEB
- D700FCEBD700FCEBD700FCEBD800FCEBD800FCEBD800FCEBD800FCEAD800FCEB
- D8004543410045434100000000000000000020B280000FCC98000ED5A0000ED6
- A0000ED69F000ED5A0000ED59F000ED6A0000ED69F000ED59F000ED5A0000ED6
- 9F000ED5A0000ED69F000ED69F000ED69F000ED69F000ED59F000ED6A0000ED5
- A0000ED69F000ED5A0002ADEAC0020B27F0020B27F000ED6A0000ED5A0000ED6
- 9F000ED69F000ED6A0000ED59F000ED69F000ED69F000ED69F000ED5A0000ED5
- A0000ED69F000ED59F000ED59F000ED69F000ED5A0000ED59F000ED5A0000ED6
- 9F000ED6A0000ED5A0003CE2B40020B2800000000000A0A0A000FFFFFF00DDF7
- EF006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEE
- C8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8006CEEC8001EAB
- 7800FFFFFF00FFFFFF0000000000000000000000000038363400484643004846
- 4300FCEBD800FCEBD800FCEBD800FCEBD800FCEBD800FCEBD800FCEBD800FCEB
- D800FCEBD800FCEBD800FCEBD800FCEBD800FCEBD800FCEBD800FCEBD800B2A6
- 9A00484543004845430000000000000000001FB381000FCF9A000ED7A1000ED7
- A1000ED7A1000ED7A1000ED7A1000ED6A1000ED7A2000ED7A1000ED7A1000ED7
- A1000ED7A1000ED7A1000ED6A1000ED7A1000ED7A1000ED7A1000ED7A1000ED7
- A1000ED7A1000FD7A1001EB38100063C2C00063C2C0033E1B1000FD7A1000ED7
- A1000FD7A1000ED7A1000ED7A1000ED7A1000ED7A1000ED6A1000ED7A1000ED7
- A1000ED7A1000ED7A1000ED7A1000ED7A2000ED7A1000ED7A1000ED7A1000FD6
- A1000ED7A1000ED7A10042E5B7001FB38100000000007B7B7B00EFEFEF00F6FC
- FA005CE7BD0023C08D00ECBD9600ECBE9700ECBE9700ECBE9700ECBE9700ECBE
- 9700ECBE9700ECBE9700ECBE9700ECBE9700ECBE9700ECBE970024BD8B0019B3
- 7F00FFFFFF00F3F3F3000000000000000000000000003B3836004E4B49004E4A
- 49004E4B49004E4B49004E4B48003D3A39003C3A39003C3A39003C3A38003D3A
- 39003C3A39003D3A38003C3A39003C3A39003D3A38003D3A39003C3A39004E4B
- 49004E4A48004D4A490000000000000000001BB783000FD5A1000FDAA4000EDA
- A4000EDAA4000FDAA4000FDAA4000FDAA4000EDAA4000EDAA4000EDAA4000FDA
- A4000EDAA4000FD9A4000ED9A4000EDAA5000FDAA4000EDAA4000FDAA4000EDA
- A40046E7BA001BB68400000000000000000000000000063C2C001BB6840046E7
- BA000FDAA4000FDAA4000EDAA4000EDAA4000EDAA5000ED9A4000FDAA4000EDA
- A4000FDAA4000EDAA4000EDAA4000EDAA4000FDAA4000FDAA4000FDAA4000FDA
- A4000EDAA4000FDAA4004EE9BE001BB78300000000000D0D0D0095959500C3CE
- CA0054BF9E0048B48F00F1C9A000F3CCA300F3CCA300F3CCA300F3CCA300F3CC
- A300F3CCA300F3CCA300F3CCA300F3CCA300F3CCA300F3CBA20046B28C0018B7
- 8300BDBDBD009B9B9B000000000000000000000000003C393800504D4B00504E
- 4B006D6B6A005F5B58005F5B5800E8E8C200E8E8C200E8E8C200E8E8C200E8E8
- C200E8E8C200E8E8C200E8E8C200E8E8C200E8E8C200E8E8C2003E3C3A00504D
- 4B00504D4B00504D4B00000000000000000019B884000ED8A3000EDBA6000FDB
- A6000EDBA6000FDBA6000EDBA5000FDCA6000EDCA6000EDBA5000FDBA5000FDC
- A5000EDBA6000EDBA6000FDCA6000FDCA5000FDBA6000FDBA6000FDBA6004FEA
- BF001AB88500063C2C0000000000000000000000000000000000063C2C001AB8
- 85000EDBA5000FDBA6000FDBA6000FDBA5000FDCA5000FDCA6000EDBA5000EDB
- A6000FDCA5000FDBA6000EDBA5000EDCA6000FDCA6000EDBA5000FDBA6000FDB
- A6000FDBA6000EDBA60053EBC10019B884000000000000000000000000002222
- 22001616160000000000F5D1AB00F9D8B200F8D8B200F9D8B200F8D8B100F9D8
- B200F9D8B200F8D8B100F9D8B100F9D8B200F9D8B100F7D5AF00161817001616
- 160010101000000000000000000000000000000000003D3A3900534F4D005350
- 4D005F5B58004A4645004A464500E9E8C400E9E9C400E9E9C400E9E9C500E8E9
- C400E8E9C400E9E8C4002F2E2C0047434100E9E9C500E9E9C500413D3C00534F
- 4D0053504D0053504E00000000000000000018B985000FDCA6000FDDA7000EDD
- A7000FDDA7000EDDA7000FDCA7000FDDA7000EDDA7000FDDA7000FDCA7000FDD
- A7000EDDA7000FDDA7000FDCA7000FDDA7000FDCA7000FDDA7000FDCA70018BA
- 8500063C2C00000000000000000000000000000000000000000000000000063C
- 2C0058EDC3000FDCA7000FDDA7000FDDA7000FDDA7000FDCA7000EDCA7000EDD
- A7000FDDA7000EDDA7000FDDA7000EDDA7000FDCA7000FDCA7000EDDA7000FDD
- A7000EDDA7000FDDA70056EDC20018B985000000000000000000000000000000
- 00000000000000000000F3CEA900FADBB700FADBB700F9DAB700FADBB700F9DB
- B700F9DBB700F9DBB700F9DAB700FADBB700F9DBB700F5D2AE00000000000000
- 00000000000000000000000000000000000000000000403E3C00575452005754
- 52005F5B58004A46450057545200EBEBCD00EBEBCC00EBEBCC00EBEBCC00EBEC
- CC00EBEBCC00EBEBCC002F2E2C0047434100EBEBCC00EBEBCC00444140005754
- 52005754520057545200000000000000000013C08A0013C08A0013C08A0013C0
- 8A0013C08A0013C08A0013C08A0013C08A0013C08A0013C08A0013C08A0013C0
- 8A0016BC89000FE0AA000FDFAA000FE0AA000FE0A9006BF2CC0016BC88000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000063C2C0016BC88006BF2CC000FDFA9000FE0AA000FDFAA0021E3B10016BC
- 890013C08A0013C08A0013C08A0013C08A0013C08A0013C08A0013C08A0013C0
- 8A0013C08A0013C08A0013C08A0013C08A000000000000000000000000000000
- 00000000000000000000F2CCA800FADDBA00FADCBA00FADCBA00FADDBA00F9DC
- BA00FADDBA00FADCBA00F9DCBA00FADCBA00FADCB900F4D0AD00000000000000
- 00000000000000000000000000000000000000000000413E3D005A5654005A56
- 54005F5B58004A4645005A565400EDECD000EDEDD100EDEDD000EDEDD100ECEC
- D000EDEDD000ECEDD0002F2E2C0047434100ECEDD000ECECD100464341005A56
- 54005A5654005955540000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000014BD89000FE1AB0010E0AB0010E1AB0073F4CF0014BD8900063C2C000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000063C2C0014BD890010E0AB0010E1AB0010E0AB002DE6B60014BD
- 8900000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000F1CBA600FADEBC00FADEBD00FADDBC00FADDBC00FADE
- BD00FADEBD00FADDBD00FADEBC00FADEBD00FADDBD00F3CFAC00000000000000
- 0000000000000000000000000000000000000000000042403E005B5855005B57
- 56005F5B58004A4645005C585500EEEED500EEEED500EEEED500EEEED500EEEE
- D500EEEED500EEEED5002F2E2C0047434100EEEED500EEEED500484442005B57
- 56005C5856005B58560000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000013BE8B000FE2AC0010E1AD000FE2AC0013BF8A00063C2C00000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000063C2C007CF5D2000FE2AC0010E1AD003AEABB0013BE
- 8B00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000EFC8A400FAE0C100FBE0C200FAE0C100FBE0C200FAE0
- C200FAE0C200FAE0C200FAE0C100FBE0C100FAE0C200F1CBA800000000000000
- 00000000000000000000000000000000000000000000444140005F5A58005F5B
- 58005F5B58004A4645005E5B5900F0F1DE00F1F1DD00F1F1DE00F1F1DE00F0F1
- DE00F1F1DE00F0F1DE002F2E2C002F2E2C00F1F1DD00F0F1DE00494645005F5A
- 59005F5B59006D6B6A0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000012C18C0010E3AF0089F8D70011C18C000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000063C2C0011C18C0089F8D70050EEC40012C1
- 8C00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000EEC7A400FBE2C300FAE1C400FBE1C300FAE2C300FBE1
- C400FAE1C400FBE1C400FBE1C300FBE1C300FBE1C400EFC8A600000000000000
- 00000000000000000000000000000000000000000000454241008D8C8B006D6B
- 6A005F5B58004A4645006D6B6A00FBFBF500FBFBF500FBFBF500FBFBF500FBFB
- F500FBFBF500FBFBF500FBFBF500FBFBF500FBFBF500FBFBF500555353006D6B
- 6A008D8C8B004542400000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000011C28D008EF9D80010C28D00063C2C000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000063C2C0010C28D0057F0C70011C2
- 8D00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000EFC7A400EFC7A400EFC7A400EFC7A400EFC7A400EFC7
- A400EFC7A400EFC7A400EFC7A400EFC7A400EFC7A400EFC7A500000000000000
- 000000000000000000000000000000000000000000003A373600454241004542
- 40005F5B58004A46450045424100C3C3B500C3C3B500C3C3B500C3C3B500C3C3
- B500C3C3B500C3C3B500C3C3B500C3C3B500C3C3B500F4F3E400363333004542
- 4100454240001F1D1D0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000010C28D000FC28D00063C2C00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000063C2C00F5F9F70010C2
- 8D00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000EC48F000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000EC4
- 8F00000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000020202000A0A0900000000000000000000000000000000000000
- 0000000000000000000000000000000000000A0A090002020200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000008E8F82008E8F82008E8F82008E8F82008E8F
- 82008E8F82008E8F82008E8F82008E8F82001313120002020200000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000349E6F00349E6F00349E6F00349E6F00349E
- 6F00349E6F00349E6F00349E6F00349E6F000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000A5A69B00C2C3B400C2C3B400C2C3B400C2C3
- B400C2C3B400C2C3B400C2C3B400A5A69B000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000E2B79800E1B69600E1B69600E1B69600E1B69600E1B69600E1B69600E1B6
- 9600E1B69600E1B69600E1B69600E1B69600E1B69600E1B69600E1B69600E1B6
- 9600E1B69600E1B6960000000000000000000000000000000000000000000000
- 000000000000000000000000000033A070003CD7A70013B98C0013B98C0013B9
- 8C0013B98C0013B98C003CD7A700329F70000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000A5A5A500CECECE00E7E7E700E7E7E700E7E7E700E7E7E700E7E7
- E700E7E7E700E7E7E700E7E7E700E7E7E700E7E7E700E7E7E700CCCCCC002525
- 2500000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000C2C3B400F0F0EC00F0F0EC00F0F0EC00F0F0
- EC00F0F0EC00F0F0EC00F0F0EC00C2C3B4000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000F9E5C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5
- C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5C400F9E5
- C400F9E5C400E2B7970000000000000000000000000000000000000000000000
- 000000000000000000000000000031A1710039D7A6000CC78F000CC78F000CC7
- 8F000CC78F000CC78F0039D7A60032A171000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000F0F0F00B3B3B300CECECE00E4E4E400E4E4E400E4E4E400E3E3E300E3E3
- E300E3E3E300F2F2F200D4DDD900E2E2E200E1E1E100EFEFEF00CCCCCC005B5B
- 5B00000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000A5A69B00C2C3B400C2C3B400C2C3
- B400C2C3B400C2C3B400A5A69B00000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000F8E2BB00F3D6B100F3D6B100F3D6B100F3D6B100F3D6B100F3D6B100F3D6
- B100F3D6B100F3D6B100F3D6B100F3D6B100F3D6B100F3D6B100F3D6B100F3D6
- B100F8E0BA00E2B8980000000000000000000000000000000000000000000000
- 000000000000000000000000000030A2720034D5A4000CC790000CC790000CC7
- 90000CC790000CC7900034D6A50031A272000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000033333300C2C2C200D5D5D500E4E4E400F3F3F300F3F3F300F3F3F300F3F3
- F300E3E3E3005DB59100BFD7CD00F3F3F300F2F2F200EDEDED00D5D5D5008383
- 8300000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000008182770081827700818277008182
- 7700818277008182770081827700000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000F8E1BE00F3D6B100F5DAB500F8E1BB00F8E0BB00F8E1BB00F8E1BB00F8E1
- BB00F8E1BB00F8E1BC00F8E1BB00F8E1BB00F9E1BC00F8E1BB00F8E1BB00F4D7
- B200F8E1BB00E3B99A0000000000000000000000000000000000000000000000
- 00000000000000000000000000002DA4740029D3A1000DCA92000DCA92000DCA
- 92000DCA92000DCA920029D3A1002EA473000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00008C8C8C00CFCFCF00E8E8E8006CC0A00038B2840039B083003BB083003AAE
- 820078C0A4003EAC80003BAC81003DAB7F003DAA7D00D1DFD800E9E9E900ACAC
- AC0000000000000000000000000000000000A5A69B00A5A69B00A5A69B00A5A6
- 9B00A5A69B00A5A69B00A5A69B00A5A69B00A5A69B00A5A69B00A5A69B00A5A6
- 9B00A5A69B00A5A69B00A5A69B00A5A69B00A5A69B00A5A69B00A5A69B00A5A6
- 9B00A5A69B00A5A69B00A5A69B00A5A69B000000000000000000000000000000
- 0000F8E2BF00F3D7B200F8E2BC00F8E1BC00F8E1BC00F8E1BC00F8E2BC00F8E1
- BC00F8E1BC00F8E1BC00F8E2BC00F8E1BC00F8E1BC00F9E1BC00F8E1BC00F5DA
- B500F8E1BC00E3BA9B0000000000000000000000000000000000000000000000
- 00000000000000000000000000002CA6750023D29F000DCB93000DCB93000DCB
- 93000DCB93000DCB930023D19F002DA574000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00009D9D9D00D0D0D000EFEFEF0039B2850039B184005DBC980064BC9B0058B8
- 9400DEE3E1003CAB800092CAB30084C4AA003EAA7E0096C9B300EEEEEE00B9B9
- B90002020200000000000000000000000000A5A69B00C3C4B500C2C3B500C2C4
- B500C3C4B400C2C4B500C3C4B500C3C3B500C2C4B500C3C4B500C3C3B400C3C3
- B500C3C3B500C3C4B500C3C3B500C2C4B500C3C4B500C3C3B400C3C4B400C3C4
- B500C3C3B400C2C4B500C3C3B500A5A69B000000000000000000000000000000
- 0000F8E3BF00F4D8B300F8E2BD00F8E2BD00F8E2BD00F8E1BD00F9E2BC00F8E2
- BD00F8E2BD00F8E2BD00F8E2BD00F8E2BC00F8E1BD00F8E1BC00F8E2BD00F5DB
- B600F8E1BD00E3BC9C0000000000000000000000000000000000000000000000
- 00000000000000000000000000002BA676001DD09D000DCC94000DCC94000DCC
- 94000DCC94000DCC94001DD19C002BA676000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000ACACAC00D0D0D000F1F1F10044B98E0038B2850041B28800CFDFD900E6E6
- E600E6E6E60058B69100A5D0BE00B9D7CC003BAA7D00AED1C200F0F0F000C4C4
- C40025252500000000000000000000000000A5A69B00E4E3DB00E4E3DB00E5E6
- DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6
- DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6DF00E5E6
- DF00E5E6DF00E5E6DF00C7C7B800A5A69B000000000000000000000000000000
- 0000F9E4C300F4DAB500F8E2BF00F8E3BF00F8E3BF00F9E3BF00F8E2BE00F8E3
- BE00F9E3BF00F8E2BF00F8E2BF00F8E3BF00F8E2BF00F8E2BE00F8E3BE00F5DC
- B800F8E2BF00E5BE9F00000000000000000028AA7A0028AA7A0027AA790028AA
- 790028AA790028AA790028AA790027AA790014CE99000DCF98000DCF98000DCF
- 98000DCF98000DCF980013CF990028A9790029A9780028A9790028A9780029A9
- 780028A9780029A9780029A97800000000000000000000000000000000000000
- 0000CACACA00DADADA00F2F2F200E0E7E40045B98F0035B486008DCDB500E8E8
- E800E8E8E800E6E6E6006FC0A1003BAE8200D7E1DC00E5E5E500EEEEEE00CDCD
- CD0083838300000000000000000000000000A5A69B00D6977300D7977400D797
- 7400D7977400D7977400D7977400D7977400D7977400D7977400D7977400D797
- 7400D7977400D7977400D7977400D7977400D7977400D7977400D7977400D797
- 7400D7977400D7977400C7C9B900A5A69B000000000000000000000000000000
- 0000F8E4C500F6DEBA00F9E3BF00F8E2BF00F8E3C000F8E3C000F8E3C000F9E3
- C000F8E2C000F8E3C000F8E3BF00F8E3C000F9E3C000F7E2BE00F9E1BE00F6DD
- B900F7E1BD00E5BFA000000000000000000026AC7B003EDCB0003EDCB0003EDC
- B0003EDCB0003EDCB0003EDCB0003EDCB00011CE98000DD099000DD099000DD0
- 99000DD099000DD0990011CE98003EDCB0003EDCB0003EDCB0003EDCB0003EDC
- B0003EDCB0003EDCB00027AA7900000000000000000000000000000000000000
- 0000D0D0D000E5E5E500EFEFEF0059C09C0039B88B0035B58700E7E9E800E6E8
- E700E8E8E800E8E8E800E5E6E60080C7AC00E6E6E600E6E6E600EBEBEB00CFCF
- CF009A9A9A00000000000000000000000000A5A69B00E6A47E00E8A57F00E8A5
- 7F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A5
- 7F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A5
- 7F00E8A57F00E8A57F00C9CABB00A5A69B000000000000000000000000000000
- 0000F9E5C500F7DFBD00F8E3C000F9E3C000F9E3C100F8E3C000F8E3C000F9E3
- C000F9E3C000F8E2C000F9E3C100F9E4C100F7E2C000F8E3BF00F7E2BF00F5DD
- BA00F7E0BE00E6C0A300000000000000000024AE7C0011C9960011C9960011C9
- 960011C9960011C9960011C9960011C9960011C996000DD29B000DD29B000DD2
- 9B000DD29B000DD29B000DD29B0011C9960011C9960011C9960011C9960011C9
- 960011C9960011C9960026AC7B00000000000000000000000000000000000000
- 0000D2D2D200EDEDED00EDEDED00EAEAEA00EAEAEA00DCE6E2003EB88C0081CB
- AF00E5E8E70048B78E0037AF82007FC5AA00E7E7E700E6E6E600E8E8E800CFCF
- CF00A8A8A800000000000000000000000000A5A69B00E6A37D00E8A57F00E8A5
- 7F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A5
- 7F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A5
- 7F00E8A57F00E8A57F00CCCDBE00A5A69B000000000000000000000000000000
- 0000F9E6C900F7E1BF00F9E4C200F8E4C300F8E4C200F9E4C200F8E4C200F9E4
- C200F7E3C200F7E1BF00F5DEBD00F5DFBD00F5DFBE00F5DEBE00F5DEBD00F3DC
- BA00F3DCBC00E8C3A500000000000000000021B17F000ED59E000ED59E000ED5
- 9E000ED59E000ED59E000ED59E000ED59E000ED59E000ED59E000ED59E000ED5
- 9E000ED59E000ED59E000ED59E000ED59E000ED59E000ED59E000ED59E000ED5
- 9E000ED59E000ED59E0022AF7D00000000000000000000000000000000000B0B
- 0B00D3D3D300F4F4F400EBEBEB00EBEBEB00EBEBEB00EBEBEB0031B6860035B5
- 870094D1BA0036B385003DB388002EAE8000E9E9E900E8E8E800E8E8E800D0D0
- D000C6C6C6002C2C2C000000000000000000A5A69B00E5A37D00E8A57F00E8A5
- 7F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A5
- 7F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A57F00E8A5
- 7F00E8A57F00E8A57F00CCCEBF00A5A69B000000000000000000000000000000
- 0000F9E7CA00F7E2C000F9E5C400F8E4C300F9E5C400F8E5C400F9E5C300F9E4
- C400F8E3C100F4DEBE00F2DCBC00F3DDBD00F4DDBE00F5DEBE00F4DEBD00F4DD
- BA00F4DEBD00E8C5A70000000000000000001FB280000ED6A0000ED6A0000ED6
- A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6
- A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6A0000ED6
- A0000ED6A0000ED6A00020B17F00000000000000000000000000000000002C2C
- 2C00D6D6D600F5F5F500ECECEC00EBEBEB00EBEBEB00EBEBEB007CCCAF0034B6
- 880035B5870038B58700CEE2DA0096D0B800E9E9E900E9E9E900E9E9E900D6D6
- D600CDCDCD005C5C5C000000000000000000A5A69B00E5A37E00E9A68000E8A6
- 8000E9A68000E8A68000E8A68000E9A68000E9A68000E9A68000E8A68000E8A6
- 8000E8A78000E8A68000E8A78000E9A68000E9A78000E9A68000E9A68100E8A6
- 8000E8A78000E8A68000CECFC000A5A69B000000000000000000000000000000
- 0000F9E8CC00F8E5C400F9E5C500F9E5C500F9E5C500F9E5C400F8E5C400F8E4
- C400F8E3C200F2DCBD00F3DCBD00F2DBBA00F2DBBB00F2DCBC00F3DCBC00F3DD
- BC00F3DCBD00E9C7A90000000000000000001EB4820010D8A10010D8A10010D8
- A10010D8A1000FD8A1000FD8A1000FD8A1000FD8A1000FD8A1000ED8A1000ED8
- A1000ED8A1000ED8A1000ED8A1000ED8A1000ED8A1000ED8A1000ED8A1000ED8
- A1000ED8A1000ED8A10020B28000000000000000000000000000000000005B5B
- 5B00D1D1D100E4E4E400DDDDDD00DCDCDC00DCDCDC00DCDCDC00D9DBDA0030AB
- 800030AA7F002AA77B00DADBDA00DBDBDB00DADADA00D9D9D900D9D9D900D1D1
- D100C2C2C200797979000000000000000000A5A69B00E6A68100EAAA8400EAA9
- 8400EBA98300EBA98300EBA98400EAAA8300EAAA8300EBA98300EAAA8300EBAA
- 8300EAAA8400EAAA8300EBA98300EAA98300EAAA8400EBAA8300EBA98300EAAA
- 8300EAAA8400EAAA8300D1D2C300A5A69B000000000000000000000000000000
- 0000F9E8CD00F8E6C700F9E6C800F9E5C800F8E6C800F9E5C700F9E6C800F7E4
- C500F6E1C300EDD5B700EACFB100E8CCAF00E7CBAC00E6CBAD00E7CBAC00E8CC
- AF00DEBEA300E7C3A80001010100000000001AB7840016DBA60016DBA60016DB
- A60016DBA60015DBA60015DBA60015DBA60014DBA60014DBA60014DBA60014DB
- A60013DBA60013DBA60013DBA60013DBA60013DBA60013DBA60013DBA60013DB
- A50013DBA50012DBA5001CB68300000000000000000000000000000000007171
- 7100A4A4A4009494940092929200929292009292920092929200929292009191
- 910091919100909090009090900090909000909090009090900090909000A3A3
- A3008B8B8B00767676000000000000000000A5A69B00E6A88100ECAB8500ECAC
- 8600EBAC8500EBAB8500EBAB8500ECAB8500EBAC8500ECAC8500EBAC8500EBAC
- 8500ECAB8500EBAC8500EBAC8500ECAC8500EBAB8500ECAC8500ECAB8500ECAC
- 8500ECAC8500EBAC8500D3D4C500A5A69B000000000000000000000000000000
- 0000F9E9CF00F8E6C800F9E7C800F9E6C800F9E6C800F8E6C900F9E7C900F8E5
- C700F5E1C300EACFB300E4C5AA00E2C0A500DBB89C00DBB89C00D9B69B00D9B7
- 9B00E8CDAE00E7C3A800000000000000000018B8850090F9D90090F9D90090F9
- D90090F9D90090F9D90090F9D900F5F9F7001FDDA90019DCA70019DCA70019DC
- A70018DCA70018DCA7001DDDA900F5F9F70090F9D90090F9D90090F9D90090F9
- D90090F9D90090F9D9001AB7840000000000000000000E7C5A0021B17F0021B1
- 7F0021B17F0021B17F0021B17F0021B17F0021B17F0021B17F0021B17F0021B1
- 7F0021B17F0021B17F0021B17F0021B17F0021B17F0021B17F0021B17F0021B1
- 7F0021B17F0021B17F000E7C5A0000000000A5A69B00E8A98300ECAE8700ECAE
- 8700EDAE8700EDAE8700ECAE8700ECAD8700ECAE8700EDAE8700EDAE8800EDAE
- 8700ECAE8800EDAE8700EDAE8700ECAD8700EDAE8700ECAE8700ECAE8700ECAE
- 8700ECAE8800ECAE8700D4D5C800A5A69B000000000000000000000000000000
- 0000F9E9CF00F8E7C900F8E7C900F9E7C900F8E6C900F9E7CA00F9E6C900F8E5
- C800F4E0C100E8CBAF00E2C2A700E4C7AE00DFBFA600E1C3A800EAD2B600F5DF
- BC00E8C5AA00483B3200000000000000000017BA870017BB870017BA860017BA
- 860018BA870017B9860017BA870017BA86002AE0AD001DDDA9001DDDA9001DDD
- A9001CDDA9001CDDA90028E0AD0018B9860018B9860018B9860018B9860018B9
- 860018B9860019B9850019B98500000000000000000021B17F001AC995001AC9
- 95001AC995001AC995001AC995001AC995001AC995001AC995001AC995001AC9
- 95001AC995001AC995001AC995001AC995001AC995001AC995001AC995001AC9
- 95001AC995001AC9950021B17F0000000000A5A69B00E8AC8600EFB38C00EFB3
- 8C00EFB28C00EFB28C00EFB28C00EFB38C00EFB28C00EFB38B00EFB28C00EFB3
- 8C00EFB28B00EFB28C00EFB28C00EFB28C00EFB38C00EFB38B00EFB28C00EFB3
- 8B00EFB38B00EFB28C00D7D7CB00A5A69B000000000000000000000000000000
- 0000F9EAD100F9E7CB00F9E8CB00F9E8CB00F9E7CC00F9E8CB00F9E8CB00F6E6
- C900F1DDC000FCF9F700F8F2EC00FDF7EE00FAECD500F8E3C300F7E0BB00483D
- 3300000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000014BC88003FE4B30026DEAB0025DEAB0025DE
- AB0025DEAB0024DEAB003CE3B20015BC88000000000000000000000000000000
- 0000000000000000000000000000000000000000000021B17F0012C28E0012C2
- 8E0013C28D0013C38E0012C28E0012C28E0012C28D0013C28E0012C28E0012C2
- 8E0012C38D0013C28E0012C38E0012C38E0012C38E0012C28E0013C28E0013C2
- 8E0012C38E0013C38E0021B17F0000000000A5A69B00E9AD8700F1B58E00F1B5
- 8E00F1B58E00F0B58E00F0B58D00F0B58E00F0B58E00F1B58E00F1B58E00F0B5
- 8E00F1B58E00F1B58D00F1B58E00F1B58E00F0B58D00F1B58D00F0B58D00F0B5
- 8D00F0B58E00F1B58E00D7D8CC00A5A69B000000000000000000000000000000
- 0000F9EBD200F9E8CC00F8E7CC00F9E8CC00F9E7CC00F9E8CC00F8E7CB00F7E4
- C800F2DDC000FEFAF500FCF6EC00FBF0DD00F8E3C200F7DFBA00EDD0B4000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000013BE8A0046E5B5002ADEAB0029DEAB0029DE
- AB0029DEAB0029DEAB0045E5B50014BE89000000000000000000000000000000
- 0000000000000000000000000000000000000000000021B17F0012C4900011C4
- 8F0012C48F0012C48F0011C48F0011C48F0011C48F0012C48F0012C48F0012C4
- 8F0011C48F0012C48F0012C48F0012C48F0011C48F0011C38F0012C48F0012C4
- 8F0011C48F0011C48F0021B17F0000000000A5A69B00EAAF8900F1B78F00F1B7
- 9000F1B89000F1B79000F2B79000F2B89000F1B79000F1B79000F1B89000F1B8
- 9000F2B89000F2B89000F2B79000F1B79000F2B79000F2B89000F2B78F00F2B7
- 8F00F2B79000F1B79000D8DACE00A5A69B000000000000000000000000000000
- 0000F9EBD200F9E8CD00F9E8CD00F9E8CC00F9E8CD00F8E8CD00F9E7CB00F6E4
- C900F1DCBF00FCF4E700FBEFDC00F9E8CE00F7DFB900EFD3B700493E35000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000013BF8B004CE6B7002EDEAB002EDEAB002DDE
- AB002DDEAB002DDEAC004BE6B70013BF8B000000000000000000000000000000
- 0000000000000000000000000000000000000000000021B17F0011C5900011C5
- 900011C5900011C5900011C5900011C5900011C5900011C5900011C5900011C5
- 900011C5900011C5900011C5900011C5900011C5900011C5900011C5900011C5
- 900011C5900011C5900021B17F0000000000A5A69B00EBB18B00F4BB9300F3BB
- 9400F3BB9400F3BB9400F4BB9300F4BB9400F4BB9300F4BB9400F3BB9400F3BB
- 9400F3BC9400F4BB9400F3BB9400F3BB9300F4BC9300F3BB9400F4BB9300F4BB
- 9400F4BB9400F4BB9400DBDBD000A5A69B000000000000000000000000000000
- 0000F9EBD400F9E8CE00F9E8CE00F9E8CE00F9E9CE00F9E9CE00F7E6CD00F5E1
- C800F0DABE00F7E2C000F7E1BE00F7DFB90051463C0000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000011C28C0053E8B90035DDAB0034DDAB0034DD
- AB0034DEAB0034DEAB0053E8B90011C18C000000000000000000000000000000
- 0000000000000000000000000000000000000000000016BD880017E8B40017E8
- B40017E8B40017E8B40017E8B40017E8B40017E8B40017E8B40017E8B40017E8
- B40017E8B40017E8B40017E8B40017E8B40017E8B40017E8B40017E8B40017E8
- B40017E8B40017E8B40016BD880001060400A5A69B00EBB28C00F4BD9400F4BC
- 9500F4BC9500F4BC9500F5BD9500F4BD9500F4BC9500F4BD9500F4BD9500F5BD
- 9500F4BC9500F4BD9500F4BD9500F5BD9500F5BD9500F4BD9500F4BD9500F4BD
- 9500F4BD9400F5BD9400DBDCD000A5A69B000000000000000000000000000000
- 0000FAECD400F9E8CE00F9E9CF00F9E9CE00F9E9CF00F9E8CD00F7E5CC00F4E2
- C700F0DABF00F7DFB900F7DFB900F1D8BC000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000FC38D0054E9BA0037DDAB0037DDAB0037DD
- AB0037DDAB0037DDAB0054E9BA0010C28D000000000000000000000000000000
- 000000000000000000000000000000000000000000000E382C0016BD880017E8
- B400299065002892660025A1710025A1710025A1710025A1710025A1710025A1
- 710025A1710025A1710025A1710025A1710025A1710025A1710025A171000CBE
- 890046E7B50017E8B4000E372A0000000000A5A69B00C98C6B00C98C6B00C98C
- 6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C
- 6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C6B00C98C
- 6B00C98C6B00C98C6B00DCDDD100A5A69B000000000000000000000000000000
- 0000FAECD500F9E9CF00F9E9CF00F9E9CF00F9E9CF00F9E9CE00F7E6CC00F6E3
- C900F1DDC200F4DCB800F1D8BC006A5E50000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000EC38E0079EDC8003ADCAB0039DCAB0039DC
- AB0039DCAB0039DDAB0079EDC8000FC38E000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000000F3C2E0016BD
- 880048E6B5002990650025A1710025A1710025A1710025A1710025A1710025A1
- 710025A1710025A1710025A1710025A1710025A1710025A1710025A171004DEC
- BA0017E8B40016BD88000000000000000000C2C3B400C2C3B400C2C3B400C2C3
- B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3
- B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3B400C2C3
- B400C2C3B400C2C3B400C2C3B400C2C3B4000000000000000000000000000000
- 0000F1D8BC00F1D8BC00F1D8BC00F1D8BC00F1D8BC00F1D8BC00F1D8BC00F1D8
- BC00F1D8BC007266580000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000EC48F000EC48F000EC48F000EC48F000EC4
- 8F000EC48F000EC48F000EC48F000EC48F000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000001
- 010017DCA70010D1970010D1970010D1970010D1970010D1970010D1970010D1
- 970010D1970010D1970010D1970010D1970010D1970010D1970010D1970016CE
- 99000F3A2D00000101000000000000000000424D3E000000000000003E000000
- 2800000060000000A00500000100010000000000804300000000000000000000
- 000000000000000000000000FFFFFF0000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FF
- E003FFE003FFE003FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01FFFF01
- FFFE01FFFE01FFFE01FFFE01FFF801FFF801FFF801FFF801FFF803FFF803FFF8
- 03FFF803FFF003FFF003FFF003FFF003FFE00FFFE00FFFE00FFFE00FF0001FF0
- 001FF0001FF0001FE0001FE0001FE0001FE0001F80007F80007F80007F80007F
- 8000FF8000FF8000FF8000FF8001FF8001FF8001FF8001FF0000FF0000FF0000
- FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00001F00
- 001F00001F00001F00001F00001F00001F00001F00001F00001F00001F00001F
- 8000FF8000FF8000FF8000FF8000FF8000FF8000FF8000FFC000FFC000FFC000
- FFC000FFF03FFFF03FFFF03FFFF03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00
- 0000FFFFFF8007FF00003F000000FFFFFF80FFFF8000FF000000010101807FFF
- 8000FF000000010101803FFF8000FF800001010101801FFF8000FF8000030101
- 01800FFF8000FFC000030101018007FF8000FFE00007010101E003FF8000FFE0
- 0007010101F001FF8000FFF0000FEFEFEFF000FF8000F8F0001FEFEFEFFC007F
- 8000F8F0001FE0000FFE00078000F8F8001FFFEFFFFE0003FFE3F8FC003FFE00
- FFFF8001FFE3F8FE007FFE00FFFFC000FFE3F8FE007FFE00FFFFC000FFE1F0FE
- 00FFFE00FFFFF020FFE1F0FF00FFFE00FFFFF070FFE0E0FF00FFFE00FFFFF038
- FFF001FFC1FFFE00FFFFF01CFFF803FFC3FFFE00FFFFF81FFFFC07FFC7FFFE00
- FFFFF80FFFFFFFFFFFFFFFFFFFFFFE07FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFC00007FFFFFFFFFFFFC0000FE0001F800001000000C0000FE0001F000000
- 800003C0000FE0001F000000800003C0000FE0001F000000800003C0000FE000
- 1F000000800003C0000FE0001F000000800003C0FC0FE0001F000000800003C0
- FC0FE0001F000000800003C0FC0FE0001F000000800001C0FC0FE0001F000000
- 800001C0FC0FE0001F000000800001C0FC0FE0001F000000800001C0C000E000
- 1F000000800001C0C000E0001F000000800001C0C000E0001F000000FE007FC0
- F003E0001F000000FE007FC0F803800007000000FE007FC0F807800007000000
- FFFFFFC0FE1F800007800003FFFFFFE1FF1F800007FFFFFFFFFFFFFFFF1FC000
- 0FFFFFFFFFFFFFFFFFFFFF87FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFF801FFFFFFFFFFFFFC00001FFE0FFFE003FFFFFFFC00001FFC07FFE003F
- FFFFFFC00001FFC03FFFC0FFFFFFFFC00001FF001FFFC1FFFFFFFFC00001FE00
- 0FFFC1FFFFFFFFC00001FE0007FFC1FFFFFFFFC00001F80003FFC1FF800003C0
- 0001F00001FFC1FF800003C00001F00000FFC1FF800003C00001C00001FFC1FF
- E00007C00001800003FFC1FFE00007C00001800003FFC1FFF0000FC000018000
- 0FFFC1FFF0000FC0000180001FFFC1FFF0000FC0000180001FFFC1FFF0000FC0
- 000182007FF3C1E3F0001FC000018200FFF1C1E3F8001FC000018000FFF1C1C3
- FFFFFFFFFFFFC003FFF00003FFFFFFFFFFFFE007FFF00003FFFFFFFFFFFFF007
- FFF00003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFF
- 000FF01C07F8001FFF87FFFFFC3FF07F0FF0000FFF87FFFFF83FF83E1FE00007
- FF87FFFFF83FF8181FC00003F8007FFFE03FFC001F800001F8007FFFC03FFC00
- 1F000000F8007FFC003FFC001F000000FF03FFF0001FFE003F000000FE00FFF0
- 001FFE001F000000FC00FFF0000FF8001F000000F0003FF0000FE00003000000
- F0303FF0000FC00003000000F0781FF0000F800000000000F0FC1FF0001F8000
- 00000000F1FE1FF0001FFF80FF000000F1FE1FF0003FFF80FF000000F0FC1FFF
- C03FFFC1FF000000F0781FFFE03FFFC1FF800001F0303FFFF03FFFC3FF800003
- F8007FFFF83FFFC3FFE00007FC00FFFFFC3FFFE7FFF0000FFE00FFFFFE3FFFE7
- FFF0001FFFFFFFFFFFFFFFFFFFFC003FFFFFFFFFFFFFFE00FFFFFFFFC0000FE0
- 0007FF81FFFFFFFF80001FF8003FFE00FFFC0FFF80001FF8003FFE007FF007FF
- 80001FF8003FFE007FF003FF80001FF8003FF8001FC000FFF0001FF8003FF000
- 1FC0C0FFF0001FF8003FF0001F81E0FFF0001FF8003FF0000F83F0FFF0001FF8
- 003FE0000787F8FFF0001FF8003FE0000787F8FFF0001FF8003FC0000383F0FF
- F0001FF8003FC0000381E0FFF0001FF8003FC00003C0C0C7F0001FF8003FC000
- 03E00047F0001FF8003FC00003F00007F0001FF8003FC00003F00007F00003F8
- 003FC00003FFF807F00003F8003FC00003FFF807F00003F8003FC00003FFE007
- F00003F8003FFF81FFFFE007F00003F8003FFFC3FFFFE007F80003F8003FFFC7
- FFFFFFFFFFFFFFF8003FFFE7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC3FFC00003FFFFFFFFFFFFFF80E3800003
- FFFFFFFFFFFFFF00C38000039FFFFFFFFFFFFE00018000039FE001FFFFFFFC00
- 018000038FE001FFFFFFF800018000038FF001800001F0000380000387F80180
- 0001E0000380000383F801800001E00003800003806001800001800001800003
- C00001800001800001800003C00001800001800001800003E000018000018000
- 01800003F00001800001800001800003F00001800001800001800003F80019FF
- FFFF800001800003FC003FFFFFFF800001800003FE007FFFFFFF800001800003
- FFFFFFFFFFFF801803800003FFFFFFFFFFFFC03803C00003FFFFFFFFFFFFF03E
- 07E00007FFFFFFFFFFFFFFFFFFFFFFFF800001FFFFFFFFFFFFFFFFFFF0000780
- 0001FFFFFFFFFFFFF00007C00003F07FFF80007FF00007C00003E03FFF80007F
- F00007C00003C01FFF80007FF00007C000038007FF800063F00007C000038007
- FF800043F00007C000038003FF800041F00007C000038000FFC20001F00007C0
- 00038000FFE30001F00007C00003C0007FFF0001F00007C00003E0001FC20001
- F00007C00003F0001F800001F00007C00003F0000F800001F00007C00003FC00
- 07800063F00007C00003FE000380007FF00007C00003FE000380007FF00007C0
- 0003FF800380007FF00007C00003FFC003FE07FFF00007C00003FFC003FC03FF
- F00007C00003FFF007F801FFF00007C00003FFF80FF801FFFE493FC00003FFFC
- 1FF801FFFE493FFFFFFFFFFFFFFE07FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFE001FFFFFFFFFFFFF800003FFF8FFFE0003FFFFFF800003FFF0FFFC0003
- FC003F800003FFE0FFF80003000000800003FFC0FFF00003000000800003FF80
- C7E00003000000800003F00083E00003000000800003C00003E00003FC003F80
- 0003C00003E00003FF00FF800003C00003E00003FF00FF800003C00007E00003
- FF00FF800003C00007E00003FF00FFFC0003C00003E00003FFC3FFFC0003C000
- 03E00003FFC3FFFC0003C00003E00003FFC3FFFC0003E00003E00003FFC3FFFC
- 0003FF80C7E00003FFC3FFFC0003FFC0FFE00003FFC3FFFC0003FFC0FFE00003
- FFC3FFFC0003FFF0FFE00003FFFFFFFFFFFFFFF8FFFFFFFFFFFFFFFFFFFFFFF8
- FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC003FC00FFFF00007FF
- FFFFFFC3FFC07FFFFC001FFFFFFFFF00FF807FFFFC001FFFFFFFFE00FF807FFF
- FC001FF8000FFE007F807E1FFC001FFF181FFE007F807807FC001FFF181FFF81
- FFC07807FC001FFE101FF381CFE07807FC001FFE007FE381C3F87807FC001FFE
- 00FFC00003F87807FC001FFC00FF800001F87C07FC001FF8007F000000F87F07
- FC001FF8003F000000F87F87FC001FF0003F000000F87F87FC001FF000FF8000
- 03F87F87FC001FF003FFC381C3F80F87FC001FF007FFE381C7F80187FC001FE0
- 3FFFFF81FFF80007FC001FC0FFFFFE007FF80007FC001FC3FFFFFE007FF80007
- FC001FFFFFFFFE00FFFC0007FC001FFFFFFFFF00FFFF0007FC001FFFFFFFFF81
- FFFFE007FFFFFFFFFFFFFFC7FFFFFF87FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFFFFFFFFFFFFFFFFFF80000383FFFFFFFFFFFFFFFF80000381FFFFFFFFFF
- FFFFFF80000381FFFFFFFFFFFFFFFF800003C07FFF800001800001800003E03F
- FF800001800001800003F03FFF800001800001800003F80FFF80000180000180
- 0003FC07FF800001800001800003FE07FF800001800001800003FF00CF800001
- 800001800003FF8007800001800001800003FFC007800001800001800003FFE0
- 03800001800001800003FFE001800001EFFFFF800003FFE001800001E0000380
- 0003FFF803800001FFFFFF800003FFF803800001FFFFFF800003FFF003800001
- FFFFFFFFFFFFFFF003800001FFFFFFFFFFFFFFFE1FFFFFFFFFFFFFFFFFFFFFFF
- 1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00007FFFFFF800003FF
- FFFFF0000FFFFFFFE00007FC007FF0000FF8001FE00007F8003FF0000FF8001F
- E00007F0001FF0000FF8001FE00007E0000FF0000FF8001FE00007C00007F000
- 0FF8001FE00007800003F0000FF8001FE00007800003F0000FF8001FE0000780
- 0003F0000FF8001F800001800003F0000FF8001F800001800003F0000FF8001F
- 800001800003F0000FF8001F800001800003F0000FF8001FC00003800003F000
- 0FF8001FE00007800003F0000FF8001FF0000F800003F0000FF8001FF8000F80
- 0003F0000FF8001FFC0007C00007F0000FF8001FFE0007E0000FF0000FF8001F
- FF00FFF0001FF0000FF8001FFF81FFF8003FF0000FF8001FFFC3FFFC007FF000
- 0FF8001FFFFFFFFFFFFFF8001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFF
- FFFFFC003FFE00FFF8001FFFFFFFFF81FFF6004FF0001FFFFFFFFF00FFE80003
- F0000FFFFFFFFE00FFC0001BC00003000000FC003FA00005C00003000000F800
- 1FE00005800003000000F0001FC00001800001000000E0000F803C0180000100
- 0000E00007807E01800001000000C0000380FF0180000100000080000380FF01
- 80000100000080000380FF0180000100000080000180FF018000010000008000
- 01807E01800001800001800001803C01800003800003800001C00001C00003E0
- 0007800001E00007C00003F0000F800001E00007E00007FFFFFF800001B0000F
- F0001FFFFFFFC03803D80013F8001FFFFFFFF03E07CE0067FE007FFFFFFFFFFF
- FFF300CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0
- 00FFFFBFFFF0001F807E03F1FFFFFF8FFFF8001F807E03F1FFFFFF8FFFF8001F
- 80FF03F1FFFFFF87FFF8001F807E03F1FFFFFF87FFC00003803C03F1FFFFFF83
- FF800003803803F1FFFFFFC3FF800003880013F1FFFFFFC0FFC03C03FC003FF1
- FFFFFFC0FFC07E03FE007FF1FFFFFFC0FF80FF03FF00FFF00003FE007F81FF01
- FF00FFF00003FE003F81FF01FE00FFF00003FE003F80FF01FC003FF00003FE00
- 1FC07E03880013F00003FE001FC03C03801803F00003FE01FF801803803C03F0
- 0003FE00FF800003807E03F00003FE00FFC0000380FF03F00003FE00FFF8001F
- 807E03F00003FE007FF8001F807E03F001F3FE003FF8001F807E03F0FFFFFE00
- 3FFCC33FFFFFFFF1FFFFFFFFFFFFFFFFFFFFFFFFFFFFE0000FFFFFFFF03E0780
- 0001F0001FFFFFFFE07E07E00007F0001F800001C03C03E00007F0001F800001
- 803803E00007F0001F800001800001E00007F0001F800001800001E00007F000
- 1F800001800001E00007F0001F800001C00003E00007F0001F800001E00007E0
- 0007F0001F800001F0000FE00007F0001F800001F8001FE00007F0001F800001
- F8001FE00007F0001F800001F0001FE00007F0001F800001E00007E00007F000
- 1F800001C00003E00007F0001F800001800003E00007F0001F800001800001E0
- 0007F0001F800001800001E00007F0001F803FFF801801E00007F0001F803FFF
- C03C03E00007F0001F80FFFFE07E07E0000FF0001FFFFFFFF0FF0FE0001FF000
- 1FFFFFFFFFFFFFE0003FF0001FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF800001FF
- F0E3FF00FFFFFFFFE00007FFF003FC001FE0000FE00007FFF003F0000FE0000F
- E00007FFF003F00007E0000FE00007FE001FE00003E0000FE00007FE001FC000
- 03E0000FE00007FE001FC00003E0000FE00007C0021F800001E0000FE00007C0
- 021F800001E0000FE00007C0021F800001E0000FE00007C0021F800001E0000F
- E00007C0021F800001E0000FE00007C0021F800001E0000FE00007C0021F8000
- 01E0000FE00007C0021F800001E0000FE00007C0021FC00003E0000FE00007C0
- 021FE00003E0000FE00007C0021FF00007E0000FE00007C0021FF00007E0000F
- E00007FE001FFC001FE0000FF0000FFE001FFE003FE0000FFE00FFFE001FFF00
- FFF0001FFFC7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8001FFFFFFFFFFFFFFF
- FFFFFC003FFFFFFFFFFFFF800003F0000FFC03FF840023800003E00007F803FF
- 840021800003C00003F003FF840021800003800003E001FF8E00618000038000
- 01C001FF840021800003800001C001FF800001800003000000E000FF80000180
- 0003000000F040FF800001800003000800F0C0FF800001800003003800FFE07F
- 800001800003003C00FFE03F800001800003003800FFF03F8000018000030000
- 00FFF81F800001E00007000000FFF81F800001E00007000000FFFC0F800001E0
- 0007800001FFFF03800001FFFFFF800003FFFF03800001FFFFFF800003FFFF83
- FFFFFFFFFFFFE00007FFFFE1FFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF000
- 1FFFFFFFFFFFFFFFFFFFFE00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF80
- 0003FFFFFFF8001F80001FC00007FFFFFFF8001F80000FC00007800003F0000F
- 800007C00007800001F00007800003C00007800001E00003800003C000078000
- 01C01E03800003C00007800001C00F03800003C00007800001800781800003C0
- 00078000018003C1800003C000078000018001C1800003C000078000018100C1
- 800003C00007800001818041800003C0000780000181C001800003C000078000
- 0181E001800003C0000780000181F001800003C00007800003C0F803800003C0
- 0007E00007E00003800003C00007F8001FE00007800003C00007FFC01FF00007
- 800003C00007FFFFFFF8001F800003C00007FFFFFFFE003FFFFFFFC00007FFFF
- FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFF9FBFFFFFFFFFFFFFF80001FF9F3FFFF
- FFFFFFFFFFC00003F8E3FF000000FFFFFFC00007F843FF000000800003C00007
- F803FF000000800003C00007F803FF000000800003C00007F803FF0000008000
- 03C00007F803FF000000800003C00007F803FF000000800003C00007F803FF00
- 0000800003C00007F803FF000000800003C00007F803FF000000800003C00007
- F803FF000000800003C00007F8001F000000800003C00007F8001F0000008000
- 03C00007F8001F000000800003C00007F8001F000000800003C00007F8001F00
- 0000800003C0001FF8001F800001800003C0001FF8001FFE3CFF800003C001FF
- F8001FFE00FFFFFFFFC001FFF8001FFE00FFFFFFFFC001FFF8001FFE00FFFFFF
- FFC001FFFE007FFFFFFFFFFFFFF007FFFFF7FFFFFFFFFFFFFFFFFFFFFFC1FFFF
- FFFFF8001FFFFFFFFE003FFE7E7FFE00FFE00007FC001FF83C1FFE18FFC00003
- F8000FF03C1FFE38FFC00003F00003F0181FFE3CFFC00003C0C181F8181FFC38
- FFC00003C1C1C1F8001FFC38FFC00003C1C1C1FE007FFC38FFC00003C1C1E1FE
- 007FFC38FFC00003C3E3E1FE00FFFC38FFC00003CFE3F9800001FC38FF800001
- CFE3FD800001FC38FF800001FF80FF800001FC38FF800001FF80FF800001FC38
- FF800001FFE3FFFE00FFFC30FFFFC7FFFFC1FFFE007FFC30FFFFC7FFFF80FFFC
- 003FFC00FFFFC7FFFF80FFFC001FFC84FFFFC7FFFF88FFF8181FFCFCFFFFC7FF
- FF80FFF0381FFC38FFFFC7FFFF80FFF03C1FFC00FFFFC7FFFFC0FFF83C1FFE00
- FFFFC7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE003FC
- 001FC0001FE0000FFFFF01FF00FFC00007E0000FFFFF01FF00FFC00007E0000F
- FFFE01FF00FFC00007E0000FFFF801FF00FFC00007C00007FFF803FF00FFC000
- 07C00007FFF003FF00FFC00007800003FFE00F800000C00007800003F0001F80
- 0000C00007800003E0001F800000C0000780000380007F800000C00007800003
- 8000FF800000C000078000038001FF800000C000078000030001FF800000C000
- 078000030001FF800000C000078000030001FF800000C0000780000300001FFF
- 00FFC0000780000300001FFF00FFC0000780000300001FFF00FFC00007800003
- 8003FFFF00FFC000078000038007FFFF00FFC00007C06C07C007FFFF00FFC000
- 07F0C60FF03FFFFF00FFFFFFFFFFFFFFFFFFFFC0000FFFFFFFFFFFFFFFFFFFE0
- 7FFFFFFFFFFFFFFFFFFFFF803FFF800003F0001FFFFFFF801FFFE0000FFC003F
- FFFFFF860FFFE0000FFC003F8007F98F07FFE0000FFF00FF8007F18707FFE000
- 0F0000008007F18207FFE0000F000000801FE1C007FFE0000F000000803FC3E0
- 07FFE0000F000000801F03F003FFE0000F000000800003F8001FE0000F000000
- 800003FC000FE0000F000000800007FFC007F0001F00000080000FFFE003F8FE
- 3F00000080000FFFE001F8FE3F00000080001FFFE061F8FE3F000000FC003FFF
- F0F0F87C3F000000FE00FFFFF070F87C3F000000FF01FFFFF820F8383F000000
- FFFFFFFFFC01FC007F000000FFFFFFFFFE03FE00FF000000FFFFFFFFFF03FF01
- FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE00003F0
- 3E0FE00003E00003FC001FF07F07FC001FFC001FF0000FF07F07F0000FF0000F
- F00007F03E07F00007F00007E00003F03C27E00003E00003C00003F01847C000
- 03C00003C00003F00807C00003C00003800001F0000F800001800001800001F8
- 001F800001800001800001FE003F800001800001800001FF80FF800001800001
- 800001FF80FF800001800001800001FF00FF800001800001800001FE087F8000
- 01800001800001FE183F800001800001C00003FE183FC00003C00003E00003FC
- 3E1FE00003E00003F00007F87F1FF00007F00007F00007F07F0FF00007F00007
- FC001FF1FF8FFC001FFC001FFE003FF1FFCFFE003FFE003FFF00FFF3FFEFFF00
- FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFF8007FFE00003FFFFFFFFFFFF83FFFFFC001F800000800001C1FFFFF0000F
- 800000800003E0FFFFF00007900081800003F03E7FE00003900081800003F03C
- 7FC00003900081800003F0187FC00003900081800003FC007F80000190008180
- 0003FE007F800001900081800003FE007F8000019000FF800003FF803F800001
- 9000FF800003FF001F8000019000FF800003FE001F8000019000FF800003FC00
- 078000019FC0FF800003FC00038000019FC0FF800003FC0000C000039FC0FF80
- 0003FFF800E000039FC0FF800003FFF801F000079FC0FF800003FFFC03F00007
- 9FC0FFFFFFFFFFFF07FC001F9FC0FFFFFFFFFFFF0FFE003F9FFFFFFFFFFFFFFF
- 1FFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFF03FFFFFE00300000080007FC01FFFFFFF0180000183FFFF800FFFFFFF01
- 80000183FFFF8207FFFFFE0180000181FFFF8F87FFFFF801800001807FFF8FC7
- FFFFF803800001C03FFF8FC7FFFFF003800001F00FFF8F07FFFFE00F800001F0
- 00FF8207FFF0001F800001F8003F8003FFE0001F800001FE001FE000FF80007F
- 800001FE0007F000FF8000FF800001FF0003FFC07F8001FF800001FF0003FFF0
- 1F0001FF800001FF0003FFF81F0001FF800001FF0203FFF80F0001FF800001FF
- 8703FFFE030001FF800001FF8707FFFF030001FF803FFFFFC20FFFFF010001FF
- 807FFFFFE01FFFFF008003FF80FFFFFFE03FFFFF008007FFFFFFFFFFF07FFFFF
- 00C007FFFFFFFFFFFFFFFFFFC7F03FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFF800003800001FFF1FFC00003E00007CC0033FFE1FF800003E00007CC0033
- FFE1FF800003E00007C00003FFC1FF800003E00007C00003C00003800003E000
- 07CC0033800003800003E00007CC0033800001800003E00007C0000380000180
- 0003E00007C00003800001800003E00007CC0033800001800003E00007C00003
- 800001800003E00007C00003800001800003E00007C00003800001800003E000
- 07CC0033800001800003E00007C00003800001800003E00007C0000380000180
- 0003E00007CC0033800001800003E00007CC0033800001800003E00007C00003
- 800001800003E00007C00003800001C00003E0000FCC0033800003E00007E000
- 1FCC0033FFFFFFFFFFFFE0003FC00003FFFFFFFFFFFFFFFFFFFF00FFFFFFFFFF
- FFFFFFFFFFFE003F000000000000C1F0FFF0000F000001000001C0007FF00007
- 800001000001C000FFE00003800001000001E3F8FFC00003800001000001FFFC
- 7F800001800001000001FFFC7F800001C0000300000180003F800000E0000700
- 000180003F800000F0000F00000080003F800000FF00FF00000080001F800000
- FF81FF00000080001F800000FF00FF00000080001F800000FF00FF0000008000
- 1F800000FE00FF00000180000F800000FE00FF00000180000F800001FE00FF00
- 0001C00007C00003FE00FF000001FFE007C00003FE00FF000001FFFFC1E00003
- FF00FF000001FFFFE1F0000FFF00FF000001FFFFFFF8001FFF81FF000001FFFF
- FFFE003FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000001FFFFFF00000000
- 0000000041FE000F800001800001800041FC0007800000800001800041FA000F
- 800000800001800041F00FFF800000800001800041F007FF8000008000018000
- 41E003FF8000008000018000418003FF8000008000018000418001FF80000080
- 00018000410001FF80000080000180004101807F80000080000180004103C07F
- 80000080000080006387E07F80000080000080007F87F03F8000008000008000
- 7FFFF81F80000180000080007FFFFC0F80000180000080007FFFFE0FC0000380
- 000080007FFFFF07E0000780000080007FFFFF87F0000F800001803FFFFFFFC1
- F8001F800001803FFFFFFFE1FC003F801801803FFFFFFFF1FE007F803E01803F
- FFFFFFF8FFFFFFC1FFC1807FFFFFFFFCFFFFFFFFFFFFFFFFFFFFFFFF00000180
- 0001FFFFFF800001000001E00007FFFFFFE00007800001E00007FFFFFFE00007
- 800001E00007000001E00007800001E00007000001F0000F800001E000078000
- 07F0000F800001E00007800003F0000F800001E00007800003F0000F800001E0
- 0007800001F0000F800001E00007800001E00007800001E00007800001E00007
- 800001E00007800001E00007800001E00007800000E00007800001E000078000
- 00E00007800001E00007800000E00007800001E00007800007F0000F800001E0
- 0007800007F8001F800001E00007800007FC003F800001E0000780000FFE007F
- 800001E00007803FFFFF007F800001E00007FFFFFFFF807F800001FF81FFFFFF
- FFFFC07FFFFFFFFF81FFFFFFFFFFE7FFFFFFFFFFFFFFFFFFFFFFFFFFFF9FFFFF
- FFFFFFFFFF000000FF87FFFC007FE00007800001FF87FFF8003FC00007800001
- FF83FFF0001FE00007800001FF81FFE0000FE00007800001FF81FFC00007E000
- 07800001FF81FF800003E00007800001FF81FF800003E00007800001FF81FF80
- 0003E00007800001FF81FF800003F0000F800001FF00FF800003F8001F800001
- FE007F800003FE00FF800001FE003F800003FF00FF800001F8001F800003FE00
- FF800001F0000F800003FE007F800001F00007800003FE007F800001C0000380
- 0003FE007F800001800001C00007FE007F800001800001E0000FFE007F800001
- 800001F0001FFE00FF800001800001F8003FFE00FF800001800001FC007FFF00
- FF800001FFFFFFFFFFFFFFFFFFFCFF3FFFFFFFFFFFFFFFFFFFFFF7FFFFFFFFFF
- FFFFFE00FFFFC7FFFFF8FFFF3FFFFE00FFFF81FFFFF8FFFE3FFFFE00FFFF00FF
- FFF87FFE3FFFFE00FFFE00FFFFF81FF83FFFFE00FFFC003FFFF81FF03FFFFE00
- FFF8001F80000FF00001FE00FFF0001F800003C00001FE00FFE0000780000380
- 0001FE00FFE00003800001800001FE00FFE00007800001800001FE00FFFE00FF
- 800001800001FE00FFFE00FF800003800001FE00FFFE00FF800007E00001E000
- 03FE00FF80000FF00001E00007FE00FFFFF81FF03FFFF0000FFE00FFFFF83FFC
- 3FFFF8001FFE00FFFFF87FFE3FFFFC003FFE00FFFFF8FFFE3FFFFE007FFE00FF
- FFFFFFFFFFFFFF00FFFE00FFFFFFFFFFFFFFFF81FFFE00FFFFFFFFFFFFFFFFC3
- FFFE00FFFFFFFFFFFFFFFFF7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
- FFFFFC003FFFFFFFFC007FFC007FFC003FE00003F8003FF8003FF0001FC00003
- F0001FF0001FF0000F800003E0000FE0000F800003800003C00007C000078000
- 0380000380000380000380000380000380000380000380000380000380000380
- 0003800003800003800003800003800003800003800003800003800003800003
- 800003800003800003800003800003800003800003800003800003800003C000
- 03800003800003800003E00007800003800003800003F0001F80000380000380
- 0003F0001F800003C00007C00007F0001F800003E0000FE0000FF0001F800003
- F0001FF0001FFC003F800003F8003FF8003FFC003F800003FC007FFC007FFC00
- 3F800003FFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FFFFFFFFFFFFFFC001FF0
- 000FE00003FFFFFFFC001FFF83FFFC001FC1FFFFFC001FFF00FFF0000FC0FFFF
- FC001FFE007FF00007E03FFFFC001FFC003FE00003F00FFFFC001FF8003FC000
- 03F007FFFC001FF0000FC00003F007FFFC001FE0000F800001F001FFFC001FC0
- 0007800001F800FFFC001F800001800001F800FFFC003F000001800001FE003F
- 000001000001800001FE001F000001FC003F800001FF001F800003FC003F8000
- 01FFC007C00007FC003F800001FFC003E0000FFC003FC00003FFE003F0001FFC
- 003FE00003FFF801F8003FFC003FF00007FFF801FC007FFC003FF00007FFFC01
- FE00FFFC003FFC001FFFFF01FF01FFFC003FFE003FFFFF83FF83FFFC003FFF00
- FFFFFFC3FFC7FFFC003FFFFFFFFFFFFFFFFFFFFFFFFFF0000FE0001FF8000F00
- 0000F0000FE0001FFE003F800001FFF1FFFF8FFF000000800005FFF0FFFF0FFF
- 000000800001FFF07FFE0FFF80000180000100103FFC08008000018000010000
- 0FF00000800001800001000007E00000800001800001000003C0000080000180
- 0001000003C00000800001800001000000000000800001800001000000000000
- 8000018000010000000000008000018000010000000000008000018000010000
- 01800000800001800001000003C00000E40007800001000007E00000FC003F80
- 000100000FF00000FC003F800001FFF01FF80FFFFC003F800001FFF03FFC0FFF
- FC003F800001FFF07FFE0FFFFC003F800001FFF0FFFF0FFFFC003F800001FFF1
- FFFF8FFFFFFFFFFFFFFFFFF7FFFFEFFFF8003FFFFFFF88007FFFFFFFFE003FE0
- 0001800000000000FE00FFC00001FE00FF000000FE00FFF00003FE00FFF0000F
- FF01FFF00003FE00FFF0000FFF01FFF00003FE00FFF0000F000000F00003FE00
- FFF00007000000F00003FE00FFF00007000000F00003000001F00007000000F0
- 0003000001F00007000000F00003000001F00003000000F00003000001E00003
- 000000F00003000001E00003000000F00001000001E00003000000F000010000
- 01E00001000000F00001000001800001000000F00003000001800001000000F0
- 000FFE00FF800001000000F0000FFE00FF800001000000F0001FFE00FF800001
- 000000F0007FFE00FF800000000000F0007FFE00FF800001000000F000FFFE00
- FF800001000000F003FFFE00FFE0000300000000000000000000000000000000
- 000000000000}
- end
- object ThreeLookAndFeelCol: TcxLookAndFeelController
- Kind = lfStandard
- NativeStyle = False
- Left = 253
- Top = 12
- end
- object ThreeColorBase: TcxStyleRepository
- Left = 147
- Top = 80
- PixelsPerInch = 96
- object SHuangSe: TcxStyle
- AssignedValues = [svColor, svFont, svTextColor]
- Color = 4707838
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- TextColor = clBtnText
- end
- object SkyBlue: TcxStyle
- AssignedValues = [svColor, svFont, svTextColor]
- Color = clSkyBlue
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- TextColor = clBlack
- end
- object Default: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- end
- object QHuangSe: TcxStyle
- AssignedValues = [svColor, svFont]
- Color = 8454143
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- end
- object Red: TcxStyle
- AssignedValues = [svColor, svFont]
- Color = clRed
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- end
- object FontBlue: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clBlue
- end
- object TextSHuangSe: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clOlive
- end
- object FonePurple: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindow
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clPurple
- end
- object FoneClMaroon: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clMaroon
- end
- object FoneRed: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clRed
- end
- object RowColor: TcxStyle
- AssignedValues = [svColor]
- Color = 16311512
- end
- object handBlack: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- end
- object cxBlue: TcxStyle
- AssignedValues = [svColor, svFont]
- Color = 16711731
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- end
- object SHuangSeCu: TcxStyle
- AssignedValues = [svColor, svFont, svTextColor]
- Color = 4707838
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clRed
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DataLink.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DataLink.pas
deleted file mode 100644
index 65ea144..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_DataLink.pas
+++ /dev/null
@@ -1,72 +0,0 @@
-unit U_DataLink;
-
-interface
-
-uses
- SysUtils, Classes, DB, ADODB, ImgList, Controls, cxStyles, cxLookAndFeels,
- Windows,Messages,forms,OleCtnrs,DateUtils, cxClasses, dxSkinsCore,
- dxSkinsDefaultPainters;
-var
- DConString:String; {ȫַ}
- server, dtbase, user, pswd: String; {ݿӲ}
- DCurHandle:hwnd; //ǰ
- DName:string ; //#û#//
- DCode:string ; //#û#//
- PicSvr:string;
- Ddatabase:string; //#ݿ#//
- DTitCaption:string; //##//
- DParameters1,DParameters2,DParameters3,DParameters4,DParameters5:string;// ⲿ
- DParameters6,DParameters7,DParameters8,DParameters9,DParameters10:string;//ⲿ
- OldDllApp:Tapplication; //ԭо
- NewDllApp: Tapplication;//ǰ
- MainApplication: Tapplication ;
- DFormCode:integer; //ǰں
- IsDelphiLanguage:integer;
- DServerDate:TdateTime; //ʱ
- DCompany:string; //˾
-type
- TDataLink_DDMD = class(TDataModule)
- AdoDataLink: TADOQuery;
- ADOLink: TADOConnection;
- ThreeImgList: TImageList;
- ThreeLookAndFeelCol: TcxLookAndFeelController;
- ThreeColorBase: TcxStyleRepository;
- SHuangSe: TcxStyle;
- SkyBlue: TcxStyle;
- Default: TcxStyle;
- QHuangSe: TcxStyle;
- Red: TcxStyle;
- FontBlue: TcxStyle;
- TextSHuangSe: TcxStyle;
- FonePurple: TcxStyle;
- FoneClMaroon: TcxStyle;
- FoneRed: TcxStyle;
- RowColor: TcxStyle;
- handBlack: TcxStyle;
- cxBlue: TcxStyle;
- SHuangSeCu: TcxStyle;
- procedure DataModuleDestroy(Sender: TObject);
- private
- { Private declarations }
- public
- { Public declarations }
- end;
- TMakebar = procedure(ucData:pchar;nDataLen:integer;nErrLevel:integer;nMask:integer;nBarEdition:integer;szBmpFileName:pchar;nScale:integer);stdcall;
- TMixtext = procedure( szSrcBmpFileName:PChar;szDstBmpFileName:PChar;sztext:PChar;fontsize,txtheight,hmargin,vmargin,txtcntoneline:integer);stdcall;
-var
- DataLink_DDMD: TDataLink_DDMD;
-
-implementation
-{$R *.dfm}
-
-
-procedure TDataLink_DDMD.DataModuleDestroy(Sender: TObject);
-begin
- DataLink_DDMD:=nil;
-end;
-
-end.
-
-
-
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FileUp.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FileUp.dfm
deleted file mode 100644
index a401970..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FileUp.dfm
+++ /dev/null
@@ -1,188 +0,0 @@
-object frmFileUp: TfrmFileUp
- Left = 247
- Top = 162
- Width = 634
- Height = 447
- Caption = #19978#20256#25991#20214
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid7: TcxGrid
- Left = 0
- Top = 41
- Width = 555
- Height = 367
- Align = alClient
- TabOrder = 0
- object TV7: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsView.GroupByBox = False
- OptionsView.Indicator = True
- object FileName: TcxGridDBColumn
- Tag = 1
- Caption = #25991#20214#21517#31216
- DataBinding.FieldName = 'FileName'
- FooterAlignmentHorz = taCenter
- HeaderAlignmentHorz = taCenter
- Width = 121
- end
- object FileDate: TcxGridDBColumn
- Tag = 1
- Caption = #19978#20256#26085#26399
- DataBinding.FieldName = 'FileDate'
- FooterAlignmentHorz = taCenter
- HeaderAlignmentHorz = taCenter
- Width = 104
- end
- end
- object cxGridLevel6: TcxGridLevel
- GridView = TV7
- end
- end
- object Panel16: TPanel
- Left = 190
- Top = 126
- Width = 138
- Height = 30
- BevelInner = bvRaised
- Caption = #27491#22312#19978#20256#12290#12290#12290
- Color = clSkyBlue
- TabOrder = 1
- Visible = False
- end
- object ToolBar6: TToolBar
- Left = 555
- Top = 41
- Width = 63
- Height = 367
- Align = alRight
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ShowCaptions = True
- TabOrder = 2
- object FileUp: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #19978#20256
- ImageIndex = 109
- Wrap = True
- OnClick = FileUpClick
- end
- object FileDel: TToolButton
- Left = 0
- Top = 30
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 17
- Wrap = True
- OnClick = FileDelClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 618
- Height = 41
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 3
- object Label1: TLabel
- Left = 8
- Top = 14
- Width = 68
- Height = 16
- Caption = #20135#21697#32534#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Image2: TImage
- Left = 537
- Top = 17
- Width = 23
- Height = 16
- end
- object Code: TEdit
- Left = 78
- Top = 9
- Width = 211
- Height = 24
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- ReadOnly = True
- TabOrder = 0
- end
- end
- object ODPat: TOpenDialog
- Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Left = 404
- Top = 197
- end
- object IdFTP1: TIdFTP
- MaxLineAction = maException
- ReadTimeout = 0
- ProxySettings.ProxyType = fpcmNone
- ProxySettings.Port = 0
- Left = 405
- Top = 236
- end
- object SaveDialog1: TSaveDialog
- Left = 409
- Top = 285
- end
- object ADOQueryFile: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 488
- Top = 144
- end
- object DataSource1: TDataSource
- DataSet = ADOQueryFile
- Left = 392
- Top = 168
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 496
- Top = 216
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 504
- Top = 264
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FileUp.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FileUp.pas
deleted file mode 100644
index 4b8f99f..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FileUp.pas
+++ /dev/null
@@ -1,357 +0,0 @@
-unit U_FileUp;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, ComCtrls, ToolWin, ExtCtrls,
- cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxClasses, cxControls, cxGridCustomView, cxGrid, IdBaseComponent,
- IdComponent, IdTCPConnection, IdTCPClient, IdFTP, StdCtrls, ADODB,jpeg,
- BtnEdit,IniFiles;
-
-type
- TfrmFileUp = class(TForm)
- cxGrid7: TcxGrid;
- TV7: TcxGridDBTableView;
- FileName: TcxGridDBColumn;
- FileDate: TcxGridDBColumn;
- cxGridLevel6: TcxGridLevel;
- Panel16: TPanel;
- ToolBar6: TToolBar;
- FileUp: TToolButton;
- FileDel: TToolButton;
- Panel1: TPanel;
- Label1: TLabel;
- Code: TEdit;
- ODPat: TOpenDialog;
- IdFTP1: TIdFTP;
- SaveDialog1: TSaveDialog;
- ADOQueryFile: TADOQuery;
- DataSource1: TDataSource;
- ADOQueryCmd: TADOQuery;
- ADOQueryTemp: TADOQuery;
- Image2: TImage;
- procedure FileUpClick(Sender: TObject);
- procedure FormCreate(Sender: TObject);
- procedure FileDelClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- private
- lstPat: TStringList;
- AJpeg: TJPEGImage;
- procedure CreThumb(AJPeg:TJPEGImage;Image1:TImage;Width, Height: Integer);
- procedure SaveImageOther();
- procedure ReadINIFile10();
- { Private declarations }
- public
- CYID:String;
- { Public declarations }
- end;
-
-var
- frmFileUp: TfrmFileUp;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmFileUp.ReadINIFile10();
-var
- programIni:Tinifile; //ļ
- FileName:string;
-begin
- FileName:=ExtractFilePath(Paramstr(0))+'SYSTEMSET.INI';
- programIni:=Tinifile.create(FileName);
- server:=programIni.ReadString('SERVER','ַ','127.0.0.1');
- programIni.Free;
-end;
-procedure TfrmFileUp.FileUpClick(Sender: TObject);
-var
- i,j: Integer;
- PatFile: String;
- FTPPath,FConNo,MaxNo:string;
- AJpeg: TJPEGImage;
-begin
- if Trim(Code.Text)='' then
- begin
- Application.MessageBox('ŲΪգ','ʾ',0);
- Exit;
- end;
- lstPat.Clear;
- if ODPat.Execute then
- begin
- lstPat.AddStrings(ODPat.Files);
- end;
-
- if lstPat.Count > 0 then
- begin
- try
- ReadINIFile10();
- server:=ReadINIFileStr('SYSTEMSET.INI','SERVER','ַ','127.0.0.1');
- IdFTP1.Host :=server;//PicSvr;
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- IdFTP1.Quit;
- Application.MessageBox('ӵļ飡', 'ʾ', MB_ICONWARNING);
- Exit;
- end;
- end;
- Panel16.Visible:=True;
- Panel16.Refresh;
- AJpeg:=TJpegImage.Create();
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select Count(*) MM from XD_File where CYID='''+Trim(CYID)+'''');
- SQL.Add('and filetype=''YP''');
- Open;
- j:=fieldbyname('MM').AsInteger;
- end;
- Image2.Picture.LoadFromFile(ODPat.FileName);
- AJpeg.Assign(Image2.Picture.Graphic);
- CreThumb(AJpeg,Image2,216, 187);
- try
- ADOQueryCmd.Connection.BeginTrans;
- for i := 0 to lstPat.Count - 1 do
- begin
- PatFile := ExtractFileName(lstPat[i]);
- PatFile:=Copy(PatFile,(Pos('.',PatFile)+1),(Length(PatFile)-Pos('.',PatFile)) ) ;
- FConNo:=Trim(Code.Text);
- while Pos('/',FConNo)>0 do
- begin
- Delete(FConNo,Pos('/',FConNo),1);
- end;
- PatFile:=Trim(FConNo)+'-'+Inttostr(j+i+1)+'.'+PatFile;
- if IdFTP1.Connected then
- begin
- try
- {if not DirectoryExists('D:\ͼƬ\'+Trim(gDef1)) then
- ForceDirectories('D:\ͼƬ\'+Trim(gDef1)); }
- IdFTP1.Put(lstPat[i], Trim('\YP')+'\'+Trim(PatFile));
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from XD_File where CYID='''+Trim(CYID)+'''');
- SQL.Add(' and filename='''+Trim(PatFile)+'''');
- SQL.Add(' and filetype=''YP''');
- Open;
- if not IsEmpty then
- begin
- Panel16.Visible:=False;
- Application.MessageBox(PChar('ļ<'+Trim(PatFile)+'>ظ,'+inttostr(i)+'ļϴɹ'),'ʾ',0);
- Exit;
- end;
- end;
- if GetLSNo(ADOQueryCmd,MaxNo,'YP','XD_File',4,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡͼƬʧܣ','ʾ',0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from XD_File where 1<>1');
- Open;
- end;
- with ADOQueryCmd do
- begin
- Append;
- FieldByName('XFID').Value:=Trim(MaxNo);
- FieldByName('CYID').Value:=Trim(CYID);
- FieldByName('CYNO').Value:=Trim(Code.Text);
- FieldByName('filename').Value:=Trim(PatFile);
- FieldByName('FileDate').Value:=SGetServerDate(ADOQueryTemp);
- fieldbyname('FileType').value:=Trim('YP');
- Post;
- end;
- except
- //ADOQueryCmd.Connection.RollbackTrans;
- //Application.MessageBox('ͼƬϴʧܣ','ʾ',0);
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update CP_YDang Set TPFlag=1 where CYID='''+Trim(CYID)+'''');
- ExecSQL;
- end;
- SaveImageOther();
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ͼƬϴʧܣ','ʾ',0);
- end;
- if IdFTP1.Connected then IdFTP1.Quit;
- with ADOQueryFile do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from XD_File where CYID='''+Trim(CYID)+'''');
- open;
- end;
- Panel16.Visible:=False;
- if i>0 then
- Application.MessageBox(PChar(inttostr(i)+'ļϴɹ'),'ʾ',0);
- ModalResult:=1;
-end;
-procedure TfrmFileUp.CreThumb(AJPeg:TJPEGImage;Image1:TImage;Width, Height: Integer);
-var
- Bitmap: TBitmap;
- Ratio: Double;
- ARect: TRect;
- AHeight, AHeightOffset: Integer;
- AWidth, AWidthOffset: Integer;
-begin
- Bitmap := TBitmap.Create;
- try
- Ratio := AJPeg.Width /AJPeg.Height;
- if Ratio > 1.333 then
- begin
- AHeight := Round(Width / Ratio);
- AHeightOffset := (Height - AHeight) div 2;
- AWidth := Width;
- AWidthOffset := 0;
- end
- else
- begin
- AWidth := Round(Height * Ratio);
- AWidthOffset := (Width - AWidth) div 2;
- AHeight := Height;
- AHeightOffset := 0;
- end;
- Bitmap.Width := Width;
- Bitmap.Height := Height;
- Bitmap.Canvas.Brush.Color := clBtnFace;
- Bitmap.Canvas.FillRect(Rect(0, 0, Width, Height));
- ARect := Rect(AWidthOffset, AHeightOffset, AWidth + AWidthOffset, AHeight + AHeightOffset);
- Bitmap.Canvas.StretchDraw(ARect, AJPeg);
- Image1.Picture.Assign(BitMap);
- finally
- Bitmap.Free;
- end;
-end;
-procedure TfrmFileUp.SaveImageOther();
-var
- AJpeg: TJPEGImage;
- myStream: TADOBlobStream;
- ImgMaxNo:String;
- i,j: Integer;
- PatFile: String;
- FTPPath,FConNo,MaxNo,FTFID:string;
-begin
- if Image2.Picture=nil then Exit;
- AJpeg:=TJpegImage.Create();
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from TP_File where WBID='''+Trim(CYID)+'''');
- Open;
- end;
- FTFID:=Trim(ADOQueryTemp.fieldbyname('TFID').AsString);
- if Trim(FTFID)='' then
- begin
- if GetLSNo(ADOQueryCmd,ImgMaxNo,'TF','TP_File',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡͼƬʧ!','ʾ',0);
- Exit;
- end;
- end else
- begin
- ImgMaxNo:=Trim(FTFID);
- end;
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add( ' select * from TP_File where TFID='''+Trim(FTFID)+'''');
- open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FTFID)='' then
- begin
- Append;
- FieldByName('Filler').Value:=Trim(DName);
- end
- else
- begin
- Edit;
- FieldByName('Editer').Value:=Trim(DName);
- FieldByName('EditTime').Value:=SGetServerDateTime(ADOQueryTemp);
- end;
- FieldByName('TFID').Value:=Trim(ImgMaxNo);
- FieldByName('WBID').Value:=Trim(CYID);
- //FieldByName('TFIdx').Value:=cxTabControl2.TabIndex;
- FieldByName('TFType').Value:='Ʒ';
- AJpeg.Assign(Image2.Picture.Graphic);
- //CreThumb(AJpeg,Image1,160, 120);
- myStream := TADOBlobStream.Create(TBlobField(ADOQueryCmd.FieldByName('FilesOther')), bmWrite);
- AJpeg.Assign(Image2.Picture.Graphic);
- AJpeg.SaveToStream(myStream);
- myStream.Free;
- Post;
- end;
-end;
-
-procedure TfrmFileUp.FormCreate(Sender: TObject);
-begin
- lstPat := TStringList.Create;
-
-end;
-
-procedure TfrmFileUp.FileDelClick(Sender: TObject);
-begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add(' Delete XD_File where XFID='''+Trim(ADOQueryFile.fieldbyname('XFID').AsString)+'''');
- SQL.Add(' Delete TP_File where WBID='''+Trim(CYID)+''' and TFType=''Ʒ'' ');
- ExecSQL;
- end;
- with ADOQueryFile do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from XD_File where CYID='''+Trim(CYID)+'''');
- SQL.Add(' and FileType=''YP''');
- open;
- end;
- if ADOQueryFile.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update CP_YDang Set TPFlag=0 where CYID='''+Trim(CYID)+'''');
- ExecSQL;
- end;
- end;
-end;
-
-procedure TfrmFileUp.FormShow(Sender: TObject);
-begin
- with ADOQueryFile do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from XD_File where CYID='''+Trim(CYID)+'''');
- SQL.Add(' and FileType=''YP''');
- Open;
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList.dfm
deleted file mode 100644
index a94ce83..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList.dfm
+++ /dev/null
@@ -1,172 +0,0 @@
-object frmFjList: TfrmFjList
- Left = 154
- Top = 62
- Width = 1049
- Height = 540
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = #38468#20214#20449#24687
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ListView1: TListView
- Left = 36
- Top = 88
- Width = 141
- Height = 137
- Columns = <>
- TabOrder = 0
- OnDblClick = ListView1DblClick
- end
- object Panel1: TPanel
- Left = 882
- Top = 0
- Width = 151
- Height = 501
- Align = alRight
- TabOrder = 1
- object FileName: TcxButton
- Left = 30
- Top = 60
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #28155#21152
- TabOrder = 0
- OnClick = FileNameClick
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton1: TcxButton
- Left = 30
- Top = 96
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #21024#38500
- TabOrder = 1
- OnClick = cxButton1Click
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton2: TcxButton
- Left = 30
- Top = 132
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #20445#23384
- TabOrder = 2
- OnClick = cxButton2Click
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton3: TcxButton
- Left = 30
- Top = 172
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #20851#38381
- TabOrder = 3
- Visible = False
- OnClick = cxButton3Click
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton4: TcxButton
- Left = 30
- Top = 220
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #28155#21152#25991#20214#22841
- TabOrder = 4
- OnClick = cxButton4Click
- LookAndFeel.Kind = lfOffice11
- end
- end
- object Panel2: TPanel
- Left = 24
- Top = 124
- Width = 193
- Height = 41
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Caption = 'Panel2'
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- Visible = False
- OnDblClick = Panel2DblClick
- end
- object ShellListView1: TShellListView
- Left = 177
- Top = 0
- Width = 705
- Height = 501
- ObjectTypes = [otFolders, otNonFolders]
- Root = 'rfDesktop'
- ShellTreeView = ShellTreeView1
- Sorted = True
- Align = alClient
- ReadOnly = False
- TabOrder = 3
- end
- object ShellTreeView1: TShellTreeView
- Left = 0
- Top = 0
- Width = 177
- Height = 501
- ObjectTypes = [otFolders]
- Root = 'rfDesktop'
- ShellListView = ShellListView1
- UseShellImages = True
- Align = alLeft
- AutoRefresh = False
- Indent = 19
- ParentColor = False
- RightClickSelect = True
- ShowRoot = False
- TabOrder = 4
- end
- object ADOQueryTmp: TADOQuery
- Connection = ADOConnection1
- Parameters = <>
- Left = 512
- Top = 28
- end
- object ADOQueryCmd: TADOQuery
- Connection = ADOConnection1
- Parameters = <>
- Left = 560
- Top = 24
- end
- object ImageList1: TImageList
- Left = 520
- Top = 212
- end
- object IdFTP1: TIdFTP
- MaxLineAction = maException
- ReadTimeout = 0
- ProxySettings.ProxyType = fpcmNone
- ProxySettings.Port = 0
- Left = 340
- Top = 190
- end
- object ADOConnection1: TADOConnection
- LoginPrompt = False
- Left = 484
- Top = 240
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList.pas
deleted file mode 100644
index 616b67e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList.pas
+++ /dev/null
@@ -1,436 +0,0 @@
-unit U_FjList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, ExtCtrls, ComCtrls, Menus, cxLookAndFeelPainters, StdCtrls,
- cxButtons, DB, ADODB, ImgList,shellapi, IdBaseComponent, IdComponent,
- IdTCPConnection, IdTCPClient, IdFTP, ShlObj, cxShellCommon, cxControls,
- cxContainer, cxShellTreeView, cxShellListView, ShellCtrls;
-
-type
- TfrmFjList = class(TForm)
- ListView1: TListView;
- Panel1: TPanel;
- FileName: TcxButton;
- cxButton1: TcxButton;
- cxButton2: TcxButton;
- cxButton3: TcxButton;
- ADOQueryTmp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- ImageList1: TImageList;
- Panel2: TPanel;
- IdFTP1: TIdFTP;
- ADOConnection1: TADOConnection;
- cxButton4: TcxButton;
- ShellListView1: TShellListView;
- ShellTreeView1: TShellTreeView;
- procedure cxButton3Click(Sender: TObject);
- procedure FormDestroy(Sender: TObject);
- procedure FileNameClick(Sender: TObject);
- procedure FormCreate(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ListView1DblClick(Sender: TObject);
- procedure cxButton1Click(Sender: TObject);
- procedure cxButton2Click(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure Panel2DblClick(Sender: TObject);
- procedure cxButton4Click(Sender: TObject);
- private
- procedure InitData();
- { Private declarations }
- public
- fkeyNO:string;
- fType:string;
- fId:integer;
-
- fstatus:integer;
-
- { Public declarations }
- end;
-
-var
-frmFjList: TfrmFjList;
-
-implementation
- uses
- U_DataLink,U_RTFun;
-{$R *.dfm}
-procedure TfrmFjList.InitData();
-var
- ListItem: TListItem;
- Flag: Cardinal;
- info: SHFILEINFOA;
- Icon: TIcon;
-begin
- ListView1.Items.Clear;
- try
-
- with adoqueryTmp do
- begin
- close;
- sql.Clear;
- sql.Add('select fileName from TP_File ');
- sql.Add('where WBID='+quotedstr(trim(fkeyNO)));
- sql.Add('and TFType='+quotedstr(trim(fType)));
- open;
- if not IsEmpty then
- begin
- while not eof do
- begin
- with ListView1 do
- begin
- LargeImages := ImageList1;
- Icon := TIcon.Create;
- ListItem := Items.Add;
- Listitem.Caption := trim(fieldbyname('fileName').AsString);
- // Listitem.SubItems.Add(OpenDiaLog.FileName);
- Flag := (SHGFI_SMALLICON or SHGFI_ICON or SHGFI_USEFILEATTRIBUTES);
- SHGetFileInfo(Pchar(trim(fieldbyname('fileName').AsString)), 0, info, Sizeof(info), Flag);
- Icon.Handle := info.hIcon;
- ImageList1.AddIcon(Icon);
- ListItem.ImageIndex := ImageList1.Count - 1;
- end;
- next;
- end;
- end;
- end;
- except
- end;
-end;
-
-procedure TfrmFjList.cxButton3Click(Sender: TObject);
-begin
- ADOQueryTmp.Close;
- ADOQuerycmd.Close;
- ListView1.Items.Free;
- ModalResult:=-1;
-end;
-
-procedure TfrmFjList.FormDestroy(Sender: TObject);
-begin
- frmFjList:=nil;
-end;
-
-procedure TfrmFjList.FileNameClick(Sender: TObject);
-var
- OpenDiaLog: TOpenDialog;
- fFileName:string;
- fFilePath:string;
- maxNo:string;
-// myStream: TADOBlobStream;
-// FJStream : TMemoryStream;
-begin
-
- try
- OpenDiaLog := TOpenDialog.Create(Self);
- if OpenDiaLog.Execute then
- begin
- fFilePath:=OpenDiaLog.FileName;
- fFileName:=ExtractFileName(OpenDiaLog.FileName);
-
-
- with adoqueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('select TFId from TP_File ');
- sql.Add('where WBID<>'+quotedstr(trim(fkeyNO)));
- sql.Add('and TFType='+quotedstr(trim(fType)));
- sql.Add('and FileName='+quotedstr(trim(fFileName)));
- open;
- IF not adoqueryCmd.IsEmpty then
- begin
- application.MessageBox('˸Ѵڣļϴ','ʾϢ',MB_ICONERROR);
- exit;
- end;
- end;
-
- Panel2.Caption:='ϴݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
-
- if GetLSNo(ADOQueryCmd,maxNo,'FJ','TP_File',4,1)=False then
- begin
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
-
- adoqueryCmd.Connection.BeginTrans;
-
-
- with adoqueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('delete from TP_File ');
- sql.Add('where WBID='+quotedstr(trim(fkeyNO)));
- sql.Add('and TFType='+quotedstr(trim(fType)));
- sql.Add('and FileName='+quotedstr(trim(fFileName)));
- execsql;
- end;
-
- try
- with adoqueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('select * from TP_File ');
- sql.Add('where WBID='+quotedstr(trim(fkeyNO)));
- sql.Add('and TFType='+quotedstr(trim(fType)));
- sql.Add('and FileName='+quotedstr(trim(fFileName)));
- open;
- append;
- fieldbyname('TFID').Value:=trim(maxNO);
- fieldbyname('WBID').Value:=trim(fkeyNO);
- fieldbyname('TFType').Value:=trim(fType);
- fieldbyname('FileName').Value:=trim(fFileName);
- // tblobfield(FieldByName('Filesother')).LoadFromFile(fFilePath);
- post;
- end;
-
- if fFilePath <> '' then
- begin
- try
- IdFTP1.Host :='127.0.0.1';
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- IdFTP1.Put(fFilePath, 'FJ\' + Trim(fFileName));
- IdFTP1.Quit;
- except
- IdFTP1.Quit;
- Application.MessageBox('ϴͻͼļʧܣļ', 'ʾ', MB_ICONWARNING);
- end;
- end;
- IdFTP1.Quit;
-
- Panel2.Visible:=false;
- initdata();
- finally
- // FJStream.Free;
- end;
-
- end;
- adoqueryCmd.Connection.CommitTrans;
- except
- adoqueryCmd.Connection.RollbackTrans;
- application.MessageBox('ʧܣ','ʾϢ',0);
- end;
-end;
-
-procedure TfrmFjList.FormCreate(Sender: TObject);
-begin
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- ListView1.Align:=alclient;
- fstatus:=0;
-end;
-
-procedure TfrmFjList.FormShow(Sender: TObject);
-begin
- IF fstatus=0 then Panel1.Visible:=true
- else Panel1.Visible:=false;
- //initdata();
-end;
-
-procedure TfrmFjList.ListView1DblClick(Sender: TObject);
-var
- sFieldName:string;
- fileName:string;
-begin
- if ListView1.Items.Count<1 THEN EXIT;
-
- if listView1.SelCount<1 then exit;
- sFieldName:='D:\ͼƬ鿴';
-
- if not DirectoryExists(pchar(sFieldName)) then
- CreateDirectory(pchar(sFieldName),nil);
-
- fileName:=ListView1.Selected.Caption;
-
- sFieldName:=sFieldName+'\'+trim(fileName);
-
- try
- IdFTP1.Host :='127.0.0.1';
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- ;
- end;
-
- if IdFTP1.Connected then
- begin
-
- Panel2.Caption:='ݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
- try
- IdFTP1.Get('FJ\'+ Trim(fileName), sFieldName,false, true);
- except
- Panel2.Visible:=false;
- Application.MessageBox('ͻͼļ', 'ʾ', MB_ICONWARNING);
- IdFTP1.Quit;
- Exit;
- end;
- end
- else
- begin
- Panel2.Visible:=false;
- Application.MessageBox('ļ', 'ʾ', MB_ICONWARNING);
- IdFTP1.Quit;
- Exit;
- end;
- Panel2.Visible:=false;
- if IdFTP1.Connected then IdFTP1.Quit;
- ShellExecute(Handle, 'open',PChar(sFieldName),'', '', SW_SHOWNORMAL);
-
-end;
-
-procedure TfrmFjList.cxButton1Click(Sender: TObject);
-var
- fFileName:string;
- fFilePath:string;
-begin
- if listView1.SelCount<1 then exit;
-
- try
- fFileName:=ListView1.Selected.Caption;
- // ADOQueryTmp.Locate('fileName',fFileName,[]);
-
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('delete from TP_File ');
- sql.Add('where WBID='+quotedstr(trim(fkeyNO)));
- sql.Add('and TFType='+quotedstr(trim(fType)));
- sql.Add('and FileName='+quotedstr(trim(fFileName)));
- execsql;
- end;
-
- initData();
-
- except
- end;
-
-end;
-
-procedure TfrmFjList.cxButton2Click(Sender: TObject);
-var
- SaveDialog: TSaveDialog;
- fFileName:string;
- fFilePath:string;
-begin
- if listView1.SelCount<1 then exit;
-
- try
-
- fFileName:=ListView1.Selected.Caption;
-
- SaveDialog := TSaveDialog.Create(Self);
-
- SaveDialog.FileName:=fFileName;
- if SaveDialog.Execute then
- begin
- Panel2.Caption:='ڱݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
- fFilePath:=SaveDialog.FileName;
- try
- IdFTP1.Host := '127.0.0.1';
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- ;
- end;
-
- if IdFTP1.Connected then
- begin
-
- Panel2.Caption:='ݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
- try
- IdFTP1.Get('FJ\'+ Trim(fFileName), fFilePath,false, true);
- except
- Panel2.Visible:=false;
- Application.MessageBox('ͻͼļ', 'ʾ', MB_ICONWARNING);
- IdFTP1.Quit;
- Exit;
- end;
- end
- else
- begin
- Panel2.Visible:=false;
- Application.MessageBox('ļ', 'ʾ', MB_ICONWARNING);
- IdFTP1.Quit;
- Exit;
- end;
- Panel2.Visible:=false;
- if IdFTP1.Connected then IdFTP1.Quit;
- end;
- except
- Panel2.Visible:=false;
- end;
-end;
-
-procedure TfrmFjList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- if fId=10 then Action:=cafree
- else
- Action:=cahide;
-end;
-
-procedure TfrmFjList.Panel2DblClick(Sender: TObject);
-begin
- Panel2.Visible:=false;
-end;
-
-procedure TfrmFjList.cxButton4Click(Sender: TObject);
-var
- fFilePath,FName:string;
-begin
- if Assigned(ShellListView1.Selected) then
- begin
- if ShellListView1.Selected.Selected then
- begin
- if ShellListView1.SelectedFolder.IsFolder then
- begin
- ShowMessage(ShellListView1.SelectedFolder.PathName);
- end
- else
- begin
- ShowMessage(ShellListView1.SelectedFolder.PathName);
- end;
- end;
- end;
-
- //if fFilePath <> '' then
- //fFilePath:=ShellListView1.SelectedFolder.PathName;
- // FName:=ShellListView1.SelectedFolder.DisplayName;
- begin
- try
- IdFTP1.Host :='127.0.0.1';
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- IdFTP1.Put(ShellListView1.SelectedFolder.PathName, 'FJ\' +ShellListView1.SelectedFolder.PathName);
- IdFTP1.Quit;
- except
- IdFTP1.Quit;
- Application.MessageBox('ϴͻͼļʧܣļ', 'ʾ', MB_ICONWARNING);
- end;
- end;
- IdFTP1.Quit;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList_RZ.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList_RZ.dfm
deleted file mode 100644
index 2090f55..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList_RZ.dfm
+++ /dev/null
@@ -1,183 +0,0 @@
-object frmFjList_RZ: TfrmFjList_RZ
- Left = 177
- Top = 159
- Width = 1062
- Height = 514
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = #38468#20214#20449#24687
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ListView1: TListView
- Left = 40
- Top = 20
- Width = 429
- Height = 77
- Columns = <>
- TabOrder = 0
- OnDblClick = ListView1DblClick
- end
- object Panel1: TPanel
- Left = 878
- Top = 0
- Width = 151
- Height = 517
- Align = alRight
- TabOrder = 1
- object FileName: TcxButton
- Left = 30
- Top = 60
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #28155#21152
- TabOrder = 0
- OnClick = FileNameClick
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton1: TcxButton
- Left = 30
- Top = 96
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #21024#38500
- TabOrder = 1
- OnClick = cxButton1Click
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton2: TcxButton
- Left = 30
- Top = 132
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #19979#36733
- TabOrder = 2
- OnClick = cxButton2Click
- LookAndFeel.Kind = lfOffice11
- end
- object cxButton3: TcxButton
- Left = 30
- Top = 172
- Width = 75
- Height = 25
- Hint = 'Filesother'
- Caption = #20851#38381
- TabOrder = 3
- Visible = False
- OnClick = cxButton3Click
- LookAndFeel.Kind = lfOffice11
- end
- end
- object Panel2: TPanel
- Left = 176
- Top = 140
- Width = 193
- Height = 41
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Caption = 'Panel2'
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- Visible = False
- OnDblClick = Panel2DblClick
- end
- object cxGrid1: TcxGrid
- Left = 80
- Top = 200
- Width = 593
- Height = 317
- TabOrder = 3
- object Tv1: TcxGridDBTableView
- OnDblClick = Tv1DblClick
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.Editing = False
- OptionsView.GroupByBox = False
- OptionsView.Indicator = True
- object v1Column1: TcxGridDBColumn
- Caption = #25991#20214#21517#31216
- DataBinding.FieldName = 'FileName'
- HeaderAlignmentHorz = taCenter
- Width = 146
- end
- object v1Column4: TcxGridDBColumn
- Caption = #25991#20214#20462#25913#26102#38388
- DataBinding.FieldName = 'TFdate'
- HeaderAlignmentHorz = taCenter
- Width = 140
- end
- object v1Column2: TcxGridDBColumn
- Caption = #25805#20316#21592
- DataBinding.FieldName = 'Filler'
- HeaderAlignmentHorz = taCenter
- Width = 83
- end
- object v1Column3: TcxGridDBColumn
- Caption = #19978#20256#26102#38388
- DataBinding.FieldName = 'FillTime'
- HeaderAlignmentHorz = taCenter
- Width = 140
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object ADOQueryTmp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 520
- Top = 28
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 568
- Top = 32
- end
- object ImageList1: TImageList
- Left = 536
- Top = 228
- end
- object IdFTP1: TIdFTP
- MaxLineAction = maException
- ReadTimeout = 0
- ProxySettings.ProxyType = fpcmNone
- ProxySettings.Port = 0
- Left = 492
- Top = 166
- end
- object ADOConnection1: TADOConnection
- LoginPrompt = False
- Left = 460
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = ADOQueryTmp
- Left = 548
- Top = 124
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList_RZ.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList_RZ.pas
deleted file mode 100644
index 6d3c6e6..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_FjList_RZ.pas
+++ /dev/null
@@ -1,400 +0,0 @@
-unit U_FjList_RZ;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, ExtCtrls, ComCtrls, Menus, cxLookAndFeelPainters, StdCtrls,
- cxButtons, DB, ADODB, ImgList,shellapi, IdBaseComponent, IdComponent,
- IdTCPConnection, IdTCPClient, IdFTP, cxStyles, cxCustomData, cxGraphics,
- cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, cxGridCustomTableView,
- cxGridTableView, cxGridDBTableView, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGrid;
-
-type
- TfrmFjList_RZ = class(TForm)
- ListView1: TListView;
- Panel1: TPanel;
- FileName: TcxButton;
- cxButton1: TcxButton;
- cxButton2: TcxButton;
- cxButton3: TcxButton;
- ADOQueryTmp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- ImageList1: TImageList;
- Panel2: TPanel;
- IdFTP1: TIdFTP;
- ADOConnection1: TADOConnection;
- Tv1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- v1Column1: TcxGridDBColumn;
- v1Column2: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- DataSource1: TDataSource;
- v1Column4: TcxGridDBColumn;
- procedure cxButton3Click(Sender: TObject);
- procedure FormDestroy(Sender: TObject);
- procedure FileNameClick(Sender: TObject);
- procedure FormCreate(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ListView1DblClick(Sender: TObject);
- procedure cxButton1Click(Sender: TObject);
- procedure cxButton2Click(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure Panel2DblClick(Sender: TObject);
- procedure Tv1DblClick(Sender: TObject);
- private
- procedure InitData();
- { Private declarations }
- public
- fkeyNO:string;
- fType:string;
- fId:integer;
- fstatus:integer;
- // fmanage:string;
-
- { Public declarations }
- end;
-
-var
-frmFjList_RZ: TfrmFjList_RZ;
-
-implementation
- uses
- U_DataLink,U_RTFun,U_CompressionFun;
-{$R *.dfm}
-procedure TfrmFjList_RZ.InitData();
-var
- ListItem: TListItem;
- Flag: Cardinal;
- info: SHFILEINFOA;
- Icon: TIcon;
-begin
- ListView1.Items.Clear;
- try
-
- with adoqueryTmp do
- begin
- close;
- sql.Clear;
- sql.Add('select * from TP_File ');
- sql.Add('where WBID='+quotedstr(trim(fkeyNO)));
- sql.Add('and TFType='+quotedstr(trim(fType)));
- open;
- { if not IsEmpty then
- begin
- while not eof do
- begin
- with ListView1 do
- begin
- LargeImages := ImageList1;
- Icon := TIcon.Create;
- ListItem := Items.Add;
- Listitem.Caption := trim(fieldbyname('fileName').AsString);
- // Listitem.SubItems.Add(OpenDiaLog.FileName);
- Flag := (SHGFI_SMALLICON or SHGFI_ICON or SHGFI_USEFILEATTRIBUTES);
- SHGetFileInfo(Pchar(trim(fieldbyname('fileName').AsString)), 0, info, Sizeof(info), Flag);
- Icon.Handle := info.hIcon;
- ImageList1.AddIcon(Icon);
- ListItem.ImageIndex := ImageList1.Count - 1;
- end;
- next;
- end;
- end; }
- end;
- except
- end;
-end;
-
-procedure TfrmFjList_RZ.cxButton3Click(Sender: TObject);
-begin
- ADOQueryTmp.Close;
- ADOQuerycmd.Close;
- ListView1.Items.Free;
- ModalResult:=-1;
-end;
-
-procedure TfrmFjList_RZ.FormDestroy(Sender: TObject);
-begin
- frmFjList_RZ:=nil;
-end;
-
-procedure TfrmFjList_RZ.FileNameClick(Sender: TObject);
-var
- OpenDiaLog: TOpenDialog;
- fFileName:string;
- fFilePath:string;
- maxNo:string;
-// myStream: TADOBlobStream;
- FJStream : TMemoryStream;
- mfileSize:integer;
- mCreationTime:TdateTime;
- mWriteTime:TdateTime;
-begin
-
- try
- adoqueryCmd.Connection.BeginTrans;
- OpenDiaLog := TOpenDialog.Create(Self);
- if OpenDiaLog.Execute then
- begin
- fFilePath:=OpenDiaLog.FileName;
- fFileName:=ExtractFileName(OpenDiaLog.FileName);
- Panel2.Caption:='ϴݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
-
- if GetLSNo(ADOQueryCmd,maxNo,'FJ','TP_File',4,1)=False then
- begin
- adoqueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- //ȡļϢ
- GetFileInfo(fFilePath,mfileSize,mCreationTime,mWriteTime);
- with adoqueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('delete from TP_File ');
- sql.Add('where TFID='+quotedstr(trim(maxNO)));
- execsql;
- end;
- try
- FJStream:=TMemoryStream.Create;
- with adoqueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('select * from TP_File ');
- sql.Add('where TFID='+quotedstr(trim(maxNO)));
- // sql.Add('where WBID='+quotedstr(trim(fkeyNO)));
- // sql.Add('and TFType='+quotedstr(trim(fType)));
- // sql.Add('and FileName='+quotedstr(trim(fFileName)));
- open;
- append;
- fieldbyname('TFID').Value:=trim(maxNO);
- fieldbyname('WBID').Value:=trim(fkeyNO);
- fieldbyname('TFType').Value:=trim(fType);
- fieldbyname('Filler').Value:=trim(DName);
- fieldbyname('FileName').Value:=trim(fFileName);
- fieldbyname('TFDate').Value:=mWriteTime;
- FJStream.LoadFromFile(fFilePath);
- CompressionStream(FJStream);
- tblobfield(FieldByName('Filesother')).LoadFromStream(FJStream);
- post;
- end;
- Panel2.Visible:=false;
- initdata();
- finally
- FJStream.Free;
- end;
-
- end;
- adoqueryCmd.Connection.CommitTrans;
- except
- adoqueryCmd.Connection.RollbackTrans;
- application.MessageBox('ʧܣ','ʾϢ',0);
- end;
-end;
-
-procedure TfrmFjList_RZ.FormCreate(Sender: TObject);
-begin
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- cxGrid1.Align:=alclient;
- fstatus:=0;
-end;
-
-procedure TfrmFjList_RZ.FormShow(Sender: TObject);
-begin
- IF fstatus=0 then Panel1.Visible:=true
- else Panel1.Visible:=false;
- initdata();
-end;
-
-procedure TfrmFjList_RZ.ListView1DblClick(Sender: TObject);
-var
- sFieldName:string;
- fileName:string;
-begin
- if ListView1.Items.Count<1 THEN EXIT;
-
- if listView1.SelCount<1 then exit;
- sFieldName:='D:\ͼƬ鿴';
-
- if not DirectoryExists(pchar(sFieldName)) then
- CreateDirectory(pchar(sFieldName),nil);
-
- fileName:=ListView1.Selected.Caption;
-
- sFieldName:=sFieldName+'\'+trim(fileName);
-
- try
- IdFTP1.Host := PicSvr;
- IdFTP1.Username := 'three';
- IdFTP1.Password := '641010';
- IdFTP1.Connect();
- except
- ;
- end;
-
- if IdFTP1.Connected then
- begin
-
- Panel2.Caption:='ݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
- try
- IdFTP1.Get('FJ\'+ Trim(fileName), sFieldName,false, true);
- except
- Panel2.Visible:=false;
- Application.MessageBox('ͻͼļ', 'ʾ', MB_ICONWARNING);
- IdFTP1.Quit;
- Exit;
- end;
- end
- else
- begin
- Panel2.Visible:=false;
- Application.MessageBox('ļ', 'ʾ', MB_ICONWARNING);
- IdFTP1.Quit;
- Exit;
- end;
- Panel2.Visible:=false;
- if IdFTP1.Connected then IdFTP1.Quit;
- ShellExecute(Handle, 'open',PChar(sFieldName),'', '', SW_SHOWNORMAL);
-
-end;
-
-procedure TfrmFjList_RZ.cxButton1Click(Sender: TObject);
-var
- fFileName:string;
- fFilePath:string;
-begin
- // if listView1.SelCount<1 then exit;
-
- IF ADOQueryTmp.IsEmpty then exit;
-
- try
- // fFileName:=ListView1.Selected.Caption;
- // ADOQueryTmp.Locate('fileName',fFileName,[]);
-
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('delete from TP_File ');
- sql.Add('where TFID='+quotedstr(trim(ADOQueryTmp.fieldbyname('TFID').AsString)));
- // sql.Add('and TFType='+quotedstr(trim(fType)));
- // sql.Add('and FileName='+quotedstr(trim(fFileName)));
- execsql;
- end;
-
- initData();
-
- except
- end;
-
-end;
-
-procedure TfrmFjList_RZ.cxButton2Click(Sender: TObject);
-var
- SaveDialog: TSaveDialog;
- fFileName:string;
- fFilePath:string;
- ff: TADOBlobStream;
- FJStream : TMemoryStream;
-begin
- if adoqueryTmp.IsEmpty then exit;
-
- try
-
- fFileName:=adoqueryTmp.fieldbyname('FileName').AsString;
-
- SaveDialog := TSaveDialog.Create(Self);
-
- SaveDialog.FileName:=fFileName;
- if SaveDialog.Execute then
- begin
- Panel2.Caption:='ڱݣԵ...';
- Panel2.Visible:=true;
- application.ProcessMessages;
- fFilePath:=SaveDialog.FileName;
-
- try
- ff := TADOBlobstream.Create(adoqueryTmp.fieldByName('FilesOther') as TblobField, bmRead);
-
- fjStream:= TMemoryStream.Create ;
- ff.SaveToStream(fjStream);
- UnCompressionStream(fjStream);
- fjStream.SaveToFile(fFilePath);
- // ShellExecute(Handle, 'open',PChar(sFieldName),'', '', SW_SHOWNORMAL);
- finally
- fjStream.free;
- ff.Free;
- end;
-
-
- Panel2.Visible:=false;
- // if IdFTP1.Connected then IdFTP1.Quit;
- end;
- except
- Panel2.Visible:=false;
- end;
-end;
-
-procedure TfrmFjList_RZ.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- if fId=10 then Action:=cafree
- else
- Action:=cahide;
-end;
-
-procedure TfrmFjList_RZ.Panel2DblClick(Sender: TObject);
-begin
- Panel2.Visible:=false;
-end;
-
-procedure TfrmFjList_RZ.Tv1DblClick(Sender: TObject);
-var
- sFieldName:string;
- fileName:string;
- ff: TADOBlobStream;
- FJStream : TMemoryStream;
-begin
-
- IF adoqueryTmp.IsEmpty then exit;
-
- sFieldName:='D:\ͼƬ鿴';
-
- if not DirectoryExists(pchar(sFieldName)) then
- CreateDirectory(pchar(sFieldName),nil);
-
- fileName:=adoqueryTmp.fieldbyname('FileName').AsString;
-
- sFieldName:=sFieldName+'\'+trim(fileName);
-
- try
- ff := TADOBlobstream.Create(adoqueryTmp.fieldByName('FilesOther') as TblobField, bmRead);
-
- fjStream:= TMemoryStream.Create ;
- ff.SaveToStream(fjStream);
- UnCompressionStream(fjStream);
- fjStream.SaveToFile(sFieldName);
- ShellExecute(Handle, 'open',PChar(sFieldName),'', '', SW_SHOWNORMAL);
- finally
- fjStream.free;
- ff.Free;
- end;
-
-
-
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GJKDList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GJKDList.dfm
deleted file mode 100644
index 6fec263..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GJKDList.dfm
+++ /dev/null
@@ -1,510 +0,0 @@
-object frmGJKDList: TfrmGJKDList
- Left = 122
- Top = 123
- Width = 1384
- Height = 670
- Caption = #22269#38469#24555#36882
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1368
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object ToolButton7: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = ToolButton7Click
- end
- object ToolButton1: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #23548#20837
- ImageIndex = 22
- OnClick = ToolButton1Click
- end
- object ToolButton3: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 2
- OnClick = ToolButton3Click
- end
- object ToolButton2: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- OnClick = ToolButton2Click
- end
- object TBClose: TToolButton
- Left = 378
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1368
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label5: TLabel
- Left = 187
- Top = 35
- Width = 24
- Height = 12
- Caption = #21333#21495
- end
- object Label4: TLabel
- Left = 175
- Top = 12
- Width = 36
- Height = 12
- Caption = #30446#30340#22320
- end
- object Label1: TLabel
- Left = 25
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label2: TLabel
- Left = 322
- Top = 13
- Width = 36
- Height = 12
- Caption = #23492#20214#20154
- end
- object Label3: TLabel
- Left = 578
- Top = 13
- Width = 48
- Height = 12
- Caption = #24555#36882#20844#21496
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 7
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 77
- Top = 30
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object DANNO: TEdit
- Tag = 2
- Left = 215
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 2
- OnKeyPress = TOCOUNTRYKeyPress
- end
- object TOCOUNTRY: TEdit
- Tag = 2
- Left = 215
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = TOCOUNTRYKeyPress
- end
- object JJREN: TEdit
- Tag = 2
- Left = 362
- Top = 9
- Width = 100
- Height = 20
- TabOrder = 4
- OnKeyPress = TOCOUNTRYKeyPress
- end
- object cxButtonEdit1: TcxButtonEdit
- Left = 631
- Top = 8
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.ReadOnly = True
- TabOrder = 5
- OnClick = cxButtonEdit1Click
- Width = 121
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1368
- Height = 540
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = TV1CustomDrawCell
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #23492#20214#26085#26399
- DataBinding.FieldName = 'CRTIME2'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 81
- end
- object TV1Column1: TcxGridDBColumn
- Caption = #30446#30340#22320
- DataBinding.FieldName = 'TOCOUNTRY'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #37325#37327#65288'KG'#65289
- DataBinding.FieldName = 'qty'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object TV1Column3: TcxGridDBColumn
- Caption = #21333#21495
- DataBinding.FieldName = 'DANNO'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #23492#20214#20154
- DataBinding.FieldName = 'JJREN'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 85
- end
- object TV1Column5: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'MONEY'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column16: TcxGridDBColumn
- Caption = #30331#35760#26085#26399
- DataBinding.FieldName = 'filltime'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column6: TcxGridDBColumn
- Caption = #24555#36882#20844#21496
- DataBinding.FieldName = 'FACTORYNAME'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 77
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object Panel6: TPanel
- Left = 506
- Top = 248
- Width = 185
- Height = 41
- Caption = #27491#22312#23548#20837#65292#35831#31245#21518#12290#12290#12290
- TabOrder = 3
- Visible = False
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 338
- Top = 330
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 312
- Top = 305
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 342
- Top = 278
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 283
- Top = 354
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 284
- Top = 328
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 313
- Top = 330
- end
- object PopupMenu1: TPopupMenu
- Left = 315
- Top = 276
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 916
- Top = 514
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 488
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 942
- Top = 515
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 341
- Top = 305
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 256
- Top = 357
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 256
- Top = 328
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 256
- Top = 276
- end
- object RM2: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDB_2
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 284
- Top = 303
- ReportData = {}
- end
- object RMDB_2: TRMDBDataSet
- Visible = True
- DataSet = CDS_Main
- Left = 285
- Top = 277
- end
- object OpenDialog1: TOpenDialog
- Left = 474
- Top = 258
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GJKDList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GJKDList.pas
deleted file mode 100644
index 73cf9e9..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GJKDList.pas
+++ /dev/null
@@ -1,1194 +0,0 @@
-unit U_GJKDList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc, Registry, ComObj, cxContainer, cxMaskEdit;
-
-type
- FdDy = record
- inc: integer; //ͻ־
- FDdys: string[32]; //ͻ
- FdDysName: string[32]; //ͻ
- end;
-
- TfrmGJKDList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- DANNO: TEdit;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- tv2Column1: TcxGridDBColumn;
- Label4: TLabel;
- TOCOUNTRY: TEdit;
- TV1Column1: TcxGridDBColumn;
- TV1Column2: TcxGridDBColumn;
- TV1Column3: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- TV1Column15: TcxGridDBColumn;
- TV1Column16: TcxGridDBColumn;
- ToolButton7: TToolButton;
- RM2: TRMGridReport;
- RMDB_2: TRMDBDataSet;
- ToolButton1: TToolButton;
- OpenDialog1: TOpenDialog;
- Panel6: TPanel;
- Label1: TLabel;
- Label2: TLabel;
- JJREN: TEdit;
- Label3: TLabel;
- TV1Column6: TcxGridDBColumn;
- cxButtonEdit1: TcxButtonEdit;
- ToolButton2: TToolButton;
- ToolButton3: TToolButton;
- TV1Column7: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure huodaiKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure ToolButton5Click(Sender: TObject);
- procedure TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- procedure ToolButton6Click(Sender: TObject);
- procedure TOCOUNTRYKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- procedure cxButtonEdit1Click(Sender: TObject);
- procedure TV1Column1PropertiesEditValueChanged(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- function GetShellFolders(strDir: string): string;
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- dFdDy: array[0..50] of FdDy;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun, U_YFGLInPut;
-
-{$R *.dfm}
-function TfrmGJKDList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmGJKDList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmGJKDList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmGJKDList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := SGetServerDateMBeg(ADOQueryTemp);
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmGJKDList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* from KD_Main A ');
-
- sql.Add(' WHERE FILLTIME>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and FILLTIME<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-
- SQL.Add(fwhere);
-
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmGJKDList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmGJKDList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmGJKDList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, 'ʿ');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmGJKDList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, 'ʿ');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmGJKDList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmGJKDList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmGJKDList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmGJKDList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmGJKDList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmGJKDList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmGJKDList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmGJKDList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmGJKDList.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-
-end;
-
-procedure TfrmGJKDList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmGJKDList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmGJKDList.huodaiKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmGJKDList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmGJKDList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmGJKDList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmGJKDList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmGJKDList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.YWYChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmGJKDList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmGJKDList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmGJKDList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmGJKDList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmGJKDList.ToolButton1Click(Sender: TObject);
-var
- excelApp, WorkBook: Variant;
- i, j, k, LX, ExcelRowCount: integer;
- maxId, FCPID, FCPName, t1, t2, t3: string;
- MAXNO: string;
-begin
-
- try
- excelApp := CreateOleObject('Excel.Application');
- openDialog1.Filter := '*.CSV;*.xls';
- if opendialog1.Execute then
- begin
-
- WorkBook := excelApp.WorkBooks.Open(OpenDialog1.FileName);
- end
- else
- exit;
-
- excelApp.Visible := false;
- ExcelRowCount := WorkBook.WorkSheets[1].UsedRange.Rows.Count;
- except
- application.MessageBox('EXCEL', 'Ϣ', MB_ICONERROR);
- exit;
- end;
-
- try
-
- k := 0;
- for i := 1 to 50 do
- begin
- if trim(excelApp.Cells[1, i].value) = '' then
- continue;
-
-
- //ʾֶκ
- for j := 0 to Tv1.ColumnCount - 1 do
- begin
- if trim(excelApp.Cells[1, i].value) = trim(Tv1.Columns[j].Caption) then
- begin
- dFdDy[k].inc := i;
- dFdDy[k].FDdys := trim(Tv1.Columns[j].DataBinding.FieldName);
- dFdDy[k].FdDysName := trim(Tv1.Columns[j].Caption);
- end;
- end;
-
- k := k + 1;
- end;
- except
- application.MessageBox('', 'Ϣ', MB_ICONERROR);
- exit;
- end;
- if GetLSNo(ADOQueryCmd, MAXNO, 'KD', 'KD_MAIN', 3, 1) = False then
- begin
-
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- ADOQueryCmd.Connection.BeginTrans;
- try
- panel6.Visible := True;
- for i := 2 to ExcelRowCount do
- begin
-
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('select * from KD_Main where 1=2');
- open;
- end;
-
- ADOQueryCmd.Append;
- //ӵi
- for j := 1 to k - 1 do
- begin
-
- if trim(dFdDy[j].FDdys) <> '' then
- begin
-
- ADOQueryCmd.fieldbyname(dFdDy[j].FDdys).Value := excelApp.Cells[i, dFdDy[j].inc].Value;
- end;
- end;
-
- ADOQueryCmd.FieldByName('FILLER').Value := TRIM(DNAME);
- ADOQueryCmd.FieldByName('KDNO').Value := TRIM(MAXNO);
- ADOQueryCmd.FieldByName('FACTORYNAME').Value := TRIM(cxButtonEdit1.TEXT);
- // Trim(maxId) + inttostr(i);
- ADOQueryCmd.FieldByName('filltime').Value := SGetServerDateTime(ADOQueryTemp);
-
- ADOQueryCmd.Post;
-
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPDATE KD_Main SET CRTIME2=convert(varchar(10),CAST(CRTIME2 AS DATETIME),120) ');
- SQL.Add('WHERE KDNO=' + QuotedStr(Trim(MAXNO)));
- ExecSQL;
- end;
-
- WorkBook.Close;
- excelApp.Quit;
- excelApp := Unassigned;
- WorkBook := Unassigned;
- ADOQueryCmd.Connection.CommitTrans;
- panel6.Visible := False;
- application.MessageBox('ɹ', 'ʾϢ');
- InitGrid();
- except
- WorkBook.Close;
- excelApp.Quit;
- excelApp := Unassigned;
- WorkBook := Unassigned;
- ADOQueryCmd.Connection.RollbackTrans;
- application.MessageBox('ݴ', 'Ϣ', MB_ICONERROR);
- exit;
- end;
-
-end;
-
-procedure TfrmGJKDList.ToolButton2Click(Sender: TObject);
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if cds_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KD_Main where KDID=''' + Trim(CDS_Main.fieldbyname('KDID').AsString) + '''');
- ExecSQL;
- end;
-
- end;
- CDS_Main.Next;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmGJKDList.ToolButton3Click(Sender: TObject);
-begin
- jjren.SetFocus;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KD_MAIN(Filler) values(' + quotedstr(Trim(dname)) + ')');
- ExecSQL;
- end;
- InitGrid();
-end;
-
-procedure TfrmGJKDList.ToolButton4Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update fp_main Set fkstatus=''Ѹ'' ');
-
- SQL.Add(' where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-// Order_Main.Delete;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- initgrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.ToolButton5Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update fp_main Set fkstatus=''δ'' ');
-
- SQL.Add(' where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-// Order_Main.Delete;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- initgrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if (AViewInfo.GridRecord.Values[TV1Column4.Index] = null) then
- begin
- ACanvas.font.Color := clred;
- end;
-end;
-
-procedure TfrmGJKDList.ToolButton6Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\뵥.rmf';
- ExportFtErpFile('뵥.rmf', ADOQueryPrint);
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete TBSubID where DName=''' + Trim(DCode) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM TBSubID where 1=2 ');
- open;
- end;
-
- CDS_Main.DisableControls;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if Fieldbyname('Ssel').AsBoolean then
- begin
-
- ADOQueryCmd.append;
- ADOQueryCmd.fieldbyname('SubId').Value := Trim(CDS_Main.fieldbyname('FPID').AsString);
- ADOQueryCmd.fieldbyname('Dname').Value := Trim(DCode);
- ADOQueryCmd.post;
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('Update fp_main Set fkstatus=''Ѹ'' ');
-
- SQL.Add(' where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-// Order_Main.Delete;
-
- end;
- Next;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- end;
- CDS_Main.EnableControls;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_FKSQD ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
-
-end;
-
-procedure TfrmGJKDList.TOCOUNTRYKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- InitGrid();
-end;
-
-procedure TfrmGJKDList.ToolButton7Click(Sender: TObject);
-var
- fPrintFile, fImagePath2: string;
- Porderno, LBName, SYRName: string;
- i, j: Integer;
- OrderKg: Double;
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- LBName := '˷ѵ';
- ExportFtErpFile(Trim(LBName) + '.rmf', ADOQueryTemp);
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf';
- if FileExists(fPrintFile) then
- begin
- RM2.LoadFromFile(fPrintFile);
-
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label.xls';
- RM2.PrepareReport;
- RM2.ExportTo(RMXLSExport1, fImagePath2);
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmGJKDList.cxButtonEdit1Click(Sender: TObject);
-begin
-
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'KDFACTORYNAME';
- flagname := 'ݹ˾';
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmGJKDList.TV1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FFieldName: string;
-begin
- mvalue := TcxTextEdit(Sender).EditingText;
- FFieldName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Main do
- begin
- Edit;
- FieldByName(FFieldName).Value := Trim(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate KD_MAIN ');
- sql.Add(' Set ' + FFieldName + '=''' + Trim(mvalue) + '''');
- sql.Add(' where KDID=' + CDS_Main.fieldbyname('KDID').AsString);
- ExecSQL;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- tv1.Controller.EditingController.ShowEdit();
- except
- tv1.Controller.EditingController.ShowEdit();
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSList.dfm
deleted file mode 100644
index 623c593..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSList.dfm
+++ /dev/null
@@ -1,539 +0,0 @@
-object frmGYSList: TfrmGYSList
- Left = 43
- Top = 66
- Width = 1182
- Height = 606
- Caption = #20379#24212#21830#30331#35760
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1166
- Height = 62
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 107
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object TBAdd: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 1
- OnClick = TBAddClick
- end
- object TBEdit: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object ToolButton1: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = ToolButton1Click
- end
- object TBDel: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- OnClick = TBDelClick
- end
- object ToolButton4: TToolButton
- Left = 378
- Top = 0
- AutoSize = True
- Caption = #26356#26032#36134#26399#22825#25968
- ImageIndex = 22
- Wrap = True
- OnClick = ToolButton4Click
- end
- object Panel2: TPanel
- Left = 0
- Top = 30
- Width = 119
- Height = 30
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 0
- object Label3: TLabel
- Left = 8
- Top = 8
- Width = 48
- Height = 12
- Caption = #36134#26399#22825#25968
- end
- object LockDays: TEdit
- Left = 58
- Top = 5
- Width = 52
- Height = 20
- TabOrder = 0
- end
- end
- object ToolButton5: TToolButton
- Left = 119
- Top = 30
- AutoSize = True
- Caption = #26356#26032#22823#31867
- ImageIndex = 22
- OnClick = ToolButton5Click
- end
- object Panel3: TPanel
- Left = 206
- Top = 30
- Width = 107
- Height = 30
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label4: TLabel
- Left = 8
- Top = 8
- Width = 24
- Height = 12
- Caption = #22823#31867
- end
- object BigType: TComboBox
- Left = 34
- Top = 5
- Width = 70
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 0
- Items.Strings = (
- #24212#20184#27454
- #21333#35777
- #20179#24211
- #26426#29289#26009
- #20854#20182)
- end
- end
- object ToolButton2: TToolButton
- Left = 313
- Top = 30
- AutoSize = True
- Caption = #20379#24212#21830#38145#23450
- ImageIndex = 35
- OnClick = ToolButton2Click
- end
- object ToolButton3: TToolButton
- Left = 412
- Top = 30
- AutoSize = True
- Caption = #35299#38145
- ImageIndex = 41
- OnClick = ToolButton3Click
- end
- object TBExport: TToolButton
- Left = 475
- Top = 30
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 97
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 538
- Top = 30
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 152
- Width = 1166
- Height = 415
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 1
- object Tv1: TcxGridDBTableView
- OnMouseDown = Tv1MouseDown
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Header = DataLink_DDMD.Default
- object v1Column5: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 46
- end
- object v1Column2: TcxGridDBColumn
- Caption = #20379#24212#21830#32534#21495
- DataBinding.FieldName = 'KHCode'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column7: TcxGridDBColumn
- Caption = #20379#24212#21830#20840#31216
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 88
- end
- object v1Column6: TcxGridDBColumn
- Caption = #20379#24212#21830#31616#31216
- DataBinding.FieldName = 'KHNameJC'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 139
- end
- object v1Column15: TcxGridDBColumn
- Caption = #22823#31867
- DataBinding.FieldName = 'BigType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 87
- end
- object v1Column1: TcxGridDBColumn
- Caption = #20379#24212#21830#31867#22411
- DataBinding.FieldName = 'KHType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column4: TcxGridDBColumn
- Caption = #32479#35745#21333#20301#21517#31216
- DataBinding.FieldName = 'TJKHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 102
- end
- object v1Column9: TcxGridDBColumn
- Caption = #30005#35805
- DataBinding.FieldName = 'ZKTelNo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 96
- end
- object v1Column10: TcxGridDBColumn
- Caption = #20256#30495
- DataBinding.FieldName = 'ZKFax'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 89
- end
- object v1Column11: TcxGridDBColumn
- Caption = #22320#22336
- DataBinding.FieldName = 'ZKAddress'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 112
- end
- object v1Column16: TcxGridDBColumn
- Caption = #36127#36131#20154
- DataBinding.FieldName = 'FZPerson'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.DropDownRows = 40
- Properties.ImmediatePost = True
- Properties.OnChange = v1Column16PropertiesChange
- HeaderAlignmentHorz = taCenter
- Width = 73
- end
- object v1Column12: TcxGridDBColumn
- Caption = #32852#31995#20154
- DataBinding.FieldName = 'LXR'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 82
- end
- object v1Column13: TcxGridDBColumn
- Caption = #32852#31995#20154#30005#35805
- DataBinding.FieldName = 'LXRTel'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 78
- end
- object v1Column3: TcxGridDBColumn
- Caption = #26159#21542#26377#25928
- DataBinding.FieldName = 'Valid'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 76
- end
- object v1Column8: TcxGridDBColumn
- Caption = #24050#38145#23450
- DataBinding.FieldName = 'LockFlag'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 64
- end
- object v1Column14: TcxGridDBColumn
- Caption = #36134#26399#22825#25968
- DataBinding.FieldName = 'lockDays'
- Options.Editing = False
- Width = 59
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 62
- Width = 1166
- Height = 67
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 2
- object Label9: TLabel
- Left = 27
- Top = 15
- Width = 65
- Height = 12
- Caption = #20379#24212#21830#31616#31216
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 27
- Top = 39
- Width = 65
- Height = 12
- Caption = #20379#24212#21830#32534#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label34: TLabel
- Left = 249
- Top = 15
- Width = 65
- Height = 12
- Caption = #20379#24212#21830#31867#22411
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 241
- Top = 39
- Width = 78
- Height = 12
- Caption = #32479#35745#21333#20301#21517#31216
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label5: TLabel
- Left = 465
- Top = 15
- Width = 39
- Height = 12
- Caption = #36127#36131#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object KHNameJC: TEdit
- Tag = 2
- Left = 94
- Top = 11
- Width = 125
- Height = 20
- TabOrder = 0
- OnChange = CustomerNoNameChange
- end
- object KHCode: TEdit
- Tag = 2
- Left = 94
- Top = 35
- Width = 125
- Height = 20
- TabOrder = 1
- OnChange = CustomerNoNameChange
- end
- object KHType: TEdit
- Tag = 2
- Left = 320
- Top = 11
- Width = 125
- Height = 20
- TabOrder = 2
- OnChange = CustomerNoNameChange
- end
- object TJKHName: TEdit
- Tag = 2
- Left = 320
- Top = 35
- Width = 125
- Height = 20
- TabOrder = 3
- OnChange = CustomerNoNameChange
- end
- object CheckBox1: TCheckBox
- Left = 508
- Top = 37
- Width = 97
- Height = 17
- Caption = #26174#31034#26080#25928#25968#25454
- TabOrder = 4
- end
- object FZPerson: TEdit
- Tag = 2
- Left = 506
- Top = 11
- Width = 125
- Height = 20
- TabOrder = 5
- OnChange = CustomerNoNameChange
- end
- end
- object cxTabControl1: TcxTabControl
- Left = 0
- Top = 129
- Width = 1166
- Height = 23
- Align = alTop
- TabOrder = 3
- Properties.CustomButtons.Buttons = <>
- Properties.Style = 8
- Properties.TabIndex = 0
- Properties.Tabs.Strings = (
- #24212#20184#27454
- #21333#35777
- #20179#24211
- #26426#29289#26009
- #20854#20182
- #20840#37096)
- OnChange = cxTabControl1Change
- ClientRectBottom = 23
- ClientRectRight = 1166
- ClientRectTop = 23
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 464
- Top = 160
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 432
- Top = 200
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 392
- Top = 200
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 304
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = Order_Main
- Left = 352
- Top = 160
- end
- object Order_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 416
- Top = 160
- end
- object PopupMenu1: TPopupMenu
- Left = 304
- Top = 192
- object N2: TMenuItem
- Caption = #20840#36873
- OnClick = N2Click
- end
- object N1: TMenuItem
- Caption = #20840#24323
- OnClick = N1Click
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSList.pas
deleted file mode 100644
index ea6d1c3..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSList.pas
+++ /dev/null
@@ -1,620 +0,0 @@
-unit U_GYSList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData,
- cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ADODB,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridCustomTableView, cxGridTableView,
- cxGridDBTableView, cxGrid, DBClient, cxCheckBox, cxCalendar, cxSplitter,
- RM_Dataset, RM_System, RM_Common, RM_Class, RM_GridReport, RM_e_Xls,
- Menus, cxButtonEdit, cxDropDownEdit, cxPC, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu;
-
-type
- TfrmGYSList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBAdd: TToolButton;
- TBEdit: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- Tv1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- cxGridPopupMenu1: TcxGridPopupMenu;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- TBExport: TToolButton;
- Order_Main: TClientDataSet;
- ToolButton1: TToolButton;
- Panel1: TPanel;
- Label9: TLabel;
- KHNameJC: TEdit;
- v1Column2: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- Label2: TLabel;
- KHCode: TEdit;
- v1Column1: TcxGridDBColumn;
- Label34: TLabel;
- v1Column3: TcxGridDBColumn;
- v1Column7: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- KHType: TEdit;
- v1Column4: TcxGridDBColumn;
- Label1: TLabel;
- TJKHName: TEdit;
- CheckBox1: TCheckBox;
- ToolButton2: TToolButton;
- v1Column5: TcxGridDBColumn;
- PopupMenu1: TPopupMenu;
- N2: TMenuItem;
- N1: TMenuItem;
- v1Column8: TcxGridDBColumn;
- ToolButton3: TToolButton;
- v1Column12: TcxGridDBColumn;
- v1Column13: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- Panel2: TPanel;
- Label3: TLabel;
- LockDays: TEdit;
- ToolButton4: TToolButton;
- cxTabControl1: TcxTabControl;
- v1Column15: TcxGridDBColumn;
- ToolButton5: TToolButton;
- Panel3: TPanel;
- BigType: TComboBox;
- Label4: TLabel;
- v1Column16: TcxGridDBColumn;
- Label5: TLabel;
- FZPerson: TEdit;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure TBAddClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure CheckBox1Click(Sender: TObject);
- procedure CheckBox2Click(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure CustomerNoNameChange(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure ToolButton5Click(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure v1Column16PropertiesChange(Sender: TObject);
- procedure Tv1MouseDown(Sender: TObject; Button: TMouseButton;
- Shift: TShiftState; X, Y: Integer);
- private
- canshu1:string;
- DQdate:TDateTime;
- procedure InitGrid();
- procedure InitForm();
- function DelData():Boolean;
- { Private declarations }
- public
- FFInt,FCloth:Integer;
-
- { Public declarations }
- end;
-
-var
- frmGYSList: TfrmGYSList;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp, U_GYSInPutTab, U_ZDYHelpSel;
-
-{$R *.dfm}
-
-procedure TfrmGYSList.FormDestroy(Sender: TObject);
-begin
- frmGYSList:=nil;
-end;
-
-procedure TfrmGYSList.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmGYSList.FormCreate(Sender: TObject);
-begin
- cxgrid1.Align:=alClient;
-end;
-
-procedure TfrmGYSList.TBCloseClick(Sender: TObject);
-begin
- Close;
- WriteCxGrid('Ӧ̵Ǽ',Tv1,'Ӧ̹');
-
-end;
-
-procedure TfrmGYSList.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from ZH_KH_Info A ');
- sql.Add(' where Type=''GYS'' ');
- if CheckBox1.Checked=false then
- begin
- sql.Add(' and Valid=''Y'' ');
- end;
- if cxTabControl1.TabIndex=0 then
- begin
- sql.Add(' and isnull(BigType,'''')=''Ӧ'' ');
- end else
- if cxTabControl1.TabIndex=1 then
- begin
- sql.Add(' and isnull(BigType,'''')=''֤'' ');
- end else
- if cxTabControl1.TabIndex=2 then
- begin
- sql.Add(' and isnull(BigType,'''')=''ֿ'' ');
- end else
- if cxTabControl1.TabIndex=3 then
- begin
- sql.Add(' and isnull(BigType,'''')='''' ');
- end else
- if cxTabControl1.TabIndex=4 then
- begin
- sql.Add(' and isnull(BigType,'''')='''' ');
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-
-procedure TfrmGYSList.InitForm();
-begin
- ReadCxGrid('Ӧ̵Ǽ',Tv1,'Ӧ̹');
- InitGrid();
-end;
-
-procedure TfrmGYSList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active=False then Exit;
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
-end;
-
-procedure TfrmGYSList.TBEditClick(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- try
- frmGYSInPutTab:=TfrmGYSInPutTab.Create(Application);
- with frmGYSInPutTab do
- begin
- PState:=1;
- FMainId:=Trim(Self.Order_Main.fieldbyname('ZKId').AsString);
- frmGYSInPutTab.canshu1:=Trim(Self.canshu1);
- if ShowModal=1 then
- begin
-
- end;
- end;
- finally
- frmGYSInPutTab.Free;
- end;
-end;
-
-procedure TfrmGYSList.TBDelClick(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1* from JYOrder_Main_MD_DuiZhang ');
- sql.Add(' where FactoryNo='''+Trim(Order_Main.fieldbyname('ZKId').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- Application.MessageBox('жݲɾ!','ʾ',0);
- Exit;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1* from YF_Money_PaiKuan ');
- sql.Add(' where FactoryNo='''+Trim(Order_Main.fieldbyname('ZKId').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- Application.MessageBox('ʽݲɾ!','ʾ',0);
- Exit;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1* from JYOrder_Main_MD ');
- sql.Add(' where FactoryNo='''+Trim(Order_Main.fieldbyname('ZKId').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- Application.MessageBox('뵥ݲɾ!','ʾ',0);
- Exit;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1* from YF_Money_CR ');
- sql.Add(' where FactoryNo='''+Trim(Order_Main.fieldbyname('ZKId').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- Application.MessageBox('ݲɾ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ','ʾ',32+4)<>IDYES then Exit;
- if DelData() then
- begin
- Order_Main.Delete;
- end;
-end;
-
-function TfrmGYSList.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update ZH_KH_Info Set Valid=''N'' where ZKId='''+Trim(Order_Main.fieldbyname('ZKId').AsString)+'''');
- ExecSQL;
- end;
-
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-
-procedure TfrmGYSList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then Exit;
- TcxGridToExcel('Ӧб',cxGrid1);
-end;
-
-procedure TfrmGYSList.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmGYSList.TBAddClick(Sender: TObject);
-var
- maxno:string;
-begin
- try
- frmGYSInPutTab:=TfrmGYSInPutTab.Create(Application);
- with frmGYSInPutTab do
- begin
- PState:=0;
- FMainId:='';
- if ShowModal=1 then
- begin
-
- end;
- end;
- finally
- frmGYSInPutTab.Free;
- end;
-end;
-
-procedure TfrmGYSList.FormShow(Sender: TObject);
-begin
- InitForm();
-end;
-
-procedure TfrmGYSList.CheckBox1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmGYSList.CheckBox2Click(Sender: TObject);
-begin
- TBRafresh.Click;
-end;
-
-procedure TfrmGYSList.ToolButton1Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- try
- frmGYSInPutTab:=TfrmGYSInPutTab.Create(Application);
- with frmGYSInPutTab do
- begin
- PState:=1;
- FMainId:=Trim(Self.Order_Main.fieldbyname('ZKId').AsString);
- TBSave.Visible:=False;
- if ShowModal=1 then
- begin
-
- end;
- end;
- finally
- frmGYSInPutTab.Free;
- end;
-end;
-
-procedure TfrmGYSList.CustomerNoNameChange(Sender: TObject);
-begin
- if ADOQueryMain.Active=False then Exit;
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
-end;
-
-procedure TfrmGYSList.ToolButton2Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- if Order_Main.Locate('SSel',True,[])=False then
- begin
- Application.MessageBox('ûѡ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪ','ʾ',32+4)<>IDYES then Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- First;
- while Order_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update ZH_KH_Info Set ');
- sql.Add(' LockFlag=1');
- sql.Add(' where ZKID='''+Order_Main.fieldbyname('ZKID').AsString+'''');
- ExecSQL;
- end;
- Edit;
- FieldByName('SSel').Value:=False;
- FieldByName('LockFlag').Value:=True;
- Post;
- end;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ!','ʾ',0);
- Exit;
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!','ʾ',0);
- end;
-end;
-
-procedure TfrmGYSList.N2Click(Sender: TObject);
-begin
- SelOKNo(Order_Main,True);
-end;
-
-procedure TfrmGYSList.N1Click(Sender: TObject);
-begin
- SelOKNo(Order_Main,False);
-end;
-
-procedure TfrmGYSList.ToolButton3Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- if Order_Main.Locate('SSel',True,[])=False then
- begin
- Application.MessageBox('ûѡ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪ','ʾ',32+4)<>IDYES then Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- First;
- while Order_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update ZH_KH_Info Set ');
- sql.Add(' LockFlag=0');
- sql.Add(' where ZKID='''+Order_Main.fieldbyname('ZKID').AsString+'''');
- ExecSQL;
- end;
- Edit;
- FieldByName('SSel').Value:=False;
- FieldByName('LockFlag').Value:=False;
- Post;
- end;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ!','ʾ',0);
- Exit;
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!','ʾ',0);
- end;
-end;
-
-procedure TfrmGYSList.ToolButton4Click(Sender: TObject);
-var
- FInteger:Integer;
-begin
- if Order_Main.IsEmpty then Exit;
- if Order_Main.Locate('SSel',True,[])=False then
- begin
- Application.MessageBox('ûѡ!','ʾ',0);
- Exit;
- end;
- if Trim(LockDays.Text)='' then
- begin
- Application.MessageBox('Ϊ!','ʾ',0);
- Exit;
- end;
- if TryStrToInt(Trim(LockDays.Text),FInteger)=False then
- begin
- Application.MessageBox('Ƿ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪ','ʾ',32+4)<>IDYES then Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- First;
- while Order_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update ZH_KH_Info Set ');
- sql.Add(' lockDays='+LockDays.Text);
- sql.Add(' where ZKID='''+Order_Main.fieldbyname('ZKID').AsString+'''');
- ExecSQL;
- end;
- Edit;
- FieldByName('SSel').Value:=False;
- FieldByName('lockDays').Value:=LockDays.Text;
- Post;
- end;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('³ɹ!','ʾ',0);
- Exit;
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!','ʾ',0);
- end;
-end;
-
-procedure TfrmGYSList.ToolButton5Click(Sender: TObject);
-begin
- if Order_Main.IsEmpty then Exit;
- if Order_Main.Locate('SSel',True,[])=False then
- begin
- Application.MessageBox('ûѡ!','ʾ',0);
- Exit;
- end;
- if Trim(BigType.Text)='' then
- begin
- Application.MessageBox('Ϊ!','ʾ',0);
- Exit;
- end;
- if Application.MessageBox('ȷҪ´','ʾ',32+4)<>IDYES then Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- Order_Main.DisableControls;
- with Order_Main do
- begin
- First;
- while Order_Main.Locate('SSel',True,[]) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update ZH_KH_Info Set ');
- sql.Add(' BigType='''+Trim(BigType.Text)+'''');
- sql.Add(' where ZKID='''+Order_Main.fieldbyname('ZKID').AsString+'''');
- ExecSQL;
- end;
- Edit;
- FieldByName('SSel').Value:=False;
- FieldByName('BigType').Value:=BigType.Text;
- Post;
- end;
- end;
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('³ɹ!','ʾ',0);
- Exit;
- except
- Order_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!','ʾ',0);
- end;
-end;
-
-procedure TfrmGYSList.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmGYSList.v1Column16PropertiesChange(Sender: TObject);
-var
- mvalue:String;
-begin
- mvalue:=TcxComboBox(Sender).EditText;
- with Order_Main do
- begin
- Edit;
- FieldByName('FZPerson').Value:=Trim(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update ZH_KH_Info Set FZPerson='''+Trim(mvalue)+'''');
- SQL.Add(' where ZKID='''+Trim(Order_Main.fieldbyname('ZKID').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmGYSList.Tv1MouseDown(Sender: TObject; Button: TMouseButton;
- Shift: TShiftState; X, Y: Integer);
-var
- fsj:string;
-begin
- fsj:='select distinct(FZPerson) Name ,Code='''' from ZH_KH_Info where Type=''GYS''';
- SInitCxGridComboBoxBySql(ADOQueryCmd,v1Column16,fsj,0,True,'');
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSSelList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSSelList.dfm
deleted file mode 100644
index d5bfa53..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSSelList.dfm
+++ /dev/null
@@ -1,304 +0,0 @@
-object frmGYSSelList: TfrmGYSSelList
- Left = 206
- Top = 98
- Width = 906
- Height = 606
- Caption = #20379#24212#21830#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 890
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 99
- Width = 890
- Height = 468
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 1
- object Tv1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellDblClick = Tv1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Header = DataLink_DDMD.Default
- object v1Column2: TcxGridDBColumn
- Caption = #20379#24212#21830#32534#21495
- DataBinding.FieldName = 'KHCode'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 117
- end
- object v1Column7: TcxGridDBColumn
- Caption = #20379#24212#21830#20840#31216
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 88
- end
- object v1Column6: TcxGridDBColumn
- Caption = #20379#24212#21830#31616#31216
- DataBinding.FieldName = 'KHNameJC'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 139
- end
- object v1Column1: TcxGridDBColumn
- Caption = #20379#24212#21830#31867#22411
- DataBinding.FieldName = 'KHType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 81
- end
- object v1Column4: TcxGridDBColumn
- Caption = #32479#35745#21333#20301#21517#31216
- DataBinding.FieldName = 'TJKHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 102
- end
- object v1Column9: TcxGridDBColumn
- Caption = #30005#35805
- DataBinding.FieldName = 'ZKTelNo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 96
- end
- object v1Column10: TcxGridDBColumn
- Caption = #20256#30495
- DataBinding.FieldName = 'ZKFax'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 89
- end
- object v1Column11: TcxGridDBColumn
- Caption = #22320#22336
- DataBinding.FieldName = 'ZKAddress'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 112
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 890
- Height = 67
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 2
- object Label9: TLabel
- Left = 27
- Top = 15
- Width = 65
- Height = 12
- Caption = #20379#24212#21830#31616#31216
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 27
- Top = 39
- Width = 65
- Height = 12
- Caption = #20379#24212#21830#32534#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label34: TLabel
- Left = 261
- Top = 15
- Width = 65
- Height = 12
- Caption = #20379#24212#21830#31867#22411
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 253
- Top = 39
- Width = 78
- Height = 12
- Caption = #32479#35745#21333#20301#21517#31216
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object KHNameJC: TEdit
- Tag = 2
- Left = 94
- Top = 11
- Width = 125
- Height = 20
- TabOrder = 0
- OnChange = CustomerNoNameChange
- end
- object KHCode: TEdit
- Tag = 2
- Left = 94
- Top = 35
- Width = 125
- Height = 20
- TabOrder = 1
- OnChange = CustomerNoNameChange
- end
- object KHType: TEdit
- Tag = 2
- Left = 332
- Top = 11
- Width = 125
- Height = 20
- TabOrder = 2
- OnChange = CustomerNoNameChange
- end
- object TJKHName: TEdit
- Tag = 2
- Left = 332
- Top = 35
- Width = 125
- Height = 20
- TabOrder = 3
- OnChange = CustomerNoNameChange
- end
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 464
- Top = 160
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 432
- Top = 200
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 392
- Top = 200
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 304
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = Order_Main
- Left = 352
- Top = 160
- end
- object Order_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 416
- Top = 160
- end
- object PopupMenu1: TPopupMenu
- Left = 304
- Top = 192
- object N2: TMenuItem
- Caption = #20840#36873
- OnClick = N2Click
- end
- object N1: TMenuItem
- Caption = #20840#24323
- OnClick = N1Click
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSSelList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSSelList.pas
deleted file mode 100644
index 5bcec87..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GYSSelList.pas
+++ /dev/null
@@ -1,221 +0,0 @@
-unit U_GYSSelList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData,
- cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ADODB,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridCustomTableView, cxGridTableView,
- cxGridDBTableView, cxGrid, DBClient, cxCheckBox, cxCalendar, cxSplitter,
- RM_Dataset, RM_System, RM_Common, RM_Class, RM_GridReport, RM_e_Xls,
- Menus, cxButtonEdit, cxDropDownEdit;
-
-type
- TfrmGYSSelList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- Tv1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- cxGridPopupMenu1: TcxGridPopupMenu;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- Order_Main: TClientDataSet;
- ToolButton1: TToolButton;
- Panel1: TPanel;
- Label9: TLabel;
- KHNameJC: TEdit;
- v1Column2: TcxGridDBColumn;
- v1Column6: TcxGridDBColumn;
- Label2: TLabel;
- KHCode: TEdit;
- v1Column1: TcxGridDBColumn;
- Label34: TLabel;
- v1Column7: TcxGridDBColumn;
- v1Column9: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- KHType: TEdit;
- v1Column4: TcxGridDBColumn;
- Label1: TLabel;
- TJKHName: TEdit;
- PopupMenu1: TPopupMenu;
- N2: TMenuItem;
- N1: TMenuItem;
- TBFind: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure CheckBox1Click(Sender: TObject);
- procedure CheckBox2Click(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure CustomerNoNameChange(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure Tv1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- private
- canshu1:string;
- DQdate:TDateTime;
- procedure InitGrid();
- procedure InitForm();
- function DelData():Boolean;
- { Private declarations }
- public
- FFInt,FCloth:Integer;
-
- { Public declarations }
- end;
-
-var
- frmGYSSelList: TfrmGYSSelList;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_ZDYHelp, U_GYSInPutTab, U_ZDYHelpSel;
-
-{$R *.dfm}
-
-procedure TfrmGYSSelList.FormDestroy(Sender: TObject);
-begin
- frmGYSSelList:=nil;
-end;
-
-procedure TfrmGYSSelList.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmGYSSelList.FormCreate(Sender: TObject);
-begin
- cxgrid1.Align:=alClient;
-end;
-
-procedure TfrmGYSSelList.TBCloseClick(Sender: TObject);
-begin
- Close;
- WriteCxGrid('Ӧ̵Ǽ',Tv1,'Ӧ̹');
-
-end;
-
-procedure TfrmGYSSelList.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from ZH_KH_Info A ');
- sql.Add(' where Type=''GYS'' ');
- sql.Add(' and Valid=''Y'' ');
- Open;
- end;
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-
-procedure TfrmGYSSelList.InitForm();
-begin
- ReadCxGrid('Ӧ̵Ǽ',Tv1,'Ӧ̹');
- InitGrid();
-end;
-
-procedure TfrmGYSSelList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active=False then Exit;
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
-end;
-
-function TfrmGYSSelList.DelData():Boolean;
-begin
- try
- Result:=false;
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update ZH_KH_Info Set Valid=''N'' where ZKId='''+Trim(Order_Main.fieldbyname('ZKId').AsString)+'''');
- ExecSQL;
- end;
-
- ADOQueryCmd.Connection.CommitTrans;
- Result:=True;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Result:=False;
- Application.MessageBox('ɾ쳣','ʾ',0);
- end;
-end;
-
-procedure TfrmGYSSelList.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmGYSSelList.FormShow(Sender: TObject);
-begin
- InitForm();
-end;
-
-procedure TfrmGYSSelList.CheckBox1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmGYSSelList.CheckBox2Click(Sender: TObject);
-begin
- TBRafresh.Click;
-end;
-
-procedure TfrmGYSSelList.ToolButton1Click(Sender: TObject);
-begin
- ModalResult:=1;
-end;
-
-procedure TfrmGYSSelList.CustomerNoNameChange(Sender: TObject);
-begin
- if ADOQueryMain.Active=False then Exit;
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,Order_Main);
- SInitCDSData20(ADOQueryMain,Order_Main);
-end;
-
-procedure TfrmGYSSelList.N2Click(Sender: TObject);
-begin
- SelOKNo(Order_Main,True);
-end;
-
-procedure TfrmGYSSelList.N1Click(Sender: TObject);
-begin
- SelOKNo(Order_Main,False);
-end;
-
-procedure TfrmGYSSelList.Tv1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- ModalResult:=1;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GetDllForm.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GetDllForm.pas
deleted file mode 100644
index bfcc14e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_GetDllForm.pas
+++ /dev/null
@@ -1,904 +0,0 @@
-unit U_GetDllForm;
-
-interface
-
-uses
- Windows, Messages, forms, OleCtnrs, DateUtils, SysUtils, ADODB, Dxcore,
- activex;
-
-function GetDllForm(App: Tapplication; FormH: hwnd; FormID: integer; Language: integer; WinStyle: integer; GCode: Pchar; GName: Pchar; DataBase: Pchar; Title: PChar; Parameters1: PChar; Parameters2: PChar; Parameters3: PChar; Parameters4: PChar; Parameters5: PChar; Parameters6: PChar; Parameters7: PChar; Parameters8: PChar; Parameters9: PChar; Parameters10: PChar; DataBaseStr: PChar): hwnd; export; stdcall;
-
-function ConnData(): Boolean;
-
-implementation
-
-uses
- U_DataLink, U_BaoGuanList, U_BaoGuanListZXD, U_BaoGuanXSList, U_BaoGuanCRKCX,
- U_ContractDCList, U_ContractDCListChk, U_CHList, U_BaoGuanListQR, U_YFGLList,
- U_JHDMAKELIST, U_XYZMAKELIST, U_CHHZList, U_GJKDList, U_JDDATEManage,
- U_XSQKList;
-
-var
- frmBaoGuanList, frmBaoGuanListGQX, frmBaoGuanListCXGQX, frmBaoGuanListZL: TfrmBaoGuanList;
- frmBaoGuanListHT, frmBaoGuanListFP, frmBaoGuanListZXD, frmBaoGuanListBGD: TfrmBaoGuanList;
- frmBaoGuanListSBYS, frmBaoGuanListHD, frmBaoGuanListSH, frmBaoGuanListDJ: TfrmBaoGuanList;
- frmContractDCListLR, frmContractDCListGL, frmContractDCListZZ, frmContractDCListQR: TfrmContractDCList;
- frmCHList, frmCHGLList: TfrmCHList;
- frmCHhzList: TfrmCHhzList;
- frmYFGLList, frmYFCXList: TfrmYFGLList;
- frmBaoGuanListQR: TfrmBaoGuanListQR;
- frmJHDMAKEList: TfrmJHDMAKEList; //㵥
- frmxyzMAKEList: TfrmxyzMAKEList; //֤
- frmGJKDList: TfrmGJKDList;
- frmXSQKLLIST: tfrmXSQKLLIST;
- /////////////////////////////////////////////////////////////////
- // ˵:ȡDllеô //
- // ˵App>>Ӧó //
- // FormH>>ôھ //
- // FormID>>ں; //
- // Language>>; //
- // WinStyle>>ͣ //
-/////////////////////////////////////////////////////////////////
-
-function GetDllForm(App: Tapplication; FormH: hwnd; FormID: integer; Language: integer; WinStyle: integer; GCode: Pchar; GName: Pchar; DataBase: Pchar; Title: PChar; Parameters1: PChar; Parameters2: PChar; Parameters3: PChar; Parameters4: PChar; Parameters5: PChar; Parameters6: PChar; Parameters7: PChar; Parameters8: PChar; Parameters9: PChar; Parameters10: PChar; DataBaseStr: PChar): hwnd;
-var
- i: Integer;
- bFound: Boolean;
- mnewHandle: hwnd;
- mstyle: TFormStyle; // 0:Ӵ; 1ͨ
- mstate: TWindowState;
- mborderstyle: TFormBorderStyle;
-begin
- mnewHandle := 0;
- DName := PChar(GName);
- DCode := PChar(GCode);
- DdataBase := DataBase;
- DTitCaption := Title;
- DParameters1 := Parameters1;
- DParameters2 := Parameters2;
- DParameters3 := Parameters3;
- DParameters4 := Parameters4;
- DParameters5 := Parameters5;
- DParameters6 := Parameters6;
- DParameters7 := Parameters7;
- DParameters8 := Parameters8;
- DParameters9 := Parameters9;
- DParameters10 := Parameters10;
-
- MainApplication := App;
- DCurHandle := FormH;
- IsDelphiLanguage := Language;
-
- Application := TApplication(App);
- DCurHandle := 0;
-
-
- //ֵַ
- SetLength(server, 255);
- SetLength(dtbase, 255);
- SetLength(user, 255);
- SetLength(pswd, 255);
-
- server := '47.100.130.130,7781';
-// server := '.';
- dtbase := 'zhenyongdata';
- user := 'zhenyongsa';
- pswd := 'rightsoft@9101';
-// pswd := 'rightsoft';
- DConString := 'Provider=SQLOLEDB.1;Password=' + pswd + ';Persist Security Info=True;User ID=' + user + ';Initial Catalog=' + dtbase + ';Data Source=' + server;
- DConString := DataBaseStr;
-// DName:='˾';
- //DParameters1:='Ȩ';
- //DParameters2:='';
- if not ConnData() then
- begin
- result := 0;
- exit;
- end;
-
- // 崰 ״̬
- if WinStyle = 0 then
- begin
- mstyle := fsMDIChild;
- mstate := wsMaximized;
- mborderstyle := bsSizeable;
- end
- else
- begin
- mstyle := fsNormal;
- mstate := wsNormal;
- mborderstyle := bsSizeable;
- end;
- //Title:='ع';
- /////////////////////
- //ģ鴰
- case FormID of
- 211: //ָʾ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ָʾ' then
- begin
- BringWindowToTop(frmContractDCListLR.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- begin
- frmContractDCListLR := TfrmContractDCList.Create(application.MainForm);
- with frmContractDCListLR do
- begin
- canshu1 := '¼';
- Title := 'ָʾ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmContractDCListLR.BringToFront;
- //
- mnewHandle := frmContractDCListLR.Handle;
- end;
-
- 212: //ָʾ(鳤)
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ָʾ(鳤)' then
- begin
- BringWindowToTop(frmContractDCListZZ.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- begin
- frmContractDCListZZ := tfrmContractDCList.Create(application.MainForm);
- with frmContractDCListZZ do
- begin
- canshu1 := '¼';
- canshu2 := '鳤';
- Title := 'ָʾ(鳤)';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmContractDCListZZ.BringToFront;
- //
- mnewHandle := frmContractDCListZZ.Handle;
- end;
-
- 221: //ָʾ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ָʾ' then
- begin
- BringWindowToTop(frmContractDCListGL.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- begin
- frmContractDCListGL := TfrmContractDCList.Create(application.MainForm);
- with frmContractDCListGL do
- begin
- canshu1 := '';
- Title := 'ָʾ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmContractDCListGL.BringToFront;
- //
- mnewHandle := frmContractDCListGL.Handle;
- end;
-
- 223: //ָʾȷ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ָʾȷ' then
- begin
- BringWindowToTop(frmContractDCListQR.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- begin
- frmContractDCListQR := TfrmContractDCList.Create(application.MainForm);
- with frmContractDCListQR do
- begin
- canshu1 := 'ȷ';
- Title := 'ָʾȷ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmContractDCListQR.BringToFront;
- //
- mnewHandle := frmContractDCListQR.Handle;
- end;
-
-
-
-// 211: //ָʾ
-// begin
-// if frmContractDCList = nil then
-// begin
-// frmContractDCList := TfrmContractDCList.Create(application.MainForm);
-// with frmContractDCList do
-// begin
-// caption := Trim(Title);
-// FormStyle := mstyle;
-// windowState := mstate;
-// BorderStyle := mborderstyle;
-// //show;
-// end;
-// end
-// else
-// frmContractDCList.BringToFront;
-// //
-// mnewHandle := frmContractDCList.Handle;
-//
-// end;
-// 221: //ָʾ
-// begin
-// if frmContractDCListChk = nil then
-// begin
-// frmContractDCListChk := TfrmContractDCListChk.Create(application.MainForm);
-// with frmContractDCListChk do
-// begin
-// caption := Trim(Title);
-// FormStyle := mstyle;
-// windowState := mstate;
-// BorderStyle := mborderstyle;
-// //show;
-// end;
-// end
-// else
-// frmContractDCListChk.BringToFront;
-// //
-// mnewHandle := frmContractDCListChk.Handle;
-//
-// end;
- 11: //嵥
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '嵥' then
- begin
- BringWindowToTop(frmCHList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmCHList := TfrmCHList.Create(application.MainForm);
- with frmCHList do
- begin
- Title := '嵥';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmCHList.BringToFront;
- //
- mnewHandle := frmCHList.Handle;
- end;
-
- 111: //Ʊȷ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'Ʊȷ' then
- begin
- BringWindowToTop(frmCHGLList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmCHGLList := TfrmCHList.Create(application.MainForm);
- with frmCHGLList do
- begin
- Title := 'Ʊȷ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmCHGLList.BringToFront;
- //
- mnewHandle := frmCHGLList.Handle;
- end;
- 12: //˷ѹ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '˷ѹ' then
- begin
- BringWindowToTop(frmYFGLList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmYFGLList := TfrmYFGLList.Create(application.MainForm);
- with frmYFGLList do
- begin
- Title := '˷ѹ';
- canshu1 := '';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmYFGLList.BringToFront;
- //
- mnewHandle := frmYFGLList.Handle;
- end;
-
- 121: //˷Ѳѯ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '˷Ѳѯ' then
- begin
- BringWindowToTop(frmYFCXList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmYFCXList := TfrmYFGLList.Create(application.MainForm);
- with frmYFCXList do
- begin
- Title := '˷Ѳѯ';
- canshu1 := 'ѯ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmYFCXList.BringToFront;
- //
- mnewHandle := frmYFCXList.Handle;
- end;
-
- 13: //嵥
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '嵥' then
- begin
- BringWindowToTop(frmCHhzList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmCHhzList := TfrmCHhzList.Create(application.MainForm);
- with frmCHhzList do
- begin
- Title := '嵥';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmCHhzList.BringToFront;
- //
- mnewHandle := frmCHhzList.Handle;
- end;
- 131: //
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '嵥' then
- begin
- BringWindowToTop(frmXSQKLLIST.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmXSQKLLIST := TfrmXSQKLLIST.Create(application.MainForm);
- with frmXSQKLLIST do
- begin
- Title := '';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmXSQKLLIST.BringToFront;
- //
- mnewHandle := frmXSQKLLIST.Handle;
- end;
-
- 14: //ʿ
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ʿ' then
- begin
- BringWindowToTop(frmGJKDList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmGJKDList := TfrmGJKDList.Create(application.MainForm);
- with frmGJKDList do
- begin
- Title := 'ʿ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmGJKDList.BringToFront;
- //
- mnewHandle := frmGJKDList.Handle;
- end;
- -1: //¼
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '¼' then
- begin
- BringWindowToTop(frmBaoGuanList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmBaoGuanList := TfrmBaoGuanList.Create(application.MainForm);
- with frmBaoGuanList do
- begin
- Title := '¼';
- canshu3 := 'ҵԱ';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanList.BringToFront;
- //
- mnewHandle := frmBaoGuanList.Handle;
- end;
- -2: //¼(Ȩ)
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '¼(Ȩ)' then
- begin
- BringWindowToTop(frmBaoGuanListGQX.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmBaoGuanListGQX := TfrmBaoGuanList.Create(application.MainForm);
- with frmBaoGuanListGQX do
- begin
- Title := '¼(Ȩ)';
-
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanListGQX.BringToFront;
- //
- mnewHandle := frmBaoGuanListGQX.Handle;
- end;
-
- -7: //
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '' then
- begin
- BringWindowToTop(frmBaoGuanListQR.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanListSBYS=nil then
- begin
- frmBaoGuanListQR := TfrmBaoGuanListQR.Create(application.MainForm);
- with frmBaoGuanListQR do
- begin
- Title := '';
- canshu3 := '֤';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanListQR.BringToFront;
- //
- mnewHandle := frmBaoGuanListQR.Handle;
- end;
- -5: //ϲѯ(Ȩ)
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ϲѯ(Ȩ)' then
- begin
- BringWindowToTop(frmBaoGuanListCXGQX.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanListBGZL=nil then
- begin
- frmBaoGuanListCXGQX := TfrmBaoGuanList.Create(application.MainForm);
- with frmBaoGuanListCXGQX do
- begin
- Title := 'ϲѯ(Ȩ)';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanListCXGQX.BringToFront;
- //
- mnewHandle := frmBaoGuanListCXGQX.Handle;
- end;
- -6: //
- begin
- if frmBaoGuanXSList = nil then
- begin
- frmBaoGuanXSList := TfrmBaoGuanXSList.Create(application.MainForm);
- with frmBaoGuanXSList do
- begin
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanXSList.BringToFront;
- //
- mnewHandle := frmBaoGuanXSList.Handle;
- end;
-
- 1: //ع()
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'ع' then
- begin
- BringWindowToTop(frmBaoGuanListDJ.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanList=nil then
- begin
- frmBaoGuanListDJ := TfrmBaoGuanList.Create(application.MainForm);
- with frmBaoGuanListDJ do
- begin
- Title := 'ع';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanListDJ.BringToFront;
- //
- mnewHandle := frmBaoGuanListDJ.Handle;
- end;
-
- 2: //سѯ
- begin
- if frmBaoGuanCRKCX = nil then
- begin
- frmBaoGuanCRKCX := TfrmBaoGuanCRKCX.Create(application.MainForm);
- with frmBaoGuanCRKCX do
- begin
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanCRKCX.BringToFront;
- //
- mnewHandle := frmBaoGuanCRKCX.Handle;
- end;
- -3: //Ϻ˶
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = 'Ϻ˶' then
- begin
- BringWindowToTop(frmBaoGuanListHD.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanListSBYS=nil then
- begin
- frmBaoGuanListHD := TfrmBaoGuanList.Create(application.MainForm);
- with frmBaoGuanListHD do
- begin
- Title := 'Ϻ˶';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanListHD.BringToFront;
- //
- mnewHandle := frmBaoGuanListHD.Handle;
- end;
- -4: //
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '' then
- begin
- BringWindowToTop(frmBaoGuanListSH.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanListSBYS=nil then
- begin
- frmBaoGuanListSH := TfrmBaoGuanList.Create(application.MainForm);
- with frmBaoGuanListSH do
- begin
- Title := '';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmBaoGuanListSH.BringToFront;
- //
- mnewHandle := frmBaoGuanListSH.Handle;
- end;
-
- 44: //㵥
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '㵥' then
- begin
- BringWindowToTop(frmJHDMAKEList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanListSBYS=nil then
- begin
- frmJHDMAKEList := TfrmJHDMAKEList.Create(application.MainForm);
- with frmJHDMAKEList do
- begin
- Title := '㵥';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmJHDMAKEList.BringToFront;
- //
- mnewHandle := frmJHDMAKEList.Handle;
- end;
-
- 51: //֤
- begin
- bFound := FALSE;
- for i := (App.MainForm.MDIChildCount - 1) downto 0 do
- begin
- if App.MainForm.MDIChildren[i].Caption = '֤' then
- begin
- BringWindowToTop(frmxyzMAKEList.Handle);
- bFound := TRUE;
- Break;
- end;
- end;
- if not bFound then
- //if frmBaoGuanListSBYS=nil then
- begin
- frmxyzMAKEList := TfrmxyzMAKEList.Create(application.MainForm);
- with frmxyzMAKEList do
- begin
- Title := '֤';
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmxyzMAKEList.BringToFront;
- //
- mnewHandle := frmxyzMAKEList.Handle;
- end;
-
- 99: //ڹ
- begin
- if frmjddateManage = nil then
- begin
- frmjddateManage := TfrmjddateManage.Create(application.MainForm);
- with frmjddateManage do
- begin
- caption := Trim(Title);
- FormStyle := mstyle;
- windowState := mstate;
- BorderStyle := mborderstyle;
- //show;
- end;
- end
- else
- frmjddateManage.BringToFront;
- //
- mnewHandle := frmjddateManage.Handle;
- end;
- end; // end case
-
- Result := mnewHandle;
-// NewDllApp := Application;
-end;
-//===========================================================
- //ݿӳ
-//===========================================================
-
-function ConnData(): Boolean;
-begin
- if not Assigned(DataLink_DDMD) then
- DataLink_DDMD := TDataLink_DDMD.Create(Application);
- try
- with DataLink_DDMD.ADOLink do
- begin
- //if not Connected then
- begin
- Connected := false;
- ConnectionString := DConString;
- LoginPrompt := false;
- Connected := true;
- end;
- end;
- Result := true;
- except
- Result := false;
- application.MessageBox('ݿʧܣ', '', mb_Ok + MB_ICONERROR);
- end;
-
-end;
-
-initialization
- CoInitialize(nil);
- dxUnitsLoader.Initialize;
-
-
-finalization
- DataLink_DDMD.Free;
- application := NewDllApp;
- dxUnitsLoader.Finalize;
-//initialization
-// OldDllApp := Application;
-//
-//finalization
-// DataLink_DDMD.Free;
-// Application := OldDllApp;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JDDATEManage.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JDDATEManage.dfm
deleted file mode 100644
index fcc1a2e..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JDDATEManage.dfm
+++ /dev/null
@@ -1,228 +0,0 @@
-object frmjddateManage: TfrmjddateManage
- Left = 297
- Top = 109
- Width = 1123
- Height = 706
- Caption = #25910#27719#26041#24335#31649#29702
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1107
- Height = 31
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object ToolButton4: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #22686#34892
- ImageIndex = 57
- OnClick = ToolButton4Click
- end
- object ToolButton5: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 113
- OnClick = ToolButton5Click
- end
- object TBClose: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 31
- Width = 1107
- Height = 636
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 1
- object Tv1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- Navigator.Buttons.Delete.Enabled = False
- Navigator.Buttons.Delete.Visible = False
- DataController.DataSource = DS_HZ
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Header = DataLink_DDMD.Default
- object v2Column12: TcxGridDBColumn
- Caption = ' '#25910' '#27719' '#26041' '#24335' '
- DataBinding.FieldName = 'ZDYNAME'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v2Column8PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 419
- end
- object Tv1Column1: TcxGridDBColumn
- Caption = #22825#25968
- DataBinding.FieldName = 'note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 96
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv1
- end
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 299
- Top = 210
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 261
- Top = 209
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 229
- Top = 209
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- ShowPrintDialog = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDB_Main
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 355
- Top = 344
- ReportData = {}
- end
- object RMDB_Main: TRMDBDataSet
- Visible = True
- DataSet = ADOQueryPrt
- Left = 289
- Top = 343
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 520
- Top = 264
- end
- object DS_HZ: TDataSource
- DataSet = CDS_HZ
- Left = 283
- Top = 259
- end
- object CDS_HZ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 384
- Top = 208
- end
- object PopupMenu1: TPopupMenu
- Left = 192
- Top = 240
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object RMXLSExport2: TRMXLSExport
- ShowAfterExport = False
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 420
- Top = 344
- end
- object ADOQueryPrt: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 230
- Top = 345
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JDDATEManage.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JDDATEManage.pas
deleted file mode 100644
index dbab5f0..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JDDATEManage.pas
+++ /dev/null
@@ -1,599 +0,0 @@
-unit U_JDDATEManage;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxGraphics, cxCustomData, cxStyles, cxTL, cxMaskEdit, DB, ADODB,
- cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin, StdCtrls,
- cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, DBClient,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, ExtCtrls,
- cxSplitter, cxGridLevel, cxClasses, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_Common,
- RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
- IdTCPClient, IdFTP, ShellAPI, IniFiles, cxCheckBox, cxCalendar, cxButtonEdit,
- cxTextEdit, cxPC, cxCheckComboBox, cxDropDownEdit, Menus, RM_e_Xls, TeEngine,
- Series, TeeProcs, Chart, DbChart, cxLookAndFeels, cxLookAndFeelPainters,
- cxNavigator;
-
-type
- TfrmjddateManage = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- RM1: TRMGridReport;
- RMDB_Main: TRMDBDataSet;
- cxGrid2: TcxGrid;
- Tv1: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DS_HZ: TDataSource;
- CDS_HZ: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- RMXLSExport2: TRMXLSExport;
- v2Column12: TcxGridDBColumn;
- ADOQueryPrt: TADOQuery;
- ToolButton4: TToolButton;
- ToolButton5: TToolButton;
- Tv1Column1: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
-// procedure ToolButton1Click(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
-// procedure CustomerChange(Sender: TObject);
- procedure FormCreate(Sender: TObject);
- procedure v2Column8PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure ToolButton5Click(Sender: TObject);
- procedure Tv1Column1PropertiesEditValueChanged(Sender: TObject);
- private
- { Private declarations }
- procedure PrintReport(FZDYNo: string);
- procedure InitGrid();
- public
- fFlag: integer;
- { Public declarations }
- RKFlag, FCYID, fmanage: string;
- end;
-
-var
- frmjddateManage: TfrmjddateManage;
-
-implementation
-
-uses
- U_DataLink, U_Fun, U_ZDYHelp;
-
-{$R *.dfm}
-
-procedure TfrmjddateManage.PrintReport(FZDYNo: string);
-var
- fPrintFile, FFCYID: string;
- i, j: Integer;
- Txt, fImagePath: string;
- Moudle: THandle;
- Makebar: TMakebar;
- Mixtext: TMixtext;
-begin
- if CDS_HZ.IsEmpty then
- Exit;
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\̨ǩ.rmf';
- with ADOQueryPrt do
- begin
- close;
- sql.Clear;
- sql.Add(' select * from Machine where MCNO=''' + Trim(FZDYNo) + '''');
- open;
- end;
- try
- Moudle := LoadLibrary('MakeQRBarcode.dll');
- @Makebar := GetProcAddress(Moudle, 'Make');
- @Mixtext := GetProcAddress(Moudle, 'MixText');
- Txt := Trim(FZDYNo);
- fImagePath := ExtractFilePath(Application.ExeName) + 'image\temp.bmp';
- if not DirectoryExists(pchar(ExtractFilePath(Application.ExeName) + 'image')) then
- CreateDirectory(pchar(ExtractFilePath(Application.ExeName) + 'image'), nil);
- if FileExists(fImagePath) then
- DeleteFile(fImagePath);
- Makebar(pchar(Txt), Length(Txt), 3, 3, 0, PChar(fImagePath), 3);
- except
- CDS_HZ.EnableControls;
- application.MessageBox('ʧܣ', 'ʾϢ', MB_ICONERROR);
- exit;
- end;
- RMVariables['QRBARCODE'] := fImagePath;
- if FileExists(fPrintFile) then
- begin
- RM1.LoadFromFile(fPrintFile);
- RM1.PrintReport;
- // RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + fPrintFile + '!'), 'ʾ', 0);
- Exit;
- end;
-end;
-
-procedure TfrmjddateManage.InitGrid();
-begin
- try
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('update t1 set t1.ZdyFlt1 = t.rn from KH_ZDY t1');
- sql.Add('join (select *,rn = ROW_NUMBER() OVER(ORDER BY ZdyFlt1) from KH_ZDY where TYPE=''shfs'')t on t1.zdyno = t.zdyno');
- sql.Add('WHERE t1.TYPE=''shfs'' ');
- execsql;
- end;
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- SQL.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type=''SHFS''');
- SQL.Add('ORDER BY ZdyFlt1');
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_HZ);
- SInitCDSData20(ADOQueryMain, CDS_HZ);
- finally
- ADOQueryMain.EnableControls;
-
- end;
-end;
-
-procedure TfrmjddateManage.FormDestroy(Sender: TObject);
-begin
- frmjddateManage := nil;
-end;
-
-procedure TfrmjddateManage.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmjddateManage.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid(Trim(Self.Caption), Tv1, 'ڹ');
- Close;
-end;
-
-procedure TfrmjddateManage.FormShow(Sender: TObject);
-begin
- ReadCxGrid(Trim(Self.Caption), Tv1, 'ڹ');
-// Enddate.DateTime:=SGetServerDate(ADOQueryTemp);
-// begdate.DateTime:=Enddate.DateTime-30;
- InitGrid();
-end;
-
-procedure TfrmjddateManage.TBRafreshClick(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmjddateManage.cxTabControl1Change(Sender: TObject);
-begin
- InitGrid;
-end;
-
-procedure TfrmjddateManage.N1Click(Sender: TObject);
-begin
- if CDS_HZ.IsEmpty then
- exit;
- with CDS_HZ do
- begin
- DisableControls;
- first;
- while not eof do
- begin
- edit;
- fieldbyname('ssel').Value := true;
- post;
- next;
- end;
- First;
- EnableControls;
- end;
-end;
-
-procedure TfrmjddateManage.N2Click(Sender: TObject);
-begin
- if CDS_HZ.IsEmpty then
- exit;
- with CDS_HZ do
- begin
- DisableControls;
- first;
- while not eof do
- begin
- edit;
- fieldbyname('ssel').Value := false;
- post;
- next;
- end;
- First;
- EnableControls;
- end;
-end;
-
-procedure TfrmjddateManage.FormCreate(Sender: TObject);
-begin
- fmanage := Trim(DParameters1);
-end;
-
-procedure TfrmjddateManage.v2Column8PropertiesEditValueChanged(Sender: TObject);
-var
- maxno, mvalue: string;
-begin
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with CDS_HZ do
- begin
- Edit;
- FieldByName('ZdyName').Value := Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
-
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(CDS_HZ.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(CDS_HZ.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type=''SHFS''');
-// if Trim(MainType) <> '' then
-// SQL.Add(' and MainType=''' + Trim(MainType) + '''');
- sql.Add(' and ZdyName=''' + Trim(CDS_HZ.fieldbyname('ZdyName').AsString) + '''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
-
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- if Trim(CDS_HZ.fieldbyname('ZdyNo').AsString) = '' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end
- else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(CDS_HZ.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
-// with ADOQueryCmd do
-// begin
-// Close;
-// sql.Clear;
-// SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
-// ExecSQL;
-// end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where ZDYNO=''' + Trim(CDS_HZ.fieldbyname('ZDYNO').AsString) + '''');
- Open;
- end;
- ADOQueryCmd.Edit;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := cds_hz.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value := Trim(cds_hz.fieldbyname('NOTE').AsString);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := 'SHFS';
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
-// if Trim(MainType) <> '' then
-// ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- CDS_HZ.Edit;
- CDS_HZ.FieldByName('ZDYNo').Value := Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-// mvalue := TcxTextEdit(Sender).EditingText;
-// if Trim(mvalue) = '' then
-// begin
-// //Application.MessageBox('ƲΪգ','ʾ',0);
-// Exit;
-// end;
-// with CDS_HZ do
-// begin
-// Edit;
-// FieldByName('ZdyName').Value := Trim(mvalue);
-// //Post;
-// end;
-//
-// try
-// ADOQueryCmd.Connection.BeginTrans;
-// with ADOQueryTemp do
-// begin
-// Close;
-// SQL.Clear;
-// SQL.Add('select * from KH_ZDY where ZdyNo=''SHFS''');
-// open;
-// end;
-// if ADOQueryTemp.IsEmpty then
-// begin
-// with ADOQueryCmd do
-// begin
-// close;
-// sql.Clear;
-// sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type) select :ZDYNo,:ZDYName,:Type ');
-// Parameters.ParamByName('ZDYNo').Value := 'SHFS';
-// Parameters.ParamByName('ZDYName').Value := 'ջ㷽ʽ';
-// Parameters.ParamByName('Type').Value := 'Main';
-//// Parameters.ParamByName('MainType').Value := Trim(MainType);
-// ExecSQL;
-// end;
-// end;
-// with ADOQueryCmd do
-// begin
-// //ClientDataSet1.DisableControls;
-// //with ClientDataSet1 do
-// //begin
-// //First;
-// //while not eof do
-// //begin
-// if Trim(CDS_HZ.FieldByName('ZDYNO').AsString) = '' then
-// begin
-// if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ȡʧܣ', 'ʾ', 0);
-// Exit;
-// end;
-// end
-// else
-// begin
-// maxno := Trim(CDS_HZ.fieldbyname('ZDYNo').AsString);
-// end;
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.add('select * from KH_Zdy where Type= ''SHFS''');
-//
-// sql.Add(' and ZdyName=''' + Trim(CDS_HZ.fieldbyname('ZdyName').AsString) + '''');
-// Open;
-// end;
-// if ADOQueryTemp.IsEmpty = False then
-// begin
-// if ADOQueryTemp.RecordCount > 1 then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-//
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ظ', 'ʾ', 0);
-// Exit;
-// end;
-// if Trim(CDS_HZ.fieldbyname('ZdyNo').AsString) = '' then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ظ', 'ʾ', 0);
-// Exit;
-// end
-// else
-// begin
-// if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(CDS_HZ.fieldbyname('ZdyNo').AsString) then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ظ', 'ʾ', 0);
-// Exit;
-// end;
-// end;
-// end;
-// with ADOQueryCmd do
-// begin
-// Close;
-// sql.Clear;
-// SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(CDS_HZ.fieldbyname('ZDYNO').AsString) + '''');
-// ExecSQL;
-// end;
-// with ADOQueryCmd do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('select * from KH_ZDY where 1<>1');
-// Open;
-// end;
-// ADOQueryCmd.Append;
-// ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
-// ADOQueryCmd.FieldByName('ZDYName').Value := CDS_HZ.fieldbyname('ZDYName').AsString;
-//// ADOQueryCmd.FieldByName('note').Value := Trim(snote);
-// //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
-// ADOQueryCmd.FieldByName('Type').Value := 'SHFS';
-// ADOQueryCmd.FieldByName('valid').Value := 'Y';
-//// if Trim(MainType) <> '' then
-//// ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
-// //ADOQueryCmd.FieldByName('sel').Value:=0;
-// ADOQueryCmd.Post;
-// CDS_HZ.Edit;
-// CDS_HZ.FieldByName('ZDYNo').Value := Trim(maxno);
-// //ClientDataSet1.Post;
-// // Next;
-// //end;
-// //end;
-// // ClientDataSet1.EnableControls;
-// end;
-// ADOQueryCmd.Connection.CommitTrans;
-// //Application.MessageBox('ɹ','ʾ',0);
-// //TV1.OptionsData.Editing:=False;
-// //TV1.OptionsSelection.CellSelect:=False;
-// except
-// ADOQueryCmd.Connection.RollbackTrans;
-// Application.MessageBox('ʧܣ', 'ʾ', 0);
-// end;
-end;
-
-procedure TfrmjddateManage.ToolButton3Click(Sender: TObject);
-begin
- PrintReport(Trim(CDS_HZ.fieldbyname('MCNO').AsString));
-end;
-
-procedure TfrmjddateManage.ToolButton4Click(Sender: TObject);
-var
- i: Integer;
- maxno: string;
- fxh: Double;
-begin
-
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
-// for i := 0 to 5 do
-// begin
-// with CDS_HZ do
-// begin
-// Append;
-// Post;
-// end;
-// end;
- fxh := CDS_HZ.fieldbyname('ZdyFlt1').Value;
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
-// ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
-
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,ZdyFlt1) select :ZDYNo,:ZDYName,:Type,:ZdyFlt1 ');
- Parameters.ParamByName('ZDYNo').Value := Trim(maxno);
- Parameters.ParamByName('ZDYName').Value := '';
-
- Parameters.ParamByName('Type').Value := 'shfs';
-// Parameters.ParamByName('MainType').Value := Trim(MainType);
- Parameters.ParamByName('ZdyFlt1').Value := fxh + 0.1;
-
-// ADOQueryCmd.FieldByName('valid').Value := 'Y';
- ExecSQL;
- end;
- InitGrid();
- CDS_HZ.locate('ZdyFlt1', fxh, []);
- CDS_HZ.Next;
-end;
-
-procedure TfrmjddateManage.ToolButton5Click(Sender: TObject);
-begin
- if CDS_HZ.IsEmpty then
- Exit;
- if (Trim(CDS_HZ.FieldByName('ZDYNo').AsString) <> '') or (Trim(CDS_HZ.FieldByName('ZDYname').AsString) <> '') then
- begin
- if application.MessageBox('ȷҪɾ?', 'ʾϢ', 1) = 2 then
- exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo=''' + Trim(CDS_HZ.fieldbyname('ZDYNo').AsString) + '''');
- SQL.Add(' and Type=''SHFS''');
- ExecSQL;
- end;
- end;
- CDS_HZ.Delete;
-end;
-
-procedure TfrmjddateManage.Tv1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(CDS_HZ.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_HZ do
- begin
- Edit;
- FieldByName('Note').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(CDS_HZ.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDInPut.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDInPut.dfm
deleted file mode 100644
index 931d581..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDInPut.dfm
+++ /dev/null
@@ -1,1769 +0,0 @@
-object frmJHDInPut: TfrmJHDInPut
- Left = 186
- Top = 51
- Width = 1264
- Height = 775
- Align = alClient
- Caption = #32467#27719#21333#24405#20837
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1256
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBSave: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 15
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 1256
- Height = 360
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Label13: TLabel
- Left = 17
- Top = 15
- Width = 72
- Height = 12
- Caption = #22806#38144#21457#31080#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 191
- Top = 13
- Width = 60
- Height = 12
- Caption = #23458#25143#21333#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label8: TLabel
- Left = 418
- Top = 40
- Width = 36
- Height = 12
- Caption = #35828#26126#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label9: TLabel
- Left = 394
- Top = 12
- Width = 60
- Height = 12
- Caption = #35746' '#33329' '#21333#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label15: TLabel
- Left = 29
- Top = 218
- Width = 60
- Height = 12
- Caption = #19994#21153#31867#22411#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label19: TLabel
- Left = 29
- Top = 73
- Width = 60
- Height = 12
- Caption = #36152#26131#22269#23478#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 53
- Top = 102
- Width = 36
- Height = 12
- Caption = #20844#21496#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label18: TLabel
- Left = 191
- Top = 222
- Width = 60
- Height = 12
- Caption = #24050#25910#23450#37329#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label22: TLabel
- Left = 17
- Top = 188
- Width = 72
- Height = 12
- Caption = #24555#36882#26679#21697#36153#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label30: TLabel
- Left = 191
- Top = 162
- Width = 60
- Height = 12
- Caption = #24320#31080#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label31: TLabel
- Left = 400
- Top = 96
- Width = 54
- Height = 12
- Caption = 'USD'#27719#29575#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 436
- Top = 215
- Width = 13
- Height = 24
- Caption = #21787#13#10#22836
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 741
- Top = 16
- Width = 52
- Height = 24
- Caption = #36135#29289#25551#36848#13#10
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 715
- Top = 217
- Width = 78
- Height = 12
- Caption = #20854#20182#27880#24847#20107#39033
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 29
- Top = 131
- Width = 60
- Height = 12
- Caption = #36816#36755#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label12: TLabel
- Left = 53
- Top = 160
- Width = 36
- Height = 12
- Caption = #33337#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label14: TLabel
- Left = 5
- Top = 246
- Width = 84
- Height = 12
- Caption = #20184#27454#26399#38480'('#22825')'#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label20: TLabel
- Left = 41
- Top = 275
- Width = 48
- Height = 12
- Caption = #20195#29702#21830#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label21: TLabel
- Left = 5
- Top = 304
- Width = 84
- Height = 12
- Caption = #20323#37329#25903#20184#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label24: TLabel
- Left = 24
- Top = 45
- Width = 60
- Height = 12
- Caption = #20215#26684#26465#27454#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label25: TLabel
- Left = 191
- Top = 73
- Width = 60
- Height = 12
- Caption = #25910#27719#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label26: TLabel
- Left = 191
- Top = 103
- Width = 60
- Height = 12
- Caption = #36152#26131#24065#31181#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label29: TLabel
- Left = 203
- Top = 132
- Width = 48
- Height = 12
- Caption = #35013#36816#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 418
- Top = 68
- Width = 36
- Height = 12
- Caption = #35828#26126#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label16: TLabel
- Left = 406
- Top = 124
- Width = 48
- Height = 12
- Caption = #30446#30340#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label28: TLabel
- Left = 418
- Top = 152
- Width = 36
- Height = 12
- Caption = #38134#34892#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label32: TLabel
- Left = 418
- Top = 180
- Width = 36
- Height = 12
- Caption = #20445#36153#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label33: TLabel
- Left = 754
- Top = 125
- Width = 39
- Height = 12
- Caption = #20184#27454#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 572
- Top = 12
- Width = 60
- Height = 12
- Caption = #20449#29992#35777#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- Visible = False
- end
- object Label10: TLabel
- Left = 584
- Top = 69
- Width = 48
- Height = 12
- Caption = #19994#21153#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label17: TLabel
- Left = 578
- Top = 97
- Width = 54
- Height = 12
- Caption = 'RMB'#27719#29575#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label34: TLabel
- Left = 584
- Top = 128
- Width = 48
- Height = 12
- Caption = #20013#36716#28207#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label35: TLabel
- Left = 596
- Top = 152
- Width = 36
- Height = 12
- Caption = #23458#25143#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label36: TLabel
- Left = 578
- Top = 180
- Width = 54
- Height = 12
- Caption = 'POB'#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label23: TLabel
- Left = 191
- Top = 43
- Width = 60
- Height = 12
- Caption = #31867' '#22411#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label37: TLabel
- Left = 191
- Top = 196
- Width = 60
- Height = 12
- Caption = #36816' '#36153#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label42: TLabel
- Left = 191
- Top = 247
- Width = 60
- Height = 12
- Caption = #21253#35013#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label43: TLabel
- Left = 191
- Top = 275
- Width = 60
- Height = 12
- Caption = #20132#21333#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label44: TLabel
- Left = 191
- Top = 303
- Width = 60
- Height = 12
- Caption = #33337#21517#33322#27425#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object A6PONO: TEdit
- Tag = 2
- Left = 252
- Top = 9
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 0
- end
- object SMA: TEdit
- Tag = 2
- Left = 457
- Top = 37
- Width = 272
- Height = 20
- TabOrder = 6
- end
- object DCNO: TBtnEditA
- Tag = 2
- Left = 457
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 1
- OnBtnClick = DCNOBtnClick
- end
- object TOCOUNTRY: TBtnEditA
- Tag = 1
- Left = 84
- Top = 69
- Width = 100
- Height = 20
- Hint = 'TOCOUNTRY/'#30446#30340#22269
- ReadOnly = True
- TabOrder = 2
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object BGTAITOU: TBtnEditA
- Tag = 2
- Left = 84
- Top = 98
- Width = 100
- Height = 20
- Hint = 'BGTT/'#20844#21496
- TabOrder = 3
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object F2YunFee: TEdit
- Tag = 1
- Left = 252
- Top = 189
- Width = 100
- Height = 20
- TabOrder = 4
- Text = '0'
- end
- object KDYPF: TEdit
- Tag = 1
- Left = 84
- Top = 184
- Width = 100
- Height = 20
- TabOrder = 5
- Text = '0'
- end
- object HTDate: TDateTimePicker
- Tag = 2
- Left = 252
- Top = 159
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 7
- end
- object ZhuMaiTou: TMemo
- Tag = 2
- Left = 457
- Top = 214
- Width = 252
- Height = 131
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 8
- end
- object SellNOTE: TMemo
- Tag = 2
- Left = 797
- Top = 11
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 9
- end
- object NOTE: TMemo
- Tag = 2
- Left = 797
- Top = 214
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 10
- end
- object YWLX: TComboBox
- Tag = 2
- Left = 84
- Top = 213
- Width = 100
- Height = 20
- ItemHeight = 12
- ItemIndex = 0
- TabOrder = 11
- Text = #22806#38144
- OnDropDown = YWLXDropDown
- Items.Strings = (
- #22806#38144
- #20869#38144)
- end
- object ZMXingZhi: TBtnEditA
- Tag = 2
- Left = 84
- Top = 127
- Width = 100
- Height = 20
- Hint = 'YSFS/'#36816#36755#26041#24335
- TabOrder = 12
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object chuandate: TDateTimePicker
- Tag = 9
- Left = 84
- Top = 156
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- ShowCheckbox = True
- TabOrder = 13
- end
- object DAYS: TEdit
- Tag = 1
- Left = 84
- Top = 242
- Width = 100
- Height = 20
- TabOrder = 14
- Text = '0'
- end
- object DLS: TBtnEditA
- Tag = 2
- Left = 84
- Top = 270
- Width = 100
- Height = 20
- Hint = 'DLS/'#20195#29702#21830
- TabOrder = 15
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object YJZFFS: TComboBox
- Tag = 2
- Left = 84
- Top = 300
- Width = 100
- Height = 20
- ItemHeight = 12
- TabOrder = 16
- OnDropDown = YWLXDropDown
- Items.Strings = (
- #26126#20323
- #26263#20323)
- end
- object JSBZ: TComboBox
- Tag = 2
- Left = 252
- Top = 99
- Width = 100
- Height = 20
- ItemHeight = 12
- TabOrder = 17
- OnDropDown = YWLXDropDown
- Items.Strings = (
- #32654#20803
- #20154#27665#24065)
- end
- object B6ChuYunGang: TBtnEditA
- Tag = 2
- Left = 252
- Top = 129
- Width = 100
- Height = 20
- Hint = 'LCFromPlace/'#35013#36816#28207
- TabOrder = 18
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object SMB: TEdit
- Tag = 1
- Left = 457
- Top = 66
- Width = 100
- Height = 20
- TabOrder = 19
- Text = '0'
- end
- object B7DaoHuoGang: TBtnEditA
- Tag = 2
- Left = 457
- Top = 123
- Width = 100
- Height = 20
- Hint = 'LCTOPlace/'#30446#30340#28207
- TabOrder = 20
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object ZUSDHLV: TEdit
- Tag = 1
- Left = 457
- Top = 95
- Width = 100
- Height = 20
- TabOrder = 21
- Text = '0'
- end
- object BANKNAME: TComboBox
- Tag = 2
- Left = 457
- Top = 152
- Width = 100
- Height = 20
- ItemHeight = 12
- TabOrder = 22
- OnDropDown = YWLXDropDown
- Items.Strings = (
- #20013#22269#38134#34892
- #24037#21830#38134#34892
- #24314#35774#38134#34892
- #20892#19994#38134#34892
- #25307#21830#38134#34892
- #21326#22799#38134#34892
- #20132#36890#38134#34892
- #20013#20449#38134#34892
- #28006#21457#38134#34892
- #20809#22823#38134#34892
- #24191#21457#38134#34892
- #27719#20016#38134#34892
- #31119#24314#20852#19994
- #21830#19994#38134#34892
- #29616#37329#25910#21462
- #20195#29702#20323#37329#20013#25187#38500
- #23458#20154#21033#28070#20013#25187#38500)
- end
- object F3BaoFee: TEdit
- Tag = 1
- Left = 457
- Top = 181
- Width = 100
- Height = 20
- TabOrder = 23
- Text = '0'
- end
- object FKR: TMemo
- Tag = 2
- Left = 799
- Top = 126
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 24
- end
- object XYNO: TBtnEditA
- Tag = 2
- Left = 630
- Top = 8
- Width = 100
- Height = 20
- Hint = 'B5HuoGui/'#36135#26588
- TabOrder = 25
- Visible = False
- OnBtnClick = DCNOBtnClick
- end
- object YWY: TComboBox
- Tag = 2
- Left = 630
- Top = 65
- Width = 100
- Height = 20
- ItemHeight = 12
- TabOrder = 26
- OnDropDown = YWLXDropDown
- end
- object ZRMBHLV: TEdit
- Tag = 1
- Left = 630
- Top = 94
- Width = 100
- Height = 20
- TabOrder = 27
- Text = '0'
- end
- object ZZG: TBtnEditA
- Tag = 2
- Left = 630
- Top = 123
- Width = 100
- Height = 20
- Hint = 'zzg/'#20013#36716#28207
- TabOrder = 28
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object KHName: TBtnEditA
- Tag = 2
- Left = 630
- Top = 152
- Width = 100
- Height = 20
- Hint = 'KHName/'#23458#25143#21517#31216
- TabOrder = 29
- OnBtnClick = KHNameBtnClick
- end
- object POMMONEY: TEdit
- Tag = 1
- Left = 630
- Top = 180
- Width = 100
- Height = 20
- TabOrder = 30
- Text = '0'
- end
- object OrdConPrcNote: TBtnEditA
- Tag = 2
- Left = 85
- Top = 39
- Width = 100
- Height = 20
- Hint = 'OrdConPrcNote/'#20215#26684#26465#27454
- TabOrder = 31
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object SHFS: TBtnEditA
- Tag = 2
- Left = 252
- Top = 67
- Width = 100
- Height = 20
- Hint = 'SHFS/'#25910#27719#26041#24335
- TabOrder = 32
- OnBtnClick = SHFSBtnClick
- end
- object A4FPNO: TBtnEditA
- Tag = 1
- Left = 84
- Top = 12
- Width = 100
- Height = 20
- TabOrder = 33
- OnBtnClick = A4FPNOBtnClick
- end
- object JHDTYPE: TComboBox
- Tag = 2
- Left = 252
- Top = 39
- Width = 100
- Height = 20
- ItemHeight = 12
- TabOrder = 34
- OnDropDown = YWLXDropDown
- Items.Strings = (
- #27491#24120#21333
- #33337#36816#21333)
- end
- object YSDJ: TEdit
- Tag = 1
- Left = 252
- Top = 217
- Width = 100
- Height = 20
- TabOrder = 35
- Text = '0'
- OnChange = YSDJChange
- end
- object BZWAYS: TEdit
- Tag = 1
- Left = 252
- Top = 242
- Width = 100
- Height = 20
- TabOrder = 36
- Text = 'ROLLS'
- OnChange = YSDJChange
- end
- object JDDATE: TBtnEditA
- Tag = 2
- Left = 252
- Top = 269
- Width = 100
- Height = 20
- Hint = 'JDDATE/'#20132#21333#26085#26399
- TabOrder = 37
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object CMHC: TBtnEditA
- Tag = 2
- Left = 252
- Top = 297
- Width = 100
- Height = 20
- Hint = 'CMHC/'#33337#21517#33322#27425
- TabOrder = 38
- OnBtnClick = TOCOUNTRYBtnClick
- end
- object Button1: TButton
- Left = 799
- Top = 90
- Width = 75
- Height = 25
- Caption = #36873#25321#20184#27454#20154
- TabOrder = 39
- OnClick = Button1Click
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 393
- Width = 796
- Height = 351
- Align = alClient
- Caption = 'Panel2'
- TabOrder = 2
- object ToolBar2: TToolBar
- Left = 1
- Top = 1
- Width = 794
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 107
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object ToolButton2: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 12
- OnClick = ToolButton2Click
- end
- object ToolButton8: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #21521#19979#22797#21046#22686#34892
- ImageIndex = 57
- OnClick = ToolButton8Click
- end
- object ToolButton9: TToolButton
- Left = 174
- Top = 0
- AutoSize = True
- Caption = #21521#19978#22797#21046#22686#34892
- ImageIndex = 57
- OnClick = ToolButton9Click
- end
- object ToolButton1: TToolButton
- Left = 285
- Top = 0
- AutoSize = True
- Caption = #19968#38190#26367#25442
- ImageIndex = 19
- OnClick = ToolButton1Click
- end
- object ToolButton3: TToolButton
- Left = 372
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 13
- Wrap = True
- OnClick = ToolButton3Click
- end
- object ToolButton7: TToolButton
- Left = 0
- Top = 30
- AutoSize = True
- Caption = #26174#31034#27719#24635
- ImageIndex = 56
- OnClick = ToolButton7Click
- end
- object ToolButton10: TToolButton
- Left = 87
- Top = 30
- AutoSize = True
- Caption = #26631#35760#39068#33394
- ImageIndex = 46
- OnClick = ToolButton10Click
- end
- object ToolButton11: TToolButton
- Left = 174
- Top = 30
- AutoSize = True
- Caption = #25764#38144#26631#35760
- ImageIndex = 52
- OnClick = ToolButton11Click
- end
- object ColorBox1: TColorBox
- Left = 261
- Top = 34
- Width = 110
- Height = 22
- Selected = clActiveCaption
- ItemHeight = 16
- TabOrder = 0
- end
- end
- object cxGrid1: TcxGrid
- Left = 1
- Top = 34
- Width = 794
- Height = 316
- Align = alClient
- TabOrder = 1
- object Tv1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = Tv1CustomDrawCell
- DataController.DataSource = DataSource3
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = v1Column3
- end
- item
- Kind = skSum
- Column = Tv1Column7
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = v1Column10
- end
- item
- Kind = skSum
- Column = Tv1Column2
- end
- item
- Kind = skSum
- Column = v1Column11
- end
- item
- Kind = skSum
- Column = Tv1Column9
- end
- item
- Kind = skSum
- Column = Tv1Column11
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object Tv1Column17: TcxGridDBColumn
- Tag = 2
- Caption = #24207#21495
- DataBinding.FieldName = 'XHNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 62
- end
- object v1Column13: TcxGridDBColumn
- Tag = 2
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'orderno'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 71
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #20013#25991#21697#21517
- DataBinding.FieldName = 'C3BGName'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object Tv1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #39068#33394
- DataBinding.FieldName = 'bgcolor'
- HeaderAlignmentHorz = taCenter
- Width = 78
- end
- object Tv1Column4: TcxGridDBColumn
- Tag = 2
- Caption = #33521#25991#39068#33394
- DataBinding.FieldName = 'bgecolor'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #25104#20221
- DataBinding.FieldName = 'YSChenFen'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column14PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 109
- end
- object v1YSKeZhong: TcxGridDBColumn
- Tag = 2
- Caption = #20811#37325
- DataBinding.FieldName = 'YSKeZhong'
- HeaderAlignmentHorz = taCenter
- Width = 73
- end
- object Tv1Column16: TcxGridDBColumn
- Tag = 2
- Caption = #28023#20851#32534#30721
- DataBinding.FieldName = 'hscode'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column15: TcxGridDBColumn
- Tag = 2
- Caption = #27454#21495
- DataBinding.FieldName = 'KuanNo'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column13: TcxGridDBColumn
- Tag = 2
- Caption = #33457#22411
- DataBinding.FieldName = 'HXCODE'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #31561#32423
- DataBinding.FieldName = 'grade'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = Tv1Column14PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 70
- end
- object v1Column20: TcxGridDBColumn
- Tag = 2
- Caption = #33521#25991#21697#21517
- DataBinding.FieldName = 'C3BGNameEng'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object Tv1Column12: TcxGridDBColumn
- Tag = 2
- Caption = #32463#32433'/'#32428#32433
- DataBinding.FieldName = 'JSWS'
- HeaderAlignmentHorz = taCenter
- Width = 90
- end
- object Tv1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #33521#25991#35828#26126
- DataBinding.FieldName = 'ywnote'
- HeaderAlignmentHorz = taCenter
- Width = 122
- end
- object v1Column15: TcxGridDBColumn
- Tag = 2
- Caption = #38376#24133
- DataBinding.FieldName = 'YSFuKuan'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 65
- end
- object Tv1Column10: TcxGridDBColumn
- Tag = 2
- Caption = #21305#25968
- DataBinding.FieldName = 'ps'
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object v1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 77
- end
- object Tv1Column6: TcxGridDBColumn
- Tag = 2
- Caption = #25968#37327#21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'MTS'
- 'YDS'
- 'N.W')
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- object VCC6BGPrice: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20215
- DataBinding.FieldName = 'C6BGPrice'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 70
- end
- object Tv1Column7: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object Tv1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #24065#31181
- DataBinding.FieldName = 'E1BZUNIT'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- 'CNY'
- 'USD')
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object Tv1Column8: TcxGridDBColumn
- Tag = 2
- Caption = #33337#26679#25968#37327
- DataBinding.FieldName = 'CYQTY'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column9: TcxGridDBColumn
- Tag = 2
- Caption = #33337#26679#36153
- DataBinding.FieldName = 'CYFEE'
- HeaderAlignmentHorz = taCenter
- Width = 67
- end
- object Tv1Column11: TcxGridDBColumn
- Tag = 2
- Caption = #21253#25968
- DataBinding.FieldName = 'bs'
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object v1Column10: TcxGridDBColumn
- Tag = 2
- Caption = #27611#37325'(KG)'
- DataBinding.FieldName = 'E3MaoZ'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 60
- end
- object v1Column11: TcxGridDBColumn
- Tag = 2
- Caption = #20928#37325'(KG)'
- DataBinding.FieldName = 'E4JingZ'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 65
- end
- object Tv1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #20307#31215
- DataBinding.FieldName = 'BGTJ'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = Tv1Column7PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column18: TcxGridDBColumn
- Tag = 2
- Caption = #26631#35760#39068#33394
- DataBinding.FieldName = 'color'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 68
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- end
- object Panel3: TPanel
- Left = 796
- Top = 393
- Width = 460
- Height = 351
- Align = alRight
- Caption = 'Panel2'
- TabOrder = 3
- Visible = False
- object ToolBar3: TToolBar
- Left = 1
- Top = 1
- Width = 458
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 95
- Caption = 'ToolBar1'
- Color = clMoneyGreen
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object ToolButton4: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #26032#22686#20943#20813#26639
- ImageIndex = 12
- OnClick = ToolButton4Click
- end
- object ToolButton5: TToolButton
- Left = 99
- Top = 0
- AutoSize = True
- Caption = #26032#22686#21152#25910#26639
- ImageIndex = 12
- OnClick = ToolButton5Click
- end
- object ToolButton6: TToolButton
- Left = 198
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = ToolButton6Click
- end
- end
- object cxGrid2: TcxGrid
- Left = 1
- Top = 34
- Width = 458
- Height = 181
- Align = alClient
- TabOrder = 1
- object TV2: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DS_JJ
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- OptionsView.Indicator = True
- OptionsView.IndicatorWidth = 25
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- OnCustomDrawIndicatorCell = TV2CustomDrawIndicatorCell
- object TV2Column1: TcxGridDBColumn
- Tag = 2
- Caption = #31867#22411
- DataBinding.FieldName = 'FYTYPE'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.ReadOnly = True
- HeaderAlignmentHorz = taCenter
- Width = 59
- end
- object cxGridDBColumn1: TcxGridDBColumn
- Tag = 2
- Caption = #36153#29992#21517#31216
- DataBinding.FieldName = 'FYNAME'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 71
- end
- object TV2Column2: TcxGridDBColumn
- Tag = 2
- Caption = #27604#20363'(%)'
- DataBinding.FieldName = 'BILI'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV2Column2PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069
- DataBinding.FieldName = 'FYMONEY'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = cxGridDBColumn3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = #35828#26126
- DataBinding.FieldName = 'fysm'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #22791#27880
- DataBinding.FieldName = 'mxnote'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = v1Column3PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 77
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV2
- end
- end
- object Panel4: TPanel
- Left = 1
- Top = 215
- Width = 458
- Height = 135
- Align = alBottom
- TabOrder = 2
- object Label27: TLabel
- Left = 15
- Top = 32
- Width = 60
- Height = 12
- Caption = #20135#21697#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label38: TLabel
- Left = 39
- Top = 6
- Width = 36
- Height = 12
- Caption = #23450#37329#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label39: TLabel
- Left = 3
- Top = 85
- Width = 72
- Height = 12
- Caption = #21152#25910#24635#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label40: TLabel
- Left = 3
- Top = 59
- Width = 72
- Height = 12
- Caption = #20943#20813#24635#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label41: TLabel
- Left = 190
- Top = 5
- Width = 48
- Height = 12
- Caption = #24635#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Edit1: TEdit
- Tag = 1
- Left = 74
- Top = 27
- Width = 100
- Height = 20
- ReadOnly = True
- TabOrder = 0
- Text = '0'
- end
- object Edit2: TEdit
- Tag = 1
- Left = 74
- Top = 1
- Width = 100
- Height = 20
- ReadOnly = True
- TabOrder = 1
- Text = '0'
- end
- object Edit3: TEdit
- Tag = 1
- Left = 74
- Top = 80
- Width = 100
- Height = 20
- ReadOnly = True
- TabOrder = 2
- Text = '0'
- end
- object Edit4: TEdit
- Tag = 1
- Left = 74
- Top = 54
- Width = 100
- Height = 20
- ReadOnly = True
- TabOrder = 3
- Text = '0'
- end
- object Edit5: TEdit
- Tag = 1
- Left = 237
- Top = 1
- Width = 100
- Height = 20
- ReadOnly = True
- TabOrder = 4
- Text = '0'
- end
- end
- end
- object DataSource3: TDataSource
- DataSet = CDS_Sub
- Left = 509
- Top = 479
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- IndexFieldNames = 'XHNO'
- Params = <>
- Left = 469
- Top = 468
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 1080
- Top = 272
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1112
- Top = 272
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1144
- Top = 272
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 424
- Top = 493
- end
- object CDS_JJ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 780
- Top = 468
- end
- object DS_JJ: TDataSource
- DataSet = CDS_JJ
- Left = 853
- Top = 499
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDInPut.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDInPut.pas
deleted file mode 100644
index a62dbe6..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDInPut.pas
+++ /dev/null
@@ -1,1963 +0,0 @@
-unit U_JHDInPut;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxCalendar, cxDropDownEdit, ComCtrls, ToolWin,
- cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxClasses, cxControls, cxGridCustomView, cxGrid, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxButtonEdit, cxTextEdit, StdCtrls, BtnEdit,
- ExtCtrls, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxSkinsCore, dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmJHDInPut = class(TForm)
- ToolBar1: TToolBar;
- TBSave: TToolButton;
- TBClose: TToolButton;
- DataSource3: TDataSource;
- CDS_Sub: TClientDataSet;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- cxGridPopupMenu2: TcxGridPopupMenu;
- Panel1: TPanel;
- Label13: TLabel;
- Label4: TLabel;
- A6PONO: TEdit;
- Label8: TLabel;
- SMA: TEdit;
- Label9: TLabel;
- DCNO: TBtnEditA;
- TOCOUNTRY: TBtnEditA;
- Label15: TLabel;
- Label19: TLabel;
- Label2: TLabel;
- BGTAITOU: TBtnEditA;
- Label18: TLabel;
- F2YunFee: TEdit;
- Label22: TLabel;
- KDYPF: TEdit;
- Label30: TLabel;
- HTDate: TDateTimePicker;
- Label31: TLabel;
- Label1: TLabel;
- ZhuMaiTou: TMemo;
- Label3: TLabel;
- SellNOTE: TMemo;
- NOTE: TMemo;
- Label6: TLabel;
- YWLX: TComboBox;
- Label11: TLabel;
- ZMXingZhi: TBtnEditA;
- Label12: TLabel;
- chuandate: TDateTimePicker;
- Label14: TLabel;
- DAYS: TEdit;
- Label20: TLabel;
- DLS: TBtnEditA;
- Label21: TLabel;
- YJZFFS: TComboBox;
- Label24: TLabel;
- Label25: TLabel;
- Label26: TLabel;
- JSBZ: TComboBox;
- Label29: TLabel;
- B6ChuYunGang: TBtnEditA;
- Label5: TLabel;
- SMB: TEdit;
- Label16: TLabel;
- B7DaoHuoGang: TBtnEditA;
- ZUSDHLV: TEdit;
- Label28: TLabel;
- BANKNAME: TComboBox;
- Label32: TLabel;
- F3BaoFee: TEdit;
- Label33: TLabel;
- FKR: TMemo;
- Label7: TLabel;
- XYNO: TBtnEditA;
- Label10: TLabel;
- YWY: TComboBox;
- Label17: TLabel;
- ZRMBHLV: TEdit;
- Label34: TLabel;
- ZZG: TBtnEditA;
- Label35: TLabel;
- KHName: TBtnEditA;
- Label36: TLabel;
- POMMONEY: TEdit;
- OrdConPrcNote: TBtnEditA;
- SHFS: TBtnEditA;
- A4FPNO: TBtnEditA;
- Label23: TLabel;
- JHDTYPE: TComboBox;
- Label37: TLabel;
- YSDJ: TEdit;
- Panel2: TPanel;
- ToolBar2: TToolBar;
- ToolButton2: TToolButton;
- ToolButton1: TToolButton;
- ToolButton3: TToolButton;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column13: TcxGridDBColumn;
- v1Column5: TcxGridDBColumn;
- v1Column20: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- v1YSKeZhong: TcxGridDBColumn;
- v1Column15: TcxGridDBColumn;
- v1Column3: TcxGridDBColumn;
- VCC6BGPrice: TcxGridDBColumn;
- Tv1Column7: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column11: TcxGridDBColumn;
- Tv1Column2: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- Panel3: TPanel;
- ToolBar3: TToolBar;
- ToolButton4: TToolButton;
- ToolButton6: TToolButton;
- cxGrid2: TcxGrid;
- TV2: TcxGridDBTableView;
- cxGridDBColumn1: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- CDS_JJ: TClientDataSet;
- DS_JJ: TDataSource;
- ToolButton5: TToolButton;
- TV2Column1: TcxGridDBColumn;
- Tv1Column1: TcxGridDBColumn;
- Panel4: TPanel;
- Label27: TLabel;
- Edit1: TEdit;
- Label38: TLabel;
- Edit2: TEdit;
- Label39: TLabel;
- Edit3: TEdit;
- Label40: TLabel;
- Edit4: TEdit;
- Label41: TLabel;
- Edit5: TEdit;
- Tv1Column3: TcxGridDBColumn;
- Tv1Column4: TcxGridDBColumn;
- Tv1Column5: TcxGridDBColumn;
- Tv1Column6: TcxGridDBColumn;
- Tv1Column8: TcxGridDBColumn;
- Tv1Column9: TcxGridDBColumn;
- Label42: TLabel;
- BZWAYS: TEdit;
- Tv1Column10: TcxGridDBColumn;
- Tv1Column11: TcxGridDBColumn;
- TV2Column2: TcxGridDBColumn;
- Tv1Column12: TcxGridDBColumn;
- ToolButton7: TToolButton;
- Label43: TLabel;
- JDDATE: TBtnEditA;
- Label44: TLabel;
- CMHC: TBtnEditA;
- Tv1Column13: TcxGridDBColumn;
- Tv1Column14: TcxGridDBColumn;
- Tv1Column15: TcxGridDBColumn;
- Tv1Column16: TcxGridDBColumn;
- ToolButton8: TToolButton;
- Button1: TButton;
- Tv1Column17: TcxGridDBColumn;
- ToolButton9: TToolButton;
- Tv1Column18: TcxGridDBColumn;
- ToolButton10: TToolButton;
- ColorBox1: TColorBox;
- ToolButton11: TToolButton;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column3PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure TCXLJClick(Sender: TObject);
- procedure TOCOUNTRYBtnClick(Sender: TObject);
- procedure YWLXDropDown(Sender: TObject);
- procedure ZORDERNOBtnClick(Sender: TObject);
- procedure DCNOBtnClick(Sender: TObject);
- procedure Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column7PropertiesEditValueChanged(Sender: TObject);
- procedure Tv1Column6PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure KHNameBtnClick(Sender: TObject);
- procedure A4FPNOBtnClick(Sender: TObject);
- procedure TV2CustomDrawIndicatorCell(Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGridIndicatorItemViewInfo; var ADone: Boolean);
- procedure ToolButton6Click(Sender: TObject);
- procedure ToolButton5Click(Sender: TObject);
- procedure JSJE();
- procedure cxGridDBColumn3PropertiesEditValueChanged(Sender: TObject);
- procedure YSDJChange(Sender: TObject);
- procedure TV2Column2PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton7Click(Sender: TObject);
- procedure JDDATEBtnClick(Sender: TObject);
- procedure SHFSBtnClick(Sender: TObject);
- procedure Tv1Column14PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton8Click(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure SetXH();
- procedure ToolButton9Click(Sender: TObject);
- procedure ToolButton10Click(Sender: TObject);
- procedure Tv1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- procedure ToolButton11Click(Sender: TObject);
- private
- { Private declarations }
- function SaveCKData(): Boolean;
- public
- { Public declarations }
- FBCId, canshu3: string;
- CopyStr: string;
- end;
-
-var
- frmJHDInPut: TfrmJHDInPut;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_ZdyAttachment, U_ProductOrderList_Sel,
- U_DCDList_Sel, U_ZdyAttachGYS, U_CHListsel2;
-
-{$R *.dfm}
-
-procedure TfrmJHDInPut.SetXH();
-var
- i: Integer;
-begin
- with CDS_Sub do
- begin
- First;
- i := 1;
- while not Eof do
- begin
- with CDS_Sub do
- begin
- Edit;
- FieldByName('XHNoTemp').Value := i;
- Post;
- end;
- i := i + 1;
- Next;
- end;
- end;
-
- with CDS_Sub do
- begin
- CDS_Sub.IndexFieldNames := '';
- First;
- i := 1;
- while not Eof do
- begin
- with CDS_Sub do
- begin
- Edit;
- FieldByName('XHNo').Value := FieldByName('XHNoTemp').AsInteger;
- Post;
- end;
- i := i + 1;
- Next;
- end;
- CDS_Sub.IndexFieldNames := 'XHNo';
- end;
-end;
-
-procedure TfrmJHDInPut.JSJE();
-var
- FCPMoney, FDJ, fjm, fjs, fcyfee: double;
-begin
- //ܽ=Ʒ--ܽ+ܽ +
- if TV1.DataController.Summary.FooterSummaryValues[1] <> NULL then
- FCPMoney := TV1.DataController.Summary.FooterSummaryValues[1]
- else
- FCPMoney := 0;
-
- if TV1.DataController.Summary.FooterSummaryValues[7] <> NULL then
- fcyfee := TV1.DataController.Summary.FooterSummaryValues[7]
- else
- fcyfee := 0;
-
- FDJ := StrToFloatDEF(YSDJ.Text, 0);
-
- fjm := 0;
- fjs := 0;
- if CDS_JJ.IsEmpty = False then
- begin
- with CDS_JJ do
- begin
- First;
- while not Eof do
- begin
- if CDS_JJ.fieldbyname('BILI').ASSTRING <> '' then
- begin
- with CDS_JJ do
- begin
- Edit;
- FieldByName('FYMONEY').Value := StrToFloatDef((CDS_JJ.fieldbyname('BILI').ASSTRING), 0) * FCPMoney / 100;
- Post;
- end;
- end;
- if CDS_JJ.fieldbyname('FYTYPE').ASSTRING = '' then
- begin
- fjm := fjm + STRTOFLOATDEF(CDS_JJ.fieldbyname('FYMONEY').ASSTRING, 0);
- end
- else
- begin
- fjs := fjs + STRTOFLOATDEF(CDS_JJ.fieldbyname('FYMONEY').ASSTRING, 0);
- end;
-
- Next;
- end;
- end;
- end;
-
- EDIT2.TEXT := FLOATTOSTR(FDJ);
- EDIT1.TEXT := FLOATTOSTR(FCPMoney);
- EDIT4.TEXT := FLOATTOSTR(fjm);
- EDIT3.TEXT := FLOATTOSTR(fjs);
- Edit5.Text := FLOATTOSTR(FCPMoney - FDJ - fjm + fjs + fcyfee);
-end;
-
-procedure TfrmJHDInPut.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-function TfrmJHDInPut.SaveCKData(): Boolean;
-var
- FJMID, Maxno, MaxSubNo, MAXJJID, FSCID, FJJID: string;
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_Main where JHID=''' + Trim(FBCId) + '''');
- Open;
- end;
- FBCId := Trim(ADOQueryTemp.fieldbyname('JHID').AsString);
- if Trim(FBCId) = '' then
- begin
- if GetLSNo(ADOQueryCmd, Maxno, 'JH', 'JHD_Main', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- Maxno := Trim(FBCId);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_Main where JHID=''' + Trim(Maxno) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FBCId) = '' then
- begin
- Append;
- FieldByName('Filler').Value := Trim(DName);
- FieldByName('FillerCode').Value := Trim(DCode);
-// FieldByName('status').Value := Trim(DCode);
- end
- else
- begin
- Edit;
- FieldByName('Editer').Value := Trim(DName);
- FieldByName('EditerCode').Value := Trim(DCode);
- FieldByName('EditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('JHID').Value := Trim(Maxno);
-
- FieldByName('JMMONEY').Value := Edit4.Text;
- FieldByName('JSMONEY').Value := Edit3.Text;
- FieldByName('ZMONEY').Value := Edit5.Text;
-
- RTSetsavedata(ADOQueryCmd, 'JHD_Main', Panel1, 1);
- RTSetsavedata(ADOQueryCmd, 'JHD_Main', Panel1, 2);
- if chuandate.Checked = true then
- begin
- FieldByName('chuandate').Value := chuandate.DateTime;
- end
- else
- begin
- FieldByName('chuandate').Value := NULL;
- end;
- Post;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_Main where A4FPNO=''' + Trim(A4FPNO.Text) + ''' and Valid=''Y'' ');
- Open;
- end;
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('˷ƱѾʹãܱ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not eof do
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_SUB where JHSID=''' + Trim(CDS_Sub.fieldbyname('JHSID').AsString) + '''');
- Open;
- end;
- FSCID := Trim(ADOQueryTemp.fieldbyname('JHSID').AsString);
- if Trim(FSCID) = '' then
- begin
- if GetLSNo(ADOQueryCmd, MaxSubNo, 'JHS', 'JHD_SUB', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡӱʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- MaxSubNo := Trim(FSCID);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_SUB where JHSID=''' + Trim(MaxSubNo) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FSCID) = '' then
- begin
- Append;
- FieldByName('SFiller').Value := Trim(DName);
- end
- else
- begin
- Edit;
- FieldByName('SEditer').Value := Trim(DName);
- FieldByName('SEditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('JHID').Value := Trim(Maxno);
- FieldByName('JHSID').Value := Trim(MaxSubNo);
-
- FieldByName('FROMYFSID').Value := CDS_Sub.fieldbyname('FROMYFSID').ASSTRING;
- FieldByName('FROMYFPZNO').Value := CDS_Sub.fieldbyname('FROMYFPZNO').ASSTRING;
- FieldByName('JHSID').Value := Trim(MaxSubNo);
-
- RTSetSaveDataCDS(ADOQueryCmd, Tv1, CDS_Sub, 'JHD_SUB', 2);
-
- Post;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('UPDATE YF_MONEY_CR_SUB SET PRICE=' + (Trim(CDS_Sub.fieldbyname('C6BGPrice').Value)));
- sql.Add(',mxmoney=qty*' + (Trim(CDS_Sub.fieldbyname('C6BGPrice').Value)));
- sql.Add('where CHARINDEX(ltrim(rtrim(yfsid)),' + QuotedStr(Trim(CDS_Sub.fieldbyname('FROMYFSID').ASSTRING)));
- sql.Add(')>0');
-
- sql.Add('UPDATE YF_MONEY_CR SET money=(select sum(mxmoney) from yf_money_cr_sub b where b.yfid=YF_MONEY_CR.yfid)');
- sql.Add('where yfid=(select yfid from YF_MONEY_CR_sub where CHARINDEX(yfsid,' + QuotedStr(Trim(CDS_Sub.fieldbyname('FROMYFSID').ASSTRING)));
- sql.Add(')>0)');
- ExecSQL;
- end;
- Edit;
- FieldByName('JHSID').Value := Trim(MaxSubNo);
- FieldByName('JHID').Value := Trim(Maxno);
- Post;
- Next;
- end;
- end;
- CDS_Sub.EnableControls;
- //¼Ӽ
- CDS_JJ.DisableControls;
- with CDS_JJ do
- begin
- First;
- while not eof do
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_JJ where JJID=''' + Trim(CDS_JJ.fieldbyname('JJID').AsString) + '''');
- Open;
- end;
- FJJID := Trim(ADOQueryTemp.fieldbyname('JJID').AsString);
- if Trim(FJJID) = '' then
- begin
- if GetLSNo(ADOQueryCmd, MAXJJID, 'JJ', 'JHD_JJ', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡӱʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- MAXJJID := Trim(FJJID);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_JJ where JJID=''' + Trim(MAXJJID) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FJJID) = '' then
- begin
- Append;
- FieldByName('SFiller').Value := Trim(DName);
- end
- else
- begin
- Edit;
- FieldByName('SEditer').Value := Trim(DName);
- FieldByName('SEditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('JHID').Value := Trim(Maxno);
- FieldByName('JJID').Value := Trim(MAXJJID);
- RTSetSaveDataCDS(ADOQueryCmd, Tv2, CDS_JJ, 'JHD_JJ', 2);
- Post;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('EXEC P_Do_JJYSK @JJID=''' + Trim(MAXJJID) + '''');
- ExecSQL;
-
- end;
- Edit;
- FieldByName('JJID').Value := Trim(MAXJJID);
- FieldByName('JHID').Value := Trim(Maxno);
- Post;
- Next;
- end;
- end;
- CDS_JJ.EnableControls;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JHD_MAIN Set ');
- sql.Add(' C7BGMoneyHZ=(select Sum(C7BGMoney+ISNULL(CYFEE,0)) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E1BZQtyHZ=(select Sum(E1BZQty) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E2ChiMaQtyHZ=(select Sum(E2ChiMaQty) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
-
- sql.Add(',E3MaoZHZ=(select Sum(E3MaoZ) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E4JingZHZ=(select Sum(E4JingZ) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(' where JHID=''' + Trim(Maxno) + '''');
- ExecSQL;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- FBCId := Trim(Maxno);
- Result := True;
- except
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmJHDInPut.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('¼YD', Tv1, 'ع12');
- Close;
-end;
-
-procedure TfrmJHDInPut.FormShow(Sender: TObject);
-begin
- ReadCxGrid(Self.Caption, Tv1, 'ع12');
- if canshu3 = 'ҵԱ' then
- begin
- VCC6BGPrice.Visible := False;
- VCC6BGPrice.Hidden := True;
- end
- else
- begin
- VCC6BGPrice.Visible := True;
- VCC6BGPrice.Hidden := False;
- end;
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from JHD_MAIN A');
- sql.Add(' where JHID=''' + Trim(FBCId) + '''');
- Open;
- end;
- SCSHDataNew(ADOQueryTemp, Panel1, 1);
- SCSHDataNew(ADOQueryTemp, Panel1, 2);
- if ADOQueryTemp.FieldByName('CHUANDATE').ASSTRING = '' then
- begin
- chuandate.Date := SGetServerDate(ADOQueryTemp);
- chuandate.Checked := False;
- end
- else
- begin
- chuandate.Date := ADOQueryTemp.FieldByName('CHUANDATE').AsDateTime;
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.*,XHNoTemp=XHNO ');
- sql.Add(' from JHD_SUB A');
- sql.Add(' where JHID=''' + Trim(FBCId) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_Sub);
- SInitCDSData20(ADOQueryTemp, CDS_Sub);
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from JHD_JJ A');
- sql.Add(' where JHID=''' + Trim(FBCId) + '''');
-
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_JJ);
- SInitCDSData20(ADOQueryTemp, CDS_JJ);
- if CopyStr = '99' then
- begin
- FBCId := '';
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not Eof do
- begin
- Edit;
- FieldByName('JHID').Value := Null;
- FieldByName('JHSID').Value := Null;
- Post;
- Next;
- end;
- end;
- CDS_Sub.EnableControls;
-
- CDS_JJ.DisableControls;
- with CDS_JJ do
- begin
- First;
- while not Eof do
- begin
- Edit;
- FieldByName('JHID').Value := Null;
- FieldByName('JJID').Value := Null;
- Post;
- Next;
- end;
- end;
- CDS_JJ.EnableControls;
- end;
- if Trim(FBCId) = '' then
- begin
- YWY.Text := Trim(DName);
- HTDate.Date := SGetServerDate(ADOQueryTemp);
- chuandate.Date := SGetServerDate(ADOQueryTemp);
- chuandate.Checked := False;
- end;
- JSJE();
- setxh();
-
-end;
-
-procedure TfrmJHDInPut.TBSaveClick(Sender: TObject);
-var
- FReal: Double;
- i: Integer;
-begin
-
- if TryStrToFloat(F2YunFee.Text, FReal) = False then
- begin
- Application.MessageBox('˷ѷǷ!', 'ʾ', 0);
- Exit;
- end;
- if TryStrToFloat(F3BaoFee.Text, FReal) = False then
- begin
- Application.MessageBox('ѷǷ!', 'ʾ', 0);
- Exit;
- end;
- if Trim(days.Text) = '' then
- begin
- Application.MessageBox('Ϊ!', 'ʾ', 0);
- Exit;
- end;
- if TryStrToFloat(days.Text, FReal) = False then
- begin
- Application.MessageBox('Ƿ!', 'ʾ', 0);
- Exit;
- end;
- if CDS_Sub.IsEmpty then
- begin
- Application.MessageBox('ϸΪ!', 'ʾ', 0);
- Exit;
- end;
-
- if CDS_Sub.Locate('C3BGName', Null, []) then
- begin
- Application.MessageBox('ƷΪ!', 'ʾ', 0);
- Exit;
- end;
- if Trim(DCNO.Text) = '' then
- begin
- Application.MessageBox('յΪ!', 'ʾ', 0);
- Exit;
- end;
- if Trim(jhdtype.Text) = '' then
- begin
- Application.MessageBox('ͲΪ!', 'ʾ', 0);
- Exit;
- end;
-
- if Trim(KHName.Text) = '' then
- begin
- Application.MessageBox('ͻΪ!', 'ʾ', 0);
- Exit;
- end;
-
- if CDS_Sub.Locate('C4BGQty', Null, []) then
- begin
- Application.MessageBox('Ϊ!', 'ʾ', 0);
- Exit;
- end;
-
- ToolBar1.SetFocus;
- if SaveCKData() then
- begin
- Application.MessageBox('ɹ!', 'ʾ', 0);
- //ModalResult:=1;
- Exit;
- end;
-end;
-
-procedure TfrmJHDInPut.ToolButton2Click(Sender: TObject);
-var
- i: Integer;
-begin
- //CopyAddRowCDS(CDS_Sub);
- {with CDS_Sub do
- begin
- Edit;
- FieldByName('BGID').Value:=Null;
- FieldByName('BSID').Value:=Null;
- Post;
- end; }
-
-
- frmProductOrderList_Sel := TfrmProductOrderList_Sel.Create(self);
- with frmProductOrderList_Sel do
- begin
- if showmodal = 1 then
- begin
- while frmProductOrderList_Sel.Order_Main.Locate('SSel', True, []) do
- begin
- Self.CDS_Sub.Append;
- i := CDS_Sub.RecordCount;
- Self.CDS_Sub.FieldByName('XHInt').Value := i + 1;
- Self.CDS_Sub.FieldByName('XHNO').Value := i + 1;
- Self.CDS_Sub.FieldbyName('C6BGPrice').Value := 0;
-// Self.CDS_Sub.FieldbyName('Money').Value := 0;
- Self.CDS_Sub.fieldbyname('orderno').Value := Order_Main.fieldbyname('Orderno').asstring;
- Self.CDS_Sub.fieldbyname('FromMainId').Value := Order_Main.fieldbyname('MainId').asstring;
- Self.CDS_Sub.fieldbyname('C3BGNameEng').Value := Order_Main.fieldbyname('YWNAME').asstring;
- Self.CDS_Sub.fieldbyname('C3BGName').Value := Order_Main.fieldbyname('MPRTCODENAME').asstring;
- Self.CDS_Sub.fieldbyname('YSFuKuan').Value := Order_Main.fieldbyname('MPRTMF').asstring;
- Self.CDS_Sub.fieldbyname('YSKeZhong').Value := Order_Main.fieldbyname('MPRTKZ').asstring;
- Self.CDS_Sub.fieldbyname('YSChenFen').Value := Order_Main.fieldbyname('MPRTCF').asstring;
- Self.CDS_Sub.fieldbyname('C4BGQty').Value := Order_Main.fieldbyname('PRTORDERQTY').ASFLOAT;
-
- Self.CDS_Sub.fieldbyname('C5BGUnit').Value := Order_Main.fieldbyname('orderunit').asstring;
-
- Self.CDS_Sub.fieldbyname('ZZFF').Value := Order_Main.fieldbyname('BPBigType').asstring;
- Self.CDS_Sub.fieldbyname('ZDDATE').Value := Order_Main.fieldbyname('filltime').AsDateTime;
- Self.CDS_Sub.fieldbyname('GYLX').Value := Order_Main.fieldbyname('JGType').asstring;
-
- Self.CDS_Sub.fieldbyname('KuanNo').Value := Order_Main.fieldbyname('SCSKX').asstring;
- Self.CDS_Sub.fieldbyname('HXCODE').Value := Order_Main.fieldbyname('SCSHX').asstring;
- Self.CDS_Sub.fieldbyname('JSUNIT').Value := '';
- Self.CDS_Sub.fieldbyname('WL').Value := 'ƽ';
- Self.CDS_Sub.fieldbyname('sj').Value := '';
-
- Self.CDS_Sub.fieldbyname('CYQTY').Value := 0;
- Self.CDS_Sub.fieldbyname('CYFEE').Value := 0;
-
- Self.CDS_Sub.Post;
- frmProductOrderList_Sel.Order_Main.Delete;
- end;
- end;
- free;
- end;
- SetXH();
-end;
-
-procedure TfrmJHDInPut.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
- if Trim(CDS_Sub.fieldbyname('JHSID').AsString) <> '' then
- begin
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JHD_SUB Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() ');
- sql.Add(' where JHSID=''' + Trim(CDS_Sub.fieldbyname('JHSID').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JHD_MAIN Set ');
- sql.Add(' C7BGMoneyHZ=(select Sum(C7BGMoney) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E1BZQtyHZ=(select Sum(E1BZQty) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E2ChiMaQtyHZ=(select Sum(E2ChiMaQty) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E3MaoZHZ=(select Sum(E3MaoZ) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(',E4JingZHZ=(select Sum(E4JingZ) from JHD_SUB A where A.JHID=JHD_MAIN.JHID and A.SValid=''Y'' )');
- sql.Add(' where JHID=''' + Trim(CDS_Sub.fieldbyname('JHID').AsString) + '''');
- ExecSQL;
- end;
- end;
- CDS_Sub.Delete;
- JSJE();
-end;
-
-procedure TfrmJHDInPut.v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := '';
- flagname := '';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C3BGName').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1 * from JYOrder_BaoGuan_Sub where C3BGName=''' + Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZDYName').AsString) + '''');
- sql.add(' and isnull(C2HSNO,'''')<>'''' ');
- sql.Add(' order by SFillTime desc');
- Open;
- end;
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C2HSNO').Value := Trim(ADOQueryTemp.fieldbyname('C2HSNO').asstring);
- FieldByName('C3BGNameEng').Value := Trim(ADOQueryTemp.fieldbyname('C3BGNameEng').asstring);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSChenFen';
- flagname := 'ɷֺ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSChenFen').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSPinPai';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSPinPai').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSShengChanShang';
- flagname := '';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSShengChanShang').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.v1Column3PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FPrice, FQty, FBaoGangFee, FCYQTY: string;
-begin
- FName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName(FName).Value := mvalue;
- Post;
- end;
- FPrice := Trim(CDS_Sub.fieldbyname('C6BGPrice').AsString);
- FQty := Trim(CDS_Sub.fieldbyname('C4BGQty').AsString);
- FCYQTY := Trim(CDS_Sub.fieldbyname('CYQTY').AsString);
- if Trim(FPrice) = '' then
- begin
- FPrice := '0';
- end;
- if Trim(FQty) = '' then
- begin
- FQty := '0';
- end;
- if Trim(FCYQTY) = '' then
- begin
- FCYQTY := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName('C7BGMoney').Value := RoundFloat(StrToFloat(FPrice) * StrToFloat(FQty), 2);
- FieldByName('CYFEE').Value := RoundFloat(StrToFloat(FPrice) * StrToFloat(FCYQTY), 2);
- Post;
- end;
- JSJE();
-end;
-
-procedure TfrmJHDInPut.ToolButton1Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
- OneKeyPost(Tv1, CDS_Sub);
-end;
-
-procedure TfrmJHDInPut.ToolButton4Click(Sender: TObject);
-var
- fsj: string;
-begin
- with CDS_JJ do
- begin
- Append;
- FieldByName('FYTYPE').Value := '';
- FieldByName('FYMONEY').Value := 0;
- post;
- end;
-end;
-
-procedure TfrmJHDInPut.v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'ZZJGou';
- flagname := '֯ṹ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('ZZJGou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'E5MaiTou';
- flagname := 'ͷ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('E5MaiTou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.TCXLJClick(Sender: TObject);
-begin
- if not Assigned(DataLink_DDMD) then
- DataLink_DDMD := TDataLink_DDMD.Create(Application);
- try
- with DataLink_DDMD.ADOLink do
- begin
- //if not Connected then
- begin
- Connected := false;
- ConnectionString := DConString;
- LoginPrompt := false;
- Connected := true;
- end;
- end;
- except
- application.MessageBox('ݿʧܣ', '', mb_Ok + MB_ICONERROR);
- end;
-end;
-
-procedure TfrmJHDInPut.TOCOUNTRYBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
-
- flag := Copy(fsj, 1, FWZ - 1);
-// ShowMessage(flag);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'LCTOPlace') or (flag = 'LCFromPlace') or (flag = 'YSFS') then
- begin
- fnote := True;
- V1Note.Caption := 'ע';
- V1Name.Caption := '';
-// V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'SHFS') then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'ջ㷽ʽ';
-// V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-// if (flag = 'B6ChuYunGang') or (flag = 'B7DaoHuoGang') or (flag = 'ZMXingZhi') then
-// begin
-// fnote := True;
-// V1Note.Caption := 'ע';
-//// V1Name.Caption := 'Ӣ';
-// end
-// else
-// begin
-// fnote := false;
-// end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- if (flag = 'SHFS') then
- begin
- days.Text := Trim(ClientDataSet1.fieldbyname('note').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmJHDInPut.YWLXDropDown(Sender: TObject);
-begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM SY_User WHERE Udept LIKE ''%ͷ%'' ');
-
- Open;
- end;
- YWY.Items.Clear;
- while not ADOQueryTemp.eof do
- begin
- YWY.Items.Add(Trim(ADOQueryTemp.fieldbyname('username').AsString));
- ADOQueryTemp.next;
- end;
-end;
-
-procedure TfrmJHDInPut.ZORDERNOBtnClick(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
-
- if ShowModal = 1 then
- begin
-// self.khcode.Text := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- self.KHName.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.DCNOBtnClick(Sender: TObject);
-begin
- try
- frmDCDList_Sel := TfrmDCDList_Sel.Create(Application);
- with frmDCDList_Sel do
- begin
-
- if ShowModal = 1 then
- begin
-// self.TOCOUNTRY.Text := Trim(Order_Main.fieldbyname('TOCOUNTRY').AsString);
- self.DCNO.Text := Trim(Order_Main.fieldbyname('DCNO').AsString);
- Self.ZhuMaiTou.Text := Trim(Order_Main.fieldbyname('ZhuMaiTou').AsString);
- end;
- end;
- finally
- frmDCDList_Sel.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'zzff';
- flagname := '֯췽';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('zzff').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'GRADE';
- flagname := 'ȼ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('GRADE').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmJHDInPut.Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'GYLX';
- flagname := '';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('gylx').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'JSUNIT';
- flagname := 'λ';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('JSUNIT').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1Column7PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FPrice, FQty, FBaoGangFee: string;
-begin
- FName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName(FName).Value := mvalue;
- Post;
- end;
- JSJE();
-end;
-
-procedure TfrmJHDInPut.Tv1Column6PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.KHNameBtnClick(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
-
- if ShowModal = 1 then
- begin
-
- self.KHName.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.A4FPNOBtnClick(Sender: TObject);
-var
- i: Integer;
-begin
- try
- frmCHListsel2 := tfrmCHListsel2.Create(Application);
- with frmCHListsel2 do
- begin
- if ShowModal = 1 then
- begin
-
- Self.A4FPNO.Text := Trim(CDS_Main.fieldbyname('A4FPNO').AsString);
- Self.DCNO.Text := Trim(CDS_Main.fieldbyname('DCNO').AsString);
- Self.OrdConPrcNote.Text := Trim(CDS_Main.fieldbyname('OrdConPrcNote').AsString);
- Self.B6ChuYunGang.Text := Trim(CDS_Main.fieldbyname('B6ChuYunGang').AsString);
- Self.DAYS.Text := Trim(CDS_Main.fieldbyname('SHdays').AsString);
- Self.ZhuMaiTou.Text := Trim(CDS_Main.fieldbyname('maitou').AsString);
-
-// Self.FKR.Text := Trim(CDS_Main.fieldbyname('TDShouHuoPerson').AsString);
- Self.FKR.Text := Trim(CDS_Main.fieldbyname('TDShouHuoPerson').AsString);
-// Self.FKR.Text := Self.FKR.Text + #13 + Trim(CDS_Main.fieldbyname('COADDRESS').AsString);
-
- Self.SHFS.Text := Trim(CDS_Main.fieldbyname('SHFS').AsString);
- Self.F3BaoFee.Text := Trim(CDS_Main.fieldbyname('F3BaoFee').AsString);
- Self.F2YunFee.Text := Trim(CDS_Main.fieldbyname('F2YunFee').AsString);
- Self.B7DaoHuoGang.Text := Trim(CDS_Main.fieldbyname('B7DaoHuoGang').AsString);
- Self.BGTAITOU.Text := Trim(CDS_Main.fieldbyname('BGTAITOU').AsString);
- Self.ZMXingZhi.Text := Trim(CDS_Main.fieldbyname('ZMXingZhi').AsString);
- Self.KHName.Text := Trim(CDS_Main.fieldbyname('KHName').AsString);
-
-// Self.chuandate.DateTime := CDS_Main.fieldbyname('chuandate').AsDateTime;
- Self.YWY.Text := Trim(CDS_Main.fieldbyname('YWY').AsString);
-
- Self.SellNOTE.Text := Trim(CDS_Main.fieldbyname('SellNOTE').AsString);
-
- Self.TOCOUNTRY.Text := Trim(CDS_Main.fieldbyname('TOCOUNTRY').AsString);
- Self.A6PONO.Text := Trim(CDS_Main.fieldbyname('A6PONO').AsString);
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
-
-// SQL.Add('with c1 as(select sum(qty)qty,price,SUM(D.MXMONEY)MXMONEY,isnull(MXOrderNo,'''')MXOrderNo,');
-// SQL.Add('isnull(CPCODE,'''')CPCODE,isnull(dcno,'''')dcno');
-// SQL.Add(',STUFF(( SELECT '','' +convert(VARCHAR, ltrim(rtrim(YFsID))) FROM YF_MONEY_CR_SUB t inner join ');
-// SQL.Add('YF_MONEY_CR r on t.YFID=r.YFID ');
-// SQL.Add(' where isnull(t.MXOrderNo,'''')=isnull(d.MXOrderNo,'''') and isnull(r.dcno,'''')=isnull(c.dcno,'''') ');
-// SQL.Add('and isnull(t.CPCODE,'''')=isnull(d.CPCODE,'''') ');
-// SQL.Add(' FOR XML PATH('''')), 1, 1, '''') AS YFSID');
-// SQL.Add(',STUFF(( SELECT '','' +convert(VARCHAR, ltrim(rtrim(yfpzno))) FROM YF_MONEY_CR_SUB t inner join ');
-// SQL.Add('YF_MONEY_CR r on t.YFID=r.YFID ');
-// SQL.Add(' where isnull(t.MXOrderNo,'''')=isnull(d.MXOrderNo,'''') and isnull(r.dcno,'''')=isnull(c.dcno,'''') ');
-// SQL.Add('and isnull(t.CPCODE,'''')=isnull(d.CPCODE,'''') ');
-// SQL.Add(' FOR XML PATH('''')), 1, 1, '''') AS yfpzno');
-// SQL.Add(' from YF_MONEY_CR_SUB d inner join YF_MONEY_CR c on c.YFID=d.YFID ');
-// SQL.Add(' where CRtype=''ӦտǼ'' group by price,isnull(MXOrderNo,''''),isnull(CPCODE,'''') ,isnull(dcno,'''') )');
-// SQL.Add(' select A.*,e.* FROM JYOrder_BaoGuan_SUB A INNER JOIN JYOrder_BaoGuan_MAIN B ON A.BGID=B.BGID');
-// SQL.Add(' INNER JOIN c1 e ON e.DCNO=B.DCNO AND e.MXORDERNO=A.ORDERNO AND e.CPCODE=A.C3BGNameEng');
-// SQL.Add('WHERE A.BGID=' + QuotedStr(CDS_Main.fieldbyname('BGID').AsString));
-// SQL.Add('select sum(qty)qty,price,SUM(D.MXMONEY)MXMONEY,isnull(MXOrderNo,'''')MXOrderNo,');
-// SQL.Add('isnull(CPCODE,'''')CPCODE,isnull(dcno,'''')dcno');
-// SQL.Add(',STUFF(( SELECT '','' +convert(VARCHAR, ltrim(rtrim(YFsID))) FROM YF_MONEY_CR_SUB t inner join ');
-// SQL.Add('YF_MONEY_CR r on t.YFID=r.YFID ');
-// SQL.Add(' where isnull(t.MXOrderNo,'''')=isnull(d.MXOrderNo,'''') and isnull(r.dcno,'''')=isnull(c.dcno,'''') ');
-// SQL.Add('and isnull(t.CPCODE,'''')=isnull(d.CPCODE,'''') ');
-// SQL.Add(' FOR XML PATH('''')), 1, 1, '''') AS YFSID');
-// SQL.Add(',STUFF(( SELECT '','' +convert(VARCHAR, ltrim(rtrim(yfpzno))) FROM YF_MONEY_CR_SUB t inner join ');
-// SQL.Add('YF_MONEY_CR r on t.YFID=r.YFID ');
-// SQL.Add(' where isnull(t.MXOrderNo,'''')=isnull(d.MXOrderNo,'''') and isnull(r.dcno,'''')=isnull(c.dcno,'''') ');
-// SQL.Add('and isnull(t.CPCODE,'''')=isnull(d.CPCODE,'''') ');
-// SQL.Add(' FOR XML PATH('''')), 1, 1, '''') AS yfpzno');
-// SQL.Add(' from YF_MONEY_CR_SUB d inner join YF_MONEY_CR c on c.YFID=d.YFID ');
-// SQL.Add(' where CRtype=''ӦտǼ'' AND DCNO=' + QuotedStr(CDS_Main.fieldbyname('DCNO').AsString));
-//
-// SQL.Add('group by price,isnull(MXOrderNo,''''),isnull(CPCODE,'''') ,isnull(dcno,'''') ');
-// ShowMessage(sql.Text);
-
- SQL.Add('EXEC P_Do_CHQDCWHZ @DCNO=' + QuotedStr(CDS_Main.fieldbyname('DCNO').AsString));
- Open;
- end;
- with ADOQueryTemp do
- begin
- First;
- while not Eof do
- begin
- with CDS_Sub do
- begin
- Append;
- i := CDS_Sub.RecordCount;
- Self.CDS_Sub.FieldByName('XHInt').Value := i + 1;
- Self.CDS_Sub.FieldByName('XHNO').Value := i + 1;
-// CDS_Sub.fieldbyname('FROMYFSID').AsString := ADOQueryTemp.fieldbyname('YFSID').AsString;
-// CDS_Sub.fieldbyname('FROMYFPZNO').AsString := ADOQueryTemp.fieldbyname('YFPZNO').AsString;
-//
-// CDS_Sub.fieldbyname('orderno').AsString := ADOQueryTemp.fieldbyname('MXORDERNO').AsString;
-// CDS_Sub.fieldbyname('C3BGName').AsString := ADOQueryTemp.fieldbyname('C3BGName').AsString;
-// CDS_Sub.fieldbyname('C3BGNameEng').AsString := ADOQueryTemp.fieldbyname('C3BGNameEng').AsString;
-// CDS_Sub.fieldbyname('YSChenFen').AsString := ADOQueryTemp.fieldbyname('YSChenFen').AsString;
-// CDS_Sub.fieldbyname('YSKeZhong').AsString := ADOQueryTemp.fieldbyname('YSKeZhong').AsString;
-// CDS_Sub.fieldbyname('YSFuKuan').AsString := ADOQueryTemp.fieldbyname('YSFuKuan').AsString;
-// CDS_Sub.fieldbyname('C4BGQty').AsString := ADOQueryTemp.fieldbyname('QTY').AsString;
-// CDS_Sub.fieldbyname('C6BGPrice').AsString := ADOQueryTemp.fieldbyname('Price').AsString;
-// CDS_Sub.fieldbyname('C7BGMoney').AsString := ADOQueryTemp.fieldbyname('MXMONEY').AsString;
-// CDS_Sub.fieldbyname('E3MaoZ').AsString := ADOQueryTemp.fieldbyname('E3MaoZ').AsString;
-// CDS_Sub.fieldbyname('E4JingZ').AsString := ADOQueryTemp.fieldbyname('E4JingZ').AsString;
-// CDS_Sub.fieldbyname('BGTJ').AsString := ADOQueryTemp.fieldbyname('BGTJ').AsString;
-
-
- CDS_Sub.fieldbyname('FROMYFSID').AsString := ADOQueryTemp.fieldbyname('YFSID').AsString;
- CDS_Sub.fieldbyname('FROMYFPZNO').AsString := ADOQueryTemp.fieldbyname('YFPZNO').AsString;
-
- CDS_Sub.fieldbyname('orderno').AsString := ADOQueryTemp.fieldbyname('MXORDERNO').AsString;
- CDS_Sub.fieldbyname('C3BGName').AsString := ADOQueryTemp.fieldbyname('CPCODE').AsString;
- CDS_Sub.fieldbyname('C3BGNameEng').AsString := ADOQueryTemp.fieldbyname('SCSEName').AsString;
- CDS_Sub.fieldbyname('YSChenFen').AsString := ADOQueryTemp.fieldbyname('SCSCF').AsString;
- CDS_Sub.fieldbyname('YSKeZhong').AsString := ADOQueryTemp.fieldbyname('SCSKZ').AsString;
- CDS_Sub.fieldbyname('YSFuKuan').AsString := ADOQueryTemp.fieldbyname('SCSMF').AsString;
- CDS_Sub.fieldbyname('C4BGQty').AsString := ADOQueryTemp.fieldbyname('QTY').AsString;
- CDS_Sub.fieldbyname('C6BGPrice').AsString := ADOQueryTemp.fieldbyname('Price').AsString;
- CDS_Sub.fieldbyname('C7BGMoney').AsString := ADOQueryTemp.fieldbyname('MXMONEY').AsString;
- CDS_Sub.fieldbyname('E3MaoZ').AsString := ADOQueryTemp.fieldbyname('FHKgQty').AsString;
- CDS_Sub.fieldbyname('E4JingZ').AsString := ADOQueryTemp.fieldbyname('FHKgnetQty').AsString;
- CDS_Sub.fieldbyname('bgcolor').AsString := ADOQueryTemp.fieldbyname('CPCOLOR').AsString;
- CDS_Sub.fieldbyname('bgecolor').AsString := ADOQueryTemp.fieldbyname('SCSECOLOR').AsString;
- CDS_Sub.fieldbyname('E1BZUNIT').AsString := ADOQueryTemp.fieldbyname('SCSCurrency').AsString;
- CDS_Sub.fieldbyname('C5BGUnit').AsString := ADOQueryTemp.fieldbyname('SCSUnit').AsString;
- CDS_Sub.fieldbyname('PS').AsString := ADOQueryTemp.fieldbyname('PS').AsString;
- CDS_Sub.fieldbyname('bs').AsString := ADOQueryTemp.fieldbyname('bs').AsString;
-
- CDS_Sub.fieldbyname('KuanNo').AsString := ADOQueryTemp.fieldbyname('SCSKX').AsString;
- CDS_Sub.fieldbyname('HXCODE').AsString := ADOQueryTemp.fieldbyname('SCSHX').AsString;
-
- CDS_Sub.fieldbyname('hscode').AsString := ADOQueryTemp.fieldbyname('hscode').AsString;
-
-// CDS_Sub.fieldbyname('BGTJ').AsString := ADOQueryTemp.fieldbyname('BGTJ').AsString;
-
- Post;
-
- end;
- Next;
- end;
- end;
-
- end;
- end;
- finally
- frmCHListsel2.Free;
- end;
- JSJE();
- SetXH();
-
-end;
-
-procedure TfrmJHDInPut.TV2CustomDrawIndicatorCell(Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGridIndicatorItemViewInfo; var ADone: Boolean);
-var
- FValue: string;
- FBounds: TRect;
-begin
- FBounds := AViewInfo.Bounds;
- if (AViewInfo is TcxGridIndicatorRowItemViewInfo) then
- begin
- ACanvas.FillRect(FBounds);
- ACanvas.DrawComplexFrame(FBounds, clBtnHighlight, clBtnShadow, [bBottom, bLeft, bRight], 1);
- FValue := IntToStr(TcxGridIndicatorRowItemViewInfo(AViewInfo).GridRecord.Index + 1);
- InflateRect(FBounds, -1, -1); //Platform specific. May not work on Linux.
- ACanvas.Font.Color := clBlack;
- ACanvas.Brush.Style := bsClear;
- ACanvas.DrawText(FValue, FBounds, cxAlignCenter or cxAlignTop);
- ADone := True;
- end;
-end;
-
-procedure TfrmJHDInPut.ToolButton6Click(Sender: TObject);
-begin
- if CDS_JJ.IsEmpty then
- Exit;
- if Trim(CDS_JJ.fieldbyname('JJID').AsString) <> '' then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM YF_MONEY_CR ');
- sql.Add(' where YFID=''J''+ ''' + Trim(CDS_JJ.fieldbyname('JJID').AsString) + '''');
- SQL.Add('AND STATUS=''1''');
- OPEN;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- Application.MessageBox('ˣֹɾ!', 'ʾ', 0);
- Exit;
- end;
-
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('DELETE JHD_JJ ');
- sql.Add(' where JJID=''' + Trim(CDS_JJ.fieldbyname('JJID').AsString) + '''');
-
- sql.Add('DELETE YF_MONEY_CR ');
- sql.Add(' where YFID=''J'' +''' + Trim(CDS_JJ.fieldbyname('JJID').AsString) + '''');
- sql.Add('DELETE YF_MONEY_CR_SUB ');
- sql.Add(' where YFID=''J'' +''' + Trim(CDS_JJ.fieldbyname('JJID').AsString) + '''');
- ExecSQL;
- end;
-
- end;
- CDS_JJ.Delete;
- JSJE();
-end;
-
-procedure TfrmJHDInPut.ToolButton5Click(Sender: TObject);
-begin
- with CDS_JJ do
- begin
- Append;
- FieldByName('FYTYPE').Value := '';
- FieldByName('FYMONEY').Value := 0;
- post;
- end;
-end;
-
-procedure TfrmJHDInPut.cxGridDBColumn3PropertiesEditValueChanged(Sender: TObject);
-begin
- JSJE();
-end;
-
-procedure TfrmJHDInPut.YSDJChange(Sender: TObject);
-begin
- JSJE();
-end;
-
-procedure TfrmJHDInPut.TV2Column2PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FBILI, FQTY, FMONEY: string;
-begin
-// FName := Trim(Tv2.Controller.FocusedColumn.DataBinding.FilterFieldName);
-// mvalue := TcxTextEdit(Sender).EditingText;
-// if Trim(mvalue) = '' then
-// begin
-// mvalue := '0';
-// end;
-// with CDS_JJ do
-// begin
-// Edit;
-// FieldByName(FName).Value := mvalue;
-// Post;
-// end;
-//
-// if TV1.DataController.Summary.FooterSummaryValues[1] <> NULL then
-// FQTY := TV1.DataController.Summary.FooterSummaryValues[1]
-// else
-// FQTY := '0';
-// FBILI := Trim(CDS_JJ.fieldbyname('BILI').AsString);
-//
-// if Trim(FBILI) = '' then
-// begin
-// FBILI := '0';
-// end;
-// if Trim(FQTY) = '' then
-// begin
-// FQTY := '0';
-// end;
-//
-// with CDS_JJ do
-// begin
-// Edit;
-// FieldByName('FYMONEY').Value := StrToFloat(FBILI) * StrToFloat(FQTY) / 100;
-//
-// Post;
-// end;
- JSJE();
-end;
-
-procedure TfrmJHDInPut.ToolButton7Click(Sender: TObject);
-begin
- if Panel3.Visible = true then
- begin
- Panel3.Visible := false;
- end
- else
- begin
- Panel3.Visible := True;
- end;
-
-end;
-
-procedure TfrmJHDInPut.JDDATEBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
-
- flag := Copy(fsj, 1, FWZ - 1);
-// ShowMessage(flag);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- TBAdd.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- TBSave.Visible := False;
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.SHFSBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
-
- flag := Copy(fsj, 1, FWZ - 1);
-// ShowMessage(flag);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- TBAdd.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- TBSave.Visible := False;
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'LCTOPlace') or (flag = 'LCFromPlace') or (flag = 'YSFS') then
- begin
- fnote := True;
- V1Note.Caption := 'ע';
- V1Name.Caption := '';
-// V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'SHFS') then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'ջ㷽ʽ';
-// V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-// if (flag = 'B6ChuYunGang') or (flag = 'B7DaoHuoGang') or (flag = 'ZMXingZhi') then
-// begin
-// fnote := True;
-// V1Note.Caption := 'ע';
-//// V1Name.Caption := 'Ӣ';
-// end
-// else
-// begin
-// fnote := false;
-// end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- if (flag = 'SHFS') then
- begin
- days.Text := Trim(ClientDataSet1.fieldbyname('note').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1Column14PropertiesEditValueChanged(Sender: TObject);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'GRADE';
- flagname := 'ȼ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('GRADE').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.ToolButton8Click(Sender: TObject);
-var
- i: Integer;
-begin
- if CDS_Sub.IsEmpty = False then
- begin
- CopyAddRowCDS(CDS_Sub);
- with CDS_Sub do
- begin
- Edit;
- i := CDS_Sub.RecordCount;
-// Self.CDS_Sub.FieldByName('XHInt').Value := i + 1;
- Self.CDS_Sub.FieldByName('XHNO').Value := Self.CDS_Sub.FieldByName('XHNO').AsFloat + 0.5;
- FieldByName('JHSID').Value := null;
- post;
- end;
- end
- else
- begin
- Exit;
- end;
- SetXH();
-end;
-
-procedure TfrmJHDInPut.Button1Click(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
- if ShowModal = 1 then
- begin
-// self.FKR.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
-
- self.FKR.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString) + #$d#$a + Trim(CDS_HZ.fieldbyname('COADDRESS').AsString);
-
-// self.FKR.Text := '1' + #13 + '2';
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmJHDInPut.ToolButton9Click(Sender: TObject);
-var
- i: Integer;
-begin
- if CDS_Sub.IsEmpty = False then
- begin
- CopyAddRowCDS(CDS_Sub);
- with CDS_Sub do
- begin
- Edit;
- i := CDS_Sub.RecordCount;
-// Self.CDS_Sub.FieldByName('XHInt').Value := i + 1;
- Self.CDS_Sub.FieldByName('XHNO').Value := Self.CDS_Sub.FieldByName('XHNO').AsFloat - 0.5;
- FieldByName('JHSID').Value := null;
- post;
- end;
- end
- else
- begin
- Exit;
- end;
- SetXH();
-end;
-
-procedure TfrmJHDInPut.ToolButton10Click(Sender: TObject);
-begin
-
- if CDS_Sub.IsEmpty then
- exit;
- if CDS_Sub.fieldbyname('JHsID').AsString <> '' then
- begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Sub do
- begin
-
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('update JHD_SUB SET COLOR= ' + quotedstr(Trim(ColorToString(ColorBox1.Selected))));
- sql.Add('where JHSID =' + quotedstr(trim(CDS_SUB.fieldbyname('JHSID').AsString)));
- execsql;
- end;
-
- EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
-
- except
- ADOQueryCmd.Connection.RollbackTrans;
- application.MessageBox('ʧܣ', 'ʾϢ', 0);
- end;
- end;
-
- with CDS_Sub do
- begin
- Edit;
- FieldByName('color').AsString := ColorToString(ColorBox1.selected);
- Post;
- end;
-end;
-
-procedure TfrmJHDInPut.Tv1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if AViewInfo.GridRecord.Values[Tv1Column18.Index] <> null then
- begin
- ACanvas.Brush.Color := StringToColor(AViewInfo.GridRecord.Values[Tv1Column18.Index]);
- end;
-end;
-
-procedure TfrmJHDInPut.ToolButton11Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- exit;
- if CDS_Sub.fieldbyname('JHsID').AsString <> '' then
- begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Sub do
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('update JHD_SUB SET COLOR=NULL');
- sql.Add('where JHSID =' + quotedstr(trim(CDS_SUB.fieldbyname('JHSID').AsString)));
- execsql;
- end;
- EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- application.MessageBox('ʧܣ', 'ʾϢ', 0);
- end;
- end;
-
- with CDS_Sub do
- begin
- Edit;
- FieldByName('color').VALUE := NULL;
- Post;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDMAKELIST.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDMAKELIST.dfm
deleted file mode 100644
index 87e669f..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDMAKELIST.dfm
+++ /dev/null
@@ -1,1265 +0,0 @@
-object frmJHDMAKEList: TfrmJHDMAKEList
- Left = 146
- Top = 86
- Width = 1366
- Height = 670
- Caption = #32467#27719#21333#21046#20316#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1358
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 107
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object TBAdd: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 1
- OnClick = TBAddClick
- end
- object TBEdit: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBCopy: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #22797#21046
- ImageIndex = 38
- OnClick = TBCopyClick
- end
- object TBView: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = TBViewClick
- end
- object ToolButton4: TToolButton
- Left = 378
- Top = 0
- AutoSize = True
- Caption = #20462#25913#19994#21153#21592
- ImageIndex = 22
- Visible = False
- OnClick = ToolButton4Click
- end
- object ToolButton2: TToolButton
- Left = 477
- Top = 0
- AutoSize = True
- Caption = #30452#25509#23548#20986
- ImageIndex = 22
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 564
- Top = 0
- AutoSize = True
- Caption = #25171#21360#21333#35777
- ImageIndex = 4
- OnClick = ToolButton1Click
- end
- object Panel2: TPanel
- Left = 651
- Top = 2
- Width = 106
- Height = 26
- AutoSize = True
- TabOrder = 0
- object ComboBox1: TComboBox
- Left = 1
- Top = 1
- Width = 104
- Height = 24
- Style = csDropDownList
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 0
- end
- end
- object ToolButton3: TToolButton
- Left = 757
- Top = 0
- AutoSize = True
- Caption = #25171#21360#65288'word'#65289
- ImageIndex = 4
- OnClick = ToolButton3Click
- end
- object TBDel: TToolButton
- Left = 868
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- OnClick = TBDelClick
- end
- object TBExport: TToolButton
- Left = 931
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 994
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1358
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label6: TLabel
- Left = 348
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 205
- Top = 35
- Width = 24
- Height = 12
- Caption = #20844#21496
- end
- object Label4: TLabel
- Left = 181
- Top = 12
- Width = 48
- Height = 12
- Caption = #25351#31034#21333#21495
- end
- object Label1: TLabel
- Left = 372
- Top = 34
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 77
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 414
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnKeyPress = BGTAITOUKeyPress
- end
- object BGTAITOU: TEdit
- Tag = 2
- Left = 233
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = BGTAITOUKeyPress
- end
- object hZORDERNO: TEdit
- Tag = 2
- Left = 233
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 4
- OnKeyPress = BGTAITOUKeyPress
- end
- object ComboBox2: TComboBox
- Left = 4
- Top = 8
- Width = 74
- Height = 20
- ItemHeight = 12
- ItemIndex = 0
- TabOrder = 5
- Text = #21046#21333#26102#38388
- OnChange = ComboBox2Change
- Items.Strings = (
- #21046#21333#26102#38388
- #33337#26399)
- end
- object ywy: TEdit
- Tag = 2
- Left = 414
- Top = 30
- Width = 100
- Height = 20
- TabOrder = 6
- OnKeyPress = BGTAITOUKeyPress
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1358
- Height = 548
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = TV1CustomDrawCell
- OnFocusedRecordChanged = TV1FocusedRecordChanged
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = TV1Column9
- end
- item
- Kind = skSum
- Column = TV1Column2
- end
- item
- Kind = skSum
- Column = TV1Column3
- end
- item
- Kind = skSum
- Column = TV1Column5
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 68
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #22806#38144#21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 107
- end
- object tv2Column3: TcxGridDBColumn
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'hZORDERNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 91
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 69
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #23458#25143
- DataBinding.FieldName = 'KHName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 90
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #24635#37329#39069
- DataBinding.FieldName = 'ZMONEY'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 76
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #20184#27454#26399#38480
- DataBinding.FieldName = 'DAYS'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 81
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #24065#31181
- DataBinding.FieldName = 'JSBZ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 68
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #24635#25968#37327
- DataBinding.FieldName = 'C4BGQtyHZ'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column3: TcxGridDBColumn
- Caption = #27611#37325
- DataBinding.FieldName = 'E3MaoZHZ'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column5: TcxGridDBColumn
- Caption = #20928#37325
- DataBinding.FieldName = 'E4JingZHZ'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column1: TcxGridDBColumn
- Caption = #20307#31215
- DataBinding.FieldName = 'BGTJHZ'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #20215#26684#26465#27454
- DataBinding.FieldName = 'OrdConPrcNote'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 88
- end
- object TV1Column6: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #21046#21333#20154
- DataBinding.FieldName = 'FILLER'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 76
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #33337#26399
- DataBinding.FieldName = 'chuandate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- Properties.OnChange = TV1Column13PropertiesChange
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 74
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 70
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object Panel3: TPanel
- Left = 420
- Top = 164
- Width = 237
- Height = 129
- TabOrder = 3
- Visible = False
- object Label10: TLabel
- Left = 25
- Top = 21
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object YWYNAME: TComboBox
- Tag = 2
- Left = 79
- Top = 18
- Width = 100
- Height = 24
- DropDownCount = 20
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 0
- OnDropDown = YWYNAMEDropDown
- end
- object Button1: TButton
- Left = 12
- Top = 60
- Width = 75
- Height = 25
- Caption = #30830' '#35748
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 136
- Top = 60
- Width = 75
- Height = 25
- Caption = #20851' '#38381
- TabOrder = 2
- OnClick = Button2Click
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1000
- Top = 228
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 785
- Top = 173
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 350
- Top = 252
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 540
- Top = 345
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- ShowPrintDialog = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 286
- Top = 406
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 512
- Top = 344
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 568
- Top = 344
- end
- object cxStyleRepository1: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle1: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #40657#20307
- Font.Style = [fsBold]
- end
- end
- object CDS_LABEL: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 679
- Top = 232
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = False
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 225
- Top = 208
- end
- object CDS_HZ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 521
- Top = 401
- end
- object RMDBHZ: TRMDBDataSet
- Visible = True
- DataSet = CDS_HZ
- Left = 581
- Top = 429
- end
- object frxReport1: TfrxReport
- Version = '5.6.1'
- DataSetName = 'frxDBDataset1'
- DotMatrixReport = False
- IniFile = '\Software\Fast Reports'
- PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
- PreviewOptions.Zoom = 1.000000000000000000
- PrintOptions.Printer = 'Default'
- PrintOptions.PrintOnSheet = 0
- ReportOptions.CreateDate = 44867.508200914400000000
- ReportOptions.LastChange = 44870.428269583330000000
- ScriptLanguage = 'PascalScript'
- ScriptText.Strings = (
- 'begin'
- ''
- 'end.')
- Left = 245
- Top = 467
- Datasets = <
- item
- end
- item
- end>
- Variables = <>
- Style = <>
- object Data: TfrxDataPage
- Height = 1000.000000000000000000
- Width = 1000.000000000000000000
- end
- object Page1: TfrxReportPage
- PaperWidth = 210.000000000000000000
- PaperHeight = 297.000000000000000000
- PaperSize = 9
- LeftMargin = 10.000000000000000000
- RightMargin = 10.000000000000000000
- TopMargin = 10.000000000000000000
- BottomMargin = 10.000000000000000000
- object MasterData1: TfrxMasterData
- FillType = ftBrush
- Height = 332.598640000000000000
- Top = 283.464750000000000000
- Width = 718.110700000000000000
- AllowSplit = True
- RowCount = 0
- object Memo15: TfrxMemoView
- Left = 3.779530000000000000
- Top = 7.559060000000000000
- Width = 169.506193940000000000
- Height = 68.031540000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- '[frxDBDataset2."zhumaitou"]')
- ParentFont = False
- end
- object Memo16: TfrxMemoView
- Left = 177.637910000000000000
- Top = 34.015770000000000000
- Width = 328.246453940000000000
- Height = 64.252010000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- Memo.UTF8 = (
-
- 'ITEM: [frxDBDataset2."C3BGname"] [frxDBDataset2."C3BGnameEng"] ' +
- ' [frxDBDataset2."ywnote"] [frxDBDataset2."conno"]')
- ParentFont = False
- VAlign = vaCenter
- Formats = <
- item
- end
- item
- end
- item
- end
- item
- end>
- end
- object Memo17: TfrxMemoView
- Left = 502.677490000000000000
- Top = 37.795300000000000000
- Width = 211.081023940000000000
- Height = 75.590600000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- ' ')
- ParentFont = False
- VAlign = vaBottom
- Formats = <
- item
- end
- item
- end
- item
- end
- item
- end>
- end
- object Memo19: TfrxMemoView
- Left = 173.858380000000000000
- Top = 113.385900000000000000
- Width = 328.246453940000000000
- Height = 222.992270000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- 'COMP:[frxDBDataset2."YSChenFen"]')
- ParentFont = False
- end
- object Memo21: TfrxMemoView
- Left = 181.417440000000000000
- Top = 7.559060000000000000
- Width = 196.535560000000000000
- Height = 26.456710000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- '1111111')
- ParentFont = False
- end
- end
- object ColumnHeader1: TfrxColumnHeader
- FillType = ftBrush
- Height = 204.094620000000000000
- Top = 18.897650000000000000
- Width = 718.110700000000000000
- object Memo2: TfrxMemoView
- ShiftMode = smWhenOverlapped
- Left = 3.779530000000000000
- Top = 18.897650000000000000
- Width = 714.331170000000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- '[frxDBDataset1."gsdz"]')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo3: TfrxMemoView
- Left = 3.779530000000000000
- Top = 37.795300000000000000
- Width = 714.331170000000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- '*** COMMERCIAL INVOICE ***')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo4: TfrxMemoView
- Left = 7.559060000000000000
- Top = 56.692950000000000000
- Width = 37.795300000000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- 'TO')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo5: TfrxMemoView
- Left = 45.354360000000000000
- Top = 56.692950000000000000
- Width = 264.567100000000000000
- Height = 64.252010000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- ' [frxDBDataset1."fkr"]')
- ParentFont = False
- end
- object Memo6: TfrxMemoView
- Left = 408.761896060000000000
- Top = 56.692950000000000000
- Width = 165.726663940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haRight
- Memo.UTF8 = (
- 'INVOICE NO.:')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo7: TfrxMemoView
- Left = 408.189240000000000000
- Top = 79.370130000000000000
- Width = 169.506193940000000000
- Height = 30.236240000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- 'SALE CONFIRMATION NO.:')
- ParentFont = False
- WordWrap = False
- VAlign = vaCenter
- end
- object Memo8: TfrxMemoView
- Left = 408.189240000000000000
- Top = 113.385900000000000000
- Width = 169.506193940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haRight
- Memo.UTF8 = (
- 'DATE.:')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo9: TfrxMemoView
- Left = 578.840746060000000000
- Top = 56.692950000000000000
- Width = 139.269953940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- ' [frxDBDataset1."A4fpNo"]')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo10: TfrxMemoView
- Left = 578.268090000000000000
- Top = 79.370130000000000000
- Width = 139.269953940000000000
- Height = 30.236240000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- '[frxDBDataset1."A6PONO"]')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo12: TfrxMemoView
- Left = 7.559060000000000000
- Top = 139.842610000000000000
- Width = 169.506193940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- 'SHIPPING MARKS')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo13: TfrxMemoView
- Left = 177.637910000000000000
- Top = 139.842610000000000000
- Width = 328.246453940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- 'QUANTITY AND DESCRIPTION OF GOODS')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo14: TfrxMemoView
- Left = 506.457020000000000000
- Top = 139.842610000000000000
- Width = 211.081023940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- 'AMOUNT')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo1: TfrxMemoView
- Left = 3.779530000000000000
- Width = 714.331170000000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- HAlign = haCenter
- Memo.UTF8 = (
- '[frxDBDataset1."sellname"]')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo11: TfrxMemoView
- Left = 177.637910000000000000
- Top = 173.858380000000000000
- Width = 328.246453940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- Memo.UTF8 = (
- '[frxDBDataset1."sellnote"]')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo18: TfrxMemoView
- Left = 506.457020000000000000
- Top = 173.858380000000000000
- Width = 211.081023940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- '[frxDBDataset1."OrdConPrcNote"]')
- ParentFont = False
- VAlign = vaCenter
- Formats = <
- item
- end
- item
- end>
- end
- object Memo20: TfrxMemoView
- Left = 578.268090000000000000
- Top = 113.385900000000000000
- Width = 169.506193940000000000
- Height = 18.897650000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- '[frxDBDataset1."dydate"]')
- ParentFont = False
- VAlign = vaCenter
- end
- end
- object ColumnFooter1: TfrxColumnFooter
- FillType = ftBrush
- Height = 283.464750000000000000
- Top = 676.535870000000000000
- Width = 718.110700000000000000
- object Memo22: TfrxMemoView
- Left = 502.677490000000000000
- Width = 211.081023940000000000
- Height = 30.236240000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- HAlign = haCenter
- Memo.UTF8 = (
- 'TOTAL AMOUNT:')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo25: TfrxMemoView
- Left = 173.858380000000000000
- Top = 98.267780000000000000
- Width = 328.246453940000000000
- Height = 30.236240000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- '[frxDBDataset1."note"]')
- ParentFont = False
- VAlign = vaCenter
- end
- object Memo26: TfrxMemoView
- Left = 3.779530000000000000
- Top = 132.283550000000000000
- Width = 709.978983940000000000
- Height = 147.401670000000000000
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Times New Roman'
- Font.Style = []
- Memo.UTF8 = (
- '[frxDBDataset1."GSZH"]')
- ParentFont = False
- end
- end
- end
- end
- object frxDBDataset2: TfrxDBDataset
- UserName = 'frxDBDataset2'
- CloseDataSource = False
- DataSet = CDS_Print
- BCDToCurrency = False
- Left = 324
- Top = 474
- end
- object frxBIFFExport1: TfrxBIFFExport
- UseFileCache = True
- ShowProgress = True
- OverwritePrompt = False
- DataOnly = False
- RowHeightScale = 1.000000000000000000
- ChunkSize = 0
- Inaccuracy = 10.000000000000000000
- FitPages = False
- Pictures = True
- ParallelPages = 0
- Left = 736
- Top = 388
- end
- object frxDOCXExport1: TfrxDOCXExport
- UseFileCache = True
- ShowProgress = True
- OverwritePrompt = False
- DataOnly = False
- OpenAfterExport = False
- PictureType = gpPNG
- Left = 716
- Top = 373
- end
- object frxXLSXExport1: TfrxXLSXExport
- UseFileCache = True
- ShowProgress = True
- OverwritePrompt = False
- DataOnly = False
- ChunkSize = 0
- PictureType = gpPNG
- Left = 703
- Top = 360
- end
- object frxPDFExport1: TfrxPDFExport
- UseFileCache = True
- ShowProgress = True
- OverwritePrompt = False
- DataOnly = False
- PrintOptimized = False
- Outline = False
- Background = False
- HTMLTags = True
- Quality = 95
- Transparency = False
- Author = 'FastReport'
- Subject = 'FastReport PDF export'
- ProtectionFlags = [ePrint, eModify, eCopy, eAnnot]
- HideToolbar = False
- HideMenubar = False
- HideWindowUI = False
- FitWindow = False
- CenterWindow = False
- PrintScaling = False
- PdfA = False
- Left = 692
- Top = 347
- end
- object frxJPEGExport1: TfrxJPEGExport
- UseFileCache = True
- ShowProgress = True
- OverwritePrompt = False
- DataOnly = False
- Left = 680
- Top = 338
- end
- object frxRTFExport1: TfrxRTFExport
- UseFileCache = True
- ShowProgress = True
- OverwritePrompt = False
- DataOnly = False
- PictureType = gpPNG
- Wysiwyg = True
- Creator = 'FastReport'
- SuppressPageHeadersFooters = False
- HeaderFooterMode = hfText
- AutoSize = False
- Left = 669
- Top = 324
- end
- object frxDBDataset1: TfrxDBDataset
- UserName = 'frxDBDataset1'
- CloseDataSource = False
- DataSet = CDS_Print
- BCDToCurrency = False
- Left = 329
- Top = 438
- end
- object frxDBDataset3: TfrxDBDataset
- UserName = 'frxDBDataset3'
- CloseDataSource = False
- DataSet = CDS_HZ
- BCDToCurrency = False
- Left = 356
- Top = 439
- end
- object frxDBDataset4: TfrxDBDataset
- UserName = 'frxDBDataset4'
- CloseDataSource = False
- DataSet = CDS_HZ
- BCDToCurrency = False
- Left = 347
- Top = 475
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDMAKELIST.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDMAKELIST.pas
deleted file mode 100644
index ce0c1e4..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_JHDMAKELIST.pas
+++ /dev/null
@@ -1,1632 +0,0 @@
-unit U_JHDMAKELIST;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, Registry, frxExportRTF, frxExportImage,
- frxExportPDF, frxExportXLSX, frxExportDOCX, frxClass, frxExportBIFF, frxDBSet,
- dxSkinsCore, dxSkinsDefaultPainters, dxSkinscxPCPainter;
-
-type
- TfrmJHDMAKEList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- TBDel: TToolButton;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- TBAdd: TToolButton;
- TBEdit: TToolButton;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- BGTAITOU: TEdit;
- TBCopy: TToolButton;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- TBView: TToolButton;
- Label4: TLabel;
- hZORDERNO: TEdit;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- ToolButton1: TToolButton;
- Panel2: TPanel;
- ComboBox1: TComboBox;
- CDS_LABEL: TClientDataSet;
- ToolButton2: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_HZ: TClientDataSet;
- RMDBHZ: TRMDBDataSet;
- ToolButton3: TToolButton;
- frxReport1: TfrxReport;
- frxDBDataset2: TfrxDBDataset;
- frxBIFFExport1: TfrxBIFFExport;
- frxDOCXExport1: TfrxDOCXExport;
- frxXLSXExport1: TfrxXLSXExport;
- frxPDFExport1: TfrxPDFExport;
- frxJPEGExport1: TfrxJPEGExport;
- frxRTFExport1: TfrxRTFExport;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- tv2Column1: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- tv2Column3: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- TV1Column2: TcxGridDBColumn;
- TV1Column3: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- TV1Column1: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- TV1Column6: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- frxDBDataset1: TfrxDBDataset;
- frxDBDataset3: TfrxDBDataset;
- frxDBDataset4: TfrxDBDataset;
- TV1Column8: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- ComboBox2: TComboBox;
- TV1Column14: TcxGridDBColumn;
- Label1: TLabel;
- ywy: TEdit;
- Panel3: TPanel;
- Label10: TLabel;
- YWYNAME: TComboBox;
- Button1: TButton;
- Button2: TButton;
- ToolButton4: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBAddClick(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure BGTAITOUKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBSSClick(Sender: TObject);
- procedure TBSSCXClick(Sender: TObject);
- procedure TBHDClick(Sender: TObject);
- procedure TBHDCXClick(Sender: TObject);
- procedure TBSHClick(Sender: TObject);
- procedure TBSHCXClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure ToolButton1Click(Sender: TObject);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure Button7Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure ZordernoChange(Sender: TObject);
- procedure ZordernoKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton2Click(Sender: TObject);
- procedure TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- procedure ComboBox2Change(Sender: TObject);
- procedure YWYNAMEDropDown(Sender: TObject);
- procedure Button2Click(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure TV1Column13PropertiesChange(Sender: TObject);
-
-
-// procedure img1Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- function GetShellFolders(strDir: string): string;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- procedure InitPrtData();
- procedure PrintMD(MStatus: string);
- { Private declarations }
- public
- canshu1, canshu3: string;
- FDY: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_Fun, U_JHDInPut;
-
-{$R *.dfm}
-procedure TfrmJHDMAKEList.PrintMD(MStatus: string);
-var
- fImagePath2, fPrintFile, fPrintFile10, FMainID, FKHName, FFPNo: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
-// FMainID := '';
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(ComboBox1.Text) + '.rmf';
- ExportFtErpFile(trim(ComboBox1.Text) + '.rmf', ADOQueryTemp);
-
- if CDS_Label.Locate('LMName', trim(ComboBox1.Text), []) then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.add('exec ' + trim(CDS_Label.fieldbyname('LMSql').AsString) + ' @FPNO=' + quotedstr(Trim(CDS_Main.fieldbyname('A4FPNO').AsString)));
-// sql.add('exec ' + trim(CDS_Label.fieldbyname('LMSql').AsString) + ' @CKOrdNo=' + quotedstr(Trim(CDS_Main.fieldbyname('CKOrdNo').AsString)));
-
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_PRINT);
- SInitCDSData20(ADOQueryPrint, CDS_PRINT);
- end;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.add('exec P_Print_CWMD3 @FPNO=' + quotedstr(Trim(CDS_Main.fieldbyname('A4FPNO').AsString)));
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_hz);
- SInitCDSData20(ADOQueryPrint, CDS_hz);
-
- if FileExists(fPrintFile) then
- begin
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- RM1.LoadFromFile(fPrintFile);
- RMVariables['ZDR'] := trim(DName);
- RM1.ShowReport;
-
- end
- else
- begin
- Application.MessageBox(PChar('ûҵ' + fPrintFile), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmJHDMAKEList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmJHDMAKEList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := EndDate.DateTime - 90;
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmJHDMAKEList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select * from (');
- sql.Add('select A.* ');
- SQL.Add(',hZORDERNO=cast((select DISTINCT B.ORDERNO+'';'' from JHD_SUB B where A.JHID=B.JHID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
- sql.Add(',C4BGQtyHZ=(select Sum(C4BGQty) from JHD_SUB B where B.JHID=A.JHID and B.SValid=''Y'' )');
- sql.Add(',BGTJHZ=(select Sum(BGTJ) from JHD_SUB B where B.JHID=A.JHID and B.SValid=''Y'' )');
-// SQL.Add(',ZGCNAME=cast((select B.GCNAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZC3BGNameEng=cast((select B.C3BGNameEng+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZBGCODENAME=cast((select B.BGCODENAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-
- sql.Add(' from JHD_MAIN A ');
- sql.Add(' where A.Valid=''Y'' ');
-// sql.Add(fwhere);
-
-
- sql.Add(')AA WHERE 1=1');
- sql.Add(fwhere);
- if ComboBox2.Text = 'Ƶʱ' then
- begin
- sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('ORDER BY CHUANDATE ,htdate DESC');
- end
- else
- begin
- sql.Add(' and CHUANDATE>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and CHUANDATE<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('ORDER BY CHUANDATE ,FILLTIME DESC');
- end;
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmJHDMAKEList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, 'ع7');
-
- Close;
-end;
-
-procedure TfrmJHDMAKEList.FormShow(Sender: TObject);
-var
- fsj: string;
-begin
- fsj := 'select distinct(LMName) name from Lbael_Map where LMType=''֤'' ';
- SInitComBoxBySql(ADOQueryCmd, ComboBox1, true, fsj);
-
- with ADOQueryTemp do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- Sql.Add('select * from Lbael_Map where LMType=''֤''');
-
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_Label);
- SInitCDSData20(ADOQueryTemp, CDS_Label);
- ReadCxGrid('' + self.Caption, Tv1, 'ع7');
-//
-// canshu1 := Trim(DParameters1);
-//// ShowMessage(canshu1);
-//
-// InitGrid();
-// RM1.CanExport := true;
-end;
-
-procedure TfrmJHDMAKEList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- Exit;
- SelExportData(Tv1, ADOQueryMain, '㵥б');
-
-end;
-
-function TfrmJHDMAKEList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmJHDMAKEList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmJHDMAKEList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmJHDMAKEList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmJHDMAKEList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_SUB where JHID=''' + Trim(CDS_Main.fieldbyname('JHID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JHD_SUB where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-procedure TfrmJHDMAKEList.TBDelClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- if DelData() then
- begin
- InitGrid();
- end;
-end;
-
-function TfrmJHDMAKEList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JHD_MAIN Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where JHId=''' + Trim(CDS_Main.fieldbyname('JHId').AsString) + '''');
- sql.Add('UPdate JHD_SUB Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where JHId=''' + Trim(CDS_Main.fieldbyname('JHId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('㵥ɾ')));
- sql.Add(',' + quotedstr(trim('Ʊţ' + trim(CDS_Main.FieldByName('A4FPNO').AsString))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBAddClick(Sender: TObject);
-begin
- try
- frmJHDInPut := tfrmJHDInPut.Create(Application);
- with frmJHDInPut do
- begin
- FBCId := '';
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmJHDInPut.Free;
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBEditClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from YF_Money_CR_Sub A INNER JOIN YF_Money_CR B ON A.YFID=B.YFID WHERE SUBWXFPNO=' + QuotedStr(Trim(CDS_Main.fieldbyname('A4FPNO').AsString)));
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- Application.MessageBox('ˮֹ!', 'ʾ', 0);
- Exit;
- end;
- try
- frmJHDInPut := tfrmJHDInPut.Create(Application);
- with frmJHDInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('JHID').AsString);
-
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmJHDInPut.Free;
- end;
-end;
-
-procedure TfrmJHDMAKEList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmJHDMAKEList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmJHDMAKEList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmJHDMAKEList.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- if Trim(A4FPNO.Text) = '' then
- Exit;
- fsj := ' and isnull(A.A4FPNO,'''') like ''' + '%' + Trim(A4FPNO.Text) + '%' + '''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmJHDMAKEList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmJHDMAKEList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmJHDMAKEList.BGTAITOUKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- InitGrid();
-
- end;
-end;
-
-procedure TfrmJHDMAKEList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmJHDMAKEList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmJHDInPut := tfrmJHDInPut.Create(Application);
- with frmJHDInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('JHID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmJHDInPut.Free;
- end;
-end;
-
-procedure TfrmJHDMAKEList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmJHDMAKEList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmJHDInPut := tfrmJHDInPut.Create(Application);
- with frmJHDInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('JHID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmJHDInPut.Free;
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBSSClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=getdate(),SChker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBSSCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('OKPerson').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('Ѻ˶Բܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=Null,SChker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBHDClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִк˶Բ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status=''Ѻ˶'',OKTime=getdate(),OKPerson=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBHDCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('Chker').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('˲ܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִк˶Գ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',OKtime=Null,OKPerson=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBSHClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBSHCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˳', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=Null,Chker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmJHDMAKEList.ToolButton1Click(Sender: TObject);
-begin
- PrintMD('Report');
-end;
-
-procedure TfrmJHDMAKEList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDMAKEList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmJHDMAKEList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmJHDMAKEList.Button7Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
-
- if canshu3 = 'ҵԱ' then
- begin
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '(ҵ).rmf';
- ExportFtErpFile(Trim(LBName) + '(ҵ).rmf', ADOQueryPrint);
- end
- else
- begin
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf';
- ExportFtErpFile(Trim(LBName) + '.rmf', ADOQueryPrint);
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete TBSubID where DName=''' + Trim(DCode) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM TBSubID where 1=2 ');
- open;
- end;
-
- CDS_Main.DisableControls;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if Fieldbyname('Ssel').AsBoolean then
- begin
-
- ADOQueryCmd.append;
- ADOQueryCmd.fieldbyname('SubId').Value := Trim(CDS_Main.fieldbyname('bgid').AsString);
- ADOQueryCmd.fieldbyname('Dname').Value := Trim(DCode);
- ADOQueryCmd.post;
- end;
- Next;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- end;
- CDS_Main.EnableControls;
- if LBName = 'Ʊ' then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD4 ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end
- else
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD2 ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end;
-
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if FDY = '0' then
- begin
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else if FDY = '1' then
- begin
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\' + Trim(CDS_Main.fieldbyname('orderno').AsString) + '.xls';
- ShowMessage(fImagePath2);
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
- end;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
-
-end;
-
-procedure TfrmJHDMAKEList.ToolButton3Click(Sender: TObject);
-var
- fImagePath2, fPrintFile, fPrintFile10, FMainID, FKHName, FFPNo: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- FMainID := '';
-
-// ExportFtErpFile(trim(ComboBox1.Text) + '.rmf', ADOQueryTemp);
-
- if CDS_Label.Locate('LMName', trim(ComboBox1.Text), []) then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.add('exec ' + trim(CDS_Label.fieldbyname('LMSql').AsString) + ' @FPNO=' + quotedstr(Trim(CDS_Main.fieldbyname('A4FPNO').AsString)));
-// sql.add('exec ' + trim(CDS_Label.fieldbyname('LMSql').AsString) + ' @CKOrdNo=' + quotedstr(Trim(CDS_Main.fieldbyname('CKOrdNo').AsString)));
-
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_PRINT);
- SInitCDSData20(ADOQueryPrint, CDS_PRINT);
- end;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.add('exec P_Print_CWMD3 @FPNO=' + quotedstr(Trim(CDS_Main.fieldbyname('A4FPNO').AsString)));
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_hz);
- SInitCDSData20(ADOQueryPrint, CDS_hz);
- frxDOCXExport1.FileName := '(' + Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ') INVOICE';
-
- frxRTFExport1.FileName := '(' + Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ') INVOICE';
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(ComboBox1.Text) + '.fr3';
- ExportFtErpFile(trim(ComboBox1.Text) + '.fr3', ADOQueryTemp);
-
-// fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\P.fr3';
- if FileExists(fPrintFile) then
- begin
-
- frxReport1.LoadFromFile(fPrintFile);
- frxReport1.ShowReport;
-
- end
- else
- begin
- Application.MessageBox(PChar('ûҵ' + fPrintFile), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.ZordernoChange(Sender: TObject);
-begin
- TBFind.Click();
-end;
-
-procedure TfrmJHDMAKEList.ZordernoKeyPress(Sender: TObject; var Key: Char);
-begin
-// 2123
-end;
-
-procedure TfrmJHDMAKEList.ToolButton2Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(ComboBox1.Text) + '.rmf';
- ExportFtErpFile(Trim(ComboBox1.Text) + '.rmf', ADOQueryPrint);
-
- if CDS_Label.Locate('LMName', trim(ComboBox1.Text), []) then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.add('exec ' + trim(CDS_Label.fieldbyname('LMSql').AsString) + ' @FPNO=' + quotedstr(Trim(CDS_Main.fieldbyname('A4FPNO').AsString)));
-// sql.add('exec ' + trim(CDS_Label.fieldbyname('LMSql').AsString) + ' @CKOrdNo=' + quotedstr(Trim(CDS_Main.fieldbyname('CKOrdNo').AsString)));
-
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_PRINT);
- SInitCDSData20(ADOQueryPrint, CDS_PRINT);
- end;
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- RMXLSExport1.ShowDialog := False;
-// RMXLSExport1.ShowAfterExport := False;
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := GetShellFolders('Desktop') + '\(' + Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ') INVOICE' + '.xls';
-// ShowMessage(fImagePath2);
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
-
-end;
-
-procedure TfrmJHDMAKEList.TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if (AViewInfo.GridRecord.Values[TV1Column13.Index] = NULL) then
- begin
-
- ACanvas.font.Color := clRed;
-
- end;
-end;
-
-procedure TfrmJHDMAKEList.ComboBox2Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmJHDMAKEList.YWYNAMEDropDown(Sender: TObject);
-begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM SY_User WHERE Udept LIKE ''%ͷ%'' ');
-
- Open;
- end;
- YWYname.Items.Clear;
- while not ADOQueryTemp.eof do
- begin
- YWYname.Items.Add(Trim(ADOQueryTemp.fieldbyname('username').AsString));
- ADOQueryTemp.next;
- end;
-end;
-
-procedure TfrmJHDMAKEList.Button2Click(Sender: TObject);
-begin
- Panel3.Visible := False;
-end;
-
-procedure TfrmJHDMAKEList.Button1Click(Sender: TObject);
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- try
-
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JHD_MAIN Set ywy=' + QuotedStr(Trim(ywyname.Text)));
- sql.Add(' where JHId=''' + Trim(CDS_Main.fieldbyname('JHId').AsString) + '''');
-
- sql.Add('insert into SY_SysLog(operor,opertime,Model,acction,opevent,result) values( ');
- sql.Add(' ' + quotedstr(trim(DName)));
- sql.Add(',getdate() ');
- sql.Add(',' + quotedstr(trim(self.Caption)));
- sql.Add(',' + quotedstr(trim('㵥ҵԱ')));
- sql.Add(',' + quotedstr(trim('Ʊţ' + trim(CDS_Main.FieldByName('A4FPNO').AsString) + ';ԭҵԱ' + trim(CDS_Main.FieldByName('ywy').AsString) + ';ҵԱ' + trim(ywyname.Text))));
- sql.Add(',' + quotedstr(trim('ɹ')));
- sql.Add(')');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ijɹ', 'ʾ', 0);
- InitGrid();
- panel3.Visible := false;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
-
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmJHDMAKEList.ToolButton4Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- Panel3.Visible := True;
-end;
-
-procedure TfrmJHDMAKEList.TV1Column13PropertiesChange(Sender: TObject);
-var
- mvalue, FFieldName: string;
-begin
-
- mvalue := TcxTextEdit(Sender).EditingText;
- FFieldName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- with CDS_Main do
- begin
- Edit;
- FieldByName(FFieldName).Value := mvalue;
- Post;
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JHD_MAIN Set ' + FFieldName + '=' + QuotedStr(Trim(mvalue)));
-// sql.add(',KPDATE=' + quotedstr(FormatDateTime('yyyy-MM-dd', kpdate.DateTime)));
- sql.Add(' where jhid=''' + Trim(CDS_Main.fieldbyname('JHID').AsString) + '''');
-// ShowMessage(SQL.Text);
- ExecSQL;
-
- end;
-
- tv1.Controller.EditingController.ShowEdit();
-
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_MGFYBB.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_MGFYBB.dfm
deleted file mode 100644
index 8ad0478..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_MGFYBB.dfm
+++ /dev/null
@@ -1,515 +0,0 @@
-object frmCHList: TfrmCHList
- Left = 132
- Top = 116
- Width = 1384
- Height = 670
- Caption = #20986#36135#28165#21333
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1368
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = TBFindClick
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 26
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1368
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #26597#35810#26102#38388
- end
- object Label6: TLabel
- Left = 348
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 205
- Top = 35
- Width = 24
- Height = 12
- Caption = #24037#21378
- end
- object Label8: TLabel
- Left = 522
- Top = 11
- Width = 48
- Height = 12
- Caption = #23458#25143#21517#31216
- end
- object Label3: TLabel
- Left = 522
- Top = 34
- Width = 48
- Height = 12
- Caption = #25253#20851#21697#21517
- end
- object Label2: TLabel
- Left = 372
- Top = 36
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- end
- object Label4: TLabel
- Left = 181
- Top = 12
- Width = 48
- Height = 12
- Caption = #25351#31034#21333#21495
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 77
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 414
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnChange = FactoryNameChange
- OnKeyPress = A4FPNOKeyPress
- end
- object GCNAME: TEdit
- Tag = 2
- Left = 233
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnChange = FactoryNameChange
- OnKeyPress = GCNAMEKeyPress
- end
- object KHName: TEdit
- Tag = 2
- Left = 574
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 4
- OnChange = FactoryNameChange
- end
- object BGCODENAME: TEdit
- Tag = 2
- Left = 574
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 5
- OnChange = FactoryNameChange
- OnKeyPress = GCNAMEKeyPress
- end
- object YWY: TEdit
- Tag = 1
- Left = 414
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 6
- OnChange = YWYChange
- end
- object orderno: TEdit
- Tag = 1
- Left = 233
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 7
- OnChange = YWYChange
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1368
- Height = 540
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- Column = cxGridDBColumn7
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #22806#38144#21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Width = 83
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20844#21496
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Width = 82
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Tag = 2
- Caption = #25351#31034#21333#21495
- DataBinding.FieldName = 'orderno'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #26797#32455
- #38024#32455
- #32463#32534
- #21050#32483
- #38024#32455#32463#32534)
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 71
- end
- object Tv1Column1: TcxGridDBColumn
- Caption = #25253#20851#21697#21517
- DataBinding.FieldName = 'BGCODENAME'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #26588#22411
- DataBinding.FieldName = 'guixing'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object cxGridDBColumn7: TcxGridDBColumn
- Tag = 2
- Caption = #20986#36135#25968#37327
- DataBinding.FieldName = 'C4BGQty'
- PropertiesClassName = 'TcxCalcEditProperties'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Options.Sorting = False
- Width = 77
- end
- object cxGridDBColumn9: TcxGridDBColumn
- Tag = 2
- Caption = #21333#20301
- DataBinding.FieldName = 'C5BGUnit'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- 'MTR'
- 'KG')
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 46
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #37329#39069
- DataBinding.FieldName = 'C7BGMoney'
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object tv2Column5: TcxGridDBColumn
- Caption = #20986#36135#26085
- DataBinding.FieldName = 'htdate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #33337#26399
- DataBinding.FieldName = 'chuandate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- end
- object tv2Column6: TcxGridDBColumn
- Caption = #20184#27454#26465#20214
- HeaderAlignmentHorz = taCenter
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #37096#38376
- DataBinding.FieldName = 'bm'
- HeaderAlignmentHorz = taCenter
- Width = 75
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #22269#23478
- DataBinding.FieldName = 'TOCOUNTRY'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #36135#20195
- DataBinding.FieldName = 'huodai'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #30446#30340#28207
- DataBinding.FieldName = 'B7DaoHuoGang'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 893
- Top = 217
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 858
- Top = 188
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 225
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 252
- Top = 364
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 256
- Top = 336
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 352
- Top = 208
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_MGFYBB.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_MGFYBB.pas
deleted file mode 100644
index e12d5f8..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_MGFYBB.pas
+++ /dev/null
@@ -1,734 +0,0 @@
-unit U_MGFYBB;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc;
-
-type
- TfrmCHList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- GCNAME: TEdit;
- Label8: TLabel;
- KHName: TEdit;
- Label3: TLabel;
- BGCODENAME: TEdit;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- Label2: TLabel;
- YWY: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridDBColumn2: TcxGridDBColumn;
- cxGridDBColumn7: TcxGridDBColumn;
- cxGridDBColumn9: TcxGridDBColumn;
- Tv1Column1: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- tv2Column1: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- tv2Column5: TcxGridDBColumn;
- tv2Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- Label4: TLabel;
- orderno: TEdit;
- TV1Column15: TcxGridDBColumn;
- ToolButton1: TToolButton;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure GCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun;
-
-{$R *.dfm}
-
-procedure TfrmCHList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmCHList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmCHList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := SGetServerDateMBeg(ADOQueryTemp);
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmCHList.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.*,B.* ');
-// SQL.Add(',HDNAME=(SELECT HDNAME FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
- SQL.Add(',TOCOUNTRY=(SELECT TOCOUNTRY FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
- SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-
- sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
- sql.Add(' where Valid=''Y'' ');
- SQL.Add('AND bgStatus=''''');
- sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmCHList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmCHList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, '嵥');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmCHList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, '嵥');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmCHList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmCHList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmCHList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmCHList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmCHList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmCHList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmCHList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmCHList.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- if Trim(A4FPNO.Text) = '' then
- Exit;
- fsj := ' and isnull(A.A4FPNO,'''') like ''' + '%' + Trim(A4FPNO.Text) + '%' + '''';
- InitGridSql(fsj);
- end;
-end;
-
-procedure TfrmCHList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmCHList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHList.GCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmCHList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmCHList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmCHList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmCHList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmCHList.YWYChange(Sender: TObject);
-begin
- SDofilter(ADOQueryTemp, SGetFilters(Panel1, 3, 1));
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-procedure TfrmCHList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmCHList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmCHList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmCHList.ToolButton1Click(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// SelExportData(Tv1, ADOQueryMain, '嵥');
-
- TcxGridToExcel('嵥', cxGrid2);
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_OrderSel.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_OrderSel.dfm
deleted file mode 100644
index 8a712c5..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_OrderSel.dfm
+++ /dev/null
@@ -1,356 +0,0 @@
-object frmOrderSel: TfrmOrderSel
- Left = 196
- Top = 141
- Width = 1171
- Height = 587
- Caption = #35746#21333#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -18
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 107
- TextHeight = 18
- object cxGrid1: TcxGrid
- Left = 0
- Top = 100
- Width = 1155
- Height = 447
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 0
- object Tv2: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = v1PRTMF
- end
- item
- Kind = skSum
- Column = v1PRTKZ
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- Column = v2Column1
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Footer = DataLink_TradeManage.Default
- object v2Column3: TcxGridDBColumn
- Caption = #36873#20013
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- object v1OrderNo: TcxGridDBColumn
- Caption = #35746#21333#21495
- DataBinding.FieldName = 'OrderNoM'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 86
- end
- object v2Column2: TcxGridDBColumn
- Caption = #23458#25143
- DataBinding.FieldName = 'CustomerNoName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 93
- end
- object cxGridDBColumn2: TcxGridDBColumn
- Caption = #20013#25991#21517#31216
- DataBinding.FieldName = 'MPRTCodeName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 104
- end
- object v2Column9: TcxGridDBColumn
- Caption = #20844#21496#21697#21517
- DataBinding.FieldName = 'ComPRTName'
- Width = 84
- end
- object v1Column10: TcxGridDBColumn
- Caption = #35746#21333#25968#37327
- DataBinding.FieldName = 'PRTOrderQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 80
- end
- object v1Column14: TcxGridDBColumn
- Caption = #35746#21333#21333#20301
- DataBinding.FieldName = 'OrderUnit'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 75
- end
- object cxGridDBColumn3: TcxGridDBColumn
- Caption = #39068#33394
- DataBinding.FieldName = 'PRTColor'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Width = 80
- end
- object v2Column8: TcxGridDBColumn
- Caption = #33394#21495
- DataBinding.FieldName = 'SOrddefstr1'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 88
- end
- object v2Column7: TcxGridDBColumn
- Caption = #33457#22411#33457#21495
- DataBinding.FieldName = 'PRTHX'
- Options.Editing = False
- Width = 78
- end
- object v2Column6: TcxGridDBColumn
- Caption = #24211#23384#21253'/'#20214#25968#37327
- DataBinding.FieldName = 'KCBQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 111
- end
- object v1PRTMF: TcxGridDBColumn
- Caption = #24211#23384#21305#25968
- DataBinding.FieldName = 'KCJQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Styles.Content = cxStyle1
- Width = 77
- end
- object v2Column1: TcxGridDBColumn
- Caption = #24211#23384#27611#37325
- DataBinding.FieldName = 'KCKgQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 73
- end
- object v2Column5: TcxGridDBColumn
- Caption = #24211#23384#20928#37325
- DataBinding.FieldName = 'KCKgQtyJ'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 69
- end
- object v1PRTKZ: TcxGridDBColumn
- Caption = #24211#23384#38271#24230
- DataBinding.FieldName = 'KCQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Options.Sorting = False
- Styles.Content = cxStyle1
- Width = 79
- end
- object v2Column4: TcxGridDBColumn
- Caption = #21333#20301
- DataBinding.FieldName = 'KCQtyUnit'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 51
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv2
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 1155
- Height = 100
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Label2: TLabel
- Left = 39
- Top = 21
- Width = 54
- Height = 18
- Caption = #35746#21333#21495
- end
- object Label3: TLabel
- Left = 302
- Top = 21
- Width = 36
- Height = 18
- Caption = #39068#33394
- end
- object Label8: TLabel
- Left = 525
- Top = 21
- Width = 72
- Height = 18
- Caption = #23458' '#25143
- end
- object OrderNoM: TEdit
- Tag = 2
- Left = 93
- Top = 18
- Width = 137
- Height = 26
- TabOrder = 0
- OnChange = OrderNoMChange
- end
- object PRTColor: TEdit
- Tag = 2
- Left = 339
- Top = 18
- Width = 125
- Height = 26
- TabOrder = 1
- OnChange = OrderNoMChange
- end
- object Button1: TButton
- Left = 773
- Top = 18
- Width = 84
- Height = 28
- Caption = #21047#26032
- TabOrder = 2
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 773
- Top = 54
- Width = 84
- Height = 28
- Caption = #30830#23450
- TabOrder = 3
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 881
- Top = 54
- Width = 84
- Height = 28
- Caption = #20851#38381
- TabOrder = 4
- OnClick = Button3Click
- end
- object CustomerNoName: TEdit
- Tag = 2
- Left = 600
- Top = 17
- Width = 134
- Height = 26
- TabOrder = 5
- OnChange = OrderNoMChange
- end
- end
- object CDS_OrderSel: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 592
- Top = 208
- end
- object DataSource1: TDataSource
- DataSet = CDS_OrderSel
- Left = 680
- Top = 224
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 784
- Top = 184
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- Parameters = <>
- Left = 848
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_TradeManage.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 624
- Top = 208
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 728
- Top = 272
- end
- object PopupMenu1: TPopupMenu
- Left = 424
- Top = 248
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object cxStyleRepository1: TcxStyleRepository
- object cxStyle1: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clBlue
- end
- end
- object cxStyleRepository2: TcxStyleRepository
- object cxStyle2: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clRed
- end
- end
- object cxStyleRepository3: TcxStyleRepository
- object cxStyle3: TcxStyle
- AssignedValues = [svFont, svTextColor]
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- TextColor = clPurple
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_OrderSel.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_OrderSel.pas
deleted file mode 100644
index 422dee2..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_OrderSel.pas
+++ /dev/null
@@ -1,205 +0,0 @@
-unit U_OrderSel;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, StdCtrls, ADODB, DBClient, ComCtrls,
- ExtCtrls, cxGridLevel, cxGridCustomTableView, cxGridTableView,
- cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxCheckBox, Menus;
-
-type
- TfrmOrderSel = class(TForm)
- cxGrid1: TcxGrid;
- Tv2: TcxGridDBTableView;
- v1OrderNo: TcxGridDBColumn;
- cxGridDBColumn2: TcxGridDBColumn;
- v1Column10: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- cxGridDBColumn3: TcxGridDBColumn;
- v1PRTMF: TcxGridDBColumn;
- v1PRTKZ: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- Panel1: TPanel;
- Label2: TLabel;
- OrderNoM: TEdit;
- Label3: TLabel;
- PRTColor: TEdit;
- CDS_OrderSel: TClientDataSet;
- DataSource1: TDataSource;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- Button1: TButton;
- Button2: TButton;
- Button3: TButton;
- cxGridPopupMenu1: TcxGridPopupMenu;
- v2Column2: TcxGridDBColumn;
- Label8: TLabel;
- CustomerNoName: TEdit;
- v2Column3: TcxGridDBColumn;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- cxStyleRepository2: TcxStyleRepository;
- cxStyle2: TcxStyle;
- cxStyleRepository3: TcxStyleRepository;
- cxStyle3: TcxStyle;
- v2Column1: TcxGridDBColumn;
- v2Column4: TcxGridDBColumn;
- v2Column5: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v2Column7: TcxGridDBColumn;
- v2Column8: TcxGridDBColumn;
- v2Column9: TcxGridDBColumn;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure Button2Click(Sender: TObject);
- procedure FormDestroy(Sender: TObject);
- procedure Button3Click(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure Button1Click(Sender: TObject);
- procedure OrderNoMChange(Sender: TObject);
- procedure Tv2CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- private
- { Private declarations }
- procedure InitGrid();
- public
- { Public declarations }
- end;
-
-var
- frmOrderSel: TfrmOrderSel;
-
-implementation
-uses
- U_DataLink,U_Fun ;
-
-{$R *.dfm}
-
-procedure TfrmOrderSel.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmOrderSel.Button2Click(Sender: TObject);
-var
- KHName:String;
-begin
- if CDS_OrderSel.Locate('SSel',True,[])=False then
- begin
- Application.MessageBox('ûѡݣ','ʾ',0);
- Exit;
- end;
- CDS_OrderSel.DisableControls;
- KHName:='';
- with CDS_OrderSel do
- begin
- First;
- while not Eof do
- begin
- if FieldByName('SSel').AsBoolean=True then
- begin
- if Trim(KHName)='' then
- begin
- KHName:=Trim(fieldbyname('CustomerNo').AsString);
- end else
- begin
- if Trim(fieldbyname('CustomerNo').AsString)<>KHName then
- begin
- CDS_OrderSel.EnableControls;
- Application.MessageBox('ѡͬͻ','ʾ',0);
- Exit;
- end;
- end;
- end;
- Next;
- end;
- end;
- CDS_OrderSel.EnableControls;
- ModalResult:=1;
-end;
-
-procedure TfrmOrderSel.FormDestroy(Sender: TObject);
-begin
- frmOrderSel:=nil;
-end;
-
-procedure TfrmOrderSel.Button3Click(Sender: TObject);
-begin
- ModalResult:=-1;
- WriteCxGrid('ѡ',Tv2,'Ʒֿ');
- Close;
-end;
-
-procedure TfrmOrderSel.FormShow(Sender: TObject);
-begin
- ReadCxGrid('ѡ',Tv2,'Ʒֿ');
- InitGrid();
-end;
-
-procedure TfrmOrderSel.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- sql.Clear;
- sql.Add('select KC.Mainid,KC.Subid,KC.KCQty,KC.KCQtyUnit,KC.KCkgQty,KC.KCJQty,KC.CRID,KC.KCkgQtyJ,KC.KCBQty,KC.ComPRTName');
- sql.Add(',A.OrderNo OrderNoM,A.OrderNo,A.CustomerNoName,A.CustomerNo,A.MPRTCodeName,A.MPRTMF,A.MPRTKZ,B.* ');
- sql.Add('from (select Mainid,SubId,KCQty=Sum(Qty*QtyFlag),KCKgQtyJ=Sum(KgQtyJ*QtyFlag),KCJQty=Sum(JQty*QtyFlag),KCBQty=Sum(BQty*QtyFlag)');
- sql.Add(' ,QtyUnit KCQtyUnit,CRID,KCkgQty=Sum(KgQty*QtyFlag),Max(ComPRTName) ComPRTName from CK_BanCP_CR where MJID=BCID ');
- sql.add('Group by Mainid,SubId,QtyUnit,CRID) KC ');
-
- sql.Add(' inner join JYOrder_Main A on KC.Mainid=A.MainId ');
- sql.Add(' inner join JYOrder_Sub B on KC.SubId=B.SubId');
- sql.Add(' where (KC.KCJQty>0 or KC.KCkgQty>0 or KCQty>0)');
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_OrderSel);
- SInitCDSData20(ADOQueryMain,CDS_OrderSel);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmOrderSel.Button1Click(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmOrderSel.OrderNoMChange(Sender: TObject);
-begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_OrderSel);
- SInitCDSData20(ADOQueryMain,CDS_OrderSel);
-end;
-
-procedure TfrmOrderSel.Tv2CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- ModalResult:=1;
-end;
-
-procedure TfrmOrderSel.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_OrderSel,True);
-end;
-
-procedure TfrmOrderSel.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_OrderSel,False);
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ProductOrderList_Sel.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ProductOrderList_Sel.dfm
deleted file mode 100644
index 2ff61af..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ProductOrderList_Sel.dfm
+++ /dev/null
@@ -1,322 +0,0 @@
-object frmProductOrderList_Sel: TfrmProductOrderList_Sel
- Left = 195
- Top = 125
- Width = 1121
- Height = 593
- Caption = #29983#20135#25351#31034#21333#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1105
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object ToolButton3: TToolButton
- Left = 0
- Top = 0
- Caption = #36873#25321
- ImageIndex = 31
- OnClick = ToolButton3Click
- end
- object TBClose: TToolButton
- Left = 59
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1105
- Height = 54
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label3: TLabel
- Left = 35
- Top = 22
- Width = 52
- Height = 12
- Caption = #35745#21010#21333#21495
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object OrderNo: TEdit
- Tag = 2
- Left = 91
- Top = 18
- Width = 149
- Height = 20
- TabOrder = 0
- OnKeyPress = OrderNoKeyPress
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 86
- Width = 1105
- Height = 369
- Align = alTop
- TabOrder = 2
- object Tv1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v1Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 44
- end
- object v1OrderNo: TcxGridDBColumn
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'OrderNo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 96
- end
- object v1ConNo: TcxGridDBColumn
- Caption = #21512#21516#21495
- DataBinding.FieldName = 'ConNo'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 68
- end
- object v1OrdPerson1: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 73
- end
- object v1CustomerNoName: TcxGridDBColumn
- Caption = #23458#25143#21517#31216
- DataBinding.FieldName = 'CustomerNoName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 79
- end
- object v1DeliveryDate: TcxGridDBColumn
- Caption = #20132#36135#26085#26399
- DataBinding.FieldName = 'DlyDate'
- PropertiesClassName = 'TcxDateEditProperties'
- Properties.ShowTime = False
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 77
- end
- object v1JGForctyName: TcxGridDBColumn
- Caption = #21152#24037#21378
- DataBinding.FieldName = 'JGForctyName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 83
- end
- object v1MPRTCodeName: TcxGridDBColumn
- Caption = #20013#25991#21517#31216
- DataBinding.FieldName = 'MPRTCodeName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 81
- end
- object v1MPRTSpec: TcxGridDBColumn
- Caption = #35268#26684
- DataBinding.FieldName = 'MPRTSpec'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 78
- end
- object v1MPRTMF: TcxGridDBColumn
- Caption = #38376#24133
- DataBinding.FieldName = 'MPRTMF'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 84
- end
- object v1MPRTKZ: TcxGridDBColumn
- Caption = #20811#37325
- DataBinding.FieldName = 'MPRTKZ'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 71
- end
- object v1MPRTOrderQty: TcxGridDBColumn
- Caption = #25968#37327
- DataBinding.FieldName = 'PRTOrderQty'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Styles.Header = DataLink_DDMD.Default
- Width = 73
- end
- object v1OrderUnit: TcxGridDBColumn
- Caption = #25968#37327#21333#20301
- DataBinding.FieldName = 'OrderUnit'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 70
- end
- object Tv1Column1: TcxGridDBColumn
- Caption = #20135#21697#22823#31867
- DataBinding.FieldName = 'BPBigType'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 544
- Top = 176
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 576
- Top = 280
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 552
- Top = 216
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 312
- Top = 248
- end
- object DataSource1: TDataSource
- DataSet = Order_Main
- Left = 440
- Top = 184
- end
- object Order_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 464
- Top = 208
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBMain
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 336
- Top = 200
- ReportData = {}
- end
- object RMDBMain: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 392
- Top = 200
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 1
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 528
- Top = 280
- end
- object PopupMenu1: TPopupMenu
- Left = 288
- Top = 184
- object N2: TMenuItem
- Caption = #26377#20379#24212#21830
- end
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 360
- Top = 240
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 344
- Top = 288
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ProductOrderList_Sel.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ProductOrderList_Sel.pas
deleted file mode 100644
index d76b466..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ProductOrderList_Sel.pas
+++ /dev/null
@@ -1,159 +0,0 @@
-unit U_ProductOrderList_Sel;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, StdCtrls, ExtCtrls, ComCtrls, ToolWin, cxStyles, cxCustomData,
- cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ADODB,
- cxGridCustomPopupMenu, cxGridPopupMenu, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxGrid, DBClient, cxCheckBox, cxCalendar, cxSplitter, RM_Dataset, RM_System,
- RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmProductOrderList_Sel = class(TForm)
- ToolBar1: TToolBar;
- TBClose: TToolButton;
- Panel1: TPanel;
- Tv1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- cxGridPopupMenu1: TcxGridPopupMenu;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- Label3: TLabel;
- OrderNo: TEdit;
- v1OrderNo: TcxGridDBColumn;
- v1DeliveryDate: TcxGridDBColumn;
- v1OrdPerson1: TcxGridDBColumn;
- v1ConNo: TcxGridDBColumn;
- v1MPRTSpec: TcxGridDBColumn;
- Order_Main: TClientDataSet;
- RM1: TRMGridReport;
- RMDBMain: TRMDBDataSet;
- RMXLSExport1: TRMXLSExport;
- v1MPRTCodeName: TcxGridDBColumn;
- v1MPRTMF: TcxGridDBColumn;
- v1MPRTOrderQty: TcxGridDBColumn;
- PopupMenu1: TPopupMenu;
- N2: TMenuItem;
- v1MPRTKZ: TcxGridDBColumn;
- ADOQueryPrint: TADOQuery;
- CDS_Print: TClientDataSet;
- ToolButton3: TToolButton;
- v1Column4: TcxGridDBColumn;
- v1CustomerNoName: TcxGridDBColumn;
- v1JGForctyName: TcxGridDBColumn;
- v1OrderUnit: TcxGridDBColumn;
- Tv1Column1: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure OrderNoKeyPress(Sender: TObject; var Key: Char);
- private
- DQdate: TDateTime;
- procedure InitGrid();
- procedure InitForm();
- { Private declarations }
- public
- FFInt, FCloth: Integer;
-
- { Public declarations }
- end;
-
-var
- frmProductOrderList_Sel: TfrmProductOrderList_Sel;
-
-implementation
-
-uses
- U_DataLink, U_Fun;
-
-{$R *.dfm}
-
-procedure TfrmProductOrderList_Sel.FormDestroy(Sender: TObject);
-begin
- frmProductOrderList_Sel := nil;
-end;
-
-procedure TfrmProductOrderList_Sel.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmProductOrderList_Sel.FormCreate(Sender: TObject);
-begin
- cxgrid1.Align := alClient;
-end;
-
-procedure TfrmProductOrderList_Sel.TBCloseClick(Sender: TObject);
-begin
- Close;
- WriteCxGrid('ָʾбѡ', Tv1, 'ָʾ');
-end;
-
-procedure TfrmProductOrderList_Sel.InitGrid();
-begin
-// if Length(Trim(self.ConNO.Text)) < 3 then
-// Exit;
-
-
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select PRTORDERQTY=(SELECT SUM(PRTORDERQTY) FROM JYOrder_SUB B where A.MAINID=B.MAINID GROUP BY B.MAINID ) ');
- SQL.Add(',YWNAME=(SELECT TOP 1 CYENAME FROM CP_YDANG C WHERE C.CYNO=A.MPRTCODE)');
- sql.Add(',orderunit=(SELECT TOP 1 orderunit FROM JYOrder_sub d WHERE d.mainid=A.mainid)');
- SQL.Add(',SCSKX=(SELECT TOP 1 SCSKX FROM SalesContract_Sub E INNER JOIN SalesContract_MAIN F ON E.MAINID=F.MAINID WHERE E.SCSCode=A.MPRTCODE AND F.CONNO=A.CONNO)');
- SQL.Add(',SCSHX=(SELECT TOP 1 SCSHX FROM SalesContract_Sub E INNER JOIN SalesContract_MAIN F ON E.MAINID=F.MAINID WHERE E.SCSCode=A.MPRTCODE AND F.CONNO=A.CONNO)');
- sql.add(',A.*,A.OrderNo OrderNoM ');
- sql.add(' from JYOrder_Main A ');
- SQL.Add('where A.orderno like ''' + '%' + Trim(self.orderno.Text) + '%' + '''');
- sql.Add('and filltime>=''2022-01-01''');
-//ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, Order_Main);
- SInitCDSData20(ADOQueryMain, Order_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmProductOrderList_Sel.InitForm();
-begin
- ReadCxGrid('ָʾбѡ', Tv1, 'ָʾ');
-// InitGrid();
-end;
-
-procedure TfrmProductOrderList_Sel.FormShow(Sender: TObject);
-begin
- InitForm();
-end;
-
-procedure TfrmProductOrderList_Sel.ToolButton3Click(Sender: TObject);
-begin
- ModalResult := 1;
-end;
-
-procedure TfrmProductOrderList_Sel.OrderNoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_RTZDYHelp.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_RTZDYHelp.dfm
deleted file mode 100644
index 7fd6d2a..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_RTZDYHelp.dfm
+++ /dev/null
@@ -1,239 +0,0 @@
-object frmRTZDYHelp: TfrmRTZDYHelp
- Left = 466
- Top = 188
- Width = 461
- Height = 528
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 8
- Top = 88
- Width = 417
- Height = 200
- TabOrder = 0
- object TV1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1OrderNoPropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 46
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #21517#31216
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 146
- end
- object V1Note: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NotePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 113
- end
- object V1ZdyFlag: TcxGridDBColumn
- Caption = #26631#24535
- DataBinding.FieldName = 'ZdyFlag'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1Column1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1HelpType: TcxGridDBColumn
- Caption = #24110#21161#31867#27604
- DataBinding.FieldName = 'HelpType'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1HelpTypePropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 55
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 445
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_CYZZ.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 59
- Top = 0
- Caption = #22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 118
- Top = 0
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 177
- Top = 0
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 236
- Top = 0
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 295
- Top = 0
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 445
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label1: TLabel
- Left = 18
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 53
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = ADOConnection1
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = ADOConnection1
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = ADOConnection1
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 208
- Top = 144
- end
- object ADOConnection1: TADOConnection
- LoginPrompt = False
- Left = 80
- Top = 232
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 168
- Top = 152
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_RTZDYHelp.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_RTZDYHelp.pas
deleted file mode 100644
index f86d442..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_RTZDYHelp.pas
+++ /dev/null
@@ -1,685 +0,0 @@
-unit U_RTZDYHelp;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, ToolWin, ComCtrls,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxGridLevel,
- cxClasses, cxControls, cxGridCustomView, cxGrid, DBClient, ADODB, ImgList,
- StdCtrls, ExtCtrls, cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu;
-
-type
- TfrmRTZDYHelp = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- ADOConnection1: TADOConnection;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- V1ZdyFlag: TcxGridDBColumn;
- V1HelpType: TcxGridDBColumn;
- procedure FormCreate(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- procedure V1OrderNoPropertiesEditValueChanged(Sender: TObject);
- procedure V1NotePropertiesEditValueChanged(Sender: TObject);
- procedure V1Column1PropertiesEditValueChanged(Sender: TObject);
- procedure V1HelpTypePropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag,flagname,snote,MainType:string;
- fnote,forderno,fZdyFlag,ViewFlag:Boolean;
- PPSTE:integer;
- { Public declarations }
- end;
-
-var
- frmRTZDYHelp: TfrmRTZDYHelp;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmRTZDYHelp.FormCreate(Sender: TObject);
-begin
- try
- cxGrid1.Align:=alClient;
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- except
- {if Application.MessageBox('ʧ,ǷҪٴ?','ʾ',32+4)=IDYES then
- begin
- try
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='23242';
- Connected:=true;
- end;
- except
- end;
- end; }
-
- frmRTZDYHelp.Free;
- end;
-end;
-
-procedure TfrmRTZDYHelp.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- Action:=caFree;
-end;
-
-procedure TfrmRTZDYHelp.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type='''+flag+'''');
- if Trim(MainType)<>'' then
- begin
- sql.Add(' and A.MainType='''+Trim(MainType)+'''');
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-procedure TfrmRTZDYHelp.TBAddClick(Sender: TObject);
-var
- i:Integer;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
- for i:=0 to 5 do
- begin
- with ClientDataSet1 do
- begin
- Append;
- Post;
- end;
- end;
-
-end;
-procedure TfrmRTZDYHelp.TBSaveClick(Sender: TObject);
-var
- maxno:string;
-begin
- if ClientDataSet1.IsEmpty then Exit;
- ZDYName.SetFocus;
-
- if ClientDataSet1.Locate('ZDYName',null,[]) then
- begin
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- if ClientDataSet1.Locate('ZDYName','',[]) then
- begin
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').Value;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ','ʾ',0);
- TV1.OptionsData.Editing:=False;
- TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-
-end;
-
-procedure TfrmRTZDYHelp.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString)<>'') or
- (Trim(ClientDataSet1.FieldByName('ZDYname').AsString)<>'') then
- begin
- if application.MessageBox('ȷҪɾ?','ʾϢ',1)=2 then exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo='''+Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString)+'''');
- SQL.Add(' and Type='''+Trim(flag)+'''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmRTZDYHelp.TBCloseClick(Sender: TObject);
-begin
- ModalResult:=2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- Close;
-end;
-
-procedure TfrmRTZDYHelp.FormShow(Sender: TObject);
-var
- fsj,fsj1:string;
-begin
- {if PPSTE=1 then
- begin
- Application.Terminate;
- Exit;
- end; }
- InitGrid();
- fsj:=Trim(flag)+'01';
- fsj1:=Trim(flagname)+'01';
- {if ClientDataSet1.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYname,Type,note)');
- sql.Add('select '''+Trim(fsj)+'''');
- sql.Add(','''+Trim(fsj1)+'''');
- SQL.Add(','''+Trim(flag)+'''');
- sql.Add(','''+Trim(snote)+'''');
- ExecSQL;
- end;
- InitGrid();
- end;}
- //frmZDYHelp.Caption:=Trim(flagname)+'<'+Trim(flag)+'>';
- //ReadCxGrid('Զ',TV1,'Զ');
- ReadCxGrid('Զ'+Trim(flag),TV1,'Զ');
- frmRTZDYHelp.Caption:=Trim(flagname);
- V1Note.Visible:=fnote;
- V1ZdyFlag.Visible:=fZdyFlag;
- V1OrderNo.Visible:=forderno;
- if ViewFlag=True then
- begin
- TBAdd.Visible:=False;
- TBSave.Visible:=False;
- TBDel.Visible:=False;
- TBEdit.Visible:=False;
- Label2.Visible:=False;
- end;
-end;
-
-procedure TfrmRTZDYHelp.ToolButton1Click(Sender: TObject);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- ModalResult:=1;
-end;
-
-procedure TfrmRTZDYHelp.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
-end;
-
-procedure TfrmRTZDYHelp.TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing=False then
- begin
- ModalResult:=1;
- end;
-end;
-
-procedure TfrmRTZDYHelp.ZDYNameChange(Sender: TObject);
-var
- fsj:String;
-begin
- if Trim(ZDYName.Text)<>'' then
- begin
- fsj:=' zdyname like '''+'%'+Trim(ZDYName.Text)+'%'+''''
- +' or Note like '''+'%'+Trim(ZDYName.Text)+'%'+''''
- +' or ZJM like '''+'%'+Trim(ZDYName.Text)+'%'+'''';
- end;
- if ADOQueryMain.Active then
- begin
- // SDofilter(ADOQueryMain,fsj);
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- if Trim(fsj)='' then
- begin
- Filtered:=False;
- end else
- begin
- Filtered:=False;
- Filter:=fsj;
- Filtered:=True;
- end;
- end;
- finally
- ADOQueryMain.EnableControls;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- end;
-end;
-
-procedure TfrmRTZDYHelp.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno,mvalue:string;
-begin
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value:=Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
-
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-end;
-
-procedure TfrmRTZDYHelp.V1OrderNoPropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('OrderNo').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set OrderNo='+mvalue);
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmRTZDYHelp.V1NotePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmRTZDYHelp.V1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:String;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyFlag').Value:=StrToInt(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ZdyFlag='+Trim(mvalue));
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmRTZDYHelp.V1HelpTypePropertiesEditValueChanged(
- Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('HelpType').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set HelpType='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_UserSel.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_UserSel.dfm
deleted file mode 100644
index df989c3..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_UserSel.dfm
+++ /dev/null
@@ -1,202 +0,0 @@
-object frmUserSel: TfrmUserSel
- Left = 660
- Top = 154
- Width = 409
- Height = 527
- Caption = #29992#25143#36873#25321
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- OnClose = FormClose
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 393
- Height = 31
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- DisabledImages = DataLink_DDMD.ThreeImgList
- Flat = True
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object ToolButton2: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #30830#35748
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBClose: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 31
- Width = 393
- Height = 39
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label3: TLabel
- Left = 202
- Top = 13
- Width = 60
- Height = 12
- Caption = #20379#24212#21830#21517#31216
- end
- object Label1: TLabel
- Left = 22
- Top = 13
- Width = 60
- Height = 12
- Caption = #20379#24212#21830#32534#21495
- end
- object CoName: TEdit
- Tag = 2
- Left = 263
- Top = 9
- Width = 89
- Height = 20
- ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
- TabOrder = 1
- OnChange = CoNameChange
- end
- object CoCode: TEdit
- Tag = 2
- Left = 82
- Top = 9
- Width = 89
- Height = 20
- ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
- TabOrder = 0
- OnChange = CoNameChange
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 70
- Width = 393
- Height = 418
- Align = alClient
- TabOrder = 2
- object Tv2: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- Navigator.Buttons.Delete.Enabled = False
- Navigator.Buttons.Delete.Visible = False
- DataController.DataSource = DS_HZ
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.handBlack
- object v2Column4: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- HeaderAlignmentHorz = taCenter
- end
- object v2Column1: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'UserID'
- HeaderAlignmentHorz = taCenter
- end
- object v2Column2: TcxGridDBColumn
- Caption = #21517#31216
- DataBinding.FieldName = 'UserName'
- HeaderAlignmentHorz = taCenter
- Width = 171
- end
- object v2Column3: TcxGridDBColumn
- Caption = #37096#38376
- DataBinding.FieldName = 'Udept'
- HeaderAlignmentHorz = taCenter
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 92
- Top = 224
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 132
- Top = 224
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 54
- Top = 224
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 211
- Top = 124
- end
- object DS_HZ: TDataSource
- DataSet = CDS_User
- Left = 222
- Top = 176
- end
- object CDS_User: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 190
- Top = 176
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_UserSel.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_UserSel.pas
deleted file mode 100644
index c2aa443..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_UserSel.pas
+++ /dev/null
@@ -1,141 +0,0 @@
-unit U_UserSel;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxGraphics, cxCustomData, cxStyles, cxTL, cxMaskEdit, DB, ADODB,
- cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin, StdCtrls,
- cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, DBClient,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, ExtCtrls,
- cxSplitter, cxGridLevel, cxClasses, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_Common,
- RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
- IdTCPClient, IdFTP, ShellAPI, IniFiles, cxCheckBox, cxCalendar, cxButtonEdit,
- cxTextEdit, cxDBLookupComboBox, ComObj, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator;
-
-type
- FdDy = record
- inc: integer; //ͻ־
- FDdys: string[32]; //ͻ
- FdDysName: string[32]; //ͻ
- end;
-
- TfrmUserSel = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- Panel1: TPanel;
- ToolButton2: TToolButton;
- ADOQueryMain: TADOQuery;
- Label3: TLabel;
- CoName: TEdit;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DS_HZ: TDataSource;
- CDS_User: TClientDataSet;
- Label1: TLabel;
- CoCode: TEdit;
- ToolButton1: TToolButton;
- v2Column1: TcxGridDBColumn;
- v2Column2: TcxGridDBColumn;
- v2Column3: TcxGridDBColumn;
- v2Column4: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure CoNameChange(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- private
-
- { Private declarations }
- procedure InitGrid();
- public
- end;
-
-var
- frmUserSel: TfrmUserSel;
-
-implementation
-
-uses
- U_DataLink, U_Fun;
-
-{$R *.dfm}
-
-procedure TfrmUserSel.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- SQL.Clear;
- sql.Add(' select * from SY_User where wxid is not null ');
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_User);
- SInitCDSData20(ADOQueryMain, CDS_User);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmUserSel.FormDestroy(Sender: TObject);
-begin
- frmUserSel := nil;
-end;
-
-procedure TfrmUserSel.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmUserSel.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid(trim(self.caption), Tv2, 'Ӧ̹');
- Close;
-end;
-
-procedure TfrmUserSel.FormShow(Sender: TObject);
-begin
- ReadCxGrid(trim(self.Caption), Tv2, 'Ӧ̹');
- InitGrid();
-end;
-
-procedure TfrmUserSel.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmUserSel.ToolButton2Click(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_User);
- SInitCDSData20(ADOQueryMain, CDS_User);
- end;
-end;
-
-procedure TfrmUserSel.CoNameChange(Sender: TObject);
-begin
- ToolButton2.Click;
-end;
-
-procedure TfrmUserSel.ToolButton1Click(Sender: TObject);
-begin
- ModalResult := 1;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XSQKList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XSQKList.dfm
deleted file mode 100644
index c332c68..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XSQKList.dfm
+++ /dev/null
@@ -1,718 +0,0 @@
-object frmXSQKLLIST: TfrmXSQKLLIST
- Left = 171
- Top = 92
- Width = 1341
- Height = 614
- Caption = #38144#21806#24773#20917#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1325
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object ToolButton1: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 26
- OnClick = ToolButton1Click
- end
- object ToolButton2: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #35774#23450
- ImageIndex = 22
- OnClick = ToolButton2Click
- end
- object TBClose: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1325
- Height = 49
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 42
- Top = 11
- Width = 24
- Height = 12
- Caption = #26085#26399
- end
- object Label16: TLabel
- Left = 371
- Top = 11
- Width = 24
- Height = 12
- Caption = #37096#38376
- end
- object Label17: TLabel
- Left = 523
- Top = 12
- Width = 36
- Height = 12
- Caption = #21161' '#29702
- end
- object Label2: TLabel
- Left = 674
- Top = 10
- Width = 24
- Height = 12
- Caption = #32452#38271
- end
- object EndDate: TDateTimePicker
- Left = 69
- Top = 6
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object bm: TEdit
- Tag = 2
- Left = 403
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 1
- OnChange = bmChange
- end
- object YWY: TEdit
- Tag = 2
- Left = 564
- Top = 7
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 2
- OnChange = YWYChange
- end
- object zz: TEdit
- Tag = 2
- Left = 706
- Top = 6
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 3
- OnChange = YWYChange
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 141
- Width = 1325
- Height = 389
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = TV1CustomDrawCell
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- FieldName = 'Z3'
- Column = TV1Column4
- end
- item
- Kind = skSum
- FieldName = 'Z2'
- Column = TV1Column2
- end
- item
- Kind = skSum
- Column = Z1
- end
- item
- Kind = skSum
- Column = TV1Column12
- end
- item
- Kind = skSum
- Column = TV1Column13
- end
- item
- Kind = skSum
- Column = TV1Column16
- end
- item
- Kind = skSum
- FieldName = 'Z4'
- Column = TV1Column6
- end
- item
- Kind = skSum
- FieldName = 'Z5'
- Column = TV1Column7
- end
- item
- Kind = skSum
- FieldName = 'Z6'
- Column = TV1Column10
- end
- item
- Kind = skSum
- FieldName = 'Z7'
- Column = TV1Column17
- end
- item
- Kind = skSum
- FieldName = 'Z8'
- Column = TV1Column18
- end
- item
- Kind = skSum
- FieldName = 'Z9'
- Column = TV1Column19
- end
- item
- Kind = skSum
- FieldName = 'Z10'
- Column = TV1Column20
- end
- item
- Kind = skSum
- FieldName = 'Z11'
- Column = TV1Column21
- end
- item
- Kind = skSum
- FieldName = 'Z12'
- Column = TV1Column22
- end
- item
- Kind = skSum
- FieldName = 'Z1'
- Column = TV1Column15
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Content = cxStyle3
- Styles.Inactive = cxStyle3
- Styles.IncSearch = cxStyle3
- Styles.Selection = cxStyle3
- Styles.Header = cxStyle3
- object TV1Column8: TcxGridDBColumn
- Caption = #37096#38376
- DataBinding.FieldName = 'bm'
- HeaderAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 75
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #32452#38271
- DataBinding.FieldName = 'zz'
- HeaderAlignmentHorz = taCenter
- Options.CellMerging = True
- Width = 78
- OnCompareRowValuesForCellMerging = TV1Column11CompareRowValuesForCellMerging
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #21161#29702
- DataBinding.FieldName = 'YWY'
- HeaderAlignmentHorz = taCenter
- Width = 69
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #24066#22330
- DataBinding.FieldName = 'TOCOUNTRY1'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #19968#26376#38144#21806
- DataBinding.FieldName = 'MONTH1'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #20108#26376#38144#21806
- DataBinding.FieldName = 'MONTH2'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #19977#26376#38144#21806
- DataBinding.FieldName = 'MONTH3'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column6: TcxGridDBColumn
- Caption = #22235#26376#38144#21806
- DataBinding.FieldName = 'MONTH4'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 80
- OnCompareRowValuesForCellMerging = TV1Column10CompareRowValuesForCellMerging
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #20116#26376#38144#21806
- DataBinding.FieldName = 'MONTH5'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 80
- OnCompareRowValuesForCellMerging = TV1Column10CompareRowValuesForCellMerging
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #20845#26376#38144#21806
- DataBinding.FieldName = 'MONTH6'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- HeaderGlyphAlignmentHorz = taCenter
- Width = 80
- OnCompareRowValuesForCellMerging = TV1Column10CompareRowValuesForCellMerging
- end
- object TV1Column5: TcxGridDBColumn
- DataBinding.FieldName = 'WEEKUSD'
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- Width = 70
- end
- object TV1Column1: TcxGridDBColumn
- DataBinding.FieldName = 'YEARUSD'
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- Width = 70
- end
- object TV1Column3: TcxGridDBColumn
- DataBinding.FieldName = 'MONTHUSD'
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- Width = 70
- end
- object TV1Column12: TcxGridDBColumn
- DataBinding.FieldName = 'nfrmbw'
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- Width = 66
- end
- object TV1Column13: TcxGridDBColumn
- DataBinding.FieldName = 'nfrmbm'
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- Width = 66
- end
- object TV1Column16: TcxGridDBColumn
- DataBinding.FieldName = 'nfrmby'
- PropertiesClassName = 'TcxTextEditProperties'
- Visible = False
- Width = 66
- end
- object TV1Column17: TcxGridDBColumn
- Caption = #19971#26376#38144#21806
- DataBinding.FieldName = 'MONTH7'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column18: TcxGridDBColumn
- Caption = #20843#26376#38144#21806
- DataBinding.FieldName = 'MONTH8'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column19: TcxGridDBColumn
- Caption = #20061#26376#38144#21806
- DataBinding.FieldName = 'MONTH9'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column20: TcxGridDBColumn
- Caption = #21313#26376#38144#21806
- DataBinding.FieldName = 'MONTH10'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 80
- end
- object TV1Column21: TcxGridDBColumn
- Caption = #21313#19968#26376#38144#21806
- DataBinding.FieldName = 'MONTH11'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 90
- end
- object TV1Column22: TcxGridDBColumn
- Caption = #21313#20108#26376#38144#21806
- DataBinding.FieldName = 'MONTH12'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 101
- end
- object Z1: TcxGridDBColumn
- DataBinding.FieldName = 'Z1'
- Visible = False
- end
- object Z2: TcxGridDBColumn
- DataBinding.FieldName = 'Z2'
- Visible = False
- end
- object Z3: TcxGridDBColumn
- DataBinding.FieldName = 'Z3'
- Visible = False
- end
- object Z4: TcxGridDBColumn
- DataBinding.FieldName = 'Z4'
- Visible = False
- end
- object Z5: TcxGridDBColumn
- DataBinding.FieldName = 'Z5'
- Visible = False
- end
- object Z6: TcxGridDBColumn
- DataBinding.FieldName = 'Z6'
- Visible = False
- end
- object Z7: TcxGridDBColumn
- DataBinding.FieldName = 'Z7'
- Visible = False
- end
- object Z8: TcxGridDBColumn
- DataBinding.FieldName = 'Z8'
- Visible = False
- end
- object Z9: TcxGridDBColumn
- DataBinding.FieldName = 'Z9'
- Visible = False
- end
- object Z10: TcxGridDBColumn
- DataBinding.FieldName = 'Z10'
- Visible = False
- end
- object Z11: TcxGridDBColumn
- DataBinding.FieldName = 'Z11'
- Visible = False
- end
- object Z12: TcxGridDBColumn
- DataBinding.FieldName = 'Z12'
- Visible = False
- end
- object TV1Column23: TcxGridDBColumn
- Caption = '2022'#24180#38144#21806#30446#26631#65288#32654#37329#65289
- DataBinding.FieldName = 'ZdyFlt1'
- HeaderAlignmentHorz = taCenter
- Width = 124
- end
- object TV1Column24: TcxGridDBColumn
- Caption = #23436#25104#30446#26631#38144#21806#30334#20998#27604
- DataBinding.FieldName = 'MBBFB'
- HeaderAlignmentHorz = taRightJustify
- Width = 147
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 530
- Width = 1325
- Height = 45
- Align = alBottom
- TabOrder = 3
- object Label6: TLabel
- Left = 27
- Top = 6
- Width = 144
- Height = 24
- Caption = #24180#24230#24635#35745'USD:'
- Font.Charset = GB2312_CHARSET
- Font.Color = clRed
- Font.Height = -24
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 81
- Width = 1325
- Height = 60
- Align = alTop
- Caption = #38144' '#21806' '#24773' '#20917' '#27719' '#24635' '#34920
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -27
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 888
- Top = 184
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 893
- Top = 217
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 858
- Top = 188
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowDialog = False
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 1013
- Top = 212
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 251
- Top = 364
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 255
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = ADOQueryMain
- Left = 255
- Top = 336
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 984
- Top = 212
- end
- object cxStyleRepository1: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle1: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #24494#36719#38597#40657
- Font.Style = [fsBold]
- end
- object cxStyle3: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -15
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- end
- end
- object cxStyleRepository2: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle2: TcxStyle
- end
- end
- object IdHTTP1: TIdHTTP
- MaxLineAction = maException
- ReadTimeout = 0
- AllowCookies = True
- ProxyParams.BasicAuthentication = False
- ProxyParams.ProxyPort = 0
- Request.ContentLength = -1
- Request.ContentRangeEnd = 0
- Request.ContentRangeStart = 0
- Request.ContentType = 'text/html'
- Request.Accept = 'text/html, */*'
- Request.BasicAuthentication = False
- Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
- HTTPOptions = [hoForceEncodeParams]
- Left = 348
- Top = 172
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XSQKList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XSQKList.pas
deleted file mode 100644
index 78bc093..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XSQKList.pas
+++ /dev/null
@@ -1,795 +0,0 @@
-unit U_XSQKList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc, Registry, cxCurrencyEdit, IdBaseComponent,
- IdComponent, IdTCPConnection, IdTCPClient, IdHTTP;
-
-type
- TfrmXSQKLLIST = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- TV1Column15: TcxGridDBColumn;
- ToolButton1: TToolButton;
- Label1: TLabel;
- TV1Column2: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- TV1Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- Label16: TLabel;
- Label17: TLabel;
- bm: TEdit;
- YWY: TEdit;
- TV1Column11: TcxGridDBColumn;
- Label2: TLabel;
- zz: TEdit;
- TV1Column1: TcxGridDBColumn;
- TV1Column3: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column16: TcxGridDBColumn;
- Panel2: TPanel;
- Label6: TLabel;
- Panel3: TPanel;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- cxStyleRepository2: TcxStyleRepository;
- cxStyle2: TcxStyle;
- IdHTTP1: TIdHTTP;
- TV1Column17: TcxGridDBColumn;
- TV1Column18: TcxGridDBColumn;
- TV1Column19: TcxGridDBColumn;
- TV1Column20: TcxGridDBColumn;
- TV1Column21: TcxGridDBColumn;
- TV1Column22: TcxGridDBColumn;
- Z1: TcxGridDBColumn;
- Z2: TcxGridDBColumn;
- Z3: TcxGridDBColumn;
- Z4: TcxGridDBColumn;
- Z5: TcxGridDBColumn;
- Z6: TcxGridDBColumn;
- Z7: TcxGridDBColumn;
- Z8: TcxGridDBColumn;
- Z9: TcxGridDBColumn;
- Z10: TcxGridDBColumn;
- Z11: TcxGridDBColumn;
- Z12: TcxGridDBColumn;
- cxStyle3: TcxStyle;
- ToolButton2: TToolButton;
- TV1Column23: TcxGridDBColumn;
- TV1Column24: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure GCNAMEKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure ToolButton1Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure bmKeyPress(Sender: TObject; var Key: Char);
- procedure bmChange(Sender: TObject);
- procedure TV1Column10CompareRowValuesForCellMerging(Sender: TcxGridColumn; ARow1: TcxGridDataRow; AProperties1: TcxCustomEditProperties; const AValue1: Variant; ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties; const AValue2: Variant; var AAreEqual: Boolean);
- procedure TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- procedure TV1Column11CompareRowValuesForCellMerging(Sender: TcxGridColumn; ARow1: TcxGridDataRow; AProperties1: TcxCustomEditProperties; const AValue1: Variant; ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties; const AValue2: Variant; var AAreEqual: Boolean);
- procedure ToolButton2Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- function GetShellFolders(strDir: string): string;
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp9, U_BaoGuanInPut, U_Fun, U_UserSel;
-
-{$R *.dfm}
-function TfrmXSQKLLIST.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmXSQKLLIST.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmXSQKLLIST.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmXSQKLLIST.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
-
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmXSQKLLIST.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
-// SQL.Add('select * from (');
-
- sql.Add('EXEC P_CHQD_XSList @lzyear=' + QuotedStr(FormatDateTime('yyyy-MM-dd', ENDDate.DateTime)));
-
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
- Label6.Caption := 'ܼUSD:' + FloatToStr(ADOQueryMain.fieldbyname('hz').asfloat);
-// FloatToCurr()
-// ShowMessage(CurrToStr(FloatToCurr(tV1.DataController.Summary.FooterSummaryValues[10])));
-// ShowMessage(VarToStr(FloatToCurr(1234)));
-
-
-end;
-
-procedure TfrmXSQKLLIST.TBRafreshClick(Sender: TObject);
-begin
-
- InitGrid();
-
-end;
-
-procedure TfrmXSQKLLIST.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, '嵥34');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmXSQKLLIST.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, '嵥34');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmXSQKLLIST.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmXSQKLLIST.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmXSQKLLIST.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmXSQKLLIST.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmXSQKLLIST.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmXSQKLLIST.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmXSQKLLIST.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmXSQKLLIST.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmXSQKLLIST.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmXSQKLLIST.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmXSQKLLIST.GCNAMEKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmXSQKLLIST.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmXSQKLLIST.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmXSQKLLIST.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmXSQKLLIST.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXSQKLLIST.YWYChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmXSQKLLIST.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmXSQKLLIST.ToolButton1Click(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// SelExportData(Tv1, ADOQueryMain, '嵥');
-// with ADOQueryMain do
-// begin
-// Filtered := False;
-// Close;
-// sql.Clear;
-// sql.Add('select A.*,B.* ');
-//// SQL.Add(',HDNAME=(SELECT HDNAME FROM JYOrderCon_TT C WHERE C.DCNO=A.DCNO)');
-// SQL.Add(',TOCOUNTRY1=(SELECT TOP 1 ISNULL(note,zdyname) FROM KH_ZDY D WHERE D.ZDYNAME=A.TOCOUNTRY)');
-// SQL.Add(',BM=(SELECT ISNULL(UDEPT,'''')+USERNAME FROM SY_User C WHERE C.USERNAME=A.FILLER )');
-//
-// sql.Add(' from JYOrder_BaoGuan_Main A INNER JOIN JYOrder_BaoGuan_SUB B ON A.BGID=B.BGID ');
-// sql.Add(' where A.Valid=''Y'' and B.SValid=''Y'' ');
-// SQL.Add('AND bgStatus=''''');
-// sql.Add(' and filltime>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
-// sql.Add(' and filltime<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-// sql.Add('order by YWY');
-//// ShowMessage(sql.Text);
-// Open;
-// end;
-// SCreateCDS20(ADOQueryMain, CDS_Main);
-// SInitCDSData20(ADOQueryMain, CDS_Main);
-// TBFind.Click();
- TcxGridToExcel('ϼ嵥', cxGrid2);
-
- InitGrid();
- TBFind.Click();
-end;
-
-procedure TfrmXSQKLLIST.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmXSQKLLIST.bmKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- begin
- InitGrid();
- end;
-end;
-
-procedure TfrmXSQKLLIST.bmChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmXSQKLLIST.TV1Column10CompareRowValuesForCellMerging(Sender: TcxGridColumn; ARow1: TcxGridDataRow; AProperties1: TcxCustomEditProperties; const AValue1: Variant; ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties; const AValue2: Variant; var AAreEqual: Boolean);
-begin
- if ARow1.Values[TV1Column8.Index] = ARow2.Values[TV1Column8.Index] then
- AAreEqual := True
- else
- AAreEqual := False;
-end;
-
-procedure TfrmXSQKLLIST.TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if (AViewInfo.GridRecord.Values[tv1.GetColumnByFieldName('TOCOUNTRY1').Index] = 'ϼ') then
- ACanvas.Brush.Color := $004080FF;
-end;
-
-procedure TfrmXSQKLLIST.TV1Column11CompareRowValuesForCellMerging(Sender: TcxGridColumn; ARow1: TcxGridDataRow; AProperties1: TcxCustomEditProperties; const AValue1: Variant; ARow2: TcxGridDataRow; AProperties2: TcxCustomEditProperties; const AValue2: Variant; var AAreEqual: Boolean);
-begin
- if ARow1.Values[TV1Column8.Index] = ARow2.Values[TV1Column8.Index] then
- AAreEqual := True
- else
- AAreEqual := False;
-end;
-
-procedure TfrmXSQKLLIST.ToolButton2Click(Sender: TObject);
-begin
- try
- frmZDYHelp9 := TfrmZDYHelp9.Create(Application);
- with frmZDYHelp9 do
- begin
- flag := 'XSMB';
- flagname := 'Ŀ';
- if ShowModal = 1 then
- begin
-// Self.KHPM.Text := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- finally
- frmZDYHelp9.Free;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZInPut.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZInPut.dfm
deleted file mode 100644
index 404b846..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZInPut.dfm
+++ /dev/null
@@ -1,1046 +0,0 @@
-object frmXYZInPut: TfrmXYZInPut
- Left = 351
- Top = 51
- Width = 991
- Height = 645
- Caption = #20449#29992#35777#24405#20837
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 975
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBSave: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 15
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 975
- Height = 573
- Align = alClient
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Label13: TLabel
- Left = 17
- Top = 15
- Width = 72
- Height = 12
- Caption = #20449#29992#35777#21495#30721#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 17
- Top = 43
- Width = 72
- Height = 12
- Caption = #20449#29992#35777#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 258
- Top = 15
- Width = 48
- Height = 12
- Caption = #20844' '#21496#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label15: TLabel
- Left = 29
- Top = 209
- Width = 60
- Height = 12
- Caption = #26377#26080#25171#21253#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label16: TLabel
- Left = 246
- Top = 127
- Width = 60
- Height = 12
- Caption = #30446' '#30340' '#22320#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label19: TLabel
- Left = 41
- Top = 126
- Width = 48
- Height = 12
- Caption = #36215#36816#22320#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label18: TLabel
- Left = 637
- Top = 242
- Width = 60
- Height = 12
- Caption = #20184#27454#22825#25968#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label28: TLabel
- Left = 483
- Top = 239
- Width = 36
- Height = 12
- Caption = #23458#25143#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label30: TLabel
- Left = 459
- Top = 14
- Width = 60
- Height = 12
- Caption = #24320#35777#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label1: TLabel
- Left = 515
- Top = 270
- Width = 13
- Height = 48
- Caption = #29305#13#10#21035#13#10#35201#13#10#27714
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 48
- Top = 269
- Width = 13
- Height = 60
- Caption = #36135#13#10#29289#13#10#25551#13#10#36848#13#10
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 48
- Top = 482
- Width = 13
- Height = 24
- Caption = #22791#13#10#27880
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 637
- Top = 17
- Width = 60
- Height = 12
- Caption = #25910#21040#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label12: TLabel
- Left = 240
- Top = 43
- Width = 66
- Height = 12
- Caption = #25240'USD'#27719#29575#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label14: TLabel
- Left = 453
- Top = 41
- Width = 66
- Height = 12
- Caption = #25240'USD'#37329#39069#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label20: TLabel
- Left = 637
- Top = 44
- Width = 60
- Height = 12
- Caption = #20323#37329#27604#20363#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label21: TLabel
- Left = 29
- Top = 71
- Width = 60
- Height = 12
- Caption = #36890#30693#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label23: TLabel
- Left = 258
- Top = 71
- Width = 48
- Height = 12
- Caption = #36890#30693#34892#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label24: TLabel
- Left = 17
- Top = 98
- Width = 72
- Height = 12
- Caption = #36890#30693#38134#34892#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label25: TLabel
- Left = 246
- Top = 99
- Width = 60
- Height = 12
- Caption = #26377#25928#26399#38480#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label26: TLabel
- Left = 492
- Top = 67
- Width = 13
- Height = 48
- Caption = #24320#13#10#35777#13#10#34892#13#10
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label29: TLabel
- Left = 459
- Top = 128
- Width = 60
- Height = 12
- Caption = #35746' '#21333' '#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label32: TLabel
- Left = 29
- Top = 154
- Width = 60
- Height = 12
- Caption = #24320#35777#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label33: TLabel
- Left = 246
- Top = 156
- Width = 60
- Height = 12
- Caption = #20462#25913#27425#25968#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label34: TLabel
- Left = 459
- Top = 154
- Width = 60
- Height = 12
- Caption = #35013#36816#26399#38480#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label35: TLabel
- Left = 17
- Top = 181
- Width = 72
- Height = 12
- Caption = #20449#29992#35777#29366#24577#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label36: TLabel
- Left = 258
- Top = 184
- Width = 48
- Height = 12
- Caption = #19994#21153#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label37: TLabel
- Left = 466
- Top = 184
- Width = 54
- Height = 12
- Caption = #37096' '#38376#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label38: TLabel
- Left = 613
- Top = 182
- Width = 84
- Height = 12
- Caption = #21327#35758#36864#35777#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label7: TLabel
- Left = 246
- Top = 212
- Width = 60
- Height = 12
- Caption = #26159#21542#36716#36816#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label8: TLabel
- Left = 483
- Top = 212
- Width = 36
- Height = 12
- Caption = #20998#25209#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label9: TLabel
- Left = 637
- Top = 212
- Width = 60
- Height = 12
- Caption = #26159#21542#36864#35777#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label10: TLabel
- Left = 29
- Top = 237
- Width = 60
- Height = 12
- Caption = #25171#21253#38134#34892#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label17: TLabel
- Left = 246
- Top = 240
- Width = 60
- Height = 12
- Caption = #25968#37327#20844#24046#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 48
- Top = 336
- Width = 13
- Height = 36
- Caption = #25260#13#10#22836#13#10#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label22: TLabel
- Left = 515
- Top = 342
- Width = 13
- Height = 36
- Caption = #36890#13#10#30693#13#10#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label27: TLabel
- Left = 48
- Top = 404
- Width = 13
- Height = 36
- Caption = #25910#13#10#36135#13#10#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label31: TLabel
- Left = 515
- Top = 410
- Width = 13
- Height = 36
- Caption = #20184#13#10#27454#13#10#20154
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object XYNO: TEdit
- Tag = 1
- Left = 84
- Top = 11
- Width = 141
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 0
- end
- object XMONEY: TEdit
- Tag = 1
- Left = 84
- Top = 39
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 1
- OnChange = XMONEYChange
- end
- object XGSMC: TBtnEditA
- Tag = 2
- Left = 305
- Top = 12
- Width = 141
- Height = 20
- Hint = 'BGTT/'#20844#21496
- TabOrder = 5
- Text = #32461#20852#24066#25391#27704#32442#32455#21697#26377#38480#20844#21496
- OnBtnClick = XQYDBtnClick
- end
- object XQYD: TBtnEditA
- Tag = 1
- Left = 84
- Top = 123
- Width = 100
- Height = 20
- Hint = 'LCFromPlace/'#36215#36816#22320
- ReadOnly = True
- TabOrder = 2
- OnBtnClick = XQYDBtnClick
- end
- object XMDD: TBtnEditA
- Tag = 1
- Left = 305
- Top = 124
- Width = 100
- Height = 20
- Hint = 'LCTOPlace/'#30446#30340#28207
- TabOrder = 3
- OnBtnClick = XQYDBtnClick
- end
- object FKTS: TEdit
- Tag = 1
- Left = 693
- Top = 235
- Width = 100
- Height = 20
- TabOrder = 4
- end
- object XKHNAME: TBtnEditA
- Tag = 1
- Left = 513
- Top = 236
- Width = 100
- Height = 20
- Hint = 'YSFS/'#36816#36755#26041#24335
- TabOrder = 6
- OnBtnClick = XKHNAMEBtnClick
- end
- object XKZRQ: TDateTimePicker
- Tag = 2
- Left = 513
- Top = 10
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 7
- end
- object XTBYQ: TMemo
- Tag = 2
- Left = 536
- Top = 269
- Width = 397
- Height = 64
- Hint = 'XTBYQ/'#29305#21035#35201#27714
- ScrollBars = ssVertical
- TabOrder = 8
- end
- object XHWMS: TMemo
- Tag = 2
- Left = 78
- Top = 265
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 9
- end
- object NOTE: TMemo
- Tag = 2
- Left = 76
- Top = 479
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 10
- end
- object XYWDB: TComboBox
- Tag = 2
- Left = 84
- Top = 206
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 11
- Items.Strings = (
- #26159
- #21542)
- end
- object XSDRQ: TDateTimePicker
- Tag = 1
- Left = 693
- Top = 10
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 12
- end
- object XUNIT: TComboBox
- Tag = 2
- Left = 176
- Top = 40
- Width = 61
- Height = 20
- ItemHeight = 12
- ItemIndex = 1
- TabOrder = 13
- Text = #32654#20803
- OnChange = XUNITChange
- Items.Strings = (
- #20154#27665#24065
- #32654#20803)
- end
- object ZUSDHL: TEdit
- Tag = 2
- Left = 305
- Top = 40
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 14
- OnChange = XMONEYChange
- end
- object ZUSDJE: TEdit
- Tag = 2
- Left = 513
- Top = 38
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 15
- end
- object XYJBL: TEdit
- Tag = 1
- Left = 693
- Top = 37
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 16
- end
- object XTZRQ: TDateTimePicker
- Tag = 2
- Left = 84
- Top = 67
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 17
- end
- object XTZH: TComboBox
- Tag = 2
- Left = 305
- Top = 68
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 18
- Items.Strings = (
- #20013#22269#38134#34892
- #24037#21830#38134#34892
- #24314#35774#38134#34892
- #20892#19994#38134#34892
- #25307#21830#38134#34892
- #21326#22799#38134#34892
- #20132#36890#38134#34892
- #20013#20449#38134#34892
- #28006#21457#38134#34892
- #20809#22823#38134#34892
- #24191#21457#38134#34892
- #27719#20016#38134#34892
- #31119#24314#20852#19994
- #21830#19994#38134#34892
- #29616#37329#25910#21462
- #20195#29702#20323#37329#20013#25187#38500
- #23458#20154#21033#28070#20013#25187#38500)
- end
- object XTZYHH: TEdit
- Tag = 2
- Left = 84
- Top = 95
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 19
- end
- object XYXQX: TDateTimePicker
- Tag = 2
- Left = 305
- Top = 96
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 20
- end
- object XKZH: TMemo
- Tag = 1
- Left = 513
- Top = 66
- Width = 397
- Height = 49
- Hint = 'XKZH/'#24320#35777#34892
- ScrollBars = ssVertical
- TabOrder = 21
- end
- object XKZFS: TComboBox
- Tag = 2
- Left = 84
- Top = 150
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 22
- Items.Strings = (
- #27491#26412
- #21103#26412
- #30005#24320
- #20449#24320
- #31616#24320
- #26356#27491#30005)
- end
- object XXGCS: TEdit
- Tag = 2
- Left = 305
- Top = 153
- Width = 100
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 23
- end
- object XZYQX: TDateTimePicker
- Tag = 1
- Left = 513
- Top = 152
- Width = 100
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 24
- end
- object XXYZZT: TComboBox
- Tag = 1
- Left = 84
- Top = 178
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- ItemIndex = 0
- TabOrder = 25
- Text = #27491#26412
- Items.Strings = (
- #27491#26412
- #21103#26412
- #24453#25913#35777
- #26356#27491#30005
- #36864#35777
- #20462#25913#20214)
- end
- object XYWY: TComboBox
- Tag = 2
- Left = 305
- Top = 180
- Width = 100
- Height = 20
- ItemHeight = 12
- TabOrder = 26
- end
- object XBM: TEdit
- Tag = 2
- Left = 513
- Top = 180
- Width = 100
- Height = 20
- TabOrder = 27
- end
- object XXYTZRQ: TDateTimePicker
- Tag = 2
- Left = 693
- Top = 178
- Width = 100
- Height = 20
- Date = 0.498237581021385300
- Time = 0.498237581021385300
- TabOrder = 28
- end
- object XSFZY: TComboBox
- Tag = 2
- Left = 305
- Top = 208
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 29
- Items.Strings = (
- #26159
- #21542)
- end
- object XFP: TComboBox
- Tag = 1
- Left = 513
- Top = 208
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 30
- Items.Strings = (
- #26159
- #21542)
- end
- object XSFTZ: TComboBox
- Tag = 2
- Left = 693
- Top = 207
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 31
- Items.Strings = (
- #26159
- #21542)
- end
- object XDBYH: TComboBox
- Tag = 2
- Left = 84
- Top = 234
- Width = 100
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 32
- Items.Strings = (
- #20013#22269#38134#34892
- #24037#21830#38134#34892
- #24314#35774#38134#34892
- #20892#19994#38134#34892
- #25307#21830#38134#34892
- #21326#22799#38134#34892
- #20132#36890#38134#34892
- #20013#20449#38134#34892
- #28006#21457#38134#34892
- #20809#22823#38134#34892
- #24191#21457#38134#34892
- #27719#20016#38134#34892
- #31119#24314#20852#19994
- #21830#19994#38134#34892
- #29616#37329#25910#21462
- #20195#29702#20323#37329#20013#25187#38500
- #23458#20154#21033#28070#20013#25187#38500)
- end
- object XSLGC: TEdit
- Tag = 1
- Left = 305
- Top = 236
- Width = 100
- Height = 20
- TabOrder = 33
- end
- object TTR: TMemo
- Tag = 2
- Left = 76
- Top = 336
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 34
- end
- object TZR: TMemo
- Tag = 2
- Left = 536
- Top = 339
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 35
- end
- object SHREN: TMemo
- Tag = 2
- Left = 76
- Top = 408
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 36
- end
- object FKR: TMemo
- Tag = 2
- Left = 536
- Top = 409
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 37
- end
- object XORDERNO: TEdit
- Tag = 1
- Left = 512
- Top = 125
- Width = 278
- Height = 20
- TabOrder = 38
- end
- end
- object DataSource3: TDataSource
- DataSet = CDS_Sub
- Left = 657
- Top = 543
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 708
- Top = 528
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- EnableBCD = False
- Parameters = <>
- Left = 1080
- Top = 272
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- EnableBCD = False
- Parameters = <>
- Left = 1112
- Top = 272
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1144
- Top = 272
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 764
- Top = 513
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZInPut.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZInPut.pas
deleted file mode 100644
index 479a526..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZInPut.pas
+++ /dev/null
@@ -1,876 +0,0 @@
-unit U_XYZInPut;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxCalendar, cxDropDownEdit, ComCtrls, ToolWin,
- cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxClasses, cxControls, cxGridCustomView, cxGrid, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxButtonEdit, cxTextEdit, StdCtrls, BtnEdit,
- ExtCtrls, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmXYZInPut = class(TForm)
- ToolBar1: TToolBar;
- TBSave: TToolButton;
- TBClose: TToolButton;
- DataSource3: TDataSource;
- CDS_Sub: TClientDataSet;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- cxGridPopupMenu2: TcxGridPopupMenu;
- Panel1: TPanel;
- Label13: TLabel;
- XYNO: TEdit;
- Label4: TLabel;
- XMONEY: TEdit;
- Label5: TLabel;
- XGSMC: TBtnEditA;
- XQYD: TBtnEditA;
- XMDD: TBtnEditA;
- Label15: TLabel;
- Label16: TLabel;
- Label19: TLabel;
- Label18: TLabel;
- FKTS: TEdit;
- Label28: TLabel;
- XKHNAME: TBtnEditA;
- Label30: TLabel;
- XKZRQ: TDateTimePicker;
- Label1: TLabel;
- XTBYQ: TMemo;
- Label3: TLabel;
- XHWMS: TMemo;
- NOTE: TMemo;
- Label6: TLabel;
- XYWDB: TComboBox;
- Label11: TLabel;
- XSDRQ: TDateTimePicker;
- XUNIT: TComboBox;
- Label12: TLabel;
- ZUSDHL: TEdit;
- Label14: TLabel;
- ZUSDJE: TEdit;
- Label20: TLabel;
- XYJBL: TEdit;
- Label21: TLabel;
- XTZRQ: TDateTimePicker;
- Label23: TLabel;
- XTZH: TComboBox;
- Label24: TLabel;
- XTZYHH: TEdit;
- Label25: TLabel;
- XYXQX: TDateTimePicker;
- Label26: TLabel;
- XKZH: TMemo;
- Label29: TLabel;
- Label32: TLabel;
- XKZFS: TComboBox;
- Label33: TLabel;
- XXGCS: TEdit;
- Label34: TLabel;
- XZYQX: TDateTimePicker;
- Label35: TLabel;
- XXYZZT: TComboBox;
- Label36: TLabel;
- XYWY: TComboBox;
- Label37: TLabel;
- XBM: TEdit;
- Label38: TLabel;
- XXYTZRQ: TDateTimePicker;
- Label7: TLabel;
- XSFZY: TComboBox;
- Label8: TLabel;
- XFP: TComboBox;
- Label9: TLabel;
- XSFTZ: TComboBox;
- Label10: TLabel;
- XDBYH: TComboBox;
- Label17: TLabel;
- XSLGC: TEdit;
- Label2: TLabel;
- TTR: TMemo;
- Label22: TLabel;
- TZR: TMemo;
- Label27: TLabel;
- SHREN: TMemo;
- Label31: TLabel;
- FKR: TMemo;
- XORDERNO: TEdit;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure TCXLJClick(Sender: TObject);
- procedure XQYDBtnClick(Sender: TObject);
- procedure KHNameBtnClick(Sender: TObject);
- procedure Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column6PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure XKHNAMEBtnClick(Sender: TObject);
- procedure XUNITChange(Sender: TObject);
- procedure XMONEYChange(Sender: TObject);
- private
- { Private declarations }
- function SaveCKData(): Boolean;
- public
- { Public declarations }
- FBCId, canshu3: string;
- CopyStr: string;
- end;
-
-var
- frmXYZInPut: TfrmXYZInPut;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_ZdyAttachment, U_ProductOrderList_Sel,
- U_DCDList_Sel, U_ZdyAttachGYS;
-
-{$R *.dfm}
-
-procedure TfrmXYZInPut.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-function TfrmXYZInPut.SaveCKData(): Boolean;
-var
- FJMID, Maxno, MaxSubNo, FSCID: string;
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from XYZ_MAIN where XYID=''' + Trim(FBCId) + '''');
- Open;
- end;
- FBCId := Trim(ADOQueryTemp.fieldbyname('XYID').AsString);
- if Trim(FBCId) = '' then
- begin
- if GetLSNo(ADOQueryCmd, Maxno, 'XY', 'XYZ_MAIN', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- Maxno := Trim(FBCId);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from XYZ_MAIN where XYID=''' + Trim(Maxno) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FBCId) = '' then
- begin
- Append;
- FieldByName('Filler').Value := Trim(DName);
- FieldByName('FillerCode').Value := Trim(DCode);
- FieldByName('XXGCS').Value := 0;
-// FieldByName('status').Value := Trim(DCode);
- end
- else
- begin
- Edit;
- FieldByName('Editer').Value := Trim(DName);
- FieldByName('EditerCode').Value := Trim(DCode);
- FieldByName('EditTime').Value := SGetServerDate(ADOQueryTemp);
-
- end;
- FieldByName('XYID').Value := Trim(Maxno);
- RTSetsavedata(ADOQueryCmd, 'XYZ_MAIN', Panel1, 1);
- RTSetsavedata(ADOQueryCmd, 'XYZ_MAIN', Panel1, 2);
-// if Trim(FBCId) <> '' then
-// begin
-// FieldByName('XXGCS').Value := StrToFloatDEF(XXGCS.Text, 0) + 1;
-// end;
-
- Post;
- end;
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('select * from XYZ_MAIN where XYNO=''' + Trim(XYNO.Text) + ''' and Valid=''Y'' ');
-// Open;
-// end;
-// if ADOQueryTemp.RecordCount > 1 then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// Application.MessageBox('˷ƱѾʹãܱ!', 'ʾ', 0);
-// Exit;
-// end;
-
- ADOQueryCmd.Connection.CommitTrans;
- FBCId := Trim(Maxno);
- Result := True;
- except
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmXYZInPut.TBCloseClick(Sender: TObject);
-begin
-
- Close;
-end;
-
-procedure TfrmXYZInPut.FormShow(Sender: TObject);
-begin
-
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from XYZ_MAIN A');
- sql.Add(' where XYID=''' + Trim(FBCId) + '''');
- Open;
- end;
- SCSHDataNew(ADOQueryMain, Panel1, 1);
- SCSHDataNew(ADOQueryMain, Panel1, 2);
-
- if CopyStr = '99' then
- begin
- FBCId := '';
-
- end;
-
- if Trim(FBCId) = '' then
- begin
- XYWY.Text := Trim(DName);
- XKZRQ.DateTime := SGetServerDate10(ADOQueryTemp);
- XSDRQ.DateTime := XKZRQ.DateTime;
- XTZRQ.DateTime := XKZRQ.DateTime;
- XYXQX.DateTime := XKZRQ.DateTime;
- XZYQX.DateTime := XKZRQ.DateTime;
-
- XXYTZRQ.DateTime := XKZRQ.DateTime;
-// XZYQX.DateTime := XKZRQ.DateTime;
-
- end;
-
-end;
-
-procedure TfrmXYZInPut.TBSaveClick(Sender: TObject);
-var
- FReal: Double;
- i: Integer;
-begin
- with Panel1 do
- begin
- for i := 0 to ControlCount - 1 do
- begin
- if Controls[i].Tag = 1 then
- begin
- if Controls[i] is TLabel then
- continue;
- if Controls[i].Tag <> 1 then
- continue;
- if Controls[i] is TEdit then
- begin
- if Trim(TEdit(Controls[i]).Text) = '' then
- begin
- Application.MessageBox('ɫעϢΪд', 'ʾ', 0);
- Exit;
- end;
- end;
- if Controls[i] is TBtnEditA then
- begin
- if Trim(TBtnEditA(Controls[i]).Text) = '' then
- begin
- Application.MessageBox('ɫעϢΪд', 'ʾ', 0);
- Exit;
- end;
- end;
- if Controls[i] is TComboBox then
- begin
- if Trim(TComboBox(Controls[i]).Text) = '' then
- begin
- Application.MessageBox('ɫעϢΪд', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
- end;
- end;
-
- ToolBar1.SetFocus;
- if SaveCKData() then
- begin
- Application.MessageBox('ɹ!', 'ʾ', 0);
- ModalResult := 1;
- Exit;
- end;
-end;
-
-procedure TfrmXYZInPut.ToolButton2Click(Sender: TObject);
-var
- i: Integer;
-begin
- //CopyAddRowCDS(CDS_Sub);
- {with CDS_Sub do
- begin
- Edit;
- FieldByName('BGID').Value:=Null;
- FieldByName('BSID').Value:=Null;
- Post;
- end; }
-
-
- frmProductOrderList_Sel := TfrmProductOrderList_Sel.Create(self);
- with frmProductOrderList_Sel do
- begin
- if showmodal = 1 then
- begin
- while frmProductOrderList_Sel.Order_Main.Locate('SSel', True, []) do
- begin
- Self.CDS_Sub.Append;
- i := CDS_Sub.RecordCount;
- Self.CDS_Sub.FieldByName('XHInt').Value := i + 1;
- Self.CDS_Sub.FieldbyName('C6BGPrice').Value := 0;
-// Self.CDS_Sub.FieldbyName('Money').Value := 0;
- Self.CDS_Sub.fieldbyname('orderno').Value := Order_Main.fieldbyname('Orderno').asstring;
- Self.CDS_Sub.fieldbyname('FromMainId').Value := Order_Main.fieldbyname('MainId').asstring;
- Self.CDS_Sub.fieldbyname('C3BGNameEng').Value := Order_Main.fieldbyname('YWNAME').asstring;
- Self.CDS_Sub.fieldbyname('C3BGName').Value := Order_Main.fieldbyname('MPRTCODENAME').asstring;
- Self.CDS_Sub.fieldbyname('YSFuKuan').Value := Order_Main.fieldbyname('MPRTMF').asstring;
- Self.CDS_Sub.fieldbyname('YSKeZhong').Value := Order_Main.fieldbyname('MPRTKZ').asstring;
- Self.CDS_Sub.fieldbyname('YSChenFen').Value := Order_Main.fieldbyname('MPRTCF').asstring;
- Self.CDS_Sub.fieldbyname('C4BGQty').Value := Order_Main.fieldbyname('PRTORDERQTY').ASFLOAT;
-
- Self.CDS_Sub.fieldbyname('C5BGUnit').Value := Order_Main.fieldbyname('orderunit').asstring;
-
- Self.CDS_Sub.fieldbyname('ZZFF').Value := Order_Main.fieldbyname('BPBigType').asstring;
- Self.CDS_Sub.fieldbyname('ZDDATE').Value := Order_Main.fieldbyname('filltime').AsDateTime;
- Self.CDS_Sub.fieldbyname('GYLX').Value := Order_Main.fieldbyname('JGType').asstring;
- Self.CDS_Sub.fieldbyname('JSUNIT').Value := '';
- Self.CDS_Sub.fieldbyname('WL').Value := 'ƽ';
- Self.CDS_Sub.fieldbyname('sj').Value := '';
-
- Self.CDS_Sub.Post;
- frmProductOrderList_Sel.Order_Main.Delete;
- end;
- end;
- free;
- end;
-end;
-
-procedure TfrmXYZInPut.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
- if Trim(CDS_Sub.fieldbyname('BSID').AsString) <> '' then
- begin
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() ');
- sql.Add(' where BSID=''' + Trim(CDS_Sub.fieldbyname('BSID').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set ');
- sql.Add(' C7BGMoneyHZ=(select Sum(C7BGMoney) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E1BZQtyHZ=(select Sum(E1BZQty) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E2ChiMaQtyHZ=(select Sum(E2ChiMaQty) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E3MaoZHZ=(select Sum(E3MaoZ) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(',E4JingZHZ=(select Sum(E4JingZ) from JYOrder_BaoGuan_Sub A where A.BGID=JYOrder_BaoGuan_Main.BGID and A.SValid=''Y'' )');
- sql.Add(' where BGID=''' + Trim(CDS_Sub.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- end;
- CDS_Sub.Delete;
-end;
-
-procedure TfrmXYZInPut.v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'C3BGName';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C3BGName').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1 * from JYOrder_BaoGuan_Sub where C3BGName=''' + Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZDYName').AsString) + '''');
- sql.add(' and isnull(C2HSNO,'''')<>'''' ');
- sql.Add(' order by SFillTime desc');
- Open;
- end;
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C2HSNO').Value := Trim(ADOQueryTemp.fieldbyname('C2HSNO').asstring);
- FieldByName('C3BGNameEng').Value := Trim(ADOQueryTemp.fieldbyname('C3BGNameEng').asstring);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSChenFen';
- flagname := 'ɷֺ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSChenFen').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSPinPai';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSPinPai').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSShengChanShang';
- flagname := '';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSShengChanShang').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.ToolButton1Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
-
-end;
-
-procedure TfrmXYZInPut.ToolButton4Click(Sender: TObject);
-var
- fsj: string;
-begin
- if FBCId = '' then
- Exit;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
-
- try
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(FBCId) + '''');
- ExecSQL;
- end;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- except
-
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmXYZInPut.v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'ZZJGou';
- flagname := '֯ṹ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('ZZJGou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'E5MaiTou';
- flagname := 'ͷ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('E5MaiTou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.TCXLJClick(Sender: TObject);
-begin
- if not Assigned(DataLink_DDMD) then
- DataLink_DDMD := TDataLink_DDMD.Create(Application);
- try
- with DataLink_DDMD.ADOLink do
- begin
- //if not Connected then
- begin
- Connected := false;
- ConnectionString := DConString;
- LoginPrompt := false;
- Connected := true;
- end;
- end;
- except
- application.MessageBox('ݿʧܣ', '', mb_Ok + MB_ICONERROR);
- end;
-end;
-
-procedure TfrmXYZInPut.XQYDBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
-
- flag := Copy(fsj, 1, FWZ - 1);
-// ShowMessage(flag);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else if (flag = 'LCTOPlace') or (flag = 'LCFromPlace') or (flag = 'YSFS') then
- begin
- fnote := True;
- V1Note.Caption := 'ע';
- V1Name.Caption := '';
-// V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-// if (flag = 'B6ChuYunGang') or (flag = 'B7DaoHuoGang') or (flag = 'ZMXingZhi') then
-// begin
-// fnote := True;
-// V1Note.Caption := 'ע';
-//// V1Name.Caption := 'Ӣ';
-// end
-// else
-// begin
-// fnote := false;
-// end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmXYZInPut.KHNameBtnClick(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
-
- if ShowModal = 1 then
- begin
-
- self.XKHName.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'zzff';
- flagname := '֯췽';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('zzff').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'wenlu';
- flagname := '·';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('wl').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmXYZInPut.Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'GYLX';
- flagname := '';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('gylx').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'JSUNIT';
- flagname := 'λ';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('JSUNIT').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.Tv1Column6PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.XKHNAMEBtnClick(Sender: TObject);
-begin
- try
- frmZdyAttachment := TfrmZdyAttachment.Create(Application);
- with frmZdyAttachment do
- begin
-
- if ShowModal = 1 then
- begin
-
- self.XKHName.Text := Trim(CDS_HZ.fieldbyname('CoName').AsString);
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmXYZInPut.XUNITChange(Sender: TObject);
-begin
- if XUNIT.Text = 'Ԫ' then
- begin
- ZUSDHL.Text := '1';
- end;
- if XUNIT.Text = '' then
- begin
- ZUSDHL.Text := '0.156250';
- end;
-end;
-
-procedure TfrmXYZInPut.XMONEYChange(Sender: TObject);
-begin
-// ZUSDJE.Text := FloatToStr();
-
- ZUSDJE.Text := FloatToStr(RoundFloat(StrToFloatDEF(XMONEY.Text, 0) * StrToFloatDEF(ZUSDHL.Text, 0), 2));
-
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZMAKELIST.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZMAKELIST.dfm
deleted file mode 100644
index 46ca2c9..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZMAKELIST.dfm
+++ /dev/null
@@ -1,531 +0,0 @@
-object frmXYZMAKEList: TfrmXYZMAKEList
- Left = 165
- Top = 123
- Width = 1364
- Height = 670
- Caption = #20449#29992#35777#21046#20316#21015#34920
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1348
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object TBAdd: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 1
- OnClick = TBAddClick
- end
- object TBEdit: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBCopy: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #22797#21046
- ImageIndex = 38
- OnClick = TBCopyClick
- end
- object TBView: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #26597#30475
- ImageIndex = 55
- OnClick = TBViewClick
- end
- object TBDel: TToolButton
- Left = 378
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- OnClick = TBDelClick
- end
- object TBExport: TToolButton
- Left = 441
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- Visible = False
- OnClick = TBExportClick
- end
- object TBClose: TToolButton
- Left = 504
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1348
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label1: TLabel
- Left = 28
- Top = 12
- Width = 48
- Height = 12
- Caption = #25910#21040#26102#38388
- end
- object Label6: TLabel
- Left = 376
- Top = 12
- Width = 36
- Height = 12
- Caption = #24320#35777#34892
- end
- object Label5: TLabel
- Left = 196
- Top = 35
- Width = 36
- Height = 12
- Caption = #35746#21333#21495
- end
- object Label2: TLabel
- Left = 388
- Top = 35
- Width = 24
- Height = 12
- Caption = #23458#25143
- end
- object Label4: TLabel
- Left = 172
- Top = 12
- Width = 60
- Height = 12
- Caption = #20449#29992#35777#21495#30721
- end
- object BegDate: TDateTimePicker
- Left = 77
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 77
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object XKZH: TEdit
- Tag = 2
- Left = 414
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnKeyPress = XORDERNOKeyPress
- end
- object XORDERNO: TEdit
- Tag = 2
- Left = 233
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = XORDERNOKeyPress
- end
- object XKHNAME: TEdit
- Tag = 2
- Left = 414
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 4
- OnKeyPress = XORDERNOKeyPress
- end
- object XYNO: TEdit
- Tag = 2
- Left = 233
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 5
- OnKeyPress = XORDERNOKeyPress
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1348
- Height = 540
- Align = alClient
- PopupMenu = PopupMenu1
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 68
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #25910#21040#26085#26399
- DataBinding.FieldName = 'XSDRQ'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 81
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #20449#29992#35777#21495#30721
- DataBinding.FieldName = 'XYNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 107
- end
- object tv2Column3: TcxGridDBColumn
- Caption = #24320#35777#34892
- DataBinding.FieldName = 'XKZH'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 91
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #23458#25143
- DataBinding.FieldName = 'XKHNAME'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 90
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #20323#37329#27604#20363
- DataBinding.FieldName = 'XYJBL'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 85
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #35746#21333#21495
- DataBinding.FieldName = 'XORDERNO'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 86
- end
- object tv2Column2: TcxGridDBColumn
- Caption = #35013#36816#26399#38480
- DataBinding.FieldName = 'XZYQX'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Styles.Header = cxStyle1
- Width = 89
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #36215#36816#22320
- DataBinding.FieldName = 'XQYD'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column3: TcxGridDBColumn
- Caption = #30446#30340#22320
- DataBinding.FieldName = 'XMDD'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 66
- end
- object TV1Column5: TcxGridDBColumn
- Caption = #26159#21542#20998#25209
- DataBinding.FieldName = 'XFP'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 79
- end
- object TV1Column1: TcxGridDBColumn
- Caption = #25968#37327#20844#24046
- DataBinding.FieldName = 'XSLGC'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 85
- end
- object XTBYQ: TcxGridDBColumn
- Caption = #29305#21035#35201#27714
- DataBinding.FieldName = 'XTBYQ'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 84
- end
- object XXYZZT: TcxGridDBColumn
- Caption = #20449#29992#35777#29366#24577
- DataBinding.FieldName = 'XXYZZT'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 119
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #20462#25913#27425#25968
- DataBinding.FieldName = 'XXGCS'
- HeaderAlignmentHorz = taCenter
- Styles.Header = cxStyle1
- Width = 82
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 920
- Top = 184
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1000
- Top = 228
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 952
- Top = 184
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 925
- Top = 217
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 785
- Top = 173
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 957
- Top = 217
- end
- object PopupMenu1: TPopupMenu
- Left = 350
- Top = 252
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- Grid = cxGrid2
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 609
- Top = 296
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 536
- Top = 316
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 548
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 524
- Top = 284
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 616
- Top = 316
- end
- object cxStyleRepository1: TcxStyleRepository
- PixelsPerInch = 96
- object cxStyle1: TcxStyle
- AssignedValues = [svFont]
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = #40657#20307
- Font.Style = [fsBold]
- end
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZMAKELIST.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZMAKELIST.pas
deleted file mode 100644
index 7a5c85a..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_XYZMAKELIST.pas
+++ /dev/null
@@ -1,1309 +0,0 @@
-unit U_XYZMAKELIST;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, Registry;
-
-type
- TfrmXYZMAKEList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBExport: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- Label1: TLabel;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- TBDel: TToolButton;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- TBAdd: TToolButton;
- TBEdit: TToolButton;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- XKZH: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- XORDERNO: TEdit;
- TBCopy: TToolButton;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- TBView: TToolButton;
- Label2: TLabel;
- XKHNAME: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- tv2Column1: TcxGridDBColumn;
- tv2Column2: TcxGridDBColumn;
- tv2Column3: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- Label4: TLabel;
- XYNO: TEdit;
- cxStyleRepository1: TcxStyleRepository;
- cxStyle1: TcxStyle;
- TV1Column2: TcxGridDBColumn;
- TV1Column3: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- TV1Column1: TcxGridDBColumn;
- XTBYQ: TcxGridDBColumn;
- XXYZZT: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBAddClick(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
-
- procedure XORDERNOKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBSSClick(Sender: TObject);
- procedure TBSSCXClick(Sender: TObject);
- procedure TBHDClick(Sender: TObject);
- procedure TBHDCXClick(Sender: TObject);
- procedure TBSHClick(Sender: TObject);
- procedure TBSHCXClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure Button7Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure ZordernoChange(Sender: TObject);
- procedure ZordernoKeyPress(Sender: TObject; var Key: Char);
-
-
-// procedure img1Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- function GetShellFolders(strDir: string): string;
- procedure InitGridSql(var fsj: string);
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1, canshu3: string;
- FDY: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_Fun, U_XYZInPut;
-
-{$R *.dfm}
-
-procedure TfrmXYZMAKEList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmXYZMAKEList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmXYZMAKEList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := EndDate.DateTime - 90;
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmXYZMAKEList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select * from (');
- sql.Add('select A.* ');
-// SQL.Add(',ZORDERNO=cast((select B.ORDERNO+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZGCNAME=cast((select B.GCNAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZC3BGNameEng=cast((select B.C3BGNameEng+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-// SQL.Add(',ZBGCODENAME=cast((select B.BGCODENAME+'';'' from JYOrder_BaoGuan_SUB B where B.BGID=A.BGID AND SVALID=''Y'' for xml path('''')) as varchar(200))');
-
- sql.Add(' from XYZ_MAIN A ');
- sql.Add(' where A.Valid=''Y'' ');
-// sql.Add(fwhere);
-
-
- sql.Add(')AA WHERE 1=1');
- sql.Add(fwhere);
-
- sql.Add(' and XSDRQ>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and XSDRQ<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
- SQL.Add('ORDER BY XSDRQ DESC');
-
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmXYZMAKEList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, 'ع7');
-
- Close;
-end;
-
-procedure TfrmXYZMAKEList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, 'ع7');
-
- canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
-
- InitGrid();
-
-end;
-
-procedure TfrmXYZMAKEList.TBExportClick(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// SelExportData(Tv1, ADOQueryMain, 'б');
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-
- FDY := '1';
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\б.rmf';
- ExportFtErpFile('б.rmf', ADOQueryPrint);
-
- with ADOQueryPrint do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add(' exec P_Print_DCBGD @begdate=' + quotedstr(Trim(FormatDateTime('yyyy-MM-dd', begdate.DateTime))) + ',@Enddate=' + quotedstr(Trim(FormatDateTime('yyyy-MM-dd', Enddate.DateTime + 1))));
-
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
- if FDY = '0' then
- begin
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else if FDY = '1' then
- begin
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
-// fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\б.xls';
- fImagePath2 := GetShellFolders('Desktop') + '\б.xls';
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
- end;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
-
-end;
-
-function TfrmXYZMAKEList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmXYZMAKEList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmXYZMAKEList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmXYZMAKEList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmXYZMAKEList.TBDelClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- if DelData() then
- begin
- InitGrid();
- end;
-end;
-
-function TfrmXYZMAKEList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate XYZ_MAIN Set Valid=''N''');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where XYId=''' + Trim(CDS_Main.fieldbyname('XYId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBAddClick(Sender: TObject);
-begin
- try
- frmXYZInPut := TfrmXYZInPut.Create(Application);
- with frmXYZInPut do
- begin
- FBCId := '';
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmXYZInPut.Free;
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBEditClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- try
- frmXYZInPut := TfrmXYZInPut.Create(Application);
- with frmXYZInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('XYID').AsString);
-
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmXYZInPut.Free;
- end;
-end;
-
-procedure TfrmXYZMAKEList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmXYZMAKEList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmXYZMAKEList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-
-
-procedure TfrmXYZMAKEList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmXYZMAKEList.XORDERNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
- if Key = #13 then
- begin
- InitGrid();
-
- end;
-end;
-
-procedure TfrmXYZMAKEList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmXYZMAKEList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmXYZInPut := TfrmXYZInPut.Create(Application);
- with frmXYZInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('XYID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmXYZInPut.Free;
- end;
-end;
-
-procedure TfrmXYZMAKEList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmXYZMAKEList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmXYZInPut := TfrmXYZInPut.Create(Application);
- with frmXYZInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('XYID').AsString);
- TBSave.Visible := False;
-
- canshu3 := self.canshu3;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmXYZInPut.Free;
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBSSClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=getdate(),SChker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBSSCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('OKPerson').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('Ѻ˶Բܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',SStime=Null,SChker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBHDClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִк˶Բ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status=''Ѻ˶'',OKTime=getdate(),OKPerson=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBHDCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if CDS_Main.FieldByName('SSel').AsBoolean = True then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Main ');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- Open;
- end;
- if Trim(ADOQueryTemp.fieldbyname('Chker').AsString) <> '' then
- begin
- CDS_Main.EnableControls;
- Application.MessageBox('˲ܳ!', 'ʾ', 0);
- Exit;
- end;
- end;
- Next;
- end;
- end;
- CDS_Main.EnableControls;
- if Application.MessageBox('ȷҪִк˶Գ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',OKtime=Null,OKPerson=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBSHClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBSHCXClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- if Application.MessageBox('ȷҪִ˳', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=Null,Chker=Null');
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.ToolButton1Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- FDY := '0';
-
-end;
-
-procedure TfrmXYZMAKEList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZMAKEList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmXYZMAKEList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmXYZMAKEList.Button7Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
-
- if canshu3 = 'ҵԱ' then
- begin
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '(ҵ).rmf';
- ExportFtErpFile(Trim(LBName) + '(ҵ).rmf', ADOQueryPrint);
- end
- else
- begin
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf';
- ExportFtErpFile(Trim(LBName) + '.rmf', ADOQueryPrint);
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete TBSubID where DName=''' + Trim(DCode) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM TBSubID where 1=2 ');
- open;
- end;
-
- CDS_Main.DisableControls;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if Fieldbyname('Ssel').AsBoolean then
- begin
-
- ADOQueryCmd.append;
- ADOQueryCmd.fieldbyname('SubId').Value := Trim(CDS_Main.fieldbyname('bgid').AsString);
- ADOQueryCmd.fieldbyname('Dname').Value := Trim(DCode);
- ADOQueryCmd.post;
- end;
- Next;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- end;
- CDS_Main.EnableControls;
- if LBName = 'Ʊ' then
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD4 ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end
- else
- begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_BGD2 ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- end;
-
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if FDY = '0' then
- begin
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
- end
- else if FDY = '1' then
- begin
- RM1.LoadFromFile(fPrintFile);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2); //label.xls
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\' + Trim(CDS_Main.fieldbyname('orderno').AsString) + '.xls';
- ShowMessage(fImagePath2);
- RM1.PrepareReport;
- Sleep(1000);
- RM1.ExportTo(RMXLSExport1, fImagePath2);
- end;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
-
-end;
-
-procedure TfrmXYZMAKEList.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while Locate('SSel', True, []) = True do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set bgStatus=NULL');
-
- sql.Add(' where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- InitGrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmXYZMAKEList.ZordernoChange(Sender: TObject);
-begin
- TBFind.Click();
-end;
-
-procedure TfrmXYZMAKEList.ZordernoKeyPress(Sender: TObject; var Key: Char);
-begin
-// 2123
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLInPut.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLInPut.dfm
deleted file mode 100644
index 2298d4b..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLInPut.dfm
+++ /dev/null
@@ -1,519 +0,0 @@
-object frmYFGLInPut: TfrmYFGLInPut
- Left = 160
- Top = 92
- Width = 779
- Height = 708
- Caption = #36816#36153#24405#20837
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 763
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBSave: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 15
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object cxGrid1: TcxGrid
- Left = 0
- Top = 266
- Width = 763
- Height = 403
- Align = alClient
- TabOrder = 3
- object Tv1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- DataController.DataSource = DataSource3
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- OptionsView.Indicator = True
- OptionsView.IndicatorWidth = 25
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- OnCustomDrawIndicatorCell = Tv1CustomDrawIndicatorCell
- object v1Column13: TcxGridDBColumn
- Tag = 2
- Caption = #36153#29992#39033#30446
- DataBinding.FieldName = 'FYXM'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.ImmediatePost = True
- Properties.Items.Strings = (
- #28023#36816#36153
- #31354#36816#36153
- #20869#38470#36816#36153
- #36135#20195#36816#36153
- #21333#35777#36153#29992
- #20445#38505#36153)
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 71
- end
- object v1Column5: TcxGridDBColumn
- Tag = 2
- Caption = #25903#20184#24065#31181
- DataBinding.FieldName = 'FYBZ'
- PropertiesClassName = 'TcxComboBoxProperties'
- Properties.Items.Strings = (
- #20154#27665#24065
- #32654#20803)
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object v1Column20: TcxGridDBColumn
- Tag = 2
- Caption = #37329#39069
- DataBinding.FieldName = 'FYMONEY'
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 108
- end
- object v1Column14: TcxGridDBColumn
- Tag = 2
- Caption = #26412#26041#25903#20184
- DataBinding.FieldName = 'FYYFMONEY'
- PropertiesClassName = 'TcxButtonEditProperties'
- Properties.Buttons = <
- item
- Default = True
- Kind = bkEllipsis
- end>
- Properties.OnButtonClick = v1Column14PropertiesButtonClick
- HeaderAlignmentHorz = taCenter
- Options.Sorting = False
- Width = 109
- end
- object v1YSKeZhong: TcxGridDBColumn
- Tag = 2
- Caption = #22791#27880
- DataBinding.FieldName = 'FYNOTE'
- HeaderAlignmentHorz = taCenter
- Width = 73
- end
- object Tv1Column1: TcxGridDBColumn
- Tag = 2
- Caption = #24322#24120#36153#29992
- DataBinding.FieldName = 'YCMONEY'
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object Tv1Column2: TcxGridDBColumn
- Tag = 2
- Caption = #24322#24120#21407#22240
- DataBinding.FieldName = 'YCREASON'
- HeaderAlignmentHorz = taCenter
- Width = 70
- end
- object Tv1Column3: TcxGridDBColumn
- Tag = 2
- Caption = #36131#20219#20154
- DataBinding.FieldName = 'ZRREN'
- HeaderAlignmentHorz = taCenter
- Width = 72
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = Tv1
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 763
- Height = 200
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Label13: TLabel
- Left = 17
- Top = 15
- Width = 48
- Height = 12
- Caption = #21457#31080#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 289
- Top = 13
- Width = 36
- Height = 12
- Caption = #36135#20195#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 5
- Top = 39
- Width = 60
- Height = 12
- Caption = #21457#31080#25260#22836#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label8: TLabel
- Left = 241
- Top = 40
- Width = 84
- Height = 12
- Caption = #36135#20195#21457#31080#21495#30721#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label15: TLabel
- Left = 443
- Top = 40
- Width = 60
- Height = 12
- Caption = #19994' '#21153' '#21592#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label22: TLabel
- Left = 5
- Top = 72
- Width = 60
- Height = 12
- Caption = #25351#31034#21333#21495#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label28: TLabel
- Left = 443
- Top = 9
- Width = 60
- Height = 12
- Caption = #25903#20184#26041#24335#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label30: TLabel
- Left = 443
- Top = 71
- Width = 60
- Height = 12
- Caption = #24320#31080#26085#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object Label6: TLabel
- Left = 31
- Top = 113
- Width = 13
- Height = 24
- Caption = #22791#13#10#27880
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 289
- Top = 71
- Width = 36
- Height = 12
- Caption = #33337#26399#65306
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentFont = False
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 60
- Top = 11
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 0
- end
- object huodai: TEdit
- Tag = 2
- Left = 324
- Top = 9
- Width = 90
- Height = 20
- CharCase = ecUpperCase
- TabOrder = 1
- end
- object BGTAITOU: TBtnEditA
- Tag = 2
- Left = 60
- Top = 36
- Width = 169
- Height = 20
- Hint = 'BGTT/'#20844#21496
- TabOrder = 3
- Text = #32461#20852#24066#25391#27704#32442#32455#21697#26377#38480#20844#21496
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object HUODAIFPNO: TEdit
- Tag = 2
- Left = 324
- Top = 36
- Width = 90
- Height = 20
- TabOrder = 4
- end
- object SHFS: TBtnEditA
- Tag = 1
- Left = 500
- Top = 6
- Width = 113
- Height = 20
- Hint = 'SHFS/'#25910#27719#26041#24335
- TabOrder = 2
- Text = '[T/T]'#21069#30005#27719
- OnBtnClick = B6ChuYunGangBtnClick
- end
- object HTDate: TDateTimePicker
- Tag = 2
- Left = 500
- Top = 67
- Width = 116
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 5
- end
- object NOTE: TMemo
- Tag = 2
- Left = 59
- Top = 110
- Width = 397
- Height = 64
- Hint = 'WZhiLiangNote/'#36136#37327#35201#27714
- ScrollBars = ssVertical
- TabOrder = 6
- end
- object YWY: TComboBox
- Tag = 2
- Left = 500
- Top = 37
- Width = 115
- Height = 20
- ItemHeight = 12
- TabOrder = 7
- OnDropDown = YWYDropDown
- end
- object chuandate: TDateTimePicker
- Tag = 2
- Left = 324
- Top = 67
- Width = 87
- Height = 20
- Date = 42296.498237581020000000
- Time = 42296.498237581020000000
- TabOrder = 8
- end
- object ORDERNO: TBtnEditA
- Tag = 1
- Left = 60
- Top = 67
- Width = 113
- Height = 20
- TabOrder = 9
- OnBtnClick = ORDERNOBtnClick
- end
- end
- object ToolBar2: TToolBar
- Left = 0
- Top = 233
- Width = 763
- Height = 33
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 2
- object ToolButton2: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 12
- OnClick = ToolButton2Click
- end
- object ToolButton1: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #19968#38190#26367#25442
- ImageIndex = 19
- OnClick = ToolButton1Click
- end
- object ToolButton3: TToolButton
- Left = 150
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = ToolButton3Click
- end
- end
- object DataSource3: TDataSource
- DataSet = CDS_Sub
- Left = 501
- Top = 431
- end
- object CDS_Sub: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 464
- Top = 440
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 1080
- Top = 272
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1112
- Top = 272
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 1144
- Top = 272
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 424
- Top = 429
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLInPut.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLInPut.pas
deleted file mode 100644
index ee39cb1..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLInPut.pas
+++ /dev/null
@@ -1,878 +0,0 @@
-unit U_YFGLInPut;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxCalendar, cxDropDownEdit, ComCtrls, ToolWin,
- cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
- cxClasses, cxControls, cxGridCustomView, cxGrid, cxGridCustomPopupMenu,
- cxGridPopupMenu, ADODB, DBClient, cxButtonEdit, cxTextEdit, StdCtrls, BtnEdit,
- ExtCtrls, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmYFGLInPut = class(TForm)
- ToolBar1: TToolBar;
- TBSave: TToolButton;
- TBClose: TToolButton;
- DataSource3: TDataSource;
- CDS_Sub: TClientDataSet;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- cxGridPopupMenu2: TcxGridPopupMenu;
- cxGrid1: TcxGrid;
- Tv1: TcxGridDBTableView;
- v1Column5: TcxGridDBColumn;
- cxGrid1Level1: TcxGridLevel;
- Panel1: TPanel;
- ToolBar2: TToolBar;
- ToolButton2: TToolButton;
- ToolButton3: TToolButton;
- Label13: TLabel;
- A4FPNO: TEdit;
- Label4: TLabel;
- huodai: TEdit;
- Label5: TLabel;
- BGTAITOU: TBtnEditA;
- Label8: TLabel;
- HUODAIFPNO: TEdit;
- Label15: TLabel;
- SHFS: TBtnEditA;
- Label22: TLabel;
- v1Column13: TcxGridDBColumn;
- v1Column14: TcxGridDBColumn;
- ToolButton1: TToolButton;
- v1Column20: TcxGridDBColumn;
- Label28: TLabel;
- Label30: TLabel;
- HTDate: TDateTimePicker;
- v1YSKeZhong: TcxGridDBColumn;
- NOTE: TMemo;
- Label6: TLabel;
- YWY: TComboBox;
- Label7: TLabel;
- chuandate: TDateTimePicker;
- ORDERNO: TBtnEditA;
- Tv1Column1: TcxGridDBColumn;
- Tv1Column2: TcxGridDBColumn;
- Tv1Column3: TcxGridDBColumn;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column3PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure TCXLJClick(Sender: TObject);
- procedure B6ChuYunGangBtnClick(Sender: TObject);
- procedure YWYDropDown(Sender: TObject);
- procedure Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
- procedure Tv1Column7PropertiesEditValueChanged(Sender: TObject);
- procedure Tv1CustomDrawIndicatorCell(Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGridIndicatorItemViewInfo; var ADone: Boolean);
- procedure ORDERNOBtnClick(Sender: TObject);
- private
- { Private declarations }
- function SaveCKData(): Boolean;
- public
- { Public declarations }
- FBCId, canshu3: string;
- CopyStr: string;
- end;
-
-var
- frmYFGLInPut: TfrmYFGLInPut;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_ZdyAttachment, U_ProductOrderList_Sel,
- U_DCDList_Sel, U_ZdyAttachGYS;
-
-{$R *.dfm}
-
-procedure TfrmYFGLInPut.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-function TfrmYFGLInPut.SaveCKData(): Boolean;
-var
- FJMID, Maxno, MaxSubNo, FSCID: string;
-begin
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from FP_MAIN where FPID=''' + Trim(FBCId) + '''');
- Open;
- end;
- FBCId := Trim(ADOQueryTemp.fieldbyname('FPID').AsString);
- if Trim(FBCId) = '' then
- begin
- if GetLSNo(ADOQueryCmd, Maxno, 'FP', 'FP_MAIN', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- Maxno := Trim(FBCId);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from FP_MAIN where FPID=''' + Trim(Maxno) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FBCId) = '' then
- begin
- Append;
- FieldByName('Filler').Value := Trim(DName);
- FieldByName('FillerCode').Value := Trim(DCode);
- FieldByName('FKstatus').Value := 'δ';
- end
- else
- begin
- Edit;
- FieldByName('Editer').Value := Trim(DName);
- FieldByName('EditerCode').Value := Trim(DCode);
- FieldByName('EditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('FPID').Value := Trim(Maxno);
- RTSetsavedata(ADOQueryCmd, 'JYOrder_BaoGuan_Main', Panel1, 1);
- RTSetsavedata(ADOQueryCmd, 'JYOrder_BaoGuan_Main', Panel1, 2);
- Post;
- end;
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.Add('select * from FP_MAIN where A4FPNO=''' + Trim(A4FPNO.Text) + ''' and Valid=''Y'' ');
-// Open;
-// end;
-// if ADOQueryTemp.RecordCount > 1 then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// Application.MessageBox('˷ƱѾʹãܱ!', 'ʾ', 0);
-// Exit;
-// end;
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not eof do
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from FP_SUB where FPSId=''' + Trim(CDS_Sub.fieldbyname('FPSId').AsString) + '''');
- Open;
- end;
- FSCID := Trim(ADOQueryTemp.fieldbyname('FPSId').AsString);
- if Trim(FSCID) = '' then
- begin
- if GetLSNo(ADOQueryCmd, MaxSubNo, 'FPS', 'FP_SUB', 3, 1) = False then
- begin
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡӱʧ!', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- MaxSubNo := Trim(FSCID);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from FP_SUB where FPSId=''' + Trim(MaxSubNo) + '''');
- Open;
- end;
- with ADOQueryCmd do
- begin
- if Trim(FSCID) = '' then
- begin
- Append;
-// FieldByName('SFiller').Value := Trim(DName);
- end
- else
- begin
- Edit;
-// FieldByName('SEditer').Value := Trim(DName);
-// FieldByName('SEditTime').Value := SGetServerDate(ADOQueryTemp);
- end;
- FieldByName('FPId').Value := Trim(Maxno);
- FieldByName('FPSId').Value := Trim(MaxSubNo);
- RTSetSaveDataCDS(ADOQueryCmd, Tv1, CDS_Sub, 'FP_SUB', 2);
- Post;
- end;
- Edit;
- FieldByName('FPId').Value := Trim(Maxno);
- FieldByName('FPSId').Value := Trim(MaxSubNo);
- Post;
- Next;
- end;
- end;
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate FP_MAIN Set ');
- sql.Add(' SCDJDate= getdate()');
- sql.Add(' where isnull(SCDJDate,'''')='''' and FPId=''' + Trim(Maxno) + '''');
- ExecSQL;
- end;
- CDS_Sub.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- FBCId := Trim(Maxno);
- Result := True;
- except
- Result := False;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmYFGLInPut.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('˷ѹ¼', Tv1, 'ع13');
- Close;
-end;
-
-procedure TfrmYFGLInPut.FormShow(Sender: TObject);
-begin
- ReadCxGrid('˷ѹ¼', Tv1, 'ع13');
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from FP_MAIN A');
- sql.Add(' where FPID=''' + Trim(FBCId) + '''');
- Open;
- end;
- SCSHDataNew(ADOQueryTemp, Panel1, 1);
- SCSHDataNew(ADOQueryTemp, Panel1, 2);
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add(' select A.* ');
- sql.Add(' from FP_SUB A');
- sql.Add(' where FPID=''' + Trim(FBCId) + '''');
-// sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- SCreateCDS20(ADOQueryTemp, CDS_Sub);
- SInitCDSData20(ADOQueryTemp, CDS_Sub);
- if CopyStr = '99' then
- begin
- FBCId := '';
- CDS_Sub.DisableControls;
- with CDS_Sub do
- begin
- First;
- while not Eof do
- begin
- Edit;
- FieldByName('FPID').Value := Null;
- FieldByName('FPSID').Value := Null;
- Post;
- Next;
- end;
- end;
- CDS_Sub.EnableControls;
- end;
- if Trim(FBCId) = '' then
- begin
- YWY.Text := Trim(DName);
- HTDate.Date := SGetServerDate(ADOQueryTemp);
- chuandate.Date := SGetServerDate(ADOQueryTemp);
- end;
-
-end;
-
-procedure TfrmYFGLInPut.TBSaveClick(Sender: TObject);
-var
- FReal: Double;
- i: Integer;
-begin
-//
-// if TryStrToFloat(F2YunFee.Text, FReal) = False then
-// begin
-// Application.MessageBox('˷ѷǷ!', 'ʾ', 0);
-// Exit;
-// end;
-// if TryStrToFloat(F3BaoFee.Text, FReal) = False then
-// begin
-// Application.MessageBox('ѷǷ!', 'ʾ', 0);
-// Exit;
-// end;
-// if CDS_Sub.IsEmpty then
-// begin
-// Application.MessageBox('ϸΪ!', 'ʾ', 0);
-// Exit;
-// end;
-// if CDS_Sub.Locate('C3BGName', Null, []) then
-// begin
-// Application.MessageBox('ƷΪ!', 'ʾ', 0);
-// Exit;
-// end;
- if Trim(A4FPNO.Text) = '' then
- begin
- Application.MessageBox('ƱŲΪ!', 'ʾ', 0);
- Exit;
- end;
-// if CDS_Sub.Locate('C4BGQty', Null, []) then
-// begin
-// Application.MessageBox('Ϊ!', 'ʾ', 0);
-// Exit;
-// end;
-// if CDS_Sub.Locate('C5BGUnit', Null, []) then
-// begin
-// Application.MessageBox('λΪ!', 'ʾ', 0);
-// Exit;
-// end;
-// if CDS_Sub.Locate('C6BGPrice', Null, []) then
-// begin
-// Application.MessageBox('۲Ϊ!', 'ʾ', 0);
-// Exit;
-// end;
-
-
- ToolBar1.SetFocus;
- if SaveCKData() then
- begin
- Application.MessageBox('ɹ!', 'ʾ', 0);
- //ModalResult:=1;
- Exit;
- end;
-end;
-
-procedure TfrmYFGLInPut.ToolButton2Click(Sender: TObject);
-var
- i: Integer;
-begin
-// CopyAddRowCDS(CDS_Sub);
- with CDS_Sub do
- begin
- Append;
- FieldByName('FPID').Value := Null;
- FieldByName('FPSID').Value := Null;
- FieldByName('FYMONEY').Value := 0;
- FieldByName('FYYFMONEY').Value := 0;
- FieldByName('FYBZ').Value := '';
- FieldByName('FYXM').Value := '˷';
- FieldByName('YCMONEY').Value := 0;
-
- Post;
- end;
-
-end;
-
-procedure TfrmYFGLInPut.ToolButton3Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
- if Trim(CDS_Sub.fieldbyname('FPSID').AsString) <> '' then
- begin
- if Application.MessageBox('ȷҪɾ', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('DELETE FP_SUB ');
- sql.Add(' where FPSID=''' + Trim(CDS_Sub.fieldbyname('BSID').AsString) + '''');
- ExecSQL;
- end;
-
- end;
- CDS_Sub.Delete;
-end;
-
-procedure TfrmYFGLInPut.v1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'C3BGName';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C3BGName').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select Top 1 * from JYOrder_BaoGuan_Sub where C3BGName=''' + Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZDYName').AsString) + '''');
- sql.add(' and isnull(C2HSNO,'''')<>'''' ');
- sql.Add(' order by SFillTime desc');
- Open;
- end;
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('C2HSNO').Value := Trim(ADOQueryTemp.fieldbyname('C2HSNO').asstring);
- FieldByName('C3BGNameEng').Value := Trim(ADOQueryTemp.fieldbyname('C3BGNameEng').asstring);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.v1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSChenFen';
- flagname := 'ɷֺ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSChenFen').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.v1Column16PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSPinPai';
- flagname := 'Ʒ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSPinPai').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.v1Column17PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'YSShengChanShang';
- flagname := '';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('YSShengChanShang').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.v1Column3PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FPrice, FQty, FBaoGangFee: string;
-begin
- FName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName(FName).Value := mvalue;
- Post;
- end;
- FPrice := Trim(CDS_Sub.fieldbyname('C6BGPrice').AsString);
- FQty := Trim(CDS_Sub.fieldbyname('C4BGQty').AsString);
- if Trim(FPrice) = '' then
- begin
- FPrice := '0';
- end;
- if Trim(FQty) = '' then
- begin
- FQty := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName('C7BGMoney').Value := StrToFloat(FPrice) * StrToFloat(FQty);
- Post;
- end;
-end;
-
-procedure TfrmYFGLInPut.ToolButton1Click(Sender: TObject);
-begin
- if CDS_Sub.IsEmpty then
- Exit;
- OneKeyPost(Tv1, CDS_Sub);
-end;
-
-procedure TfrmYFGLInPut.ToolButton4Click(Sender: TObject);
-var
- fsj: string;
-begin
- if FBCId = '' then
- Exit;
- if Application.MessageBox('ȷҪִ˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
-
- try
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Status='''',ChkTime=getdate(),Chker=''' + Trim(DName) + '''');
- sql.Add(' where BGID=''' + Trim(FBCId) + '''');
- ExecSQL;
- end;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- except
-
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmYFGLInPut.v1ZZJGouPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'ZZJGou';
- flagname := '֯ṹ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('ZZJGou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.v1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'E5MaiTou';
- flagname := 'ͷ';
- if ShowModal = 1 then
- begin
- with Self.CDS_Sub do
- begin
- Edit;
- FieldByName('E5MaiTou').Value := Trim(frmZDYHelp.ClientDataSet1.fieldbyname('ZdyName').AsString);
- end;
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.TCXLJClick(Sender: TObject);
-begin
- if not Assigned(DataLink_DDMD) then
- DataLink_DDMD := TDataLink_DDMD.Create(Application);
- try
- with DataLink_DDMD.ADOLink do
- begin
- //if not Connected then
- begin
- Connected := false;
- ConnectionString := DConString;
- LoginPrompt := false;
- Connected := true;
- end;
- end;
- except
- application.MessageBox('ݿʧܣ', '', mb_Ok + MB_ICONERROR);
- end;
-end;
-
-procedure TfrmYFGLInPut.B6ChuYunGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if flag = 'TOCOUNTRY' then
- begin
- fnote := True;
- V1Note.Caption := '';
- V1Name.Caption := 'Ӣ';
- end
- else
- begin
- fnote := false;
- end;
-
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmYFGLInPut.YWYDropDown(Sender: TObject);
-begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM SY_User WHERE Udept LIKE ''%ͷ%'' ');
-
- Open;
- end;
- YWY.Items.Clear;
- while not ADOQueryTemp.eof do
- begin
- YWY.Items.Add(Trim(ADOQueryTemp.fieldbyname('username').AsString));
- ADOQueryTemp.next;
- end;
-end;
-
-procedure TfrmYFGLInPut.Tv1Column5PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZdyAttachGYS := tfrmZdyAttachGYS.Create(Application);
- with frmZdyAttachGYS do
- begin
-
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- Edit;
- fieldbyname('gcdm').Value := Trim(CDS_HZ.fieldbyname('CoCode').AsString);
- fieldbyname('gcname').Value := Trim(CDS_HZ.fieldbyname('CoName').AsString);
- fieldbyname('gcaddress').Value := Trim(CDS_HZ.fieldbyname('Coaddress').AsString);
- end;
-
- end;
- end;
- finally
- frmZdyAttachment.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.Tv1Column12PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'zzff';
- flagname := '֯췽';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('zzff').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.Tv1Column14PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'wenlu';
- flagname := '·';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('wl').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmYFGLInPut.Tv1Column13PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'GYLX';
- flagname := '';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('gylx').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.Tv1Column9PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
-begin
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := 'JSUNIT';
- flagname := 'λ';
- if ShowModal = 1 then
- begin
- with CDS_Sub do
- begin
- edit;
- fieldbyname('JSUNIT').AsString := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
-
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLInPut.Tv1Column7PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FName, FPrice, FQty, FBaoGangFee: string;
-begin
- FName := Trim(Tv1.Controller.FocusedColumn.DataBinding.FilterFieldName);
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with CDS_Sub do
- begin
- Edit;
- FieldByName(FName).Value := mvalue;
- Post;
- end;
-end;
-
-procedure TfrmYFGLInPut.Tv1CustomDrawIndicatorCell(Sender: TcxGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxCustomGridIndicatorItemViewInfo; var ADone: Boolean);
-var
- FValue: string;
- FBounds: TRect;
-begin
- FBounds := AViewInfo.Bounds;
- if (AViewInfo is TcxGridIndicatorRowItemViewInfo) then
- begin
- ACanvas.FillRect(FBounds);
- ACanvas.DrawComplexFrame(FBounds, clBtnHighlight, clBtnShadow, [bBottom, bLeft, bRight], 1);
- FValue := IntToStr(TcxGridIndicatorRowItemViewInfo(AViewInfo).GridRecord.Index + 1);
- InflateRect(FBounds, -1, -1); //Platform specific. May not work on Linux.
- ACanvas.Font.Color := clBlack;
- ACanvas.Brush.Style := bsClear;
- ACanvas.DrawText(FValue, FBounds, cxAlignCenter or cxAlignTop);
- ADone := True;
- end;
-end;
-
-procedure TfrmYFGLInPut.ORDERNOBtnClick(Sender: TObject);
-begin
- frmProductOrderList_Sel := TfrmProductOrderList_Sel.Create(self);
- with frmProductOrderList_Sel do
- begin
- if showmodal = 1 then
- begin
- Self.OrderNo.Text := Order_Main.fieldbyname('Orderno').asstring;
- end;
- free;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLList.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLList.dfm
deleted file mode 100644
index 1e5ac19..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLList.dfm
+++ /dev/null
@@ -1,570 +0,0 @@
-object frmYFGLList: TfrmYFGLList
- Left = 209
- Top = 118
- Width = 1384
- Height = 670
- Caption = #36816#36153#31649#29702
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1368
- AutoSize = True
- ButtonHeight = 30
- ButtonWidth = 107
- Caption = 'ToolBar1'
- Color = clSkyBlue
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object TBFind: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- Visible = False
- OnClick = TBFindClick
- end
- object ToolButton3: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #26032#22686
- ImageIndex = 2
- Visible = False
- OnClick = ToolButton3Click
- end
- object ToolButton1: TToolButton
- Left = 189
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- Visible = False
- OnClick = ToolButton1Click
- end
- object ToolButton2: TToolButton
- Left = 252
- Top = 0
- AutoSize = True
- Caption = #21024#38500
- ImageIndex = 3
- Visible = False
- OnClick = ToolButton2Click
- end
- object ToolButton4: TToolButton
- Left = 315
- Top = 0
- AutoSize = True
- Caption = #20184#27454#30830#35748
- ImageIndex = 31
- Visible = False
- OnClick = ToolButton4Click
- end
- object ToolButton5: TToolButton
- Left = 402
- Top = 0
- AutoSize = True
- Caption = #21462#28040#20184#27454#30830#35748
- ImageIndex = 52
- Visible = False
- OnClick = ToolButton5Click
- end
- object ToolButton6: TToolButton
- Left = 513
- Top = 0
- AutoSize = True
- Caption = #20184#27454#30003#35831#21333
- ImageIndex = 4
- OnClick = ToolButton6Click
- end
- object ToolButton7: TToolButton
- Left = 612
- Top = 0
- AutoSize = True
- Caption = #23548#20986
- ImageIndex = 68
- OnClick = ToolButton7Click
- end
- object TBClose: TToolButton
- Left = 675
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 32
- Width = 1368
- Height = 59
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label6: TLabel
- Left = 379
- Top = 12
- Width = 60
- Height = 12
- Caption = #22806#38144#21457#31080#21495
- end
- object Label5: TLabel
- Left = 236
- Top = 35
- Width = 24
- Height = 12
- Caption = #36135#20195
- end
- object Label2: TLabel
- Left = 403
- Top = 36
- Width = 36
- Height = 12
- Caption = #19994#21153#21592
- end
- object Label4: TLabel
- Left = 212
- Top = 12
- Width = 48
- Height = 12
- Caption = #35745#21010#21333#21495
- end
- object Label1: TLabel
- Left = 559
- Top = 12
- Width = 60
- Height = 12
- Caption = #36135#20195#21457#31080#21495
- end
- object BegDate: TDateTimePicker
- Left = 88
- Top = 8
- Width = 87
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 0
- end
- object EndDate: TDateTimePicker
- Left = 88
- Top = 31
- Width = 86
- Height = 20
- Date = 40768.458268587970000000
- Time = 40768.458268587970000000
- TabOrder = 1
- end
- object A4FPNO: TEdit
- Tag = 2
- Left = 445
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 2
- OnKeyPress = ordernoKeyPress
- end
- object huodai: TEdit
- Tag = 2
- Left = 264
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 3
- OnKeyPress = ordernoKeyPress
- end
- object YWY: TEdit
- Tag = 2
- Left = 445
- Top = 31
- Width = 100
- Height = 20
- TabOrder = 4
- OnKeyPress = ordernoKeyPress
- end
- object orderno: TEdit
- Tag = 2
- Left = 264
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 5
- OnKeyPress = ordernoKeyPress
- end
- object ComboBox1: TComboBox
- Left = 8
- Top = 8
- Width = 73
- Height = 20
- ItemHeight = 12
- ItemIndex = 0
- TabOrder = 6
- Text = #21046#21333#26085#26399
- OnChange = ComboBox1Change
- Items.Strings = (
- #21046#21333#26085#26399
- #33337#26399)
- end
- object HUODAIFPNO: TEdit
- Tag = 2
- Left = 625
- Top = 8
- Width = 100
- Height = 20
- TabOrder = 7
- OnKeyPress = ordernoKeyPress
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 91
- Width = 1368
- Height = 540
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCustomDrawCell = TV1CustomDrawCell
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end
- item
- Kind = skSum
- Position = spFooter
- end>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- OptionsView.GroupFooters = gfAlwaysVisible
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object tv2Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object TV1Column1: TcxGridDBColumn
- Caption = #20184#27454#30830#35748
- DataBinding.FieldName = 'FKSTATUS'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #21457#31080#21495
- DataBinding.FieldName = 'A4FPNO'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column3: TcxGridDBColumn
- Caption = #24320#31080#25260#22836
- DataBinding.FieldName = 'BGTAITOU'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column4: TcxGridDBColumn
- Caption = #36135#20195#21457#31080#21495
- DataBinding.FieldName = 'HUODAIFPNO'
- HeaderAlignmentHorz = taCenter
- Width = 85
- end
- object TV1Column5: TcxGridDBColumn
- Caption = #36135#36816#20844#21496
- DataBinding.FieldName = 'huodai'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column6: TcxGridDBColumn
- Caption = #36816#36755#26041#24335
- DataBinding.FieldName = 'ZMXingZhi'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column7: TcxGridDBColumn
- Caption = #26588#22411
- DataBinding.FieldName = 'GUIXING'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column8: TcxGridDBColumn
- Caption = #25552#21333#21495
- DataBinding.FieldName = 'TDNO'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column9: TcxGridDBColumn
- Caption = #20184#27454#26041#24335
- DataBinding.FieldName = 'SHFS'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column10: TcxGridDBColumn
- Caption = #35745#21010#21333#21495
- DataBinding.FieldName = 'orderno'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column11: TcxGridDBColumn
- Caption = #24320#31080#26085#26399
- DataBinding.FieldName = 'HTDate'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column12: TcxGridDBColumn
- Caption = #24320#33337#26085#26399
- DataBinding.FieldName = 'chuandate'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column13: TcxGridDBColumn
- Caption = #24635'USD'#37329#39069
- DataBinding.FieldName = 'ZUSD'
- HeaderAlignmentHorz = taCenter
- Width = 78
- end
- object TV1Column14: TcxGridDBColumn
- Caption = #24635'RMB'#37329#39069
- DataBinding.FieldName = 'ZRMB'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column15: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'note'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column16: TcxGridDBColumn
- Caption = #21046#21333#26085#26399
- DataBinding.FieldName = 'filltime'
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column17: TcxGridDBColumn
- Caption = #30331#35760#26085#26399
- DataBinding.FieldName = 'SCDJDate'
- HeaderAlignmentHorz = taCenter
- Width = 84
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = TV1
- end
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 310
- Top = 329
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 312
- Top = 305
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 342
- Top = 278
- end
- object DataSource1: TDataSource
- DataSet = CDS_Main
- Left = 283
- Top = 354
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- PopupMenus = <>
- Left = 284
- Top = 328
- end
- object CDS_Main: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 311
- Top = 352
- end
- object PopupMenu1: TPopupMenu
- Left = 314
- Top = 276
- object N1: TMenuItem
- Caption = #20840#36873
- OnClick = N1Click
- end
- object N2: TMenuItem
- Caption = #20840#24323
- OnClick = N2Click
- end
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 777
- Top = 299
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 883
- Top = 487
- end
- object DataSource2: TDataSource
- DataSet = ClientDataSet2
- Left = 917
- Top = 487
- end
- object ClientDataSet2: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 949
- Top = 487
- end
- object RMXLSExport1: TRMXLSExport
- ShowAfterExport = True
- ExportPrecision = 1
- PagesOfSheet = 100
- ExportImages = True
- ExportFrames = True
- ExportImageFormat = ifBMP
- JPEGQuality = 0
- ScaleX = 1.000000000000000000
- ScaleY = 1.000000000000000000
- CompressFile = False
- Left = 225
- Top = 208
- end
- object CDS_Print: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 256
- Top = 357
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDBDataSet1
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 256
- Top = 300
- ReportData = {}
- end
- object RMDBDataSet1: TRMDBDataSet
- Visible = True
- DataSet = CDS_Print
- Left = 256
- Top = 328
- end
- object ADOQueryPrint: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 256
- Top = 276
- end
- object RM2: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbSaveToXLS, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDB_2
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 284
- Top = 303
- ReportData = {}
- end
- object RMDB_2: TRMDBDataSet
- Visible = True
- DataSet = CDS_Main
- Left = 285
- Top = 277
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLList.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLList.pas
deleted file mode 100644
index 47b2de1..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_YFGLList.pas
+++ /dev/null
@@ -1,1055 +0,0 @@
-unit U_YFGLList;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, cxGridCustomTableView, cxGridTableView,
- cxGridBandedTableView, cxGridDBBandedTableView, cxGridLevel, cxClasses,
- cxControls, cxGridCustomView, cxGridDBTableView, cxGrid, StdCtrls, ComCtrls,
- ExtCtrls, ToolWin, cxGridCustomPopupMenu, cxGridPopupMenu, ADODB, DBClient,
- cxDropDownEdit, cxCheckBox, RM_Common, RM_Class, RM_e_Xls, RM_Dataset,
- RM_System, RM_GridReport, Menus, cxCalendar, cxButtonEdit, cxTextEdit, cxPC,
- BtnEdit, cxSplitter, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator,
- dxBarBuiltInMenu, MovePanel, cxCalc, Registry;
-
-type
- TfrmYFGLList = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBFind: TToolButton;
- TBClose: TToolButton;
- Panel1: TPanel;
- ADOQueryCmd: TADOQuery;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- DataSource1: TDataSource;
- cxGridPopupMenu1: TcxGridPopupMenu;
- BegDate: TDateTimePicker;
- EndDate: TDateTimePicker;
- CDS_Main: TClientDataSet;
- PopupMenu1: TPopupMenu;
- N1: TMenuItem;
- N2: TMenuItem;
- ClientDataSet1: TClientDataSet;
- Label6: TLabel;
- A4FPNO: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DataSource2: TDataSource;
- ClientDataSet2: TClientDataSet;
- Label5: TLabel;
- huodai: TEdit;
- RMXLSExport1: TRMXLSExport;
- CDS_Print: TClientDataSet;
- RM1: TRMGridReport;
- RMDBDataSet1: TRMDBDataSet;
- ADOQueryPrint: TADOQuery;
- Label2: TLabel;
- YWY: TEdit;
- cxGrid2: TcxGrid;
- TV1: TcxGridDBTableView;
- cxGridLevel1: TcxGridLevel;
- tv2Column1: TcxGridDBColumn;
- Label4: TLabel;
- orderno: TEdit;
- ComboBox1: TComboBox;
- TV1Column1: TcxGridDBColumn;
- TV1Column2: TcxGridDBColumn;
- TV1Column3: TcxGridDBColumn;
- TV1Column4: TcxGridDBColumn;
- TV1Column5: TcxGridDBColumn;
- TV1Column6: TcxGridDBColumn;
- TV1Column7: TcxGridDBColumn;
- TV1Column8: TcxGridDBColumn;
- TV1Column9: TcxGridDBColumn;
- TV1Column10: TcxGridDBColumn;
- TV1Column11: TcxGridDBColumn;
- TV1Column12: TcxGridDBColumn;
- TV1Column13: TcxGridDBColumn;
- TV1Column14: TcxGridDBColumn;
- TV1Column15: TcxGridDBColumn;
- TV1Column16: TcxGridDBColumn;
- ToolButton3: TToolButton;
- ToolButton1: TToolButton;
- ToolButton2: TToolButton;
- ToolButton4: TToolButton;
- ToolButton5: TToolButton;
- Label1: TLabel;
- HUODAIFPNO: TEdit;
- ToolButton6: TToolButton;
- ToolButton7: TToolButton;
- RM2: TRMGridReport;
- RMDB_2: TRMDBDataSet;
- TV1Column17: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure FormCreate(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ConNoMChange(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBExportClick(Sender: TObject);
- procedure TBFindClick(Sender: TObject);
- procedure N1Click(Sender: TObject);
- procedure N2Click(Sender: TObject);
- procedure FactoryNameChange(Sender: TObject);
- procedure cxTabControl1Change(Sender: TObject);
- procedure CRTypeChange(Sender: TObject);
- procedure A4FPNOKeyPress(Sender: TObject; var Key: Char);
- procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure huodaiKeyPress(Sender: TObject; var Key: Char);
- procedure KHNameKeyPress(Sender: TObject; var Key: Char);
- procedure TBCopyClick(Sender: TObject);
- procedure TBBGZLClick(Sender: TObject);
- procedure TBHTClick(Sender: TObject);
- procedure TBFPClick(Sender: TObject);
- procedure TBZXDClick(Sender: TObject);
- procedure TBBGDClick(Sender: TObject);
- procedure TBViewClick(Sender: TObject);
- procedure TBSBYSClick(Sender: TObject);
- procedure TBAllClick(Sender: TObject);
- procedure YWYChange(Sender: TObject);
- procedure Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
- procedure huodaiBtnClick(Sender: TObject);
- procedure B7DaoHuoGangBtnClick(Sender: TObject);
- procedure BtnEditA1BtnClick(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure ComboBox1Change(Sender: TObject);
- procedure ToolButton3Click(Sender: TObject);
- procedure ToolButton4Click(Sender: TObject);
- procedure ToolButton5Click(Sender: TObject);
- procedure TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
- procedure ToolButton6Click(Sender: TObject);
- procedure ordernoKeyPress(Sender: TObject; var Key: Char);
- procedure ToolButton7Click(Sender: TObject);
- private
- canshu2: string;
- FDate: TDateTime;
- procedure InitGrid();
- function DelData(): Boolean;
- procedure InitSubGrid();
- procedure InitGridSql(var fsj: string);
- function GetShellFolders(strDir: string): string;
- procedure InitPrtData();
- { Private declarations }
- public
- canshu1: string;
- { Public declarations }
- end;
-
-//var
- //frmBaoGuanList: TfrmBaoGuanList;
-
-implementation
-
-uses
- U_DataLink, U_RTFun, U_ZDYHelp, U_BaoGuanInPut, U_Fun, U_YFGLInPut;
-
-{$R *.dfm}
-function TfrmYFGLList.GetShellFolders(strDir: string): string;
-const
- regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders';
-var
- Reg: TRegistry;
- strFolders: string;
-begin
- Reg := TRegistry.Create;
- try
- Reg.RootKey := HKEY_CURRENT_USER;
- if Reg.OpenKey(regPath, false) then
- begin
- strFolders := Reg.ReadString(strDir);
- end;
- finally
- Reg.Free;
- end;
- result := strFolders;
-end;
-
-procedure TfrmYFGLList.FormDestroy(Sender: TObject);
-begin
- //frmBaoGuanList:=nil;
-end;
-
-procedure TfrmYFGLList.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Application := MainApplication;
- Action := caFree;
-end;
-
-procedure TfrmYFGLList.FormCreate(Sender: TObject);
-begin
- //cxGrid1.Align:=alClient;
- EndDate.DateTime := SGetServerDate10(ADOQueryTemp);
- BegDate.DateTime := SGetServerDateMBeg(ADOQueryTemp);
- canshu1 := Trim(DParameters1);
- canshu2 := Trim(DParameters2);
-end;
-
-procedure TfrmYFGLList.InitGrid();
-var
- fwhere, Pwhere: string;
-begin
- Pwhere := SGetFilters(Panel1, 1, 2);
-
- begin
- if trim(Pwhere) <> '' then
- fwhere := fwhere + ' and ' + trim(Pwhere);
- end;
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- SQL.Add(',ZUSD=(SELECT SUM(FYMONEY)FROM FP_SUB B WHERE B.FPID=A.FPID AND B.FYBZ=''Ԫ'')');
- sql.Add(',ZRMB=(SELECT SUM(FYMONEY)FROM FP_SUB B WHERE B.FPID=A.FPID AND B.FYBZ='''')');
- SQL.Add('FROM FP_MAIN A where 1=1 ');
- if ComboBox1.Text = '' then
- begin
- sql.Add(' and chuandate>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and chuandate<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-
- end
- else if combobox1.Text = 'Ƶ' then
- begin
- sql.Add(' and FILLTIME>=''' + Trim(FormatDateTime('yyyy-MM-dd', BegDate.Date)) + '''');
- sql.Add(' and FILLTIME<''' + Trim(FormatDateTime('yyyy-MM-dd', EndDate.Date + 1)) + '''');
-
- end;
- SQL.Add(fwhere);
-
-// ShowMessage(sql.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmYFGLList.TBRafreshClick(Sender: TObject);
-begin
- BegDate.SetFocus;
- InitGrid();
-end;
-
-procedure TfrmYFGLList.ConNoMChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- end;
-end;
-
-procedure TfrmYFGLList.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('' + self.Caption, Tv1, '˷ѹ');
-// WriteCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
- Close;
-end;
-
-procedure TfrmYFGLList.FormShow(Sender: TObject);
-begin
- ReadCxGrid('' + self.Caption, Tv1, '˷ѹ');
-// ReadCxGrid('ϸ' + self.Caption, Tv2, 'ع8');
-// canshu1 := Trim(DParameters1);
-// ShowMessage(canshu1);
- if canshu1 = '' then
- begin
- ToolButton3.Visible := true;
- ToolButton1.Visible := true;
- ToolButton2.Visible := true;
- ToolButton4.Visible := true;
- ToolButton5.Visible := true;
- end;
-
- InitGrid();
- RM1.CanExport := true;
-end;
-
-procedure TfrmYFGLList.TBExportClick(Sender: TObject);
-begin
- if ADOQueryMain.IsEmpty then
- exit;
-// TcxGridToExcel(Trim(CDS_Main.fieldbyname('A4FPNO').AsString) + Trim(CDS_Main.fieldbyname('A5ConNO').AsString), cxGrid1);
-end;
-
-procedure TfrmYFGLList.TBFindClick(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmYFGLList.N1Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, True);
-end;
-
-procedure TfrmYFGLList.N2Click(Sender: TObject);
-begin
- SelOKNo(CDS_Main, False);
-end;
-
-procedure TfrmYFGLList.InitSubGrid();
-begin
- if CDS_Main.IsEmpty = False then
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where BGID=''' + Trim(CDS_Main.fieldbyname('BGID').AsString) + '''');
- sql.Add(' and SValid=''Y'' ');
- Open;
- end;
- end
- else
- begin
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from JYOrder_BaoGuan_Sub where 1=2');
- Open;
- end;
- end;
-
- SCreateCDS20(ADOQueryTemp, ClientDataSet2);
- SInitCDSData20(ADOQueryTemp, ClientDataSet2);
-end;
-
-function TfrmYFGLList.DelData(): Boolean;
-begin
- try
- Result := false;
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- First;
- while CDS_Main.Locate('SSel', True, []) do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('UPdate JYOrder_BaoGuan_Main Set Valid=''N'',C7BGMoneyHZ=Null,E1BZQtyHZ=Null, E2ChiMaQtyHZ=Null,E3MaoZHZ=Null,E4JingZHZ=Null');
- sql.Add(',Editer=''' + Trim(DName) + ''',EditTime=getdate()');
- sql.Add(' where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- sql.Add('UPdate JYOrder_BaoGuan_Sub Set SValid=''N'',SEditer=''' + Trim(DName) + ''',SEditTime=getdate() where BGId=''' + Trim(CDS_Main.fieldbyname('BGId').AsString) + '''');
- ExecSQL;
- end;
- CDS_Main.Delete;
- end;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Result := True;
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Result := False;
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.FactoryNameChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmYFGLList.cxTabControl1Change(Sender: TObject);
-begin
-
- InitGrid();
-end;
-
-procedure TfrmYFGLList.CRTypeChange(Sender: TObject);
-begin
- TBFind.Click;
-end;
-
-procedure TfrmYFGLList.A4FPNOKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-
-end;
-
-procedure TfrmYFGLList.InitGridSql(var fsj: string);
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- sql.Clear;
- sql.Add('select A.* ');
- sql.Add(' from JYOrder_BaoGuan_Main A ');
- sql.Add(' where 1=1 ');
- if Trim(canshu1) <> 'Ȩ' then
- begin
- SQL.Add(' and FillerCode=''' + Trim(DCode) + '''');
- end;
-
- sql.Add(fsj);
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmYFGLList.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmYFGLList.huodaiKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A6PONO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A6PONO,'''') like ''' + '%' + Trim(A6PONO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmYFGLList.KHNameKeyPress(Sender: TObject; var Key: Char);
-var
- fsj: string;
-begin
-// if Key = #13 then
-// begin
-// if Trim(A5ConNO.Text) = '' then
-// Exit;
-// fsj := ' and isnull(A.A5ConNO,'''') like ''' + '%' + Trim(A5ConNO.Text) + '%' + '''';
-// InitGridSql(fsj);
-// end;
-end;
-
-procedure TfrmYFGLList.TBCopyClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- // if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- CopyStr := '99';
- //TBDel.Visible:=False;
- //TBAdd.Visible:=False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmYFGLList.InitPrtData();
-begin
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add(' exec P_View_BaoGuanData :BGID ');
- Parameters.ParamByName('BGID').Value := Trim(CDS_Main.fieldbyname('BGId').AsString);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
-end;
-
-procedure TfrmYFGLList.TBBGZLClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TBHTClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\غͬ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TBFPClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\طƱ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TBZXDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\װ䵥.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TBBGDClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ص.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TBViewClick(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmBaoGuanInPut := TfrmBaoGuanInPut.Create(Application);
- with frmBaoGuanInPut do
- begin
- FBCId := Trim(CDS_Main.fieldbyname('BGID').AsString);
- TBSave.Visible := False;
- ToolBar2.Visible := False;
- Panel1.Enabled := False;
- Tv1.OptionsData.Editing := False;
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmBaoGuanInPut.Free;
- end;
-end;
-
-procedure TfrmYFGLList.TBSBYSClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- RMXLSExport1 := TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- //RMVariables['enddate']:=enddate.DateTime;
- //RMVariables['printtime']:=Now;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\걨Ҫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TBAllClick(Sender: TObject);
-var
- fPrintFile: string;
- EngMoney, BZZH, FimageFile, FZMFile: string;
-begin
- if CDS_Main.IsEmpty then
- Exit;
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf';
- InitPrtData();
- FimageFile := ExtractFilePath(Application.ExeName) + 'Image\' + Trim(CDS_Print.FieldByName('A1ChuKouShang').AsString) + '.jpg';
- //RMXLSExport1:= TRMXLSExport.Create(RMXLSExport1);
- if FileExists(fPrintFile) then
- begin
- if RM1.CanExport = true then
- begin
- FZMFile := 'C:\Users\Administrator\Desktop';
- if not DirectoryExists(FZMFile) then
- begin
- FZMFile := 'C:\Documents and Settings\Administrator\\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.xls';
- end
- else
- begin
- FZMFile := 'C:\Users\Administrator\Desktop\' + trim(CDS_Main.fieldbyname('A4FPNO').AsString) + ' ' + trim(CDS_Main.fieldbyname('A5ConNO').AsString) + '.XLS';
- end;
- RM1.ExportTo(RMXLSExport1, FZMFile);
- end;
- RM1.CanExport := true;
- RMVariables['ImageFile'] := trim(FimageFile);
- RM1.LoadFromFile(fPrintFile);
- RM1.ShowReport;
- RM1.CanExport := False;
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ȫ.rmf'), 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.YWYChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_Main);
- SInitCDSData20(ADOQueryMain, CDS_Main);
- end;
-end;
-
-procedure TfrmYFGLList.Tv1FocusedRecordChanged(Sender: TcxCustomGridTableView; APrevFocusedRecord, AFocusedRecord: TcxCustomGridRecord; ANewItemRecordFocusingChanged: Boolean);
-begin
- InitSubGrid();
-end;
-
-procedure TfrmYFGLList.huodaiBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLList.B7DaoHuoGangBtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-end;
-
-procedure TfrmYFGLList.BtnEditA1BtnClick(Sender: TObject);
-var
- fsj: string;
- FWZ: Integer;
-begin
- fsj := Trim(TEdit(Sender).Hint);
- FWZ := Pos('/', fsj);
- try
- frmZDYHelp := TfrmZDYHelp.Create(Application);
- with frmZDYHelp do
- begin
- flag := Copy(fsj, 1, FWZ - 1);
- flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ);
- if ShowModal = 1 then
- begin
- TEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString);
- end;
- end;
- finally
- frmZDYHelp.Free;
- end;
-
-end;
-
-procedure TfrmYFGLList.ToolButton1Click(Sender: TObject);
-begin
- try
- frmYFGLInPut := TfrmYFGLInPut.Create(Application);
- with frmYFGLInPut do
- begin
- FBCId := trim(CDS_Main.fieldbyname('fpid').AsString);
-
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmYFGLInPut.Free;
- end;
-end;
-
-procedure TfrmYFGLList.ToolButton2Click(Sender: TObject);
-begin
- try
-
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete fp_main where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- sql.Add('delete fp_sub where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɾɹ', 'ʾ', 0);
- InitGrid();
- except
- ADOQueryCmd.Connection.RollbackTrans;
-
- Application.MessageBox('ɾ쳣', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.ComboBox1Change(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmYFGLList.ToolButton3Click(Sender: TObject);
-begin
-// if CDS_Main.IsEmpty then
-// Exit;
- //if cxTabControl1.TabIndex<>0 then Exit;
- try
- frmYFGLInPut := TfrmYFGLInPut.Create(Application);
- with frmYFGLInPut do
- begin
- FBCId := '';
-
- if ShowModal = 1 then
- begin
- Self.InitGrid();
- end;
- end;
- finally
- frmYFGLInPut.Free;
- end;
-end;
-
-procedure TfrmYFGLList.ToolButton4Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update fp_main Set fkstatus=''Ѹ'' ');
-
- SQL.Add(' where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-// Order_Main.Delete;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- initgrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.ToolButton5Click(Sender: TObject);
-begin
- if CDS_Main.IsEmpty then
- Exit;
- if Application.MessageBox('ȷҪִд˲', 'ʾ', 32 + 4) <> IDYES then
- Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- CDS_Main.DisableControls;
- with CDS_Main do
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('Update fp_main Set fkstatus=''δ'' ');
-
- SQL.Add(' where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-// Order_Main.Delete;
- end;
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ!', 'ʾ', 0);
- initgrid();
- except
- CDS_Main.EnableControls;
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('쳣!', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmYFGLList.TV1CustomDrawCell(Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
-begin
- if (AViewInfo.GridRecord.Values[TV1Column4.Index] = null) then
- begin
- ACanvas.font.Color := clred;
- end;
-end;
-
-procedure TfrmYFGLList.ToolButton6Click(Sender: TObject);
-var
- fPrintFile, FTaiTou: string;
- EngMoney, LBName, fImagePath2: string;
-begin
- if CDS_Main.Locate('SSel', True, []) = False then
- begin
- Application.MessageBox('ûѡ!', 'ʾ', 0);
- Exit;
- end;
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\뵥.rmf';
- ExportFtErpFile('뵥.rmf', ADOQueryPrint);
-
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete TBSubID where DName=''' + Trim(DCode) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('SELECT * FROM TBSubID where 1=2 ');
- open;
- end;
-
- CDS_Main.DisableControls;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with CDS_Main do
- begin
- First;
- while not Eof do
- begin
- if Fieldbyname('Ssel').AsBoolean then
- begin
-
- ADOQueryCmd.append;
- ADOQueryCmd.fieldbyname('SubId').Value := Trim(CDS_Main.fieldbyname('FPID').AsString);
- ADOQueryCmd.fieldbyname('Dname').Value := Trim(DCode);
- ADOQueryCmd.post;
-
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('Update fp_main Set fkstatus=''Ѹ'' ');
-
- SQL.Add(' where fpid=''' + Trim(CDS_Main.fieldbyname('fpid').AsString) + '''');
- ExecSQL;
- end;
-// Order_Main.Delete;
-
- end;
- Next;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- end;
- CDS_Main.EnableControls;
- with ADOQueryPrint do
- begin
- Close;
- sql.Clear;
- sql.Add('exec P_Print_FKSQD ');
-
- SQL.ADD('@DCODE=''' + Trim(DCode) + '''');
-// ShowMessage(SQL.Text);
- Open;
- end;
- SCreateCDS20(ADOQueryPrint, CDS_Print);
- SInitCDSData20(ADOQueryPrint, CDS_Print);
- if FileExists(fPrintFile) then
- begin
-
- RM1.LoadFromFile(fPrintFile);
- Sleep(1000);
- RM1.ShowReport;
-
- end
- else
- begin
-// Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\ص.rmf'), 'ʾ', 0);
- Application.MessageBox(PChar('û' + trim(fPrintFile)), 'ʾϢ', 0);
- Exit;
- end;
-
-end;
-
-procedure TfrmYFGLList.ordernoKeyPress(Sender: TObject; var Key: Char);
-begin
- if Key = #13 then
- InitGrid();
-end;
-
-procedure TfrmYFGLList.ToolButton7Click(Sender: TObject);
-var
- fPrintFile, fImagePath2: string;
- Porderno, LBName, SYRName: string;
- i, j: Integer;
- OrderKg: Double;
-begin
- if CDS_Main.IsEmpty then
- Exit;
-
- LBName := '˷ѵ';
- ExportFtErpFile(Trim(LBName) + '.rmf', ADOQueryTemp);
-
- fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf';
- if FileExists(fPrintFile) then
- begin
- RM2.LoadFromFile(fPrintFile);
-
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label0001.xls';
- if FileExists(fImagePath2) then
- DeleteFile(fImagePath2);
- fImagePath2 := ExtractFilePath(Application.ExeName) + 'image\label.xls';
- RM2.PrepareReport;
- RM2.ExportTo(RMXLSExport1, fImagePath2);
- end
- else
- begin
- Application.MessageBox(PChar('û' + ExtractFilePath(Application.ExeName) + 'Report\' + Trim(LBName) + '.rmf'), 'ʾ', 0);
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp.dfm
deleted file mode 100644
index 53a47cd..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp.dfm
+++ /dev/null
@@ -1,320 +0,0 @@
-object frmZDYHelp: TfrmZDYHelp
- Left = 274
- Top = 241
- Width = 522
- Height = 533
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 0
- Top = 73
- Width = 506
- Height = 421
- Align = alClient
- TabOrder = 0
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1OrderNoPropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 49
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #21517#31216
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 272
- end
- object V1Note: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NotePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 109
- end
- object V1ZdyFlag: TcxGridDBColumn
- Caption = #26631#24535
- DataBinding.FieldName = 'ZdyFlag'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1Column1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1HelpType: TcxGridDBColumn
- Caption = #24110#21161#31867#27604
- DataBinding.FieldName = 'HelpType'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1HelpTypePropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 55
- end
- object V1ZdyStr1: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr2: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr2'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object V1ZdyStr3: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr3'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1ZdyStr4: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr4'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr5: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr5'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr6: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr6'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 51
- end
- object V1ZdyStr7: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr7'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 55
- end
- object V1ZdyStr8: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr8'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- object V1ZdyStr9: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr9'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 54
- end
- object V1ZdyStr10: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr10'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 506
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 59
- Top = 0
- Caption = #22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 118
- Top = 0
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 177
- Top = 0
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 236
- Top = 0
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 295
- Top = 0
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 506
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label1: TLabel
- Left = 18
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 53
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 208
- Top = 144
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 168
- Top = 152
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp.pas
deleted file mode 100644
index 839db70..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp.pas
+++ /dev/null
@@ -1,729 +0,0 @@
-unit U_ZDYHelp;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, ToolWin, ComCtrls,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxGridLevel,
- cxClasses, cxControls, cxGridCustomView, cxGrid, DBClient, ADODB, ImgList,
- StdCtrls, ExtCtrls, cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu,
- cxTimeEdit, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmZDYHelp = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- V1ZdyFlag: TcxGridDBColumn;
- V1HelpType: TcxGridDBColumn;
- V1ZdyStr1: TcxGridDBColumn;
- V1ZdyStr2: TcxGridDBColumn;
- V1ZdyStr3: TcxGridDBColumn;
- V1ZdyStr4: TcxGridDBColumn;
- V1ZdyStr5: TcxGridDBColumn;
- V1ZdyStr6: TcxGridDBColumn;
- V1ZdyStr7: TcxGridDBColumn;
- V1ZdyStr8: TcxGridDBColumn;
- V1ZdyStr9: TcxGridDBColumn;
- V1ZdyStr10: TcxGridDBColumn;
- procedure FormCreate(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- procedure V1OrderNoPropertiesEditValueChanged(Sender: TObject);
- procedure V1NotePropertiesEditValueChanged(Sender: TObject);
- procedure V1Column1PropertiesEditValueChanged(Sender: TObject);
- procedure V1HelpTypePropertiesEditValueChanged(Sender: TObject);
- procedure V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag,flagname,snote,MainType:string;
- fnote,forderno,fZdyFlag,ViewFlag:Boolean;
- PPSTE:integer;
- { Public declarations }
- end;
-
-var
- frmZDYHelp: TfrmZDYHelp;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmZDYHelp.FormCreate(Sender: TObject);
-begin
- {try
- cxGrid1.Align:=alClient;
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- except
- {if Application.MessageBox('ʧ,ǷҪٴ?','ʾ',32+4)=IDYES then
- begin
- try
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='23242';
- Connected:=true;
- end;
- except
- end;
- end; }
-
- {frmRTZDYHelp.Free;
- end; }
-end;
-
-procedure TfrmZDYHelp.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- Action:=caFree;
-end;
-
-procedure TfrmZDYHelp.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type='''+flag+'''');
- if Trim(MainType)<>'' then
- begin
- sql.Add(' and A.MainType='''+Trim(MainType)+'''');
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-procedure TfrmZDYHelp.TBAddClick(Sender: TObject);
-var
- i:Integer;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
- for i:=0 to 5 do
- begin
- with ClientDataSet1 do
- begin
- Append;
- Post;
- end;
- end;
-
-end;
-procedure TfrmZDYHelp.TBSaveClick(Sender: TObject);
-var
- maxno:string;
-begin
- if ClientDataSet1.IsEmpty then Exit;
- ZDYName.SetFocus;
-
- if ClientDataSet1.Locate('ZDYName',null,[]) then
- begin
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- if ClientDataSet1.Locate('ZDYName','',[]) then
- begin
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').Value;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ','ʾ',0);
- TV1.OptionsData.Editing:=False;
- TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-
-end;
-
-procedure TfrmZDYHelp.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString)<>'') or
- (Trim(ClientDataSet1.FieldByName('ZDYname').AsString)<>'') then
- begin
- if application.MessageBox('ȷҪɾ?','ʾϢ',1)=2 then exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo='''+Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString)+'''');
- SQL.Add(' and Type='''+Trim(flag)+'''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmZDYHelp.TBCloseClick(Sender: TObject);
-begin
- ModalResult:=2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- Close;
-end;
-
-procedure TfrmZDYHelp.FormShow(Sender: TObject);
-var
- fsj,fsj1:string;
-begin
- {if PPSTE=1 then
- begin
- Application.Terminate;
- Exit;
- end; }
- InitGrid();
- fsj:=Trim(flag)+'01';
- fsj1:=Trim(flagname)+'01';
- {if ClientDataSet1.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYname,Type,note)');
- sql.Add('select '''+Trim(fsj)+'''');
- sql.Add(','''+Trim(fsj1)+'''');
- SQL.Add(','''+Trim(flag)+'''');
- sql.Add(','''+Trim(snote)+'''');
- ExecSQL;
- end;
- InitGrid();
- end;}
- //frmZDYHelp.Caption:=Trim(flagname)+'<'+Trim(flag)+'>';
- //ReadCxGrid('Զ',TV1,'Զ');
- ReadCxGrid('Զ'+Trim(flag),TV1,'Զ');
- frmZDYHelp.Caption:=Trim(flagname);
- V1Note.Visible:=fnote;
- V1ZdyFlag.Visible:=fZdyFlag;
- V1OrderNo.Visible:=forderno;
- if ViewFlag=True then
- begin
- TBAdd.Visible:=False;
- TBSave.Visible:=False;
- TBDel.Visible:=False;
- TBEdit.Visible:=False;
- Label2.Visible:=False;
- end;
-end;
-
-procedure TfrmZDYHelp.ToolButton1Click(Sender: TObject);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- ModalResult:=1;
-end;
-
-procedure TfrmZDYHelp.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
-end;
-
-procedure TfrmZDYHelp.TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing=False then
- begin
- ModalResult:=1;
- end;
-end;
-
-procedure TfrmZDYHelp.ZDYNameChange(Sender: TObject);
-var
- fsj:String;
-begin
- if Trim(ZDYName.Text)<>'' then
- begin
- fsj:=' zdyname like '''+'%'+Trim(ZDYName.Text)+'%'+''''
- +' or Note like '''+'%'+Trim(ZDYName.Text)+'%'+''''
- +' or ZJM like '''+'%'+Trim(ZDYName.Text)+'%'+'''';
- end;
- if ADOQueryMain.Active then
- begin
- // SDofilter(ADOQueryMain,fsj);
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- if Trim(fsj)='' then
- begin
- Filtered:=False;
- end else
- begin
- Filtered:=False;
- Filter:=fsj;
- Filtered:=True;
- end;
- end;
- finally
- ADOQueryMain.EnableControls;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- end;
-end;
-
-procedure TfrmZDYHelp.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno,mvalue:string;
-begin
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value:=Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
-
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-end;
-
-procedure TfrmZDYHelp.V1OrderNoPropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('OrderNo').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set OrderNo='+mvalue);
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1NotePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:String;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyFlag').Value:=StrToInt(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ZdyFlag='+Trim(mvalue));
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1HelpTypePropertiesEditValueChanged(
- Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('HelpType').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set HelpType='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue,FFieldName:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- FFieldName:=TV1.Controller.FocusedColumn.DataBinding.FilterFieldName;
- if Trim(mvalue)='' then
- begin
- mvalue:='';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName(FFieldName).Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set '+FFieldName+'='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp2.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp2.dfm
deleted file mode 100644
index 2cc68de..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp2.dfm
+++ /dev/null
@@ -1,320 +0,0 @@
-object frmZDYHelp: TfrmZDYHelp
- Left = 693
- Top = 180
- Width = 522
- Height = 533
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 0
- Top = 73
- Width = 506
- Height = 421
- Align = alClient
- TabOrder = 0
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1OrderNoPropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 49
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #21517#31216
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 272
- end
- object V1Note: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NotePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 109
- end
- object V1ZdyFlag: TcxGridDBColumn
- Caption = #26631#24535
- DataBinding.FieldName = 'ZdyFlag'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1Column1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1HelpType: TcxGridDBColumn
- Caption = #24110#21161#31867#27604
- DataBinding.FieldName = 'HelpType'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1HelpTypePropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 55
- end
- object V1ZdyStr1: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr2: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr2'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object V1ZdyStr3: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr3'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1ZdyStr4: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr4'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr5: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr5'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr6: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr6'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 51
- end
- object V1ZdyStr7: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr7'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 55
- end
- object V1ZdyStr8: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr8'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- object V1ZdyStr9: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr9'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 54
- end
- object V1ZdyStr10: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr10'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 506
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 59
- Top = 0
- Caption = #22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 118
- Top = 0
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 177
- Top = 0
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 236
- Top = 0
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 295
- Top = 0
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 506
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label1: TLabel
- Left = 18
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 53
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 208
- Top = 144
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 168
- Top = 152
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp2.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp2.pas
deleted file mode 100644
index 48b410d..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp2.pas
+++ /dev/null
@@ -1,729 +0,0 @@
-unit U_ZDYHelp2;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, ToolWin, ComCtrls,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxGridLevel,
- cxClasses, cxControls, cxGridCustomView, cxGrid, DBClient, ADODB, ImgList,
- StdCtrls, ExtCtrls, cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu,
- cxTimeEdit, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmZDYHelp = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- V1ZdyFlag: TcxGridDBColumn;
- V1HelpType: TcxGridDBColumn;
- V1ZdyStr1: TcxGridDBColumn;
- V1ZdyStr2: TcxGridDBColumn;
- V1ZdyStr3: TcxGridDBColumn;
- V1ZdyStr4: TcxGridDBColumn;
- V1ZdyStr5: TcxGridDBColumn;
- V1ZdyStr6: TcxGridDBColumn;
- V1ZdyStr7: TcxGridDBColumn;
- V1ZdyStr8: TcxGridDBColumn;
- V1ZdyStr9: TcxGridDBColumn;
- V1ZdyStr10: TcxGridDBColumn;
- procedure FormCreate(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- procedure V1OrderNoPropertiesEditValueChanged(Sender: TObject);
- procedure V1NotePropertiesEditValueChanged(Sender: TObject);
- procedure V1Column1PropertiesEditValueChanged(Sender: TObject);
- procedure V1HelpTypePropertiesEditValueChanged(Sender: TObject);
- procedure V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag,flagname,snote,MainType:string;
- fnote,forderno,fZdyFlag,ViewFlag:Boolean;
- PPSTE:integer;
- { Public declarations }
- end;
-
-var
- frmZDYHelp: TfrmZDYHelp;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmZDYHelp.FormCreate(Sender: TObject);
-begin
- {try
- cxGrid1.Align:=alClient;
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- except
- {if Application.MessageBox('ʧ,ǷҪٴ?','ʾ',32+4)=IDYES then
- begin
- try
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='23242';
- Connected:=true;
- end;
- except
- end;
- end; }
-
- {frmRTZDYHelp.Free;
- end; }
-end;
-
-procedure TfrmZDYHelp.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- Action:=caFree;
-end;
-
-procedure TfrmZDYHelp.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type='''+flag+'''');
- if Trim(MainType)<>'' then
- begin
- sql.Add(' and A.MainType='''+Trim(MainType)+'''');
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-procedure TfrmZDYHelp.TBAddClick(Sender: TObject);
-var
- i:Integer;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
- for i:=0 to 5 do
- begin
- with ClientDataSet1 do
- begin
- Append;
- Post;
- end;
- end;
-
-end;
-procedure TfrmZDYHelp.TBSaveClick(Sender: TObject);
-var
- maxno:string;
-begin
- if ClientDataSet1.IsEmpty then Exit;
- ZDYName.SetFocus;
-
- if ClientDataSet1.Locate('ZDYName',null,[]) then
- begin
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- if ClientDataSet1.Locate('ZDYName','',[]) then
- begin
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').Value;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ','ʾ',0);
- TV1.OptionsData.Editing:=False;
- TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-
-end;
-
-procedure TfrmZDYHelp.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString)<>'') or
- (Trim(ClientDataSet1.FieldByName('ZDYname').AsString)<>'') then
- begin
- if application.MessageBox('ȷҪɾ?','ʾϢ',1)=2 then exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo='''+Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString)+'''');
- SQL.Add(' and Type='''+Trim(flag)+'''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmZDYHelp.TBCloseClick(Sender: TObject);
-begin
- ModalResult:=2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- Close;
-end;
-
-procedure TfrmZDYHelp.FormShow(Sender: TObject);
-var
- fsj,fsj1:string;
-begin
- {if PPSTE=1 then
- begin
- Application.Terminate;
- Exit;
- end; }
- InitGrid();
- fsj:=Trim(flag)+'01';
- fsj1:=Trim(flagname)+'01';
- {if ClientDataSet1.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYname,Type,note)');
- sql.Add('select '''+Trim(fsj)+'''');
- sql.Add(','''+Trim(fsj1)+'''');
- SQL.Add(','''+Trim(flag)+'''');
- sql.Add(','''+Trim(snote)+'''');
- ExecSQL;
- end;
- InitGrid();
- end;}
- //frmZDYHelp.Caption:=Trim(flagname)+'<'+Trim(flag)+'>';
- //ReadCxGrid('Զ',TV1,'Զ');
- ReadCxGrid('Զ'+Trim(flag),TV1,'Զ');
- frmZDYHelp.Caption:=Trim(flagname);
- V1Note.Visible:=fnote;
- V1ZdyFlag.Visible:=fZdyFlag;
- V1OrderNo.Visible:=forderno;
- if ViewFlag=True then
- begin
- TBAdd.Visible:=False;
- TBSave.Visible:=False;
- TBDel.Visible:=False;
- TBEdit.Visible:=False;
- Label2.Visible:=False;
- end;
-end;
-
-procedure TfrmZDYHelp.ToolButton1Click(Sender: TObject);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- ModalResult:=1;
-end;
-
-procedure TfrmZDYHelp.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
-end;
-
-procedure TfrmZDYHelp.TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing=False then
- begin
- ModalResult:=1;
- end;
-end;
-
-procedure TfrmZDYHelp.ZDYNameChange(Sender: TObject);
-var
- fsj:String;
-begin
- if Trim(ZDYName.Text)<>'' then
- begin
- fsj:=' zdyname like '''+'%'+Trim(ZDYName.Text)+'%'+''''
- +' or Note like '''+'%'+Trim(ZDYName.Text)+'%'+''''
- +' or ZJM like '''+'%'+Trim(ZDYName.Text)+'%'+'''';
- end;
- if ADOQueryMain.Active then
- begin
- // SDofilter(ADOQueryMain,fsj);
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- if Trim(fsj)='' then
- begin
- Filtered:=False;
- end else
- begin
- Filtered:=False;
- Filter:=fsj;
- Filtered:=True;
- end;
- end;
- finally
- ADOQueryMain.EnableControls;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- end;
-end;
-
-procedure TfrmZDYHelp.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno,mvalue:string;
-begin
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value:=Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
-
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-end;
-
-procedure TfrmZDYHelp.V1OrderNoPropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('OrderNo').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set OrderNo='+mvalue);
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1NotePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue:String;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyFlag').Value:=StrToInt(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ZdyFlag='+Trim(mvalue));
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1HelpTypePropertiesEditValueChanged(
- Sender: TObject);
-var
- mvalue:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- mvalue:='0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('HelpType').Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set HelpType='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp.V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue,FFieldName:string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)='' then
- begin
- Application.MessageBox('ƲΪ!','ʾ',0);
- Exit;
- end;
- mvalue:=TcxTextEdit(Sender).EditingText;
- FFieldName:=TV1.Controller.FocusedColumn.DataBinding.FilterFieldName;
- if Trim(mvalue)='' then
- begin
- mvalue:='';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName(FFieldName).Value:=mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set '+FFieldName+'='''+Trim(mvalue)+'''');
- sql.Add(' where ZdyNo='''+Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)+'''');
- ExecSQL;
- end;
-end;
-
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp3.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp3.dfm
deleted file mode 100644
index 45f0ad5..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp3.dfm
+++ /dev/null
@@ -1,289 +0,0 @@
-object frmZDYHelp2: TfrmZDYHelp2
- Left = 466
- Top = 188
- Width = 540
- Height = 528
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 0
- Top = 73
- Width = 524
- Height = 416
- Align = alClient
- TabOrder = 2
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1OrderNoPropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 49
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #21517#31216
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 326
- end
- object V1Note: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NotePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 109
- end
- object V1ZdyFlag: TcxGridDBColumn
- Caption = #26631#24535
- DataBinding.FieldName = 'ZdyFlag'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1Column1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1HelpType: TcxGridDBColumn
- Caption = #24110#21161#31867#27604
- DataBinding.FieldName = 'HelpType'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1HelpTypePropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 55
- end
- object V1ZdyStr1: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr2: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr2'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object V1ZdyStr3: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr3'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1ZdyStr4: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr4'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr5: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr5'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 524
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 83
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 0
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #21521#19978#22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object ToolButton2: TToolButton
- Left = 150
- Top = 0
- AutoSize = True
- Caption = #21521#19979#22686#34892
- ImageIndex = 12
- OnClick = ToolButton2Click
- end
- object TBDel: TToolButton
- Left = 237
- Top = 0
- AutoSize = True
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 300
- Top = 0
- AutoSize = True
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 363
- Top = 0
- AutoSize = True
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 426
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 524
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 1
- object Label1: TLabel
- Left = 18
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 53
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 208
- Top = 144
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 168
- Top = 152
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp3.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp3.pas
deleted file mode 100644
index c56dd33..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp3.pas
+++ /dev/null
@@ -1,782 +0,0 @@
-unit U_ZDYHelp3;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, ToolWin, ComCtrls, cxGridCustomTableView,
- cxGridTableView, cxGridDBTableView, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGrid, DBClient, ADODB, ImgList, StdCtrls, ExtCtrls,
- cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu, cxTimeEdit, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmZDYHelp2 = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- V1ZdyFlag: TcxGridDBColumn;
- V1HelpType: TcxGridDBColumn;
- V1ZdyStr1: TcxGridDBColumn;
- V1ZdyStr2: TcxGridDBColumn;
- V1ZdyStr3: TcxGridDBColumn;
- V1ZdyStr4: TcxGridDBColumn;
- V1ZdyStr5: TcxGridDBColumn;
- ToolButton2: TToolButton;
- procedure FormCreate(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- procedure V1OrderNoPropertiesEditValueChanged(Sender: TObject);
- procedure V1NotePropertiesEditValueChanged(Sender: TObject);
- procedure V1Column1PropertiesEditValueChanged(Sender: TObject);
- procedure V1HelpTypePropertiesEditValueChanged(Sender: TObject);
- procedure V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag, flagname, snote, MainType: string;
- fnote, forderno, fZdyFlag, ViewFlag: Boolean;
- PPSTE: integer;
- { Public declarations }
- end;
-
-var
- frmZDYHelp2: TfrmZDYHelp2;
-
-implementation
-
-uses
- U_DataLink, U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmZDYHelp2.FormCreate(Sender: TObject);
-begin
- {try
- cxGrid1.Align:=alClient;
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- except
- {if Application.MessageBox('ʧ,ǷҪٴ?','ʾ',32+4)=IDYES then
- begin
- try
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='23242';
- Connected:=true;
- end;
- except
- end;
- end; }
- {frmRTZDYHelp.Free;
- end; }
-end;
-
-procedure TfrmZDYHelp2.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- Action := caFree;
-end;
-
-procedure TfrmZDYHelp2.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.Add('update t1 set t1.ZdyFlt1 = t.rn from KH_ZDY t1');
- sql.Add('join (select *,rn = ROW_NUMBER() OVER(ORDER BY ZdyFlt1) from KH_ZDY where TYPE=''KuangHao'')t on t1.zdyno = t.zdyno');
- sql.Add('WHERE t1.TYPE=''KuangHao'' ');
- execsql;
- end;
-
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type=''' + flag + '''');
-
- sql.Add('order by ZdyFlt1');
-// if Trim(MainType) <> '' then
-// begin
-// sql.Add(' and A.MainType=''' + Trim(MainType) + '''');
-// end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain, ClientDataSet1);
- SInitCDSData20(ADOQueryMain, ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmZDYHelp2.TBAddClick(Sender: TObject);
-var
- i: Integer;
- maxno: string;
- fxh: Double;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
- fxh := ClientDataSet1.fieldbyname('ZdyFlt1').Value;
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
-// ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType,ZdyFlt1) select :ZDYNo,:ZDYName,:Type,:MainType,:ZdyFlt1 ');
- Parameters.ParamByName('ZDYNo').Value := Trim(maxno);
- Parameters.ParamByName('ZDYName').Value := '';
-
- Parameters.ParamByName('Type').Value := 'KuangHao';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- Parameters.ParamByName('ZdyFlt1').Value := fxh - 0.1;
-
-// ADOQueryCmd.FieldByName('valid').Value := 'Y';
-// ShowMessage(sql.Text);
- ExecSQL;
- end;
- InitGrid();
- ClientDataSet1.locate('ZdyFlt1', fxh, []);
-// for i := 0 to 5 do
-// begin
-// with ClientDataSet1 do
-// begin
-// Append;
-// Post;
-// end;
-// end;
-
-end;
-
-procedure TfrmZDYHelp2.TBSaveClick(Sender: TObject);
-var
- maxno: string;
-begin
- if ClientDataSet1.IsEmpty then
- Exit;
- ZDYName.SetFocus;
-
- if ClientDataSet1.Locate('ZDYName', null, []) then
- begin
- Application.MessageBox('ƲΪգ', 'ʾ', 0);
- Exit;
- end;
- if ClientDataSet1.Locate('ZDYName', '', []) then
- begin
- Application.MessageBox('ƲΪգ', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo=''' + Trim(flag) + '''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value := Trim(flag);
- Parameters.ParamByName('ZDYName').Value := Trim(flagname);
- Parameters.ParamByName('Type').Value := 'Main';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type=''' + Trim(flag) + '''');
- if Trim(MainType) <> '' then
- SQL.Add(' and MainType=''' + Trim(MainType) + '''');
- sql.Add(' and ZdyName=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) = '' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end
- else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := ClientDataSet1.fieldbyname('ZDYName').Value;
- ADOQueryCmd.FieldByName('note').Value := Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := flag;
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
- if Trim(MainType) <> '' then
- ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value := Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ', 'ʾ', 0);
- TV1.OptionsData.Editing := False;
- TV1.OptionsSelection.CellSelect := False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmZDYHelp2.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then
- Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString) <> '') or (Trim(ClientDataSet1.FieldByName('ZDYname').AsString) <> '') then
- begin
- if application.MessageBox('ȷҪɾ?', 'ʾϢ', 1) = 2 then
- exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo=''' + Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString) + '''');
- SQL.Add(' and Type=''' + Trim(flag) + '''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmZDYHelp2.TBCloseClick(Sender: TObject);
-begin
- ModalResult := 2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- Close;
-end;
-
-procedure TfrmZDYHelp2.FormShow(Sender: TObject);
-var
- fsj, fsj1: string;
-begin
-
- InitGrid();
- fsj := Trim(flag) + '01';
- fsj1 := Trim(flagname) + '01';
- ReadCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- frmZDYHelp2.Caption := Trim(flagname);
- V1Note.Visible := fnote;
- V1ZdyFlag.Visible := fZdyFlag;
- V1OrderNo.Visible := forderno;
- if ViewFlag = True then
- begin
- TBAdd.Visible := False;
- TBSave.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- Label2.Visible := False;
- end;
-end;
-
-procedure TfrmZDYHelp2.ToolButton1Click(Sender: TObject);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- ModalResult := 1;
-end;
-
-procedure TfrmZDYHelp2.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
-end;
-
-procedure TfrmZDYHelp2.TV1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing = False then
- begin
- ModalResult := 1;
- end;
-end;
-
-procedure TfrmZDYHelp2.ZDYNameChange(Sender: TObject);
-var
- fsj: string;
-begin
- if Trim(ZDYName.Text) <> '' then
- begin
- fsj := ' zdyname like ''' + '%' + Trim(ZDYName.Text) + '%' + '''' + ' or Note like ''' + '%' + Trim(ZDYName.Text) + '%' + '''' + ' or ZJM like ''' + '%' + Trim(ZDYName.Text) + '%' + '''';
- end;
- if ADOQueryMain.Active then
- begin
- // SDofilter(ADOQueryMain,fsj);
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- if Trim(fsj) = '' then
- begin
- Filtered := False;
- end
- else
- begin
- Filtered := False;
- Filter := fsj;
- Filtered := True;
- end;
- end;
- finally
- ADOQueryMain.EnableControls;
- end;
- SCreateCDS20(ADOQueryMain, ClientDataSet1);
- SInitCDSData20(ADOQueryMain, ClientDataSet1);
- end;
-end;
-
-procedure TfrmZDYHelp2.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno, mvalue: string;
-begin
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value := Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo=''' + Trim(flag) + '''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value := Trim(flag);
- Parameters.ParamByName('ZDYName').Value := Trim(flagname);
- Parameters.ParamByName('Type').Value := 'Main';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type=''' + Trim(flag) + '''');
-// if Trim(MainType) <> '' then
-// SQL.Add(' and MainType=''' + Trim(MainType) + '''');
- sql.Add(' and ZdyName=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
-
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) = '' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end
- else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
-// with ADOQueryCmd do
-// begin
-// Close;
-// sql.Clear;
-// SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
-// ExecSQL;
-// end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
- Open;
- end;
- ADOQueryCmd.Edit;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value := Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := flag;
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
- if Trim(MainType) <> '' then
- ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value := Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmZDYHelp2.V1OrderNoPropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('OrderNo').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set OrderNo=' + mvalue);
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp2.V1NotePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp2.V1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyFlag').Value := StrToInt(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ZdyFlag=' + Trim(mvalue));
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp2.V1HelpTypePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('HelpType').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set HelpType=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp2.V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FFieldName: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- FFieldName := TV1.Controller.FocusedColumn.DataBinding.FilterFieldName;
- if Trim(mvalue) = '' then
- begin
- mvalue := '';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName(FFieldName).Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ' + FFieldName + '=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp2.ToolButton2Click(Sender: TObject);
-var
- i: Integer;
- maxno: string;
- fxh: Double;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
- fxh := ClientDataSet1.fieldbyname('ZdyFlt1').Value;
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
-// ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType,ZdyFlt1) select :ZDYNo,:ZDYName,:Type,:MainType,:ZdyFlt1 ');
- Parameters.ParamByName('ZDYNo').Value := Trim(maxno);
- Parameters.ParamByName('ZDYName').Value := '';
-
- Parameters.ParamByName('Type').Value := 'KuangHao';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- Parameters.ParamByName('ZdyFlt1').Value := fxh + 0.1;
-
-// ADOQueryCmd.FieldByName('valid').Value := 'Y';
- ExecSQL;
- end;
- InitGrid();
- ClientDataSet1.locate('ZdyFlt1', fxh, []);
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp4.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp4.dfm
deleted file mode 100644
index 31a1713..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp4.dfm
+++ /dev/null
@@ -1,320 +0,0 @@
-object frmZDYHelp4: TfrmZDYHelp4
- Left = 274
- Top = 241
- Width = 522
- Height = 533
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 0
- Top = 73
- Width = 506
- Height = 421
- Align = alClient
- TabOrder = 0
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1OrderNoPropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 49
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #21517#31216
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 272
- end
- object V1Note: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NotePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 109
- end
- object V1ZdyFlag: TcxGridDBColumn
- Caption = #26631#24535
- DataBinding.FieldName = 'ZdyFlag'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1Column1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1HelpType: TcxGridDBColumn
- Caption = #24110#21161#31867#27604
- DataBinding.FieldName = 'HelpType'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1HelpTypePropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 55
- end
- object V1ZdyStr1: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr2: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr2'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object V1ZdyStr3: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr3'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1ZdyStr4: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr4'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr5: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr5'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr6: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr6'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 51
- end
- object V1ZdyStr7: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr7'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 55
- end
- object V1ZdyStr8: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr8'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- object V1ZdyStr9: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr9'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 54
- end
- object V1ZdyStr10: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr10'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 506
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 59
- Top = 0
- Caption = #22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 118
- Top = 0
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 177
- Top = 0
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 236
- Top = 0
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 295
- Top = 0
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 506
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label1: TLabel
- Left = 18
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 53
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 208
- Top = 144
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 168
- Top = 152
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp4.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp4.pas
deleted file mode 100644
index a8ec477..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp4.pas
+++ /dev/null
@@ -1,731 +0,0 @@
-unit U_ZDYHelp4;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, ToolWin, ComCtrls, cxGridCustomTableView,
- cxGridTableView, cxGridDBTableView, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGrid, DBClient, ADODB, ImgList, StdCtrls, ExtCtrls,
- cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu, cxTimeEdit, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmZDYHelp4 = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- V1ZdyFlag: TcxGridDBColumn;
- V1HelpType: TcxGridDBColumn;
- V1ZdyStr1: TcxGridDBColumn;
- V1ZdyStr2: TcxGridDBColumn;
- V1ZdyStr3: TcxGridDBColumn;
- V1ZdyStr4: TcxGridDBColumn;
- V1ZdyStr5: TcxGridDBColumn;
- V1ZdyStr6: TcxGridDBColumn;
- V1ZdyStr7: TcxGridDBColumn;
- V1ZdyStr8: TcxGridDBColumn;
- V1ZdyStr9: TcxGridDBColumn;
- V1ZdyStr10: TcxGridDBColumn;
- procedure FormCreate(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- procedure V1OrderNoPropertiesEditValueChanged(Sender: TObject);
- procedure V1NotePropertiesEditValueChanged(Sender: TObject);
- procedure V1Column1PropertiesEditValueChanged(Sender: TObject);
- procedure V1HelpTypePropertiesEditValueChanged(Sender: TObject);
- procedure V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag, flagname, snote, MainType: string;
- fnote, forderno, fZdyFlag, ViewFlag: Boolean;
- PPSTE: integer;
- { Public declarations }
- end;
-
-var
- frmZDYHelp4: TfrmZDYHelp4;
-
-implementation
-
-uses
- U_DataLink, U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmZDYHelp4.FormCreate(Sender: TObject);
-begin
- {try
- cxGrid1.Align:=alClient;
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- except
- {if Application.MessageBox('ʧ,ǷҪٴ?','ʾ',32+4)=IDYES then
- begin
- try
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='23242';
- Connected:=true;
- end;
- except
- end;
- end; }
- {frmRTZDYHelp.Free;
- end; }
-end;
-
-procedure TfrmZDYHelp4.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- Action := caFree;
-end;
-
-procedure TfrmZDYHelp4.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type=''' + flag + '''');
- if Trim(MainType) <> '' then
- begin
- sql.Add(' and A.MainType=''' + Trim(MainType) + '''');
- end;
- SQL.Add('order by ZdyFlt1');
- Open;
- end;
- SCreateCDS20(ADOQueryMain, ClientDataSet1);
- SInitCDSData20(ADOQueryMain, ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmZDYHelp4.TBAddClick(Sender: TObject);
-var
- i: Integer;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
- for i := 0 to 5 do
- begin
- with ClientDataSet1 do
- begin
- Append;
- Post;
- end;
- end;
-
-end;
-
-procedure TfrmZDYHelp4.TBSaveClick(Sender: TObject);
-var
- maxno: string;
-begin
- if ClientDataSet1.IsEmpty then
- Exit;
- ZDYName.SetFocus;
-
- if ClientDataSet1.Locate('ZDYName', null, []) then
- begin
- Application.MessageBox('ƲΪգ', 'ʾ', 0);
- Exit;
- end;
- if ClientDataSet1.Locate('ZDYName', '', []) then
- begin
- Application.MessageBox('ƲΪգ', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo=''' + Trim(flag) + '''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value := Trim(flag);
- Parameters.ParamByName('ZDYName').Value := Trim(flagname);
- Parameters.ParamByName('Type').Value := 'Main';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type=''' + Trim(flag) + '''');
- if Trim(MainType) <> '' then
- SQL.Add(' and MainType=''' + Trim(MainType) + '''');
- sql.Add(' and ZdyName=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) = '' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end
- else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := ClientDataSet1.fieldbyname('ZDYName').Value;
- ADOQueryCmd.FieldByName('note').Value := Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := flag;
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
- if Trim(MainType) <> '' then
- ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value := Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ', 'ʾ', 0);
- TV1.OptionsData.Editing := False;
- TV1.OptionsSelection.CellSelect := False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmZDYHelp4.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then
- Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString) <> '') or (Trim(ClientDataSet1.FieldByName('ZDYname').AsString) <> '') then
- begin
- if application.MessageBox('ȷҪɾ?', 'ʾϢ', 1) = 2 then
- exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo=''' + Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString) + '''');
- SQL.Add(' and Type=''' + Trim(flag) + '''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmZDYHelp4.TBCloseClick(Sender: TObject);
-begin
- ModalResult := 2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- Close;
-end;
-
-procedure TfrmZDYHelp4.FormShow(Sender: TObject);
-var
- fsj, fsj1: string;
-begin
- {if PPSTE=1 then
- begin
- Application.Terminate;
- Exit;
- end; }
- InitGrid();
- fsj := Trim(flag) + '01';
- fsj1 := Trim(flagname) + '01';
- {if ClientDataSet1.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYname,Type,note)');
- sql.Add('select '''+Trim(fsj)+'''');
- sql.Add(','''+Trim(fsj1)+'''');
- SQL.Add(','''+Trim(flag)+'''');
- sql.Add(','''+Trim(snote)+'''');
- ExecSQL;
- end;
- InitGrid();
- end;}
- //frmZDYHelp.Caption:=Trim(flagname)+'<'+Trim(flag)+'>';
- //ReadCxGrid('Զ',TV1,'Զ');
- ReadCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- frmZDYHelp4.Caption := Trim(flagname);
- V1Note.Visible := fnote;
- V1ZdyFlag.Visible := fZdyFlag;
- V1OrderNo.Visible := forderno;
- if ViewFlag = True then
- begin
- TBAdd.Visible := False;
- TBSave.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- Label2.Visible := False;
- end;
-end;
-
-procedure TfrmZDYHelp4.ToolButton1Click(Sender: TObject);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- ModalResult := 1;
-end;
-
-procedure TfrmZDYHelp4.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
-end;
-
-procedure TfrmZDYHelp4.TV1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing = False then
- begin
- ModalResult := 1;
- end;
-end;
-
-procedure TfrmZDYHelp4.ZDYNameChange(Sender: TObject);
-var
- fsj: string;
-begin
- if Trim(ZDYName.Text) <> '' then
- begin
- fsj := ' zdyname like ''' + '%' + Trim(ZDYName.Text) + '%' + '''' + ' or Note like ''' + '%' + Trim(ZDYName.Text) + '%' + '''' + ' or ZJM like ''' + '%' + Trim(ZDYName.Text) + '%' + '''';
- end;
- if ADOQueryMain.Active then
- begin
- // SDofilter(ADOQueryMain,fsj);
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- if Trim(fsj) = '' then
- begin
- Filtered := False;
- end
- else
- begin
- Filtered := False;
- Filter := fsj;
- Filtered := True;
- end;
- end;
- finally
- ADOQueryMain.EnableControls;
- end;
- SCreateCDS20(ADOQueryMain, ClientDataSet1);
- SInitCDSData20(ADOQueryMain, ClientDataSet1);
- end;
-end;
-
-procedure TfrmZDYHelp4.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno, mvalue: string;
-begin
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value := Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo=''' + Trim(flag) + '''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value := Trim(flag);
- Parameters.ParamByName('ZDYName').Value := Trim(flagname);
- Parameters.ParamByName('Type').Value := 'Main';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type=''' + Trim(flag) + '''');
- if Trim(MainType) <> '' then
- SQL.Add(' and MainType=''' + Trim(MainType) + '''');
- sql.Add(' and ZdyName=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
-
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) = '' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end
- else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value := Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := flag;
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
- if Trim(MainType) <> '' then
- ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value := Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmZDYHelp4.V1OrderNoPropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('OrderNo').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set OrderNo=' + mvalue);
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp4.V1NotePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp4.V1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyFlag').Value := StrToInt(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ZdyFlag=' + Trim(mvalue));
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp4.V1HelpTypePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('HelpType').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set HelpType=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp4.V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FFieldName: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- FFieldName := TV1.Controller.FocusedColumn.DataBinding.FilterFieldName;
- if Trim(mvalue) = '' then
- begin
- mvalue := '';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName(FFieldName).Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ' + FFieldName + '=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp9.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp9.dfm
deleted file mode 100644
index fc4dbe7..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp9.dfm
+++ /dev/null
@@ -1,337 +0,0 @@
-object frmZDYHelp9: TfrmZDYHelp9
- Left = 274
- Top = 241
- Width = 522
- Height = 533
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 0
- Top = 73
- Width = 506
- Height = 421
- Align = alClient
- TabOrder = 0
- object TV1: TcxGridDBTableView
- Navigator.Buttons.CustomButtons = <>
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Editing = False
- OptionsSelection.CellSelect = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1OrderNoPropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 49
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #32452#21035
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 83
- end
- object V1Note: TcxGridDBColumn
- Caption = #21161#29702
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NotePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 76
- end
- object V1ZdyFlag: TcxGridDBColumn
- Caption = #26631#24535
- DataBinding.FieldName = 'ZdyFlag'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1Column1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1HelpType: TcxGridDBColumn
- Caption = #24110#21161#31867#27604
- DataBinding.FieldName = 'HelpType'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1HelpTypePropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 55
- end
- object V1ZdyStr1: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr2: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr2'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 60
- end
- object V1ZdyStr3: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr3'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1ZdyStr4: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr4'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr5: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr5'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 61
- end
- object V1ZdyStr6: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr6'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 51
- end
- object V1ZdyStr7: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr7'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 55
- end
- object V1ZdyStr8: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr8'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- object V1ZdyStr9: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr9'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 54
- end
- object V1ZdyStr10: TcxGridDBColumn
- DataBinding.FieldName = 'ZdyStr10'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1ZdyStr1PropertiesEditValueChanged
- Visible = False
- HeaderAlignmentHorz = taCenter
- VisibleForCustomization = False
- Width = 56
- end
- object TV1Column1: TcxGridDBColumn
- Caption = #24066#22330
- DataBinding.FieldName = 'note1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column1PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- object TV1Column2: TcxGridDBColumn
- Caption = #30446#26631#37329#39069
- DataBinding.FieldName = 'zdyflt1'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = TV1Column2PropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 66
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 506
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Caption = #36873#25321
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 59
- Top = 0
- Caption = #22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 118
- Top = 0
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 177
- Top = 0
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 236
- Top = 0
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 295
- Top = 0
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 506
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label1: TLabel
- Left = 18
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 53
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 208
- Top = 144
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 168
- Top = 152
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp9.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp9.pas
deleted file mode 100644
index 1863eae..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelp9.pas
+++ /dev/null
@@ -1,797 +0,0 @@
-unit U_ZDYHelp9;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
- cxEdit, DB, cxDBData, ToolWin, ComCtrls, cxGridCustomTableView,
- cxGridTableView, cxGridDBTableView, cxGridLevel, cxClasses, cxControls,
- cxGridCustomView, cxGrid, DBClient, ADODB, ImgList, StdCtrls, ExtCtrls,
- cxTextEdit, cxGridCustomPopupMenu, cxGridPopupMenu, cxTimeEdit, cxLookAndFeels,
- cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmZDYHelp9 = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- V1ZdyFlag: TcxGridDBColumn;
- V1HelpType: TcxGridDBColumn;
- V1ZdyStr1: TcxGridDBColumn;
- V1ZdyStr2: TcxGridDBColumn;
- V1ZdyStr3: TcxGridDBColumn;
- V1ZdyStr4: TcxGridDBColumn;
- V1ZdyStr5: TcxGridDBColumn;
- V1ZdyStr6: TcxGridDBColumn;
- V1ZdyStr7: TcxGridDBColumn;
- V1ZdyStr8: TcxGridDBColumn;
- V1ZdyStr9: TcxGridDBColumn;
- V1ZdyStr10: TcxGridDBColumn;
- TV1Column1: TcxGridDBColumn;
- TV1Column2: TcxGridDBColumn;
- procedure FormCreate(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- procedure V1OrderNoPropertiesEditValueChanged(Sender: TObject);
- procedure V1NotePropertiesEditValueChanged(Sender: TObject);
- procedure V1Column1PropertiesEditValueChanged(Sender: TObject);
- procedure V1HelpTypePropertiesEditValueChanged(Sender: TObject);
- procedure V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
- procedure TV1Column2PropertiesEditValueChanged(Sender: TObject);
- procedure TV1Column1PropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag, flagname, snote, MainType: string;
- fnote, forderno, fZdyFlag, ViewFlag: Boolean;
- PPSTE: integer;
- { Public declarations }
- end;
-
-var
- frmZDYHelp9: TfrmZDYHelp9;
-
-implementation
-
-uses
- U_DataLink, U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmZDYHelp9.FormCreate(Sender: TObject);
-begin
- {try
- cxGrid1.Align:=alClient;
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='';
- Connected:=true;
- end;
- except
- {if Application.MessageBox('ʧ,ǷҪٴ?','ʾ',32+4)=IDYES then
- begin
- try
- with ADOConnection1 do
- begin
- Connected:=false;
- ConnectionString:=DConString;
- //ConnectionString:='23242';
- Connected:=true;
- end;
- except
- end;
- end; }
- {frmRTZDYHelp.Free;
- end; }
-end;
-
-procedure TfrmZDYHelp9.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- Action := caFree;
-end;
-
-procedure TfrmZDYHelp9.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select A.*,ZJM=dbo.getPinYin(A.ZdyName) from KH_ZDY A where A.Type=''' + flag + '''');
- if Trim(MainType) <> '' then
- begin
- sql.Add(' and A.MainType=''' + Trim(MainType) + '''');
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain, ClientDataSet1);
- SInitCDSData20(ADOQueryMain, ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmZDYHelp9.TBAddClick(Sender: TObject);
-var
- i: Integer;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
- for i := 0 to 5 do
- begin
- with ClientDataSet1 do
- begin
- Append;
- Post;
- end;
- end;
-
-end;
-
-procedure TfrmZDYHelp9.TBSaveClick(Sender: TObject);
-var
- maxno: string;
-begin
- if ClientDataSet1.IsEmpty then
- Exit;
- ZDYName.SetFocus;
-
- if ClientDataSet1.Locate('ZDYName', null, []) then
- begin
- Application.MessageBox('ƲΪգ', 'ʾ', 0);
- Exit;
- end;
- if ClientDataSet1.Locate('ZDYName', '', []) then
- begin
- Application.MessageBox('ƲΪգ', 'ʾ', 0);
- Exit;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo=''' + Trim(flag) + '''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value := Trim(flag);
- Parameters.ParamByName('ZDYName').Value := Trim(flagname);
- Parameters.ParamByName('Type').Value := 'Main';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- ClientDataSet1.DisableControls;
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type=''' + Trim(flag) + '''');
- if Trim(MainType) <> '' then
- SQL.Add(' and MainType=''' + Trim(MainType) + '''');
- sql.Add(' and ZdyName=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty = False then
- begin
- if ADOQueryTemp.RecordCount > 1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) = '' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end
- else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- ClientDataSet1.EnableControls;
- Application.MessageBox('ظ', 'ʾ', 0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := ClientDataSet1.fieldbyname('ZDYName').Value;
- ADOQueryCmd.FieldByName('note').Value := Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := flag;
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
- if Trim(MainType) <> '' then
- ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value := Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ', 'ʾ', 0);
- TV1.OptionsData.Editing := False;
- TV1.OptionsSelection.CellSelect := False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-
-end;
-
-procedure TfrmZDYHelp9.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then
- Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString) <> '') or (Trim(ClientDataSet1.FieldByName('ZDYname').AsString) <> '') then
- begin
- if application.MessageBox('ȷҪɾ?', 'ʾϢ', 1) = 2 then
- exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo=''' + Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString) + '''');
- SQL.Add(' and Type=''' + Trim(flag) + '''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmZDYHelp9.TBCloseClick(Sender: TObject);
-begin
- ModalResult := 2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ2' + Trim(flag), TV1, 'Զ');
- Close;
-end;
-
-procedure TfrmZDYHelp9.FormShow(Sender: TObject);
-var
- fsj, fsj1: string;
-begin
- {if PPSTE=1 then
- begin
- Application.Terminate;
- Exit;
- end; }
- InitGrid();
- fsj := Trim(flag) + '01';
- fsj1 := Trim(flagname) + '01';
- {if ClientDataSet1.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYname,Type,note)');
- sql.Add('select '''+Trim(fsj)+'''');
- sql.Add(','''+Trim(fsj1)+'''');
- SQL.Add(','''+Trim(flag)+'''');
- sql.Add(','''+Trim(snote)+'''');
- ExecSQL;
- end;
- InitGrid();
- end;}
- //frmZDYHelp.Caption:=Trim(flagname)+'<'+Trim(flag)+'>';
- //ReadCxGrid('Զ',TV1,'Զ');
- ReadCxGrid('Զ2' + Trim(flag), TV1, 'Զ');
- frmZDYHelp9.Caption := Trim(flagname);
-// V1Note.Visible := fnote;
-// V1ZdyFlag.Visible := fZdyFlag;
-// V1OrderNo.Visible := forderno;
- if ViewFlag = True then
- begin
- TBAdd.Visible := False;
- TBSave.Visible := False;
- TBDel.Visible := False;
- TBEdit.Visible := False;
- Label2.Visible := False;
- end;
-end;
-
-procedure TfrmZDYHelp9.ToolButton1Click(Sender: TObject);
-begin
- ZDYName.SetFocus;
- WriteCxGrid('Զ' + Trim(flag), TV1, 'Զ');
- ModalResult := 1;
-end;
-
-procedure TfrmZDYHelp9.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing := True;
- TV1.OptionsSelection.CellSelect := True;
-end;
-
-procedure TfrmZDYHelp9.TV1CellDblClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing = False then
- begin
- ModalResult := 1;
- end;
-end;
-
-procedure TfrmZDYHelp9.ZDYNameChange(Sender: TObject);
-var
- fsj: string;
-begin
- if Trim(ZDYName.Text) <> '' then
- begin
- fsj := ' zdyname like ''' + '%' + Trim(ZDYName.Text) + '%' + '''' + ' or Note like ''' + '%' + Trim(ZDYName.Text) + '%' + '''' + ' or ZJM like ''' + '%' + Trim(ZDYName.Text) + '%' + '''';
- end;
- if ADOQueryMain.Active then
- begin
- // SDofilter(ADOQueryMain,fsj);
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- if Trim(fsj) = '' then
- begin
- Filtered := False;
- end
- else
- begin
- Filtered := False;
- Filter := fsj;
- Filtered := True;
- end;
- end;
- finally
- ADOQueryMain.EnableControls;
- end;
- SCreateCDS20(ADOQueryMain, ClientDataSet1);
- SInitCDSData20(ADOQueryMain, ClientDataSet1);
- end;
-end;
-
-procedure TfrmZDYHelp9.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno, mvalue: string;
-begin
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value := Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo=''' + Trim(flag) + '''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value := Trim(flag);
- Parameters.ParamByName('ZDYName').Value := Trim(flagname);
- Parameters.ParamByName('Type').Value := 'Main';
- Parameters.ParamByName('MainType').Value := Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString) = '' then
- begin
- if GetLSNo(ADOQueryTemp, maxno, 'SY', 'KH_ZDY', 3, 1) = False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ', 'ʾ', 0);
- Exit;
- end;
- end
- else
- begin
- maxno := Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
-// with ADOQueryTemp do
-// begin
-// Close;
-// sql.Clear;
-// sql.add('select * from KH_Zdy where Type=''' + Trim(flag) + '''');
-// if Trim(MainType) <> '' then
-// SQL.Add(' and MainType=''' + Trim(MainType) + '''');
-// sql.Add(' and ZdyName=''' + Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) + '''');
-// Open;
-// end;
-// if ADOQueryTemp.IsEmpty = False then
-// begin
-// if ADOQueryTemp.RecordCount > 1 then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-//
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ظ', 'ʾ', 0);
-// Exit;
-// end;
-// if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) = '' then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ظ', 'ʾ', 0);
-// Exit;
-// end
-// else
-// begin
-// if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString) <> Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
-// begin
-// ADOQueryCmd.Connection.RollbackTrans;
-// //ClientDataSet1.EnableControls;
-// Application.MessageBox('ظ', 'ʾ', 0);
-// Exit;
-// end;
-// end;
-// end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO=''' + Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString) + '''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value := Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value := ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value := Trim(snote);
-
- ADOQueryCmd.FieldByName('note1').Value := ClientDataSet1.fieldbyname('note1').AsString;
- ADOQueryCmd.FieldByName('zdyflt1').Value := ClientDataSet1.fieldbyname('zdyflt1').AsFloat;
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value := flag;
- ADOQueryCmd.FieldByName('valid').Value := 'Y';
- if Trim(MainType) <> '' then
- ADOQueryCmd.FieldByName('MainType').Value := Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value := Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ', 'ʾ', 0);
- end;
-end;
-
-procedure TfrmZDYHelp9.V1OrderNoPropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('OrderNo').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set OrderNo=' + mvalue);
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp9.V1NotePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp9.V1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyFlag').Value := StrToInt(mvalue);
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ZdyFlag=' + Trim(mvalue));
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp9.V1HelpTypePropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('HelpType').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set HelpType=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp9.V1ZdyStr1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue, FFieldName: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- FFieldName := TV1.Controller.FocusedColumn.DataBinding.FilterFieldName;
- if Trim(mvalue) = '' then
- begin
- mvalue := '';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName(FFieldName).Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set ' + FFieldName + '=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp9.TV1Column2PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('zdyflt1').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set zdyflt1=''' + (mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-procedure TfrmZDYHelp9.TV1Column1PropertiesEditValueChanged(Sender: TObject);
-var
- mvalue: string;
-begin
- if Trim(ClientDataSet1.fieldbyname('ZdyName').AsString) = '' then
- begin
- Application.MessageBox('ƲΪ!', 'ʾ', 0);
- Exit;
- end;
- mvalue := TcxTextEdit(Sender).EditingText;
- if Trim(mvalue) = '' then
- begin
- mvalue := '0';
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('Note1').Value := mvalue;
- Post;
- end;
- with ADOQueryCmd do
- begin
- Close;
- SQL.Clear;
- sql.Add('Update KH_Zdy Set Note1=''' + Trim(mvalue) + '''');
- sql.Add(' where ZdyNo=''' + Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) + '''');
- ExecSQL;
- end;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelpSel.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelpSel.dfm
deleted file mode 100644
index 190f784..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelpSel.dfm
+++ /dev/null
@@ -1,224 +0,0 @@
-object frmZDYHelpSel: TfrmZDYHelpSel
- Left = 392
- Top = 169
- Width = 574
- Height = 598
- Caption = #39033#30446#32500#25252
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object cxGrid1: TcxGrid
- Left = 0
- Top = 73
- Width = 558
- Height = 486
- Align = alClient
- TabOrder = 0
- object TV1: TcxGridDBTableView
- NavigatorButtons.ConfirmDelete = False
- OnCellDblClick = TV1CellDblClick
- DataController.DataSource = DataSource1
- DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.FocusCellOnTab = True
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsBehavior.FocusCellOnCycle = True
- OptionsCustomize.ColumnFiltering = False
- OptionsView.GroupByBox = False
- object V1Code: TcxGridDBColumn
- Caption = #32534#21495
- DataBinding.FieldName = 'ZDYNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 97
- end
- object V1Column1: TcxGridDBColumn
- Caption = #36873#25321
- DataBinding.FieldName = 'SSel'
- PropertiesClassName = 'TcxCheckBoxProperties'
- Properties.ImmediatePost = True
- Properties.NullStyle = nssUnchecked
- HeaderAlignmentHorz = taCenter
- Width = 48
- end
- object V1Name: TcxGridDBColumn
- Tag = 2
- Caption = #21517#31216
- DataBinding.FieldName = 'ZDYName'
- PropertiesClassName = 'TcxTextEditProperties'
- Properties.OnEditValueChanged = V1NamePropertiesEditValueChanged
- HeaderAlignmentHorz = taCenter
- Width = 208
- end
- object V1Note: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 57
- end
- object V1OrderNo: TcxGridDBColumn
- Caption = #39034#24207#21495
- DataBinding.FieldName = 'OrderNo'
- Visible = False
- HeaderAlignmentHorz = taCenter
- Width = 53
- end
- end
- object cxGrid1Level1: TcxGridLevel
- GridView = TV1
- end
- end
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 558
- Height = 29
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Flat = True
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentFont = False
- ShowCaptions = True
- TabOrder = 1
- object ToolButton1: TToolButton
- Left = 0
- Top = 0
- Caption = #30830#23450
- ImageIndex = 10
- OnClick = ToolButton1Click
- end
- object TBAdd: TToolButton
- Left = 59
- Top = 0
- Caption = #22686#34892
- ImageIndex = 12
- OnClick = TBAddClick
- end
- object TBDel: TToolButton
- Left = 118
- Top = 0
- Caption = #21024#34892
- ImageIndex = 13
- OnClick = TBDelClick
- end
- object TBEdit: TToolButton
- Left = 177
- Top = 0
- Caption = #20462#25913
- ImageIndex = 11
- OnClick = TBEditClick
- end
- object TBSave: TToolButton
- Left = 236
- Top = 0
- Caption = #20445#23384
- ImageIndex = 15
- Visible = False
- OnClick = TBSaveClick
- end
- object TBClose: TToolButton
- Left = 295
- Top = 0
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 29
- Width = 558
- Height = 44
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Label1: TLabel
- Left = 19
- Top = 17
- Width = 24
- Height = 12
- Caption = #21517#31216
- end
- object Label2: TLabel
- Left = 240
- Top = 11
- Width = 120
- Height = 24
- Caption = #27880#65306#28966#28857#31163#24320#24403#21069#32534#36753#13#10' '#21333#20803#26684#20445#23384#25968#25454#12290
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clBlue
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- ParentColor = False
- ParentFont = False
- end
- object ZDYName: TEdit
- Tag = 2
- Left = 54
- Top = 12
- Width = 169
- Height = 20
- TabOrder = 0
- OnChange = ZDYNameChange
- end
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 48
- Top = 136
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 80
- Top = 144
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 112
- Top = 152
- end
- object DataSource1: TDataSource
- DataSet = ClientDataSet1
- Left = 280
- Top = 144
- end
- object ClientDataSet1: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 200
- Top = 144
- end
- object cxGridPopupMenu1: TcxGridPopupMenu
- Grid = cxGrid1
- PopupMenus = <>
- Left = 352
- Top = 248
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelpSel.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelpSel.pas
deleted file mode 100644
index 3f3ffb3..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZDYHelpSel.pas
+++ /dev/null
@@ -1,465 +0,0 @@
-unit U_ZDYHelpSel;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
- cxDataStorage, cxEdit, DB, cxDBData, ToolWin, ComCtrls,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxGridLevel,
- cxClasses, cxControls, cxGridCustomView, cxGrid, DBClient, ADODB, ImgList,
- StdCtrls, ExtCtrls, cxCheckBox, cxTextEdit, cxGridCustomPopupMenu,
- cxGridPopupMenu;
-
-type
- TfrmZDYHelpSel = class(TForm)
- TV1: TcxGridDBTableView;
- cxGrid1Level1: TcxGridLevel;
- cxGrid1: TcxGrid;
- V1Code: TcxGridDBColumn;
- V1Name: TcxGridDBColumn;
- ToolBar1: TToolBar;
- ADOQueryMain: TADOQuery;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- TBAdd: TToolButton;
- TBSave: TToolButton;
- TBDel: TToolButton;
- TBClose: TToolButton;
- ToolButton1: TToolButton;
- TBEdit: TToolButton;
- V1Note: TcxGridDBColumn;
- V1OrderNo: TcxGridDBColumn;
- Panel1: TPanel;
- Label1: TLabel;
- ZDYName: TEdit;
- V1Column1: TcxGridDBColumn;
- Label2: TLabel;
- cxGridPopupMenu1: TcxGridPopupMenu;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBAddClick(Sender: TObject);
- procedure TBSaveClick(Sender: TObject);
- procedure TBDelClick(Sender: TObject);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure TBEditClick(Sender: TObject);
- procedure TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
- procedure ZDYNameChange(Sender: TObject);
- procedure V1NamePropertiesEditValueChanged(Sender: TObject);
- private
- procedure InitGrid();
- { Private declarations }
- public
- flag,flagname,snote,MainType,ReturnStr,FGStr:string;
- fnote,forderno:Boolean;
- PPSTE,JiangeStr:integer;
- { Public declarations }
- end;
-
-var
- frmZDYHelpSel: TfrmZDYHelpSel;
-
-implementation
-uses
- U_DataLink,U_RTFun;
-
-{$R *.dfm}
-
-procedure TfrmZDYHelpSel.FormClose(Sender: TObject;
- var Action: TCloseAction);
-begin
- ZDYName.SetFocus;
- Action:=caFree;
-end;
-
-procedure TfrmZDYHelpSel.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where Type='''+flag+'''');
- if Trim(MainType)<>'' then
- begin
- sql.Add(' and MainType='''+Trim(MainType)+'''');
- end;
- Open;
- end;
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-procedure TfrmZDYHelpSel.TBAddClick(Sender: TObject);
-var
- i:Integer;
-begin
- ZDYName.SetFocus;
- TV1.OptionsData.Editing:=True;
- TV1.OptionsSelection.CellSelect:=True;
- for i:=0 to 5 do
- begin
- with ClientDataSet1 do
- begin
- Append;
- Post;
- end;
- end;
-
-end;
-
-procedure TfrmZDYHelpSel.TBSaveClick(Sender: TObject);
-var
- maxno:string;
-begin
- if ClientDataSet1.IsEmpty then Exit;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- with ClientDataSet1 do
- begin
- First;
- while not eof do
- begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- if Trim(ClientDataSet1.FieldByName('ZDYName').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- ClientDataSet1.Post;
- Next;
- end;
- end;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- Application.MessageBox('ɹ','ʾ',0);
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
- // TV1.OptionsData.Editing:=False;
-end;
-
-procedure TfrmZDYHelpSel.TBDelClick(Sender: TObject);
-begin
- if ClientDataSet1.IsEmpty then Exit;
- if (Trim(ClientDataSet1.FieldByName('ZDYNo').AsString)<>'') or
- (Trim(ClientDataSet1.FieldByName('ZDYname').AsString)<>'') then
- begin
- if application.MessageBox('ȷҪɾ?','ʾϢ',1)=2 then exit;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('delete KH_ZDY where ZDYNo='''+Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString)+'''');
- SQL.Add(' and Type='''+Trim(flag)+'''');
- ExecSQL;
- end;
- end;
- ClientDataSet1.Delete;
-end;
-
-procedure TfrmZDYHelpSel.TBCloseClick(Sender: TObject);
-begin
- ModalResult:=2;
- ZDYName.SetFocus;
- WriteCxGrid('Զ'+Trim(flag),TV1,'Զ');
- Close;
-end;
-
-procedure TfrmZDYHelpSel.FormShow(Sender: TObject);
-var
- fsj,fsj1:string;
-begin
- {if PPSTE=1 then
- begin
- Application.Terminate;
- Exit;
- end; }
- InitGrid();
- fsj:=Trim(flag)+'01';
- fsj1:=Trim(flagname)+'01';
- ReadCxGrid('Զ'+Trim(flag),TV1,'Զ');
- {if ClientDataSet1.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYname,Type,note)');
- sql.Add('select '''+Trim(fsj)+'''');
- sql.Add(','''+Trim(fsj1)+'''');
- SQL.Add(','''+Trim(flag)+'''');
- sql.Add(','''+Trim(snote)+'''');
- ExecSQL;
- end;
- InitGrid();
- end;}
- //frmZDYHelp.Caption:=Trim(flagname)+'<'+Trim(flag)+'>';
- frmZDYHelpSel.Caption:=Trim(flagname);
-end;
-
-procedure TfrmZDYHelpSel.ToolButton1Click(Sender: TObject);
-begin
- ReturnStr:='';
- with ClientDataSet1 do
- begin
- First;
- while not Eof do
- begin
- if FieldByName('SSel').AsBoolean=True then
- begin
- if JiangeStr<>99 then
- begin
- if FGStr<>'' then
- ReturnStr:=ReturnStr+Trim(fieldbyname('ZDYName').AsString)+FGStr
- else
- ReturnStr:=ReturnStr+Trim(fieldbyname('ZDYName').AsString)+';'
- end
- else
- ReturnStr:=ReturnStr+Trim(fieldbyname('ZDYName').AsString);
- end;
- Next;
- end;
- end;
- if JiangeStr<>99 then
- ReturnStr:=Copy(ReturnStr,1,Length(ReturnStr)-1);
- ModalResult:=1;
-end;
-
-procedure TfrmZDYHelpSel.TBEditClick(Sender: TObject);
-begin
- TV1.OptionsData.Editing:=True;
-end;
-
-procedure TfrmZDYHelpSel.TV1CellDblClick(Sender: TcxCustomGridTableView;
- ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
- AShift: TShiftState; var AHandled: Boolean);
-begin
- if TV1.OptionsData.Editing=False then
- begin
- ModalResult:=1;
- end;
-end;
-
-procedure TfrmZDYHelpSel.ZDYNameChange(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,ClientDataSet1);
- SInitCDSData20(ADOQueryMain,ClientDataSet1);
- end;
-end;
-
-procedure TfrmZDYHelpSel.V1NamePropertiesEditValueChanged(Sender: TObject);
-var
- maxno,mvalue:string;
-begin
- mvalue:=TcxTextEdit(Sender).EditingText;
- if Trim(mvalue)='' then
- begin
- //Application.MessageBox('ƲΪգ','ʾ',0);
- Exit;
- end;
- with ClientDataSet1 do
- begin
- Edit;
- FieldByName('ZdyName').Value:=Trim(mvalue);
- //Post;
- end;
- try
- ADOQueryCmd.Connection.BeginTrans;
- with ADOQueryTemp do
- begin
- Close;
- SQL.Clear;
- SQL.Add('select * from KH_ZDY where ZdyNo='''+Trim(flag)+'''');
- open;
- end;
- if ADOQueryTemp.IsEmpty then
- begin
- with ADOQueryCmd do
- begin
- close;
- sql.Clear;
- sql.Add('insert into KH_ZDY(ZDYNo,ZDYName,Type,MainType) select :ZDYNo,:ZDYName,:Type,:MainType ');
- Parameters.ParamByName('ZDYNo').Value:=Trim(flag);
- Parameters.ParamByName('ZDYName').Value:=Trim(flagname);
- Parameters.ParamByName('Type').Value:='Main';
- Parameters.ParamByName('MainType').Value:=Trim(MainType);
- ExecSQL;
- end;
- end;
- with ADOQueryCmd do
- begin
- //ClientDataSet1.DisableControls;
- //with ClientDataSet1 do
- //begin
- //First;
- //while not eof do
- //begin
- if Trim(ClientDataSet1.FieldByName('ZDYNO').AsString)='' then
- begin
- if GetLSNo(ADOQueryTemp,maxno,'SY','KH_ZDY',3,1)=False then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ȡʧܣ','ʾ',0);
- Exit;
- end;
- end else
- begin
- maxno:=Trim(ClientDataSet1.fieldbyname('ZDYNo').AsString);
- end;
- with ADOQueryTemp do
- begin
- Close;
- sql.Clear;
- sql.add('select * from KH_Zdy where Type='''+Trim(flag)+'''');
- if Trim(MainType)<>'' then
- SQL.Add(' and MainType='''+Trim(MainType)+'''');
- sql.Add(' and ZdyName='''+Trim(ClientDataSet1.fieldbyname('ZdyName').AsString)+'''');
- Open;
- end;
- if ADOQueryTemp.IsEmpty=False then
- begin
- if ADOQueryTemp.RecordCount>1 then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- if Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString)='' then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end else
- begin
- if Trim(ADOQueryTemp.fieldbyname('ZdyNo').AsString)<>Trim(ClientDataSet1.fieldbyname('ZdyNo').AsString) then
- begin
- ADOQueryCmd.Connection.RollbackTrans;
- //ClientDataSet1.EnableControls;
- Application.MessageBox('ظ','ʾ',0);
- Exit;
- end;
- end;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- SQL.Add('delete KH_ZDY where ZDYNO='''+Trim(ClientDataSet1.fieldbyname('ZDYNO').AsString)+'''');
- ExecSQL;
- end;
- with ADOQueryCmd do
- begin
- Close;
- sql.Clear;
- sql.Add('select * from KH_ZDY where 1<>1');
- Open;
- end;
- ADOQueryCmd.Append;
- ADOQueryCmd.FieldByName('ZDYNo').Value:=Trim(maxno);
- ADOQueryCmd.FieldByName('ZDYName').Value:=ClientDataSet1.fieldbyname('ZDYName').AsString;
- ADOQueryCmd.FieldByName('note').Value:=Trim(snote);
- //ADOQueryCmd.FieldByName('orderno').Value:=ClientDataSet1.fieldbyname('Name').AsString;
- ADOQueryCmd.FieldByName('Type').Value:=flag;
- ADOQueryCmd.FieldByName('valid').Value:='Y';
- if Trim(MainType)<>'' then
- ADOQueryCmd.FieldByName('MainType').Value:=Trim(MainType);
- //ADOQueryCmd.FieldByName('sel').Value:=0;
- ADOQueryCmd.Post;
- ClientDataSet1.Edit;
- ClientDataSet1.FieldByName('ZDYNo').Value:=Trim(maxno);
- //ClientDataSet1.Post;
- // Next;
- //end;
- //end;
- // ClientDataSet1.EnableControls;
- end;
- ADOQueryCmd.Connection.CommitTrans;
- //Application.MessageBox('ɹ','ʾ',0);
- //TV1.OptionsData.Editing:=False;
- //TV1.OptionsSelection.CellSelect:=False;
- except
- ADOQueryCmd.Connection.RollbackTrans;
- Application.MessageBox('ʧܣ','ʾ',0);
- end;
-end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachGYS.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachGYS.dfm
deleted file mode 100644
index 7597be9..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachGYS.dfm
+++ /dev/null
@@ -1,258 +0,0 @@
-object frmZdyAttachGYS: TfrmZdyAttachGYS
- Left = 292
- Top = 129
- Width = 935
- Height = 618
- Caption = #20379#24212#21830#36164#26009#31649#29702
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 919
- Height = 31
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- DisabledImages = DataLink_DDMD.ThreeImgList
- Flat = True
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object ToolButton2: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = ToolButton2Click
- end
- object TBClose: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 31
- Width = 919
- Height = 39
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label3: TLabel
- Left = 203
- Top = 13
- Width = 60
- Height = 12
- Caption = #20379#24212#21830#21517#31216
- end
- object Label1: TLabel
- Left = 22
- Top = 13
- Width = 60
- Height = 12
- Caption = #20379#24212#21830#32534#21495
- end
- object Label2: TLabel
- Left = 395
- Top = 13
- Width = 24
- Height = 12
- Caption = #31867#22411
- end
- object CoName: TEdit
- Tag = 2
- Left = 267
- Top = 9
- Width = 90
- Height = 20
- TabOrder = 2
- OnChange = CoNameChange
- end
- object CoCode: TEdit
- Tag = 2
- Left = 83
- Top = 9
- Width = 90
- Height = 20
- TabOrder = 1
- OnChange = CoNameChange
- end
- object FactType: TComboBox
- Tag = 2
- Left = 424
- Top = 8
- Width = 90
- Height = 20
- Style = csDropDownList
- ItemHeight = 12
- TabOrder = 0
- OnChange = CoNameChange
- Items.Strings = (
- ''
- #26579#21378
- #21518#21152#24037#21378
- #22383#24067#21378
- #29289#27969#20844#21496
- #32433#32447#21378)
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 70
- Width = 919
- Height = 509
- Align = alClient
- TabOrder = 2
- object Tv2: TcxGridDBTableView
- OnDblClick = Tv2DblClick
- Navigator.Buttons.CustomButtons = <>
- Navigator.Buttons.Delete.Enabled = False
- Navigator.Buttons.Delete.Visible = False
- DataController.DataSource = DS_HZ
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v2Column2: TcxGridDBColumn
- Caption = #20379#24212#21830#32534#21495
- DataBinding.FieldName = 'CoCode'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 86
- end
- object v2Column6: TcxGridDBColumn
- Caption = #20379#24212#21830#21517#31216
- DataBinding.FieldName = 'CoName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 133
- end
- object v2Column15: TcxGridDBColumn
- Caption = #20379#24212#21830#31616#31216
- DataBinding.FieldName = 'CoHRName'
- HeaderAlignmentHorz = taCenter
- Width = 106
- end
- object v2Column7: TcxGridDBColumn
- Caption = #31867#22411
- DataBinding.FieldName = 'FactType'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 82
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 789
- Top = 9
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 829
- Top = 1
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 949
- Top = 225
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDB_Main
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 864
- Top = 224
- ReportData = {}
- end
- object RMDB_Main: TRMDBDataSet
- Visible = True
- Left = 928
- Top = 216
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 888
- Top = 224
- end
- object DS_HZ: TDataSource
- DataSet = CDS_HZ
- Left = 899
- Top = 235
- end
- object CDS_HZ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 872
- Top = 224
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachGYS.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachGYS.pas
deleted file mode 100644
index 667c741..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachGYS.pas
+++ /dev/null
@@ -1,143 +0,0 @@
-unit U_ZdyAttachGYS;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxGraphics, cxCustomData, cxStyles, cxTL, cxMaskEdit, DB, ADODB,
- cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin, StdCtrls,
- cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, DBClient,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, ExtCtrls,
- cxSplitter, cxGridLevel, cxClasses, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_Common,
- RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
- IdTCPClient, IdFTP, ShellAPI, IniFiles, cxCheckBox, cxCalendar, cxButtonEdit,
- cxTextEdit, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator;
-
-type
- TfrmZdyAttachGYS = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- Panel1: TPanel;
- ToolButton2: TToolButton;
- ADOQueryMain: TADOQuery;
- RM1: TRMGridReport;
- RMDB_Main: TRMDBDataSet;
- Label3: TLabel;
- CoName: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DS_HZ: TDataSource;
- CDS_HZ: TClientDataSet;
- Label1: TLabel;
- CoCode: TEdit;
- Label2: TLabel;
- FactType: TComboBox;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- v2Column2: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v2Column15: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- v2Column7: TcxGridDBColumn;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure CoNameChange(Sender: TObject);
- procedure Tv2DblClick(Sender: TObject);
- private
- { Private declarations }
- procedure InitGrid();
- public
- FStatus: string;
- end;
-
-var
- frmZdyAttachGYS: TfrmZdyAttachGYS;
-
-implementation
-
-uses
- U_DataLink, U_Fun, U_ZDYHelp;
-
-{$R *.dfm}
-
-procedure TfrmZdyAttachGYS.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered := False;
- Close;
- SQL.Clear;
- sql.Add(' select * from Company A left join Company_contact B ');
- sql.Add(' on A.CoID=B.CoID and B.IsDefault=1 where A.CoType=''Ӧ'' and A.Valid=''Y'' ');
-
-
- Open;
- end;
- SCreateCDS20(ADOQueryMain, CDS_HZ);
- SInitCDSData20(ADOQueryMain, CDS_HZ);
- finally
- ADOQueryMain.EnableControls;
- end;
- ToolButton2.Click;
-end;
-
-procedure TfrmZdyAttachGYS.FormDestroy(Sender: TObject);
-begin
- frmZdyAttachGYS := nil;
-end;
-
-procedure TfrmZdyAttachGYS.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action := caFree;
-end;
-
-procedure TfrmZdyAttachGYS.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('Ӧ', Tv2);
- Close;
-end;
-
-procedure TfrmZdyAttachGYS.FormShow(Sender: TObject);
-begin
- ReadCxGrid('Ӧ', Tv2);
- InitGrid();
-end;
-
-procedure TfrmZdyAttachGYS.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmZdyAttachGYS.ToolButton2Click(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
- SCreateCDS20(ADOQueryMain, CDS_HZ);
- SInitCDSData20(ADOQueryMain, CDS_HZ);
- end;
-end;
-
-procedure TfrmZdyAttachGYS.CoNameChange(Sender: TObject);
-begin
- ToolButton2.Click;
-end;
-
-procedure TfrmZdyAttachGYS.Tv2DblClick(Sender: TObject);
-begin
- if CDS_HZ.IsEmpty then
- exit;
- ModalResult := 1;
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachment.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachment.dfm
deleted file mode 100644
index ecb0ba5..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachment.dfm
+++ /dev/null
@@ -1,288 +0,0 @@
-object frmZdyAttachment: TfrmZdyAttachment
- Left = 249
- Top = 112
- Width = 1142
- Height = 613
- Caption = #23458#25143#36164#26009#31649#29702
- Color = clBtnFace
- Font.Charset = GB2312_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = #23435#20307
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnClose = FormClose
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 12
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 1126
- Height = 31
- ButtonHeight = 30
- ButtonWidth = 59
- Caption = 'ToolBar1'
- Color = clSkyBlue
- DisabledImages = DataLink_DDMD.ThreeImgList
- Flat = True
- Images = DataLink_DDMD.ThreeImgList
- List = True
- ParentColor = False
- ShowCaptions = True
- TabOrder = 0
- object TBRafresh: TToolButton
- Left = 0
- Top = 0
- AutoSize = True
- Caption = #21047#26032
- ImageIndex = 0
- OnClick = TBRafreshClick
- end
- object ToolButton2: TToolButton
- Left = 63
- Top = 0
- AutoSize = True
- Caption = #36807#28388
- ImageIndex = 20
- OnClick = ToolButton2Click
- end
- object TBClose: TToolButton
- Left = 126
- Top = 0
- AutoSize = True
- Caption = #20851#38381
- ImageIndex = 21
- OnClick = TBCloseClick
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 31
- Width = 1126
- Height = 39
- Align = alTop
- BevelInner = bvRaised
- BevelOuter = bvLowered
- Color = clSkyBlue
- TabOrder = 1
- object Label3: TLabel
- Left = 190
- Top = 13
- Width = 48
- Height = 12
- Caption = #23458#25143#21517#31216
- end
- object Label1: TLabel
- Left = 22
- Top = 13
- Width = 48
- Height = 12
- Caption = #23458#25143#32534#21495
- end
- object CoName: TEdit
- Tag = 2
- Left = 238
- Top = 9
- Width = 89
- Height = 20
- TabOrder = 1
- OnChange = CoNameChange
- end
- object CoCode: TEdit
- Tag = 2
- Left = 70
- Top = 9
- Width = 89
- Height = 20
- TabOrder = 0
- OnChange = CoNameChange
- end
- end
- object cxGrid2: TcxGrid
- Left = 0
- Top = 70
- Width = 1126
- Height = 504
- Align = alClient
- TabOrder = 2
- object Tv2: TcxGridDBTableView
- OnDblClick = Tv2DblClick
- Navigator.Buttons.CustomButtons = <>
- Navigator.Buttons.Delete.Enabled = False
- Navigator.Buttons.Delete.Visible = False
- DataController.DataSource = DS_HZ
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end
- item
- Kind = skSum
- end>
- DataController.Summary.SummaryGroups = <>
- OptionsBehavior.GoToNextCellOnEnter = True
- OptionsCustomize.ColumnFiltering = False
- OptionsData.Deleting = False
- OptionsData.DeletingConfirmation = False
- OptionsSelection.CellSelect = False
- OptionsView.Footer = True
- OptionsView.GroupByBox = False
- Styles.Inactive = DataLink_DDMD.SHuangSe
- Styles.IncSearch = DataLink_DDMD.SHuangSe
- Styles.Selection = DataLink_DDMD.SHuangSe
- Styles.Header = DataLink_DDMD.Default
- object v2Column2: TcxGridDBColumn
- Caption = #23458#25143#32534#21495
- DataBinding.FieldName = 'CoCode'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 86
- end
- object v2Column6: TcxGridDBColumn
- Caption = #23458#25143#21517#31216
- DataBinding.FieldName = 'CoName'
- HeaderAlignmentHorz = taCenter
- Options.Focusing = False
- Width = 127
- end
- object v2Column15: TcxGridDBColumn
- Caption = #23458#25143#31616#31216
- DataBinding.FieldName = 'CoHRName'
- HeaderAlignmentHorz = taCenter
- Width = 93
- end
- object v2Column11: TcxGridDBColumn
- Caption = #20844#21496#22320#22336
- DataBinding.FieldName = 'CoAddress'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 71
- end
- object v2Column10: TcxGridDBColumn
- Caption = #19994#21153#21592
- DataBinding.FieldName = 'Salesman'
- HeaderAlignmentHorz = taCenter
- Width = 56
- end
- object v2Column3: TcxGridDBColumn
- Caption = #30005#35805
- DataBinding.FieldName = 'Telephone'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 71
- end
- object v2Column4: TcxGridDBColumn
- Caption = #25163#26426
- DataBinding.FieldName = 'PhoneNumber'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 74
- end
- object v2Column5: TcxGridDBColumn
- Caption = #20256#30495
- DataBinding.FieldName = 'Fax'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 68
- end
- object v2Column9: TcxGridDBColumn
- Caption = #32852#31995#20154
- DataBinding.FieldName = 'Contacts'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 87
- end
- object v2Column7: TcxGridDBColumn
- Caption = #38134#34892#36134#25143
- DataBinding.FieldName = 'BankNo'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 91
- end
- object v2Column8: TcxGridDBColumn
- Caption = #24320#25143#34892
- DataBinding.FieldName = 'BankName'
- HeaderAlignmentHorz = taCenter
- Options.Editing = False
- Width = 67
- end
- object v2Column1: TcxGridDBColumn
- Caption = #22791#27880
- DataBinding.FieldName = 'Note'
- PropertiesClassName = 'TcxTextEditProperties'
- HeaderAlignmentHorz = taCenter
- Width = 165
- end
- end
- object cxGridLevel1: TcxGridLevel
- GridView = Tv2
- end
- end
- object ADOQueryTemp: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 789
- Top = 9
- end
- object ADOQueryCmd: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- Parameters = <>
- Left = 829
- Top = 1
- end
- object ADOQueryMain: TADOQuery
- Connection = DataLink_DDMD.ADOLink
- LockType = ltReadOnly
- Parameters = <>
- Left = 949
- Top = 225
- end
- object RM1: TRMGridReport
- ThreadPrepareReport = True
- InitialZoom = pzDefault
- PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
- DefaultCollate = False
- SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
- PreviewOptions.RulerUnit = rmutScreenPixels
- PreviewOptions.RulerVisible = False
- PreviewOptions.DrawBorder = False
- PreviewOptions.BorderPen.Color = clGray
- PreviewOptions.BorderPen.Style = psDash
- Dataset = RMDB_Main
- CompressLevel = rmzcFastest
- CompressThread = False
- LaterBuildEvents = True
- OnlyOwnerDataSet = False
- Left = 864
- Top = 224
- ReportData = {}
- end
- object RMDB_Main: TRMDBDataSet
- Visible = True
- Left = 928
- Top = 216
- end
- object cxGridPopupMenu2: TcxGridPopupMenu
- PopupMenus = <>
- Left = 888
- Top = 224
- end
- object DS_HZ: TDataSource
- DataSet = CDS_HZ
- Left = 899
- Top = 235
- end
- object CDS_HZ: TClientDataSet
- Aggregates = <>
- Params = <>
- Left = 872
- Top = 224
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachment.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachment.pas
deleted file mode 100644
index 866bf7b..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_ZdyAttachment.pas
+++ /dev/null
@@ -1,151 +0,0 @@
-unit U_ZdyAttachment;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, cxGraphics, cxCustomData, cxStyles, cxTL, cxMaskEdit, DB, ADODB,
- cxInplaceContainer, cxDBTL, cxControls, cxTLData, ComCtrls, ToolWin,
- StdCtrls, cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, DBClient,
- cxGridCustomTableView, cxGridTableView, cxGridDBTableView, ExtCtrls,
- cxSplitter, cxGridLevel, cxClasses, cxGridCustomView, cxGrid,
- cxGridCustomPopupMenu, cxGridPopupMenu, RM_Dataset, RM_System, RM_Common,
- RM_Class, RM_GridReport, IdBaseComponent, IdComponent, IdTCPConnection,
- IdTCPClient, IdFTP,ShellAPI,IniFiles, cxCheckBox, cxCalendar,
- cxButtonEdit, cxTextEdit, cxLookAndFeels, cxLookAndFeelPainters,
- cxNavigator;
-
-type
- TfrmZdyAttachment = class(TForm)
- ToolBar1: TToolBar;
- TBRafresh: TToolButton;
- TBClose: TToolButton;
- ADOQueryTemp: TADOQuery;
- ADOQueryCmd: TADOQuery;
- Panel1: TPanel;
- ToolButton2: TToolButton;
- ADOQueryMain: TADOQuery;
- RM1: TRMGridReport;
- RMDB_Main: TRMDBDataSet;
- Label3: TLabel;
- CoName: TEdit;
- cxGridPopupMenu2: TcxGridPopupMenu;
- DS_HZ: TDataSource;
- CDS_HZ: TClientDataSet;
- Label1: TLabel;
- CoCode: TEdit;
- cxGrid2: TcxGrid;
- Tv2: TcxGridDBTableView;
- v2Column2: TcxGridDBColumn;
- v2Column6: TcxGridDBColumn;
- v2Column15: TcxGridDBColumn;
- v2Column11: TcxGridDBColumn;
- v2Column10: TcxGridDBColumn;
- v2Column3: TcxGridDBColumn;
- v2Column4: TcxGridDBColumn;
- v2Column5: TcxGridDBColumn;
- v2Column9: TcxGridDBColumn;
- v2Column7: TcxGridDBColumn;
- v2Column8: TcxGridDBColumn;
- v2Column1: TcxGridDBColumn;
- cxGridLevel1: TcxGridLevel;
- procedure FormDestroy(Sender: TObject);
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure TBCloseClick(Sender: TObject);
- procedure FormShow(Sender: TObject);
- procedure TBRafreshClick(Sender: TObject);
- procedure ToolButton2Click(Sender: TObject);
- procedure CoNameChange(Sender: TObject);
- procedure Tv2DblClick(Sender: TObject);
- private
- { Private declarations }
- procedure InitGrid();
-
- public
- canshu1:string;
- end;
-
-var
- frmZdyAttachment: TfrmZdyAttachment;
-
-implementation
-uses
- U_DataLink,U_RTFun,U_RTZDYHelp;
-
-{$R *.dfm}
-
-
-
-procedure TfrmZdyAttachment.InitGrid();
-begin
- try
- ADOQueryMain.DisableControls;
- with ADOQueryMain do
- begin
- Filtered:=False;
- Close;
- SQL.Clear;
- sql.Add(' select * from Company A left join Company_contact B ');
- sql.Add(' on A.CoID=B.CoID and B.IsDefault=1 where A.CoType=''ͻ'' and A.Valid=''Y'' ' );
- if trim(canshu1)='ҵԱ' then
- sql.Add(' and A.Salesman='+quotedstr(trim(dname)) );
- Open;
- end;
- SCreateCDS20(ADOQueryMain,CDS_HZ);
- SInitCDSData20(ADOQueryMain,CDS_HZ);
- finally
- ADOQueryMain.EnableControls;
- end;
-end;
-
-
-procedure TfrmZdyAttachment.FormDestroy(Sender: TObject);
-begin
- frmZdyAttachment:=nil;
-end;
-
-procedure TfrmZdyAttachment.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- Action:=caFree;
-end;
-
-procedure TfrmZdyAttachment.TBCloseClick(Sender: TObject);
-begin
- WriteCxGrid('ͻ',Tv2,'ͻԶ');
- Close;
-end;
-procedure TfrmZdyAttachment.FormShow(Sender: TObject);
-begin
- ReadCxGrid('ͻ',Tv2,'ͻԶ');
- InitGrid();
-end;
-
-procedure TfrmZdyAttachment.TBRafreshClick(Sender: TObject);
-begin
- InitGrid();
-end;
-
-procedure TfrmZdyAttachment.ToolButton2Click(Sender: TObject);
-begin
- if ADOQueryMain.Active then
- begin
- SDofilter(ADOQueryMain,SGetFilters(Panel1,1,2));
- SCreateCDS20(ADOQueryMain,CDS_HZ);
- SInitCDSData20(ADOQueryMain,CDS_HZ);
- end;
-end;
-
-procedure TfrmZdyAttachment.CoNameChange(Sender: TObject);
-begin
- ToolButton2.Click;
-end;
-
-
-procedure TfrmZdyAttachment.Tv2DblClick(Sender: TObject);
-begin
- ModalResult:=1;
-end;
-
-end.
-
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_iniParam.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_iniParam.pas
deleted file mode 100644
index 906659f..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_iniParam.pas
+++ /dev/null
@@ -1,64 +0,0 @@
-
-unit U_iniParam;
-
-interface
-uses
- IniFiles,SysUtils;
-var
- Filename:string; //ļ
- iParam2:integer;
- bParam1:Boolean;
- bParam2:Boolean;
- SCXFlag:String; // ݴ˱־ȡǰ ܰĸ 1,2
- SCXCount:String; //̨
- PortNoStr:string;//˿ں
- DllName:string;//˿Dllļ
- DllName10:string;//˿Dllļ
- Function IsINIFile():Boolean; //жInIļǷ
- procedure ReadINIFile();
- procedure WriteINIFile();
-implementation
-///////////////////////////////////////////////////////////////////
- //ȡiniļò
- //
-////////////////////////////////////////////////////////////////////
-procedure ReadINIFile();
-var
- programIni:Tinifile; //ļ
-begin
- FileName:=ExtractFilePath(Paramstr(0))+'File.INI';
- programIni:=Tinifile.create(FileName);
- SCXFlag:=programIni.ReadString('','̨־','1');
- DllName:=programIni.ReadString('','Dllļ','JZCRS323C.DLL');
- DllName10:=programIni.ReadString('','ӳDllļ','JZCRS323C.DLL');
- programIni.Free;
-end;
-
-//////////////////////////////////////////////////////////////////
- //дϢINIļ
- //
-//////////////////////////////////////////////////////////////////
-procedure WriteINIFile();
-var
- programIni:Tinifile; //ļ
-begin
- FileName:=ExtractFilePath(Paramstr(0))+'File.INI';
- programIni:=Tinifile.create(FileName);
- programIni.WriteString('','̨־',SCXFlag);
- programIni.WriteString('','Dllļ',DllName);
- programIni.WriteString('','ӳDllļ',DllName10);
- programIni.Free;
-end;
-//////////////////////////////////////////////////////////////////
- //жInIļǷ
-//////////////////////////////////////////////////////////////////
- Function IsINIFile():Boolean;
- begin
- FileName:=ExtractFilePath(Paramstr(0))+'File.INI';
- if FileExists(FileName) then
- Result:=true
- else
- Result:=false;
- end;
-
-end.
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_testdll.dfm b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_testdll.dfm
deleted file mode 100644
index 6b709b8..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_testdll.dfm
+++ /dev/null
@@ -1,221 +0,0 @@
-object Form1: TForm1
- Left = 203
- Top = 121
- Width = 791
- Height = 554
- Caption = 'Form1'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsMDIForm
- Menu = MainMenu1
- OldCreateOrder = False
- WindowState = wsMaximized
- OnClose = FormClose
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object ToolBar1: TToolBar
- Left = 0
- Top = 0
- Width = 775
- Height = 25
- ButtonWidth = 57
- Caption = 'ToolBar1'
- Flat = True
- Images = ImageList1
- TabOrder = 0
- object Edit1: TEdit
- Left = 0
- Top = 0
- Width = 81
- Height = 22
- TabOrder = 0
- Text = '1'
- end
- object ToolButton1: TToolButton
- Left = 81
- Top = 0
- Caption = #20851#38381
- ImageIndex = 0
- OnClick = ToolButton1Click
- end
- object Label1: TLabel
- Left = 138
- Top = 0
- Width = 79
- Height = 22
- Caption = ' DllName'#65306
- end
- object DllName: TEdit
- Left = 217
- Top = 0
- Width = 135
- Height = 22
- TabOrder = 1
- end
- end
- object MainMenu1: TMainMenu
- Left = 232
- Top = 40
- object test1: TMenuItem
- Caption = 'test'
- OnClick = test1Click
- end
- end
- object ImageList1: TImageList
- Left = 320
- Top = 56
- Bitmap = {
- 494C010101000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
- 0000000000003600000028000000400000001000000001002000000000000010
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000EFEFEF000000
- 0000EFEFEF00EFEFEF000000000000000000EFEFEF0000000000000000000000
- 0000EFEFEF00EFEFEF0000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000EFEFEF0000000000EFEFEF00EFEFEF0000000000EFEFEF00000000008080
- 00008080000000000000C0C0C000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000EFEFEF00EFEFEF000000
- 0000EFEFEF00EFEFEF000000000000000000C0C0C00000000000000000008080
- 00008080000080800000EFEFEF00EFEFEF000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000EFEFEF0000000000000000000000000000000000000000008080
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000EFEFEF0000000000808080008080800080808000000000008080
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000008080000000000000808080008080800080808000000000008080
- 0000000000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000EFEFEF00EFEF
- EF0000000000FFFF000080800000000000008080800080808000000000000000
- 0000000000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000FFFF0000FFFF0000808000000000000080808000000000008080
- 0000000000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000808000008080
- 000080800000FFFF0000FFFF0000FFFF00000000000080808000000000008080
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000FFFF0000FFFF
- 0000FFFF0000FFFF000000000000FFFF00000000000080808000000000008080
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000FFFF0000FFFF0000FFFF00000000000080808000000000008080
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000808000000000000080808000808080008080800080808000FFFF
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000808080008080800080808000808080000000
- 0000808000008080000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000424D3E000000000000003E000000
- 2800000040000000100000000100010000000000800000000000000000000000
- 000000000000000000000000FFFFFF00FFFF000000000000D343000000000000
- F4810000000000009340000000000000F801000000000000F001000000000000
- F001000000000000C001000000000000C001000000000000C001000000000000
- C201000000000000C001000000000000F001000000000000F001000000000000
- FC03000000000000FFFF00000000000000000000000000000000000000000000
- 000000000000}
- end
- object ADOConnection1: TADOConnection
- ConnectionString =
- 'Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ' +
- 'ID=sa;Initial Catalog=rzdata;Data Source=6GMFFMYKYMJDZW7'
- LoginPrompt = False
- Provider = 'SQLOLEDB.1'
- Left = 408
- Top = 64
- end
-end
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_testdll.pas b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_testdll.pas
deleted file mode 100644
index 76fe321..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/U_testdll.pas
+++ /dev/null
@@ -1,106 +0,0 @@
-unit U_testdll;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, ExtCtrls, StdCtrls, Menus, ToolWin, ComCtrls, ImgList, DB, ADODB;
-
-type
- TForm1 = class(TForm)
- MainMenu1: TMainMenu;
- test1: TMenuItem;
- ToolBar1: TToolBar;
- Edit1: TEdit;
- ToolButton1: TToolButton;
- ImageList1: TImageList;
- ADOConnection1: TADOConnection;
- DllName: TEdit;
- Label1: TLabel;
- procedure FormClose(Sender: TObject; var Action: TCloseAction);
- procedure test1Click(Sender: TObject);
- procedure ToolButton1Click(Sender: TObject);
- procedure FormResize(Sender: TObject);
- private
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- Form1: TForm1;
- newh:hwnd;
-
-implementation
-
-{$R *.dfm}
-
-procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
-begin
- sendmessage(newh,1034,4,0);
- action:=cafree;
-end;
-
-procedure TForm1.test1Click(Sender: TObject);
-type
- TMyFunc = function(App:Tapplication; FormH:hwnd; FormID:integer;
- Language: integer; WinStyle:integer;
- GCode: Pchar; GName: Pchar; DataBase:Pchar;Title:PChar;
- Parameters1:PChar;Parameters2:PChar;Parameters3:PChar;Parameters4:PChar;
- Parameters5:PChar;Parameters6:PChar;Parameters7:PChar;Parameters8:PChar;
- Parameters9:PChar;Parameters10:PChar;DataBaseStr:PChar):hwnd;stdcall;
-var
- Tf: TMyFunc;
- Tp: TFarProc;
- Th:Thandle;
-begin
- //̬
- //newh:=getForm(Application,1,ADOConnection1,PChar('sa'),PChar('dsa'));
-
- //̬
- // showMessage(intTostr(application.Handle));
- Th := LoadLibrary('BaoGuan.dll');
- if Th > 0 then
- begin
- try
- Tp := GetProcAddress(Th, 'GetDllForm');
- if Tp <> nil then
- begin
- Tf := TMyFunc(Tp);
- newh:=Tf(Application,0,strToint(edit1.text),0,0,
- PChar('ygcode'),
- PChar('ygname'),
- PChar('datebase'),
- PChar('title'),
- PChar(''),
- PChar(''),
- '','','','','','','','',''
- );
- end
- else
- begin
- ShowMessage('ӡִд');
- end;
- finally
- // FreeLibrary();
- end;
- end
- else
- begin
- ShowMessage('Ҳ'+Trim(DllName.Text));
- end;
-
-end;
-
-procedure TForm1.ToolButton1Click(Sender: TObject);
-begin
- close;
-end;
-
-procedure TForm1.FormResize(Sender: TObject);
-begin
- sendmessage(newh,1034,1,0);
-end;
-
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/consvr.ini b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/consvr.ini
deleted file mode 100644
index 3a03c34..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/consvr.ini
+++ /dev/null
@@ -1,2 +0,0 @@
-[SERVER]
-SERVER=192.168.88.254
\ No newline at end of file
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.cfg b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.cfg
deleted file mode 100644
index e9c1cc1..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.cfg
+++ /dev/null
@@ -1,38 +0,0 @@
--$A8
--$B-
--$C+
--$D+
--$E-
--$F-
--$G+
--$H+
--$I+
--$J-
--$K-
--$L+
--$M-
--$N+
--$O+
--$P+
--$Q-
--$R-
--$S-
--$T-
--$U-
--$V+
--$W-
--$X+
--$YD
--$Z1
--cg
--AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
--H+
--W+
--M
--$M16384,1048576
--K$00400000
--LE"c:\program files (x86)\borland\delphi7\Projects\Bpl"
--LN"c:\program files (x86)\borland\delphi7\Projects\Bpl"
--w-UNSAFE_TYPE
--w-UNSAFE_CODE
--w-UNSAFE_CAST
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.dof b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.dof
deleted file mode 100644
index 2220190..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.dof
+++ /dev/null
@@ -1,136 +0,0 @@
-[FileVersion]
-Version=7.0
-[Compiler]
-A=8
-B=0
-C=1
-D=1
-E=0
-F=0
-G=1
-H=1
-I=1
-J=0
-K=0
-L=1
-M=0
-N=1
-O=1
-P=1
-Q=0
-R=0
-S=0
-T=0
-U=0
-V=1
-W=0
-X=1
-Y=1
-Z=1
-ShowHints=1
-ShowWarnings=1
-UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-NamespacePrefix=
-SymbolDeprecated=1
-SymbolLibrary=1
-SymbolPlatform=1
-UnitLibrary=1
-UnitPlatform=1
-UnitDeprecated=1
-HResultCompat=1
-HidingMember=1
-HiddenVirtual=1
-Garbage=1
-BoundsError=1
-ZeroNilCompat=1
-StringConstTruncated=1
-ForLoopVarVarPar=1
-TypedConstVarPar=1
-AsgToTypedConst=1
-CaseLabelRange=1
-ForVariable=1
-ConstructingAbstract=1
-ComparisonFalse=1
-ComparisonTrue=1
-ComparingSignedUnsigned=1
-CombiningSignedUnsigned=1
-UnsupportedConstruct=1
-FileOpen=1
-FileOpenUnitSrc=1
-BadGlobalSymbol=1
-DuplicateConstructorDestructor=1
-InvalidDirective=1
-PackageNoLink=1
-PackageThreadVar=1
-ImplicitImport=1
-HPPEMITIgnored=1
-NoRetVal=1
-UseBeforeDef=1
-ForLoopVarUndef=1
-UnitNameMismatch=1
-NoCFGFileFound=1
-MessageDirective=1
-ImplicitVariants=1
-UnicodeToLocale=1
-LocaleToUnicode=1
-ImagebaseMultiple=1
-SuspiciousTypecast=1
-PrivatePropAccessor=1
-UnsafeType=0
-UnsafeCode=0
-UnsafeCast=0
-[Linker]
-MapFile=0
-OutputObjs=0
-ConsoleApp=1
-DebugInfo=0
-RemoteSymbols=0
-MinStackSize=16384
-MaxStackSize=1048576
-ImageBase=4194304
-ExeDescription=
-[Directories]
-OutputDir=
-UnitOutputDir=
-PackageDLLOutputDir=
-PackageDCPOutputDir=
-SearchPath=
-Packages=
-Conditionals=
-DebugSourceDirs=
-UsePackages=0
-[Parameters]
-RunParams=
-HostApplication=D:\selfware_83398\selfware\ֿ\Ŀ\Ʒ\뵥(BaoGuan.dll)\testDll.exe
-Launcher=
-UseLauncher=0
-DebugCWD=
-[Language]
-ActiveLang=
-ProjectLang=
-RootDir=
-[Version Info]
-IncludeVerInfo=0
-AutoIncBuild=0
-MajorVer=1
-MinorVer=0
-Release=0
-Build=0
-Debug=0
-PreRelease=0
-Special=0
-Private=0
-DLL=0
-Locale=2052
-CodePage=936
-[Version Info Keys]
-CompanyName=
-FileDescription=
-FileVersion=1.0.0.0
-InternalName=
-LegalCopyright=
-LegalTrademarks=
-OriginalFilename=
-ProductName=
-ProductVersion=1.0.0.0
-Comments=
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.dpr b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.dpr
deleted file mode 100644
index 4be4b8a..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.dpr
+++ /dev/null
@@ -1,14 +0,0 @@
-program testDll;
-
-uses
- Forms,
- U_testdll in 'U_testdll.pas' {Form1};
-
-{$R *.res}
-
-begin
- Application.Initialize;
- Application.CreateForm(TForm1, Form1);
- Application.Run;
-end.
-
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.res b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.res
deleted file mode 100644
index 2d6f24c..0000000
Binary files a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDll.res and /dev/null differ
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.cfg b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.cfg
deleted file mode 100644
index e9c1cc1..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.cfg
+++ /dev/null
@@ -1,38 +0,0 @@
--$A8
--$B-
--$C+
--$D+
--$E-
--$F-
--$G+
--$H+
--$I+
--$J-
--$K-
--$L+
--$M-
--$N+
--$O+
--$P+
--$Q-
--$R-
--$S-
--$T-
--$U-
--$V+
--$W-
--$X+
--$YD
--$Z1
--cg
--AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
--H+
--W+
--M
--$M16384,1048576
--K$00400000
--LE"c:\program files (x86)\borland\delphi7\Projects\Bpl"
--LN"c:\program files (x86)\borland\delphi7\Projects\Bpl"
--w-UNSAFE_TYPE
--w-UNSAFE_CODE
--w-UNSAFE_CAST
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.dof b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.dof
deleted file mode 100644
index 9b5b586..0000000
--- a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.dof
+++ /dev/null
@@ -1,136 +0,0 @@
-[FileVersion]
-Version=7.0
-[Compiler]
-A=8
-B=0
-C=1
-D=1
-E=0
-F=0
-G=1
-H=1
-I=1
-J=0
-K=0
-L=1
-M=0
-N=1
-O=1
-P=1
-Q=0
-R=0
-S=0
-T=0
-U=0
-V=1
-W=0
-X=1
-Y=1
-Z=1
-ShowHints=1
-ShowWarnings=1
-UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-NamespacePrefix=
-SymbolDeprecated=1
-SymbolLibrary=1
-SymbolPlatform=1
-UnitLibrary=1
-UnitPlatform=1
-UnitDeprecated=1
-HResultCompat=1
-HidingMember=1
-HiddenVirtual=1
-Garbage=1
-BoundsError=1
-ZeroNilCompat=1
-StringConstTruncated=1
-ForLoopVarVarPar=1
-TypedConstVarPar=1
-AsgToTypedConst=1
-CaseLabelRange=1
-ForVariable=1
-ConstructingAbstract=1
-ComparisonFalse=1
-ComparisonTrue=1
-ComparingSignedUnsigned=1
-CombiningSignedUnsigned=1
-UnsupportedConstruct=1
-FileOpen=1
-FileOpenUnitSrc=1
-BadGlobalSymbol=1
-DuplicateConstructorDestructor=1
-InvalidDirective=1
-PackageNoLink=1
-PackageThreadVar=1
-ImplicitImport=1
-HPPEMITIgnored=1
-NoRetVal=1
-UseBeforeDef=1
-ForLoopVarUndef=1
-UnitNameMismatch=1
-NoCFGFileFound=1
-MessageDirective=1
-ImplicitVariants=1
-UnicodeToLocale=1
-LocaleToUnicode=1
-ImagebaseMultiple=1
-SuspiciousTypecast=1
-PrivatePropAccessor=1
-UnsafeType=0
-UnsafeCode=0
-UnsafeCast=0
-[Linker]
-MapFile=0
-OutputObjs=0
-ConsoleApp=1
-DebugInfo=0
-RemoteSymbols=0
-MinStackSize=16384
-MaxStackSize=1048576
-ImageBase=4194304
-ExeDescription=
-[Directories]
-OutputDir=
-UnitOutputDir=
-PackageDLLOutputDir=
-PackageDCPOutputDir=
-SearchPath=
-Packages=
-Conditionals=
-DebugSourceDirs=
-UsePackages=0
-[Parameters]
-RunParams=
-HostApplication=D:\selfware_83398\selfware\ֿ\Ŀ\self\֯(CYZZ.dll)\testDll.exe
-Launcher=
-UseLauncher=0
-DebugCWD=
-[Language]
-ActiveLang=
-ProjectLang=
-RootDir=
-[Version Info]
-IncludeVerInfo=0
-AutoIncBuild=0
-MajorVer=1
-MinorVer=0
-Release=0
-Build=0
-Debug=0
-PreRelease=0
-Special=0
-Private=0
-DLL=0
-Locale=2052
-CodePage=936
-[Version Info Keys]
-CompanyName=
-FileDescription=
-FileVersion=1.0.0.0
-InternalName=
-LegalCopyright=
-LegalTrademarks=
-OriginalFilename=
-ProductName=
-ProductVersion=1.0.0.0
-Comments=
diff --git a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.res b/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.res
deleted file mode 100644
index 2d6f24c..0000000
Binary files a/报关管理(BaoGuan.dll)/报关管理(BaoGuan.dll)/testDllDJ.res and /dev/null differ