udm.~pas

delphi 开发的完整的仓库管理系统（带数据库）

unit UDM;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TDM = class(TDataModule)
    ADOConn: TADOConnection;
    QGYSXX: TADOQuery;
    QSPXX: TADOQuery;
    QSPRKXX: TADOQuery;
    QSPCKXX: TADOQuery;
    QUSER: TADOQuery;
    DSOGYSXX: TADODataSet;
    DSOSPXX: TADODataSet;
    DSOSPRKXX: TADODataSet;
    DSOSPCKXX: TADODataSet;
    DataSource1: TDataSource;
    DataSource2: TDataSource;
    DataSource3: TDataSource;
    DataSource4: TDataSource;
    DSOGYSXXDSDesigner: TStringField;
    DSOGYSXXDSDesigner2: TStringField;
    DSOGYSXXDSDesigner3: TStringField;
    DSOGYSXXDSDesigner4: TStringField;
    DSOGYSXXDSDesigner5: TStringField;
    DSOGYSXXDSDesigner6: TStringField;
    DSOGYSXXDSDesigner7: TStringField;
    DSOGYSXXDSDesigner8: TStringField;
    DSOGYSXXDSDesigner9: TStringField;
    DSOGYSXXDSDesigner10: TStringField;
    DSOGYSXXDSDesigner11: TStringField;
    QKCB: TADOQuery;
    DSOKCB: TADODataSet;
    DataSource5: TDataSource;
    DSOSPXXDSDesigner: TStringField;
    DSOSPXXDSDesigner2: TStringField;
    DSOSPXXDSDesigner3: TStringField;
    DSOSPXXDSDesigner4: TStringField;
    DSOSPXXDSDesigner5: TStringField;
    DSOSPXXDSDesigner6: TStringField;
    DSOSPXXDSDesigner7: TStringField;
    DSOSPXXDSDesigner8: TStringField;
    DSOSPXXDSDesigner9: TBCDField;
    DSOSPXXDSDesigner10: TBCDField;
    DSOSPXXDSDesigner11: TStringField;
    DSOSPXXDSDesigner12: TStringField;
    DSOSPXXDSDesigner13: TStringField;
    DSOSPRKXXDSDesigner: TStringField;
    DSOSPRKXXDSDesigner2: TStringField;
    DSOSPRKXXDSDesigner3: TStringField;
    DSOSPRKXXDSDesigner4: TStringField;
    DSOSPRKXXDSDesigner5: TStringField;
    DSOSPRKXXDSDesigner6: TStringField;
    DSOSPRKXXDSDesigner7: TStringField;
    DSOSPRKXXDSDesigner8: TStringField;
    DSOSPRKXXDSDesigner9: TDateTimeField;
    DSOSPRKXXDSDesigner10: TStringField;
    DSOSPRKXXDSDesigner11: TStringField;
    DSOSPCKXXDSDesigner: TStringField;
    DSOSPCKXXDSDesigner2: TStringField;
    DSOSPCKXXDSDesigner3: TStringField;
    DSOSPCKXXDSDesigner4: TStringField;
    DSOSPCKXXDSDesigner5: TStringField;
    DSOSPCKXXDSDesigner6: TStringField;
    DSOSPCKXXDSDesigner7: TDateTimeField;
    DSOSPCKXXDSDesigner8: TStringField;
    DSOSPCKXXDSDesigner9: TStringField;
    DSOKCBDSDesigner: TStringField;
    DSOKCBDSDesigner2: TStringField;
    DSOKCBDSDesigner3: TStringField;
    DSOKCBDSDesigner4: TStringField;
    DSOKCBDSDesigner5: TStringField;
    Q: TADOQuery;
    DSOUSER: TADODataSet;
    DSOUSERDSDesigner: TStringField;
    DSOUSERDSDesigner2: TStringField;
    DSOUSERDSDesigner3: TStringField;
    QSJHF: TADOQuery;
    BF: TADOCommand;
    BACK: TADOConnection;
    QSX: TADOQuery;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DM: TDM;

implementation

uses  UGYSXX, ULOGIN, UMAIN, USC, USPCKXX, USPJBXX, USPKCCX,
  USPRKXX, UGYSXX_Z;

{$R *.dfm}

end.