如何 Select 并显示最新日期 (openCobol)

How to Select and display latest date (openCobol)

我是 Cobol 新手。

日期一列需要标识要显示的最晚日期。

2004 年 8 月 9 日

2016 年 2 月 7 日

24/04/1995

2016 年 9 月 27 日

并且它能够将 27/09/2016 识别为最新日期

我终于找到答案了。

  • 比较日期:如果是 Billdate(最晚日期),则转到报告日期

       IF WSAA-BillDate > WSAA-ReportDate
           MOVE WSAA-BillDate to WSAA-ReportDate
       END-IF