home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 April / Chip_1997-04_cd.bin / prezent / cb / data.z / DM.H < prev    next >
C/C++ Source or Header  |  1997-01-16  |  2KB  |  61 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++ Builder
  3. //Copyright (c) 1987 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------------
  6. #ifndef DMH
  7. #define DMH
  8. //---------------------------------------------------------------------------
  9. #include <Forms.hpp>
  10. #include <DBTables.hpp>
  11. #include <DB.hpp>
  12. #include <Controls.hpp>
  13. #include <Classes.hpp>
  14. //---------------------------------------------------------------------------
  15. class TDM1 : public TDataModule
  16. {
  17. __published:
  18.     TTable *tblMaster;
  19.     TStringField *tblMasterSYMBOL;
  20.     TStringField *tblMasterCO_NAME;
  21.     TStringField *tblMasterEXCHANGE;
  22.     TStringField *tblMasterIndustryLongName;
  23.     TFloatField *tblMasterCUR_PRICE;
  24.     TFloatField *tblMasterYRL_HIGH;
  25.     TFloatField *tblMasterYRL_LOW;
  26.     TFloatField *tblMasterP_E_RATIO;
  27.     TFloatField *tblMasterPROJ_GRTH;
  28.     TSmallintField *tblMasterINDUSTRY;
  29.     TSmallintField *tblMasterPRICE_CHG;
  30.     TStringField *tblMasterRATING;
  31.     TFloatField *tblMasterRANK;
  32.     TSmallintField *tblMasterOUTLOOK;
  33.     TStringField *tblMasterRCMNDATION;
  34.     TStringField *tblMasterRISK;
  35.     TDataSource *dsMaster;
  36.     TTable *tblIndustry;
  37.     TSmallintField *tblIndustryIND_CODE;
  38.     TStringField *tblIndustryIND_NAME;
  39.     TStringField *tblIndustryLONG_NAME;
  40.     TDataSource *dsIndustry;
  41.     TTable *tblHoldings;
  42.     TFloatField *tblHoldingsACCT_NBR;
  43.     TFloatField *tblHoldingsSHARES;
  44.     TFloatField *tblHoldingsPUR_PRICE;
  45.     TDateField *tblHoldingsPUR_DATE;
  46.     TStringField *tblHoldingsSYMBOL;
  47.     TCurrencyField *tblHoldingsPUR_COST;
  48.     TDataSource *dsHoldings;
  49.     void __fastcall tblHoldingsAfterPost(TDataSet *DataSet);
  50.     void __fastcall tblHoldingsCalcFields(TDataSet *DataSet);
  51.     void __fastcall tblHoldingsAfterOpen(TDataSet *DataSet);
  52.      void __fastcall CalculateTotals(TObject * Sender, TField * Field);
  53. private:        // private user declarations
  54. public:         // public user declarations
  55.     virtual __fastcall TDM1(TComponent* Owner);
  56. };
  57. //---------------------------------------------------------------------------
  58. extern TDM1 *DM1;
  59. //---------------------------------------------------------------------------
  60. #endif
  61.