//JavaScript File
//It will Generate the Report for a Userfriendly Format
//for the Thermal Performance Analysis Program
//and also open the help pages and takes care of all the JavaScript
//other variables for the report
var msFluid; //is it Steam or Fluid
var msType; //should the text read Steam or Fluid
var Ref; //other Ref points are they used or not
var NameOfModel; //for the title
var msVersion; //current version we are on at the time
var InputParam; //was the input for Temp Difference or Flow Rate
var miCautionLength;//the length for the caution string
var InputValue; //the input for the fluid calculations
var Output1Value; //the first output for the fluid calculaions
var Output2Value; //the second output for the fluid calculaions
//Unit signs for the input values
var miInputPressure; //the pressure index
var miInputAirInlet; //Entering Air Temperature index
var miInputAltitude; //Altitude above Sealevel index
var miInputFldTemp; //Inlet Fluid Temperature index
var msInputFldTemp; //Inlet Fluid Temperature ºC or ºF
var miInputFlow; //Input Flow Rate or Outlet Fluid Temperature index
var msInputFlow; //Input Flow Rate or Outlet Fluid Temperature
//report string for the different reports
var msReportStr;
//Heater data Strings
var msHeaterNameStr;
var msPassStr;
var msTubeODStr;
var msTubeIDStr;
var msFinSpaceStr;
var msNumberRowStr;
//Input Data Strings
var msFluidStr;
var msInletTempStr;
var msOutletTempStr;
var msOpPressureStr;
var msTubesideFlowStr;
var msTubesideFlowRStr;
var msAirInletStr;
var msAltitudeStr;
var msFrequencyStr;
//Calculated Values Strings
var msPressureDropStr;
var msAirFlowStr;
var msAirStdFlow;
var msAirMassStr;
var msAirVelocityStr;
var msAirOutletStr;
var msHeatDissTubeStr;
var msHeatDissHeadStr;
var msHeatDissTotalStr;
//Cautions String
var msCautionTextStr1;
var msCautionTextStr2;
var msCautionTextStr3;
var msCautionTextStr4;
var msCautionTextStr5;
//For Fluids input only
var msAvgTempStr;
var msViscosityStr;
var msSpHeatStr;
var msDensityStr;
var msTCondStr;
var msReynoldsStr;
var msPrandtlStr;
//For Ref points input only
var msTempRefStr;
var msVisRefStr;
var msSpHeatRefStr;
var msDensRefStr;
var msTCondRefStr;
//Headers for the columns
var msEmptyStr;
var msInputStr;
var msFluidPropStr;
var msFluidRefStr;
var msHeaterStr;
var msTubesideCondStr;
var msAirsideCondStr;
var msHeaterPerformanceStr;
var msCautionsStr;
//variables for the report from the applet
var msJob;
var msBrowser;
var miUnit;
var msCaution;
//messages for the cautions
var msCautionMsg1;
var msCautionMsg2;
var msCautionMsg3;
var msCautionMsg4;
var msCautionMsg5;
//Input Data
var msFluidName;
var mdPercent;
var mdInletFldTemp;
var mdOpPressure;
var mdTubesideFlow;
var mdAirInletTemp;
var mdAltitude;
var miFrequency;
//for Fluids Properties @ Average Temperatures
var mdAvgTemp;
var mdVis;
var mdSpHeat;
var mdDensity;
var mdTCond;
var mdReynoldsNum;
var mdPrandtlNum;
//Ref Properties
var mdRefTemp1;
var mdRefTemp2;
var mdVis1;
var mdVis2;
var mdSpHeat1;
var mdSpHeat2;
var mdDens1;
var mdDens2;
var mdTCond1;
var mdTCond2;
//Tubeside Conditions
var mdOutletFldTemp;
var mdTubesideFlowR;
var mdPressureDrop;
//Airside Condition
var mdAirFlowRate;
var mdAirStdFlowRate;
var mdAirMass;
var mdAirVelocity;
var mdAirOutletTemp;
//Heater Data
var msModelName;
var miNoPasses;
var mdTubeOD;
var mdTubeID;
var mdFinSpace;
var miNoRows;
//Heater Performance
var mdHeatDissTubes;
var mdHeatDissHead;
var mdHeatDissTotal;
//Metric or Imperial
var uHeat;
var uTemperature;
var uInTemperature;
var uFlow;
var uPressure;
var uDrop;
var uAltitude;
var uFlowR ;
var uMessure;
var uFinns;
var uPass;
var uVis;
var uSpHeat;
var uDensity;
var uThermal;
var uAirFlow;
var uAirStd;
var uAirVel;
//The window for the Help Pages
var HelpWindow;
//The window for the Report
var MyWindow;
//The StatusBar text for the main window
var defaultText = "CCI Thermal Performance Analysis Program"
//For the Browsers
var Ver4; //The Browser Version
var Nav4; //Netscape
var IE4; //Explorer
var errorMsg = "Right mouse-click function has been disabled!";
if(document.layers) window.captureEvents(Event.MOUSEDOWN);
function no_click(e){
detectBrowser();
if(IE4 && (event.button == 2 || event.button == 3)){
alert(errorMsg);return false;
}
if(Nav4 && (e.which == 2 || e.which == 3)){
alert(errorMsg);return false;
}
}
window.onmousedown=no_click;
document.onmousedown=no_click;
function detectBrowser(){
//decide with what browser the user has accessed the page
//var browser;
Ver4 = parseInt(navigator.appVersion) >= 4;
Nav4 = ((navigator.appName == "Netscape") && Ver4);
IE4 = ((navigator.userAgent.indexOf("MSIE") != -1) && Ver4);
// document.ThermalApplet.setBrowser(browser);
if(Nav4){//Netscape Browser
window.moveTo(0,0);
window.outerHeight = screen.availHeight;
window.outerWidth = screen.availWidth;
}//else if(IE4){//Internet Explorer Browser
//window.moveTo(0, 0);
//window.resizeTo(screen.availWidth, screen.availHeight);
//}
this.status = defaultText;
msBrowser = navigator.appName; // What Browser was used to access this page
}
function displayValues(){
//get the number from the applet
var num = document.ThermalApplet.getRecordNum();
if(num < 0){//Error
if(num == -2) //calculation has not been done
alert('Please Calculate the properties first!');
else //no records were seleted
alert('Please select a heater model from the result field!');
}else{//check for changed values
var calc = document.ThermalApplet.getCalcBool();
if(calc == false)//Field contents has changed without recalulating the new values
alert('Please calculate the new values for the proper results!');
else{//everything is ok
displayReportValues();
}
}
}
//Send the values for the specific Heater to the Report
function displayReportValues(){
displayRef( document.ThermalApplet.getRef(),
document.ThermalApplet.getVersion(),
document.ThermalApplet.getInputParam(),
document.ThermalApplet.getPressureUnit(),
document.ThermalApplet.getInletAirUnit(),
document.ThermalApplet.getAltitudeUnit(),
document.ThermalApplet.getInletUnit(),
document.ThermalApplet.getInputIndex(),
document.ThermalApplet.getCautionLenght());
initValues( document.ThermalApplet.getJobDesc(),
document.ThermalApplet.getMetricOrImperial(),
document.ThermalApplet.getCaution(),
document.ThermalApplet.getFluidName(),
document.ThermalApplet.getPercent(),
document.ThermalApplet.getInletFluidTemp(),
document.ThermalApplet.getOperatingPressure(),
document.ThermalApplet.getFluidFlowRate(),
document.ThermalApplet.getInletAirTemp(),
document.ThermalApplet.getAltitude(),
document.ThermalApplet.getMotorFrequency(),
document.ThermalApplet.getAverageTemp(),
document.ThermalApplet.getViscosity(),
document.ThermalApplet.getSpecificHeat(),
document.ThermalApplet.getDensity(),
document.ThermalApplet.getThermalCond(),
document.ThermalApplet.getReynoldsNum(),
document.ThermalApplet.getPrandTLNum(),
document.ThermalApplet.getRefTemp1(),
document.ThermalApplet.getRefTemp2(),
document.ThermalApplet.getRefVis1(),
document.ThermalApplet.getRefVis2(),
document.ThermalApplet.getRefSpHeat1(),
document.ThermalApplet.getRefSpHeat2(),
document.ThermalApplet.getRefDens1(),
document.ThermalApplet.getRefDens2(),
document.ThermalApplet.getRefTCond1(),
document.ThermalApplet.getRefTCond2(),
document.ThermalApplet.getOutletFluidTemp(),
document.ThermalApplet.getUsgpm(),
document.ThermalApplet.getPressureDrop(),
document.ThermalApplet.getPairM(),
document.ThermalApplet.getScms(),
document.ThermalApplet.getAirFlow(),
document.ThermalApplet.getAirVelocity(),
document.ThermalApplet.getAirOutletTemp(),
document.ThermalApplet.getHeaterName(),
document.ThermalApplet.getTubePass(),
document.ThermalApplet.getTubeOD(),
document.ThermalApplet.getTubeID(),
document.ThermalApplet.getFins(),
document.ThermalApplet.getNoOfRows(),
document.ThermalApplet.getHeatDissipationTube(),
document.ThermalApplet.getHeatDissipationHead(),
document.ThermalApplet.getHeatDissTotal());
}
//for the help pages
function helpIndex(){
if (!HelpWindow || HelpWindow.closed){ //does the window exist
if(Nav4){//Netscape Browser
//to construct a new window for the report
HelpWindow = window.open("Thermal/Help.html", "HelpWindow",
"width=" + (innerWidth - 5) + ",height=" + (innerHeight + 40) +
"directories,menubar," +
"scrollbars,status,toolbar,resizable")
if (window.screen) {//resize the window
HelpWindow.moveTo(0, 0);
HelpWindow.outerHeight = screen.availHeight;
HelpWindow.outerWidth = (screen.availWidth - 150);
}
}else if(IE4){//Internet Explorer Browser
//to construct a new window for the report
HelpWindow = window.open("Thermal/Help.html", "HelpWindow",
"toolbar=yes,directories=yes,status=yes," +
"menubar=yes,scrollbars=yes,resizable=yes," +
"width=" + screen.availWidth + ",height=" + screen.availHeight)
if (window.screen) {//resize the window
HelpWindow.moveTo(0, 0);
HelpWindow.resizeTo((screen.availWidth - 150), screen.availHeight)
}
}
}else //Window exists so just show it
HelpWindow.focus();
}
//to email ruffneck
function eMail(){
// username = "sales";
// domain = "ruffneck.com";
// document.write('');
// document.write(username + '@' + domain + '');
parent.location.href = 'mailto:info@ccithermal.com'
}
//unload the pages if the user refreshes the browser or leaves the Thermal page
function closeChildWindow(){
//check if the other windows are still open
if (!HelpWindow || HelpWindow.closed){ //check for the help pages
//do nothing
}else //still open so close it
HelpWindow.close();
if (!MyWindow || MyWindow.closed){ //check for the report
//do nothing
}else //still open so close it
MyWindow.close();
}
function message(text){
//to change the status text if the mouse is over a specific button
window.status = text;
}
//initialize the different input values
function displayRef(iRef, iVersion, iInputParam, imiInputPressure, imiInputAirInlet, imiInputAltitude,
imiInputFldTemp, imiInputFlow, imiCautionLength){
Ref = iRef;
InputParam = iInputParam;
msVersion = iVersion;
miInputPressure = imiInputPressure;
miInputAirInlet = imiInputAirInlet;
miInputAltitude = imiInputAltitude;
miInputFldTemp = imiInputFldTemp;
miInputFlow = imiInputFlow;
miCautionLength = imiCautionLength;
}
//init the unit display
function displayType()
{
//to display the metric or imperial signs for the report
if(miUnit == 0){
uHeat = "kW";
uTemperature = "°C";
uFlow = "kg/hr";
uDrop = "kPa";
uFlowR = "m³/hr@16°C";
uMessure = "mm";
uFinns = "fins / 2.54 cm";
uVis = "mPas";
uSpHeat = "kJ/kg-°C";
uDensity = "kg/m³";
uThermal = "W/m-°C";
uAirFlow = "ACMS";
uAirStd = "SCMS";
uAirVel = "m/sec";
}else{
uHeat = "BTU/hr";
uTemperature = "°F";
uFlow = "lb/hr";
uDrop = "psi";
uFlowR = "USGPM@60°F";
uMessure = "in";
uFinns = "fins / inch";
uVis = "cP";
uSpHeat = "BTU/lb-°F";
uDensity = "lb/ft³";
uThermal = "BTU-ft/hr-°F";
uAirFlow = "ACFM";
uAirStd = "SCFM";
uAirVel = "FPM";
}
if(miInputPressure == 0)
uPressure = "kPa(g)";
else
uPressure = "psig";
if(miInputAirInlet == 0)
uInTemperature = "°C";
else
uInTemperature = "°F";
if(miInputAltitude == 0)
uAltitude = "m ASL";
else
uAltitude = "ft ASL";
if(miInputFldTemp == 0)
msInputFldTemp = "°C";
else
msInputFldTemp = "°F";
}
function initValues(imsJob, imiUnit, imsCaution, imsFluidName, imdPercent, imdInletFldTemp, imdOpPressure,
imdTubesideFlow, imdAirInletTemp, imdAltitude, imiFrequency, imdAvgTemp, imdVis,
imdSpHeat, imdDensity, imdTCond, imdReynoldsNum, imdPrandtlNum, imdRefTemp1, imdRefTemp2,
imdVis1, imdVis2, imdSpHeat1, imdSpHeat2, imdDens1, imdDens2, imdTCond1, imdTCond2, imdOutletFldTemp,
imdTubesideFlowR, imdPressureDrop, imdAirFlowRate, imdAirMass, imdAirStdFlowRate, imdAirVelocity,
imdAirOutletTemp, imsModelName, imiNoPasses, imdTubeOD, imdTubeID, imdFinSpace, imiNoRows,
imdHeatDissTubes, imdHeatDissHead, imdHeatDissTotal)
{
//initialize the variables with the values for the display on the report
msJob = imsJob;
miUnit = imiUnit;
msCaution = imsCaution;
msFluidName = imsFluidName;
mdPercent = imdPercent;
mdInletFldTemp = imdInletFldTemp;
mdOpPressure = imdOpPressure;
mdTubesideFlow = imdTubesideFlow;
mdAirInletTemp = imdAirInletTemp;
mdAltitude = imdAltitude;
miFrequency = imiFrequency;
mdAvgTemp = imdAvgTemp;
mdVis = imdVis;
mdSpHeat = imdSpHeat;
mdDensity = imdDensity;
mdTCond = imdTCond;
mdReynoldsNum = imdReynoldsNum;
mdPrandtlNum = imdPrandtlNum;
mdRefTemp1 = imdRefTemp1;
mdRefTemp2 = imdRefTemp2;
mdVis1 = imdVis1;
mdVis2 = imdVis2;
mdSpHeat1 = imdSpHeat1;
mdSpHeat2 = imdSpHeat2;
mdDens1 = imdDens1;
mdDens2 = imdDens2;
mdTCond1 = imdTCond1;
mdTCond2 = imdTCond2;
mdOutletFldTemp = imdOutletFldTemp;
mdTubesideFlowR = imdTubesideFlowR;
mdPressureDrop = imdPressureDrop;
mdAirFlowRate = imdAirFlowRate;
mdAirStdFlowRate= imdAirStdFlowRate;
mdAirMass = imdAirMass;
mdAirVelocity = imdAirVelocity;
mdAirOutletTemp = imdAirOutletTemp;
msModelName = imsModelName;
miNoPasses = imiNoPasses;
mdTubeOD = imdTubeOD;
mdTubeID = imdTubeID;
mdFinSpace = imdFinSpace;
miNoRows = imiNoRows;
mdHeatDissTubes = imdHeatDissTubes;
mdHeatDissHead = imdHeatDissHead;
mdHeatDissTotal = imdHeatDissTotal;
if(msModelName.indexOf("A") == 0)//The AH Series
NameOfModel = "Advanced Series Model No.";
else //The HP - FR Series
NameOfModel = "Ruffneck Heater Model No.";
if(miNoPasses == 1)
uPass = " Pass";
else
uPass = " Passes";
//if the fluid is Ethylene Glycol, Diethylene Glycol, Triethylene Glycol
if(msFluidName == "Ethylene Glycol" || msFluidName == "Diethylene Glycol" || msFluidName == "Triethylene Glycol"){
msFluidName = mdPercent + " % " + msFluidName + " by Weight";
}
if(msFluidName == "Steam"){
msFluid = "Condensate";
msType = "Steam";
}else{
msFluid = "Fluid";
msType = "Fluid";
}
displayType();
displayReport();
}
//the string for the caution's if there is any
function setCaution(){
//different caution messages
msCautionMsg1 = "";
msCautionMsg2 = "";
msCautionMsg3 = "";
msCautionMsg4 = "";
msCautionMsg5 = "";
//for the table output
msCautionTextStr1 = "";
msCautionTextStr2 = "";
msCautionTextStr3 = "";
msCautionTextStr4 = "";
msCautionTextStr5 = "";
var n = 0;
//different Cautions to warn the user
for(n = 0; n < miCautionLength; n ++){
if(msCaution.indexOf("1") == n){
msCautionMsg1 = "1. Vacuum Condition";
msCautionTextStr1 = "| " + msCautionMsg1 + " | |
"
}
if(msCaution.indexOf("2") == n){
msCautionMsg2 = "2. Fluid properties are extraplolated";
msCautionTextStr2 = "| " + msCautionMsg2 + " | |
"
}
if(msCaution.indexOf("3") == n){
msCautionMsg3 = "3. Single-Pass Heaters not recomended for liquid service";
msCautionTextStr3 = "| " + msCautionMsg3 + " | |
"
}
if(msCaution.indexOf("4") == n){
msCautionMsg4 = "4. Entering Air Temperature exceeds 40 ºC(104 ºF) or is less than -25ºC(-13ºF)";
msCautionTextStr4 = "| " + msCautionMsg4 + " | |
"
}
if(msCaution.indexOf("5") == n){
msCautionMsg5 = "5. Fluid Temperature is between (-20 ºF and -49 ºF)";
msCautionTextStr5 = "| " + msCautionMsg5 + " | |
"
}
if(msCaution.indexOf("»") == n){
msCautionMsg1 = "None";
msCautionTextStr1 = "| " + msCautionMsg1 + " | |
"
break; //there are no cautions
}
}
}
//assign the values for the strings
function initStrings(){
//heater data
msHeaterNameStr = "" + NameOfModel + " | " + msModelName + " | ";
msPassStr = "Number of Passes | " + miNoPasses + " " + uPass+ " | ";
msTubeODStr = "Tube OD | " + mdTubeOD + " | " + uMessure + " | ";
msTubeIDStr = "Tube ID | " + mdTubeID + " | " + uMessure + " | ";
msFinSpaceStr = "Fin Spacing | " + mdFinSpace + " | " + uFinns + " | ";
msNumberRowStr = "Number of Rows | " + miNoRows + " Rows | ";
//Trademarked Fluids
if(msFluidName == "DowTherm G" || msFluidName == "DowTherm A" || msFluidName == "DowTherm E" ||
msFluidName == "Therminol FR-1" || msFluidName == "Therminol 66" || msFluidName == "Humbletherm 500" ||
msFluidName == "Mobiltherm 600" || msFluidName == "Sun Oil 21" || msFluidName == "Corena P-122 Oil"){
msFluidStr = "Fluid Name | " + msFluidName + "TM | ";
}else{
msFluidStr = "Fluid Name | " + msFluidName + " | ";
}
//input data
msInletTempStr = "Inlet " + msType + " Temperature | " + mdInletFldTemp + " | " + uTemperature + " | ";
msOutletTempStr = "Outlet " + msType + " Temperature | " + mdOutletFldTemp + " | " + uTemperature + " | ";
msOpPressureStr = "Operating Pressure | " + mdOpPressure + " | " + uPressure + " | ";
msTubesideFlowStr = "" + msFluid + " Flow Rate | " + mdTubesideFlow + " | " + uFlow + " | ";
msTubesideFlowRStr = "Tubeside Flow Rate | " + mdTubesideFlowR + " | " + uFlowR + " | ";
msAirInletStr = "Air Inlet Temperature | " + mdAirInletTemp + " | " + uInTemperature + " | ";
msAltitudeStr = "Altitude | " + mdAltitude + " | " + uAltitude + " | ";
msFrequencyStr = "Electric Motor Power | " + miFrequency + " | Hz | ";
//Calculated Values Strings
msPressureDropStr = "Tubeside Pressure Drop | " + mdPressureDrop + " | " + uDrop + " | ";
msAirFlowStr = "Air Flow Rate | " + mdAirFlowRate + " | " + uAirFlow + " | ";
msAirStdFlowStr = "Air Flow Rate (Standard Conditions) | " + mdAirStdFlowRate + " | " + uAirStd + " | ";
msAirMassStr = "Air Mass Flow | " + mdAirMass + " | " + uFlow + " | ";
msAirVelocityStr = "Air Velocity | " + mdAirVelocity + " | " + uAirVel + " | ";
msAirOutletStr = "Final Air Temperature | " + mdAirOutletTemp + " | " + uTemperature + " | ";
msHeatDissTubeStr = "Heat Dissipated (Tubes) | " + mdHeatDissTubes + " | " + uHeat + " | ";
msHeatDissHeadStr = "Heat Dissipated (Headers) | " + mdHeatDissHead + " | " + uHeat + " | ";
msHeatDissTotalStr = "Heat Dissipated (Total) | " + mdHeatDissTotal + " | " + uHeat + " | ";
//For Fluids input only
msAvgTempStr = "Average Temperature | " + mdAvgTemp + " | " + uTemperature + " | ";
msViscosityStr = "Viscosity | " + mdVis + " | " + uVis + " | ";
msSpHeatStr = "Specific Heat | " + mdSpHeat + " | " + uSpHeat + " | ";
msDensityStr = "Density | " + mdDensity + " | " + uDensity + " | ";
msTCondStr = "Thermal Conductivity | " + mdTCond + " | " + uThermal + " | ";
msReynoldsStr = "Reynolds Number | " + mdReynoldsNum + " | ";
msPrandtlStr = "Prandtl Number | " + mdPrandtlNum + " | ";
//For INPUT Ref points input only
msTempRefStr = "Temperature | " + uTemperature + " | " + mdRefTemp1 + " | " + mdRefTemp2 + " | ";
msVisRefStr = "Viscosity | " + uVis + " | " + mdVis1 + " | " + mdVis2 + " | ";
msSpHeatRefStr = "Specific Heat | " + uSpHeat + " | " + mdSpHeat1 + " | " + mdSpHeat2 + " | ";
msDensRefStr = "Density | " + uDensity+ " | " + mdDens1 + " | " + mdDens2+ " | ";
msTCondRefStr = "Thermal Conductivity | " + uThermal + " | " + mdTCond1 + " | " + mdTCond2 + " | ";
//Headers for the columns
msInputStr = "Input Data | ";
msFluidPropStr = "Fluid Properties @ Average Temperature | ";
msFluidRefStr = "Fluid Reference Properties | Ref#1 | Ref#2 | ";
msHeaterStr = "Heater Data | ";
msTubesideCondStr = "Tubeside Conditions | ";
msAirsideCondStr = "Airside Conditions | ";
msHeaterPerformanceStr = "Heater Performance Data | ";
msCautionsStr = "Any \"Cautions\" to note? | ";
//for the empty column
msEmptyStr = " | ";
setCaution();
}
function steamReport(){
//IF THE FLUID IS STEAM
msReportStr = "" +
msHeaterStr + " | " +msTubesideCondStr +
"
" +
"" +
msHeaterNameStr + " | " + msInletTempStr +
"
" +
"" +
msPassStr + " | " + msOutletTempStr +
"
" +
"" +
msTubeODStr + " | " + msTubesideFlowStr +
"
" +
"" +
msTubeIDStr + " | " + msPressureDropStr +
"
" +
"" +
msFinSpaceStr + " | " + msEmptyStr +
"
" +
"" +
msNumberRowStr + " | " + msEmptyStr +
"
" +
"" +
msInputStr + " | " + msAirsideCondStr +
"
" +
"" +
msFluidStr + " | " +msAirFlowStr +
"
" +
"" +
msOpPressureStr + " | " + msAirStdFlowStr +
"
" +
"" +
msAirInletStr + " | " + msAirMassStr +
"
" +
"" +
msAltitudeStr + " | " + msAirVelocityStr +
"
" +
"" +
msFrequencyStr + " | " + msAirOutletStr +
"
" +
"" +
msEmptyStr + " | " + msHeaterPerformanceStr +
"
" +
"" +
msCautionsStr + " | " + msHeatDissTotalStr +
"
" +
msCautionTextStr1 +
msCautionTextStr2 +
msCautionTextStr3 +
msCautionTextStr4 +
msCautionTextStr5
}
//what value was inputted
function checkInput(){
if(InputParam == 0){ //the Flow rate USGPM or m³/hr was inputted
if(miInputFlow == 1){
msTubesideFlowRStr = "Tubeside Flow Rate | " + mdTubesideFlowR + " | m³/hr@16ºC | ";
}
if(miInputFlow == 3){
msTubesideFlowRStr = "Tubeside Flow Rate | " + mdTubesideFlowR + " | USGPM@60ºF | ";
}
InputValue = msTubesideFlowRStr;
Output1Value = msTubesideFlowStr;
Output2Value = msOutletTempStr;
}
if(InputParam == 1){ //the Flow rate kg/hr or lb/hr was inputted
if(miInputFlow == 0){
msTubesideFlowStr = "" + msFluid + " Flow Rate | " + mdTubesideFlow + " | kg/hr | ";
}
if(miInputFlow == 2){
msTubesideFlowStr = "" + msFluid + " Flow Rate | " + mdTubesideFlow + " | lb/hr | ";
}
InputValue = msTubesideFlowStr;
Output1Value = msTubesideFlowRStr;
Output2Value = msOutletTempStr;
}
if(InputParam == 2){ //temperature difference both temperature were inputted
if(miInputFlow == 0){
msOutletTempStr = "Outlet " + msType + " Temperature | " + mdOutletFldTemp + " | ºC | ";
}else{
msOutletTempStr = "Outlet " + msType + " Temperature | " + mdOutletFldTemp + " | ºF | ";
}
InputValue = msOutletTempStr;
Output1Value = msTubesideFlowStr;
Output2Value = msTubesideFlowRStr;
}
}
//IF THE FLUID IS NOT STEAM
function fluidReport(){
checkInput();
msInletTempStr = "Inlet " + msType + " Temperature | " + mdInletFldTemp + " | " + msInputFldTemp + " | ";
msReportStr = "" +
msHeaterStr + " | " +msFluidPropStr +
"
" +
"" +
msHeaterNameStr + " | " + msAvgTempStr +
"
" +
"" +
msPassStr + " | " + msReynoldsStr +
"
" +
"" +
msTubeODStr + " | " + msEmptyStr +
"
" +
"" +
msTubeIDStr + " | " + msTubesideCondStr +
"
" +
"" +
msFinSpaceStr + " | " + Output1Value +
"
" +
"" +
msNumberRowStr + " | " + Output2Value +
"
" +
"" +
msInputStr + " | " + msPressureDropStr +
"
" +
"" +
msFluidStr + " | " + msEmptyStr +
"
" +
"" +
msOpPressureStr + " | " + msAirsideCondStr +
"
" +
"" +
msInletTempStr + " | " + msAirFlowStr +
"
" +
"" +
InputValue + " | " + msAirStdFlowStr +
"
" +
"" +
msAirInletStr + " | " + msAirVelocityStr +
"
" +
"" +
msAltitudeStr + " | " + msAirOutletStr +
"
" +
"" +
msFrequencyStr + " | " + msHeaterPerformanceStr +
"
" +
"" +
msCautionsStr + " | " + msHeatDissTotalStr +
"
" +
msCautionTextStr1 +
msCautionTextStr2 +
msCautionTextStr3 +
msCautionTextStr4 +
msCautionTextStr5
}
//FLUID PORPERTIES WERE INPUTTED BY THE USER
function referenceReport(){
checkInput();
msInletTempStr = "Inlet " + msType + " Temperature | " + mdInletFldTemp + " | " + msInputFldTemp + " | ";
msReportStr = "" +
msHeaterStr + " | " + msFluidPropStr +
"
" +
"" +
msHeaterNameStr + " | " + msAvgTempStr +
"
" +
"" +
msPassStr + " | " + msViscosityStr +
"
" +
"" +
msTubeODStr + " | " + msSpHeatStr +
"
" +
"" +
msTubeIDStr + " | " + msDensityStr +
"
" +
"" +
msFinSpaceStr + " | " + msTCondStr +
"
" +
"" +
msNumberRowStr + " | " + msReynoldsStr +
"
" +
"" +
msFluidRefStr + " | " + msPrandtlStr +
"
" +
"" +
msTempRefStr + " | " + msTubesideCondStr +
"
" +
"" +
msVisRefStr + " | " + Output1Value +
"
" +
"" +
msSpHeatRefStr + " | " + Output2Value +
"
" +
"" +
msDensRefStr + " | " + msPressureDropStr +
"
" +
"" +
msTCondRefStr + " | " + msAirsideCondStr +
"
" +
"" +
msInputStr + " | " + msAirFlowStr +
"
" +
"" +
msFluidStr + " | " + msAirStdFlowStr +
"
" +
"" +
msInletTempStr + " | " + msAirMassStr +
"
" +
"" +
msOpPressureStr + " | " + msAirVelocityStr +
"
" +
"" +
InputValue + " | " + msAirOutletStr +
"
" +
"" +
msAirInletStr +" | " + msHeaterPerformanceStr +
"
" +
"" +
msAltitudeStr +" | " + msHeatDissTubeStr +
"
" +
msFrequencyStr + " | " + msHeatDissHeadStr +
"
" +
"" +
msCautionsStr +" | " + msHeatDissTotalStr +
"
" +
msCautionTextStr1 +
msCautionTextStr2 +
msCautionTextStr3 +
msCautionTextStr4 +
msCautionTextStr5
}
//will make the html page with the values from the applet
function displayReport(){
//decide what browser to open
var maxWidth = screen.availWidth;
var maxHeight = screen.availHeight;
if(Nav4){//Netscape Browser
//to construct a new window for the report
MyWindow = window.open("", "MyWindow",
"width=" + outerWidth + ",height=" + outerHeight +
"directories,menubar," +
"scrollbars,status,toolbar,resizable")
//if (window.screen) {//resize the window
MyWindow.moveTo(0, 0);
MyWindow.outerHeight = screen.availHeight;
MyWindow.outerWidth = (screen.availWidth - 150);
//}
if(mdPressureDrop < 1 && mdPressureDrop > 0.1)
mdPressureDrop = "0" + mdPressureDrop;
mdTubeOD = (mdTubeOD < 1)? "0" + mdTubeOD : mdTubeOD;
mdTubeID = (mdTubeID < 1)? "0" + mdTubeID : mdTubeID;
}else if(IE4){//Internet Explorer Browser
//to construct a new window for the report
MyWindow = window.open("", "MyWindow",
"toolbar=yes,directories=yes,status=yes," +
"menubar=yes,scrollbars=yes,resizable=yes," +
"width=" + maxWidth + ",height=" + maxHeight)
if (window.screen) {//resize the window
MyWindow.moveTo(0, 0);
MyWindow.resizeTo((screen.availWidth - 150), screen.availHeight)
}
}
initStrings(); // initialize the values for the report
if(msFluidName == "Steam"){
steamReport(); //Steam only
}else{
if(Ref == 0){
fluidReport(); //Fluid only
}else{
referenceReport(); //Reference input only
}
}
//to construct the date for the report
var today = new Date();
var Year = today.getYear();
var Month = today.getMonth() + 1; //month starts with 0 for January
var Day = today.getDate();
var Hour = today.getHours();
var Minute = today.getMinutes();
var Second = today.getSeconds();
var JobDesc;
Year += (Year < 2000) ? 1900 : 0; //to ensure the right year will be printed
if(Month < 10)
Month = "0" + Month;
if(Day < 10)
Day = "0" + Day;
if(Minute < 10)
Minute = "0" + Minute;
if(Second < 10)
Second = "0" + Second;
JobDesc = "" + msJob + " | ";
var todayDate = Year + " / " + Month + " / " + Day; //Time: " + Hour + ":" + Minute + ":" + Second;
var HtmlStr; //for the entire report
//Initialize the String for the report
HtmlStr = "" +
"CCIThermal Performance Program Report" +
"" +
"CCI Thermal Technologies Inc. Ruffneck™ Heater Sizing Calculation Tool
Performance Analysis Report
" +
//The Table for the Report
"" +
"" +
" | " + //this are the percentages for each column
" | " +
" | " +
" | " +
" | " + //divider from the left and right side
" | " +
" | " +
" | " +
" | " +
"
" +
"" +
"| Reference Data | " +
"
" +
"" +
"| Job Description: | " +
JobDesc +
"
" +
"" +
"| Internet Browser used: | " +
"" + msBrowser + " | " +
" | " +
"Date: " + todayDate + " | " +
"
" +
msReportStr + //contains the values from the applet
"
"+
"
" +
"Version: " + msVersion + "" +
"
"+
"Copyright © 2004 by CCI Thermal" +
"
All rights reserved." +
""+
""+
""
//to write the content on to the webpage
self.MyWindow.document.open()
self.MyWindow.document.write(HtmlStr)
self.MyWindow.status = "CCI Thermal Performance Analysis Program Summary Report"
self.MyWindow.document.close()
self.MyWindow.focus()
}