initialize()=
declare
        app = application;
        wbs = workbooks collection of workbook;
        x = integer;
        y = varchar(20);
        awbs = array of workbook;
enddeclare

begin

//      Show Microsoft Excel
        app.visible = 1;

//      Get the workbooks collection
        wbs = app.workbooks();

//      Open a workbook and put it into an OpenROAD
//      array
        awbs[1] = wbs.open
                ('c:\msoffice\excel\examples\samples.xls');

//      Index into the OpenROAD array to access a workbook
//      and set an attribute.
        [1].author = 'John Smith';

//      Index into the workbooks collection through an integer
//      constant and set an attribute of the workbook
//      being indexed.
        wbs[1].author = 'Jane Smith';

//      Index into the workbooks collection through a string
//      constant and set an attribute of the workbook
//      being indexed.
        wbs['samples.xls'].author = 'Sam';

//      Index into the workbooks collection through an integer
//      variable and set an attribute of the workbook
//      being indexed.
        x = 1;
        wbs[x].author = 'Sally';

//      Index into the workbooks collection through a varchar
//      variable and set an attribute of the workbook
//      being indexed.
        y = 'samples.xls';
        wbs[y].author = 'unknown';

//      Index into the workbooks collection through a string
//      constant and call a method of the workbook being
//      indexed.

        wbs['samples.xls'].close(TRUE,'c:\save.xls',FALSE);

//      Quit Excel.
        app.quit();
end