#!/usr/bin/perl
#
# $Header: //sapdb/V76/develop/sys/src/install/perl/packages/msg/instmsg#3 $
# $DateTime: 2003/09/16 10:21:43 $
# $Change: 51992 $
#
# Desc:

import SAPDB::Install::StdIO;
import SAPDB::Install::System;
import SAPDB::Install::Registry;
import SAPDB::Install::Tools;
import SAPDB::Install::SetUser;
import SAPDB::Install::Cwd;
import SAPDB::Install::Values;

$path{'name'} = 'messages path';

$path{'opt'}='msgpath=s';
$path{'list'} = 'msg.lst';
$path{'update'}=0;

	
$usage= " [-msgpath <instpath>]";
$usage_desc = "\t-msgpath <instpath>\tmessages installation directory\n";
                  


@paths = (\%path);
$main_path=\%path;
$skip=0;
@opts=();

local ($data,$prog);


sub preinstall{
	($data,$prog)=readIndepPath();
	$prog =~ /\S/ or $prog = $SAPDB::Install::Values::indep_prog_path;
	$data =~ /\S/ or $data = $SAPDB::Install::Values::indep_data_path;
	$prog =~ /\S/ or print2stderr("independent program path not found\n") and diesoft($SAPDB::Install::Values::diemsg);
	$path{'default'} = $prog;
	$path{'value'}=$prog unless ($SAPDB::Install::StartInstall::opt_relocate);  
	return 1;
}
 

sub postprepare{
	return 1;
}


sub postinstall{
	return 1;    
}





sub register{
	return 1;
}



sub unregister{
	return 1;
}

sub preuninstall{
	return 1;
}

sub postuninstall{
	return 1;	
}

1;
                                                                                                         
