Subtracts a number of days from a date to produce a date result, or subtracts one date from another to produce an INTEGER result that represents the number of days between the two dates.
date - days dateThis procedure finds all unshipped orders. If the promised date is more than one week ago, the procedure finds the customers who placed the order and displays the order and customer data.
DISPLAY "ORDERS SCHEDULED TO SHIP MORE THAN ONE WEEK LATE".FOR EACH Order NO-LOCK WHERE Order.ShipDate = ?:IF (TODAY - 7) > Order.PromiseDate THENDISPLAY Order.OrderNum Order.CustNum Order.PromiseDate(TODAY - Order.PromiseDate) LABEL "Days Late".END.
© 2012 Progress Software Corporation and/or its subsidiaries or affiliates. |