logical sODC_Project :: GetProjectPath ( )
{
PropertyHandle *ph = GetPropertyHandle();
NString nstring;
logical term = NO;
BEGINSEQ
SetResult("");
if ( !ph->IsSelected() ) ERROR
if ( !ph->IsPositioned() )
if ( !ph->Get().GetData() ) ERROR
pc_ODC_Project project_pc(ph);
SetResult(project_pc.GetProjectPath(nstring,Parm(1)));
RECOVER
term = YES;
ENDSEQ
return(term);
}
logical sODC_Project :: InitializeExternalResources ( )
{
PropertyHandle *ph = GetPropertyHandle();
char *folder_opt = Parm(1);
NString nstring;
logical term = NO;
BEGINSEQ
if ( !ph->IsServer() ) LEAVESEQ
SetResult("");
if ( !ph->IsSelected() ) ERROR
if ( !ph->IsPositioned() )
if ( !ph->Get().GetData() ) ERROR
pc_ODC_Project project_pc(ph);
project_pc.InitializeExternalResources(&nstring,folder_opt && *folder_opt == 'Y' ? YES : NO);
SetResult(nstring);
RECOVER
term = YES;
ENDSEQ
return(term);
}