#!/usr/bin/perl
#
# $Header: //sapdb/V75/c_00/b_24/sys/src/install/perl/packages/cpcsdk/instcpcsdk#1 $
# $DateTime: 2005/02/18 17:24:39 $
# $Change: 90789 $
#
# Desc:


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


$path{'name'} = 'cpc sdk PACKVERS path';
$path{'default'} = getSysProgPath().'/sapdb/indep_data';
$path{'mode'}=0775;



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

my $data;
my $prog;

sub preinstall{
    local @ARGV=@_; 
    ($data,$prog)=readIndepPath();
	$prog !~ /\S/ and $prog = $SAPDB::Install::Values::indep_prog_path;
	$prog !~ /\S/ and print2stderr("independent program path not found\n") and diesoft($SAPDB::Install::Values::diemsg);
	$data !~ /\S/ and $data = $SAPDB::Install::Values::indep_data_path;
 	$path{'value'}=$prog;
}
 
sub postinstall{
}

sub registerWin{
}

sub registerUX{
}


*register =             $^O =~ /^MsWin/i ? \&registerWin :
        \&registerUX;



sub unregisterWin{
}

sub unregisterUX{
}

*unregister =           $^O =~ /^MsWin/i ? \&unregisterWin :
        \&unregisterUX;

sub preuninstall{

}

sub postuninstall{

}



1;
                                                                                                         