# NAload.def: Collects NA Reports
# $Id: NAload.def,v 2.5 2012/01/03 13:34:42 mschenke Exp $
# ARCS: $Header: /home/cvs/cvs/RDA_4/src/scripting/lib/modules/NAload.def,v 2.5 2012/01/03 13:34:42 mschenke Exp $
#
# Change History
# 20120103  MSC  Change the copyright notice.

=head1 NAME

NAload - Collects Network Advisor Reports

=head1 DESCRIPTION

=head2 na - Network Advisor

This module gets reports generated by Network Advisor during the last 15 days.

=cut

# Collect recent files
debug ' Inside LOAD module, gathering Network Advisor reports'
report na
prefix
{write '---+ Network Advisor Results'
 write 'Limited to assements done in last 15 days%BR% '
 write '|*Trace Files*|'
}
loop $fil (grepDir(${OUT.C},concat('^',${CUR.GROUP},'_NA_.*\.txt$'),'iptm15'))
{var ($lin) = grepFile($fil,'<!-- Network Advisor Trace File:','f')
 var ($trc) = match($lin,'<!-- Network Advisor Trace File:(.*?) -->')

 if $trc
  write '|[[',basename($fil,'.txt'),'.htm][_blank][',$trc,']]|'
}
if isCreated(true)
 toc '2:[[',getFile(),'][rda_report][Network Advisor]]'

=head1 COPYRIGHT NOTICE

Copyright (c) 2002, 2012, Oracle and/or its affiliates. All rights reserved.

=head1 TRADEMARK NOTICE

Oracle and Java are registered trademarks of Oracle and/or its
affiliates. Other names may be trademarks of their respective owners.

=cut