added abstract upload/edit interface

2 files changed, 442 insertions, 178 deletions

diff --git a/proposal.inc b/proposal.inc
index 03369ef..846238e 100755
--- a/proposal.inc
+++ b/proposal.inc
@@ -549,7 +549,7 @@ function dwsim_flowsheet_proposal_form_validate($form, &$form_state)
 	} //$form_state['values']['version'] == 'Old version'
 	if ($form_state['values']['dwsim_database_compound_name'])
 	{
-		$dwsim_database_compound_name = implode(", ", $_POST['dwsim_database_compound_name']);
+		$dwsim_database_compound_name = implode("| ", $_POST['dwsim_database_compound_name']);
 		$form_state['values']['dwsim_database_compound_name'] = trim($dwsim_database_compound_name);
 	} //$form_state['values']['dwsim_database_compound_name']
 	if ($form_state['values']['ucompound'] == 1)
diff --git a/upload_code.inc b/upload_code.inc
index 49f5ed7..245b163 100755
--- a/upload_code.inc
+++ b/upload_code.inc
@@ -10,87 +10,103 @@ function dwsim_flowsheet_abstract()
 		drupal_goto('');
 		return;
 	} //!$proposal_data
-	
 	//$return_html .= l('Upload abstract', 'flowsheeting-project/abstract-code/upload') . '<br />';
 	/* get experiment list */
-	$experiment_rows = array();
-	//$experiment_q = db_query("SELECT * FROM {dwsim_flowsheet_experiment} WHERE proposal_id = %d ORDER BY number ASC", $proposal_data->id);
-	
 	$query = db_select('dwsim_flowsheet_submitted_abstracts');
 	$query->fields('dwsim_flowsheet_submitted_abstracts');
 	$query->condition('proposal_id', $proposal_data->id);
 	$abstracts_q = $query->execute()->fetchObject();
-	
+	if ($abstracts_q->is_submitted == 1)
+	{
+		drupal_set_message(t('Your abstract is under review, you can not edit exisiting abstract without reviewer permission.'), 'error', $repeat = FALSE);
+		//drupal_goto('flowsheeting-project/abstract-code');
+		//return;
+	} //$abstracts_q->is_submitted == 1
 	$query_pro = db_select('dwsim_flowsheet_proposal');
 	$query_pro->fields('dwsim_flowsheet_proposal');
 	$query_pro->condition('id', $proposal_data->id);
 	$abstracts_pro = $query_pro->execute()->fetchObject();
-	
-	
 	$query_pdf = db_select('dwsim_flowsheet_submitted_abstracts_file');
 	$query_pdf->fields('dwsim_flowsheet_submitted_abstracts_file');
 	$query_pdf->condition('proposal_id', $proposal_data->id);
 	$query_pdf->condition('filetype', 'A');
-	
 	$abstracts_pdf = $query_pdf->execute()->fetchObject();
-	
-	if($abstracts_pdf == TRUE){
-	if($abstracts_pdf->filename !="NULL" || $abstracts_pdf->filename != "" ){
-	 $abstract_filename = $abstracts_pdf->filename; 
-	}else{
-	$abstract_filename = "File not uploaded";
-	}
-	}else{
-	$abstract_filename = "File not uploaded";
+	if ($abstracts_pdf == TRUE)
+	{
+		if ($abstracts_pdf->filename != "NULL" || $abstracts_pdf->filename != "")
+		{
+			$abstract_filename = $abstracts_pdf->filename;
+		} //$abstracts_pdf->filename != "NULL" || $abstracts_pdf->filename != ""
+		else
+		{
+			$abstract_filename = "File not uploaded";
+		}
+	} //$abstracts_pdf == TRUE
+	else
+	{
+		$abstract_filename = "File not uploaded";
 	}
-	
-	
 	$query_process = db_select('dwsim_flowsheet_submitted_abstracts_file');
 	$query_process->fields('dwsim_flowsheet_submitted_abstracts_file');
 	$query_process->condition('proposal_id', $proposal_data->id);
 	$query_process->condition('filetype', 'S');
-	
 	$abstracts_query_process = $query_process->execute()->fetchObject();
-
-	
-	if($abstracts_query_process == TRUE){
-	if($abstracts_query_process->filename !="NULL" || $abstracts_query_process->filename != "" ){
-	 $abstracts_query_process_filename = $abstracts_query_process->filename; 
-	}else{
-	$abstracts_query_process_filename = "File not uploaded";
-	}
-	}else{
-	$abstracts_query_process_filename = "File not uploaded";
-	}
-	if($abstracts_q->is_submitted == ''){
-	$url = l('Upload abstract', 'flowsheeting-project/abstract-code/upload');
-	}
-	else if($abstracts_q->is_submitted == 1){
-	$url= "";
-	}else if($abstracts_q->is_submitted == 0 ){
-	$url= l('Edit abstract', 'flowsheeting-project/abstract-code/edit');
-	
-	}
-	if($abstracts_q->unit_operations_used_in_dwsim ==''){
-	$unit_operations_used_in_dwsim = "Not entered";
-	}else{
-	
-	$unit_operations_used_in_dwsim = $abstracts_q->unit_operations_used_in_dwsim;
-	}
-	
-	if($abstracts_q->thermodynamic_packages_used ==''){
-	$thermodynamic_packages_used = "Not entered";
-	}else{
-	
-	$thermodynamic_packages_used = $abstracts_q->thermodynamic_packages_used;
-	}
-	if($abstracts_q->logical_blocks_used ==''){
-	$logical_blocks_used = "Not entered";
-	}else{
-	
-	$logical_blocks_used = $abstracts_q->logical_blocks_used;
+	//var_dump($abstracts_query_process);die;
+	if ($abstracts_query_process == TRUE)
+	{
+		if ($abstracts_query_process->filename != "NULL" || $abstracts_query_process->filename != "")
+		{
+			$abstracts_query_process_filename = $abstracts_query_process->filename;
+		} //$abstracts_query_process->filename != "NULL" || $abstracts_query_process->filename != ""
+		else
+		{
+			$abstracts_query_process_filename = "File not uploaded";
+		}
+		if ($abstracts_q->is_submitted == '')
+		{
+			$url = l('Upload abstract', 'flowsheeting-project/abstract-code/upload');
+		} //$abstracts_q->is_submitted == ''
+		else if ($abstracts_q->is_submitted == 1)
+		{
+			$url = "";
+		} //$abstracts_q->is_submitted == 1
+		else if ($abstracts_q->is_submitted == 0)
+		{
+			$url = l('Edit abstract', 'flowsheeting-project/abstract-code/upload');
+		} //$abstracts_q->is_submitted == 0
+		if ($abstracts_q->unit_operations_used_in_dwsim == '')
+		{
+			$unit_operations_used_in_dwsim = "Not entered";
+		} //$abstracts_q->unit_operations_used_in_dwsim == ''
+		else
+		{
+			$unit_operations_used_in_dwsim = $abstracts_q->unit_operations_used_in_dwsim;
+		}
+		if ($abstracts_q->thermodynamic_packages_used == '')
+		{
+			$thermodynamic_packages_used = "Not entered";
+		} //$abstracts_q->thermodynamic_packages_used == ''
+		else
+		{
+			$thermodynamic_packages_used = $abstracts_q->thermodynamic_packages_used;
+		}
+		if ($abstracts_q->logical_blocks_used == '')
+		{
+			$logical_blocks_used = "Not entered";
+		} //$abstracts_q->logical_blocks_used == ''
+		else
+		{
+			$logical_blocks_used = $abstracts_q->logical_blocks_used;
+		}
+	} //$abstracts_query_process == TRUE
+	else
+	{
+		$url = l('Upload abstract', 'flowsheeting-project/abstract-code/upload');
+		$unit_operations_used_in_dwsim = "Not entered";
+		$thermodynamic_packages_used = "Not entered";
+		$logical_blocks_used = "Not entered";
+		$abstracts_query_process_filename = "File not uploaded";
 	}
-	
 	$headers = array(
 		"Name of compound for which process development is carried out",
 		"CAS No."
@@ -105,24 +121,18 @@ function dwsim_flowsheet_abstract()
 		'header' => $headers,
 		'rows' => $rows
 	));
-	
 	$return_html .= '<strong>Proposer Name:</strong><br />' . $proposal_data->name_title . ' ' . $proposal_data->contributor_name . '<br /><br />';
-	
 	$return_html .= '<strong>Title of the Flowsheet Project:</strong><br />' . $proposal_data->project_title . '<br /><br />';
-	
-	
 	$return_html .= '<strong>DWSIM version:</strong><br />' . $proposal_data->version . '<br /><br />';
-	
 	$return_html .= '<strong>Unit Operations used in DWSIM:</strong><br />' . $unit_operations_used_in_dwsim . '<br /><br />';
 	$return_html .= '<strong>Thermodynamic Packages Used:</strong><br />' . $thermodynamic_packages_used . '<br /><br />';
 	$return_html .= '<strong>Logical Blocks used:</strong><br />' . $logical_blocks_used . '<br /><br />';
-	$return_html .= '<strong>Name of compound for which process development is carried out:</strong><br />' .$prodata . '<br />';
+	$return_html .= '<strong>Name of compound for which process development is carried out:</strong><br />' . $prodata . '<br />';
 	$return_html .= '<strong>List of compounds from DWSIM Database used in process flowsheet:</strong><br />' . $proposal_data->dwsim_database_compound_name . '<br /><br />';
 	$return_html .= '<strong>List of user defined compounds used in process flowsheet:</strong><br />' . _dwsim_flowsheet_list_of_user_defined_compound($proposal_data->id) . '<br />';
 	$return_html .= '<strong>Uploaded an abstract (brief outline) of the project:</strong><br />' . $abstract_filename . '<br /><br />';
 	$return_html .= '<strong>Upload the DWSIM flowsheet for the developed process:</strong><br />' . $abstracts_query_process_filename . '<br /><br />';
 	$return_html .= $url . '<br />';
-
 	return $return_html;
 }
 function dwsim_flowsheet_upload_abstract_code_form($form, &$form_state)
@@ -159,6 +169,16 @@ function dwsim_flowsheet_upload_abstract_code_form($form, &$form_state)
 		drupal_goto('flowsheeting-project/abstract-code');
 		return;
 	}
+	$query = db_select('dwsim_flowsheet_submitted_abstracts');
+	$query->fields('dwsim_flowsheet_submitted_abstracts');
+	$query->condition('proposal_id', $proposal_data->id);
+	$abstracts_q = $query->execute()->fetchObject();
+	if ($abstracts_q->is_submitted == 1)
+	{
+		drupal_set_message(t('Your abstract is under review, you can not edit exisiting abstract without reviewer permission.'), 'error', $repeat = FALSE);
+		drupal_goto('flowsheeting-project/abstract-code');
+		//return;
+	} //$abstracts_q->is_submitted == 1
 	$form['project_title'] = array(
 		'#type' => 'item',
 		'#markup' => $proposal_data->project_title,
@@ -169,31 +189,81 @@ function dwsim_flowsheet_upload_abstract_code_form($form, &$form_state)
 		'#title' => t('DWSIM version'),
 		'#markup' => $proposal_data->version
 	);
-	$form['unit_operations_used_in_dwsim'] = array(
-		'#type' => 'select',
-		'#title' => t('Unit Operations used in DWSIM'),
-		'#options' => _df_list_of_unit_operations(),
-		'#required' => TRUE,
-		'#size' => '20',
-		'#multiple' => TRUE,
-		'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
-	);
-	$form['thermodynamic_packages_used'] = array(
-		'#type' => 'select',
-		'#title' => t('Thermodynamic Packages Used'),
-		'#options' => _df_list_of_thermodynamic_packages(),
-		'#required' => TRUE,
-		'#size' => '20',
-		'#multiple' => TRUE,
-		'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
-	);
-	$form['logical_blocks_used'] = array(
-		'#type' => 'select',
-		'#title' => t('Logical Blocks used (If any)'),
-		'#options' => _df_list_of_logical_block(),
-		'#multiple' => TRUE,
-		'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
-	);
+	if ($abstracts_q->unit_operations_used_in_dwsim)
+	{
+		$existing_unit_operations_used_in_dwsim = default_value_for_selections("unit_operations_used_in_dwsim", $proposal_data->id);
+		$form['unit_operations_used_in_dwsim'] = array(
+			'#type' => 'select',
+			'#title' => t('Unit Operations used in DWSIM'),
+			'#options' => _df_list_of_unit_operations(),
+			'#required' => TRUE,
+			'#default_value' => $existing_unit_operations_used_in_dwsim,
+			'#size' => '20',
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	} //$abstracts_q->unit_operations_used_in_dwsim
+	else
+	{
+		$form['unit_operations_used_in_dwsim'] = array(
+			'#type' => 'select',
+			'#title' => t('Unit Operations used in DWSIM'),
+			'#options' => _df_list_of_unit_operations(),
+			'#required' => TRUE,
+			'#size' => '20',
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	}
+	if ($abstracts_q->thermodynamic_packages_used)
+	{
+		$existing_thermodynamic_packages_used = default_value_for_selections("thermodynamic_packages_used", $proposal_data->id);
+		//var_dump($existing_thermodynamic_packages_used);die;
+		$form['thermodynamic_packages_used'] = array(
+			'#type' => 'select',
+			'#title' => t('Thermodynamic Packages Used'),
+			'#options' => _df_list_of_thermodynamic_packages(),
+			'#required' => TRUE,
+			'#size' => '20',
+			'#default_value' => $existing_thermodynamic_packages_used,
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	} //$abstracts_q->thermodynamic_packages_used
+	else
+	{
+		$form['thermodynamic_packages_used'] = array(
+			'#type' => 'select',
+			'#title' => t('Thermodynamic Packages Used'),
+			'#options' => _df_list_of_thermodynamic_packages(),
+			'#required' => TRUE,
+			'#size' => '20',
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	}
+	if ($abstracts_q->logical_blocks_used != "Not entered")
+	{
+		$existing_logical_blocks_used = default_value_for_selections("logical_blocks_used", $proposal_data->id);
+		$form['logical_blocks_used'] = array(
+			'#type' => 'select',
+			'#title' => t('Logical Blocks used (If any)'),
+			'#options' => _df_list_of_logical_block(),
+			'#default_value' => $existing_logical_blocks_used,
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	} //$abstracts_q->logical_blocks_used != "Not entered"
+	else
+	{
+		$form['logical_blocks_used'] = array(
+			'#type' => 'select',
+			'#title' => t('Logical Blocks used (If any)'),
+			'#options' => _df_list_of_logical_block(),
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	}
 	$headers = array(
 		"User defined compound",
 		"CAS No."
@@ -213,24 +283,45 @@ function dwsim_flowsheet_upload_abstract_code_form($form, &$form_state)
 		'#title' => t('Name of compound for which process development is carried out'),
 		'#markup' => $prodata
 	);
-	//var_dump( _df_list_of_dwsim_compound($proposal_data->id));die;
-	$form['list_of_compounds_from_dwsim_database_used_in_process_flowsheet'] = array(
-		'#type' => 'textfield',
-		'#title' => t('List of compounds from DWSIM Database used in process flowsheet'),
-		'#value' => $proposal_data->dwsim_database_compound_name,
-		'#size' => 20,
-		'#disabled' => TRUE,
-	);
-
+	if ($proposal_data->dwsim_database_compound_name)
+	{
+		$existing_dwsim_database_compound_name = default_value_for_selections("dwsim_database_compound_name", $proposal_data->id);
+		//var_dump($existing_dwsim_database_compound_name);die;
+		$form['list_of_compounds_from_dwsim_database_used_in_process_flowsheet'] = array(
+			'#type' => 'select',
+			'#title' => t('List of compounds from DWSIM Database used in process flowsheet'),
+			'#options' => _df_list_of_dwsim_compound(),
+			'#default_value' => $existing_dwsim_database_compound_name,
+			'#size' => '20',
+			'#multiple' => TRUE,
+			'#description' => t('[You can select multiple options by holding ctrl + left key of mouse]')
+		);
+	} //$proposal_data->dwsim_database_compound_name
+	else
+	{
+		$form['list_of_compounds_from_dwsim_database_used_in_process_flowsheet'] = array(
+			'#type' => 'slect',
+			'#title' => t('List of compounds from DWSIM Database used in process flowsheet'),
+			'#options' => _df_list_of_dwsim_compound(),
+			'#size' => '20',
+			'#multiple' => TRUE
+		);
+	}
+	$existing_uploaded_A_file = default_value_for_uploaded_files("A", $proposal_data->id);
 	$form['upload_an_abstract'] = array(
 		'#type' => 'file',
 		'#title' => t('Upload an abstract (brief outline) of the project.'),
-		'#description' => t('Separate filenames with underscore. No spaces or any special characters allowed in filename.') . '<br />' . t('<span style="color:red;">Allowed file extensions : ') . variable_get('dwsim_flowsheet_abstract_upload_extensions', '') . '</span>'
+		'#description' => t('<span style="color:red;">Current File :</span> ' . $existing_uploaded_A_file->filename . '<br />Separate filenames with underscore. No spaces or any special characters allowed in filename.') . '<br />' . t('<span style="color:red;">Allowed file extensions : ') . variable_get('dwsim_flowsheet_abstract_upload_extensions', '') . '</span>'
 	);
+	$existing_uploaded_S_file = default_value_for_uploaded_files("S", $proposal_data->id);
 	$form['upload_flowsheet_developed_process'] = array(
 		'#type' => 'file',
 		'#title' => t('Upload the DWSIM flowsheet for the developed process.'),
-		'#description' => t('Separate filenames with underscore. No spaces or any special characters allowed in filename.') . '<br />' . t('<span style="color:red;">Allowed file extensions : ') . variable_get('dwsim_flowsheet_flowsheet_developed_process_source_extensions', '') . '</span>'
+		'#description' => t('<span style="color:red;">Current File :</span> ' . $existing_uploaded_S_file->filename . '<br />Separate filenames with underscore. No spaces or any special characters allowed in filename.') . '<br />' . t('<span style="color:red;">Allowed file extensions : ') . variable_get('dwsim_flowsheet_flowsheet_developed_process_source_extensions', '') . '</span>'
+	);
+	$form['prop_id'] = array(
+		'#type' => 'hidden',
+		'#value' => $proposal_data->id
 	);
 	$form['submit'] = array(
 		'#type' => 'submit',
@@ -242,7 +333,6 @@ function dwsim_flowsheet_upload_abstract_code_form($form, &$form_state)
 	);
 	return $form;
 }
-
 function dwsim_flowsheet_upload_abstract_code_form_validate($form, &$form_state)
 {
 	if ($form_state['values']['unit_operations_used_in_dwsim'])
@@ -255,60 +345,77 @@ function dwsim_flowsheet_upload_abstract_code_form_validate($form, &$form_state)
 		$thermodynamic_packages_used = implode(", ", $_POST['thermodynamic_packages_used']);
 		$form_state['values']['thermodynamic_packages_used'] = $thermodynamic_packages_used;
 	} //$form_state['values']['thermodynamic_packages_used']
-	if($form_state['values']['logical_blocks_used'] != ""){
-		if ($form_state['values']['logical_blocks_used'])
+	$logical_blocks_used_in = $_POST['logical_blocks_used'];
+	if ($logical_blocks_used_in != "")
+	{
+		if ($logical_blocks_used_in)
+		{
+			$logical_blocks_used = implode(", ", $logical_blocks_used_in);
+			$form_state['values']['logical_blocks_used'] = $logical_blocks_used;
+		} //$form_state['values']['logical_blocks_used']
+	} //$logical_blocks_used_in != ""
+	else
 	{
-		$logical_blocks_used = implode(", ", $_POST['logical_blocks_used']);
-		$form_state['values']['logical_blocks_used'] = $logical_blocks_used;
-	} //$form_state['values']['logical_blocks_used']
-	}else{
 		$form_state['values']['logical_blocks_used'] = "Not entered";
 	}
+	//var_dump($form_state['values']['logical_blocks_used']);die;
 	if ($form_state['values']['list_of_compounds_from_dwsim_database_used_in_process_flowsheet'])
 	{
-		$list_of_compounds_from_dwsim_database_used_in_process_flowsheet = implode(", ", $_POST['list_of_compounds_from_dwsim_database_used_in_process_flowsheet']);
+		$list_of_compounds_from_dwsim_database_used_in_process_flowsheet = implode("| ", $_POST['list_of_compounds_from_dwsim_database_used_in_process_flowsheet']);
+		//var_dump($form_state['values']['list_of_compounds_from_dwsim_database_used_in_process_flowsheet']);die;
 		$form_state['values']['list_of_compounds_from_dwsim_database_used_in_process_flowsheet'] = $list_of_compounds_from_dwsim_database_used_in_process_flowsheet;
 	} //$form_state['values']['list_of_compounds_from_dwsim_database_used_in_process_flowsheet']
 	if (isset($_FILES['files']))
 	{
 		/* check if file is uploaded */
-		if (!($_FILES['files']['name']['upload_flowsheet_developed_process']))
-			form_set_error('upload_flowsheet_developed_process', t('Please upload the file.'));
-		if (!($_FILES['files']['name']['upload_an_abstract']))
-			form_set_error('upload_an_abstract', t('Please upload the file.'));
+		$existing_uploaded_A_file = default_value_for_uploaded_files("A", $form_state['values']['prop_id']);
+		$existing_uploaded_S_file = default_value_for_uploaded_files("S", $form_state['values']['prop_id']);
+		if (!$existing_uploaded_S_file)
+		{
+			if (!($_FILES['files']['name']['upload_flowsheet_developed_process']))
+				form_set_error('upload_flowsheet_developed_process', t('Please upload the file.'));
+		} //!$existing_uploaded_S_file
+		if (!$existing_uploaded_A_file)
+		{
+			if (!($_FILES['files']['name']['upload_an_abstract']))
+				form_set_error('upload_an_abstract', t('Please upload the file.'));
+		} //!$existing_uploaded_A_file
 		/* check for valid filename extensions */
-		foreach ($_FILES['files']['name'] as $file_form_name => $file_name)
+		if ($_FILES['files']['name']['upload_an_abstract'] || $_FILES['files']['name']['upload_flowsheet_developed_process'])
 		{
-			if ($file_name)
+			foreach ($_FILES['files']['name'] as $file_form_name => $file_name)
 			{
-				/* checking file type */
-				if (strstr($file_form_name, 'upload_flowsheet_developed_process'))
-					$file_type = 'S';
-				else if (strstr($file_form_name, 'upload_an_abstract'))
-					$file_type = 'A';
-				else
-					$file_type = 'U';
-				$allowed_extensions_str = '';
-				switch ($file_type)
+				if ($file_name)
 				{
-					case 'S':
-						$allowed_extensions_str = variable_get('dwsim_flowsheet_flowsheet_developed_process_source_extensions', '');
-						break;
-					case 'A':
-						$allowed_extensions_str = variable_get('dwsim_flowsheet_abstract_upload_extensions', '');
-						break;
-				} //$file_type
-				$allowed_extensions = explode(',', $allowed_extensions_str);
-				$tmp_ext = explode('.', strtolower($_FILES['files']['name'][$file_form_name]));
-				$temp_extension = end($tmp_ext);
-				if (!in_array($temp_extension, $allowed_extensions))
-					form_set_error($file_form_name, t('Only file with ' . $allowed_extensions_str . ' extensions can be uploaded.'));
-				if ($_FILES['files']['size'][$file_form_name] <= 0)
-					form_set_error($file_form_name, t('File size cannot be zero.'));
-				/* check if valid file name */
-				if (!dwsim_flowsheet_check_valid_filename($_FILES['files']['name'][$file_form_name]))
-					form_set_error($file_form_name, t('Invalid file name specified. Only alphabets and numbers are allowed as a valid filename.'));
-			} //$file_name
+					/* checking file type */
+					if (strstr($file_form_name, 'upload_flowsheet_developed_process'))
+						$file_type = 'S';
+					else if (strstr($file_form_name, 'upload_an_abstract'))
+						$file_type = 'A';
+					else
+						$file_type = 'U';
+					$allowed_extensions_str = '';
+					switch ($file_type)
+					{
+						case 'S':
+							$allowed_extensions_str = variable_get('dwsim_flowsheet_flowsheet_developed_process_source_extensions', '');
+							break;
+						case 'A':
+							$allowed_extensions_str = variable_get('dwsim_flowsheet_abstract_upload_extensions', '');
+							break;
+					} //$file_type
+					$allowed_extensions = explode(',', $allowed_extensions_str);
+					$tmp_ext = explode('.', strtolower($_FILES['files']['name'][$file_form_name]));
+					$temp_extension = end($tmp_ext);
+					if (!in_array($temp_extension, $allowed_extensions))
+						form_set_error($file_form_name, t('Only file with ' . $allowed_extensions_str . ' extensions can be uploaded.'));
+					if ($_FILES['files']['size'][$file_form_name] <= 0)
+						form_set_error($file_form_name, t('File size cannot be zero.'));
+					/* check if valid file name */
+					if (!dwsim_flowsheet_check_valid_filename($_FILES['files']['name'][$file_form_name]))
+						form_set_error($file_form_name, t('Invalid file name specified. Only alphabets and numbers are allowed as a valid filename.'));
+				} //$file_name
+			} //$_FILES['files']['name'] as $file_form_name => $file_name
 		} //$_FILES['files']['name'] as $file_form_name => $file_name
 	} //isset($_FILES['files'])
 	// drupal_add_js('jQuery(document).ready(function () { alert("Hello!"); });', 'inline');
@@ -332,8 +439,32 @@ function dwsim_flowsheet_upload_abstract_code_form_submit($form, &$form_state)
 	$dest_path = $proposal_directory . '/';
 	if (!is_dir($root_path . $dest_path))
 		mkdir($root_path . $dest_path);
-	/* creating solution database entry */
-	$query = "INSERT INTO {dwsim_flowsheet_submitted_abstracts} (
+	if ($proposal_data)
+	{
+		$query = "UPDATE {dwsim_flowsheet_proposal} SET 
+
+	dwsim_database_compound_name =  :dwsim_database_compound_name
+ 
+	WHERE id = :proposal_id
+	";
+		$args = array(
+			":dwsim_database_compound_name" => $v['list_of_compounds_from_dwsim_database_used_in_process_flowsheet'],
+			":proposal_id" => $proposal_id
+		);
+		$submitted_proposal_id = db_query($query, $args, array(
+			'return' => Database::RETURN_INSERT_ID
+		));
+	} //$proposal_data
+	$proposal_id = $proposal_data->id;
+	$query_s = "SELECT * FROM {dwsim_flowsheet_submitted_abstracts} WHERE proposal_id = :proposal_id";
+	$args_s = array(
+		":proposal_id" => $proposal_id
+	);
+	$query_s_result = db_query($query_s, $args_s)->fetchObject();
+	if (!$query_s_result)
+	{
+		/* creating solution database entry */
+		$query = "INSERT INTO {dwsim_flowsheet_submitted_abstracts} (
 	proposal_id,
 	approver_uid,
 	abstract_approval_status,
@@ -344,20 +475,46 @@ function dwsim_flowsheet_upload_abstract_code_form_submit($form, &$form_state)
 	abstract_approval_date,
 	is_submitted) VALUES (:proposal_id, :approver_uid, :abstract_approval_status, :unit_operations_used_in_dwsim, 
   :thermodynamic_packages_used, :logical_blocks_used, :abstract_upload_date, :abstract_approval_date, :is_submitted)";
-	$args = array(
-		":proposal_id" => $proposal_id,
-		":approver_uid" => 0,
-		":abstract_approval_status" => 0,
-		":unit_operations_used_in_dwsim" => $v['unit_operations_used_in_dwsim'],
-		":thermodynamic_packages_used" => $v['thermodynamic_packages_used'],
-		":logical_blocks_used" => $v['logical_blocks_used'],
-		":abstract_upload_date" => time(),
-		":abstract_approval_date" => 0,
-		":is_submitted" => 1
-	);
-	$submitted_abstract_id = db_query($query, $args, array(
-		'return' => Database::RETURN_INSERT_ID
-	));
+		$args = array(
+			":proposal_id" => $proposal_id,
+			":approver_uid" => 0,
+			":abstract_approval_status" => 0,
+			":unit_operations_used_in_dwsim" => $v['unit_operations_used_in_dwsim'],
+			":thermodynamic_packages_used" => $v['thermodynamic_packages_used'],
+			":logical_blocks_used" => $v['logical_blocks_used'],
+			":abstract_upload_date" => time(),
+			":abstract_approval_date" => 0,
+			":is_submitted" => 1
+		);
+		$submitted_abstract_id = db_query($query, $args, array(
+			'return' => Database::RETURN_INSERT_ID
+		));
+		drupal_set_message('Abstract uploaded successfully.', 'status');
+	} //!$query_s_result
+	else
+	{
+		$query = "UPDATE {dwsim_flowsheet_submitted_abstracts} SET 
+
+	unit_operations_used_in_dwsim=  :unit_operations_used_in_dwsim,
+	thermodynamic_packages_used= :thermodynamic_packages_used,
+	logical_blocks_used=:logical_blocks_used,
+	abstract_upload_date =:abstract_upload_date,
+	is_submitted= :is_submitted 
+	WHERE proposal_id = :proposal_id
+	";
+		$args = array(
+			":unit_operations_used_in_dwsim" => $v['unit_operations_used_in_dwsim'],
+			":thermodynamic_packages_used" => $v['thermodynamic_packages_used'],
+			":logical_blocks_used" => $v['logical_blocks_used'],
+			":abstract_upload_date" => time(),
+			":is_submitted" => 1,
+			":proposal_id" => $proposal_id
+		);
+		$submitted_abstract_id = db_query($query, $args, array(
+			'return' => Database::RETURN_INSERT_ID
+		));
+		drupal_set_message('Abstract updated successfully.', 'status');
+	}
 	/* uploading files */
 	foreach ($_FILES['files']['name'] as $file_form_name => $file_name)
 	{
@@ -365,9 +522,9 @@ function dwsim_flowsheet_upload_abstract_code_form_submit($form, &$form_state)
 		{
 			/* checking file type */
 			if (strstr($file_form_name, 'upload_flowsheet_developed_process'))
-					$file_type = 'S';
-				else if (strstr($file_form_name, 'upload_an_abstract'))
-					$file_type = 'A';
+				$file_type = 'S';
+			else if (strstr($file_form_name, 'upload_an_abstract'))
+				$file_type = 'A';
 			else
 				$file_type = 'U';
 			if (file_exists($root_path . $dest_path . $_FILES['files']['name'][$file_form_name]))
@@ -381,22 +538,48 @@ function dwsim_flowsheet_upload_abstract_code_form_submit($form, &$form_state)
 			if (move_uploaded_file($_FILES['files']['tmp_name'][$file_form_name], $root_path . $dest_path . $_FILES['files']['name'][$file_form_name]))
 			{
 				/* for uploaded files making an entry in the database */
-				$query = "INSERT INTO {dwsim_flowsheet_submitted_abstracts_file} (submitted_abstract_id, proposal_id, uid, approvar_uid, filename, filepath, filemime, filesize, filetype, timestamp)
-          VALUES (:submitted_abstract_id, :proposal_id, :uid, :approvar_uid, :filename, :filepath, :filemime, :filesize, :filetype, :timestamp)";
-				$args = array(
-					":submitted_abstract_id" => $submitted_abstract_id,
+				$query_ab_f = "SELECT * FROM dwsim_flowsheet_submitted_abstracts_file WHERE proposal_id = :proposal_id AND filetype = 
+				:filetype";
+				$args_ab_f = array(
 					":proposal_id" => $proposal_id,
-					":uid" => $user->uid,
-					":approvar_uid" => 0,
-					":filename" => $_FILES['files']['name'][$file_form_name],
-					":filepath" => $file_path . $_FILES['files']['name'][$file_form_name],
-					":filemime" => mime_content_type($root_path . $dest_path . $_FILES['files']['name'][$file_form_name]),
-					":filesize" => $_FILES['files']['size'][$file_form_name],
-					":filetype" => $file_type,
-					":timestamp" => time()
+					":filetype" => $file_type
 				);
-				db_query($query, $args);
-				drupal_set_message($file_name . ' uploaded successfully.', 'status');
+				$query_ab_f_result = db_query($query_ab_f, $args_ab_f)->fetchObject();
+				if (!$query_ab_f_result)
+				{
+					$query = "INSERT INTO {dwsim_flowsheet_submitted_abstracts_file} (submitted_abstract_id, proposal_id, uid, approvar_uid, filename, filepath, filemime, filesize, filetype, timestamp)
+          VALUES (:submitted_abstract_id, :proposal_id, :uid, :approvar_uid, :filename, :filepath, :filemime, :filesize, :filetype, :timestamp)";
+					$args = array(
+						":submitted_abstract_id" => $submitted_abstract_id,
+						":proposal_id" => $proposal_id,
+						":uid" => $user->uid,
+						":approvar_uid" => 0,
+						":filename" => $_FILES['files']['name'][$file_form_name],
+						":filepath" => $file_path . $_FILES['files']['name'][$file_form_name],
+						":filemime" => mime_content_type($root_path . $dest_path . $_FILES['files']['name'][$file_form_name]),
+						":filesize" => $_FILES['files']['size'][$file_form_name],
+						":filetype" => $file_type,
+						":timestamp" => time()
+					);
+					db_query($query, $args);
+					drupal_set_message($file_name . ' uploaded successfully.', 'status');
+				} //!$query_ab_f_result
+				else
+				{
+					unlink($root_path . $dest_path . $query_ab_f_result->filename);
+					$query = "UPDATE {dwsim_flowsheet_submitted_abstracts_file} SET filename = :filename, filepath=:filepath, filemime=:filemime, filesize=:filesize, timestamp=:timestamp WHERE proposal_id = :proposal_id AND filetype = :filetype";
+					$args = array(
+						":filename" => $_FILES['files']['name'][$file_form_name],
+						":filepath" => $file_path . $_FILES['files']['name'][$file_form_name],
+						":filemime" => mime_content_type($root_path . $dest_path . $_FILES['files']['name'][$file_form_name]),
+						":filesize" => $_FILES['files']['size'][$file_form_name],
+						":timestamp" => time(),
+						":proposal_id" => $proposal_id,
+						":filetype" => $file_type
+					);
+					db_query($query, $args);
+					drupal_set_message($file_name . ' file updated successfully.', 'status');
+				}
 			} //move_uploaded_file($_FILES['files']['tmp_name'][$file_form_name], $root_path . $dest_path . $_FILES['files']['name'][$file_form_name])
 			else
 			{
@@ -404,12 +587,12 @@ function dwsim_flowsheet_upload_abstract_code_form_submit($form, &$form_state)
 			}
 		} //$file_name
 	} //$_FILES['files']['name'] as $file_form_name => $file_name
-	drupal_set_message('Abstract uploaded successfully.', 'status');
 	/* sending email */
 	$email_to = $user->mail;
 	$from = variable_get('dwsim_flowsheet_from_email', '');
 	$bcc = variable_get('dwsim_flowsheet_emails', '');
 	$cc = variable_get('dwsim_flowsheet_cc_emails', '');
+	$params['abstract_uploaded']['proposal_id'] = $proposal_id;
 	$params['abstract_uploaded']['submitted_abstract_id'] = $submitted_abstract_id;
 	$params['abstract_uploaded']['user_id'] = $user->uid;
 	$params['abstract_uploaded']['headers'] = array(
@@ -425,3 +608,84 @@ function dwsim_flowsheet_upload_abstract_code_form_submit($form, &$form_state)
 		drupal_set_message('Error sending email message.', 'error');
 	drupal_goto('flowsheeting-project/abstract-code');
 }
+function default_value_for_selections($opration, $proposal_id)
+{
+	$query = db_select('dwsim_flowsheet_submitted_abstracts');
+	$query->fields('dwsim_flowsheet_submitted_abstracts');
+	$query->condition('proposal_id', $proposal_id);
+	$abstracts_q = $query->execute()->fetchObject();
+	$selected_pacakege_array = array();
+	if ($opration == "unit_operations_used_in_dwsim")
+	{
+		$uouid = explode(',', $abstracts_q->unit_operations_used_in_dwsim);
+		$ui = 0;
+		foreach ($uouid as $unit_item->$ui)
+		{
+			$selected_pacakege_array[$ui] = trim($unit_item->$ui);
+			$ui++;
+		} //$uouid as $unit_item->$ui
+	} //$opration == "unit_operations_used_in_dwsim"
+	elseif ($opration == "thermodynamic_packages_used")
+	{
+		$tpuid = explode(',', $abstracts_q->thermodynamic_packages_used);
+		$tpui = 0;
+		foreach ($tpuid as $thermodynamic_item->$tpui)
+		{
+			$selected_pacakege_array[$tpui] = trim($thermodynamic_item->$tpui);
+			$tpui++;
+		} //$tpuid as $thermodynamic_item->$tpui
+	} //$opration == "thermodynamic_packages_used"
+	elseif ($opration == "logical_blocks_used")
+	{
+		$lbuid = explode(',', $abstracts_q->logical_blocks_used);
+		$lbui = 0;
+		foreach ($lbuid as $logical_blocks->$lbui)
+		{
+			$selected_pacakege_array[$logical_blocks->$lbui] = trim($logical_blocks->$lbui);
+			$lbui++;
+		} //$lbuid as $logical_blocks->$lbui
+	} //$opration == "logical_blocks_used"
+	elseif ($opration == "dwsim_database_compound_name")
+	{
+		$query = db_select('dwsim_flowsheet_proposal');
+		$query->fields('dwsim_flowsheet_proposal');
+		$query->condition('id', $proposal_id);
+		$proposal_q = $query->execute()->fetchObject();
+		$ddcm = explode('| ', $proposal_q->dwsim_database_compound_name);
+		$ddcmi = 0;
+		foreach ($ddcm as $dwsim_database_compound_name->$ddcmi)
+		{
+			$selected_pacakege_array[$dwsim_database_compound_name->$ddcmi] = trim($dwsim_database_compound_name->$ddcmi);
+			$ddcmi++;
+		} //$ddcm as $dwsim_database_compound_name->$ddcmi
+	} //$opration == "dwsim_database_compound_name"
+	else
+	{
+		return $selected_pacakege_array;
+	}
+	return $selected_pacakege_array;
+}
+function default_value_for_uploaded_files($filetype, $proposal_id)
+{
+	$query = db_select('dwsim_flowsheet_submitted_abstracts_file');
+	$query->fields('dwsim_flowsheet_submitted_abstracts_file');
+	$query->condition('proposal_id', $proposal_id);
+	$selected_files_array = "";
+	if ($filetype == "A")
+	{
+		$query->condition('filetype', $filetype);
+		$filetype_q = $query->execute()->fetchObject();
+		return $filetype_q;
+	} //$filetype == "A"
+	elseif ($filetype == "S")
+	{
+		$query->condition('filetype', $filetype);
+		$filetype_q = $query->execute()->fetchObject();
+		return $filetype_q;
+	} //$filetype == "S"
+	else
+	{
+		return;
+	}
+	return;
+}