检查开始日期是否大于结束日期

Check if startdate is greater then enddate

我想比较两个日期。我这样试过:

SetDates(Rec, StartDate2, EndDate2, Regelkorting);

BOMB.RESET;
BOMB.SETRANGE(StartDate2,StartDate2);
IF BOMB.FINDFIRST THEN BEGIN
IF BOMB.StartDate2 > BOMB.EndDate2 THEN BEGIN
ERROR('startdatum kan niet groter zijn dan einddatum');
END;
END

但是没有消息显示

这是输出:

物料清单组件 530120,10000,Artikel,530120,Intergas 041107 HREco 24 CW3,ST,0,0,0,01-10-16,10-10-13,0,Nee,Nee,

谢谢

对比没问题,但我觉得你没有找到正确的BOMB记录。

你有这个:

BOMB.RESET;
BOMB.SETRANGE(StartDate2,StartDate2);
IF BOMB.FINDFIRST THEN BEGIN
  IF BOMB.StartDate2 > BOMB.EndDate2 THEN BEGIN
    ERROR('startdatum kan niet groter zijn dan einddatum');
  END;
END;

您仅按 StartDate2 字段而不是 主键 进行筛选,因此您找到了错误的记录。

所以主键的字段过滤BOMBTable,标准BOM组件table有这个主键 Parent Item No.,Line No. 如果你没有改变这个试试这个:

BOMB.RESET;
BOMB.SETRANGE("Parent Item No.", "Parent Item No.");
BOMB.SETRANGE("Line No.", "Line No.");
IF BOMB.FINDFIRST THEN BEGIN
  IF BOMB.StartDate2 > BOMB.EndDate2 THEN BEGIN
    ERROR('startdatum kan niet groter zijn dan einddatum');
  END;
END;