calcdate

karuchua

 LPeriodStartDate[1] := 010190D;
 LPeriodStartDate[4] := CALCDATE('CM-1M',PAgeingDate);
 LPeriodStartDate[5] := PAgeingDate;
 
 FOR i := 3  DOWNTO 2 DO
   LPeriodStartDate[i] := CALCDATE('-1M',LPeriodStartDate[i+1]-1);
 FOR i := 2  TO 4 DO
   LPeriodStartDate[i] := CALCDATE('CM',LPeriodStartDate[i]);

LPeriodStartDate id of type date and has a array of 6.


but what is this guy training to do? i cant comprehend this.

David_Cox

This bit is wrong, it is calculating a date based on the startdate, the varable could be wrong.

FOR i := 2  TO 4 DO
   LPeriodStartDate[i] := CALCDATE('CM',LPeriodStartDate[i]); 

Should this be an End Date variable like LPeriodEndDate:

FOR i := 2  TO 4 DO
   LPeriodEndDate[i] := CALCDATE('CM',LPeriodStartDate[i]); 

For code like this look in:
Report 120 "Aged Accounts Receivable" in the function CalcDates, this sets start and ending dates!


HTH

David

mohana_cse06

It should be

FOR i := 2  TO 4 DO
   LPeriodEndDate[i] := CALCDATE('<CM>',LPeriodStartDate[i]);

karuchua

FOR i := 3  DOWNTO 2 DO
   LPeriodStartDate[i] := CALCDATE('-1M',LPeriodStartDate[i+1]-1);
FOR i := 2  TO 4 DO
   LPeriodStartDate[i] := CALCDATE('CM',LPeriodStartDate[i]);

but what is he trying to do here?