在AS400中，十进制问题通常涉及到使用十进制数据类型进行运算或处理数据。下面是一个使用代码示例解决AS400中的十进制问题的方法：

1. 使用DECIMAL数据类型： 在AS400中，可以使用DECIMAL数据类型来存储和处理十进制数。DECIMAL可以指定精度和标度，精度定义了数值总共的位数，标度定义了小数点后的位数。例如，DECIMAL(9,2)表示一个总共9位数，其中2位是小数。

   示例代码：

   DCL-S Amount DECIMAL(9,2);
   DCL-S Tax DECIMAL(4,2);
   
   Amount = 100.50;
   Tax = Amount * 0.1;
   

   在上面的示例中，Amount和Tax都是DECIMAL类型的变量。Amount被赋值为100.50，然后通过乘法运算计算出Tax的值。最终，Tax的值将是10.05。

2. 使用BIF函数： AS400提供了一些内置函数（BIF函数）来处理十进制数。例如，使用%DEC函数可以将字符型变量或数值型变量转换为DECIMAL类型。

   示例代码：

   DCL-S Amount CHAR(5);
   DCL-S Tax DECIMAL(4,2);
   
   Amount = '100.50';
   Tax = %DEC(Amount: 9: 2);
   

   上面的示例中，Amount是一个字符型变量，包含了'100.50'。通过使用%DEC函数，将Amount转换为DECIMAL类型变量Tax。最终，Tax的值将是100.50。

3. 使用数学函数： AS400还提供了一些数学函数来处理十进制数。例如，使用%DECPOS函数可以获取一个DECIMAL类型变量的小数位数。

   示例代码：

   DCL-S Amount DECIMAL(9,2);
   DCL-S DecimalPlaces INT(10);
   
   Amount = 100.50;
   DecimalPlaces = %DECPOS(Amount);
   

   在上面的示例中，Amount是一个DECIMAL类型变量，被赋值为100.50。通过使用%DECPOS函数，获取Amount的小数位数，并将结果赋值给DecimalPlaces变量。最终，DecimalPlaces的值将是2。

通过使用上述方法，可以在AS400中解决十进制问题，并进行正确的数值计算和数据处理。