Exemplo n.º 1
0
void CBlockEvaluator::Add_OnOff(DataDefnBlk &DDB, DDBPages PageIs)
  {
  BOOL DoIt=true;
  if (PrjFileVerNo()>=99)
    DoIt=DDB.BeginObject(m_pNd, "EB", "EB_Slct", 0, DDB_NoPage);
  
  if (DoIt)
    {
    DDB.String("", "EvalSeq.Feed", DC_, "", &m_sBlkSeqFeed, m_pNd, 0); 
    if (StateSemanticsOn())
      DDB.String("", "EvalSeq.Content", DC_, "", &m_sBlkSeqState, m_pNd, 0); 
    if (m_Options&BEO_WithMakeups)
      DDB.Long("Makeups", "", DC_, "", xidNMakeups, m_pNd, isParmStopped|SetOnChange); 
    if (m_Options&BEO_WithBleeds)
      DDB.Long("Bleeds",  "", DC_, "", xidNBleeds,  m_pNd, isParmStopped|SetOnChange); 

    //DDB.Text("");
    if (m_Options&BEO_WithMakeups)
      {
      for (int a=0; a<m_pMakeups.GetSize(); a++)
        m_pMakeups[a]->Add_OnOff(DDB, isParmStopped|SetOnChange, 100000+a*1000);
      }

    if (m_pRB)
      m_pRB->Add_OnOff(DDB, isParmStopped|SetOnChange);
    if (m_pHX)
      m_pHX->Add_OnOff(DDB, isParmStopped|SetOnChange);
    if (m_pEHX)
      m_pEHX->Add_OnOff(DDB, isParmStopped|SetOnChange);
    if (m_pVLE)
      m_pVLE->Add_OnOff(DDB, isParmStopped|SetOnChange);
    if (m_pEvap)
      m_pEvap->Add_OnOff(DDB, isParmStopped|SetOnChange);

    if (m_Options&BEO_WithBleeds)
      {
      for (int a=0; a<m_pBleeds.GetSize(); a++)
        m_pBleeds[a]->Add_OnOff(DDB, isParmStopped|SetOnChange, 200000+a*1000);
      }
    }

  if (PrjFileVerNo()>=99)
    DDB.EndObject();

  if (PrjFileVerNo()<99 && (DDB.DoingPutData() && DDB.ForFileSnpScn() || 0))
    {                      
    static DDBValueLst DDBBS[]={
      {0, "RB EHX VLE" },
      {1, "EHX RB VLE" },
      {0}};
    DDB.Byte("BlockActionSeq",         "",   DC_,  "",  xidOldBlkSeq, m_pNd, isParmStopped, DDBBS);
    }

  DDB.Text("");
  };
Exemplo n.º 2
0
void CIsolator::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.BeginStruct(this, "CIsolator", NULL, DDB_NoPage);
  DDB.Text("");
  DDB.Long       ("TermCfg",    "", DC_,    "",  xidTSCfg, this, isParm, DDBCTTypes);
  DDB.CheckBoxBtn("On",         "", DC_,    "",  &m_bOn,          this, isParm);
  DDB.Double     ("HeatLoad",   "", DC_Pwr, "W",  xidHtLoad,          this, isResult);
  DDB.Text("");
  m_tsPwrIn.BuildDataDefn(DDB, 1, true);
  m_tsPwrOut.BuildDataDefn(DDB, 2, true);

  DDB.EndStruct();
  }
Exemplo n.º 3
0
void CSzSSA::BuildDataDefn(DataDefnBlk & DDB)
  {
//  DDB.CheckBox("SetSAM",        "",     DC_,          "",       &m_bSetSAM,         this,  m_bSAMCalcd ? 0 : isParm);
  if (DDB.BeginStruct(this, "SSA", 0))
    {
    DDB.Byte    ("",              "Method",     DC_,          "",       &m_iMethod,            this, 0/*isParm*/, DDBMeth);
    DDB.Visibility(NSHM_All ,m_iMethod==SSA_Independent);
    if (!DDB.ForFileSnpScn())
      DDB.CheckBoxBtn("SetData",  "",           DC_,          "",       xidSSAAllowSet,        this, isParm);
    DDB.Long    ("",              "Solids",     DC_,          "",       &m_iSolids,            this, (m_bHasPSD || !DataSettable()) ? 0 : isParm, SDB.DDBSolSpListDash());
    DDB.Visibility();
    DDB.Double  ("SeedSurfAreaM", "SAM",        DC_SurfAreaM, "m^2/g",  xidSSAPartSAM,         this, (m_bHasPSD || !DataSettable()) ? 0 : isParm);
    DDB.Double  ("SeedSurfAreaL", "SAL",        DC_SurfAreaL, "m^2/L",  xidSSAPartSAL,         this, noFile);
    DDB.Double  ("#/s",           "",           DC_,          "",       xidSSAPartNoperSec,    this, noFile|InitHidden);
    DDB.Double  ("#/L",           "",           DC_,          "",       xidSSAPartNoperVol,    this, noFile|InitHidden);
    DDB.Double  ("PartDiam",      "D",          DC_L,         "um",     xidSSAPartDiam,        this, ((m_bHasPSD || !DataSettable()) ? 0 : isParm)|noFile);
    DDB.Double  ("SolidsQm",      "",           DC_Qm,        "kg/s",   xidSSAPartSolidsQm,    this, noFile|InitHidden);
    }
  DDB.EndStruct();
  }
Exemplo n.º 4
0
void CTransformer::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.BeginStruct(this, "CTransformer", NULL, DDB_NoPage);
  DDB.Text("");
  DDB.Long       ("PriCfg",    "", DC_,   "",  xidTSCfgP, this, isParm, DDBCTTypes);
  DDB.Long       ("SecCfg",    "", DC_,   "",  xidTSCfgS, this, isParm, DDBCTTypes);
  DDB.Text("");
  DDB.Double       ("NomPriVolts",   "", DC_V,     "V",     &m_dPriV, this, isParm);
  DDB.Double       ("NomSecVolts",   "", DC_V,     "V",     &m_dSecV, this, isParm);
  DDB.Double       ("PriResist",     "", DC_Ohms,  "Ohms",  xidPriR,  this, isParm);
  DDB.Double       ("PriIndReact",   "", DC_Ohms,  "Ohms",  xidPriX,  this, isParm);
  DDB.Double       ("SecResist",     "", DC_Ohms,  "Ohms",  xidSecR,  this, isParm);
  DDB.Double       ("SecIndReact",   "", DC_Ohms,  "Ohms",  xidSecX,  this, isParm);
  DDB.Double       ("NoLoadCurrent", "", DC_I,     "A",     &m_dNLI,  this, isParm);
  DDB.Double       ("NoLoadPhase",   "", DC_Ang,   "deg",   &m_dNLA,  this, isParm);
  DDB.Double       ("HeatLoad",      "", DC_Pwr,   "W",     xidHtLoad,this, 0);
  DDB.Text("");
  m_tsPri.BuildDataDefn(DDB, 1, true);
  m_tsSec.BuildDataDefn(DDB, 2, true);
  DDB.EndStruct();
  }
Exemplo n.º 5
0
void CActuator::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.BeginStruct(this, "CActuator", NULL, DDB_NoPage);
  DDB.Text("");
  DDB.CheckBoxBtn("On",           "",         DC_, "", &bOn,           this, isParmStopped, DDBYesNo);
  DDB.CheckBoxBtn("ShowCnv",      "",         DC_, "", &bWithCnvComment,this, isParmStopped, DDBYesNo);
  DDB.Visibility();
  DDB.Long("", "Ac_Cnt",  DC_, "", idmCount,       this, isParmStopped/*|AffectsStruct*/);
  DDB.Text("");
  if (m_DataBlk.GetSize()>0)
    {
    DDB.Button("Check_tags",   "", DC_,    "",    idmCheckBtn,      this, isParmStopped);
    DDB.Text("");
    DDB.String("State",        "", DC_,    "",    &m_StateLine[0],  this, noSnap|noFile);
    DDB.Text("Error:");
    DDB.String("Msg_1",        "", DC_,    "",    &m_StateLine[1],  this, noSnap|noFile);
    DDB.String("Msg_2",        "", DC_,    "",    &m_StateLine[2],  this, noSnap|noFile);
    DDB.Text("");
    }
  DDB.Text("----------------------------------------");

  static DDBValueLst DDBFail[]={
      {Fail_None,                         "None"             },
      {Fail_Hold,                         "Hold"             },
      {Fail_Hold|Fail_Noise,              "Hold,Noise"       },
      {Fail_MinVal,                       "MinVal"           },
      {Fail_MaxVal,                       "MaxVal"           },
      {Fail_LoVal,                        "LoVal"            },
      {Fail_HiVal,                        "HiVal"            },
      {Fail_MinVal|Fail_Ramp,             "MinVal,Ramp"      },
      {Fail_MaxVal|Fail_Ramp,             "MaxVal,Ramp"      },
      {Fail_LoVal|Fail_Ramp,              "LoVal,Ramp"       },
      {Fail_HiVal|Fail_Ramp,              "HiVal,Ramp"       },
      {Fail_MinVal|Fail_Noise,            "MinVal,Noise"     },
      {Fail_MaxVal|Fail_Noise,            "MaxVal,Noise"     },
      {Fail_LoVal|Fail_Noise,             "LoVal,Noise"      },
      {Fail_HiVal|Fail_Noise,             "HiVal,Noise"      },
      {Fail_MinVal|Fail_Ramp|Fail_Noise,  "MinVal,Ramp,Noise"},
      {Fail_MaxVal|Fail_Ramp|Fail_Noise,  "MaxVal,Ramp,Noise"},
      {Fail_LoVal|Fail_Ramp|Fail_Noise,   "LoVal,Ramp,Noise" },
      {Fail_HiVal|Fail_Ramp|Fail_Noise,   "HiVal,Ramp,Noise" },
      {0}};
  static DDBValueLst DDBXForms[]={
      {XF_None,   "None"   },
      {XF_Linear, "Linear" },
      //{XF_Sqr,    "Sqr"    },
      //{XF_Sqrt,   "Sqrt"   },
      {0}};
  static DDBValueLst DDBFilters[]={
      {Flt_None,        "None"   },
      {Flt_FirstOrder,  "FirstOrder" },
      {0}};
  static DDBValueLst DDBRawXLates[]={
      {XL_None,     "None"   },
      {XL_AtoD,     "AtoD"  },
      {XL_Linear,   "Linear" },
      //{XL_PulseEncode  "PulseWidth" },
      {0}};
  char Buff[128];
  Strng Tag;
  if (DDB.BeginArray(this, "Cfg", "Ac_Cfg", m_DataBlk.GetSize()))
    {
    for (int i=0; i<m_DataBlk.GetSize(); i++)
      {
      if (1)// i>0 && (i % 2)==1)
        {
        sprintf(Buff, "%d", i);
        DDB.Page(Buff, DDB_OptPage);
        }
      DDB.BeginElement(this, i);
      CActuatorBlk * T = m_DataBlk[i];
      Strng CnvTxt;
      if (bWithCnvComment && XRefsValid() && T->m_bValid)
        GetValidCnvTxt(T->m_OutputVar, CnvTxt);
      DDB.String("ID",                 "",            DC_,          "", idmCfgTags+(i*NoOfCfgTags)+1, this, isParmStopped|isTag);
      DDB.String("OutputTag",          "",            DC_,          "", idmCfgTags+(i*NoOfCfgTags)+2, this, isParmStopped|isTag);
      //DDB.Double("RequiredValue",      "ReqdVal",         DC_,          "", &T->m_dReqdValue,               this, isResult|noFileAtAll);
      DDB.Double("RequiredValue",      "Rqd",         DC_,          "", &T->m_dReqdValue,               this, isResult|noFileAtAll);
      if (CnvTxt.Len())
        DDB.TagComment(CnvTxt());

//      DDB.Byte  ("Transform",          "",            DC_,          "",   &T->m_Xform.m_iType,  this, isParm|SetOnChange, DDBXForms);
//      DDB.Visibility(NSHM_All, T->m_Xform.m_iType);
//      DDB.Float ("Xf.Factor",          "",            DC_,          "",   &T->m_Xform.m_dFactor,      this, isParm);
//      DDB.Float ("Xf.Bias",            "",            DC_,          "",   &T->m_Xform.m_dBias,        this, isParm);
//
//      DDB.Visibility();
//
//      DDB.Byte  ("Filter",             "",            DC_,          "",   &T->m_Flt.m_iType,   this, isParm|SetOnChange, DDBFilters);
//      DDB.Visibility(NSHM_All, T->m_Flt.m_iType == Flt_FirstOrder);
//      DDB.Float ("Flt.TimeConst",      "Flt.Tau",     DC_Time,      "s",  &T->m_Flt.m_dTau,    this, isParm);
//      DDB.Double("Flt.PrevValue",      "",            DC_,          "",   &T->m_Flt.m_dPrevValue, this, InitHidden);
//      DDB.Visibility();
//
//      DDB.Byte  ("Fail.Mode",          "",            DC_,          "",   &T->m_Fail.m_iType,   this, isParm|SetOnChange, DDBFail);
//      DDB.Float ("Fail.LoValue",       "",            DC_,          "",   &T->m_Fail.m_dLoValue,   this, isParm);
//      DDB.Float ("Fail.HiValue",       "",            DC_,          "",   &T->m_Fail.m_dHiValue,   this, isParm);
//      DDB.Float ("Fail.NoiseStdDev",   "",            DC_,          "%",  &T->m_Fail.m_dNoiseStdDevFrac,   this, isParm);
//      DDB.Float ("Fail.SlewTime",      "",            DC_Time,      "s",  &T->m_Fail.m_dSlewTime,   this, isParm);
//
//
//      DDB.Float ("MinValue",           "MinV",        DC_,          "",   &T->m_dMinValue,   this, isParm);
//      DDB.Float ("MaxValue",           "MaxV",        DC_,          "",   &T->m_dMaxValue,   this, isParm);
//      DDB.Double("Value",              "",            DC_,          "",   &T->m_dValue,      this, isResult);
//
//      DDB.Float ("LoLimit",            "LL",          DC_,          "",   &T->m_dLoLimit,    this, isParm);
//      DDB.Float ("HiLimit",            "HL",          DC_,          "",   &T->m_dHiLimit,    this, isParm);
//
      flag ff=0;
      DDB.CheckBox  ("LoInvert",       "",            DC_,          "",   &T->m_bLoInvert,   this, isParm|SetOnChange);
      DDB.CheckBox  ("HiInvert",       "",            DC_,          "",   &T->m_bHiInvert,   this, isParm|SetOnChange);
      DDB.Bool      ("",               "Lo",          DC_,          "",   &T->m_bLo,         this, isResult);
      DDB.Bool      ("",               "Hi",          DC_,          "",   &T->m_bHi,         this, isResult);

//      DDB.Byte      ("RawTransform",   "",            DC_,          "",   &T->m_RawXform.m_iType,  this, isParm|SetOnChange, DDBRawXLates);
//      DDB.Visibility(NSHM_All, T->m_RawXform.m_iType>=XL_AtoD);
//      DDB.Float     ("Raw.MinValue",   "",            DC_,          "",   &T->m_RawXform.m_dMinValue,    this, isParm);
//      DDB.Float     ("Raw.MaxValue",   "",            DC_,          "",   &T->m_RawXform.m_dMaxValue,    this, isParm);
//      DDB.Visibility();
//
      //DDB.Double    ("OutputValue",    "Output",      DC_,          "",   &T->m_dOutputValue,   this, isResult);
      DDB.Double    ("OutputValue",    "Out",         DC_,          "",   &T->m_dOutputValue,   this, isResult);

      DDB.String    ("PLCAddess",      "",            DC_,          "",   &T->m_sPLCAddress,    this, isParmStopped|InitHidden);
      
      DDB.Long      ("Priority",       "",            DC_,          "",   idmCfgTags+(i*NoOfCfgTags)+4, this, isParmStopped|InitHidden);
      DDB.Text("----------------------------------------");
      }
    }
  DDB.EndArray();

  DDB.EndStruct();
  }
Exemplo n.º 6
0
/*This provides access to the variables of the model and calls the
BuildDataDefn for objects used by the model.*/
void BeltCnv::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.BeginStruct(this);

  //DDB.Page   ("Parms");
  DDB.Text    ("");
  DDB.Visibility(NM_Dynamic|SM_All|HM_All);
  BuildDataDefnElevation(DDB);
  DDB.Text("");
  DDB.Double  ("BeltSpeed",    "",                DC_Ldt,  "m/s",   xidBeltSpeed,       this, isResult);
  DDB.Visibility();
  DDB.Double  ("Length",       "L",               DC_L,    "m",     xidBeltLength,      this, isParm);
  DDB.Visibility(NM_Dynamic|SM_All|HM_All);
  DDB.Double  ("MaxSpeed",     "",                DC_Ldt,  "m/s",   &m_MaxVelocity,     this, isParm);
  DDB.Double  ("MaxLoading",   "MaxSpillLoad",    DC_MpL,  "kg/m",  &m_MaxSpillLoading, this, isParm);
  DDB.Double  ("MinLoading",   "",                DC_MpL,  "kg/m",  &m_MinLoading,      this, isParm|InitHidden);
  DDB.Long    ("MaxTurndown",  "",                DC_,     "",      &m_MaxTurnDown,     this, isParm|InitHidden);

  DDB.Visibility(NM_Dynamic|SM_All|HM_All);
  DDB.Double  ("",             "MaxStallLoad",    DC_M,    "kg",    &m_MaxStallLoading, this, isParm);
  DDB.CheckBox("",             "StartIfStalled",  DC_,     "",      &m_fStartIfStalled, this, isParm);
  DDB.Byte    ("",             "WasRunning",      DC_,     "",      &m_fWasRunning,     this, isResult|InitHidden);

  DDB.Double  ("TotalMass",    "",                DC_M,    "kg",    xidTotalMass,       this, isResult);
  DDB.Double  ("AvgLoading",   "",                DC_MpL,  "kg/m",  xidAvgLoading,      this, isResult);

  if (OrigPrjFileVerNo()<90 && DDB.ForFileSnpScn())
    DDB.String  ("SpillArea",    "",              DC_,     "",      &m_sAreaTag,        this, isParmStopped);
  DDB.Double  ("TotalSpilt",   "",                DC_M,    "kg",    xidTotSpilt,        this, isParm);
  DDB.Double  ("TotalVented",  "",                DC_M,    "kg",    xidTotVented,       this, isParm);

  DDB.Page("BeltDrive", DDB_RqdPage);
  DDB.Text    ("Power Draw");
  DDB.Double  ("NoLoadPower",  "",                DC_Pwr,  "kW",    &m_NLPower,         this, isParm);
  DDB.Double  ("FullLoadPower","",                DC_Pwr,  "kW",    &m_FLPower,         this, isParm);
  DDB.Double  ("Power",        "",                DC_Pwr,  "kW",    &m_Power,           this, isResult);

  DDB.Text("");
  m_Pwr.BuildDataDefn(DDB);
  m_BeltSB.BuildDataDefn(DDB, this, "Speed", 1);
  DDB.Visibility();

  DDB.Text("");
  DDB.Long    ("NoWtMtrs",     "",                DC_,     "",      xidNWtMtrs,         this, isParm);
  static DDBValueLst DDB1[] = {
    {QPT_None,        "None" },
    {QPT_FixedPts,    "Fixed Points"},
    {QPT_AllSections, "All Section Pts"},
    {QPT_MinSections, "Min Section Pts"},
    {0}};
  DDB.CheckBox("ShowProfile",  "",                DC_,     "",      xidShowProf,        this, isParm|SetOnChange);
  DDB.Visibility(NM_Dynamic|SM_All|HM_All, m_fShowProfile);
  DDB.Long    ("ProfDispType", "",                DC_,     "",      xidProfDispType,    this, isParm, DDB1);
  //DDB.Visibility(NM_Dynamic|SM_All|HM_All, m_fShowProfile && m_ProfDispType==QPT_FixedPts);
  //DDB.Long    ("ProfilePts",   "",                DC_,     "",      xidProfPts,         this, isParm);
  DDB.Visibility(NM_Dynamic|SM_All|HM_All);
  DDB.Long    ("NSections",    "",                DC_,     "",      xidNSections,       this, isResult);
  if (DDB.BeginStruct(this, "MinSect", 0, DDB_NoPage))
    {
    DDB.Double  ("Length",     "",                DC_Frac, "%",     &m_Q.m_dMinFracSectLen,  this, isParm);
    DDB.Visibility(NM_Dynamic|SM_All|HM_All, m_Q.m_dMinFracSectLen>0);
    DDB.Double  ("LoadTol",    "",                DC_Frac, "%",     &m_Q.m_dLoadTol,  this, isParm);
    DDB.Double  ("TempTol",    "",                DC_Frac, "%",     &m_Q.m_dTempTol,  this, isParm);
    DDB.Double  ("MFracTol",   "",                DC_Frac, "%",     &m_Q.m_dMFracTol,  this, isParm);
    }
  DDB.EndStruct();

  DDB.Text("");
  BuildDataDefnShowIOs(DDB);


  if (m_WtMtrPos.GetSize())
    {
    DDB.Page("WtMtrs", DDB_RqdPage);
    if (DDB.BeginArray(this, "WtMtr", "WtMtr", m_WtMtrPos.GetSize(), 0))
      {
      for (int i=0; i<m_WtMtrPos.GetSize(); i++)
        if (DDB.BeginElement(this, i))
          {
          DDB.Double("Pos",      "",                  DC_L ,     "m",     xidWtrMtrPos0+i,      this, isParm);
          DDB.Double("Loading",  "",                  DC_MpL,    "kg/m",  xidWtrMtrLd0+i,       this, isResult|0);
          DDB.Double("Rate",     "",                  DC_Qm,     "kg/s",  xidWtrMtrRate0+i,     this, isResult|0);
          DDB.Text("");
          }
      }
    DDB.EndArray();
    }


  int FdLst[MaxIOList], PrLst[MaxIOList];
  int nFd=0, nPr=0;
  for (int i=0; i<NoFlwIOs(); i++)
    if (IOId_Self(i)==idFeed)
      FdLst[nFd++]=i;
    else if (IOId_Self(i)==idProd)
      PrLst[nPr++]=i;

  int DoOld=((!DDB.ForFiling() && !DDB.ForSnapShot() && !DDB.ForScenario() && !DDB.ForView()) ||
            (DDB.ForFiling() && DDB.DoingPutData()));

  Strng Nm;
  DDB.Page("Feeds", DDB_RqdPage);
  if (DDB.BeginArray(this, "Fd", "BltCnvFd", nFd, 0))
    for (i=0; i<nFd; i++)
      if (DDB.BeginElement(this, Nd_Rmt(FdLst[i])->FullObjTag()))
        {
        DDB.Double     ("Pos",      "",  DC_L , "m",      xidFeedPos0+i,      this, isParm);
        DDB.Visibility(NM_Dynamic|SM_All|HM_All);
        DDB.CheckBoxBtn("Limited",  "",  DC_, "",         xidFeedLimited0+i,  this, isParm);
        DDB.Visibility(NM_Dynamic|SM_All|HM_All, m_Q.FeedLimited(i));
        DDB.Double     ("Capacity", "",  DC_Frac, "%",    xidFeedCapFrac0+i,  this, isParm);
        DDB.Visibility();
        DDB.Double     ("Qm",       "",  DC_Qm , "kg/s",  xidFeedQm0+i,       this, 0);
        DDB.Text("");

        if (DoOld)
          {
          DDB.BeginElement(this, i);
          DDB.Double("Pos",     "",  DC_L , "m",    xidFeedPos0+i,       this, isParm);
          DDB.Double("Qm",     "",  DC_Qm , "kg/s",  xidFeedQm0+i,       this, 0);
          }
        }
  DDB.EndArray();

  DDB.Page("Products", DDB_RqdPage);
  if (DDB.BeginArray(this, "Pr", "BltCnvPr", nPr, 0))
    for (i=0; i<nPr; i++)
      if (DDB.BeginElement(this, Nd_Rmt(PrLst[i])->FullObjTag()))
        {
        DDB.Double("Pos",     "",   DC_L ,     "m",    xidProdPos0+i,       this, isParm);
        DDB.Double("Removal","",    DC_Frac , "%",     xidProdRemove0+i,    this, isParm);
        DDB.Double("Qm",    "",     DC_Qm ,   "kg/s",  xidProdQm0+i,        this, 0);
        DDB.Double("Loss",  "",     DC_Qm ,   "kg/s",  xidProdLoss0+i,      this, 0);

        DDB.Text("");

        if (DoOld)
          {
          DDB.BeginElement(this, i);
          //DDB.TagComment(Nd_Rmt(PrLst[i])->FullObjTag());
          //DDB.BeginElement(this, Nd_Rmt(PrLst[i])->FullObjTag());
          DDB.Double("Pos",     "",   DC_L ,     "m",    xidProdPos0+i,       this, isParm);
          DDB.Double("Removal","",    DC_Frac , "%",     xidProdRemove0+i,    this, isParm);
          DDB.Double("Qm",    "",     DC_Qm ,   "kg/s",  xidProdQm0+i,        this, 0);
          DDB.Double("Loss",  "",     DC_Qm ,   "kg/s",  xidProdLoss0+i,      this, 0);
          }
        }
  DDB.EndArray();

  if (m_fShowProfile)
    DDB.Object(&m_Q.Profile(), this);

  //BuildDataDefnAreaIOs(DDB);

  DDB.EndStruct();
  };
Exemplo n.º 7
0
void C2DPoly::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.Long("Order",    "", DC_, "", xidPolyOrder   , this, isParm);
  CBaseMdl::BuildDataDefn(DDB);
  }
Exemplo n.º 8
0
/*#F:This provides access to the variables of the model and calls the
BuildDataDefn for objects Tled by the model.*/
void Flot::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.BeginStruct(this);

  DDB.Visibility();
  GSM.Add_OnOff(DDB);

  DDB.Visibility(DYNMODE);
	DDB.Text    ("");
  //DDB.Double  ("Datum_Rqd",      "Z_Rqd",         DC_L    , "m",     &Z_Rqd,      this, isParm|NAN_OK);
  //DDB.Double  ("Datum",          "Z",             DC_L,    "m",      &Z,          this, 0);
  DDB.Double  ("Pressure",       "P",             DC_P,    "kPag",   xidPMean,    this, noFile|noSnap);
  DDB.Double  ("Temperature",    "T",             DC_T,    "C",      xidTemp,     this, noFile|noSnap);
  DDB.Double  ("Density",        "Rho",           DC_Rho,  "kg/m^3", xidRho,      this, noFile|noSnap);
  DDB.Double  ("Level",          "Lvl",           DC_Frac, "%",      xidLevel,    this, noFile|noSnap);
  DDB.Double  ("Mass_Accum",     "QmAcc",         DC_Qm,  "kg/s",    &QmAcc,      this, noFile|noSnap);
  DDB.Double  ("Vol_Accum",      "QvAcc",         DC_Qv,  "L/s",     &QvAcc,      this, noFile|noSnap);
  DDB.Visibility();

  DDB.Text    ("");
  static DDBValueLst DDB1[]={
    {(int)True,  "SizeRecovery"},
    {(int)False, "NoSizeRecovery" },
    {0}};
  DDB.Bool    ("RecoveryMethod", "Method",        DC_,     "",       &RM,         this, isParm, DDB1);
	DDB.Long    ("Float",          "Flot?",         DC_,     "",       &iFlot,      this, isParm, SDB.DDBSolSpList());
  if (!RM)
		{
    DDB.Double("Recovery",       "Recovery",      DC_Frac, "%",      &Eff,        this, isParm);
		DDB.Double("Grade",          "Grade",         DC_Frac, "%",      &Grd,        this, isParm);

		DDB.Text    ("");
		static DDBValueLst DDB0[]={
			{(int)True,  "Yes"},
			{(int)False, "No" },
			{0}};
		DDB.Bool  ("SecondFloat?",   "SecFloat?",     DC_,     "",       &SecFlot,    this, isParm, DDB0);
		if (SecFlot)
			{
			DDB.Long  ("SecondFloat",  "SecFlot",       DC_,     "",       &iSec,       this, isParm, SDB.DDBSolSpList());
			DDB.Double("SecondGrade",  "SecGrade",      DC_Frac, "%",      &Grade2,     this, isParm);
			}
		}
  if (RM)
		{
    DDB.Double("TotalRec",       "TotalRec",      DC_Frac, "%",      &TotRecover, this, 0);
		DDB.Double("Grade",          "Grade",         DC_Frac, "%",      &Grade,      this, 0);
		}
  DDB.Text("");

  
  DDB.Text    ("");
  //DDB.Double  ("SS_Lvl",         "",              DC_Frac, "%",      &SS_Lvl,     this, isParm);
  DDB.Double  ("WaterInConc",    "FlotWater",     DC_Frac, "%",      &Rec,        this, isParm);


  DDB.Visibility(DYNMODE);
  DDB.Byte    ("Collect",        "Coll?",         DC_,     "",       &iColl,      this, isParm, SDB.DDBSpList());
  DDB.Visibility();
  RB.Add_OnOff(DDB);
  BuildDataDefnShowIOs(DDB);

  if (RM)
    DDB.Object(&SizeRec, this, NULL, NULL, DDB_RqdPage);

  RB.BuildDataDefn(DDB, NULL, NULL, DDB_RqdPage, 0);
  
  GSM.BuildDataDefn(DDB);

  if (SolveMode()==DYNMODE)
    {
    DDB.Object(&Contents, this, NULL, NULL, DDB_RqdPage);
    DDB.Object(&PresetImg, this, NULL, NULL, DDB_RqdPage);
    }

  DDB.Visibility(DYNMODE);
  DDB.Object(&FlotFn, this, NULL, NULL, DDB_RqdPage);
  DDB.Visibility();

  DDB.EndStruct();
 
  };
Exemplo n.º 9
0
void CoolingTower::BuildDataDefn(DataDefnBlk & DDB)
  {
  DDB.BeginStruct(this);

  DDB.Visibility(NM_Dynamic|SM_All|HM_All);
  BuildDataDefnElevation(DDB);
  DDB.Double  ("Pressure",     "P",     DC_P,    "kPag",   xidPMean,       this, isResult|0);
  DDB.Double  ("Temperature",  "T",     DC_T,    "C",      xidTemp,        this, isResult|0);
  DDB.Double  ("Density",      "Rho",   DC_Rho,  "kg/m^3", xidRho,         this, isResult|0);
  DDB.Double  ("Level",        "Lvl",   DC_Frac, "%",      xidLevel,       this, isResult|0);
  DDB.Double  ("Mass_Accum",   "QmAcc", DC_Qm,  "kg/s",    &m_QmAcc,       this, isResult|0);
  DDB.Double  ("Vol_Accum",    "QvAcc", DC_Qv,  "L/s",     &m_QvAcc,       this, isResult|0);
  AddMdlNetworked(DDB);

  DDB.Visibility(NM_Probal|SM_All|HM_All);
  static DDBValueLst DDB0[]={
    {CTM_Simple, "Simple"},
    {CTM_Merkel, "Merkel"},
    {0}};
  static DDBValueLst DDB1[]={
    {MCT_KaVL, "KaV/L"},
    {MCT_TOut, "OutletT"},
    {0}};
  static DDBValueLst DDB2[]={
    {WLM_None, "None"},
    {WLM_Frac, "MassFrac"},
    {WLM_Qm, "MassFlow"},
    {WLM_DriftBlowdown, "Drift&Blowdown"},
    {0}};

  //TODO: many of these variables should be calculated using xid_xxx rather than storing everything!
  DDB.Text    ("");
  DDB.Byte    ("Method",               "", DC_,     "",      &iMethod,        this, isParm|SetOnChange, DDB0);
  DDB.Text    ("");
  DDB.Text    ("Characteristics");
  DDB.Visibility(NM_Probal|SM_All|HM_All, iMethod==CTM_Merkel);
  DDB.Byte    ("CalcType",             "", DC_,     "",      &iMerkelCalcType,this, isParm|SetOnChange, DDB1);
  DDB.Visibility(NM_Probal|SM_All|HM_All);
  DDB.Double  ("AirWetBulbT",          "", DC_T,    "C",     &dAirWetBulbT,   this, isParm);
  DDB.Double  ("ApproachTemp","ApproachT", DC_dT,   "C",     &dApproachT,     this, (iMethod==CTM_Merkel && iMerkelCalcType==MCT_TOut) ? isResult : isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iMethod==CTM_Merkel);
  DDB.Double  ("LG_Ratio",             "", DC_,     "",      &dLGRatio,       this, isParm);
  DDB.Double  ("KaVL",                 "", DC_,     "",      &dKaVL,          this, (iMethod==CTM_Merkel && iMerkelCalcType==MCT_TOut) ? isParm : isResult);
  DDB.Visibility(NM_Probal|SM_All|HM_All);
  DDB.Double  ("FeedQm",               "", DC_Qm,   "kg/s",  &dQmIn,          this, isResult);
  DDB.Double  ("TempFeed",       "Feed.T", DC_T,    "C",     &dTempKFeed,     this, isResult);
  DDB.Double  ("TempDrop",        "TDrop", DC_dT,   "C",     &dTempDrop,      this, isResult);
  DDB.Double  ("FinalT",               "", DC_T,    "C",     &dFinalT,        this, isResult);
  //DDB.Double  ("HeatFlow",             "", DC_Pwr,  "kW",    &dHeatFlow,      this, isResult); perhaps remove???
  DDB.Visibility(NM_Probal|SM_All|HM_All, iMethod==CTM_Merkel);
  DDB.Double  ("HeatTransfer",         "", DC_Pwr,  "kW",    &dDuty,          this, isResult);
  DDB.Visibility(NM_Probal|SM_All|HM_All);
  DDB.Double  ("FinalP",               "", DC_P,    "kPag",  &dFinalP,        this, isResult|InitHidden);
  DDB.Text    ("");
  DDB.Text    ("Water Loss/Makeup");
  DDB.Byte    ("LossMethod",           "", DC_,     "",      &iLossMethod,    this, isParm|SetOnChange, DDB2);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iLossMethod==WLM_DriftBlowdown);
  DDB.Double  ("DriftLoss",            "", DC_Frac, "%",     &dDriftLossFrac, this, isParm);
  DDB.Long    ("Cycles",               "", DC_,     "",      &iCycles,        this, isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iLossMethod==WLM_Frac);
  DDB.Double  ("RqdLossFrac",          "", DC_Frac, "%",     &dRqdLossFrac,   this, isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iLossMethod==WLM_Qm);
  DDB.Double  ("RqdLossQm",            "", DC_Qm,   "kg/s",  &dRqdLossQm,     this, isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iLossMethod==WLM_Frac || iLossMethod==WLM_Qm);
  DDB.Double  ("FracOfLossToDrift",    "", DC_Frac, "%",     &dRqdDriftLossFrac, this, isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iMethod==CTM_Merkel);
  DDB.Double  ("EvapFactor",           "", DC_,     "",      &dEvapFactor,    this, isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All, iMethod==CTM_Simple);
  DDB.Double  ("MaxEvapFrac",          "", DC_Frac, "%",     &dMaxEvapFrac,   this, isParm);
  DDB.Visibility(NM_Probal|SM_All|HM_All);
  DDB.Double  ("DriftLossQm",          "", DC_Qm,   "kg/s",  &dDriftLossQm,   this, isResult);
  DDB.Double  ("BlowdownLossQm",       "", DC_Qm,   "kg/s",  &dBlowdownLossQm,this, isResult);
  DDB.Double  ("LossQm",               "", DC_Qm,   "kg/s",  &dLossQm,        this, isResult);
  DDB.Double  ("EvapLossQm",           "", DC_Qm,   "kg/s",  &dEvapLossQm,    this, isResult);
  DDB.Double  ("TotalLossQm",          "", DC_Qm,   "kg/s",  &dTotalLossQm,   this, isResult|InitHidden);
  DDB.Double  ("WaterEvapQm",    "EvapQm", DC_Qm,   "kg/s",  &dQmWaterEvap,   this, isResult|InitHidden);
  DDB.Double  ("WaterVapFrac",         "", DC_Frac, "%",     &dEvapFrac,      this, isResult);
  if (iMethod==CTM_Merkel)
    {
    DDB.Text    ("");
    DDB.Text    ("Air-Water Mixture Estimates");
    }
  DDB.Visibility(NM_Probal|SM_All|HM_All, iMethod==CTM_Merkel);
  DDB.Double  ("AirEnthOut",           "", DC_HMs,  "kJ/kg", &dAirEnthOut,    this, isResult);
  DDB.Double  ("HeatAvailable",        "", DC_Pwr,  "kW",    &dDuty,          this, isResult);
  DDB.Double  ("AirQm",                "", DC_Qm,   "kg/s",  &dAirQmIn,       this, isResult);
  DDB.Double  ("AirCp",                "", DC_CpMs, "kJ/kg.C",&dAirCp,        this, isParm);
  DDB.Double  ("AirInDryBulbT",        "", DC_T,    "C",     &dAirDryBulbT,   this, isParm);
  DDB.Double  ("AirTRise",             "", DC_dT,   "C",     &dAirTRise,      this, isResult);
  DDB.Double  ("AirOutT",              "", DC_T,    "C",     &dAirTOut,       this, isResult);
  DDB.Double  ("AirWaterMixQm",        "", DC_Qm,   "kg/s",  &dAirMixQm,      this, isResult);
  DDB.Double  ("AirWaterMixCpEst",     "", DC_CpMs, "kJ/kg.C",&dAirMixCp,     this, isResult);
  DDB.Double  ("AirWaterMixTEst",      "", DC_T,    "C",     &dAirMixT,       this, isResult);
  
  //DDB.Visibility(NM_Probal|SM_All|HM_All);
  //RB.Add_OnOff(DDB, False);
  //EHX.Add_OnOff(DDB, False);
  
  DDB.Visibility();
  

  DDB.Text  (" ");
  BuildDataDefnShowIOs(DDB);
  BuildDataDefnIOOpts(DDB);
  
  //RB.BuildDataDefn(DDB);
  //EHX.BuildDataDefn(DDB);
  //VLE.BuildDataDefn(DDB);

  if (NetDynamicMethod())
    {
    DDB.Object(&Contents, this, NULL, NULL, DDB_RqdPage);
    DDB.Object(&m_PresetImg, this, NULL, NULL, DDB_RqdPage);

    //if (Contents.SpillExists())
    //  DDB.Object(&Contents.OverFlow(), this, NULL, NULL, DDB_RqdPage);
    }
  DDB.EndStruct();
 
  }