$set mfoo
       Identification Division.

       Program-id. Student-Look-Up.
       Author.     Arthur R. Buss.

       Environment Division.
       Object Section.
       Class-control.
           Registrar is Class "Register"
           .

       Data Division.
       Working-storage Section.
       01  Handles          object reference.
           05  theRegHandle.

       Procedure Division.
           invoke Registrar "New" returning theRegHandle
           invoke theRegHandle "ProcessRequest"
           STOP RUN
           .