Description Kathy Carroll 2011-09-15 14:05:07 EDT

Based on RBD, I'm expecting decimal ISA to be based on the field definition rather than actual value.  I expect these variations to write out true to the console.  Used install build 201109150902

program driver2 type BasicProgram {}

	function main()
		implicitDec05D02 decimal(5,2);
		explicitDec05D02 decimal(5,2) = 123.45;
		nullDec decimal(5,2)?;
		expecting  boolean = true;
		
		actual boolean = implicitDec05D02 isa decimal(5,2);
  		syslib.writestdout("implicitDec05D02 isa decimal(5,2) " + (actual == expecting)); 
  		
 		actual  = explicitDec05D02 isa decimal(5,2);
  		syslib.writestdout("explicitDec05D02 isa decimal(5,2) " + (actual == expecting)); 
  		
  		implicitDec05D02 = 1.2;
  		actual = implicitDec05D02 isa decimal(5,2);
  		syslib.writestdout("implicitDec05D02=1.2 isa decimal(5,2) " + (actual == expecting)); 
  		
  		expecting = false;
  		actual = implicitDec05D02 isa decimal(2,1);
  		syslib.writestdout("implicitDec05D02=1.2 isa decimal(2,1) " + (actual == expecting)); 
  
    	actual = nullDec isa decimal(5,2);
  		syslib.writestdout("nullDec isa decimal(5,2) " + (actual == expecting)); 
	end	
end