/* This code accesses an OpenEdge database. */
FIND demo.customer WHERE demo.customer.custnum EQ 3. FIND PREV demo.customer. DISPLAY demo.customer.custnum LABEL "PROGRESS DATABASE RESULT" WITH FRAME new-frame. /* This code accesses a MS SQL Server data source.*/ FIND mssdemo.customer WHERE mssdemo.customer.custnum EQ 3. FIND PREV mssdemo.customer. DISPLAY mssdemo.customer.custnum LABEL "MSS DATA SOURCE RESULT" WITH COL 29. |