localforretireaccount.~pas

企业端数据申报系统：单位管理模块 单位查询. 业务申报模块 在线数据下载 在线数据上传 在线业务申核 申报业务查询 磁盘数据导出 磁盘数据导入 在线业务模块 在线业务

unit LocalForRetireAccount;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, BASEWIN, StdCtrls, TFlatGroupBoxUnit, TFlatEditUnit,
  TFlatComboBoxUnit, TFlatSpeedButtonUnit, XPMenu, Menus, ActnList,
  ImgList, TFlatButtonUnit, ExtCtrls, QuickRpt, QRCtrls, ComCtrls,
  TFlatMemoUnit, IdBaseComponent, IdComponent, IdTCPConnection,
  IdTCPClient, IdHTTP, ztvregister, ztvBase, ztvUnZip;
const screenwidth=1024;
const screenheight=768;
type
  TLocalForRetireAccount_frm = class(Tbasewin_frm)
    Panel4: TPanel;
    Label1: TLabel;
    FlatSpeedButton1: TFlatSpeedButton;
    Label34: TLabel;
    Label6: TLabel;
    FlatComboBox3: TFlatComboBox;
    FlatEdit1: TFlatEdit;
    FlatComboBox1: TFlatComboBox;
    FlatComboBox2: TFlatComboBox;
    FlatComboBox4: TFlatComboBox;
    FlatComboBox5: TFlatComboBox;
    FlatComboBox6: TFlatComboBox;
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    TabSheet2: TTabSheet;
    TabSheet3: TTabSheet;
    TabSheet4: TTabSheet;
    FlatGroupBox1: TFlatGroupBox;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label9: TLabel;
    Label5: TLabel;
    Label11: TLabel;
    Label12: TLabel;
    Label13: TLabel;
    Label18: TLabel;
    Label20: TLabel;
    Label22: TLabel;
    Label29: TLabel;
    Label30: TLabel;
    Label23: TLabel;
    Label31: TLabel;
    Label32: TLabel;
    Label24: TLabel;
    Label33: TLabel;
    FlatEdit2: TFlatEdit;
    FlatEdit3: TFlatEdit;
    FlatEdit4: TFlatEdit;
    FlatEdit6: TFlatEdit;
    FlatEdit7: TFlatEdit;
    FlatEdit11: TFlatEdit;
    FlatEdit12: TFlatEdit;
    FlatEdit13: TFlatEdit;
    FlatEdit18: TFlatEdit;
    FlatEdit20: TFlatEdit;
    FlatEdit25: TFlatEdit;
    FlatEdit26: TFlatEdit;
    FlatEdit27: TFlatEdit;
    FlatEdit28: TFlatEdit;
    FlatEdit30: TFlatEdit;
    FlatEdit31: TFlatEdit;
    FlatEdit32: TFlatEdit;
    FlatEdit33: TFlatEdit;
    GroupBox1: TGroupBox;
    Label700: TLabel;
    Label8: TLabel;
    Label10: TLabel;
    Label14: TLabel;
    Label15: TLabel;
    Label17: TLabel;
    FlatEdit15: TFlatEdit;
    FlatEdit8: TFlatEdit;
    FlatEdit9: TFlatEdit;
    FlatEdit10: TFlatEdit;
    FlatEdit14: TFlatEdit;
    GroupBox2: TGroupBox;
    Label16: TLabel;
    Panel2: TPanel;
    Panel3: TPanel;
    FlatButton1: TFlatButton;
    FlatButton2: TFlatButton;
    ScrollBox1: TScrollBox;
    Panel5: TPanel;
    Label19: TLabel;
    Label21: TLabel;
    Label25: TLabel;
    Label26: TLabel;
    Label27: TLabel;
    Label28: TLabel;
    Label35: TLabel;
    Bevel2: TBevel;
    Bevel3: TBevel;
    Bevel5: TBevel;
    Bevel6: TBevel;
    Bevel7: TBevel;
    Bevel4: TBevel;
    v01: TFlatEdit;
    v02: TFlatEdit;
    v03: TFlatEdit;
    v04: TFlatEdit;
    v05: TFlatEdit;
    v06: TFlatEdit;
    ScrollBox2: TScrollBox;
    Panel6: TPanel;
    ScrollBox3: TScrollBox;
    Panel7: TPanel;
    QRShape66: TQRShape;
    QRShape67: TQRShape;
    QRShape68: TQRShape;
    QRShape69: TQRShape;
    QRShape70: TQRShape;
    QRShape71: TQRShape;
    QRShape72: TQRShape;
    QRShape73: TQRShape;
    QRShape74: TQRShape;
    QRShape75: TQRShape;
    QRShape76: TQRShape;
    QRShape77: TQRShape;
    QRShape78: TQRShape;
    QRShape79: TQRShape;
    QRShape80: TQRShape;
    QRShape81: TQRShape;
    QRShape82: TQRShape;
    QRShape83: TQRShape;
    QRShape84: TQRShape;
    QRShape85: TQRShape;
    QRShape86: TQRShape;
    QRShape87: TQRShape;
    QRShape88: TQRShape;
    QRShape89: TQRShape;
    QRShape90: TQRShape;
    QRShape91: TQRShape;
    QRShape92: TQRShape;
    QRShape93: TQRShape;
    QRShape94: TQRShape;
    QRShape95: TQRShape;
    QRShape96: TQRShape;
    QRShape97: TQRShape;
    QRShape98: TQRShape;
    QRShape99: TQRShape;
    QRShape100: TQRShape;
    QRShape101: TQRShape;
    QRShape102: TQRShape;
    QRShape103: TQRShape;
    QRShape104: TQRShape;
    QRShape105: TQRShape;
    QRShape106: TQRShape;
    QRShape107: TQRShape;
    QRShape108: TQRShape;
    QRShape109: TQRShape;
    QRShape110: TQRShape;
    QRShape111: TQRShape;
    QRShape112: TQRShape;
    QRShape113: TQRShape;
    QRShape114: TQRShape;
    QRShape115: TQRShape;
    QRShape116: TQRShape;
    QRShape117: TQRShape;
    QRShape118: TQRShape;
    QRShape119: TQRShape;
    QRShape120: TQRShape;
    QRShape121: TQRShape;
    QRShape122: TQRShape;
    QRShape123: TQRShape;
    QRShape124: TQRShape;
    Label37: TLabel;
    Label38: TLabel;
    Label39: TLabel;
    Label40: TLabel;
    Label41: TLabel;
    Label42: TLabel;
    Label43: TLabel;
    Label44: TLabel;
    Label45: TLabel;
    Label46: TLabel;
    Label47: TLabel;
    Label48: TLabel;
    Label49: TLabel;
    Label50: TLabel;
    Label51: TLabel;
    Label52: TLabel;
    Label53: TLabel;
    Label54: TLabel;
    Label55: TLabel;
    Label56: TLabel;
    Label57: TLabel;
    Label58: TLabel;
    Label59: TLabel;
    Label60: TLabel;
    Label61: TLabel;
    Label62: TLabel;
    Label63: TLabel;
    Label64: TLabel;
    Label65: TLabel;
    Label66: TLabel;
    Label67: TLabel;
    Label68: TLabel;
    Label69: TLabel;
    Label70: TLabel;
    Label71: TLabel;
    Label72: TLabel;
    Label73: TLabel;
    Label74: TLabel;
    Label75: TLabel;
    Label76: TLabel;
    Label77: TLabel;
    Label78: TLabel;
    Label79: TLabel;
    Label80: TLabel;
    Label81: TLabel;
    Label82: TLabel;
    Label83: TLabel;
    Label84: TLabel;
    Label85: TLabel;
    Label86: TLabel;
    Label87: TLabel;
    Label88: TLabel;
    Label89: TLabel;
    Label90: TLabel;
    Label91: TLabel;
    Label92: TLabel;
    Label93: TLabel;
    Label94: TLabel;
    Label95: TLabel;
    Label96: TLabel;
    Label97: TLabel;
    Label98: TLabel;
    Label99: TLabel;
    Label100: TLabel;
    Label101: TLabel;
    Label102: TLabel;
    Label103: TLabel;
    Label104: TLabel;
    Label105: TLabel;
    Label106: TLabel;
    Label107: TLabel;
    Label108: TLabel;
    Label109: TLabel;
    Label110: TLabel;
    Label111: TLabel;
    Label112: TLabel;
    Label116: TLabel;
    v07: TFlatEdit;
    v08: TFlatEdit;
    v09: TFlatEdit;
    v10: TFlatEdit;
    v11: TFlatEdit;
    v12: TFlatEdit;
    v13: TFlatEdit;
    v14: TFlatMemo;
    v15: TFlatEdit;
    v16: TFlatEdit;
    v17: TFlatEdit;
    v18: TFlatEdit;
    v19: TFlatEdit;
    v20: TFlatEdit;
    v21: TFlatEdit;
    v22: TFlatEdit;
    v23: TFlatEdit;
    v24: TFlatEdit;
    v25: TFlatEdit;
    v26: TFlatEdit;
    v27: TFlatEdit;
    v28: TFlatEdit;
    v29: TFlatEdit;
    v30: TFlatEdit;
    v31: TFlatEdit;
    v32: TFlatEdit;
    v33: TFlatEdit;
    v34: TFlatEdit;
    v35: TFlatEdit;
    v36: TFlatEdit;
    v37: TFlatEdit;
    v38: TFlatEdit;
    v39: TFlatEdit;
    v40: TFlatEdit;
    v41: TFlatEdit;
    v42: TFlatEdit;
    v43: TFlatEdit;
    v44: TFlatEdit;
    v45: TFlatEdit;
    v46: TFlatEdit;
    v47: TFlatEdit;
    v48: TFlatEdit;
    v49: TFlatEdit;
    Label117: TLabel;
    Label118: TLabel;
    Label119: TLabel;
    v54: TFlatEdit;
    Label120: TLabel;
    v55: TFlatEdit;
    Label121: TLabel;
    v56: TFlatEdit;
    Label123: TLabel;
    v50: TFlatEdit;
    Label36: TLabel;
    Label122: TLabel;
    Label124: TLabel;
    v60: TFlatEdit;
    v61: TFlatEdit;
    v62: TFlatEdit;
    v63: TFlatEdit;
    Label113: TLabel;
    Label114: TLabel;
    Label115: TLabel;
    Label126: TLabel;
    Label127: TLabel;
    Label128: TLabel;
    Label129: TLabel;
    Label130: TLabel;
    Label131: TLabel;
    v57: TFlatEdit;
    v58: TFlatEdit;
    v59: TFlatEdit;
    Label125: TLabel;
    v51: TFlatEdit;
    v52: TFlatEdit;
    v53: TFlatEdit;
    Label132: TLabel;
    Label133: TLabel;
    Label134: TLabel;
    v64: TFlatEdit;
    Label135: TLabel;
    v65: TFlatEdit;
    Label136: TLabel;
    v66: TFlatEdit;
    Label137: TLabel;
    v67: TFlatEdit;
    v68: TFlatEdit;
    v69: TFlatEdit;
    v70: TFlatEdit;
    Panel8: TPanel;
    Panel9: TPanel;
    FlatButton6: TFlatButton;
    Panel12: TPanel;
    Panel13: TPanel;
    FlatButton8: TFlatButton;
    Panel14: TPanel;
    Panel15: TPanel;
    FlatButton10: TFlatButton;
    FlatButton5: TFlatButton;
    IdHTTP1: TIdHTTP;
    UnZip: TUnZip;
    Label138: TLabel;
    Label139: TLabel;
    Label140: TLabel;
    Label141: TLabel;
    FlatEdit5: TFlatEdit;
    Label142: TLabel;
    Label1430: TLabel;
    Label1440: TLabel;
    Label145: TLabel;
    FlatComboBox7: TFlatComboBox;
    FlatButton7: TFlatButton;
    FlatButton9: TFlatButton;
    Label146: TLabel;
    FlatEdit16: TFlatEdit;