DONGSHENG6/公用模块/系统模块/u_open_report.pas

{$INCLUDE t_main.inc}
unit u_open_report;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, bsSkinCtrls;

type
  Tfrm_open_report = class(TForm)
    bsSkinPanel3: TbsSkinPanel;
    bsSkinButton23: TbsSkinButton;
    bsSkinPanel2: TbsSkinPanel;
    bsSkinPanel4: TbsSkinPanel;
    bsSkinGroupBox3: TbsSkinGroupBox;
    bsSkinGroupBox7: TbsSkinGroupBox;
    bsSkinButton43: TbsSkinButton;
    bsSkinButton44: TbsSkinButton;
    bsSkinButton46: TbsSkinButton;
    bsSkinButton47: TbsSkinButton;
    bsSkinButton31: TbsSkinButton;
    bsSkinButton14: TbsSkinButton;
    bsSkinGroupBox8: TbsSkinGroupBox;
    bsSkinButton42: TbsSkinButton;
    bsSkinButton45: TbsSkinButton;
    bsSkinButton48: TbsSkinButton;
    bsSkinButton49: TbsSkinButton;
    bsSkinButton50: TbsSkinButton;
    bsSkinGroupBox9: TbsSkinGroupBox;
    bsSkinButton51: TbsSkinButton;
    bsSkinButton52: TbsSkinButton;
    bsSkinButton53: TbsSkinButton;
    bsSkinButton54: TbsSkinButton;
    bsSkinButton55: TbsSkinButton;
    bsSkinGroupBox10: TbsSkinGroupBox;
    bsSkinButton56: TbsSkinButton;
    bsSkinButton57: TbsSkinButton;
    bsSkinButton58: TbsSkinButton;
    bsSkinButton59: TbsSkinButton;
    bsSkinButton60: TbsSkinButton;
    bsSkinPanel1: TbsSkinPanel;
    bsSkinGroupBox1: TbsSkinGroupBox;
    bsSkinButton1: TbsSkinButton;
    bsSkinButton2: TbsSkinButton;
    bsSkinButton4: TbsSkinButton;
    bsSkinButton5: TbsSkinButton;
    bsSkinButton6: TbsSkinButton;
    bsSkinButton30: TbsSkinButton;
    bsSkinButton32: TbsSkinButton;
    bsSkinButton11: TbsSkinButton;
    bsSkinGroupBox2: TbsSkinGroupBox;
    bsSkinButton8: TbsSkinButton;
    bsSkinButton10: TbsSkinButton;
    bsSkinButton13: TbsSkinButton;
    bsSkinButton36: TbsSkinButton;
    bsSkinButton16: TbsSkinButton;
    bsSkinButton9: TbsSkinButton;
    bsSkinGroupBox4: TbsSkinGroupBox;
    bsSkinButton15: TbsSkinButton;
    bsSkinButton17: TbsSkinButton;
    bsSkinButton18: TbsSkinButton;
    bsSkinButton28: TbsSkinButton;
    bsSkinButton34: TbsSkinButton;
    bsSkinButton12: TbsSkinButton;
    bsSkinGroupBox5: TbsSkinGroupBox;
    bsSkinButton22: TbsSkinButton;
    bsSkinButton24: TbsSkinButton;
    bsSkinButton7: TbsSkinButton;
    bsSkinButton38: TbsSkinButton;
    bsSkinButton40: TbsSkinButton;
    bsSkinGroupBox6: TbsSkinGroupBox;
    bsSkinButton19: TbsSkinButton;
    bsSkinButton20: TbsSkinButton;
    bsSkinButton21: TbsSkinButton;
    bsSkinButton26: TbsSkinButton;
    bsSkinButton41: TbsSkinButton;
    bsSkinButton3: TbsSkinButton;
    bsSkinButton25: TbsSkinButton;
    bsSkinButton27: TbsSkinButton;
    bsSkinButton29: TbsSkinButton;
    bsSkinButton33: TbsSkinButton;
    bsSkinButton37: TbsSkinButton;
    bsSkinButton39: TbsSkinButton;
    bsSkinButton61: TbsSkinButton;
    bsSkinButton62: TbsSkinButton;
    bsSkinButton63: TbsSkinButton;
    bsSkinButton64: TbsSkinButton;
    bsSkinButton35: TbsSkinButton;
    bsSkinButton65: TbsSkinButton;
    bsSkinButton66: TbsSkinButton;
    bsSkinButton68: TbsSkinButton;
    bsSkinGroupBox11: TbsSkinGroupBox;
    bsSkinButton69: TbsSkinButton;
    bsSkinButton70: TbsSkinButton;
    bsSkinPanel5: TbsSkinPanel;
    bsSkinButton71: TbsSkinButton;
    bsSkinButton80: TbsSkinButton;
    bsSkinButton73: TbsSkinButton;
    bsSkinButton74: TbsSkinButton;
    bsSkinButton75: TbsSkinButton;
    bsSkinButton76: TbsSkinButton;
    bsSkinButton77: TbsSkinButton;
    bsSkinButton72: TbsSkinButton;
    bsSkinButton78: TbsSkinButton;
    bsSkinButton82: TbsSkinButton;
    bsSkinButton83: TbsSkinButton;
    bsSkinButton67: TbsSkinButton;
    bsSkinButton79: TbsSkinButton;
    bsSkinButton81: TbsSkinButton;
    bsSkinButton84: TbsSkinButton;
    bsSkinButton85: TbsSkinButton;
    bsSkinButton86: TbsSkinButton;
    bsSkinButton87: TbsSkinButton;
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure bsSkinButton15Click(Sender: TObject);
    procedure bsSkinButton28Click(Sender: TObject);
    procedure bsSkinButton8Click(Sender: TObject);
    procedure bsSkinButton16Click(Sender: TObject);
    procedure bsSkinButton22Click(Sender: TObject);
    procedure bsSkinButton19Click(Sender: TObject);
    procedure bsSkinButton3Click(Sender: TObject);
    procedure bsSkinButton43Click(Sender: TObject);
    procedure bsSkinButton42Click(Sender: TObject);
    procedure bsSkinButton51Click(Sender: TObject);
    procedure bsSkinButton56Click(Sender: TObject);
    procedure bsSkinButton33Click(Sender: TObject);
    procedure bsSkinButton17Click(Sender: TObject);
    procedure bsSkinButton24Click(Sender: TObject);
    procedure bsSkinButton36Click(Sender: TObject);
    procedure bsSkinButton20Click(Sender: TObject);
    procedure bsSkinButton47Click(Sender: TObject);
    procedure bsSkinButton45Click(Sender: TObject);
    procedure bsSkinButton52Click(Sender: TObject);
    procedure bsSkinButton57Click(Sender: TObject);
    procedure bsSkinButton18Click(Sender: TObject);
    procedure bsSkinButton34Click(Sender: TObject);
    procedure bsSkinButton10Click(Sender: TObject);
    procedure bsSkinButton13Click(Sender: TObject);
    procedure bsSkinButton7Click(Sender: TObject);
    procedure bsSkinButton38Click(Sender: TObject);
    procedure bsSkinButton40Click(Sender: TObject);
    procedure bsSkinButton21Click(Sender: TObject);
    procedure bsSkinButton26Click(Sender: TObject);
    procedure bsSkinButton41Click(Sender: TObject);
    procedure bsSkinButton44Click(Sender: TObject);
    procedure bsSkinButton46Click(Sender: TObject);
    procedure bsSkinButton31Click(Sender: TObject);
    procedure bsSkinButton48Click(Sender: TObject);
    procedure bsSkinButton49Click(Sender: TObject);
    procedure bsSkinButton50Click(Sender: TObject);
    procedure bsSkinButton53Click(Sender: TObject);
    procedure bsSkinButton54Click(Sender: TObject);
    procedure bsSkinButton55Click(Sender: TObject);
    procedure bsSkinButton58Click(Sender: TObject);
    procedure bsSkinButton59Click(Sender: TObject);
    procedure bsSkinButton60Click(Sender: TObject);
    procedure bsSkinButton9Click(Sender: TObject);
    procedure bsSkinButton14Click(Sender: TObject);
    procedure bsSkinButton2Click(Sender: TObject);
    procedure bsSkinButton12Click(Sender: TObject);
    procedure bsSkinButton1Click(Sender: TObject);
    procedure bsSkinButton30Click(Sender: TObject);
    procedure bsSkinButton32Click(Sender: TObject);
    procedure bsSkinButton4Click(Sender: TObject);
    procedure bsSkinButton5Click(Sender: TObject);
    procedure bsSkinButton6Click(Sender: TObject);
    procedure bsSkinButton11Click(Sender: TObject);
    procedure bsSkinButton23Click(Sender: TObject);
    procedure bsSkinPanel1Resize(Sender: TObject);
    procedure bsSkinPanel4Resize(Sender: TObject);
    procedure bsSkinButton25Click(Sender: TObject);
    procedure bsSkinButton27Click(Sender: TObject);
    procedure bsSkinButton29Click(Sender: TObject);
    procedure bsSkinButton61Click(Sender: TObject);
    procedure bsSkinButton39Click(Sender: TObject);
    procedure bsSkinButton63Click(Sender: TObject);
    procedure bsSkinButton62Click(Sender: TObject);
    procedure bsSkinButton37Click(Sender: TObject);
    procedure bsSkinButton35Click(Sender: TObject);
    procedure bsSkinButton65Click(Sender: TObject);
    procedure bsSkinButton66Click(Sender: TObject);
    procedure bsSkinButton67Click(Sender: TObject);
    procedure bsSkinButton68Click(Sender: TObject);
    procedure bsSkinButton70Click(Sender: TObject);
    procedure bsSkinButton69Click(Sender: TObject);
    procedure bsSkinButton71Click(Sender: TObject);
    procedure bsSkinButton73Click(Sender: TObject);
    procedure bsSkinButton74Click(Sender: TObject);
    procedure bsSkinButton75Click(Sender: TObject);
    procedure bsSkinButton76Click(Sender: TObject);
    procedure bsSkinButton77Click(Sender: TObject);
    procedure bsSkinButton72Click(Sender: TObject);
    procedure bsSkinButton80Click(Sender: TObject);
    procedure bsSkinButton78Click(Sender: TObject);
    procedure bsSkinButton82Click(Sender: TObject);
    procedure bsSkinButton83Click(Sender: TObject);
    procedure bsSkinButton79Click(Sender: TObject);
    procedure bsSkinButton81Click(Sender: TObject);
    procedure bsSkinButton84Click(Sender: TObject);
    procedure bsSkinButton85Click(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure bsSkinButton86Click(Sender: TObject);
    procedure bsSkinButton87Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frm_open_report: Tfrm_open_report;

implementation

uses u_main,
  {$IFDEF YWTAIZHANG}
  u_rp_tai_seae,u_rp_tai_total,u_rp_tai_seae_pin,u_rp_tai_aire,u_rp_tai_seai,u_rp_tai_airi,
  {$ENDIF}
  u_rp_no_seae_accept, u_rp_no_total, u_rp_zl_seae, u_rp_in_seae,
  u_rp_in_ch,  u_rp_rp_seae,
  u_rp_fee_modify,  u_rp_zl_seai, u_rp_no_seai, u_rp_in_seai,
   u_rp_rp_seai,
  u_rp_no_aire, u_rp_no_airi, u_rp_zl_aire, u_rp_zl_airi,
  u_rp_zl_total, u_rp_in_aire, u_rp_in_airi, u_rp_in_total,
   u_rp_rp_aire, u_rp_rp_airi, u_rp_rp_total,
  {$IFDEF ZJFENXI}
  u_rp_zj_seae,u_rp_zj_seai,u_rp_zj_aire,u_rp_zj_airi, u_rp_zj_total,  u_rp_zj_zou,
  {$ENDIF}
  {$IFDEF TBQITA}
  u_rp_zou_aire, u_rp_zou_airi,u_rp_fen_aire,u_rp_fen_airi,u_rp_zou_seai, u_rp_fen_seai,u_rp_zou_seae, u_rp_fen_seae,u_rp_fen_seae_ctn,
  {$ENDIF}
   u_rp_zou_total, u_rp_fen_total,
  {$IFDEF QFZOUSHI}
  u_rp_no_zou,
  {$ENDIF}
  u_rp_dui_seae_accept,  u_rp_dui_seae_pay,
  u_rp_dui_seai_accept, u_rp_dui_seai_pay, u_rp_dui_aire_accept,
  u_rp_dui_aire_pay, u_rp_dui_airi_accept, u_rp_dui_airi_pay,
  {$IFDEF DLFENZHANG}u_rp_fenzhang,u_rp_rp_sea_daili,{$ENDIF}
  u_rp_rp_seae_pin, u_rp_ch_balance_accept,
  u_rp_ch_balance_pay, u_rp_dui_accept, u_rp_dui_pay, u_rp_ch_balance_rate,
  u_rp_ch_currency_change,
  u_rp_in_fenlei,
  {$IFDEF FYZHUANGTAI}
  u_rp_ch_fee_state,
  {$ENDIF}
  {$IFDEF ZHMXTONGJI}u_rp_ch_total,{$ENDIF}
  u_rp_yunjia_seae, u_rp_yunfeibl_seae, u_rp_dui_accepttotal,
  {$IFDEF QFFZZONGHE}
  u_rp_ch_clienttotal,
  {$ENDIF}
  {$IFDEF ZHYDTONGJI}
   u_rp_rp_monthtotal,
  {$ENDIF}
  {$IFDEF XSGUANLI}
   u_rp_sales_profit,u_rp_sales_profitLcx,u_rp_sales_profit_lx,
   {$ENDIF}
  {$IFDEF JGCHE}u_rp_no_airtruck,{$ENDIF}
  {$IFDEF ZHZIYOU}u_rp_chfree_total,{$ENDIF} U_rp_fee_outamt,{$IFDEF KHGUANLI} u_rp_crm_credit,{$ENDIF}
  {$IFDEF GYSHANG}u_rp_apply_no, u_rp_truck_no,{$ENDIF}
  {$IFDEF QFYDFENXI}
  u_rp_no_monthtotal,
  {$ENDIF}
  u_rp_hl_histry,{$IFDEF WLZHANG}u_rp_wl_total,u_rp_ch_genleg,{$ENDIF}
  my_sys_function, u_rp_ch_balance_detail, u_rp_pin_total;

{$R *.dfm}

procedure Tfrm_open_report.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  frm_open_report.Hide;
  frm_open_report.ManualFloat(frm_open_report.BoundsRect );
  frm_open_report:=nil;
end;

procedure Tfrm_open_report.bsSkinButton15Click(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  if not if_open('040') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_tai_seae) then
    frm_rp_tai_seae:=tfrm_rp_tai_seae.Create (self);
  frm_rp_tai_seae.ManualDock(frm_main.SearchTabs('frm_rp_tai_seae',frm_rp_tai_seae.caption),nil,alClient);
  frm_rp_tai_seae.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton28Click(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  if not if_open('041') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_tai_total) then
    frm_rp_tai_total:=tfrm_rp_tai_total.Create (self);
  frm_rp_tai_total.ManualDock(frm_main.SearchTabs('frm_rp_tai_total',frm_rp_tai_total.caption),nil,alClient);
  frm_rp_tai_total.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton8Click(Sender: TObject);
begin
  if not if_open('042') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_seae) then
    frm_rp_no_seae:=tfrm_rp_no_seae.Create (self);
  frm_rp_no_seae.ManualDock(frm_main.SearchTabs('frm_rp_no_seae',frm_rp_no_seae.caption),nil,alClient);
  frm_rp_no_seae.show;
end;

procedure Tfrm_open_report.bsSkinButton16Click(Sender: TObject);
begin
  if not if_open('043') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_total) then
    frm_rp_no_total:=tfrm_rp_no_total.Create (self);
  frm_rp_no_total.ManualDock(frm_main.SearchTabs('frm_rp_no_total',frm_rp_no_total.caption),nil,alClient);
  frm_rp_no_total.show;
end;

procedure Tfrm_open_report.bsSkinButton22Click(Sender: TObject);
begin
  if not if_open('044') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zl_seae) then
    frm_rp_zl_seae:=tfrm_rp_zl_seae.Create (self);
  frm_rp_zl_seae.ManualDock(frm_main.SearchTabs('frm_rp_zl_seae',frm_rp_zl_seae.caption),nil,alClient);
  frm_rp_zl_seae.show;
end;

procedure Tfrm_open_report.bsSkinButton19Click(Sender: TObject);
begin
  if not if_open('045') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_seae) then
    frm_rp_in_seae:=tfrm_rp_in_seae.Create (self);
  frm_rp_in_seae.ManualDock(frm_main.SearchTabs('frm_rp_in_seae',frm_rp_in_seae.caption),nil,alClient);
  frm_rp_in_seae.show;
end;

procedure Tfrm_open_report.bsSkinButton3Click(Sender: TObject);
begin
  if not if_open('046') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_ch) then
    frm_rp_in_ch:=tfrm_rp_in_ch.Create (self);
  frm_rp_in_ch.ManualDock(frm_main.SearchTabs('frm_rp_in_ch',frm_rp_in_ch.caption),nil,alClient);
  frm_rp_in_ch.show;
end;

procedure Tfrm_open_report.bsSkinButton43Click(Sender: TObject);
begin
  {$IFDEF ZJFENXI}
  if not if_open('047') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zj_seae) then
    frm_rp_zj_seae:=tfrm_rp_zj_seae.Create (self);
  frm_rp_zj_seae.ManualDock(frm_main.SearchTabs('frm_rp_zj_seae',frm_rp_zj_seae.caption),nil,alClient);
  frm_rp_zj_seae.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton42Click(Sender: TObject);
begin
  if not if_open('048') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_seae) then
    frm_rp_rp_seae:=tfrm_rp_rp_seae.Create (self);
  frm_rp_rp_seae.ManualDock(frm_main.SearchTabs('frm_rp_rp_seae',frm_rp_rp_seae.caption),nil,alClient);
  frm_rp_rp_seae.show;
end;

procedure Tfrm_open_report.bsSkinButton51Click(Sender: TObject);
begin
  {$IFDEF TBQITA}
  if not if_open('049') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zou_seae) then
    frm_rp_zou_seae:=tfrm_rp_zou_seae.Create (self);
  frm_rp_zou_seae.ManualDock(frm_main.SearchTabs('frm_rp_zou_seae',frm_rp_zou_seae.caption),nil,alClient);
  frm_rp_zou_seae.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton56Click(Sender: TObject);
begin
  {$IFDEF TBQITA}

  if not if_open('050') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fen_seae) then
    frm_rp_fen_seae:=tfrm_rp_fen_seae.Create (self);
  frm_rp_fen_seae.ManualDock(frm_main.SearchTabs('frm_rp_fen_seae',frm_rp_fen_seae.caption),nil,alClient);
  frm_rp_fen_seae.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton33Click(Sender: TObject);
begin
  if not if_open('051') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fee_modify) then
    frm_rp_fee_modify:=tfrm_rp_fee_modify.Create (self);
  frm_rp_fee_modify.ManualDock(frm_main.SearchTabs('frm_rp_fee_modify',frm_rp_fee_modify.caption),nil,alClient);
  frm_rp_fee_modify.show;
end;

procedure Tfrm_open_report.bsSkinButton17Click(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  if not if_open('062') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_tai_seai) then
    frm_rp_tai_seai:=tfrm_rp_tai_seai.Create (self);
  frm_rp_tai_seai.ManualDock(frm_main.SearchTabs('frm_rp_tai_seai',frm_rp_tai_seai.caption),nil,alClient);
  frm_rp_tai_seai.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton24Click(Sender: TObject);
begin
  if not if_open('063') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zl_seai) then
    frm_rp_zl_seai:=tfrm_rp_zl_seai.Create (self);
  frm_rp_zl_seai.ManualDock(frm_main.SearchTabs('frm_rp_zl_seai',frm_rp_zl_seai.caption),nil,alClient);
  frm_rp_zl_seai.show;
end;

procedure Tfrm_open_report.bsSkinButton36Click(Sender: TObject);
begin
  if not if_open('064') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_seai) then
    frm_rp_no_seai:=tfrm_rp_no_seai.Create (self);
  frm_rp_no_seai.ManualDock(frm_main.SearchTabs('frm_rp_no_seai',frm_rp_no_seai.caption),nil,alClient);
  frm_rp_no_seai.show;
end;

procedure Tfrm_open_report.bsSkinButton20Click(Sender: TObject);
begin
  if not if_open('065') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_seai) then
    frm_rp_in_seai:=tfrm_rp_in_seai.Create (self);
  frm_rp_in_seai.ManualDock(frm_main.SearchTabs('frm_rp_in_seai',frm_rp_in_seai.caption),nil,alClient);
  frm_rp_in_seai.show;
end;

procedure Tfrm_open_report.bsSkinButton47Click(Sender: TObject);
begin
  {$IFDEF ZJFENXI}
  if not if_open('066') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zj_seai) then
    frm_rp_zj_seai:=tfrm_rp_zj_seai.Create (self);
  frm_rp_zj_seai.ManualDock(frm_main.SearchTabs('frm_rp_zj_seai',frm_rp_zj_seai.caption),nil,alClient);
  frm_rp_zj_seai.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton45Click(Sender: TObject);
begin
  if not if_open('067') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_seai) then
    frm_rp_rp_seai:=tfrm_rp_rp_seai.Create (self);
  frm_rp_rp_seai.ManualDock(frm_main.SearchTabs('frm_rp_rp_seai',frm_rp_rp_seai.caption),nil,alClient);
  frm_rp_rp_seai.show;
end;

procedure Tfrm_open_report.bsSkinButton52Click(Sender: TObject);
begin
    {$IFDEF TBQITA}

  if not if_open('068') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zou_seai) then
    frm_rp_zou_seai:=tfrm_rp_zou_seai.Create (self);
  frm_rp_zou_seai.ManualDock(frm_main.SearchTabs('frm_rp_zou_seai',frm_rp_zou_seai.caption),nil,alClient);
  frm_rp_zou_seai.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton57Click(Sender: TObject);
begin
  {$IFDEF TBQITA}

  if not if_open('069') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fen_seai) then
    frm_rp_fen_seai:=tfrm_rp_fen_seai.Create (self);
  frm_rp_fen_seai.ManualDock(frm_main.SearchTabs('frm_rp_fen_seai',frm_rp_fen_seai.caption),nil,alClient);
  frm_rp_fen_seai.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton18Click(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  if not if_open('088') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_tai_aire) then
    frm_rp_tai_aire:=tfrm_rp_tai_aire.Create (self);
  frm_rp_tai_aire.ManualDock(frm_main.SearchTabs('frm_rp_tai_aire',frm_rp_tai_aire.caption),nil,alClient);
  frm_rp_tai_aire.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton34Click(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  if not if_open('089') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_tai_airi) then
    frm_rp_tai_airi:=tfrm_rp_tai_airi.Create (self);
  frm_rp_tai_airi.ManualDock(frm_main.SearchTabs('frm_rp_tai_airi',frm_rp_tai_airi.caption),nil,alClient);
  frm_rp_tai_airi.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton10Click(Sender: TObject);
begin
  if not if_open('098') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_aire) then
    frm_rp_no_aire:=tfrm_rp_no_aire.Create (self);
  frm_rp_no_aire.ManualDock(frm_main.SearchTabs('frm_rp_no_aire',frm_rp_no_aire.caption),nil,alClient);
  frm_rp_no_aire.show;
end;

procedure Tfrm_open_report.bsSkinButton13Click(Sender: TObject);
begin
  if not if_open('099') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_airi) then
    frm_rp_no_airi:=tfrm_rp_no_airi.Create (self);
  frm_rp_no_airi.ManualDock(frm_main.SearchTabs('frm_rp_no_airi',frm_rp_no_airi.caption),nil,alClient);
  frm_rp_no_airi.show;
end;

procedure Tfrm_open_report.bsSkinButton7Click(Sender: TObject);
begin
  if not if_open('100') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zl_aire) then
    frm_rp_zl_aire:=tfrm_rp_zl_aire.Create (self);
  frm_rp_zl_aire.ManualDock(frm_main.SearchTabs('frm_rp_zl_aire',frm_rp_zl_aire.caption),nil,alClient);
  frm_rp_zl_aire.show;
end;

procedure Tfrm_open_report.bsSkinButton38Click(Sender: TObject);
begin
  if not if_open('101') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zl_airi) then
    frm_rp_zl_airi:=tfrm_rp_zl_airi.Create (self);
  frm_rp_zl_airi.ManualDock(frm_main.SearchTabs('frm_rp_zl_airi',frm_rp_zl_airi.caption),nil,alClient);
  frm_rp_zl_airi.show;
end;

procedure Tfrm_open_report.bsSkinButton40Click(Sender: TObject);
begin
  if not if_open('102') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zl_total) then
    frm_rp_zl_total:=tfrm_rp_zl_total.Create (self);
  frm_rp_zl_total.ManualDock(frm_main.SearchTabs('frm_rp_zl_total',frm_rp_zl_total.caption),nil,alClient);
  frm_rp_zl_total.show;
end;

procedure Tfrm_open_report.bsSkinButton21Click(Sender: TObject);
begin
  if not if_open('103') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_aire) then
    frm_rp_in_aire:=tfrm_rp_in_aire.Create (self);
  frm_rp_in_aire.ManualDock(frm_main.SearchTabs('frm_rp_in_aire',frm_rp_in_aire.caption),nil,alClient);
  frm_rp_in_aire.show;
end;

procedure Tfrm_open_report.bsSkinButton26Click(Sender: TObject);
begin
  if not if_open('104') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_airi) then
    frm_rp_in_airi:=tfrm_rp_in_airi.Create (self);
  frm_rp_in_airi.ManualDock(frm_main.SearchTabs('frm_rp_in_airi',frm_rp_in_airi.caption),nil,alClient);
  frm_rp_in_airi.show;
end;

procedure Tfrm_open_report.bsSkinButton41Click(Sender: TObject);
begin
  if not if_open('105') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_total) then
    frm_rp_in_total:=tfrm_rp_in_total.Create (self);
  frm_rp_in_total.ManualDock(frm_main.SearchTabs('frm_rp_in_total',frm_rp_in_total.caption),nil,alClient);
  frm_rp_in_total.show;
end;

procedure Tfrm_open_report.bsSkinButton44Click(Sender: TObject);
begin
   {$IFDEF ZJFENXI}
  if not if_open('106') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zj_aire) then
    frm_rp_zj_aire:=tfrm_rp_zj_aire.Create (self);
  frm_rp_zj_aire.ManualDock(frm_main.SearchTabs('frm_rp_zj_aire',frm_rp_zj_aire.caption),nil,alClient);
  frm_rp_zj_aire.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton46Click(Sender: TObject);
begin
  {$IFDEF ZJFENXI}
  if not if_open('107') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zj_airi) then
    frm_rp_zj_airi:=tfrm_rp_zj_airi.Create (self);
  frm_rp_zj_airi.ManualDock(frm_main.SearchTabs('frm_rp_zj_airi',frm_rp_zj_airi.caption),nil,alClient);
  frm_rp_zj_airi.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton31Click(Sender: TObject);
begin
  {$IFDEF ZJFENXI}
  if not if_open('108') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zj_total) then
    frm_rp_zj_total:=tfrm_rp_zj_total.Create (self);
  frm_rp_zj_total.ManualDock(frm_main.SearchTabs('frm_rp_zj_total',frm_rp_zj_total.caption),nil,alClient);
  frm_rp_zj_total.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton48Click(Sender: TObject);
begin
  if not if_open('109') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_aire) then
    frm_rp_rp_aire:=tfrm_rp_rp_aire.Create (self);
  frm_rp_rp_aire.ManualDock(frm_main.SearchTabs('frm_rp_rp_aire',frm_rp_rp_aire.caption),nil,alClient);
  frm_rp_rp_aire.show;
end;

procedure Tfrm_open_report.bsSkinButton49Click(Sender: TObject);
begin
  if not if_open('110') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_airi) then
    frm_rp_rp_airi:=tfrm_rp_rp_airi.Create (self);
  frm_rp_rp_airi.ManualDock(frm_main.SearchTabs('frm_rp_rp_airi',frm_rp_rp_airi.caption),nil,alClient);
  frm_rp_rp_airi.show;
end;

procedure Tfrm_open_report.bsSkinButton50Click(Sender: TObject);
begin
  if not if_open('111') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_total) then
    frm_rp_rp_total:=tfrm_rp_rp_total.Create (self);
  frm_rp_rp_total.ManualDock(frm_main.SearchTabs('frm_rp_rp_total',frm_rp_rp_total.caption),nil,alClient);
  frm_rp_rp_total.show;
end;

procedure Tfrm_open_report.bsSkinButton53Click(Sender: TObject);
begin
  {$IFDEF TBQITA}

  if not if_open('112') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zou_aire) then
    frm_rp_zou_aire:=tfrm_rp_zou_aire.Create (self);
  frm_rp_zou_aire.ManualDock(frm_main.SearchTabs('frm_rp_zou_aire',frm_rp_zou_aire.caption),nil,alClient);
  frm_rp_zou_aire.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton54Click(Sender: TObject);
begin
  {$IFDEF TBQITA}

  if not if_open('113') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zou_airi) then
    frm_rp_zou_airi:=tfrm_rp_zou_airi.Create (self);
  frm_rp_zou_airi.ManualDock(frm_main.SearchTabs('frm_rp_zou_airi',frm_rp_zou_airi.caption),nil,alClient);
  frm_rp_zou_airi.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton55Click(Sender: TObject);
begin
  if not if_open('114') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zou_total) then
    frm_rp_zou_total:=tfrm_rp_zou_total.Create (self);
  frm_rp_zou_total.ManualDock(frm_main.SearchTabs('frm_rp_zou_total',frm_rp_zou_total.caption),nil,alClient);
  frm_rp_zou_total.show;
end;

procedure Tfrm_open_report.bsSkinButton58Click(Sender: TObject);
begin
  {$IFDEF TBQITA}

  if not if_open('115') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fen_aire) then
    frm_rp_fen_aire:=tfrm_rp_fen_aire.Create (self);
  frm_rp_fen_aire.ManualDock(frm_main.SearchTabs('frm_rp_fen_aire',frm_rp_fen_aire.caption),nil,alClient);
  frm_rp_fen_aire.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton59Click(Sender: TObject);
begin
  {$IFDEF TBQITA}
  if not if_open('116') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fen_airi) then
    frm_rp_fen_airi:=tfrm_rp_fen_airi.Create (self);
  frm_rp_fen_airi.ManualDock(frm_main.SearchTabs('frm_rp_fen_airi',frm_rp_fen_airi.caption),nil,alClient);
  frm_rp_fen_airi.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton60Click(Sender: TObject);
begin
  if not if_open('117') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fen_total) then
    frm_rp_fen_total:=tfrm_rp_fen_total.Create (self);
  frm_rp_fen_total.ManualDock(frm_main.SearchTabs('frm_rp_fen_total',frm_rp_fen_total.caption),nil,alClient);
  frm_rp_fen_total.show;
end;

procedure Tfrm_open_report.bsSkinButton9Click(Sender: TObject);
begin
  {$IFDEF QFZOUSHI}
  if not if_open('129') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_zou) then
    frm_rp_no_zou:=tfrm_rp_no_zou.Create (self);
  frm_rp_no_zou.ManualDock(frm_main.SearchTabs('frm_rp_no_zou',frm_rp_no_zou.caption),nil,alClient);
  frm_rp_no_zou.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton14Click(Sender: TObject);
begin
  {$IFDEF ZJFENXI}
  if not if_open('130') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_zj_zou) then
    frm_rp_zj_zou:=tfrm_rp_zj_zou.Create (self);
  frm_rp_zj_zou.ManualDock(frm_main.SearchTabs('frm_rp_zj_zou',frm_rp_zj_zou.caption),nil,alClient);
  frm_rp_zj_zou.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton2Click(Sender: TObject);
begin
  if not if_open('131') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_seae_accept) then
    frm_rp_dui_seae_accept:=tfrm_rp_dui_seae_accept.Create (self);
  frm_rp_dui_seae_accept.ManualDock(frm_main.SearchTabs('frm_rp_dui_seae_accept',frm_rp_dui_seae_accept.caption),nil,alClient);
  frm_rp_dui_seae_accept.show;
end;

procedure Tfrm_open_report.bsSkinButton12Click(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  if not if_open('150') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_tai_seae_pin) then
    frm_rp_tai_seae_pin:=tfrm_rp_tai_seae_pin.Create (self);
  frm_rp_tai_seae_pin.ManualDock(frm_main.SearchTabs('frm_rp_tai_seae_pin',frm_rp_tai_seae_pin.caption),nil,alClient);
  frm_rp_tai_seae_pin.show;
  {$ENDIF}  
end;

procedure Tfrm_open_report.bsSkinButton1Click(Sender: TObject);
begin
  if not if_open('132') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_seae_pay) then
    frm_rp_dui_seae_pay:=tfrm_rp_dui_seae_pay.Create (self);
  frm_rp_dui_seae_pay.ManualDock(frm_main.SearchTabs('frm_rp_dui_seae_pay',frm_rp_dui_seae_pay.caption),nil,alClient);
  frm_rp_dui_seae_pay.show;    
end;

procedure Tfrm_open_report.bsSkinButton30Click(Sender: TObject);
begin
  if not if_open('133') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_seai_accept) then
    frm_rp_dui_seai_accept:=tfrm_rp_dui_seai_accept.Create (self);
  frm_rp_dui_seai_accept.ManualDock(frm_main.SearchTabs('frm_rp_dui_seai_accept',frm_rp_dui_seai_accept.caption),nil,alClient);
  frm_rp_dui_seai_accept.show;
end;

procedure Tfrm_open_report.bsSkinButton32Click(Sender: TObject);
begin
  if not if_open('134') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_seai_pay) then
    frm_rp_dui_seai_pay:=tfrm_rp_dui_seai_pay.Create (self);
  frm_rp_dui_seai_pay.ManualDock(frm_main.SearchTabs('frm_rp_dui_seai_pay',frm_rp_dui_seai_pay.caption),nil,alClient);
  frm_rp_dui_seai_pay.show;
end;

procedure Tfrm_open_report.bsSkinButton4Click(Sender: TObject);
begin
  if not if_open('135') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_aire_accept) then
    frm_rp_dui_aire_accept:=tfrm_rp_dui_aire_accept.Create (self);
  frm_rp_dui_aire_accept.ManualDock(frm_main.SearchTabs('frm_rp_dui_aire_accept',frm_rp_dui_aire_accept.caption),nil,alClient);
  frm_rp_dui_aire_accept.show;
end;

procedure Tfrm_open_report.bsSkinButton5Click(Sender: TObject);
begin
  if not if_open('136') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_aire_pay) then
    frm_rp_dui_aire_pay:=tfrm_rp_dui_aire_pay.Create (self);
  frm_rp_dui_aire_pay.ManualDock(frm_main.SearchTabs('frm_rp_dui_aire_pay',frm_rp_dui_aire_pay.caption),nil,alClient);
  frm_rp_dui_aire_pay.show;
end;

procedure Tfrm_open_report.bsSkinButton6Click(Sender: TObject);
begin
  if not if_open('137') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_airi_accept) then
    frm_rp_dui_airi_accept:=tfrm_rp_dui_airi_accept.Create (self);
  frm_rp_dui_airi_accept.ManualDock(frm_main.SearchTabs('frm_rp_dui_airi_accept',frm_rp_dui_airi_accept.caption),nil,alClient);
  frm_rp_dui_airi_accept.show;
end;

procedure Tfrm_open_report.bsSkinButton11Click(Sender: TObject);
begin
  if not if_open('138') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_airi_pay) then
    frm_rp_dui_airi_pay:=tfrm_rp_dui_airi_pay.Create (self);
  frm_rp_dui_airi_pay.ManualDock(frm_main.SearchTabs('frm_rp_dui_airi_pay',frm_rp_dui_airi_pay.caption),nil,alClient);
  frm_rp_dui_airi_pay.show;
end;

procedure Tfrm_open_report.bsSkinButton23Click(Sender: TObject);
begin
  close;
end;

procedure Tfrm_open_report.bsSkinPanel1Resize(Sender: TObject);
var
  i:integer;
begin
  i:=round(bsSkinPanel1.Width/5);
  bsSkinGroupBox4.Width:=i;
  bsSkinGroupBox1.Width:=i;
  bsSkinGroupBox2.Width:=i;
  bsSkinGroupBox5.Width:=i;
end;

procedure Tfrm_open_report.bsSkinPanel4Resize(Sender: TObject);
var
  i:integer;
begin
  i:=round(bsSkinPanel4.Width/5);
  bsSkinGroupBox10.Width:=i;
  bsSkinGroupBox7.Width:=i;
  bsSkinGroupBox8.Width:=i;
  bsSkinGroupBox9.Width:=i;
  begin
    limited_button('040',bsSkinButton15,51);
    limited_button('041',bsSkinButton28,51);
    limited_button('042',bsSkinButton8,523);
    limited_button('043',bsSkinButton16,521);
    limited_button('044',bsSkinButton22,525);
    limited_button('045',bsSkinButton19,41403);
    limited_button('046',bsSkinButton3,41401);
    limited_button('047',bsSkinButton43,61);
    limited_button('048',bsSkinButton42,5323);
    limited_button('049',bsSkinButton51,5381);
    limited_button('050',bsSkinButton56,5401);
    limited_button('051',bsSkinButton33,541);
    limited_button('062',bsSkinButton17,51);
    limited_button('063',bsSkinButton24,525);
    limited_button('064',bsSkinButton36,523);
    limited_button('065',bsSkinButton20,41403);
    limited_button('066',bsSkinButton47,61);
    limited_button('067',bsSkinButton45,5323);
    limited_button('068',bsSkinButton52,5382);
    limited_button('069',bsSkinButton57,5402);
    limited_button('088',bsSkinButton18,51);
    limited_button('089',bsSkinButton34,51);
    limited_button('098',bsSkinButton10,523);
    limited_button('099',bsSkinButton13,523);
    limited_button('100',bsSkinButton7,525);
    limited_button('101',bsSkinButton38,525);
    limited_button('102',bsSkinButton40,525);
    limited_button('103',bsSkinButton21,41403);
    limited_button('104',bsSkinButton26,41403);
    limited_button('105',bsSkinButton41,41403);
    limited_button('106',bsSkinButton44,61);
    limited_button('107',bsSkinButton46,61);
    limited_button('108',bsSkinButton31,61);
    limited_button('109',bsSkinButton48,5323);
    limited_button('110',bsSkinButton49,5323);
    limited_button('111',bsSkinButton50,5321);
    limited_button('111',bsSkinButton73,5330);
    limited_button('112',bsSkinButton53,5383);
    limited_button('113',bsSkinButton54,5384);
    limited_button('114',bsSkinButton55,5380);
    limited_button('115',bsSkinButton58,5403);
    limited_button('116',bsSkinButton59,5404);
    limited_button('117',bsSkinButton60,5400);
    limited_button('129',bsSkinButton9,522);
    limited_button('130',bsSkinButton14,62);
    limited_button('131',bsSkinButton2,43);
    limited_button('150',bsSkinButton12,515);
    limited_button('132',bsSkinButton1,43);
    limited_button('133',bsSkinButton30,43);
    limited_button('134',bsSkinButton32,43);
    limited_button('135',bsSkinButton4,43);
    limited_button('136',bsSkinButton5,43);
    limited_button('137',bsSkinButton6,43);
    limited_button('138',bsSkinButton11,43);
    limited_button('156',bsSkinButton25,5351);
    limited_button('157',bsSkinButton27,5390);
    limited_button('173',bsSkinButton29,5310);
    limited_button('192',bsSkinButton61,542);
    limited_button('193',bsSkinButton39,543);
    limited_button('194',bsSkinButton63,547);
    limited_button('195',bsSkinButton62,548);
    limited_button('196',bsSkinButton37,544);
    limited_button('197',bsSkinButton35,44);
    limited_button('203',bsSkinButton65,545);
    limited_button('204',bsSkinButton66,546);
    limited_button('205',bsSkinButton67,41402);
    limited_button('232',bsSkinButton74,241);
    limited_button('237',bsSkinButton75,523);
    limited_button('043',bsSkinButton79,5210);
    limited_button('271',bsSkinButton71,43);
    limited_button('042',bsSkinButton72,523);
    limited_button('252',bsSkinButton80,524);
    limited_button('111',bsSkinButton68,5340);
    limited_button('111',bsSkinButton77,5350);
    limited_button('259',bsSkinButton82,5360);
    limited_button('260',bsSkinButton83,5370);
    limited_button('272',bsSkinButton70,5391);
    limited_button('272',bsSkinButton69,5392);
    limited_button('232',bsSkinButton76,242);
    limited_button('257',bsSkinButton78,526);
    limited_button('280',bsSkinButton81,5405);
    limited_button('287',bsSkinButton84,549);
    limited_button('303',bsSkinButton87,5492);

  end;
end;

procedure Tfrm_open_report.bsSkinButton25Click(Sender: TObject);
begin
  {$IFDEF DLFENZHANG}
  if not if_open('156') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fenzhang) then
    frm_rp_fenzhang:=tfrm_rp_fenzhang.Create (self);
  frm_rp_fenzhang.ManualDock(frm_main.SearchTabs('frm_rp_fenzhang',frm_rp_fenzhang.caption),nil,alClient);
  frm_rp_fenzhang.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton27Click(Sender: TObject);
begin
  {$IFDEF TBQITA}
  if not if_open('157') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_fen_seae_ctn) then
    frm_rp_fen_seae_ctn:=tfrm_rp_fen_seae_ctn.Create (self);
  frm_rp_fen_seae_ctn.ManualDock(frm_main.SearchTabs('frm_rp_fen_seae_ctn',frm_rp_fen_seae_ctn.caption),nil,alClient);
  frm_rp_fen_seae_ctn.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton29Click(Sender: TObject);
begin
  if not if_open('173') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_seae_pin) then
    frm_rp_rp_seae_pin:=tfrm_rp_rp_seae_pin.Create (self);
  frm_rp_rp_seae_pin.ManualDock(frm_main.SearchTabs('frm_rp_rp_seae_pin',frm_rp_rp_seae_pin.caption),nil,alClient);
  frm_rp_rp_seae_pin.show;
end;

procedure Tfrm_open_report.bsSkinButton61Click(Sender: TObject);
begin
  if not if_open('192') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_balance_accept) then
    frm_rp_ch_balance_accept:=tfrm_rp_ch_balance_accept.Create (self);
  frm_rp_ch_balance_accept.ManualDock(frm_main.SearchTabs('frm_rp_ch_balance_accept',frm_rp_ch_balance_accept.caption),nil,alClient);
  frm_rp_ch_balance_accept.show;
end;

procedure Tfrm_open_report.bsSkinButton39Click(Sender: TObject);
begin
  if not if_open('193') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_balance_pay) then
    frm_rp_ch_balance_pay:=tfrm_rp_ch_balance_pay.Create (self);
  frm_rp_ch_balance_pay.ManualDock(frm_main.SearchTabs('frm_rp_ch_balance_pay',frm_rp_ch_balance_pay.caption),nil,alClient);
  frm_rp_ch_balance_pay.show;
end;

procedure Tfrm_open_report.bsSkinButton63Click(Sender: TObject);
begin
  if not if_open('194') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_accept) then
    frm_rp_dui_accept:=tfrm_rp_dui_accept.Create (self);
  frm_rp_dui_accept.ManualDock(frm_main.SearchTabs('frm_rp_dui_accept',frm_rp_dui_accept.caption),nil,alClient);
  frm_rp_dui_accept.show;

end;

procedure Tfrm_open_report.bsSkinButton62Click(Sender: TObject);
begin
  if not if_open('195') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_pay) then
    frm_rp_dui_pay:=tfrm_rp_dui_pay.Create (self);
  frm_rp_dui_pay.ManualDock(frm_main.SearchTabs('frm_rp_dui_pay',frm_rp_dui_pay.caption),nil,alClient);
  frm_rp_dui_pay.show;
end;

procedure Tfrm_open_report.bsSkinButton37Click(Sender: TObject);
begin
  if not if_open('196') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_balance_rate) then
    frm_rp_ch_balance_rate:=tfrm_rp_ch_balance_rate.Create (self);
  frm_rp_ch_balance_rate.ManualDock(frm_main.SearchTabs('frm_rp_ch_balance_rate',frm_rp_ch_balance_rate.caption),nil,alClient);
  frm_rp_ch_balance_rate.show;
end;

procedure Tfrm_open_report.bsSkinButton35Click(Sender: TObject);
begin
  {$IFDEF DLFENZHANG}
  if not if_open('197') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_sea_daili) then
    frm_rp_rp_sea_daili:=tfrm_rp_rp_sea_daili.Create (self);
  frm_rp_rp_sea_daili.ManualDock(frm_main.SearchTabs('frm_rp_rp_sea_daili',frm_rp_rp_sea_daili.caption),nil,alClient);
  frm_rp_rp_sea_daili.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton65Click(Sender: TObject);
begin
  if not if_open('203') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_currency_change) then
    frm_rp_ch_currency_change:=tfrm_rp_ch_currency_change.Create (self);
  frm_rp_ch_currency_change.ManualDock(frm_main.SearchTabs('frm_rp_ch_currency_change',frm_rp_ch_currency_change.caption),nil,alClient);
  frm_rp_ch_currency_change.show;
end;

procedure Tfrm_open_report.bsSkinButton66Click(Sender: TObject);
begin
  {$IFDEF FYZHUANGTAI}
  if not if_open('204') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_fee_state) then
    frm_rp_ch_fee_state:=tfrm_rp_ch_fee_state.Create (self);
  frm_rp_ch_fee_state.ManualDock(frm_main.SearchTabs('frm_rp_ch_fee_state',frm_rp_ch_fee_state.caption),nil,alClient);
  frm_rp_ch_fee_state.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton67Click(Sender: TObject);
begin
  if not if_open('205') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_in_fenlei) then
    frm_rp_in_fenlei:=tfrm_rp_in_fenlei.Create (self);
  frm_rp_in_fenlei.ManualDock(frm_main.SearchTabs('frm_rp_in_fenlei',frm_rp_in_fenlei.caption),nil,alClient);
  frm_rp_in_fenlei.show;
end;

procedure Tfrm_open_report.bsSkinButton68Click(Sender: TObject);
begin
  {$IFDEF ZHMXTONGJI}
  if not if_open('111') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_total) then
    frm_rp_ch_total:=tfrm_rp_ch_total.Create (self);
  frm_rp_ch_total.ManualDock(frm_main.SearchTabs('frm_rp_ch_total',frm_rp_ch_total.caption),nil,alClient);
  frm_rp_ch_total.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton70Click(Sender: TObject);
begin
  if not if_open('272') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_yunjia_seae) then
    frm_rp_yunjia_seae:=tfrm_rp_yunjia_seae.Create (self);
  frm_rp_yunjia_seae.ManualDock(frm_main.SearchTabs('frm_rp_yunjia_seae',frm_rp_yunjia_seae.caption),nil,alClient);
  frm_rp_yunjia_seae.show;

end;

procedure Tfrm_open_report.bsSkinButton69Click(Sender: TObject);
begin
  if not if_open('272') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_yunfeibl_seae) then
    frm_rp_yunfeibl_seae:=tfrm_rp_yunfeibl_seae.Create (self);
  frm_rp_yunfeibl_seae.ManualDock(frm_main.SearchTabs('frm_rp_yunfeibl_seae',frm_rp_yunfeibl_seae.caption),nil,alClient);
  frm_rp_yunfeibl_seae.show;

end;

procedure Tfrm_open_report.bsSkinButton71Click(Sender: TObject);
begin
  if not if_open('271') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_dui_accepttotal) then
    frm_rp_dui_accepttotal:=Tfrm_rp_dui_accepttotal.Create(self);
  frm_rp_dui_accepttotal.ManualDock(frm_main.SearchTabs('frm_rp_dui_accepttotal',frm_rp_dui_accepttotal.caption),nil,alClient);
  frm_rp_dui_accepttotal.show;

end;

procedure Tfrm_open_report.bsSkinButton73Click(Sender: TObject);
begin
  {$IFDEF ZHYDTONGJI}
   if not if_open('111') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_rp_monthtotal) then
    frm_rp_rp_monthtotal:=tfrm_rp_rp_monthtotal.Create (self);
  frm_rp_rp_monthtotal.ManualDock(frm_main.SearchTabs('frm_rp_rp_monthtotal',frm_rp_rp_monthtotal.caption),nil,alClient);
  frm_rp_rp_monthtotal.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton74Click(Sender: TObject);
begin
  {$IFDEF XSGUANLI}
  if not if_open('232') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_sales_profit) then
    frm_rp_sales_profit:=tfrm_rp_sales_profit.Create (self);
  frm_rp_sales_profit.ManualDock(frm_main.SearchTabs('frm_rp_sales_profit',frm_rp_sales_profit.caption),nil,alClient);
  frm_rp_sales_profit.show;
  {$ENDIF}

end;

procedure Tfrm_open_report.bsSkinButton75Click(Sender: TObject);
begin
  {$IFDEF JGCHE}
  if not if_open('237') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_airtruck) then
    frm_rp_no_airtruck:=tfrm_rp_no_airtruck.Create (self);
  frm_rp_no_airtruck.ManualDock(frm_main.SearchTabs('frm_rp_no_airtruck',frm_rp_no_airtruck.caption),nil,alClient);
  frm_rp_no_airtruck.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton76Click(Sender: TObject);
begin
  {$IFDEF XSGUANLI}
  if not if_open('232') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_sales_profitLcx) then
    frm_rp_sales_profitLcx:=tfrm_rp_sales_profitLcx.Create (self);
  frm_rp_sales_profitLcx.ManualDock(frm_main.SearchTabs('frm_rp_sales_profitLcx',frm_rp_sales_profitLcx.caption),nil,alClient);
  frm_rp_sales_profitLcx.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton77Click(Sender: TObject);
begin
  {$IFDEF ZHZIYOU}
  if not if_open('111') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_chfree_total) then
    frm_rp_chfree_total:=tfrm_rp_chfree_total.Create (self);
  frm_rp_chfree_total.ManualDock(frm_main.SearchTabs('frm_rp_chfree_total',frm_rp_chfree_total.caption),nil,alClient);
  frm_rp_chfree_total.show;
  {$ENDIF}

end;

procedure Tfrm_open_report.bsSkinButton72Click(Sender: TObject);
begin
  {$IFDEF QFFZZONGHE}
  if not if_open('042') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_clienttotal) then
    frm_rp_ch_clienttotal:=tfrm_rp_ch_clienttotal.Create (self);
  frm_rp_ch_clienttotal.ManualDock(frm_main.SearchTabs('frm_rp_ch_clienttotal',frm_rp_ch_clienttotal.caption),nil,alClient);
  frm_rp_ch_clienttotal.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton80Click(Sender: TObject);
begin
  if not if_open('252') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_OutAmt) then
    frm_rp_ch_OutAmt:=tfrm_rp_ch_OutAmt.Create (self);
  frm_rp_ch_OutAmt.ManualDock(frm_main.SearchTabs('frm_rp_ch_OutAmt',frm_rp_ch_OutAmt.caption),nil,alClient);
  frm_rp_ch_OutAmt.show;
end;

procedure Tfrm_open_report.bsSkinButton78Click(Sender: TObject);
begin
  {$IFDEF KHGUANLI}
  if not if_open('257') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_crm_credit) then
    frm_crm_credit:=tfrm_crm_credit.Create (self);
  showprice:=false ;
  frm_crm_credit.ManualDock(frm_main.SearchTabs('frm_crm_credit',frm_crm_credit.caption),nil,alClient);
  frm_crm_credit.showall;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton82Click(Sender: TObject);
begin
  {$IFDEF GYSHANG}
  if not if_open('259') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_truck_no) then
    frm_rp_truck_no:=tfrm_rp_truck_no.Create (self);
  frm_rp_truck_no.ManualDock(frm_main.SearchTabs('frm_rp_truck_no',frm_rp_truck_no.caption),nil,alClient);
  frm_rp_truck_no.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton83Click(Sender: TObject);
begin
  {$IFDEF GYSHANG}
  if not if_open('260') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_apply_no) then
    frm_rp_apply_no:=tfrm_rp_apply_no.Create (self);
  frm_rp_apply_no.ManualDock(frm_main.SearchTabs('frm_rp_apply_no',frm_rp_apply_no.caption),nil,alClient);
  frm_rp_apply_no.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton79Click(Sender: TObject);
begin
  {$IFDEF QFYDFENXI}
  if not if_open('043') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_no_monthtotal) then
    frm_rp_no_monthtotal:=tfrm_rp_no_monthtotal.Create (self);
  frm_rp_no_monthtotal.ManualDock(frm_main.SearchTabs('frm_rp_no_monthtotal',frm_rp_no_monthtotal.caption),nil,alClient);
  frm_rp_no_monthtotal.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton81Click(Sender: TObject);
begin
  if not (if_open('280')) then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_hl_histry) then
    frm_rp_hl_histry:=tfrm_rp_hl_histry.Create (self);
  frm_rp_hl_histry.ManualDock(frm_main.SearchTabs('frm_rp_hl_histry',frm_rp_hl_histry.caption),nil,alClient);
  frm_rp_hl_histry.show;
end;

procedure Tfrm_open_report.bsSkinButton84Click(Sender: TObject);
begin
  {$IFDEF WLZHANG}
  if not if_open('287') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_genleg) then
    frm_rp_ch_genleg:=tfrm_rp_ch_genleg.Create (self);
  frm_rp_ch_genleg.ManualDock(frm_main.SearchTabs('frm_rp_ch_genleg',frm_rp_ch_genleg.caption),nil,alClient);
  frm_rp_ch_genleg.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton85Click(Sender: TObject);
begin
  {$IFDEF XSGUANLI}
  if not if_open('232') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_sales_profit_Lx) then
    frm_rp_sales_profit_Lx:=tfrm_rp_sales_profit_Lx.Create(self);
  frm_rp_sales_profit_Lx.ManualDock(frm_main.SearchTabs('frm_rp_sales_profit_lx',frm_rp_sales_profit_Lx.caption),nil,alClient);
  frm_rp_sales_profit_Lx.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.FormShow(Sender: TObject);
begin
  {$IFDEF YWTAIZHANG}
  {$ELSE}
   bsSkinButton28.Visible:=false;
   bsSkinButton15.Visible:=false;
   bsSkinButton12.Visible:=false;
   bsSkinButton17.Visible:=false;
   bsSkinButton18.Visible:=false;
   bsSkinButton34.Visible:=false;
  {$ENDIF}

  {$IFDEF QFZOUSHI}
  {$ELSE}
   bsSkinButton9.Visible:=false;
  {$ENDIF}
  {$IFDEF QFFZZONGHE}
  {$ELSE}
   bsSkinButton72.Visible:=false;
  {$ENDIF}
  {$IFDEF QFYDFENXI}
  {$ELSE}
   bsSkinButton79.Visible:=false;
  {$ENDIF}
  {$IFDEF KHGUANLI}
  {$ELSE}
   bsSkinButton78.Visible:=false;
  {$ENDIF}
  {$IFDEF ZJFENXI}
  {$ELSE}
   bsSkinGroupBox7.Visible:=false;
{
   bsSkinButton43.Visible:=false;
   bsSkinButton44.Visible:=false;
   bsSkinButton46.Visible:=false;
   bsSkinButton47.Visible:=false;
   bsSkinButton31.Visible:=false;
   bsSkinButton14.Visible:=false;
}
  {$ENDIF}
  {$IFDEF DLFENZHANG}
  {$ELSE}
   bsSkinButton35.Visible:=false;
   bsSkinButton25.Visible:=false;
  {$ENDIF}
  {$IFDEF ZHYDTONGJI}
  {$ELSE}
   bsSkinButton73.Visible:=false;
  {$ENDIF}
  {$IFDEF ZHMXTONGJI}
  {$ELSE}
   bsSkinButton68.Visible:=false;

  {$ENDIF}

  {$IFDEF ZHZIYOU}
  {$ELSE}
   bsSkinButton77.Visible:=false;

  {$ENDIF}
  {$IFDEF GYSHANG}
  {$ELSE}
   bsSkinButton82.Visible:=false;
   bsSkinButton83.Visible:=false;
  {$ENDIF}

   {$IFDEF TBQITA}
   {$ELSE}
   bsSkinButton51.Visible:=false;
   bsSkinButton52.Visible:=false;
   bsSkinButton53.Visible:=false;
   bsSkinButton54.Visible:=false;
   bsSkinButton56.Visible:=false;
   bsSkinButton57.Visible:=false;
   bsSkinButton58.Visible:=false;
   bsSkinButton59.Visible:=false;
   bsSkinButton27.Visible:=false;
   {$ENDIF}
   {$IFDEF FYZHUANGTAI}
   {$ELSE}
   bsSkinButton66.Visible:=false;
   {$ENDIF}

  {$IFDEF XSGUANLI}
  {$ELSE}
   bsSkinButton74.Visible:=false;
   bsSkinButton76.Visible:=false;
   bsSkinButton85.Visible:=false;
  {$ENDIF}

   {$IFDEF WLZHANG}
   {$ELSE}
   bsSkinButton84.Visible:=false;
   {$ENDIF}

end;

procedure Tfrm_open_report.bsSkinButton86Click(Sender: TObject);
begin
  {$IFDEF WLZHANG}
  if not if_open('287') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_wl_total) then
    frm_rp_wl_total:=tfrm_rp_wl_total.Create (self);
  frm_rp_wl_total.ManualDock(frm_main.SearchTabs('frm_rp_wl_total',frm_rp_wl_total.caption),nil,alClient);
  frm_rp_wl_total.show;
  {$ENDIF}
end;

procedure Tfrm_open_report.bsSkinButton87Click(Sender: TObject);
begin
   if not if_open('303') then
  begin
    showmessage('<27>Բ<EFBFBD><D4B2><EFBFBD><EFBFBD><EFBFBD>û<EFBFBD>д<EFBFBD>ģ<EFBFBD><C4A3><EFBFBD>IJ<EFBFBD><C4B2><EFBFBD>Ȩ<EFBFBD>ޣ<EFBFBD>');
    exit;
  end;
  if not assigned(frm_rp_ch_balance_detail) then
    frm_rp_ch_balance_detail:=tfrm_rp_ch_balance_detail.Create (self);
  frm_rp_ch_balance_detail.ManualDock(frm_main.SearchTabs('frm_rp_ch_balance_detail',frm_rp_ch_balance_detail.caption),nil,alClient);
  frm_rp_ch_balance_detail.show;
end;

end.