# LDmerge.ctl: Collects Trace Merge Reports
# $Id: LDmerge.ctl,v 1.3 2013/10/30 07:18:24 RDA Exp $
# ARCS: $Header: /home/cvs/cvs/RDA_8/src/scripting/lib/collect/DB/LDmerge.ctl,v 1.3 2013/10/30 07:18:24 RDA Exp $
#
# Change History
# 20130821  KRA  Improve abbreviation management.

=head1 NAME

DB:LDmerge - Collects Trace Merge Reports

=head1 DESCRIPTION

=head2 merge - Trace Merge

This module gets reports generated by Trace Merge during the last 15 days.

=cut

# Collect recent files
debug ' Inside LOAD module, gathering Trace Merge reports'
call setAbbr('DB_MERGE_')
report results
prefix
{write '---+ Alert Log and Trace File Merge Results'
 write 'Limited to trace merges done in last 15 days%BR% '
 write '|*Type*|*Merge Set*|'
}
loop $fil (grepDir(${OUT.E},concat('^',${CUR.W_PREFIX},'.*\.txt$'),'itm15'))
{var ($typ,$set) = match($fil,'_MERGE_(all|local)_(.+)\.txt$',true)
 if $set
  write '|',$typ,' |[[../extern/',basename($fil,'.txt'),'.htm][_blank][',$set,\
        ']]|'
}
if isCreated(true)
 toc '2:[[',getFile(),'][rda_report][Trace Merge]]'

=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