# DIFFload.def: Collects System Comparison Reports
# $Id: DIFFload.def,v 1.1 2008/02/08 09:24:33 mschenke Exp $
# ARCS: $Header: /home/cvs/repository/RDA_4/src/scripting/lib/modules/DIFFload.def,v 1.1 2008/02/08 09:24:33 mschenke Exp $
#
# Change History
# 20080208  MSC  Initial version.

=head1 NAME

DIFFload - Collects System Comparison Reports

=head1 DESCRIPTION

=head2 diff - System Comparisons

This module gets system comparison reports generated by during the last 15 days.

=cut

# Collect recent files
debug ' Inside LOAD module, gathering system comparison reports'
report diff
prefix
{write '---+ System Comparison Results'
 write 'Limited to system comparisons done in last 15 days%BR% '
 write '|*Comparison Result*|'
}
var $dir = getSetting('RPT_DIRECTORY')
loop $fil (grepDir(catDir($dir,'extern'),\
                   concat('^',getSetting('RPT_GROUP'),'_DIFF_.*\.txt$'),\
                   'itm15'))
{if match($fil,'_DIFF_(.+)\.txt$',true)
  write '|[[',catDir('extern',basename($fil,'.txt')),'.htm][_blank][',last,']]|'
}
if isCreated(true)
 toc '2:[[',getFile(),'][rda_report][System Comparisons]]'

=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