void output_saveResults(Project* project, double reportTime)
//
// Input: reportTime = elapsed simulation time (millisec)
// Output: none
// Purpose: writes computed results for current report time to binary file.
//
{
int i;
DateTime reportDate = getDateTime(project,reportTime);
REAL8 date;
if ( reportDate < project->ReportStart ) return;
for (i=0; i<MAX_SYS_RESULTS; i++) project->SysResults[i] = 0.0f;
date = reportDate;
fwrite(&date, sizeof(REAL8), 1, project->Fout.file);
if (project->Nobjects[SUBCATCH] > 0)
output_saveSubcatchResults(project,reportTime, project->Fout.file);
if (project->Nobjects[NODE] > 0)
output_saveNodeResults(project,reportTime, project->Fout.file);
if (project->Nobjects[LINK] > 0)
output_saveLinkResults(project,reportTime, project->Fout.file);
fwrite(project->SysResults, sizeof(REAL4), MAX_SYS_RESULTS, project->Fout.file);
if ( project->Foutflows.mode == SAVE_FILE && !project->IgnoreRouting )
iface_saveOutletResults(project,reportDate, project->Foutflows.file);
project->Nperiods++;
}
void output_saveResults(double reportTime)
//
// Input: reportTime = elapsed simulation time (millisec)
// Output: none
// Purpose: writes computed results for current report time to binary file.
//
{
int i;
DateTime reportDate = getDateTime(reportTime);
REAL8 date;
if ( reportDate < ReportStart ) return;
for (i=0; i<MAX_SYS_RESULTS; i++) SysResults[i] = 0.0f;
date = reportDate;
fwrite(&date, sizeof(REAL8), 1, Fout.file);
if (Nobjects[SUBCATCH] > 0)
output_saveSubcatchResults(reportTime, Fout.file);
if (Nobjects[NODE] > 0)
output_saveNodeResults(reportTime, Fout.file);
if (Nobjects[LINK] > 0)
output_saveLinkResults(reportTime, Fout.file);
fwrite(SysResults, sizeof(REAL4), MAX_SYS_RESULTS, Fout.file);
if ( Foutflows.mode == SAVE_FILE && RouteModel != NO_ROUTING ) //(5.0.014 - LR)
iface_saveOutletResults(reportDate, Foutflows.file);
Nperiods++;
}
void openFileForOutput()
//
// Input: none
// Output: none
// Purpose: opens a routing interface file for writing.
//
{
int i, n;
// --- open the routing file for writing text
Foutflows.file = fopen(Foutflows.name, "wt");
if ( Foutflows.file == NULL )
{
report_writeErrorMsg(ERR_ROUTING_FILE_OPEN, Foutflows.name);
return;
}
// --- write title & reporting time step to file
fprintf(Foutflows.file, "SWMM5 Interface File");
fprintf(Foutflows.file, "\n%s", Title[0]);
fprintf(Foutflows.file, "\n%-4d - reporting time step in sec", ReportStep);
// --- write number & names of each constituent (including flow) to file
fprintf(Foutflows.file, "\n%-4d - number of constituents as listed below:",
Nobjects[POLLUT] + 1);
fprintf(Foutflows.file, "\nFLOW %s", FlowUnitWords[FlowUnits]);
for (i=0; i<Nobjects[POLLUT]; i++)
{
fprintf(Foutflows.file, "\n%s %s", Pollut[i].ID,
QualUnitsWords[Pollut[i].units]);
}
// --- count number of outlet nodes
n = 0;
for (i=0; i<Nobjects[NODE]; i++)
{
if ( isOutletNode(i) ) n++;
}
// --- write number and names of outlet nodes to file
fprintf(Foutflows.file, "\n%-4d - number of nodes as listed below:", n);
for (i=0; i<Nobjects[NODE]; i++)
{
if ( isOutletNode(i) )
fprintf(Foutflows.file, "\n%s", Node[i].ID);
}
// --- write column headings
fprintf(Foutflows.file,
"\nNode Year Mon Day Hr Min Sec FLOW ");
for (i=0; i<Nobjects[POLLUT]; i++)
{
fprintf(Foutflows.file, " %-10s", Pollut[i].ID);
}
// --- if reporting starts immediately, save initial outlet values
if ( ReportStart == StartDateTime )
{
iface_saveOutletResults(ReportStart, Foutflows.file);
}
}
