hanxuntao
/
DONGSHENG6
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
master
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'master'
${ noResults }
DONGSHENG6/海运业务/u_op_module.~pas

439 lines
18 KiB
Plaintext
Raw Permalink Blame History Unescape Escape

This file contains ambiguous Unicode characters!

This file contains ambiguous Unicode characters that may be confused with others in your current locale. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to highlight these characters.

unit u_op_module;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, dxExEdtr, dxCntner, dxTL, dxDBCtrl, dxDBGrid, bsSkinCtrls, DB,
ADODB, ExtCtrls, DBCtrls, dxDBTLCl, dxGrClms, StdCtrls, RxLookup,
wwdblook, bsdbctrls, Mask, wwdbedit, Wwdotdot, Wwdbcomb;
type
Tfrm_op_module = class(TForm)
dxDBGrid1: TdxDBGrid;
bsSkinPanel1: TbsSkinPanel;
bsSkinButton8: TbsSkinButton;
bsSkinButton2: TbsSkinButton;
bsSkinButton4: TbsSkinButton;
bsSkinButton3: TbsSkinButton;
t_op_module: TADOQuery;
ds_op_module1: TDataSource;
dxDBGrid1Column1: TdxDBGridColumn;
dxDBGrid1Column2: TdxDBGridColumn;
dxDBGrid1Column3: TdxDBGridColumn;
Label23: TLabel;
DBMemo3: TDBMemo;
DBMemo4: TDBMemo;
Label24: TLabel;
Label29: TLabel;
DBMemo5: TDBMemo;
Label163: TLabel;
DBMemo38: TDBMemo;
Label164: TLabel;
DBMemo39: TDBMemo;
Label165: TLabel;
DBMemo40: TDBMemo;
Label166: TLabel;
DBMemo41: TDBMemo;
Label167: TLabel;
DBMemo42: TDBMemo;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label12: TLabel;
Label9: TLabel;
RxDBLookupCombo9: TRxDBLookupCombo;
RxDBLookupCombo6: TRxDBLookupCombo;
wwDBLookupCombo3: TwwDBLookupCombo;
Label7: TLabel;
Label124: TLabel;
wwDBLookupCombo52: TwwDBLookupCombo;
t_op_moduleDSDesigner: TAutoIncField;
t_op_moduleDSDesigner2: TStringField;
t_op_moduleDSDesigner3: TStringField;
t_op_moduleDSDesigner4: TDateTimeField;
t_op_moduleDSDesigner5: TStringField;
t_op_moduleDSDesigner6: TStringField;
t_op_moduleDSDesigner7: TStringField;
t_op_moduleDSDesigner8: TStringField;
t_op_moduleDSDesigner9: TStringField;
t_op_moduleDSDesigner10: TStringField;
t_op_moduleDSDesigner11: TStringField;
t_op_moduleDSDesigner12: TStringField;
t_op_moduleDSDesigner13: TStringField;
t_op_moduleDSDesigner14: TStringField;
t_op_moduleDSDesigner15: TStringField;
t_op_moduleDSDesigner16: TStringField;
t_op_moduleDSDesigner17: TStringField;
t_op_moduleDSDesigner18: TStringField;
t_op_moduleDSDesigner19: TStringField;
t_op_moduleDSDesigner20: TStringField;
t_op_moduleDSDesigner21: TStringField;
t_op_moduleDSDesigner22: TStringField;
t_op_moduleDSDesigner23: TStringField;
t_op_moduleDSDesigner24: TStringField;
t_op_moduleDSDesigner25: TStringField;
t_op_moduleDSDesigner26: TStringField;
t_op_moduleDSDesigner27: TStringField;
t_op_moduleDSDesigner28: TStringField;
t_op_moduleDSDesigner29: TStringField;
t_op_moduleDSDesigner30: TStringField;
t_op_moduleDSDesigner31: TStringField;
t_op_moduleDSDesigner32: TStringField;
t_op_moduleDSDesigner33: TStringField;
t_op_moduleDSDesigner34: TStringField;
t_op_moduleDSDesigner35: TStringField;
t_op_moduleDSDesigner36: TStringField;
t_op_moduleDSDesigner37: TIntegerField;
t_op_moduleDSDesigner38: TStringField;
t_op_moduleDSDesigner39: TBCDField;
t_op_moduleDSDesigner40: TBCDField;
t_op_moduleDSDesigner41: TStringField;
t_op_moduleDSDesigner42: TStringField;
t_op_moduleDSDesigner43: TStringField;
t_op_moduleDSDesigner44: TStringField;
t_op_moduleDSDesigner45: TStringField;
t_op_moduleDSDesigner46: TStringField;
t_op_moduleDSDesigner47: TStringField;
t_op_moduleDSDesigner48: TBooleanField;
t_op_moduleDSDesigner49: TBooleanField;
t_op_moduleDSDesigner50: TBooleanField;
t_op_moduleDSDesigner51: TBooleanField;
t_op_moduleDSDesigner52: TBooleanField;
t_op_moduleDSDesigner53: TStringField;
Label30: TLabel;
Label41: TLabel;
RxDBLookupCombo31: TRxDBLookupCombo;
Label111: TLabel;
wwDBComboBox16: TwwDBComboBox;
bsSkinDBCheckRadioBox19: TbsSkinDBCheckRadioBox;
Label35: TLabel;
RxDBLookupCombo28: TRxDBLookupCombo;
RxDBLookupCombo15: TRxDBLookupCombo;
strngfld_op_moduleDSDesigner54: TStringField;
strngfld_op_moduleDSDesigner55: TStringField;
blnfld_op_moduleDSDesigner56: TBooleanField;
Label4: TLabel;
DBMemo1: TDBMemo;
Label5: TLabel;
DBEdit1: TDBEdit;
procedure FormShow(Sender: TObject);
procedure t_op_moduleAfterInsert(DataSet: TDataSet);
procedure bsSkinButton4Click(Sender: TObject);
procedure bsSkinButton2Click(Sender: TObject);
procedure t_op_moduleBeforePost(DataSet: TDataSet);
procedure bsSkinButton3Click(Sender: TObject);
procedure bsSkinButton8Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
frm_op_module: Tfrm_op_module;
implementation
uses u_main, u_data_share, my_sys_function, dmAccu,u_op_seae,
u_op_seae_assistant;
{$R *.dfm}
procedure Tfrm_op_module.FormShow(Sender: TObject);
begin
t_op_module.Open;
end;
procedure Tfrm_op_module.t_op_moduleAfterInsert(DataSet: TDataSet);
begin
t_op_module['¼<><C2BC><EFBFBD><EFBFBD>']:=employee;
t_op_module['¼<><C2BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=date;
end;
procedure Tfrm_op_module.bsSkinButton4Click(Sender: TObject);
begin
t_op_module.Delete;
end;
procedure Tfrm_op_module.bsSkinButton2Click(Sender: TObject);
begin
if t_op_module.State in [dsEdit,dsinsert] then
t_op_module.Post;
end;
procedure Tfrm_op_module.t_op_moduleBeforePost(DataSet: TDataSet);
begin
table_before_post(t_op_module,'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>');
end;
procedure Tfrm_op_module.bsSkinButton3Click(Sender: TObject);
begin
if t_op_module.State in [dsEdit,dsinsert] then
t_op_module.Cancel;
end;
procedure Tfrm_op_module.bsSkinButton8Click(Sender: TObject);
begin
if frm_op_seae.bsSkinPageControl1.ActivePage=frm_op_seae.bsSkinTabSheet1 then
begin
with frm_op_seae.t_op_seae2 do
begin
DataSet.Edit;
if trim(t_op_module.FieldByName('ί<>е<EFBFBD>λ').AsString)<>'' then
DataSet['ί<>е<EFBFBD>λ']:=t_op_module.FieldByName('ί<>е<EFBFBD>λ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB><EFBFBD>').AsString)<>'' then
DataSet['<27>ջ<EFBFBD><D5BB><EFBFBD>']:=t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('֪ͨ<CDA8><D6AA>').AsString)<>'' then
DataSet['֪ͨ<CDA8><D6AA>']:=t_op_module.FieldByName('֪ͨ<CDA8><D6AA>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>˴<EFBFBD><CBB4><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD>˴<EFBFBD><CBB4><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>˴<EFBFBD><CBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB>˴<EFBFBD><CBB4><EFBFBD>').AsString)<>'' then
DataSet['<27>ջ<EFBFBD><D5BB>˴<EFBFBD><CBB4><EFBFBD>']:=t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB>˴<EFBFBD><CBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('֪ͨ<CDA8>˴<EFBFBD><CBB4><EFBFBD>').AsString)<>'' then
DataSet['֪ͨ<CDA8>˴<EFBFBD><CBB4><EFBFBD>']:=t_op_module.FieldByName('֪ͨ<CDA8>˴<EFBFBD><CBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><>վ').AsString)<>'' then
DataSet['<27><>վ']:=t_op_module.FieldByName('<27><>վ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD>˸<EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD>˸<EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD>˸<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('װ<><D7B0><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['װ<><D7B0><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('װ<><D7B0><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('װ<>۴<EFBFBD><DBB4><EFBFBD>').AsString)<>'' then
DataSet['װ<>۴<EFBFBD><DBB4><EFBFBD>']:=t_op_module.FieldByName('װ<>۴<EFBFBD><DBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['ж<><D0B6><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['ж<><D0B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('Ŀ<>ĵ<EFBFBD>').AsString)<>'' then
DataSet['Ŀ<>ĵ<EFBFBD>']:=t_op_module.FieldByName('Ŀ<>ĵ<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27>ᵥ<EFBFBD><E1B5A5><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27>ᵥ<EFBFBD><E1B5A5><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27>ᵥ<EFBFBD><E1B5A5><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').AsString)<>'' then
DataSet['ǩ<><C7A9><EFBFBD><EFBFBD>ʽ']:=t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').AsString;
if trim(t_op_module.FieldByName('ǩ<><C7A9><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['ǩ<><C7A9><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('ǩ<><C7A9><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('Ԥ<><D4A4><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['Ԥ<><D4A4><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('Ԥ<><D4A4><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><>ͷ').AsString)<>'' then
DataSet['<27><>ͷ']:=t_op_module.FieldByName('<27><>ͷ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>װ').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>װ']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>װ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsInteger<>0 then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsInteger;
if t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat<>0 then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat;
if t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat<>0 then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>˾').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD>˾']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>˾').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˾').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˾']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˾').AsString;
if trim(t_op_module.FieldByName('<27><>ע').AsString)<>'' then
DataSet['<27><>ע']:=t_op_module.FieldByName('<27><>ע').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD>˳<EFBFBD><CBB3><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD>˳<EFBFBD><CBB3><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD>˳<EFBFBD><CBB3><EFBFBD>').AsString;
DataSet['<27><><EFBFBD>ط<EFBFBD><D8B7><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD>ط<EFBFBD><D8B7><EFBFBD>').Value;
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').Value;
DataSet['Ѭ<><D1AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('Ѭ<><D1AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').Value;
DataSet['<27>ϳ<EFBFBD><CFB3><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27>ϳ<EFBFBD><CFB3><EFBFBD><EFBFBD><EFBFBD>').Value;
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').Value;
if trim(t_op_module.FieldByName('<27><><EFBFBD>ѷ<EFBFBD>ʽ').AsString)<>'' then
DataSet['<27><><EFBFBD>ѷ<EFBFBD>ʽ']:=t_op_module.FieldByName('<27><><EFBFBD>ѷ<EFBFBD>ʽ').Value;
if trim(t_op_module.FieldByName('ҵ<><D2B5><EFBFBD><EFBFBD>Դ').AsString)<>'' then
DataSet['ҵ<><D2B5><EFBFBD><EFBFBD>Դ']:=t_op_module.FieldByName('ҵ<><D2B5><EFBFBD><EFBFBD>Դ').Value;
if trim(t_op_module.FieldByName('<27><>վ<EFBFBD><D5BE>ϵ<EFBFBD><CFB5>').AsString)<>'' then
DataSet['<27><>վ<EFBFBD><D5BE>ϵ<EFBFBD><CFB5>']:=t_op_module.FieldByName('<27><>վ<EFBFBD><D5BE>ϵ<EFBFBD><CFB5>').Value;
if trim(t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').AsString)<>'' then
DataSet['ǩ<><C7A9><EFBFBD><EFBFBD>ʽ']:=t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').Value;
DataSet['<27>˷<EFBFBD>']:=t_op_module.FieldByName('<27>˷<EFBFBD>').Value;
DataSet.Post;
end;
end
else
if frm_op_seae.bsSkinPageControl1.ActivePage=frm_op_seae.bsSkinTabSheet6 then
begin
with frm_op_seae_assistant.t_op_seae_assistant1 do
begin
DataSet.Edit;
if trim(t_op_module.FieldByName('ί<>е<EFBFBD>λ').AsString)<>'' then
DataSet['ί<>е<EFBFBD>λ']:=t_op_module.FieldByName('ί<>е<EFBFBD>λ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB><EFBFBD>').AsString)<>'' then
DataSet['<27>ջ<EFBFBD><D5BB><EFBFBD>']:=t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('֪ͨ<CDA8><D6AA>').AsString)<>'' then
DataSet['֪ͨ<CDA8><D6AA>']:=t_op_module.FieldByName('֪ͨ<CDA8><D6AA>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>˴<EFBFBD><CBB4><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD>˴<EFBFBD><CBB4><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>˴<EFBFBD><CBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB>˴<EFBFBD><CBB4><EFBFBD>').AsString)<>'' then
DataSet['<27>ջ<EFBFBD><D5BB>˴<EFBFBD><CBB4><EFBFBD>']:=t_op_module.FieldByName('<27>ջ<EFBFBD><D5BB>˴<EFBFBD><CBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('֪ͨ<CDA8>˴<EFBFBD><CBB4><EFBFBD>').AsString)<>'' then
DataSet['֪ͨ<CDA8>˴<EFBFBD><CBB4><EFBFBD>']:=t_op_module.FieldByName('֪ͨ<CDA8>˴<EFBFBD><CBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><>վ').AsString)<>'' then
DataSet['<27><>վ']:=t_op_module.FieldByName('<27><>վ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD>˸<EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD>˸<EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD>˸<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('װ<><D7B0><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['װ<><D7B0><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('װ<><D7B0><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('װ<>۴<EFBFBD><DBB4><EFBFBD>').AsString)<>'' then
DataSet['װ<>۴<EFBFBD><DBB4><EFBFBD>']:=t_op_module.FieldByName('װ<>۴<EFBFBD><DBB4><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['ж<><D0B6><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['ж<><D0B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('ж<><D0B6><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('Ŀ<>ĵ<EFBFBD>').AsString)<>'' then
DataSet['Ŀ<>ĵ<EFBFBD>']:=t_op_module.FieldByName('Ŀ<>ĵ<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27>ᵥ<EFBFBD><E1B5A5><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27>ᵥ<EFBFBD><E1B5A5><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27>ᵥ<EFBFBD><E1B5A5><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').AsString)<>'' then
DataSet['ǩ<><C7A9><EFBFBD><EFBFBD>ʽ']:=t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').AsString;
if trim(t_op_module.FieldByName('ǩ<><C7A9><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['ǩ<><C7A9><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('ǩ<><C7A9><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('Ԥ<><D4A4><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['Ԥ<><D4A4><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('Ԥ<><D4A4><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD>ص<EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><>ͷ').AsString)<>'' then
DataSet['<27><>ͷ']:=t_op_module.FieldByName('<27><>ͷ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>װ').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>װ']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>װ').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsInteger<>0 then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsInteger;
if t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat<>0 then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat;
if t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat<>0 then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsFloat;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>д').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>˾').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD>˾']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD>˾').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˾').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˾']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>˾').AsString;
if trim(t_op_module.FieldByName('<27><>ע').AsString)<>'' then
DataSet['<27><>ע']:=t_op_module.FieldByName('<27><>ע').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').AsString;
if trim(t_op_module.FieldByName('<27><><EFBFBD>˳<EFBFBD><CBB3><EFBFBD>').AsString)<>'' then
DataSet['<27><><EFBFBD>˳<EFBFBD><CBB3><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD>˳<EFBFBD><CBB3><EFBFBD>').AsString;
DataSet['<27><><EFBFBD>ط<EFBFBD><D8B7><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD>ط<EFBFBD><D8B7><EFBFBD>').Value;
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').Value;
DataSet['Ѭ<><D1AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('Ѭ<><D1AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').Value;
DataSet['<27>ϳ<EFBFBD><CFB3><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27>ϳ<EFBFBD><CFB3><EFBFBD><EFBFBD><EFBFBD>').Value;
DataSet['<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>']:=t_op_module.FieldByName('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>').Value;
if trim(t_op_module.FieldByName('<27><><EFBFBD>ѷ<EFBFBD>ʽ').AsString)<>'' then
DataSet['<27><><EFBFBD>ѷ<EFBFBD>ʽ']:=t_op_module.FieldByName('<27><><EFBFBD>ѷ<EFBFBD>ʽ').Value;
if trim(t_op_module.FieldByName('ҵ<><D2B5><EFBFBD><EFBFBD>Դ').AsString)<>'' then
DataSet['ҵ<><D2B5><EFBFBD><EFBFBD>Դ']:=t_op_module.FieldByName('ҵ<><D2B5><EFBFBD><EFBFBD>Դ').Value;
if trim(t_op_module.FieldByName('<27><>վ<EFBFBD><D5BE>ϵ<EFBFBD><CFB5>').AsString)<>'' then
DataSet['<27><>վ<EFBFBD><D5BE>ϵ<EFBFBD><CFB5>']:=t_op_module.FieldByName('<27><>վ<EFBFBD><D5BE>ϵ<EFBFBD><CFB5>').Value;
if trim(t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').AsString)<>'' then
DataSet['ǩ<><C7A9><EFBFBD><EFBFBD>ʽ']:=t_op_module.FieldByName('ǩ<><C7A9><EFBFBD><EFBFBD>ʽ').Value;
DataSet['<27>˷<EFBFBD>']:=t_op_module.FieldByName('<27>˷<EFBFBD>').Value;
DataSet.Post;
end;
end;
Close;
end;
end.
Reference in New Issue View Git Blame Copy Permalink