## OpenCA - CA Command
## (c) 1998-2001 by OpenCA Group
##
##   File Name: nodeUploadCRR
##     Version: $Revision: 1.3 $
##       Brief: export CRRs
## Description: exports the CRRs to a removable media

require "$common_libs/export-import.lib";

sub cmdNodeUploadCRR {

	print startLogPage ( gettext ("Exporting the CRRs to a higher level of the hierarchy ...") );

	my $tmp = createStructure ();
	eximUploadCRRs   ( $tmp );
	eximUploadCommit ( $tmp );
	eximIOUpload     ( $tmp );
	removeDirectory  ( $tmp );

	closePage ();

}

1;
