DECLARE
W NUMBER;
WCOUNT NUMBER :=1;
comm_hnd OLEOBJ;
BEGIN

comm_hnd := ole2.create_obj('block2.MSC');

MSCOMMLib_IMSComm.CommPort(comm_hnd,1); --Form is "OUT"

MSCOMMLib_IMSComm.Settings(comm_hnd,'9600,n,8,1');

..........
END;