# S246DSCS.def: Collects Discussions Information # $Id: S246DSCS.def,v 1.7 2008/02/25 17:32:55 mschenke Exp $ # ARCS: $Header: /home/cvs/repository/RDA_4/src/scripting/lib/modules/S246DSCS.def,v 1.7 2008/02/25 17:32:55 mschenke Exp $ # # Change History # 20080225 MSC Change the copyright notice. =head1 NAME S246DSCS - Collects Discussions Information =head1 DESCRIPTION The following reports can be generated and are regrouped under C: =cut echo tput('bold'),'Processing Oracle Discussions module ...',tput('off') # Initialization var $ORACLE_HOME = getSetting('ORACLE_HOME','') var $AGE = getSetting('OCS_AGE', 15) var $TAIL = getSetting('OCS_TAIL1', 5000) var $TOC = '%TOC%' var $TOP = '[[#Top][Back to top]]' pretoc '^1:Oracle Collaboration Suite' pretoc '1+:Discussions' # Load the common macros run library() =head2 Log Files Gets the last lines of the log files. =cut debug ' Inside DSCS module, about to gather log files' var $dir = catDir($ORACLE_HOME,'discussions','logs') call sort_files(2,$TAIL,grepDir($dir,'\.log$','dir')) =head2 not_found - Not found Used as a warning when none of the Oracle Discussions files are found. =cut if !isTocCreated() {debug ' Inside DSCS module, no file found' report not_found write 'No Oracle Discussions log files were found and all files were \ optional. This does not mean there was necessarily a problem with RDA, \ but it should be investigated.' toc '2:[[',getFile(),'][rda_report][Not found]]' } # Disable the group title in next index toc '-:Oracle Collaboration Suite' =head1 SEE ALSO See also L, L. =begin credits =over 10 =item RDA 4.2: Frederic Daurelle. =back =end credits =head1 COPYRIGHT NOTICE Copyright (c) 2002-2008, Oracle. All rights reserved. =head1 TRADEMARK NOTICE Oracle, JD Edwards, PeopleSoft, and Siebel are registered trademarks of Oracle Corporation and/or its affiliates. Other names may be trademarks of their respective owners. =cut