Returns a DECIMAL value that represents the row position of the upper-left corner of a frame within its window.
This procedure displays Customer information in one frame, then displays Order information for the Customer in a second frame that overlays the first. FRAME-ROW and FRAME-COL control the placement of the overlay frame. FRAME-ROW places the overlay frame on the eighth row of the first frame. FRAME-COL places the overlay frame on the first column of the first frame.
r-frrow.p
FOR EACH Customer NO-LOCK: DISPLAY Customer WITH FRAME cust-frame 2 COLUMNS TITLE "CUSTOMER INFORMATION". FOR EACH Order OF Customer NO-LOCK: DISPLAY Order.OrderNum Order.OrderDate Order.ShipDate Order.PromiseDate Order.Carrier Order.Instruction Order.PO WITH 2 COLUMNS 1 DOWN OVERLAY TITLE "CUSTOMER'S ORDERS" ROW FRAME-ROW(cust-frame) + 8 COLUMN FRAME-COL(cust-frame) + 1. END. END. |