slope and offset not agree

replace
PARA = [ 'CNDC'; 'SSJT'; 'SSTP' ];
with cell array of char
PARA =  {'CNDC', 'SSJT', 'SSTP'};
and modify following code 

tsg_util/calibration.m

@@ -22,27 +22,38 @@ tsg = getappdata( hMainFig, 'tsg_data' );
 
 % Variables
 % ---------
-PARA = [ 'CNDC'; 'SSJT'; 'SSTP' ];
+PARA =  {'CNDC', 'SSJT', 'SSTP'};
 
-for i = 1:3
+for i = PARA
 
-  if ~isempty( tsg.(PARA(i,:)) )
+  % convert cell to char
+  % --------------------
+  ip = char(i);
+  
+  if ~isempty( tsg.(ip) )
 
-    para1 = [PARA(i,:) '_LINCOEF_NEW'];
-    para2 = [PARA(i,:) '_CAL'];
+    para1 = strcat(ip, '_LINCOEF_NEW');
+    para2 = strcat(ip, '_CAL');
+    key   = strcat(ip, '_LINCOEF_CONV');
+    
+    % get indice off slope and offset
+    % -------------------------------
+    slope = strmatch('SLOPE', tsg.(key));
+    offset = strmatch('OFFSET', tsg.(key));
     
     % If the Slope = 1 and the offset = 0 : No calibration
     % The variable _CAL must be emptied
     % ---------------------------------------------------------------------
-    if abs(1-tsg.(para1)(1)) > .00000001 || abs(0-tsg.(para1)(2)) > .00000001
-      tsg.(para2) = tsg.(para1)(1) * tsg.(PARA(i,:)) + tsg.(para1)(2);
+    if abs(1-tsg.(para1)(slope)) > .00000001 || ...
+        abs(0-tsg.(para1)(offset)) > .00000001
+      tsg.(para2) = tsg.(para1)(slope) * tsg.(ip) + tsg.(para1)(offset);
     else
       tsg.(para2) = [];
     end
 
-  elseif strcmp( PARA(i,:), 'CNDC' ) || strcmp( PARA(i,:), 'SSJT' )
+  elseif strcmp( ip, 'CNDC' ) || strcmp( ip, 'SSJT' )
 
-    msgbox( [ '    No ' PARA(i,:) ' data'],...
+    msgbox( [ '    No ' ip ' data'],...
       'Function ''Calibration''',...
       'warn', 'modal');
     return