saldatareport.pas

来自「pasa人力资源考勤管理系统」· PAS 代码 · 共 611 行 · 第 1/2 页

unit saldatareport;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, ppBands, ppCache, ppClass, ppComm, ppRelatv, ppProd,
  ppReport, Db, ADODB, ppDB, ppCtrls, ppPrnabl, ppDBPipe, ppDBBDE, ppVar,
  Mask;

type
  Tpersaldata = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    RadioGroup1: TRadioGroup;
    ComboBox1: TComboBox;
    Button2: TButton;
    Edit1: TMaskEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    StaticText1: TStaticText;
    RadioGroup2: TRadioGroup;
    RadioGroup3: TRadioGroup;
    ADODataSet4: TADODataSet;
    ADODataSet4workno: TStringField;
    ADODataSet4name: TStringField;
    ADODataSet4prof: TStringField;
    ADODataSet4indate: TDateTimeField;
    ADODataSet4basepay: TBCDField;
    ADODataSet4present: TBCDField;
    ADODataSet4insurance: TBCDField;
    ADODataSet4rewardmoney: TBCDField;
    ADODataSet4pubtax: TBCDField;
    ADODataSet4factprof: TBCDField;
    ADODataSet4facttech: TBCDField;
    ADODataSet4mustgive: TBCDField;
    ADODataSet4factdept: TBCDField;
    ADODataSet4clearpay: TBCDField;
    ADODataSet4resultmoney: TBCDField;
    ADODataSet4pie2: TBCDField;
    ADODataSet4panishmoney: TBCDField;
    ADODataSet4mustdec: TBCDField;
    ADODataSet4factmoney: TBCDField;
    ADODataSet4factbasepay: TBCDField;
    ADODataSet4factdays: TBCDField;
    ADODataSet4yearmoney: TBCDField;
    ADODataSet4smoney: TBCDField;
    ADODataSet4otmoney: TBCDField;
    ADODataSet4tax: TBCDField;
    ADODataSet4yangrao: TBCDField;
    ADODataSet4yiliao: TBCDField;
    ADODataSet4gongsa: TBCDField;
    ADODataSet4meatmoneybu: TBCDField;
    ADODataSet4txmoney: TBCDField;
    ADODataSet4rat: TBCDField;
    ADODataSet4money1: TBCDField;
    ADODataSet4eightornine: TIntegerField;
    ADODataSet4medmoney: TBCDField;
    ADODataSet4latedec: TBCDField;
    ADODataSet4kuanggongdec: TBCDField;
    ADODataSet4otherdec: TBCDField;
    ADODataSet4otheradd: TBCDField;
    DataSource4: TDataSource;
    ADODataSet2: TADODataSet;
    ppBDEPipeline4: TppBDEPipeline;
    ppReport4: TppReport;
    ppHeaderBand3: TppHeaderBand;
    ppLabel144: TppLabel;
    ppLabel145: TppLabel;
    ppLabel146: TppLabel;
    ppLabel147: TppLabel;
    ppLabel148: TppLabel;
    ppLabel149: TppLabel;
    ppSystemVariable3: TppSystemVariable;
    ppSystemVariable4: TppSystemVariable;
    ppDetailBand4: TppDetailBand;
    ppLine98: TppLine;
    ppDBText129: TppDBText;
    ppDBText158: TppDBText;
    ppLine99: TppLine;
    ppLine100: TppLine;
    ppDBText159: TppDBText;
    ppLine101: TppLine;
    ppDBText160: TppDBText;
    ppLine102: TppLine;
    ppDBText178: TppDBText;
    ppLine103: TppLine;
    ppDBText179: TppDBText;
    ppLine104: TppLine;
    ppLine105: TppLine;
    ppDBText180: TppDBText;
    ppLine106: TppLine;
    ppDBText181: TppDBText;
    ppLine107: TppLine;
    ppDBText183: TppDBText;
    ppLine109: TppLine;
    ppDBText184: TppDBText;
    ppLine110: TppLine;
    ppDBText185: TppDBText;
    ppDBText186: TppDBText;
    ppLine111: TppLine;
    ppDBText187: TppDBText;
    ppLine112: TppLine;
    ppDBText188: TppDBText;
    ppLine113: TppLine;
    ppDBText189: TppDBText;
    ppLine114: TppLine;
    ppDBText190: TppDBText;
    ppDBText191: TppDBText;
    ppLine115: TppLine;
    ppLine116: TppLine;
    ppLine117: TppLine;
    ppLine118: TppLine;
    ppLine119: TppLine;
    ppDBText192: TppDBText;
    ppLine164: TppLine;
    ppLine165: TppLine;
    ppDBText193: TppDBText;
    ppLine170: TppLine;
    ppLine171: TppLine;
    ppLine172: TppLine;
    ppDBText194: TppDBText;
    ppDBText198: TppDBText;
    ppDBText199: TppDBText;
    ppDBText200: TppDBText;
    ppDBText182: TppDBText;
    ppLine108: TppLine;
    ppLine34: TppLine;
    ppLabel150: TppLabel;
    ppLine35: TppLine;
    ppLabel151: TppLabel;
    ppLine36: TppLine;
    ppLabel152: TppLabel;
    ppLine37: TppLine;
    ppLabel153: TppLabel;
    ppLine38: TppLine;
    ppLabel154: TppLabel;
    ppLine39: TppLine;
    ppLabel155: TppLabel;
    ppLine43: TppLine;
    ppLine44: TppLine;
    ppLabel158: TppLabel;
    ppLine45: TppLine;
    ppLabel159: TppLabel;
    ppLine46: TppLine;
    ppLabel160: TppLabel;
    ppLine47: TppLine;
    ppLabel161: TppLabel;
    ppLine48: TppLine;
    ppLabel162: TppLabel;
    ppLine49: TppLine;
    ppLine50: TppLine;
    ppLabel163: TppLabel;
    ppLine51: TppLine;
    ppLine52: TppLine;
    ppLabel164: TppLabel;
    ppLine53: TppLine;
    ppLine54: TppLine;
    ppLabel165: TppLabel;
    ppLabel166: TppLabel;
    ppLine55: TppLine;
    ppLabel167: TppLabel;
    ppLabel169: TppLabel;
    ppLabel170: TppLabel;
    ppLine57: TppLine;
    ppLine58: TppLine;
    ppLine59: TppLine;
    ppLabel171: TppLabel;
    ppLabel172: TppLabel;
    ppLine60: TppLine;
    ppLabel227: TppLabel;
    ppLabel228: TppLabel;
    ppLabel229: TppLabel;
    ppLabel230: TppLabel;
    ppLabel231: TppLabel;
    ppLabel232: TppLabel;
    ppLabel233: TppLabel;
    ppLabel251: TppLabel;
    ppLabel253: TppLabel;
    ppLabel254: TppLabel;
    ppLabel255: TppLabel;
    ppLabel256: TppLabel;
    ppLine62: TppLine;
    ppLabel257: TppLabel;
    ppLine42: TppLine;
    ppLabel226: TppLabel;
    ppLine41: TppLine;
    ppLine61: TppLine;
    ppLabel157: TppLabel;
    ppLabel156: TppLabel;
    ppLine56: TppLine;
    ppLabel168: TppLabel;
    ppLabel252: TppLabel;
    ppLine40: TppLine;
    ppBDEPipeline3: TppBDEPipeline;
    DataSource3: TDataSource;
    ADODataSet5: TADODataSet;
    StringField1: TStringField;
    StringField2: TStringField;
    StringField3: TStringField;
    DateTimeField1: TDateTimeField;
    BCDField1: TBCDField;
    BCDField2: TBCDField;
    BCDField3: TBCDField;
    BCDField4: TBCDField;
    BCDField5: TBCDField;
    BCDField6: TBCDField;
    BCDField7: TBCDField;
    BCDField8: TBCDField;
    BCDField9: TBCDField;
    BCDField10: TBCDField;
    BCDField11: TBCDField;
    BCDField12: TBCDField;
    BCDField13: TBCDField;
    BCDField14: TBCDField;
    BCDField15: TBCDField;
    BCDField16: TBCDField;
    BCDField17: TBCDField;
    BCDField18: TBCDField;
    BCDField19: TBCDField;
    BCDField20: TBCDField;
    BCDField21: TBCDField;
    BCDField22: TBCDField;
    BCDField23: TBCDField;
    BCDField24: TBCDField;
    BCDField25: TBCDField;
    BCDField26: TBCDField;
    BCDField27: TBCDField;
    BCDField28: TBCDField;
    IntegerField1: TIntegerField;
    BCDField29: TBCDField;
    BCDField30: TBCDField;
    BCDField31: TBCDField;
    BCDField32: TBCDField;
    BCDField33: TBCDField;
    ADODataSet5decrease2: TBCDField;
    ppReport8: TppReport;
    ppHeaderBand6: TppHeaderBand;
    ppLabel315: TppLabel;
    ppLabel350: TppLabel;
    ppLabel351: TppLabel;
    ppLabel352: TppLabel;
    ppLabel353: TppLabel;
    ppSystemVariable7: TppSystemVariable;
    ppSystemVariable8: TppSystemVariable;
    ppLabel316: TppLabel;
    ppDetailBand8: TppDetailBand;
    ppLine145: TppLine;
    ppLine147: TppLine;
    ppLine150: TppLine;
    ppLine151: TppLine;
    ppLine152: TppLine;
    ppLine153: TppLine;
    ppLine154: TppLine;
    ppLine156: TppLine;
    ppLine157: TppLine;
    ppLine158: TppLine;
    ppLine155: TppLine;
    ppDBText169: TppDBText;
    ppLine159: TppLine;
    ppDBText170: TppDBText;
    ppLine160: TppLine;
    ppDBText171: TppDBText;
    ppDBText172: TppDBText;
    ppLine148: TppLine;
    ppDBText173: TppDBText;
    ppLine161: TppLine;
    ppDBText174: TppDBText;
    ppLine162: TppLine;
    ppDBText175: TppDBText;
    ppLine163: TppLine;
    ppDBText176: TppDBText;
    ppDBText177: TppDBText;
    ppLine166: TppLine;
    ppLine167: TppLine;
    ppLine168: TppLine;
    ppLine169: TppLine;
    ppLine28: TppLine;
    ppDBText127: TppDBText;
    ppLine31: TppLine;
    ppLine33: TppLine;
    ppDBText128: TppDBText;
    ppLine128: TppLine;
    ppLine143: TppLine;
    ppLine149: TppLine;
    ppDBText165: TppDBText;
    ppLine24: TppLine;
    ppDBText125: TppDBText;
    ppDBText126: TppDBText;
    ppDBText195: TppDBText;
    ppDBText161: TppDBText;
    ppDBText162: TppDBText;
    ppDBText163: TppDBText;
    ppDBText197: TppDBText;
    ppDBText164: TppDBText;
    ppDBText166: TppDBText;
    ppDBText167: TppDBText;
    ppDBText196: TppDBText;
    ppDBText168: TppDBText;
    ppLine134: TppLine;
    ppLabel243: TppLabel;
    ppLine135: TppLine;
    ppLabel244: TppLabel;
    ppLine136: TppLine;
    ppLabel245: TppLabel;
    ppLine137: TppLine;