private hash

definitions

sub _get_ACTIVE_PROJECT{

upper case ACTIVE_PROJECT PATH to the defatul Project.config

sub get_ACTIVE_PROJECT{

upper case ACTIVE_PROJECT PATH to the defatul Project.config

sub get_active_project_name

lower case active project is the project name but must have a _name as suffix get_ACTIVE_PROJECT because Perl does not distinguish between upper and lower- case cases. Get the project name from the Project.config file within the active-project dirctory:

.L_SU/configuration/active/Project.config

sub _get_local_or_defaults

via big_streams_param:

Read a default specification file 
1) If default specification file# does not exist locally (PL_SEISMIC)
2) then check the user's configuration area: .LSU/configuration/active/Project.config
and if not,
3) then use the default one defined under global libs


Debug with
   print ("self is $self,program is $program_name\n");
print("params are @$ref_CFG\n");
program name is a hash
   print("params are @$ref_cfg\n");
   print ("self is $self,program is $program_name\n");
      print("L_SU_local_user_constants,_get_local_or_defaults,program_name:$$program_name_sref\n"); 
      print("L_SU_local_user_constants,_get_local_or_defaults,program_name:$$name_sref\n"); 
      print("L_SU_local_user_constants,_get_local_or_defaults,program_name:$$program_name_sref\n"); 
   print("L_SU_local_user_constants,_get_local_or_defaults, length:$L_SU_local_user_constants->{_length}\n");

sub _get_active_project_name

lower case active project is the project name but must had a _name as suffix get_ACTIVE_PROJECT because Perl does not distinguish between upper and lower case cases. Get the project name from the Project.config file within the active-project dirctory:

.L_SU/configuration/active/Project.config

sub get_PROJECT_exists

tests  if a PROJECT (path)
exists

sub _get_project_names

o/p array ref of list names

sub get_project_names

o/p array ref of list names

sub makconfig

make ALL configuration directories and files for
the first time that L_SU is used

sub Project_config_exists

tests  if a user configuration
Project.config file exists
i.e. should be found inside
.L_SU/configuration/active