|
|
|
|
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.
|