Hi ,
Using TS 65 on Win 2003 SP1.
I have Constants.pm as follows
[HTML] package WUnion::Constants;
use strict;
use warnings;
use TeamSite::Config;
use Exporter;
use base qw(Exporter);
our
@ISA = qw(Exporter);
#our
@EXPORT = qw(ALL);
##TS_HOME doesn't end with / ##
use constant IW_HOME => TeamSite::Config::iwgethome();
use constant IW_MOUNT => TeamSite::Config::iwgetmount();
## CMS_HOME doesn't end with / ##
# use constant CMS_HOME => Framework::Utilities:
ervices::ConfigConstants::APP_HOME;
use constant IW_PERL => IW_HOME . "/iw-perl/bin/perl";
#home directory on teamsite server for keeping config files and log files
use constant WU_DIR => 'wunion';
use constant JOB_DIR => 'WF';
#home directory path on teamsite server where config file and log files realted to
#wunion intranet will be kept
#For e.g., Log4perl.conf , log files of uwnion intranet
use constant WU_HOME_DIR => IW_HOME . "\\" . WU_DIR . "\\";
#Log4perl config file location
use constant LOG4PERLCONF => WU_HOME_DIR . 'lognerrors\log.conf';
use constant WU_JOB_SPECIFICATION_FILE_DIR => WU_HOME_DIR . JOB_DIR;
#
# Used In : Submission Workflow
# Purpose : Path of the CC directory where Local File is to be uploaded .
# This local file is a refernce file .
#Constants for WORKFLOW
use constant WF_APPROVAL_TASK_DESC => 'Pls review the document attached';
use constant WF_AUTHOR_EDIT_TASK_DESC => 'Document Reject : Pls update the document again ';
use constant WF_SUBMIT_TASK_DESC => 'Task to submit content';
use constant WF_END_TASK_DESC => 'Western Union Submission Workflow end task';
[/HTML]
I want to access these constants in workflow file
[HTML]
WUnion::Constants::JOB_SPECIFICATION_FILE_DIR
and not the actual value stored in constant
JOB_SPECIFICATION_FILE_DIR. Pls let me know what i am doing wrong over here . Regards\Rohit
