GET CHANGES

     EXEC ADO
        GET CHANGES INTO :changesDSobj
     END-EXEC