请注意，SO 440061提供了有关在12小时制和24小时制之间转换时间的有用信息（与该转换相反）。这并非微不足道，因为上午12:45到凌??晨1:15才半小时。
接下来，请注意Informix（IDS Informix Dynamic Server）7.31版最终于2009-09-30停止服务; 它不再是受支持的产品。
您应该更精确地使用您的版本号；例如，在7.30.UC1和7.31.UD8之间有相当大的差异。
但是，您应该能够使用TO_CHAR（）函数根据需要设置时间格式。尽管此引用是针对IDS 12.10信息中心的，但我相信您将能够在7.31中使用它（不一定在7.30中使用它，但是您在过去十年的大部分时间里都不会使用它）。
它说，有一个’％R’格式说明符可以持续24小时。它还将您引向‘GL_DATETIME ‘，其中说’％I’给您12小时的时间，’％p’给您am / pm指示器。我还找到了IDS的7.31.UD8实例来验证这一点：
select to_char(datetime(2009-01-01 16:15:14) year to second, '%I:%M %p')
from dual;
04:15 PM
select to_char(datetime(2009-01-01 16:15:14) year to second, '%1.1I:%M %p')
from dual;
4:15 PM
通过重新阅读问题，我看到您实际上具有0000..2359范围内的SMALLINT值，需要进行转换。通常，我会指出Informix具有用于存储此类值的类型- DATETIME HOUR TO MINUTE-但我承认它在磁盘上占用3个字节，而不是2个字节，因此它不像SMALLINT表示法那么紧凑。
史蒂夫·卡斯（Steve Kass）显示了sql Server表示法：
select
cast((@milTime/100+11)%12+1 as varchar(2))
+':'
+substring(cast((@milTime%100+100) as char(3)),2,2)
+' '
+substring('ap',@milTime/1200%2+1,1)
+'m';
正确设置小时数的技巧很巧妙-感谢Steve！
假定表为：转换为IDS 11.50的Informix。
CREATE TEMP TABLE times(begin_tm SMALLINT NOT NULL);
SELECT begin_tm,
(MOD(begin_tm/100 + 11, 12) + 1)::VARCHAR(2) || ':' ||
SUBSTRING((MOD(begin_tm, 100) + 100)::CHAR(3) FROM 2) || ' ' ||
SUBSTRING("ampm" FROM (MOD((begin_tm/1200)::INT, 2) * 2) + 1 FOR 2)
FROM times
ORDER BY begin_tm;
使用FROM和FOR的SUBSTRING表示法是标准的sql表示法-很奇怪，但是如此。
结果示例：
0 12:00 am
1 12:01 am
59 12:59 am
100 1:00 am
559 5:59 am
600 6:00 am
601 6:01 am
959 9:59 am
1000 10:00 am
1159 11:59 am
1200 12:00 pm
1201 12:01 pm
1259 12:59 pm
1300 1:00 pm
2159 9:59 pm
2200 10:00 pm
2359 11:59 pm
2400 12:00 am
注意：值559-601在列表中，因为在没有强制转换为整数的情况下，我遇到了舍入而不是截断的问题。
现在，已在IDS 11.50上对其进行了测试；IDS 7.3x将没有强制转换符号。但是，这不是问题。接下来的评论将要解决…
作为一种如何在不使用条件语句等条件的情况下用sql编写表达式的练习，这很有趣，但是如果有人在整个套件中多次编写该表达式，我会射击它们，因为它们缺乏模块化。显然，这需要一个存储过程- 并且一个存储过程不需要（显式）强制转换或其他一些技巧，尽管这些赋值强制执行隐式强制转换：
CREATE PROCEDURE ampm_time(tm SMALLINT) RETURNING CHAR(8);
DEFINE hh SMALLINT;
DEFINE mm SMALLINT;
DEFINE am SMALLINT;
DEFINE m3 CHAR(3);
DEFINE a3 CHAR(3);
LET hh = MOD(tm / 100 + 11, 12) + 1;
LET mm = MOD(tm, 100) + 100;
LET am = MOD(tm / 1200, 2);
LET m3 = mm;
IF am = 0
THEN LET a3 = ' am';
ELSE LET a3 = ' pm';
END IF;
RETURN (hh || ':' || m3[2,3] || a3);
END PROCEDURE;
Informix’[2,3]’表示法是子字符串运算符的原始形式。之所以是原始的，是因为（出于某些原因，我还是无法理解）下标必须是文字整数（不是变量，不是表达式）。它恰好在这里有用。总的来说，这令人沮丧。
该存储过程可以在您可以使用的任何Informix版本（Online 5.x，SE 7.x，IDS 7.x或9.x，10.00、11.x，12.x）上运行。
为了说明等价的表达式和存储过程：
SELECT begin_tm,
(MOD(begin_tm/100 + 11, 12) + 1)::VARCHAR(2) || ':' ||
SUBSTRING((MOD(begin_tm, 100) + 100)::CHAR(3) FROM 2) ||
SUBSTRING(' am pm' FROM (MOD((begin_tm/1200)::INT, 2) * 3) + 1 FOR 3),
ampm_time(begin_tm)
FROM times
ORDER BY begin_tm;
产生结果：
0 12:00 am 12:00 am
1 12:01 am 12:01 am
59 12:59 am 12:59 am
100 1:00 am 1:00 am
559 5:59 am 5:59 am
600 6:00 am 6:00 pm
601 6:01 am 6:01 pm
959 9:59 am 9:59 pm
1000 10:00 am 10:00 pm
1159 11:59 am 11:59 pm
1200 12:00 pm 12:00 pm
1201 12:01 pm 12:01 pm
1259 12:59 pm 12:59 pm
1300 1:00 pm 1:00 pm
2159 9:59 pm 9:59 pm
2200 10:00 pm 10:00 pm
2359 11:59 pm 11:59 pm
2400 12:00 am 12:00 am
现在，可以在ACE报告中的单个SELECT语句中多次使用此存储过程，而无需费劲。
[ 在原始海报上发表有关无法正常工作的评论后… ]
IDS 7.31不处理传递给MOD（）函数的非整数值。因此，除法必须存储在显式整数变量中-因此：
CREATE PROCEDURE ampm_time(tm SMALLINT) RETURNING CHAR(8);
DEFINE i2 SMALLINT;
DEFINE hh SMALLINT;
DEFINE mm SMALLINT;
DEFINE am SMALLINT;
DEFINE m3 CHAR(3);
DEFINE a3 CHAR(3);
LET i2 = tm / 100;
LET hh = MOD(i2 + 11, 12) + 1;
LET mm = MOD(tm, 100) + 100;
LET i2 = tm / 1200;
LET am = MOD(i2, 2);
LET m3 = mm;
IF am = 0
THEN LET a3 = ' am';
ELSE LET a3 = ' pm';
END IF;
RETURN (hh || ':' || m3[2,3] || a3);
END PROCEDURE;
这已在Solaris 10上的IDS 7.31.UD8上进行了测试，并且可以正常工作。我不了解所报告的语法错误；但是存在版本依赖性的外部机会- 为了以防万一，报告版本号和平台 始终 至关重要。注意，我小心地记录了各种事情在哪里工作。这不是偶然，也不是大惊小怪-它基于多年的经验。
602392714
清零编程群