Refactored WriteTOC.
Refactored WriteTOC.

scalien/scaliendb,timoc/scaliendb,scalien/scaliendb,timoc/scaliendb,timoc/scaliendb,scalien/scaliendb,scalien/scaliendb,timoc/scaliendb,scalien/scaliendb,scalien/scaliendb,timoc/scaliendb,timoc/scaliendb,timoc/scaliendb,scalien/scaliendb,scalien/scaliendb,timoc/scaliendb,timoc/scaliendb