# OSWload.def: Archives and Collects OSWatcher Files # $Id: OSWload.def,v 1.9 2008/02/25 17:32:55 mschenke Exp $ # ARCS: $Header: /home/cvs/repository/RDA_4/src/scripting/lib/modules/OSWload.def,v 1.9 2008/02/25 17:32:55 mschenke Exp $ # # Change History # 20080225 MSC Change the copyright notice. =head1 NAME OSWload - Archives and Collects OSWatcher Files =head1 DESCRIPTION =head2 osw - OSWatcher When available, this module archives OSWatcher files and collects the resulting zip file. =cut debug ' Inside LOAD module, gathering OSWatcher information' if isUnix() {# Purge old reports and create the directory when needed call purge('E','.*osw\.(htm|txt|zip)$',0,0,true) # Collect OSWatcher information if loadFile('/tmp/osw.hb') {var $zip = findCommand('zip') if $zip {var $dir = catDir(getSetting('RPT_DIRECTORY'),'extern') var $tgt = concat(getSetting('RPT_GROUP'),'_osw.zip') var $osw = catDir(getLines(0,0),'archive') var $cmd = concat($zip,' -Drj ',catCommand($dir,$tgt),' ',quote($osw,'x'),\ ' >/dev/null 2>&1') call command($cmd) if !status() {report osw write '---+ Caution' write 'This is a binary file which can be saved through the following \ link:%BR%[[extern/',$tgt,'][OSWatcher]]' toc '2:[[',getFile(),'][rda_report][OSWatcher]]' } } } } =begin credits =over 10 =item RDA 4.5: Bob Caldwell. =item RDA 4.6: Bob Caldwell. =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