Update planning info management

metis_l1_prep.pro

@@ -143,9 +143,14 @@ pro metis_l1_prep
 	
 	; campaign keywords
 
-	obs_id_fields = strsplit(planning_data.obs_id, '_', /extract)
-	soop_type = obs_id_fields[2]
-	obs_type = obs_id_fields[4]
+	if planning_data.obs_id ne 'none' then begin
+		obs_id_fields = strsplit(planning_data.obs_id, '_', /extract)
+		if obs_id_fields[2] eq '000' then sooptype = 'none' else sooptype = obs_id_fields[2]
+		if obs_id_fields[4] eq '000' then obs_type = 'none' else obs_type = obs_id_fields[4]
+	endif else begin
+		sooptype = 'none'
+		obs_type = 'none'
+	endelse
 
 	; build the fits file extensions
 
@@ -323,7 +328,7 @@ pro metis_l1_prep
 	fxaddpar, primary_header, 'NSUMEXP', nsumexp, 'number of detector readouts summed together', before = 'DATAMIN'
 	fxaddpar, primary_header, 'TELAPSE', telapse, '[s] elapsed time during observation', before = 'DATAMIN'
 	fxaddpar, primary_header, 'SOOPNAME', planning_data.soop_name, 'name of the SOOP that the data belong to', before = 'DATAMIN'
-	fxaddpar, primary_header, 'SOOPTYPE', soop_type, 'campaign ID(s) that the data belong to', before = 'DATAMIN'
+	fxaddpar, primary_header, 'SOOPTYPE', sooptype, 'campaign ID(s) that the data belong to', before = 'DATAMIN'
 	fxaddpar, primary_header, 'OBS_ID', planning_data.obs_id, 'unique ID of the individual observation', before = 'DATAMIN'
 	fxaddpar, primary_header, 'TARGET', 'TBD', 'type of target from planning', before = 'DATAMIN'
 	fxaddpar, primary_header, 'BSCALE', 1, 'ratio of physical to array value at 0 offset', before = 'DATAMIN'
@@ -395,7 +400,7 @@ pro metis_l1_prep
 		fxaddpar, primary_header, 'HV_MCP_V', interpol_param(hk_table, 'NIT0E0B6', date_avg, empty_params = empty_params), '[V] HVU MCP read voltage', after = 'HV_SCR_V'
 		fxaddpar, primary_header, 'HV_MCP_I', interpol_param(hk_table, 'NIT0E0BF', date_avg, empty_params = empty_params), '[uA] HVU MCP current', after = 'HV_MCP_V'
 		fxaddpar, primary_header, 'HV_TEMP', interpol_param(hk_table, 'NIT0E0B5', date_avg, empty_params = empty_params), '[degC] HVU temperature', after = 'HV_MCP_I'
-		fxaddpar, primary_header, 'TSENSOR ', interpol_param(hk_table, 'NIT0E050', date_avg, empty_params = empty_params), '[degC] UVDA temperature'
+		fxaddpar, primary_header, 'TSENSOR', interpol_param(hk_table, 'NIT0E050', date_avg, empty_params = empty_params), '[degC] UVDA temperature'
 
 		journal, 'Header keywords were calibrated using HK parameters:'
 		journal, '  HVU_SCR  = ' + string(fxpar(primary_header, 'HVU_SCR'), format = '(F0)')