正在进行中，如何根据今天的日期计算具体的上一个日期

Question

我只是在4年裁员后重新开始......我试图通过Progress 10.1C找出以下报告

我需要确定当月的最后一天，即今天的日期前3个月

示例：今天是2013年7月1日。所以我需要带来4月的最后一天。所以当前月份减去2 - 那个月的第一天减去1。

感谢

Answer 1

function dx returns date ( input d as date ):

  define variable yx as integer no-undo.
  define variable mx as integer no-undo.

  if month( d ) >= 3 then
    mx = month( d ) - 2.
   else
    assign
      yx = 1
      mx = 10 + month( d )
    .

  return date( mx, 1, ( year( d ) - yx )) - 1.

end.

display dx( 7/1/2013 ).