ISDATE 相当于 DB2

Question

我有一个包含字符格式日期的表。我想检查日期的格式。请让我知道如何在 DB2 中做到这一点。我知道有一个函数 ISDATE 但它在 DB2 中不起作用。我在 AS400 上使用 db2 作为日期基础..请帮助我

Answer 1

实际上，看起来 AS/400 的 DB2 可能没有有 ISDATE() 函数（我在 V6R1 参考中找不到任何内容 - 或者，有趣的是， LUW 参考）。所以你的问题似乎是该功能不存在。

当然，问题的根源在于尝试转换无效日期会导致语句停止。鉴于此，如果可以进行格式化，则此语句应该为您提供一个日期，如果不可能，则为 null。请注意，如果您混合了美国和欧元格式/排序，您可能无法正确恢复数据（如果您的分隔符不同，我认为它们默认情况下，你可能会没事的）。

WITH date_format(strDate, format) as (
    SELECT strDate, 
        CASE 
            WHEN strDate LIKE('____-__-__') THEN 'ISO'
            WHEN strDate LIKE('__.__.____') THEN 'EUR'
            WHEN strDate LIKE('__/__/____') THEN 'USA'
            ELSE NULL END
    FROM dataTable
)
SELECT
    strDate, 
    format, 
    CASE 
        WHEN format IS NOT NULL THEN DATE(strDate)
        ELSE NULL 
    END AS realDate
FROM date_format

这会将数据表变成这样：

String Dates
=============
2011-09-22   
22.09.2011   
09/22/2011   
a111x90x00  -- And who knows what this is...  

变成这样：

Results:
strDate      format   realDate
============================
2011-09-22   ISO      2011-09-22   
22.09.2011   EUR      2011-09-22   
09/22/2011   USA      2011-09-22   
a111x90x00   -        -            

这个示例当然使用自动翻译的默认格式。如果您有其他内容，则必须手动翻译它（您可以将其子串到 ISO 然后进行转换，而不是返回格式）。

Answer 2

我不清楚“检查日期的格式”的意图，也不知道现有的 ISDATE() 效果是什么，但名称所暗示的内容似乎足够清楚。考虑：

在 v5r3 上进行了极其简单的测试 [即只是为了确保一些错误的日期字符串示例值和一些垃圾文本输入实际上返回 NULL，并且每个标准 具有有效值的日期格式返回日期值]，以下内容应影响输入变化字符串的评估，最多 10 个字符作为可转换为 DATE 的值；当输入值无法转换为日期时，结果为 NULL。当然，这意味着最初的 NULL 值不能直接与无效日期字符串生成的结果区分开来。

如果需要某些所需的指示符，例如 TRUE 或 FALSE 作为结果，则可以在 CASE 表达式中编码使用用户定义函数 (UDF)；例如：
当 ISDATE(myVCcol) 为 NULL 时，则为 'FALSE' ELSE 'TRUE' END

DROP   FUNCTION ISDATE                              
;                                                   
CREATE FUNCTION ISDATE                              
 ( InpDateStr VARCHAR( 10 )                         
 ) RETURNS DATE                                     
 LANGUAGE SQL                                       
 DETERMINISTIC                                      
 RETURNS NULL ON NULL INPUT                         
    SET OPTION DBGVIEW = *SOURCE , DATFMT = *ISO    
BEGIN                                               
 DECLARE EXIT HANDLER FOR SQLEXCEPTION RETURN NULL ;
 RETURN DATE( InpDateStr ) ;                        
END                                                 
;