%INTH（使用四舍五入转换为整数格式）

在线编辑

%INTH(numeric or character expression)

%INTH 与 %INT 相同，但如果表达式是十进制，浮点或字符值，那么在转换为整数类型时，会将一半调整应用于表达式的值。如果无法执行一半调整，那么不会发出任何消息。

有关更多信息，请参阅转换操作或内置函数。

图 1。 %INT 和 %INTH 示例

 *..1....+....2....+....3....+....4....+....5....+....6....+....7...+....
D*Name++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
D p7              s              7p 3 inz (1234.567)
D s9              s              9s 5 inz (73.73442)
D f8              s              8f   inz (123.789)
D c15a            s             15a   inz (' 12345.6789 -') 
D c15b            s             15a   inz (' + 9 8 7 . 6 5 4 ')
D result1         s             15p 5
D result2         s             15p 5
D result3         s             15p 5
D array           s              1a   dim (200)
D a               s              1a

 /FREE
 // using numeric parameters
    result1 = %int (p7) + 0.011;  // "result1" is now 1234.01100.
    result2 = %int (s9);          // "result2" is now   73.00000
    result3 = %inth (f8);         // "result3" is now  124.00000.
 // using character parameters
    result1 = %int (c15a);        // "result1" is now  -12345.00000
    result2 = %inth (c15b);       // "result2" is now     988.00000
 
    // %INT and %INTH can be used as array indexes
    a = array (%inth (f8));
 /END-FREE