datamol.pas

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

    AdoRmoneypdate: TStringField;
    AdoRmoneycheckman: TStringField;
    AdoRmoneycheckdate: TStringField;
    AdoRmoneycdate: TStringField;
    AdoRmoneyoperator: TStringField;
    AdoRmoney1: TADODataSet;
    AdoRmoney1id: TStringField;
    AdoRmoney1workno: TStringField;
    AdoRmoney1cardno: TStringField;
    AdoRmoney1name: TStringField;
    AdoRmoney1deptno: TStringField;
    AdoRmoney1prof: TStringField;
    AdoRmoney1gradename: TStringField;
    AdoRmoney1basepay: TBCDField;
    AdoRmoney1profpay: TBCDField;
    AdoRmoney1techpay: TBCDField;
    AdoRmoney1deptpay: TBCDField;
    AdoRmoney1pwho: TStringField;
    AdoRmoney1pdate: TStringField;
    AdoRmoney1checkresult: TBooleanField;
    AdoRmoney1cpgrade: TStringField;
    AdoRmoney1Cbasepay: TBCDField;
    AdoRmoney1Cprofpay: TBCDField;
    AdoRmoney1Ctechpay: TBCDField;
    AdoRmoney1Cdeptpay: TBCDField;
    AdoRmoney1Cpusedate: TStringField;
    AdoRmoney1checkdate: TStringField;
    AdoRmoney1checkman: TStringField;
    AdoRmoney1cdate: TStringField;
    AdoRmoney1operator: TStringField;
    AdoRmoney1try: TBooleanField;
    Adomanchange: TADODataSet;
    Adomanchangeworkno: TStringField;
    Adomanchangecardno: TStringField;
    Adomanchangename: TStringField;
    Adomanchangesexname: TStringField;
    Adomanchangedeptno: TStringField;
    Adomanchangedept: TStringField;
    Adomanchangeprof: TStringField;
    Adomanchangegradename: TStringField;
    Adomanchangescheno: TStringField;
    Adomanchangedothing: TStringField;
    Adomanchangefactorykind: TStringField;
    Adomanchangedayormon: TBooleanField;
    Adomanchangeotkind: TStringField;
    Adomanchangeusefuldate: TStringField;
    Adomanchangeunusedate: TStringField;
    Adomanchangecdate: TStringField;
    Adomanchangeoperator: TStringField;
    Adoadvancesexname: TStringField;
    Adoatdset: TADODataSet;
    Adoclock: TADODataSet;
    Adoclockclockname: TStringField;
    Adoclocktextlength: TIntegerField;
    Adoclocktextfiledir: TStringField;
    Adoclockdriverdir: TStringField;
    Adoclockdrivername: TStringField;
    Adoclockreadprogname: TStringField;
    Adoclockcardb: TIntegerField;
    Adoclockcarde: TIntegerField;
    Adoclockyearb: TIntegerField;
    Adoclockyeare: TIntegerField;
    Adoclockmonthb: TIntegerField;
    Adoclockdayb: TIntegerField;
    Adoclocktimeb: TIntegerField;
    Adoclocktimee: TIntegerField;
    Adoclockyndefault: TBooleanField;
    Adoclockmacb: TIntegerField;
    Adoclockmace: TIntegerField;
    Adoclockstateb: TIntegerField;
    Adoclockstatee: TIntegerField;
    Adoclockstatego1: TStringField;
    Adoclockstateout1: TStringField;
    Adoclockstatego2: TStringField;
    Adoclockstateout2: TStringField;
    Adoclockstatego3: TStringField;
    Adoclockstateout3: TStringField;
    Adoclockstatego4: TStringField;
    Adoclockstateout4: TStringField;
    Adoclockstatego5: TStringField;
    Adoclockstateout5: TStringField;
    Adoclockmemo: TStringField;
    Adoclockoperator: TStringField;
    Adoclockcdate: TDateTimeField;
    ADOchangebc: TADODataSet;
    ADOlianban: TADODataSet;
    ADOlianbanlianbanno: TStringField;
    ADOlianbangotime: TStringField;
    ADOlianbanouttime: TStringField;
    ADOlianbandecrease: TBCDField;
    ADOlianbanhours: TBCDField;
    ADOlianbanot: TBooleanField;
    ADOlianbanotkind: TStringField;
    ADOlianbanmemo: TStringField;
    ADOlianbanoperator: TStringField;
    ADOlianbancdate: TDateTimeField;
    ADOlianbanstartrq: TDateTimeField;
    ADOlianbanendrq: TDateTimeField;
    ADOask: TADODataSet;
    ADOdaytotal: TADODataSet;
    ADOoriginal: TADODataSet;
    ADOoriginalmacname: TStringField;
    ADOoriginalcardno: TStringField;
    ADOoriginalrectime: TStringField;
    ADOoriginalstate: TStringField;
    ADOoriginalreadok: TBooleanField;
    ADOoriginalrecdatetime: TStringField;
    ADOoriginalrecdate: TStringField;
    ADOsalset: TADODataSet;
    ADOresult: TADODataSet;
    ADOresultworkno: TStringField;
    ADOresultcardno: TStringField;
    ADOresultresultmoney: TBCDField;
    ADOresultmemo: TStringField;
    ADOresultrq: TDateTimeField;
    ADOborrow: TADODataSet;
    ADOborrowworkno: TStringField;
    ADOborrowcardno: TStringField;
    ADOborrowborrowmoney: TBCDField;
    ADOborrowreturnmonth: TStringField;
    ADOborrowmemo: TStringField;
    ADOborrowalreadyreturn: TBooleanField;
    ADOborrowrq: TDateTimeField;
    ADOyear: TADODataSet;
    ADOyearworkno: TStringField;
    ADOyearcardno: TStringField;
    ADOyearyearmoney: TBCDField;
    ADOyearmemo: TStringField;
    ADOproduct: TADODataSet;
    ADOyearrq: TDateTimeField;
    ADOproductworkno: TStringField;
    ADOproductcardno: TStringField;
    ADOproductproductmoney: TBCDField;
    ADOproductmemo: TStringField;
    ADOproductrq: TDateTimeField;
    ADOend: TADODataSet;
    ADOendworkno: TStringField;
    ADOendcardno: TStringField;
    ADOendendmoney: TBCDField;
    ADOendmemo: TStringField;
    ADOendrq: TDateTimeField;
    ADOsmoney: TADODataSet;
    ADOsmoneyworkno: TStringField;
    ADOsmoneycardno: TStringField;
    ADOsmoneysmoney: TBCDField;
    ADOsmoneymemo: TStringField;
    ADOpublic: TADODataSet;
    ADOpublicworknolength: TIntegerField;
    ADOpubliccardnolength: TIntegerField;
    ADOpublicbackpic: TStringField;
    ADOpublicfacback1: TStringField;
    ADOpublicfacback2: TStringField;
    ADOpublicfacback3: TStringField;
    ADOpublicfacback4: TStringField;
    ADOpublicfacback5: TStringField;
    ADOpublicfacback6: TStringField;
    ADOmealclock: TADODataSet;
    ADOmealclockclockname: TStringField;
    ADOmealclockyndefault: TBooleanField;
    ADOmealclocktextlength: TIntegerField;
    ADOmealclocktextfiledir: TStringField;
    ADOmealclockdriverdir: TStringField;
    ADOmealclockdrivername: TStringField;
    ADOmealclockreadprogname: TStringField;
    ADOmealclockcardb: TIntegerField;
    ADOmealclockcarde: TIntegerField;
    ADOmealclockyearb: TIntegerField;
    ADOmealclockyeare: TIntegerField;
    ADOmealclockmonthb: TIntegerField;
    ADOmealclockdayb: TIntegerField;
    ADOmealclocktimeb: TIntegerField;
    ADOmealclocktimee: TIntegerField;
    ADOmealclockmacb: TIntegerField;
    ADOmealclockmace: TIntegerField;
    ADOmealclockstateb: TIntegerField;
    ADOmealclockstatee: TIntegerField;
    ADOmealclockmemo: TStringField;
    ADOmealclockyuanb: TIntegerField;
    ADOmealclockyuane: TIntegerField;
    ADOmealclockjiaob: TIntegerField;
    ADOmealclockmoney: TBooleanField;
    adocompanyname1: TStringField;
    adocompanyname2: TStringField;
    adocompanyname3: TStringField;
    adocompanytel: TStringField;
    adocompanyfax: TStringField;
    adocompanyemail: TStringField;
    adocompanywebadd: TStringField;
    adocompanycomadd: TStringField;
    ADOsaltotalot: TADODataSet;
    ADObc: TADODataSet;
    ADOatddata: TADODataSet;
    ADOatddatascheno: TStringField;
    ADOatddataot: TBooleanField;
    ADOpersonalcdate: TDateTimeField;
    adoroom3: TADODataSet;
    dsroom3: TDataSource;
    adoroom3roomno: TStringField;
    adoroom3bedno: TStringField;
    adoroom3workno: TStringField;
    adoroom3name: TStringField;
    adoroom3deptno: TStringField;
    adoroom3prof: TStringField;
    adoroom3roomer: TBooleanField;
    adoroom3sexname: TStringField;
    ADOresultname: TStringField;
    ADOresultsex: TStringField;
    ADOyearname: TStringField;
    ADOyearsex: TStringField;
    ADOborrowname: TStringField;
    ADOborrowsex: TStringField;
    ADOproductname: TStringField;
    ADOproductsex: TStringField;
    ADOendname: TStringField;
    ADOendsex: TStringField;
    ADOsmoneyname: TStringField;
    ADOsmoneysex: TStringField;
    ADOatddataotkind: TStringField;
    ADOotkind: TADODataSet;
    ADOotkindotkind: TStringField;
    ADOotkindotname: TStringField;
    ADOotkindfixot: TBCDField;
    ADOotkindstarttime1: TStringField;
    ADOotkindendtime1: TStringField;
    ADOotkindmultipe1: TBCDField;
    ADOotkindanother1: TBooleanField;
    ADOotkindstarttime2: TStringField;
    ADOotkindendtime2: TStringField;
    ADOotkindmultipe2: TBCDField;
    ADOotkindanother2: TBooleanField;
    ADOotkindstarttime3: TStringField;
    ADOotkindendtime3: TStringField;
    ADOotkindmultipe3: TBCDField;
    ADOotkindanother3: TBooleanField;
    ADOotkindstarttime4: TStringField;
    ADOotkindendtime4: TStringField;
    ADOotkindmultipe4: TBCDField;
    ADOotkindanother4: TBooleanField;
    ADOotkindstarttime5: TStringField;
    ADOotkindendtime5: TStringField;
    ADOotkindmultipe5: TBCDField;
    ADOotkindanother5: TBooleanField;
    ADOotkindaddmoney: TBCDField;
    Dsotkind: TDataSource;
    ADOresultoperator: TStringField;
    ADOresultcdate: TDateTimeField;
    ADOborrowoperator: TStringField;
    ADOborrowcdate: TDateTimeField;
    ADOborrowborrowrq: TDateTimeField;
    ADOendoperator: TStringField;
    ADOendcdate: TDateTimeField;
    ADOproductoperator: TStringField;
    ADOproductcdate: TDateTimeField;
    ADOyearoperator: TStringField;
    ADOyearcdate: TDateTimeField;
    ADOotkindoperator: TStringField;
    ADOotkindcdate: TDateTimeField;
    ADOpersonalstoppay: TBooleanField;
    ADOpersonalruleno: TStringField;
    ADOsmoneyrq: TStringField;
    Dsothersalset: TDataSource;
    ADOothersalset: TADODataSet;
    ADOothersalsetprofmoney: TBooleanField;
    ADOothersalsetprofday: TBCDField;
    ADOothersalsettechmoney: TBooleanField;
    ADOothersalsettechday: TBCDField;
    ADOothersalsetdeptmoney: TBooleanField;
    ADOothersalsetdeptday: TBCDField;
    ADOothersalsetmoney1: TBooleanField;
    ADOothersalsetmoney1day: TBCDField;
    ADOothersalsetmoney2: TBooleanField;
    ADOothersalsetmoney2day: TBCDField;
    ADOothersalsetadd1: TBooleanField;
    ADOothersalsetadd1day: TBCDField;
    ADOothersalsetadd2: TBooleanField;
    ADOothersalsetadd2day: TBCDField;
    ADOothersalsetmanage: TBooleanField;
    ADOothersalsetmanageday: TBCDField;
    ADOothersalsetclearpay: TBooleanField;
    ADOothersalsetclearday: TBCDField;
    ADOothersalsetstaymoney: TBooleanField;
    ADOothersalsetstayday: TBCDField;
    ADOothersalsetmeatmoney: TBooleanField;
    ADOothersalsetmeatday: TBCDField;
    ADOothersalsetother1: TBooleanField;
    ADOothersalsetother1day: TBCDField;
    ADOothersalsetother2: TBooleanField;
    ADOothersalsetother2day: TBCDField;
    ADOothersalsetdecrease1: TBooleanField;
    ADOothersalsetdecrease1day: TBCDField;
    ADOothersalsetdecrease2: TBooleanField;
    ADOothersalsetdecrease2day: TBCDField;
    ADOpersonalmankind: TStringField;
    Adostoppaysdate: TDateTimeField;
    Adostoppayedate: TDateTimeField;
    Adostoppaycheckdate: TDateTimeField;
    Adostoppaycdate: TDateTimeField;
    Adomanchangemankind: TStringField;
    Adomanchangeruleno: TStringField;
    Adodismiss1workno: TStringField;
    Adodismiss1cardno: TStringField;
    Adodismiss1name: TStringField;
    Adodismiss1deptno: TStringField;
    Adodismiss1dept: TStringField;
    Adodismiss1prof: TStringField;
    Adodismiss1gradename: TStringField;
    Adodismiss1blood: TStringField;
    Adodismiss1sexname: TStringField;
    Adodismiss1birthday: TDateTimeField;
    Adodismiss1age: TIntegerField;
    Adodismiss1marry: TBooleanField;
    Adodismiss1peopleID: TStringField;
    Adodismiss1provname: TStringField;
    Adodismiss1people: TStringField;
    Adodismiss1homeadd: TStringField;
    Adodismiss1reladd: TStringField;
    Adodismiss1reltel1: TStringField;
    Adodismiss1reltel2: TStringField;
    Adodismiss1reltel3: TStringField;
    Adodismiss1reltel4: TStringField;
    Adodismiss1degreename: TStringField;
    Adodismiss1coursename: TStringField;
    Adodismiss1visa: TStringField;
    Adodismiss1foreignlan: TStringField;
    Adodismiss1indate: TDateTimeField;
    Adodismiss1leave: TBooleanField;
    Adodismiss1years: TFloatField;
    Adodismiss1specname1: TStringField;
    Adodismiss1specname2: TStringField;
    Adodismiss1specname3: TStringField;
    Adodismiss1specname4: TStringField;
    Adodismiss1experince: TMemoField;
    Adodismiss1introduce1: TStringField;
    Adodismiss1relation1: TStringField;
    Adodismiss1introduce2: TStringField;
    Adodismiss1relation2: TStringField;
    Adodismiss1memo: TStringField;
    Adodismiss1try: TBooleanField;
    Adodismiss1brushcard: TBooleanField;
    Adodismiss1scheno: TStringField;
    Adodismiss1dothing: TStringField;
    Adodismiss1factorykind: TStringField;
    Adodismiss1basepay: TFloatField;
    Adodismiss1profmoney: TFloatField;
    Adodismiss1techmoney: TFloatField;
    Adodismiss1deptmoney: TFloatField;
    Adodismiss1money1: TFloatField;
    Adodismiss1money2: TFloatField;
    Adodismiss1add1: TFloatField;
    Adodismiss1add2: TFloatField;
    Adodismiss1fixot: TFloatField;