Calculate prior year

If you already have just a year value, then you should be able to subtract. If you have a date, then you can use 900-INCREMENT-DATE for this. This API will increment/decrement a date by days, months, and/or years. Once you get that, then you would need to split out the year portion. Check out the "Lawson 4GL Application Program Interfaces" document for details.

MOVE INPUT-DATE TO WSDR-FR-DATE.
MOVE ZEROES TO WSDR-DAY-INCR
WSDR-MONTH-INCR.
MOVE -1 TO WSDR-YEAR-INCR.
MOVE "Y" TO WSDR-EOM-ROLLOVER.
PERFORM 900-INCREMENT-DATE.
MOVE WSDR-TO-DATE TO OUTPUT-DATE.

Good Luck

Kelly

Yayyy...Perfect, thank you so much, Woozy!