# NAload.ctl: Collects NA Reports
# $Id: LDna.ctl,v 1.4 2013/10/30 07:18:40 RDA Exp $
# ARCS: $Header: /home/cvs/cvs/RDA_8/src/scripting/lib/collect/OS/LDna.ctl,v 1.4 2013/10/30 07:18:40 RDA Exp $
#
# Change History
# 20130821  KRA  Improve abbreviation management.

=head1 NAME

OS:LDna - Collects Network Advisor Reports

=head1 DESCRIPTION

=head2 na - Network Advisor

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

=cut

# Set the abbreviation
call setAbbr('OS_NA_')

# 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.W_PREFIX},'.*\.txt$'),'iptm15'))
{if grepFile($fil,'<!-- Network Advisor Trace File:(.*?) -->','f1')
  var ($trc) = last
 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, 2016, 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